~ chicken-core (chicken-5) 7e5c04920a7a7776dc393bd495154123269b304b
commit 7e5c04920a7a7776dc393bd495154123269b304b
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Mon Feb 22 12:16:10 2010 +0100
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Mon Feb 22 12:16:10 2010 +0100
updated bootstrap files
diff --git a/bootstrap/batch-driver.c b/bootstrap/batch-driver.c
index 52166b67..0c54079b 100644
--- a/bootstrap/batch-driver.c
+++ b/bootstrap/batch-driver.c
@@ -1,10 +1,10 @@
/* Generated from batch-driver.scm by the CHICKEN compiler
http://www.call-with-current-continuation.org
- 2009-12-04 21:29
+ 2010-02-09 21:38
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
+ windows-mingw32-x86 [ manyargs ptables ]
+ compiled 2010-01-08 on lenovo-1 (MINGW32_NT-6.0)
+ command line: batch-driver.scm -optimize-level 2 -include-path . -include-path ./ -inline -no-lambda-info -local -no-trace -extend private-namespace.scm -no-trace -output-file batch-driver.c
unit: driver
*/
@@ -16,106 +16,92 @@ C_externimport void C_ccall C_library_toplevel(C_word c,C_word d,C_word k) C_nor
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 C_TLS C_word lf[409];
static double C_possibly_force_alignment;
C_noret_decl(C_driver_toplevel)
C_externexport void C_ccall C_driver_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_1508)
+static void C_ccall f_1508(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1511)
+static void C_ccall f_1511(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1516)
+static void C_ccall f_1516(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1520)
+static void C_ccall f_1520(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_1524)
-static void C_ccall f_1524(C_word c,C_word t0,C_word t1,C_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;
+static void C_ccall f_1524(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1528)
+static void C_ccall f_1528(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1532)
+static void C_ccall f_1532(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1534)
+static void C_ccall f_1534(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_1534)
+static void C_ccall f_1534r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_1570)
+static void C_ccall f_1570(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4848)
+static void C_ccall f_4848(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4833)
+static void C_ccall f_4833(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4829)
+static void C_ccall f_4829(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4818)
+static void C_ccall f_4818(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4789)
+static void C_fcall f_4789(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_4793)
static void C_ccall f_4793(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_1586)
+static void C_ccall f_1586(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4785)
+static void C_ccall f_4785(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4746)
+static void C_ccall f_4746(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4748)
+static void C_fcall f_4748(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4777)
+static void C_ccall f_4777(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1589)
+static void C_ccall f_1589(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1595)
+static void C_fcall f_1595(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4727)
+static void C_ccall f_4727(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4723)
+static void C_ccall f_4723(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4719)
+static void C_ccall f_4719(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2061)
static void C_fcall f_2061(C_word t0,C_word t1) C_noret;
C_noret_decl(f_2064)
static void C_fcall f_2064(C_word t0,C_word t1) C_noret;
C_noret_decl(f_2067)
-static void C_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;
+static void C_ccall f_2067(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4704)
+static void C_ccall f_4704(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4648)
+static void C_ccall f_4648(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4656)
+static void C_ccall f_4656(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4658)
+static void C_fcall f_4658(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4696)
+static void C_ccall f_4696(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2071)
+static void C_ccall f_2071(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4598)
+static void C_ccall f_4598(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4600)
+static void C_fcall f_4600(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4635)
+static void C_ccall f_4635(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4639)
+static void C_ccall f_4639(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2079)
-static void C_fcall f_2079(C_word t0,C_word t1) C_noret;
+static void C_ccall f_2079(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2082)
static void C_fcall f_2082(C_word t0,C_word t1) C_noret;
C_noret_decl(f_2085)
@@ -123,739 +109,729 @@ 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;
+static void C_ccall f_2091(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2094)
+static void C_fcall f_2094(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2097)
+static void C_ccall f_2097(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2100)
+static void C_fcall f_2100(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2103)
+static void C_fcall f_2103(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2106)
+static void C_fcall f_2106(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2109)
+static void C_fcall f_2109(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2112)
+static void C_fcall f_2112(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4501)
+static void C_ccall f_4501(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4503)
+static void C_fcall f_4503(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4532)
+static void C_ccall f_4532(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2116)
-static void C_fcall f_2116(C_word t0,C_word t1) C_noret;
+static void C_ccall f_2116(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4496)
+static void C_ccall f_4496(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2119)
static void C_fcall f_2119(C_word t0,C_word t1) C_noret;
C_noret_decl(f_2122)
static void C_fcall f_2122(C_word t0,C_word t1) C_noret;
C_noret_decl(f_2125)
static void C_fcall f_2125(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4411)
-static void C_ccall f_4411(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2128)
+static void C_fcall f_2128(C_word t0,C_word t1) C_noret;
C_noret_decl(f_2131)
static void C_fcall f_2131(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_2134)
+static void C_fcall f_2134(C_word t0,C_word t1) C_noret;
C_noret_decl(f_2137)
static void C_fcall f_2137(C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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;
+static void C_fcall f_2140(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;
+static void C_fcall f_2143(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;
+static void C_fcall f_2146(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4451)
+static void C_ccall f_4451(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2152)
-static void C_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;
+static void C_fcall f_2152(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4436)
+static void C_ccall f_4436(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4439)
+static void C_ccall f_4439(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4442)
+static void C_ccall f_4442(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2158)
+static void C_fcall f_2158(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4426)
+static void C_ccall f_4426(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4429)
+static void C_ccall f_4429(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2161)
static void C_ccall f_2161(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2164)
static void C_ccall f_2164(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_4384)
+static void C_ccall f_4384(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2167)
+static void C_ccall f_2167(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4378)
+static void C_ccall f_4378(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2170)
+static void C_ccall f_2170(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4369)
+static void C_ccall f_4369(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2173)
+static void C_ccall f_2173(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4351)
+static void C_ccall f_4351(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4354)
+static void C_ccall f_4354(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4357)
+static void C_ccall f_4357(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4360)
+static void C_ccall f_4360(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2176)
+static void C_ccall f_2176(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4310)
+static void C_ccall f_4310(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4312)
+static void C_fcall f_4312(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4341)
+static void C_ccall f_4341(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4306)
+static void C_ccall f_4306(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2182)
+static void C_ccall f_2182(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2185)
+static void C_ccall f_2185(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4255)
+static void C_ccall f_4255(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4257)
+static void C_fcall f_4257(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4286)
+static void C_ccall f_4286(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2189)
+static void C_ccall f_2189(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2192)
+static void C_fcall f_2192(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2195)
+static void C_fcall f_2195(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2198)
+static void C_fcall f_2198(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2201)
+static void C_fcall f_2201(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4152)
+static void C_fcall f_4152(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4166)
+static void C_ccall f_4166(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4191)
+static void C_ccall f_4191(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4196)
+static void C_ccall f_4196(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4224)
+static void C_ccall f_4224(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4062)
+static void C_ccall f_4062(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4067)
+static void C_fcall f_4067(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4081)
+static void C_ccall f_4081(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4106)
+static void C_ccall f_4106(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4111)
+static void C_ccall f_4111(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4139)
+static void C_ccall f_4139(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2204)
+static void C_ccall f_2204(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4056)
+static void C_ccall f_4056(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4048)
+static void C_ccall f_4048(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4023)
+static void C_ccall f_4023(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4025)
+static void C_fcall f_4025(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4035)
+static void C_ccall f_4035(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2207)
+static void C_ccall f_2207(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2214)
static void C_ccall f_2214(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_2217)
+static void C_ccall f_2217(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2220)
+static void C_ccall f_2220(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3986)
+static void C_fcall f_3986(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4002)
+static void C_ccall f_4002(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4005)
+static void C_ccall f_4005(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2223)
+static void C_ccall f_2223(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2227)
+static void C_ccall f_2227(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2235)
+static void C_ccall f_2235(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2239)
+static void C_ccall f_2239(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3949)
+static void C_ccall f_3949(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3951)
+static void C_fcall f_3951(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3980)
+static void C_ccall f_3980(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2242)
+static void C_ccall f_2242(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3910)
+static void C_ccall f_3910(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3912)
+static void C_fcall f_3912(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3941)
+static void C_ccall f_3941(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3906)
+static void C_ccall f_3906(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3850)
+static void C_ccall f_3850(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3852)
+static void C_fcall f_3852(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3846)
+static void C_ccall f_3846(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2246)
+static void C_ccall f_2246(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2250)
+static void C_ccall f_2250(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2253)
+static void C_fcall f_2253(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3825)
+static void C_ccall f_3825(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2257)
+static void C_ccall f_2257(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3818)
+static void C_ccall f_3818(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2261)
+static void C_ccall f_2261(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3811)
+static void C_ccall f_3811(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2265)
+static void C_ccall f_2265(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3804)
+static void C_ccall f_3804(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2269)
static void C_ccall f_2269(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_3784)
+static void C_ccall f_3784(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2273)
+static void C_ccall f_2273(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2284)
+static void C_ccall f_2284(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2287)
+static void C_fcall f_2287(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2290)
+static void C_ccall f_2290(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3743)
+static void C_ccall f_3743(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2293)
+static void C_ccall f_2293(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2296)
-static void C_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;
+static void C_ccall f_2296(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2317)
+static void C_fcall f_2317(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2345)
+static void C_ccall f_2345(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2351)
static void C_ccall f_2351(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_2355)
+static void C_ccall f_2355(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2358)
+static void C_ccall f_2358(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2361)
+static void C_ccall f_2361(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2364)
+static void C_ccall f_2364(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2372)
-static void C_fcall f_2372(C_word t0,C_word t1) C_noret;
+static void C_ccall f_2372(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2375)
static void C_ccall f_2375(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_2378)
+static void C_ccall f_2378(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3711)
+static void C_ccall f_3711(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3719)
+static void C_ccall f_3719(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2381)
-static void C_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;
+static void C_ccall f_2381(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2384)
static void C_ccall f_2384(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3556)
+static void C_fcall f_3556(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3655)
+static void C_ccall f_3655(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3704)
+static void C_ccall f_3704(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3672)
+static void C_ccall f_3672(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3676)
+static void C_ccall f_3676(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3681)
+static void C_fcall f_3681(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3702)
+static void C_ccall f_3702(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3667)
+static void C_ccall f_3667(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3658)
+static void C_ccall f_3658(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3616)
+static void C_fcall f_3616(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3645)
+static void C_ccall f_3645(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3571)
+static void C_ccall f_3571(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3575)
+static void C_ccall f_3575(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3581)
+static void C_fcall f_3581(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3610)
+static void C_ccall f_3610(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3579)
+static void C_ccall f_3579(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3567)
+static void C_ccall f_3567(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3547)
+static void C_ccall f_3547(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3551)
+static void C_ccall f_3551(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2387)
static void C_ccall f_2387(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_2390)
+static void C_ccall f_2390(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3505)
+static void C_ccall f_3505(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3511)
+static void C_fcall f_3511(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3540)
+static void C_ccall f_3540(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3509)
+static void C_ccall f_3509(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2393)
-static void C_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;
+static void C_fcall f_2393(C_word t0,C_word t1) C_noret;
C_noret_decl(f_2396)
static void C_ccall f_2396(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_3482)
+static void C_ccall f_3482(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3502)
+static void C_ccall f_3502(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2402)
-static void C_ccall f_2402(C_word c,C_word t0,C_word t1) C_noret;
+static void C_fcall f_2402(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3440)
+static void C_ccall f_3440(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3442)
+static void C_fcall f_3442(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3471)
+static void C_ccall f_3471(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2405)
static void C_ccall f_2405(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_3374)
+static void C_fcall f_3374(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3180)
+static void C_ccall f_3180(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3330)
+static void C_fcall f_3330(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3184)
+static void C_ccall f_3184(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3188)
+static void C_fcall f_3188(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3207)
+static void C_fcall f_3207(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3192)
+static void C_ccall f_3192(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2414)
+static void C_ccall f_2414(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3119)
+static void C_ccall f_3119(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3124)
+static void C_fcall f_3124(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3136)
+static void C_ccall f_3136(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3139)
+static void C_ccall f_3139(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3142)
+static void C_ccall f_3142(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3145)
+static void C_ccall f_3145(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3159)
+static void C_ccall f_3159(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2417)
+static void C_ccall f_2417(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3113)
+static void C_ccall f_3113(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2420)
+static void C_ccall f_2420(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3107)
+static void C_ccall f_3107(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2423)
+static void C_ccall f_2423(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2426)
+static void C_ccall f_2426(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3092)
+static void C_ccall f_3092(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2429)
+static void C_ccall f_2429(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2434)
+static void C_ccall f_2434(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2437)
+static void C_ccall f_2437(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2440)
+static void C_ccall f_2440(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2443)
+static void C_ccall f_2443(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3038)
+static void C_ccall f_3038(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3050)
+static void C_fcall f_3050(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3079)
+static void C_ccall f_3079(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3045)
+static void C_ccall f_3045(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2446)
+static void C_ccall f_2446(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3035)
+static void C_ccall f_3035(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3031)
+static void C_ccall f_3031(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2457)
static void C_ccall f_2457(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_2977)
+static void C_ccall f_2977(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3017)
+static void C_ccall f_3017(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3009)
+static void C_ccall f_3009(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2980)
+static void C_ccall f_2980(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2988)
+static void C_ccall f_2988(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2991)
+static void C_ccall f_2991(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2994)
+static void C_ccall f_2994(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3000)
+static void C_ccall f_3000(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3003)
+static void C_ccall f_3003(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3006)
+static void C_ccall f_3006(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2463)
+static void C_fcall f_2463(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2968)
+static void C_ccall f_2968(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2971)
+static void C_ccall f_2971(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2950)
+static void C_ccall f_2950(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2956)
+static void C_ccall f_2956(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2959)
+static void C_ccall f_2959(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2962)
+static void C_ccall f_2962(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2466)
-static void C_ccall f_2466(C_word c,C_word t0,C_word t1) C_noret;
+static void C_fcall f_2466(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2944)
+static void C_ccall f_2944(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2469)
+static void C_ccall f_2469(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2937)
+static void C_ccall f_2937(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2472)
static void C_ccall f_2472(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2901)
+static void C_fcall f_2901(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2930)
+static void C_ccall f_2930(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2899)
+static void C_ccall f_2899(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2844)
+static void C_ccall f_2844(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2846)
+static void C_fcall f_2846(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2884)
+static void C_ccall f_2884(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2854)
+static void C_fcall f_2854(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2881)
+static void C_ccall f_2881(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2877)
+static void C_ccall f_2877(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2858)
+static void C_ccall f_2858(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2867)
+static void C_ccall f_2867(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2870)
+static void C_ccall f_2870(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2475)
static void C_ccall f_2475(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2478)
static void C_ccall f_2478(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_2808)
+static void C_fcall f_2808(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2826)
+static void C_ccall f_2826(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2816)
+static void C_fcall f_2816(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2820)
+static void C_ccall f_2820(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2481)
+static void C_ccall f_2481(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2487)
+static void C_ccall f_2487(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2493)
static void C_ccall f_2493(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_2496)
+static void C_ccall f_2496(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2499)
+static void C_ccall f_2499(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2504)
+static void C_fcall f_2504(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2511)
+static void C_ccall f_2511(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2758)
+static void C_ccall f_2758(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2761)
+static void C_ccall f_2761(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2514)
+static void C_ccall f_2514(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2518)
+static void C_ccall f_2518(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2521)
+static void C_ccall f_2521(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2524)
+static void C_ccall f_2524(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2616)
static void C_ccall f_2616(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2746)
+static void C_ccall f_2746(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2619)
static void C_ccall f_2619(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_2626)
+static void C_ccall f_2626(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2629)
+static void C_ccall f_2629(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2632)
+static void C_ccall f_2632(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2635)
+static void C_ccall f_2635(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2638)
+static void C_ccall f_2638(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2714)
+static void C_ccall f_2714(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2720)
+static void C_ccall f_2720(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2723)
+static void C_ccall f_2723(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2641)
+static void C_ccall f_2641(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2644)
+static void C_ccall f_2644(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2658)
+static void C_ccall f_2658(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_2662)
+static void C_ccall f_2662(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2668)
+static void C_ccall f_2668(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2671)
+static void C_ccall f_2671(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2674)
static void C_ccall f_2674(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_2677)
+static void C_ccall f_2677(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2680)
+static void C_ccall f_2680(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f5154)
+static void C_ccall f5154(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2699)
+static void C_ccall f_2699(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2683)
+static void C_ccall f_2683(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2686)
+static void C_ccall f_2686(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2652)
+static void C_ccall f_2652(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2530)
static void C_ccall f_2530(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_2544)
+static void C_ccall f_2544(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2548)
+static void C_ccall f_2548(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2551)
+static void C_ccall f_2551(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2570)
+static void C_ccall f_2570(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2587)
+static void C_ccall f_2587(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2590)
+static void C_ccall f_2590(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2596)
+static void C_ccall f_2596(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2599)
+static void C_ccall f_2599(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2538)
+static void C_ccall f_2538(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2336)
+static void C_ccall f_2336(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2329)
+static void C_ccall f_2329(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2305)
+static void C_ccall f_2305(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1982)
+static void C_fcall f_1982(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2012)
+static void C_fcall f_2012(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2007)
+static void C_fcall f_2007(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1984)
+static void C_fcall f_1984(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1988)
+static void C_ccall f_1988(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2002)
+static void C_ccall f_2002(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1996)
+static void C_ccall f_1996(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_1991)
-static void C_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;
+static void C_ccall f_1991(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1976)
+static void C_fcall f_1976(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1947)
+static void C_fcall f_1947(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1954)
+static void C_ccall f_1954(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1957)
+static void C_ccall f_1957(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1960)
+static void C_ccall f_1960(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_1963)
-static void C_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;
+static void C_ccall f_1963(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1937)
+static C_word C_fcall f_1937(C_word t0);
+C_noret_decl(f_1902)
+static void C_fcall f_1902(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1908)
+static void C_fcall f_1908(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_1916)
-static 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;
+static void C_fcall f_1916(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1924)
+static void C_ccall f_1924(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1928)
+static void C_ccall f_1928(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1822)
+static void C_fcall f_1822(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1891)
+static void C_ccall f_1891(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_1887)
-static void C_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;
+static void C_ccall f_1887(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1871)
+static void C_ccall f_1871(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1863)
+static void C_ccall f_1863(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1832)
+static void C_ccall f_1832(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1773)
+static void C_ccall f_1773(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_1780)
static void C_ccall f_1780(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_1786)
+static void C_fcall f_1786(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1801)
+static void C_ccall f_1801(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1797)
+static void C_ccall f_1797(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1783)
+static void C_ccall f_1783(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1819)
+static void C_ccall f_1819(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1730)
+static void C_fcall f_1730(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1737)
+static void C_ccall f_1737(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1742)
+static void C_fcall f_1742(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1754)
+static void C_ccall f_1754(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1760)
+static void C_ccall f_1760(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_1706)
-static void C_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;
+static void C_fcall f_1706(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_1713)
+static void C_ccall f_1713(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1716)
+static void C_ccall f_1716(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1719)
+static void C_ccall f_1719(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1722)
+static void C_ccall f_1722(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1725)
+static void C_ccall f_1725(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1684)
+static void C_fcall f_1684(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_1691)
static void C_ccall f_1691(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_1704)
+static void C_ccall f_1704(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_1660)
-static void C_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){
+static void C_fcall f_1660(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1664)
+static void C_ccall f_1664(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1673)
+static void C_ccall f_1673(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1676)
+static void C_ccall f_1676(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1679)
+static void C_ccall f_1679(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1682)
+static void C_ccall f_1682(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1645)
+static void C_fcall f_1645(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1652)
+static void C_ccall f_1652(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1655)
+static void C_ccall f_1655(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1537)
+static void C_fcall f_1537(C_word t0,C_word t1) C_noret;
+
+C_noret_decl(trf_4789)
+static void C_fcall trf_4789(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4789(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4749(t0,t1,t2);}
+f_4789(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_noret_decl(trf_4748)
+static void C_fcall trf_4748(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4748(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_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);}
+f_4748(t0,t1,t2);}
-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_noret_decl(trf_1595)
+static void C_fcall trf_1595(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1595(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_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);}
+f_1595(t0,t1);}
C_noret_decl(trf_2061)
static void C_fcall trf_2061(void *dummy) C_regparm C_noret;
@@ -873,29 +849,23 @@ 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_4658)
+static void C_fcall trf_4658(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4658(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4658(t0,t1,t2);}
-C_noret_decl(trf_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_4600)
+static void C_fcall trf_4600(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4600(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4600(t0,t1,t2);}
C_noret_decl(trf_2082)
static void C_fcall trf_2082(void *dummy) C_regparm C_noret;
@@ -921,78 +891,62 @@ 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_noret_decl(trf_2094)
+static void C_fcall trf_2094(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2094(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2098(t0,t1);}
+f_2094(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_noret_decl(trf_2100)
+static void C_fcall trf_2100(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2100(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2101(t0,t1);}
+f_2100(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_noret_decl(trf_2103)
+static void C_fcall trf_2103(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2103(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2104(t0,t1);}
+f_2103(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_noret_decl(trf_2106)
+static void C_fcall trf_2106(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2106(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2107(t0,t1);}
+f_2106(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_noret_decl(trf_2109)
+static void C_fcall trf_2109(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2109(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2110(t0,t1);}
+f_2109(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_noret_decl(trf_2112)
+static void C_fcall trf_2112(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2112(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2113(t0,t1);}
+f_2112(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_4503)
+static void C_fcall trf_4503(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4503(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4503(t0,t1,t2);}
C_noret_decl(trf_2119)
static void C_fcall trf_2119(void *dummy) C_regparm C_noret;
@@ -1018,6 +972,14 @@ C_word t0=C_pick(1);
C_adjust_stack(-2);
f_2125(t0,t1);}
+C_noret_decl(trf_2128)
+static void C_fcall trf_2128(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2128(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2128(t0,t1);}
+
C_noret_decl(trf_2131)
static void C_fcall trf_2131(void *dummy) C_regparm C_noret;
C_regparm static void C_fcall trf_2131(void *dummy){
@@ -1026,6 +988,14 @@ C_word t0=C_pick(1);
C_adjust_stack(-2);
f_2131(t0,t1);}
+C_noret_decl(trf_2134)
+static void C_fcall trf_2134(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2134(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2134(t0,t1);}
+
C_noret_decl(trf_2137)
static void C_fcall trf_2137(void *dummy) C_regparm C_noret;
C_regparm static void C_fcall trf_2137(void *dummy){
@@ -1034,460 +1004,500 @@ 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_noret_decl(trf_2140)
+static void C_fcall trf_2140(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2140(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2140(t0,t1);}
+
+C_noret_decl(trf_2143)
+static void C_fcall trf_2143(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2143(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2143(t0,t1);}
+
+C_noret_decl(trf_2146)
+static void C_fcall trf_2146(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2146(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2146(t0,t1);}
+
+C_noret_decl(trf_2152)
+static void C_fcall trf_2152(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2152(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2152(t0,t1);}
+
+C_noret_decl(trf_2158)
+static void C_fcall trf_2158(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2158(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2158(t0,t1);}
+
+C_noret_decl(trf_4312)
+static void C_fcall trf_4312(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4312(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4272(t0,t1,t2);}
+f_4312(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_noret_decl(trf_4257)
+static void C_fcall trf_4257(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4257(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4217(t0,t1,t2);}
+f_4257(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_noret_decl(trf_2192)
+static void C_fcall trf_2192(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2192(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2171(t0,t1);}
+f_2192(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_noret_decl(trf_2195)
+static void C_fcall trf_2195(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2195(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2174(t0,t1);}
+f_2195(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_noret_decl(trf_2198)
+static void C_fcall trf_2198(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2198(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2177(t0,t1);}
+f_2198(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_noret_decl(trf_2201)
+static void C_fcall trf_2201(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2201(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2180(t0,t1);}
+f_2201(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_noret_decl(trf_4152)
+static void C_fcall trf_4152(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4152(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4112(t0,t1,t2);}
+f_4152(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_noret_decl(trf_4067)
+static void C_fcall trf_4067(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4067(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4027(t0,t1,t2);}
+f_4067(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_noret_decl(trf_4025)
+static void C_fcall trf_4025(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4025(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3985(t0,t1,t2);}
+f_4025(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_noret_decl(trf_3986)
+static void C_fcall trf_3986(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3986(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3946(t0,t1,t2);}
+f_3986(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_noret_decl(trf_3951)
+static void C_fcall trf_3951(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3951(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3911(t0,t1,t2);}
+f_3951(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_noret_decl(trf_3912)
+static void C_fcall trf_3912(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3912(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3872(t0,t1,t2);}
+f_3912(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_noret_decl(trf_3852)
+static void C_fcall trf_3852(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3852(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3812(t0,t1,t2);}
+f_3852(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_noret_decl(trf_2253)
+static void C_fcall trf_2253(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2253(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2232(t0,t1);}
+f_2253(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_noret_decl(trf_2287)
+static void C_fcall trf_2287(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2287(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2266(t0,t1);}
+f_2287(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_noret_decl(trf_2317)
+static void C_fcall trf_2317(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2317(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2296(t0,t1);}
+f_2317(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_noret_decl(trf_3556)
+static void C_fcall trf_3556(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3556(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3516(t0,t1,t2);}
+f_3556(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_noret_decl(trf_3681)
+static void C_fcall trf_3681(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3681(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3641(t0,t1,t2);}
+f_3681(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_noret_decl(trf_3616)
+static void C_fcall trf_3616(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3616(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3576(t0,t1,t2);}
+f_3616(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_noret_decl(trf_3581)
+static void C_fcall trf_3581(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3581(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3541(t0,t1,t2);}
+f_3581(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_noret_decl(trf_3511)
+static void C_fcall trf_3511(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3511(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3471(t0,t1,t2);}
+f_3511(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_noret_decl(trf_2393)
+static void C_fcall trf_2393(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2393(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2372(t0,t1);}
+f_2393(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_noret_decl(trf_2402)
+static void C_fcall trf_2402(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2402(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2381(t0,t1);}
+f_2402(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_noret_decl(trf_3442)
+static void C_fcall trf_3442(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3442(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3402(t0,t1,t2);}
+f_3442(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_noret_decl(trf_3374)
+static void C_fcall trf_3374(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3374(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3334(t0,t1,t2);}
+f_3374(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_noret_decl(trf_3330)
+static void C_fcall trf_3330(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3330(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3290(t0,t1,t2);}
+f_3330(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_noret_decl(trf_3188)
+static void C_fcall trf_3188(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3188(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_3148(t0,t1);}
+f_3188(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_noret_decl(trf_3207)
+static void C_fcall trf_3207(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3207(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3167(t0,t1,t2);}
+f_3207(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_noret_decl(trf_3124)
+static void C_fcall trf_3124(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3124(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3084(t0,t1,t2);}
+f_3124(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_noret_decl(trf_3050)
+static void C_fcall trf_3050(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3050(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3010(t0,t1,t2);}
+f_3050(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_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_2442(t0,t1);}
+f_2463(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_noret_decl(trf_2466)
+static void C_fcall trf_2466(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2466(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2445(t0,t1);}
+f_2466(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_noret_decl(trf_2901)
+static void C_fcall trf_2901(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2901(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2861(t0,t1,t2);}
+f_2901(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_noret_decl(trf_2846)
+static void C_fcall trf_2846(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2846(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2806(t0,t1,t2);}
+f_2846(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_noret_decl(trf_2854)
+static void C_fcall trf_2854(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2854(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2814(t0,t1,t2);}
+f_2854(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_noret_decl(trf_2808)
+static void C_fcall trf_2808(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2808(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2768(t0,t1,t2);}
+f_2808(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_noret_decl(trf_2816)
+static void C_fcall trf_2816(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2816(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2776(t0,t1,t2);}
+f_2816(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_noret_decl(trf_2504)
+static void C_fcall trf_2504(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2504(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_2483(t0,t1,t2,t3,t4);}
+f_2504(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_noret_decl(trf_1982)
+static void C_fcall trf_1982(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1982(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_1961(t0,t1,t2,t3,t4);}
+f_1982(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_noret_decl(trf_2012)
+static void C_fcall trf_2012(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2012(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_1991(t0,t1);}
+f_2012(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_noret_decl(trf_2007)
+static void C_fcall trf_2007(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2007(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1986(t0,t1,t2);}
+f_2007(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_noret_decl(trf_1984)
+static void C_fcall trf_1984(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1984(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_1963(t0,t1,t2,t3);}
+f_1984(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_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_1955(t0,t1,t2);}
+f_1976(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_noret_decl(trf_1947)
+static void C_fcall trf_1947(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1947(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1926(t0,t1,t2);}
+f_1947(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_noret_decl(trf_1902)
+static void C_fcall trf_1902(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1902(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1881(t0,t1,t2);}
+f_1902(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_noret_decl(trf_1908)
+static void C_fcall trf_1908(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1908(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1887(t0,t1,t2);}
+f_1908(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_noret_decl(trf_1916)
+static void C_fcall trf_1916(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1916(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1895(t0,t1,t2);}
+f_1916(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_noret_decl(trf_1822)
+static void C_fcall trf_1822(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1822(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_1801(t0,t1);}
+f_1822(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_noret_decl(trf_1786)
+static void C_fcall trf_1786(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1786(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_1765(t0,t1);}
+f_1786(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_noret_decl(trf_1730)
+static void C_fcall trf_1730(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1730(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_1717(t0,t1,t2,t3,t4);}
+f_1730(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_noret_decl(trf_1742)
+static void C_fcall trf_1742(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1742(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1729(t0,t1,t2);}
+f_1742(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_noret_decl(trf_1706)
+static void C_fcall trf_1706(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1706(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -1495,46 +1505,46 @@ 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);}
+f_1706(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_noret_decl(trf_1684)
+static void C_fcall trf_1684(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1684(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_1671(t0,t1,t2,t3,t4);}
+f_1684(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_noret_decl(trf_1660)
+static void C_fcall trf_1660(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1660(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_1647(t0,t1,t2,t3);}
+f_1660(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_noret_decl(trf_1645)
+static void C_fcall trf_1645(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1645(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_1632(t0,t1,t2,t3);}
+f_1645(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_noret_decl(trf_1537)
+static void C_fcall trf_1537(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1537(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_1527(t0,t1);}
+f_1537(t0,t1);}
C_noret_decl(tr5)
static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
@@ -1620,12 +1630,12 @@ if(!C_demand(3)){
C_save(t1);
C_reclaim((void*)toplevel_trampoline,NULL);}
toplevel_initialized=1;
-if(!C_demand_2(3145)){
+if(!C_demand_2(3175)){
C_save(t1);
-C_rereclaim2(3145*sizeof(C_word), 1);
+C_rereclaim2(3175*sizeof(C_word), 1);
t1=C_restore;}
a=C_alloc(3);
-C_initialize_lf(lf,403);
+C_initialize_lf(lf,409);
lf[1]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
lf[2]=C_h_intern(&lf[2],17,"user-options-pass");
lf[3]=C_h_intern(&lf[3],14,"user-read-pass");
@@ -1654,480 +1664,486 @@ 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);
+lf[29]=C_h_intern(&lf[29],8,"unboxing");
+lf[30]=C_h_intern(&lf[30],7,"nursery");
+lf[31]=C_h_intern(&lf[31],10,"stack-size");
+lf[32]=C_h_intern(&lf[32],19,"\003sysstandard-output");
+lf[33]=C_h_intern(&lf[33],16,"\003sysflush-output");
+lf[34]=C_h_intern(&lf[34],19,"\003syswrite-char/port");
+lf[35]=C_h_intern(&lf[35],7,"fprintf");
+lf[36]=C_h_intern(&lf[36],26,"\010compilerdebugging-chicken");
+lf[37]=C_h_intern(&lf[37],7,"display");
+lf[38]=C_decode_literal(C_heaptop,"\376B\000\000\010pass: ~a");
+lf[39]=C_h_intern(&lf[39],19,"\010compilerdump-nodes");
+lf[40]=C_h_intern(&lf[40],12,"pretty-print");
+lf[41]=C_h_intern(&lf[41],30,"\010compilerbuild-expression-tree");
+lf[42]=C_h_intern(&lf[42],34,"\010compilerdisplay-analysis-database");
+lf[43]=C_h_intern(&lf[43],5,"write");
+lf[44]=C_decode_literal(C_heaptop,"\376B\000\000\013(iteration ");
+lf[45]=C_h_intern(&lf[45],7,"newline");
+lf[46]=C_h_intern(&lf[46],26,"\003sysdefault-read-info-hook");
+lf[47]=C_h_intern(&lf[47],19,"\003syshash-table-set!");
+lf[48]=C_h_intern(&lf[48],24,"\003sysline-number-database");
+lf[49]=C_h_intern(&lf[49],10,"alist-cons");
+lf[50]=C_h_intern(&lf[50],18,"\003syshash-table-ref");
+lf[51]=C_h_intern(&lf[51],9,"list-info");
+lf[52]=C_decode_literal(C_heaptop,"\376B\000\000\033invalid numeric argument ~S");
+lf[53]=C_h_intern(&lf[53],9,"substring");
+lf[54]=C_decode_literal(C_heaptop,"\376B\000\000\003: \011");
+lf[55]=C_decode_literal(C_heaptop,"\376B\000\000\030milliseconds needed for ");
+lf[56]=C_h_intern(&lf[56],8,"\003sysread");
+lf[57]=C_h_intern(&lf[57],12,"\010compilerget");
+lf[58]=C_h_intern(&lf[58],13,"\010compilerput!");
+lf[59]=C_h_intern(&lf[59],27,"\010compileranalyze-expression");
+lf[60]=C_h_intern(&lf[60],9,"\003syserror");
+lf[61]=C_h_intern(&lf[61],1,"D");
+lf[62]=C_h_intern(&lf[62],25,"\010compilerimport-libraries");
+lf[63]=C_h_intern(&lf[63],26,"\010compilerdisabled-warnings");
+lf[64]=C_h_intern(&lf[64],16,"emit-inline-file");
+lf[65]=C_h_intern(&lf[65],12,"inline-limit");
+lf[66]=C_h_intern(&lf[66],21,"\010compilerverbose-mode");
+lf[67]=C_h_intern(&lf[67],31,"\003sysread-error-with-line-number");
+lf[68]=C_h_intern(&lf[68],21,"\003sysinclude-pathnames");
+lf[69]=C_h_intern(&lf[69],19,"\000compiler-extension");
+lf[70]=C_h_intern(&lf[70],12,"\003sysfeatures");
+lf[71]=C_h_intern(&lf[71],10,"\000compiling");
+lf[72]=C_h_intern(&lf[72],28,"\003sysexplicit-library-modules");
+lf[73]=C_h_intern(&lf[73],25,"\010compilertarget-heap-size");
+lf[74]=C_h_intern(&lf[74],33,"\010compilertarget-initial-heap-size");
+lf[75]=C_h_intern(&lf[75],27,"\010compilertarget-heap-growth");
+lf[76]=C_h_intern(&lf[76],30,"\010compilertarget-heap-shrinkage");
+lf[77]=C_h_intern(&lf[77],26,"\010compilertarget-stack-size");
+lf[78]=C_h_intern(&lf[78],8,"no-trace");
+lf[79]=C_h_intern(&lf[79],24,"\010compileremit-trace-info");
+lf[80]=C_h_intern(&lf[80],29,"disable-stack-overflow-checks");
+lf[81]=C_h_intern(&lf[81],40,"\010compilerdisable-stack-overflow-checking");
+lf[82]=C_h_intern(&lf[82],7,"version");
+lf[83]=C_h_intern(&lf[83],22,"\010compilerprint-version");
+lf[84]=C_h_intern(&lf[84],4,"help");
+lf[85]=C_h_intern(&lf[85],20,"\010compilerprint-usage");
+lf[86]=C_h_intern(&lf[86],7,"release");
+lf[87]=C_h_intern(&lf[87],15,"chicken-version");
+lf[88]=C_h_intern(&lf[88],24,"\010compilersource-filename");
+lf[89]=C_h_intern(&lf[89],28,"\010compilerprofile-lambda-list");
+lf[90]=C_h_intern(&lf[90],31,"\010compilerline-number-database-2");
+lf[91]=C_h_intern(&lf[91],4,"node");
+lf[92]=C_h_intern(&lf[92],6,"lambda");
+lf[93]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\016\376\377\016");
+lf[94]=C_h_intern(&lf[94],23,"\010compilerconstant-table");
+lf[95]=C_h_intern(&lf[95],21,"\010compilerinline-table");
+lf[96]=C_h_intern(&lf[96],23,"\010compilerfirst-analysis");
+lf[97]=C_h_intern(&lf[97],41,"\010compilerperform-high-level-optimizations");
+lf[98]=C_h_intern(&lf[98],37,"\010compilerinline-substitutions-enabled");
+lf[99]=C_h_intern(&lf[99],22,"optimize-leaf-routines");
+lf[100]=C_decode_literal(C_heaptop,"\376B\000\000\031leaf routine optimization");
+lf[101]=C_h_intern(&lf[101],34,"\010compilertransform-direct-lambdas!");
+lf[102]=C_decode_literal(C_heaptop,"\376B\000\000\010analysis");
+lf[103]=C_h_intern(&lf[103],4,"leaf");
+lf[104]=C_h_intern(&lf[104],18,"\010compilerdebugging");
+lf[105]=C_h_intern(&lf[105],1,"p");
+lf[106]=C_decode_literal(C_heaptop,"\376B\000\000\025rewritings enabled...");
+lf[107]=C_decode_literal(C_heaptop,"\376B\000\000\023optimized-iteration");
+lf[108]=C_h_intern(&lf[108],1,"5");
+lf[109]=C_decode_literal(C_heaptop,"\376B\000\000\014optimization");
+lf[110]=C_decode_literal(C_heaptop,"\376B\000\000\021optimization pass");
+lf[111]=C_h_intern(&lf[111],36,"\010compilerprepare-for-code-generation");
+lf[112]=C_decode_literal(C_heaptop,"\376B\000\000\025compilation finished.");
+lf[113]=C_h_intern(&lf[113],30,"\010compilercompiler-cleanup-hook");
+lf[114]=C_h_intern(&lf[114],1,"t");
+lf[115]=C_h_intern(&lf[115],17,"\003sysdisplay-times");
+lf[116]=C_h_intern(&lf[116],14,"\003sysstop-timer");
+lf[117]=C_decode_literal(C_heaptop,"\376B\000\000\017code generation");
+lf[118]=C_h_intern(&lf[118],17,"close-output-port");
+lf[119]=C_h_intern(&lf[119],22,"\010compilergenerate-code");
+lf[120]=C_decode_literal(C_heaptop,"\376B\000\000\023generating `~A\047 ...");
+lf[121]=C_h_intern(&lf[121],16,"open-output-file");
+lf[122]=C_h_intern(&lf[122],19,"current-output-port");
+lf[123]=C_decode_literal(C_heaptop,"\376B\000\000\013preparation");
+lf[124]=C_h_intern(&lf[124],4,"exit");
+lf[125]=C_decode_literal(C_heaptop,"\376B\000\000\010unboxing");
+lf[126]=C_h_intern(&lf[126],1,"U");
+lf[127]=C_decode_literal(C_heaptop,"\376B\000\000\010unboxing");
+lf[128]=C_h_intern(&lf[128],26,"\010compilerperform-unboxing!");
+lf[129]=C_decode_literal(C_heaptop,"\376B\000\000\023performing unboxing");
+lf[130]=C_decode_literal(C_heaptop,"\376B\000\000\021closure-converted");
+lf[131]=C_h_intern(&lf[131],1,"9");
+lf[132]=C_h_intern(&lf[132],20,"\003syswarnings-enabled");
+lf[133]=C_decode_literal(C_heaptop,"\376B\000\000#(don\047t worry - still compiling...)\012");
+lf[134]=C_decode_literal(C_heaptop,"\376B\000\000\016final-analysis");
+lf[135]=C_h_intern(&lf[135],1,"8");
+lf[136]=C_decode_literal(C_heaptop,"\376B\000\000\022closure conversion");
+lf[137]=C_h_intern(&lf[137],35,"\010compilerperform-closure-conversion");
+lf[138]=C_h_intern(&lf[138],27,"\010compilerinline-output-file");
+lf[139]=C_h_intern(&lf[139],32,"\010compileremit-global-inline-file");
+lf[140]=C_decode_literal(C_heaptop,"\376B\000\000&Generating global inline file `~a\047 ...");
+lf[141]=C_decode_literal(C_heaptop,"\376B\000\000\011optimized");
+lf[142]=C_h_intern(&lf[142],1,"7");
+lf[143]=C_h_intern(&lf[143],1,"s");
+lf[144]=C_h_intern(&lf[144],33,"\010compilerprint-program-statistics");
+lf[145]=C_decode_literal(C_heaptop,"\376B\000\000\010analysis");
+lf[146]=C_h_intern(&lf[146],1,"4");
+lf[147]=C_decode_literal(C_heaptop,"\376B\000\000\010analysis");
+lf[148]=C_h_intern(&lf[148],1,"v");
+lf[149]=C_h_intern(&lf[149],25,"\010compilerdump-global-refs");
+lf[150]=C_h_intern(&lf[150],1,"d");
+lf[151]=C_h_intern(&lf[151],29,"\010compilerdump-defined-globals");
+lf[152]=C_h_intern(&lf[152],1,"u");
+lf[153]=C_h_intern(&lf[153],31,"\010compilerdump-undefined-globals");
+lf[154]=C_h_intern(&lf[154],3,"opt");
+lf[155]=C_decode_literal(C_heaptop,"\376B\000\000\003cps");
+lf[156]=C_h_intern(&lf[156],1,"3");
+lf[157]=C_decode_literal(C_heaptop,"\376B\000\000\016cps conversion");
+lf[158]=C_h_intern(&lf[158],31,"\010compilerperform-cps-conversion");
+lf[159]=C_h_intern(&lf[159],6,"unsafe");
+lf[160]=C_h_intern(&lf[160],34,"\010compilerscan-toplevel-assignments");
+lf[161]=C_h_intern(&lf[161],24,"\010compilerinline-globally");
+lf[162]=C_h_intern(&lf[162],23,"\010compilerinline-locally");
+lf[163]=C_h_intern(&lf[163],25,"\010compilerload-inline-file");
+lf[164]=C_decode_literal(C_heaptop,"\376B\000\000\032Loading inline file ~a ...");
+lf[165]=C_h_intern(&lf[165],19,"consult-inline-file");
+lf[166]=C_h_intern(&lf[166],28,"\010compilerenable-inline-files");
+lf[167]=C_decode_literal(C_heaptop,"\376B\000\000\032Loading inline file ~a ...");
+lf[168]=C_h_intern(&lf[168],12,"file-exists\077");
+lf[169]=C_h_intern(&lf[169],28,"\003sysresolve-include-filename");
+lf[170]=C_h_intern(&lf[170],13,"make-pathname");
+lf[171]=C_decode_literal(C_heaptop,"\376B\000\000\006inline");
+lf[172]=C_h_intern(&lf[172],14,"symbol->string");
+lf[173]=C_h_intern(&lf[173],11,"concatenate");
+lf[174]=C_h_intern(&lf[174],3,"cdr");
+lf[175]=C_h_intern(&lf[175],2,"pp");
+lf[176]=C_h_intern(&lf[176],1,"M");
+lf[177]=C_decode_literal(C_heaptop,"\376B\000\000\017; requirements:");
+lf[178]=C_h_intern(&lf[178],12,"vector->list");
+lf[179]=C_h_intern(&lf[179],26,"\010compilerfile-requirements");
+lf[180]=C_h_intern(&lf[180],26,"\010compilerdo-lambda-lifting");
+lf[181]=C_decode_literal(C_heaptop,"\376B\000\000\015lambda lifted");
+lf[182]=C_h_intern(&lf[182],1,"L");
+lf[183]=C_decode_literal(C_heaptop,"\376B\000\000\016lambda lifting");
+lf[184]=C_h_intern(&lf[184],32,"\010compilerperform-lambda-lifting!");
+lf[185]=C_h_intern(&lf[185],22,"\010compilerdo-scrutinize");
+lf[186]=C_decode_literal(C_heaptop,"\376B\000\000\032pre-analysis (lambda-lift)");
+lf[187]=C_decode_literal(C_heaptop,"\376B\000\000\010analysis");
+lf[188]=C_h_intern(&lf[188],1,"0");
+lf[189]=C_h_intern(&lf[189],4,"lift");
+lf[190]=C_decode_literal(C_heaptop,"\376B\000\000\010scrutiny");
+lf[191]=C_h_intern(&lf[191],19,"\010compilerscrutinize");
+lf[192]=C_decode_literal(C_heaptop,"\376B\000\000\023performing scrutiny");
+lf[193]=C_decode_literal(C_heaptop,"\376B\000\000\014pre-analysis");
+lf[194]=C_decode_literal(C_heaptop,"\376B\000\000\010analysis");
+lf[195]=C_h_intern(&lf[195],8,"scrutiny");
+lf[196]=C_h_intern(&lf[196],27,"\010compilerload-type-database");
+lf[197]=C_h_intern(&lf[197],12,"\003sysfor-each");
+lf[198]=C_h_intern(&lf[198],5,"types");
+lf[199]=C_h_intern(&lf[199],17,"ignore-repository");
+lf[200]=C_decode_literal(C_heaptop,"\376B\000\000\010types.db");
+lf[201]=C_h_intern(&lf[201],37,"\010compilerinitialize-analysis-database");
+lf[202]=C_decode_literal(C_heaptop,"\376B\000\000\021initial node tree");
+lf[203]=C_h_intern(&lf[203],1,"T");
+lf[204]=C_h_intern(&lf[204],25,"\010compilerbuild-node-graph");
+lf[205]=C_h_intern(&lf[205],32,"\010compilercanonicalize-begin-body");
+lf[206]=C_decode_literal(C_heaptop,"\376B\000\000\011user pass");
+lf[207]=C_decode_literal(C_heaptop,"\376B\000\000\014User pass...");
+lf[208]=C_h_intern(&lf[208],12,"check-syntax");
+lf[209]=C_decode_literal(C_heaptop,"\376B\000\000\015canonicalized");
+lf[210]=C_h_intern(&lf[210],1,"2");
+lf[211]=C_decode_literal(C_heaptop,"\376B\000\000\020canonicalization");
+lf[212]=C_h_intern(&lf[212],25,"\010compilercompiler-warning");
+lf[213]=C_h_intern(&lf[213],5,"style");
+lf[214]=C_decode_literal(C_heaptop,"\376B\000\000Icompiling extensions in unsafe mode is bad practice and should be avoided");
+lf[215]=C_h_intern(&lf[215],8,"feature\077");
+lf[216]=C_h_intern(&lf[216],19,"compiling-extension");
+lf[217]=C_h_intern(&lf[217],18,"\010compilerunit-name");
+lf[218]=C_h_intern(&lf[218],5,"usage");
+lf[219]=C_decode_literal(C_heaptop,"\376B\000\000*library unit `~a\047 compiled in dynamic mode");
+lf[220]=C_h_intern(&lf[220],37,"\010compilerdisplay-line-number-database");
+lf[221]=C_h_intern(&lf[221],1,"n");
+lf[222]=C_decode_literal(C_heaptop,"\376B\000\000\025line number database:");
+lf[223]=C_h_intern(&lf[223],32,"\010compilerdisplay-real-name-table");
+lf[224]=C_h_intern(&lf[224],1,"N");
+lf[225]=C_decode_literal(C_heaptop,"\376B\000\000\020real name table:");
+lf[226]=C_decode_literal(C_heaptop,"\376B\000\000\002\011\011");
+lf[227]=C_decode_literal(C_heaptop,"\376B\000\000\002 ");
+lf[228]=C_h_intern(&lf[228],35,"\010compilercompiler-syntax-statistics");
+lf[229]=C_h_intern(&lf[229],1,"S");
+lf[230]=C_decode_literal(C_heaptop,"\376B\000\000\030applied compiler syntax:");
+lf[231]=C_h_intern(&lf[231],6,"append");
+lf[232]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016\376\377\016");
+lf[233]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016\376\377\016");
+lf[234]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016\376\377\016");
+lf[235]=C_h_intern(&lf[235],5,"quote");
+lf[236]=C_h_intern(&lf[236],33,"\010compilerprofile-info-vector-name");
+lf[237]=C_h_intern(&lf[237],28,"\003sysset-profile-info-vector!");
+lf[238]=C_h_intern(&lf[238],21,"\010compileremit-profile");
+lf[239]=C_h_intern(&lf[239],25,"\003sysregister-profile-info");
+lf[240]=C_h_intern(&lf[240],4,"set!");
+lf[241]=C_h_intern(&lf[241],13,"\004corecallunit");
+lf[242]=C_h_intern(&lf[242],19,"\010compilerused-units");
+lf[243]=C_h_intern(&lf[243],28,"\010compilerimmutable-constants");
+lf[244]=C_h_intern(&lf[244],6,"gensym");
+lf[245]=C_h_intern(&lf[245],32,"\010compilercanonicalize-expression");
+lf[246]=C_h_intern(&lf[246],4,"uses");
+lf[247]=C_h_intern(&lf[247],7,"declare");
+lf[248]=C_h_intern(&lf[248],10,"\003sysappend");
+lf[249]=C_decode_literal(C_heaptop,"\376B\000\000\006source");
+lf[250]=C_h_intern(&lf[250],1,"1");
+lf[251]=C_decode_literal(C_heaptop,"\376B\000\000\032User preprocessing pass...");
+lf[252]=C_decode_literal(C_heaptop,"\376B\000\000\021User read pass...");
+lf[253]=C_h_intern(&lf[253],21,"\010compilerstring->expr");
+lf[254]=C_h_intern(&lf[254],7,"reverse");
+lf[255]=C_h_intern(&lf[255],27,"\003syscurrent-source-filename");
+lf[256]=C_h_intern(&lf[256],33,"\010compilerclose-checked-input-file");
+lf[257]=C_h_intern(&lf[257],16,"\003sysdynamic-wind");
+lf[258]=C_h_intern(&lf[258],34,"\010compilercheck-and-open-input-file");
+lf[259]=C_h_intern(&lf[259],8,"epilogue");
+lf[260]=C_h_intern(&lf[260],8,"prologue");
+lf[261]=C_h_intern(&lf[261],8,"postlude");
+lf[262]=C_h_intern(&lf[262],7,"prelude");
+lf[263]=C_h_intern(&lf[263],11,"make-vector");
+lf[264]=C_h_intern(&lf[264],34,"\010compilerline-number-database-size");
+lf[265]=C_h_intern(&lf[265],1,"r");
+lf[266]=C_decode_literal(C_heaptop,"\376B\000\000\021target stack size");
+lf[267]=C_decode_literal(C_heaptop,"\376B\000\000\020target heap size");
+lf[268]=C_decode_literal(C_heaptop,"\376B\000\000\021debugging options");
+lf[269]=C_decode_literal(C_heaptop,"\376B\000\000\007options");
+lf[270]=C_decode_literal(C_heaptop,"\376B\000\000\022compiling `~a\047 ...");
+lf[271]=C_decode_literal(C_heaptop,"\376B\000\0009\012Enter \042chicken -help\042 for information on how to use it.\012");
+lf[272]=C_h_intern(&lf[272],5,"-help");
+lf[273]=C_h_intern(&lf[273],1,"h");
+lf[274]=C_h_intern(&lf[274],2,"-h");
+lf[275]=C_h_intern(&lf[275],33,"\010compilerload-identifier-database");
+lf[276]=C_decode_literal(C_heaptop,"\376B\000\000\012modules.db");
+lf[277]=C_h_intern(&lf[277],18,"accumulate-profile");
+lf[278]=C_h_intern(&lf[278],28,"\010compilerprofiled-procedures");
+lf[279]=C_h_intern(&lf[279],3,"all");
+lf[280]=C_decode_literal(C_heaptop,"\376B\000\000\024Generating ~aprofile");
+lf[281]=C_decode_literal(C_heaptop,"\376B\000\000\014accumulated ");
+lf[282]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[283]=C_h_intern(&lf[283],39,"\010compilerdefault-profiling-declarations");
+lf[284]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\004set!\376\003\000\000\002\376\001\000\000\027\003sysprofile-append-mode\376\003\000\000\002\376\377\006\001\376\377\016\376\377\016");
+lf[285]=C_decode_literal(C_heaptop,"\376B\000\000\022debugging info: ~A");
+lf[286]=C_decode_literal(C_heaptop,"\376B\000\000\011calltrace");
+lf[287]=C_decode_literal(C_heaptop,"\376B\000\000\004none");
+lf[288]=C_h_intern(&lf[288],21,"no-usual-integrations");
+lf[289]=C_h_intern(&lf[289],17,"standard-bindings");
+lf[290]=C_h_intern(&lf[290],34,"\010compilerdefault-standard-bindings");
+lf[291]=C_h_intern(&lf[291],17,"extended-bindings");
+lf[292]=C_h_intern(&lf[292],34,"\010compilerdefault-extended-bindings");
+lf[293]=C_h_intern(&lf[293],1,"m");
+lf[294]=C_h_intern(&lf[294],14,"set-gc-report!");
+lf[295]=C_h_intern(&lf[295],42,"\010compilerdefault-default-target-stack-size");
+lf[296]=C_h_intern(&lf[296],41,"\010compilerdefault-default-target-heap-size");
+lf[297]=C_h_intern(&lf[297],14,"compile-syntax");
+lf[298]=C_h_intern(&lf[298],25,"\003sysenable-runtime-macros");
+lf[299]=C_h_intern(&lf[299],22,"\004corerequire-extension");
+lf[300]=C_h_intern(&lf[300],14,"string->symbol");
+lf[301]=C_h_intern(&lf[301],17,"require-extension");
+lf[302]=C_h_intern(&lf[302],16,"static-extension");
+lf[303]=C_h_intern(&lf[303],28,"\010compilerpostponed-initforms");
+lf[304]=C_h_intern(&lf[304],6,"delete");
+lf[305]=C_h_intern(&lf[305],3,"eq\077");
+lf[306]=C_h_intern(&lf[306],4,"load");
+lf[307]=C_h_intern(&lf[307],12,"load-verbose");
+lf[308]=C_decode_literal(C_heaptop,"\376B\000\000\036Loading compiler extensions...");
+lf[309]=C_h_intern(&lf[309],6,"extend");
+lf[310]=C_h_intern(&lf[310],17,"register-feature!");
+lf[311]=C_h_intern(&lf[311],12,"string-split");
+lf[312]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
+lf[313]=C_h_intern(&lf[313],10,"append-map");
+lf[314]=C_h_intern(&lf[314],7,"feature");
+lf[315]=C_h_intern(&lf[315],38,"no-procedure-checks-for-usual-bindings");
+lf[316]=C_h_intern(&lf[316],8,"\003sysput!");
+lf[317]=C_h_intern(&lf[317],21,"\010compileralways-bound");
+lf[318]=C_h_intern(&lf[318],34,"\010compileralways-bound-to-procedure");
+lf[319]=C_h_intern(&lf[319],19,"no-procedure-checks");
+lf[320]=C_h_intern(&lf[320],28,"\010compilerno-procedure-checks");
+lf[321]=C_h_intern(&lf[321],15,"no-bound-checks");
+lf[322]=C_h_intern(&lf[322],24,"\010compilerno-bound-checks");
+lf[323]=C_h_intern(&lf[323],14,"no-argc-checks");
+lf[324]=C_h_intern(&lf[324],23,"\010compilerno-argc-checks");
+lf[325]=C_h_intern(&lf[325],20,"keep-shadowed-macros");
+lf[326]=C_h_intern(&lf[326],33,"\010compilerundefine-shadowed-macros");
+lf[327]=C_decode_literal(C_heaptop,"\376B\000\000(source- and output-filename are the same");
+lf[328]=C_h_intern(&lf[328],23,"\010compilerchop-separator");
+lf[329]=C_h_intern(&lf[329],12,"include-path");
+lf[330]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\014-r5rs-syntax\376\377\016");
+lf[331]=C_h_intern(&lf[331],13,"symbol-escape");
+lf[332]=C_h_intern(&lf[332],20,"parentheses-synonyms");
+lf[333]=C_h_intern(&lf[333],5,"\000none");
+lf[334]=C_h_intern(&lf[334],14,"case-sensitive");
+lf[335]=C_decode_literal(C_heaptop,"\376B\000\000.Disabled the Chicken extensions to R5RS syntax");
+lf[336]=C_h_intern(&lf[336],16,"no-symbol-escape");
+lf[337]=C_decode_literal(C_heaptop,"\376B\000\000$Disabled support for escaped symbols");
+lf[338]=C_h_intern(&lf[338],23,"no-parenthesis-synonyms");
+lf[339]=C_h_intern(&lf[339],20,"parenthesis-synonyms");
+lf[340]=C_decode_literal(C_heaptop,"\376B\000\000)Disabled support for parenthesis synonyms");
+lf[341]=C_decode_literal(C_heaptop,"\376B\000\000\006prefix");
+lf[342]=C_h_intern(&lf[342],7,"\000prefix");
+lf[343]=C_decode_literal(C_heaptop,"\376B\000\000\004none");
+lf[344]=C_decode_literal(C_heaptop,"\376B\000\000\006suffix");
+lf[345]=C_h_intern(&lf[345],7,"\000suffix");
+lf[346]=C_decode_literal(C_heaptop,"\376B\000\000+invalid argument to `-keyword-style\047 option");
+lf[347]=C_h_intern(&lf[347],17,"compress-literals");
+lf[348]=C_decode_literal(C_heaptop,"\376B\000\000+`the -compress-literals\047 option is obsolete");
+lf[349]=C_h_intern(&lf[349],16,"case-insensitive");
+lf[350]=C_decode_literal(C_heaptop,"\376B\000\000,Identifiers and symbols are case insensitive");
+lf[351]=C_h_intern(&lf[351],24,"\010compilerinline-max-size");
+lf[352]=C_decode_literal(C_heaptop,"\376B\000\0000invalid argument to `-inline-limit\047 option: `~A\047");
+lf[353]=C_h_intern(&lf[353],26,"\010compilerlocal-definitions");
+lf[354]=C_h_intern(&lf[354],6,"inline");
+lf[355]=C_h_intern(&lf[355],30,"emit-external-prototypes-first");
+lf[356]=C_h_intern(&lf[356],30,"\010compilerexternal-protos-first");
+lf[357]=C_h_intern(&lf[357],5,"block");
+lf[358]=C_h_intern(&lf[358],26,"\010compilerblock-compilation");
+lf[359]=C_h_intern(&lf[359],17,"fixnum-arithmetic");
+lf[360]=C_h_intern(&lf[360],11,"number-type");
+lf[361]=C_h_intern(&lf[361],6,"fixnum");
+lf[362]=C_h_intern(&lf[362],18,"disable-interrupts");
+lf[363]=C_h_intern(&lf[363],28,"\010compilerinsert-timer-checks");
+lf[364]=C_h_intern(&lf[364],10,"setup-mode");
+lf[365]=C_h_intern(&lf[365],14,"\003syssetup-mode");
+lf[366]=C_h_intern(&lf[366],16,"unsafe-libraries");
+lf[367]=C_h_intern(&lf[367],27,"\010compileremit-unsafe-marker");
+lf[368]=C_h_intern(&lf[368],11,"no-warnings");
+lf[369]=C_decode_literal(C_heaptop,"\376B\000\000\025Warnings are disabled");
+lf[370]=C_h_intern(&lf[370],15,"disable-warning");
+lf[371]=C_h_intern(&lf[371],13,"inline-global");
+lf[372]=C_h_intern(&lf[372],5,"local");
+lf[373]=C_h_intern(&lf[373],18,"no-compiler-syntax");
+lf[374]=C_h_intern(&lf[374],32,"\010compilercompiler-syntax-enabled");
+lf[375]=C_h_intern(&lf[375],14,"no-lambda-info");
+lf[376]=C_h_intern(&lf[376],26,"\010compileremit-closure-info");
+lf[377]=C_h_intern(&lf[377],3,"raw");
+lf[378]=C_h_intern(&lf[378],12,"emit-exports");
+lf[379]=C_h_intern(&lf[379],7,"warning");
+lf[380]=C_decode_literal(C_heaptop,"\376B\000\000(deprecated compiler option: emit-exports");
+lf[381]=C_h_intern(&lf[381],1,"b");
+lf[382]=C_h_intern(&lf[382],15,"\003sysstart-timer");
+lf[383]=C_h_intern(&lf[383],10,"scrutinize");
+lf[384]=C_h_intern(&lf[384],11,"lambda-lift");
+lf[385]=C_h_intern(&lf[385],25,"emit-all-import-libraries");
+lf[386]=C_h_intern(&lf[386],29,"\010compilerall-import-libraries");
+lf[387]=C_h_intern(&lf[387],13,"string-append");
+lf[388]=C_decode_literal(C_heaptop,"\376B\000\000\013.import.scm");
+lf[389]=C_h_intern(&lf[389],19,"emit-import-library");
+lf[390]=C_h_intern(&lf[390],16,"\003sysstring->list");
+lf[391]=C_h_intern(&lf[391],5,"debug");
+lf[392]=C_h_intern(&lf[392],18,"\003sysdload-disabled");
+lf[393]=C_h_intern(&lf[393],15,"repository-path");
+lf[394]=C_h_intern(&lf[394],30,"\010compilerstandalone-executable");
+lf[395]=C_h_intern(&lf[395],29,"\010compilerstring->c-identifier");
+lf[396]=C_h_intern(&lf[396],18,"\010compilerstringify");
+lf[397]=C_decode_literal(C_heaptop,"\376B\000\000\001;");
+lf[398]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[399]=C_h_intern(&lf[399],24,"get-environment-variable");
+lf[400]=C_decode_literal(C_heaptop,"\376B\000\000\024CHICKEN_INCLUDE_PATH");
+lf[401]=C_h_intern(&lf[401],9,"to-stdout");
+lf[402]=C_decode_literal(C_heaptop,"\376B\000\000\001c");
+lf[403]=C_h_intern(&lf[403],13,"pathname-file");
+lf[404]=C_decode_literal(C_heaptop,"\376B\000\000\003out");
+lf[405]=C_h_intern(&lf[405],29,"\010compilerdefault-declarations");
+lf[406]=C_h_intern(&lf[406],30,"\010compilerunits-used-by-default");
+lf[407]=C_h_intern(&lf[407],28,"\010compilerinitialize-compiler");
+lf[408]=C_h_intern(&lf[408],14,"make-parameter");
+C_register_lf2(lf,409,create_ptable());
+t2=C_mutate(&lf[0] /* (set! c341 ...) */,lf[1]);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1508,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
C_library_toplevel(2,C_SCHEME_UNDEFINED,t3);}
-/* k1496 */
-static void C_ccall f_1498(C_word c,C_word t0,C_word t1){
+/* k1506 */
+static void C_ccall f_1508(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1508,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1511,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* k1499 in k1496 */
-static void C_ccall f_1501(C_word c,C_word t0,C_word t1){
+/* k1509 in k1506 */
+static void C_ccall f_1511(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1511,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1516,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 38 make-parameter */
+((C_proc3)C_retrieve_symbol_proc(lf[408]))(3,*((C_word*)lf[408]+1),t2,C_SCHEME_FALSE);}
-/* k1504 in k1499 in k1496 */
-static void C_ccall f_1506(C_word c,C_word t0,C_word t1){
+/* k1514 in k1509 in k1506 */
+static void C_ccall f_1516(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1506,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1516,2,t0,t1);}
t2=C_mutate((C_word*)lf[2]+1 /* (set! user-options-pass ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1520,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 39 make-parameter */
+((C_proc3)C_retrieve_symbol_proc(lf[408]))(3,*((C_word*)lf[408]+1),t3,C_SCHEME_FALSE);}
-/* k1508 in k1504 in k1499 in k1496 */
-static void C_ccall f_1510(C_word c,C_word t0,C_word t1){
+/* k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1520(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1510,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1520,2,t0,t1);}
t2=C_mutate((C_word*)lf[3]+1 /* (set! user-read-pass ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1524,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 40 make-parameter */
+((C_proc3)C_retrieve_symbol_proc(lf[408]))(3,*((C_word*)lf[408]+1),t3,C_SCHEME_FALSE);}
-/* k1512 in k1508 in k1504 in k1499 in k1496 */
-static void C_ccall f_1514(C_word c,C_word t0,C_word t1){
+/* k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1524(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1514,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1524,2,t0,t1);}
t2=C_mutate((C_word*)lf[4]+1 /* (set! user-preprocessor-pass ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1528,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 41 make-parameter */
+((C_proc3)C_retrieve_symbol_proc(lf[408]))(3,*((C_word*)lf[408]+1),t3,C_SCHEME_FALSE);}
-/* 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){
+/* k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1528(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1518,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1528,2,t0,t1);}
t2=C_mutate((C_word*)lf[5]+1 /* (set! user-pass ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1532,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 42 make-parameter */
+((C_proc3)C_retrieve_symbol_proc(lf[408]))(3,*((C_word*)lf[408]+1),t3,C_SCHEME_FALSE);}
-/* 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){
+/* k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1532(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[2],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1522,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1532,2,t0,t1);}
t2=C_mutate((C_word*)lf[6]+1 /* (set! user-post-analysis-pass ...) */,t1);
-t3=C_mutate((C_word*)lf[7]+1 /* (set! compile-source-file ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1524,tmp=(C_word)a,a+=2,tmp));
+t3=C_mutate((C_word*)lf[7]+1 /* (set! compile-source-file ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1534,tmp=(C_word)a,a+=2,tmp));
t4=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-/* compile-source-file in 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,...){
+/* compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1534(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -2135,25 +2151,25 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_1534r,3,t0,t1,t2);}
else{
a=C_alloc((c-3)*3);
t3=C_restore_rest(a,C_rest_count(0));
-f_1524r(t0,t1,t2,t3);}}
+f_1534r(t0,t1,t2,t3);}}
-static void C_ccall f_1524r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_1534r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word *a=C_alloc(8);
-t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_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);}
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1537,tmp=(C_word)a,a+=2,tmp);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1570,a[2]=t2,a[3]=t1,a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+/* batch-driver.scm: 55 initialize-compiler */
+((C_proc2)C_retrieve_symbol_proc(lf[407]))(2,*((C_word*)lf[407]+1),t5);}
-/* 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){
+/* k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1570(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2163,45 +2179,45 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1570,2,t0,t1);}
t2=(C_word)C_i_memq(lf[11],((C_word*)t0)[5]);
t3=C_mutate((C_word*)lf[12]+1 /* (set! explicit-use-flag ...) */,t2);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4829,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4833,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
if(C_truep(C_retrieve(lf[12]))){
-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);}
+/* batch-driver.scm: 58 append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),t5,C_retrieve(lf[405]),C_SCHEME_END_OF_LIST);}
else{
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);}}
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4848,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+/* ##sys#append */
+t7=*((C_word*)lf[248]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,C_retrieve(lf[406]),C_SCHEME_END_OF_LIST);}}
-/* 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){
+/* k4846 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4848(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4808,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[240],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_4848,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[246],t1);
t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-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);}
+/* batch-driver.scm: 58 append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),((C_word*)t0)[2],C_retrieve(lf[405]),t3);}
-/* 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){
+/* k4831 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4833(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("##sys#append");
-t2=*((C_word*)lf[242]+1);
+/* ##sys#append */
+t2=*((C_word*)lf[248]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* k4787 in 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){
+/* k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4829(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2215,68 +2231,68 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4829,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,lf[13],t1);
t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
t4=t3;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=(C_word)C_i_memq(lf[14],((C_word*)t0)[5]);
t7=(C_word)C_i_memq(lf[15],((C_word*)t0)[5]);
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);
+t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1586,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t5,a[5]=((C_word*)t0)[4],a[6]=t6,a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
if(C_truep(t7)){
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4749,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-C_trace("g7778");
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4789,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+/* g7879 */
t10=t9;
-f_4749(t10,t8,t7);}
+f_4789(t10,t8,t7);}
else{
-if(C_truep((C_word)C_i_memq(lf[395],((C_word*)t0)[5]))){
+if(C_truep((C_word)C_i_memq(lf[401],((C_word*)t0)[5]))){
t9=t8;
-f_1576(2,t9,C_SCHEME_FALSE);}
+f_1586(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);
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4818,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
if(C_truep(((C_word*)t0)[2])){
-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]);}
+/* batch-driver.scm: 71 pathname-file */
+((C_proc3)C_retrieve_symbol_proc(lf[403]))(3,*((C_word*)lf[403]+1),t9,((C_word*)t0)[2]);}
else{
-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]);}}}}
+/* batch-driver.scm: 71 make-pathname */
+((C_proc5)C_retrieve_symbol_proc(lf[170]))(5,*((C_word*)lf[170]+1),t8,C_SCHEME_FALSE,lf[404],lf[402]);}}}}
-/* 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){
+/* k4816 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4818(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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]);}
+/* batch-driver.scm: 71 make-pathname */
+((C_proc5)C_retrieve_symbol_proc(lf[170]))(5,*((C_word*)lf[170]+1),((C_word*)t0)[2],C_SCHEME_FALSE,t1,lf[402]);}
-/* 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){
+/* g78 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_4789(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_4789,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4793,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 66 option-arg */
+f_1537(t3,t2);}
-/* 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){
+/* k4791 in g78 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4793(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(C_truep((C_word)C_i_symbolp(t1))){
-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);}
+/* batch-driver.scm: 68 symbol->string */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[172]+1)))(3,*((C_word*)lf[172]+1),((C_word*)t0)[2],t1);}
else{
t2=t1;
t3=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-/* k1574 in k4787 in 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){
+/* k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1586(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2288,33 +2304,33 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1586,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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]);}
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1589,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4746,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4785,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 72 get-environment-variable */
+((C_proc3)C_retrieve_symbol_proc(lf[399]))(3,*((C_word*)lf[399]+1),t8,lf[400]);}
-/* 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){
+/* k4783 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4785(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(C_truep(t1)){
t2=t1;
-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]);}
+/* batch-driver.scm: 72 string-split */
+((C_proc4)C_retrieve_symbol_proc(lf[311]))(4,*((C_word*)lf[311]+1),((C_word*)t0)[2],t2,lf[397]);}
else{
-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]);}}
+/* batch-driver.scm: 72 string-split */
+((C_proc4)C_retrieve_symbol_proc(lf[311]))(4,*((C_word*)lf[311]+1),((C_word*)t0)[2],lf[398],lf[397]);}}
-/* 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){
+/* k4744 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4746(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2322,15 +2338,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4746,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4708,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4748,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_4708(t5,((C_word*)t0)[2],t1);}
+f_4748(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){
+/* loop84 in k4744 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_4748(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2339,12 +2355,12 @@ 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);}
+C_save_and_reclaim((void*)trf_4748,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=C_retrieve(lf[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);
+t3=C_retrieve(lf[328]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4777,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
-C_trace("g99100");
+/* g100101 */
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -2352,8 +2368,8 @@ 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){
+/* k4775 in loop84 in k4744 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4777(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2365,25 +2381,25 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4777,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop8396");
+/* loop8497 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_4708(t6,((C_word*)t0)[3],t5);}
+f_4748(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop8396");
+/* loop8497 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_4708(t6,((C_word*)t0)[3],t5);}}
+f_4748(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){
+/* k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1589(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2400,7 +2416,7 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1589,2,t0,t1);}
t2=C_retrieve(lf[16]);
t3=C_SCHEME_FALSE;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
@@ -2411,17 +2427,17 @@ 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);
+t12=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_1595,a[2]=t1,a[3]=t8,a[4]=t10,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[5],a[9]=t4,a[10]=t6,a[11]=((C_word*)t0)[6],a[12]=((C_word*)t0)[7],a[13]=((C_word*)t0)[8],tmp=(C_word)a,a+=14,tmp);
if(C_truep(t11)){
t13=t12;
-f_1585(t13,t11);}
+f_1595(t13,t11);}
else{
-t13=(C_word)C_i_memq(lf[271],((C_word*)t0)[8]);
+t13=(C_word)C_i_memq(lf[277],((C_word*)t0)[8]);
t14=t12;
-f_1585(t14,(C_truep(t13)?t13:(C_word)C_i_memq(lf[19],((C_word*)t0)[8])));}}
+f_1595(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){
+/* k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1595(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2485,9 +2501,10 @@ C_word t60;
C_word t61;
C_word t62;
C_word t63;
-C_word ab[116],*a=ab;
+C_word t64;
+C_word ab[117],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1585,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_1595,NULL,2,t0,t1);}
t2=(C_word)C_i_memq(lf[19],((C_word*)t0)[13]);
t3=(C_truep(t2)?(C_word)C_i_cadr(t2):C_SCHEME_FALSE);
t4=(C_truep(t3)?t3:lf[20]);
@@ -2501,162 +2518,163 @@ 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);
+t15=(C_word)C_i_memq(lf[29],((C_word*)t0)[13]);
+t16=C_SCHEME_FALSE;
+t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
+t18=C_SCHEME_FALSE;
+t19=(*a=C_VECTOR_TYPE|1,a[1]=t18,tmp=(C_word)a,a+=2,tmp);
+t20=C_SCHEME_FALSE;
+t21=(*a=C_VECTOR_TYPE|1,a[1]=t20,tmp=(C_word)a,a+=2,tmp);
+t22=(C_word)C_i_memq(lf[30],((C_word*)t0)[13]);
+t23=(C_truep(t22)?t22:(C_word)C_i_memq(lf[31],((C_word*)t0)[13]));
+t24=C_SCHEME_UNDEFINED;
+t25=(*a=C_VECTOR_TYPE|1,a[1]=t24,tmp=(C_word)a,a+=2,tmp);
+t26=C_SCHEME_UNDEFINED;
+t27=(*a=C_VECTOR_TYPE|1,a[1]=t26,tmp=(C_word)a,a+=2,tmp);
+t28=C_SCHEME_UNDEFINED;
+t29=(*a=C_VECTOR_TYPE|1,a[1]=t28,tmp=(C_word)a,a+=2,tmp);
+t30=C_SCHEME_UNDEFINED;
+t31=(*a=C_VECTOR_TYPE|1,a[1]=t30,tmp=(C_word)a,a+=2,tmp);
+t32=C_SCHEME_UNDEFINED;
+t33=(*a=C_VECTOR_TYPE|1,a[1]=t32,tmp=(C_word)a,a+=2,tmp);
+t34=C_SCHEME_UNDEFINED;
+t35=(*a=C_VECTOR_TYPE|1,a[1]=t34,tmp=(C_word)a,a+=2,tmp);
+t36=C_SCHEME_UNDEFINED;
+t37=(*a=C_VECTOR_TYPE|1,a[1]=t36,tmp=(C_word)a,a+=2,tmp);
+t38=C_SCHEME_UNDEFINED;
+t39=(*a=C_VECTOR_TYPE|1,a[1]=t38,tmp=(C_word)a,a+=2,tmp);
+t40=C_SCHEME_UNDEFINED;
+t41=(*a=C_VECTOR_TYPE|1,a[1]=t40,tmp=(C_word)a,a+=2,tmp);
+t42=C_SCHEME_UNDEFINED;
+t43=(*a=C_VECTOR_TYPE|1,a[1]=t42,tmp=(C_word)a,a+=2,tmp);
+t44=C_SCHEME_UNDEFINED;
+t45=(*a=C_VECTOR_TYPE|1,a[1]=t44,tmp=(C_word)a,a+=2,tmp);
+t46=C_SCHEME_UNDEFINED;
+t47=(*a=C_VECTOR_TYPE|1,a[1]=t46,tmp=(C_word)a,a+=2,tmp);
+t48=C_set_block_item(t25,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1645,a[2]=((C_word*)t0)[12],tmp=(C_word)a,a+=3,tmp));
+t49=C_set_block_item(t27,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1660,a[2]=t25,tmp=(C_word)a,a+=3,tmp));
+t50=C_set_block_item(t29,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1684,a[2]=t27,a[3]=t17,tmp=(C_word)a,a+=4,tmp));
+t51=C_set_block_item(t31,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1706,a[2]=t27,tmp=(C_word)a,a+=3,tmp));
+t52=C_set_block_item(t33,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1730,a[2]=t27,tmp=(C_word)a,a+=3,tmp));
+t53=C_set_block_item(t35,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1773,tmp=(C_word)a,a+=2,tmp));
+t54=C_set_block_item(t37,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1822,tmp=(C_word)a,a+=2,tmp));
+t55=C_set_block_item(t39,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1902,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[11],tmp=(C_word)a,a+=4,tmp));
+t56=C_set_block_item(t41,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1937,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],tmp=(C_word)a,a+=4,tmp));
+t57=C_set_block_item(t43,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1947,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],tmp=(C_word)a,a+=4,tmp));
+t58=C_set_block_item(t45,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1976,a[2]=t35,tmp=(C_word)a,a+=3,tmp));
+t59=C_set_block_item(t47,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1982,a[2]=t21,tmp=(C_word)a,a+=3,tmp));
+t60=(*a=C_CLOSURE_TYPE|37,a[1]=(C_word)f_2061,a[2]=((C_word*)t0)[10],a[3]=t9,a[4]=((C_word*)t0)[2],a[5]=t5,a[6]=t6,a[7]=t7,a[8]=t8,a[9]=((C_word*)t0)[11],a[10]=t37,a[11]=t23,a[12]=t1,a[13]=t45,a[14]=((C_word*)t0)[3],a[15]=t4,a[16]=((C_word*)t0)[4],a[17]=t33,a[18]=t39,a[19]=t31,a[20]=t15,a[21]=t13,a[22]=t14,a[23]=((C_word*)t0)[5],a[24]=t25,a[25]=t29,a[26]=t47,a[27]=t43,a[28]=t41,a[29]=t19,a[30]=((C_word*)t0)[6],a[31]=((C_word*)t0)[7],a[32]=((C_word*)t0)[8],a[33]=t21,a[34]=t11,a[35]=((C_word*)t0)[12],a[36]=((C_word*)t0)[13],a[37]=t17,tmp=(C_word)a,a+=38,tmp);
if(C_truep(t12)){
-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);}
+t61=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4719,a[2]=t60,tmp=(C_word)a,a+=3,tmp);
+t62=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4723,a[2]=t61,tmp=(C_word)a,a+=3,tmp);
+t63=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4727,a[2]=t62,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 174 option-arg */
+f_1537(t63,t12);}
else{
-t60=t59;
-f_2040(t60,C_SCHEME_UNDEFINED);}}
+t61=t60;
+f_2061(t61,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){
+/* k4725 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4727(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 174 stringify */
+((C_proc3)C_retrieve_symbol_proc(lf[396]))(3,*((C_word*)lf[396]+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){
+/* k4721 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4723(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 174 string->c-identifier */
+((C_proc3)C_retrieve_symbol_proc(lf[395]))(3,*((C_word*)lf[395]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k4717 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4719(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_mutate((C_word*)lf[211]+1 /* (set! unit-name ...) */,t1);
+t2=C_mutate((C_word*)lf[217]+1 /* (set! unit-name ...) */,t1);
t3=((C_word*)t0)[2];
-f_2040(t3,t2);}
+f_2061(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){
+/* k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2061(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
-C_word ab[37],*a=ab;
+C_word ab[38],*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]);
+C_save_and_reclaim((void*)trf_2061,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|37,a[1]=(C_word)f_2064,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],a[37]=((C_word*)t0)[37],tmp=(C_word)a,a+=38,tmp);
+t3=C_retrieve(lf[217]);
if(C_truep(t3)){
if(C_truep(t3)){
-t4=C_set_block_item(lf[388] /* standalone-executable */,0,C_SCHEME_FALSE);
+t4=C_set_block_item(lf[394] /* standalone-executable */,0,C_SCHEME_FALSE);
t5=t2;
-f_2043(t5,t4);}
+f_2064(t5,t4);}
else{
t4=t2;
-f_2043(t4,C_SCHEME_UNDEFINED);}}
+f_2064(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);
+if(C_truep(((C_word*)t0)[22])){
+t4=C_set_block_item(lf[394] /* standalone-executable */,0,C_SCHEME_FALSE);
t5=t2;
-f_2043(t5,t4);}
+f_2064(t5,t4);}
else{
t4=t2;
-f_2043(t4,C_SCHEME_UNDEFINED);}}}
+f_2064(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){
+/* k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2064(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[37],*a=ab;
+C_word ab[38],*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);}
+C_save_and_reclaim((void*)trf_2064,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|37,a[1]=(C_word)f_2067,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],a[37]=((C_word*)t0)[37],tmp=(C_word)a,a+=38,tmp);
+if(C_truep((C_word)C_i_memq(lf[199],((C_word*)t0)[36]))){
+t3=C_set_block_item(lf[392] /* dload-disabled */,0,C_SCHEME_TRUE);
+/* batch-driver.scm: 179 repository-path */
+((C_proc3)C_retrieve_symbol_proc(lf[393]))(3,*((C_word*)lf[393]+1),t2,C_SCHEME_FALSE);}
else{
t3=t2;
-f_2046(2,t3,C_SCHEME_UNDEFINED);}}
+f_2067(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){
+/* k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2067(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[43],*a=ab;
+C_word ab[44],*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");
+C_save_and_reclaim((void*)tr2,(void*)f_2067,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|37,a[1]=(C_word)f_2071,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],a[37]=((C_word*)t0)[37],tmp=(C_word)a,a+=38,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4648,tmp=(C_word)a,a+=2,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4704,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 185 collect-options */
t5=((C_word*)((C_word*)t0)[18])[1];
-f_1881(t5,t4,lf[385]);}
+f_1902(t5,t4,lf[391]);}
-/* 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){
+/* k4702 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4704(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 181 append-map */
+((C_proc4)C_retrieve_symbol_proc(lf[313]))(4,*((C_word*)lf[313]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* a4647 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4648(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2667,18 +2685,18 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_4648,3,t0,t1,t2);}
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4656,a[2]=t1,a[3]=t4,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+/* string->list */
+t8=C_retrieve(lf[390]);
((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,t2);}
-/* 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){
+/* k4654 in a4647 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4656(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2686,15 +2704,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4656,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4618,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4658,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_4618(t5,((C_word*)t0)[2],t1);}
+f_4658(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){
+/* loop355 in k4654 in a4647 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_4658(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2703,20 +2721,20 @@ 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);}
+C_save_and_reclaim((void*)trf_4658,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4696,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t4=(C_word)C_slot(t2,C_fix(0));
t5=(C_word)C_a_i_string(&a,1,t4);
-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);}
+/* batch-driver.scm: 183 string->symbol */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[300]+1)))(3,*((C_word*)lf[300]+1),t3,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k4694 in loop355 in k4654 in a4647 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4696(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2728,25 +2746,25 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4696,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop352365");
+/* loop355368 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_4618(t6,((C_word*)t0)[3],t5);}
+f_4658(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop352365");
+/* loop355368 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_4618(t6,((C_word*)t0)[3],t5);}}
+f_4658(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){
+/* k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2071(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2758,24 +2776,24 @@ C_word t8;
C_word t9;
C_word t10;
C_word t11;
-C_word ab[45],*a=ab;
+C_word ab[46],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2071,2,t0,t1);}
+t2=C_mutate((C_word*)lf[36]+1 /* (set! debugging-chicken ...) */,t1);
+t3=(C_word)C_i_memq(lf[61],C_retrieve(lf[36]));
+t4=C_mutate(((C_word *)((C_word*)t0)[37])+1,t3);
t5=C_SCHEME_END_OF_LIST;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_FALSE;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|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");
+t9=(*a=C_CLOSURE_TYPE|36,a[1]=(C_word)f_2079,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],tmp=(C_word)a,a+=37,tmp);
+t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4598,a[2]=t9,a[3]=t6,a[4]=t8,tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 191 collect-options */
t11=((C_word*)((C_word*)t0)[18])[1];
-f_1881(t11,t10,lf[383]);}
+f_1902(t11,t10,lf[389]);}
-/* 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){
+/* k4596 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4598(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2783,15 +2801,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4598,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4560,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4600,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_4560(t5,((C_word*)t0)[2],t1);}
+f_4600(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){
+/* loop379 in k4596 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_4600(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2799,31 +2817,31 @@ 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);}
+C_save_and_reclaim((void*)trf_4600,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
t3=(C_word)C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4635,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+/* batch-driver.scm: 189 string->symbol */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[300]+1)))(3,*((C_word*)lf[300]+1),t4,t3);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k4633 in loop379 in k4596 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4635(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4635,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4639,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+/* batch-driver.scm: 190 string-append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[387]+1)))(4,*((C_word*)lf[387]+1),t2,((C_word*)t0)[2],lf[388]);}
-/* 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){
+/* k4637 in k4633 in loop379 in k4596 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4639(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2836,235 +2854,235 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4639,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t1);
t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t4=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t3);
t5=C_mutate(((C_word *)((C_word*)t0)[6])+1,t3);
t6=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop376389");
+/* loop379392 */
t7=((C_word*)((C_word*)t0)[4])[1];
-f_4560(t7,((C_word*)t0)[3],t6);}
+f_4600(t7,((C_word*)t0)[3],t6);}
else{
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
t5=C_mutate(((C_word *)((C_word*)t0)[6])+1,t3);
t6=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop376389");
+/* loop379392 */
t7=((C_word*)((C_word*)t0)[4])[1];
-f_4560(t7,((C_word*)t0)[3],t6);}}
+f_4600(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){
+/* k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2079(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[36],*a=ab;
+C_word ab[37],*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])){
+C_save_and_reclaim((void*)tr2,(void*)f_2079,2,t0,t1);}
+t2=C_mutate((C_word*)lf[62]+1 /* (set! import-libraries ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|36,a[1]=(C_word)f_2082,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],tmp=(C_word)a,a+=37,tmp);
+if(C_truep((C_word)C_i_memq(lf[385],((C_word*)t0)[36]))){
+if(C_truep(((C_word*)t0)[21])){
t4=t3;
-f_2061(t4,C_SCHEME_UNDEFINED);}
+f_2082(t4,C_SCHEME_UNDEFINED);}
else{
-t4=C_set_block_item(lf[380] /* all-import-libraries */,0,C_SCHEME_TRUE);
+t4=C_set_block_item(lf[386] /* all-import-libraries */,0,C_SCHEME_TRUE);
t5=t3;
-f_2061(t5,t4);}}
+f_2082(t5,t4);}}
else{
t4=t3;
-f_2061(t4,C_SCHEME_UNDEFINED);}}
+f_2082(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){
+/* k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2082(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[36],*a=ab;
+C_word ab[37],*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);
+C_save_and_reclaim((void*)trf_2082,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|36,a[1]=(C_word)f_2085,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],tmp=(C_word)a,a+=37,tmp);
+if(C_truep((C_word)C_i_memq(lf[384],((C_word*)t0)[36]))){
+t3=C_set_block_item(lf[180] /* do-lambda-lifting */,0,C_SCHEME_TRUE);
t4=t2;
-f_2064(t4,t3);}
+f_2085(t4,t3);}
else{
t3=t2;
-f_2064(t3,C_SCHEME_UNDEFINED);}}
+f_2085(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){
+/* k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2085(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[36],*a=ab;
+C_word ab[37],*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);
+C_save_and_reclaim((void*)trf_2085,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|36,a[1]=(C_word)f_2088,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],tmp=(C_word)a,a+=37,tmp);
+if(C_truep((C_word)C_i_memq(lf[383],((C_word*)t0)[36]))){
+t3=C_set_block_item(lf[185] /* do-scrutinize */,0,C_SCHEME_TRUE);
t4=t2;
-f_2067(t4,t3);}
+f_2088(t4,t3);}
else{
t3=t2;
-f_2067(t3,C_SCHEME_UNDEFINED);}}
+f_2088(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){
+/* k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2088(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[36],*a=ab;
+C_word ab[37],*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_save_and_reclaim((void*)trf_2088,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|36,a[1]=(C_word)f_2091,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],a[36]=((C_word*)t0)[36],tmp=(C_word)a,a+=37,tmp);
+if(C_truep((C_word)C_i_memq(lf[114],C_retrieve(lf[36])))){
+/* batch-driver.scm: 197 ##sys#start-timer */
+t3=*((C_word*)lf[382]+1);
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
t3=t2;
-f_2070(2,t3,C_SCHEME_UNDEFINED);}}
+f_2091(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){
+/* k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2091(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[35],*a=ab;
+C_word ab[36],*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])))){
+C_save_and_reclaim((void*)tr2,(void*)f_2091,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2094,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],a[28]=((C_word*)t0)[29],a[29]=((C_word*)t0)[30],a[30]=((C_word*)t0)[31],a[31]=((C_word*)t0)[32],a[32]=((C_word*)t0)[33],a[33]=((C_word*)t0)[34],a[34]=((C_word*)t0)[35],a[35]=((C_word*)t0)[36],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[381],C_retrieve(lf[36])))){
t3=C_set_block_item(((C_word*)t0)[2],0,C_SCHEME_TRUE);
t4=t2;
-f_2073(t4,t3);}
+f_2094(t4,t3);}
else{
t3=t2;
-f_2073(t3,C_SCHEME_UNDEFINED);}}
+f_2094(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){
+/* k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2094(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[35],*a=ab;
+C_word ab[36],*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]);}
+C_save_and_reclaim((void*)trf_2094,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2097,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[378],((C_word*)t0)[35]))){
+/* batch-driver.scm: 200 warning */
+((C_proc3)C_retrieve_symbol_proc(lf[379]))(3,*((C_word*)lf[379]+1),t2,lf[380]);}
else{
t3=t2;
-f_2076(2,t3,C_SCHEME_UNDEFINED);}}
+f_2097(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){
+/* k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2097(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
-C_word ab[35],*a=ab;
+C_word ab[36],*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]))){
+C_save_and_reclaim((void*)tr2,(void*)f_2097,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2100,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[377],((C_word*)t0)[35]))){
t3=C_set_block_item(lf[12] /* explicit-use-flag */,0,C_SCHEME_TRUE);
t4=C_set_block_item(((C_word*)t0)[15],0,C_SCHEME_END_OF_LIST);
-t5=C_set_block_item(((C_word*)t0)[30],0,C_SCHEME_END_OF_LIST);
+t5=C_set_block_item(((C_word*)t0)[31],0,C_SCHEME_END_OF_LIST);
t6=t2;
-f_2079(t6,t5);}
+f_2100(t6,t5);}
else{
t3=t2;
-f_2079(t3,C_SCHEME_UNDEFINED);}}
+f_2100(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){
+/* k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2100(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[35],*a=ab;
+C_word ab[36],*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);
+C_save_and_reclaim((void*)trf_2100,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2103,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[375],((C_word*)t0)[35]))){
+t3=C_set_block_item(lf[376] /* emit-closure-info */,0,C_SCHEME_FALSE);
t4=t2;
-f_2082(t4,t3);}
+f_2103(t4,t3);}
else{
t3=t2;
-f_2082(t3,C_SCHEME_UNDEFINED);}}
+f_2103(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){
+/* k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2103(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[35],*a=ab;
+C_word ab[36],*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);
+C_save_and_reclaim((void*)trf_2103,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2106,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[373],((C_word*)t0)[35]))){
+t3=C_set_block_item(lf[374] /* compiler-syntax-enabled */,0,C_SCHEME_FALSE);
t4=t2;
-f_2085(t4,t3);}
+f_2106(t4,t3);}
else{
t3=t2;
-f_2085(t3,C_SCHEME_UNDEFINED);}}
+f_2106(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){
+/* k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2106(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[35],*a=ab;
+C_word ab[36],*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);
+C_save_and_reclaim((void*)trf_2106,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2109,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[372],((C_word*)t0)[35]))){
+t3=C_set_block_item(lf[353] /* local-definitions */,0,C_SCHEME_TRUE);
t4=t2;
-f_2088(t4,t3);}
+f_2109(t4,t3);}
else{
t3=t2;
-f_2088(t3,C_SCHEME_UNDEFINED);}}
+f_2109(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){
+/* k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2109(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
-C_word ab[35],*a=ab;
+C_word ab[36],*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);
+C_save_and_reclaim((void*)trf_2109,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2112,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[371],((C_word*)t0)[35]))){
+t3=C_set_block_item(lf[166] /* enable-inline-files */,0,C_SCHEME_TRUE);
+t4=C_set_block_item(lf[162] /* inline-locally */,0,C_SCHEME_TRUE);
+t5=C_set_block_item(lf[161] /* inline-globally */,0,C_SCHEME_TRUE);
t6=t2;
-f_2091(t6,t5);}
+f_2112(t6,t5);}
else{
t3=t2;
-f_2091(t3,C_SCHEME_UNDEFINED);}}
+f_2112(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){
+/* k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2112(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3073,21 +3091,21 @@ C_word t5;
C_word t6;
C_word t7;
C_word t8;
-C_word ab[44],*a=ab;
+C_word ab[45],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2091,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_2112,NULL,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|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");
+t6=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2116,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4501,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 215 collect-options */
t8=((C_word*)((C_word*)t0)[17])[1];
-f_1881(t8,t7,lf[364]);}
+f_1902(t8,t7,lf[370]);}
-/* 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){
+/* k4499 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4501(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3095,15 +3113,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4501,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4463,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4503,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_4463(t5,((C_word*)t0)[2],t1);}
+f_4503(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){
+/* loop431 in k4499 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_4503(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -3112,12 +3130,12 @@ 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);}
+C_save_and_reclaim((void*)trf_4503,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[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);
+t3=*((C_word*)lf[300]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4532,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
-C_trace("g444445");
+/* g447448 */
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -3125,8 +3143,8 @@ 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){
+/* k4530 in loop431 in k4499 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4532(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3138,222 +3156,222 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4532,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop428441");
+/* loop431444 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_4463(t6,((C_word*)t0)[3],t5);}
+f_4503(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop428441");
+/* loop431444 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_4463(t6,((C_word*)t0)[3],t5);}}
+f_4503(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){
+/* k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2116(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[38],*a=ab;
+C_word ab[39],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2116,2,t0,t1);}
+t2=C_mutate((C_word*)lf[63]+1 /* (set! disabled-warnings ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2119,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[368],((C_word*)t0)[35]))){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4496,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 217 dribble */
+t5=((C_word*)((C_word*)t0)[23])[1];
+f_1645(t5,t4,lf[369],C_SCHEME_END_OF_LIST);}
else{
t4=t3;
-f_2098(t4,C_SCHEME_UNDEFINED);}}
+f_2119(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){
+/* k4494 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4496(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_set_block_item(lf[126] /* warnings-enabled */,0,C_SCHEME_FALSE);
+t2=C_set_block_item(lf[132] /* warnings-enabled */,0,C_SCHEME_FALSE);
t3=((C_word*)t0)[2];
-f_2098(t3,t2);}
+f_2119(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){
+/* k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2119(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[35],*a=ab;
+C_word ab[36],*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);
+C_save_and_reclaim((void*)trf_2119,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2122,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[99],((C_word*)t0)[35]))){
+t3=C_set_block_item(lf[99] /* optimize-leaf-routines */,0,C_SCHEME_TRUE);
t4=t2;
-f_2101(t4,t3);}
+f_2122(t4,t3);}
else{
t3=t2;
-f_2101(t3,C_SCHEME_UNDEFINED);}}
+f_2122(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){
+/* k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2122(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[35],*a=ab;
+C_word ab[36],*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);
+C_save_and_reclaim((void*)trf_2122,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2125,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[159],((C_word*)t0)[35]))){
+t3=C_set_block_item(lf[159] /* unsafe */,0,C_SCHEME_TRUE);
t4=t2;
-f_2104(t4,t3);}
+f_2125(t4,t3);}
else{
t3=t2;
-f_2104(t3,C_SCHEME_UNDEFINED);}}
+f_2125(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){
+/* k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2125(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[35],*a=ab;
+C_word ab[36],*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);
+C_save_and_reclaim((void*)trf_2125,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2128,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep(((C_word*)t0)[21])){
+if(C_truep((C_word)C_i_memq(lf[366],((C_word*)t0)[35]))){
+t3=C_set_block_item(lf[367] /* emit-unsafe-marker */,0,C_SCHEME_TRUE);
t4=t2;
-f_2107(t4,t3);}
+f_2128(t4,t3);}
else{
t3=t2;
-f_2107(t3,C_SCHEME_UNDEFINED);}}
+f_2128(t3,C_SCHEME_UNDEFINED);}}
else{
t3=t2;
-f_2107(t3,C_SCHEME_UNDEFINED);}}
+f_2128(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){
+/* k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2128(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[35],*a=ab;
+C_word ab[36],*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);
+C_save_and_reclaim((void*)trf_2128,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2131,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[364],((C_word*)t0)[35]))){
+t3=C_set_block_item(lf[365] /* setup-mode */,0,C_SCHEME_TRUE);
t4=t2;
-f_2110(t4,t3);}
+f_2131(t4,t3);}
else{
t3=t2;
-f_2110(t3,C_SCHEME_UNDEFINED);}}
+f_2131(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){
+/* k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2131(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[35],*a=ab;
+C_word ab[36],*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);
+C_save_and_reclaim((void*)trf_2131,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2134,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[362],((C_word*)t0)[35]))){
+t3=C_set_block_item(lf[363] /* insert-timer-checks */,0,C_SCHEME_FALSE);
t4=t2;
-f_2113(t4,t3);}
+f_2134(t4,t3);}
else{
t3=t2;
-f_2113(t3,C_SCHEME_UNDEFINED);}}
+f_2134(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){
+/* k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2134(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[35],*a=ab;
+C_word ab[36],*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]);
+C_save_and_reclaim((void*)trf_2134,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2137,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[359],((C_word*)t0)[35]))){
+t3=C_mutate((C_word*)lf[360]+1 /* (set! number-type ...) */,lf[361]);
t4=t2;
-f_2116(t4,t3);}
+f_2137(t4,t3);}
else{
t3=t2;
-f_2116(t3,C_SCHEME_UNDEFINED);}}
+f_2137(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){
+/* k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2137(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[35],*a=ab;
+C_word ab[36],*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);
+C_save_and_reclaim((void*)trf_2137,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2140,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[357],((C_word*)t0)[35]))){
+t3=C_set_block_item(lf[358] /* block-compilation */,0,C_SCHEME_TRUE);
t4=t2;
-f_2119(t4,t3);}
+f_2140(t4,t3);}
else{
t3=t2;
-f_2119(t3,C_SCHEME_UNDEFINED);}}
+f_2140(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){
+/* k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2140(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[35],*a=ab;
+C_word ab[36],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2119,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|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);
+C_save_and_reclaim((void*)trf_2140,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2143,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[355],((C_word*)t0)[35]))){
+t3=C_set_block_item(lf[356] /* external-protos-first */,0,C_SCHEME_TRUE);
t4=t2;
-f_2122(t4,t3);}
+f_2143(t4,t3);}
else{
t3=t2;
-f_2122(t3,C_SCHEME_UNDEFINED);}}
+f_2143(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){
+/* k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2143(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[35],*a=ab;
+C_word ab[36],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2122,NULL,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|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);
+C_save_and_reclaim((void*)trf_2143,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2146,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[354],((C_word*)t0)[35]))){
+t3=C_set_block_item(lf[162] /* inline-locally */,0,C_SCHEME_TRUE);
t4=t2;
-f_2125(t4,t3);}
+f_2146(t4,t3);}
else{
t3=t2;
-f_2125(t3,C_SCHEME_UNDEFINED);}}
+f_2146(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){
+/* k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2146(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3361,65 +3379,65 @@ C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[38],*a=ab;
+C_word ab[39],*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);
+C_save_and_reclaim((void*)trf_2146,NULL,2,t0,t1);}
+t2=(C_word)C_i_memq(lf[64],((C_word*)t0)[35]);
+t3=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2152,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
if(C_truep(t2)){
-t4=C_set_block_item(lf[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);}
+t4=C_set_block_item(lf[162] /* inline-locally */,0,C_SCHEME_TRUE);
+t5=C_set_block_item(lf[353] /* local-definitions */,0,C_SCHEME_TRUE);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4451,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 235 option-arg */
+f_1537(t6,t2);}
else{
t4=t3;
-f_2131(t4,C_SCHEME_FALSE);}}
+f_2152(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){
+/* k4449 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4451(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_mutate((C_word*)lf[132]+1 /* (set! inline-output-file ...) */,t1);
+t2=C_mutate((C_word*)lf[138]+1 /* (set! inline-output-file ...) */,t1);
t3=((C_word*)t0)[2];
-f_2131(t3,t2);}
+f_2152(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){
+/* k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2152(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[38],*a=ab;
+C_word ab[39],*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);
+C_save_and_reclaim((void*)trf_2152,NULL,2,t0,t1);}
+t2=(C_word)C_i_memq(lf[65],((C_word*)t0)[35]);
+t3=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2158,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[35],a[32]=((C_word*)t0)[31],a[33]=((C_word*)t0)[32],a[34]=((C_word*)t0)[33],a[35]=((C_word*)t0)[34],tmp=(C_word)a,a+=36,tmp);
if(C_truep(t2)){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4396,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
-C_trace("batch-driver.scm: 233 option-arg");
-f_1527(t4,t2);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4436,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 238 option-arg */
+f_1537(t4,t2);}
else{
t4=t3;
-f_2137(t4,C_SCHEME_FALSE);}}
+f_2158(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){
+/* k4434 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4436(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_4436,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4439,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 239 string->number */
C_string_to_number(3,0,t2,t1);}
-/* 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){
+/* k4437 in k4434 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4439(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3427,239 +3445,239 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4439,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4442,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
if(C_truep(t1)){
t3=t1;
-t4=C_mutate((C_word*)lf[345]+1 /* (set! inline-max-size ...) */,t3);
+t4=C_mutate((C_word*)lf[351]+1 /* (set! inline-max-size ...) */,t3);
t5=((C_word*)t0)[3];
-f_2137(t5,t4);}
+f_2158(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]);}}
+/* batch-driver.scm: 240 quit */
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t2,lf[352],((C_word*)t0)[2]);}}
-/* 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){
+/* k4440 in k4437 in k4434 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4442(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_mutate((C_word*)lf[345]+1 /* (set! inline-max-size ...) */,t1);
+t2=C_mutate((C_word*)lf[351]+1 /* (set! inline-max-size ...) */,t1);
t3=((C_word*)t0)[2];
-f_2137(t3,t2);}
+f_2158(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){
+/* k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2158(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[38],*a=ab;
+C_word ab[39],*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);}
+C_save_and_reclaim((void*)trf_2158,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2161,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[349],((C_word*)t0)[31]))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4426,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 242 dribble */
+t4=((C_word*)((C_word*)t0)[23])[1];
+f_1645(t4,t3,lf[350],C_SCHEME_END_OF_LIST);}
else{
t3=t2;
-f_2140(2,t3,C_SCHEME_UNDEFINED);}}
+f_2161(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){
+/* k4424 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4426(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4426,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4429,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 243 register-feature! */
+((C_proc3)C_retrieve_symbol_proc(lf[310]))(3,*((C_word*)lf[310]+1),t2,lf[349]);}
-/* 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){
+/* k4427 in k4424 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4429(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 244 case-sensitive */
+((C_proc3)C_retrieve_symbol_proc(lf[334]))(3,*((C_word*)lf[334]+1),((C_word*)t0)[2],C_SCHEME_FALSE);}
-/* k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in 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){
+/* k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2161(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[35],*a=ab;
+C_word ab[36],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2161,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2164,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],a[35]=((C_word*)t0)[35],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[347],((C_word*)t0)[31]))){
+/* batch-driver.scm: 246 compiler-warning */
+((C_proc4)C_retrieve_symbol_proc(lf[212]))(4,*((C_word*)lf[212]+1),t2,lf[218],lf[348]);}
else{
t3=t2;
-f_2143(2,t3,C_SCHEME_UNDEFINED);}}
+f_2164(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){
+/* k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2164(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[37],*a=ab;
+C_word ab[38],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2164,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2167,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],a[28]=((C_word*)t0)[29],a[29]=((C_word*)t0)[30],a[30]=((C_word*)t0)[31],a[31]=((C_word*)t0)[32],a[32]=((C_word*)t0)[33],a[33]=((C_word*)t0)[34],a[34]=((C_word*)t0)[35],tmp=(C_word)a,a+=35,tmp);
if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4384,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 248 option-arg */
+f_1537(t3,((C_word*)t0)[2]);}
else{
t3=t2;
-f_2146(2,t3,C_SCHEME_UNDEFINED);}}
+f_2167(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){
+/* k4382 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4384(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-if(C_truep((C_word)C_i_string_equal_p(lf[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]);}
+if(C_truep((C_word)C_i_string_equal_p(lf[341],t1))){
+/* batch-driver.scm: 249 keyword-style */
+((C_proc3)C_retrieve_symbol_proc(lf[25]))(3,*((C_word*)lf[25]+1),((C_word*)t0)[2],lf[342]);}
else{
-if(C_truep((C_word)C_i_string_equal_p(lf[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]);}
+if(C_truep((C_word)C_i_string_equal_p(lf[343],t1))){
+/* batch-driver.scm: 250 keyword-style */
+((C_proc3)C_retrieve_symbol_proc(lf[25]))(3,*((C_word*)lf[25]+1),((C_word*)t0)[2],lf[333]);}
else{
-if(C_truep((C_word)C_i_string_equal_p(lf[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]);}
+if(C_truep((C_word)C_i_string_equal_p(lf[344],t1))){
+/* batch-driver.scm: 251 keyword-style */
+((C_proc3)C_retrieve_symbol_proc(lf[25]))(3,*((C_word*)lf[25]+1),((C_word*)t0)[2],lf[345]);}
else{
-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]);}}}}
+/* batch-driver.scm: 252 quit */
+((C_proc3)C_retrieve_symbol_proc(lf[8]))(3,*((C_word*)lf[8]+1),((C_word*)t0)[2],lf[346]);}}}}
-/* 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){
+/* k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2167(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[37],*a=ab;
+C_word ab[38],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2167,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2170,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],tmp=(C_word)a,a+=35,tmp);
+if(C_truep((C_word)C_i_memq(lf[338],((C_word*)t0)[30]))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4378,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 254 dribble */
+t4=((C_word*)((C_word*)t0)[22])[1];
+f_1645(t4,t3,lf[340],C_SCHEME_END_OF_LIST);}
else{
t3=t2;
-f_2149(2,t3,C_SCHEME_UNDEFINED);}}
+f_2170(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){
+/* k4376 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4378(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 255 parenthesis-synonyms */
+((C_proc3)C_retrieve_symbol_proc(lf[339]))(3,*((C_word*)lf[339]+1),((C_word*)t0)[2],C_SCHEME_FALSE);}
-/* 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){
+/* k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2170(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[37],*a=ab;
+C_word ab[38],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2170,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2173,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],tmp=(C_word)a,a+=35,tmp);
+if(C_truep((C_word)C_i_memq(lf[336],((C_word*)t0)[30]))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4369,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 257 dribble */
+t4=((C_word*)((C_word*)t0)[22])[1];
+f_1645(t4,t3,lf[337],C_SCHEME_END_OF_LIST);}
else{
t3=t2;
-f_2152(2,t3,C_SCHEME_UNDEFINED);}}
+f_2173(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){
+/* k4367 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4369(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 258 symbol-escape */
+((C_proc3)C_retrieve_symbol_proc(lf[331]))(3,*((C_word*)lf[331]+1),((C_word*)t0)[2],C_SCHEME_FALSE);}
-/* 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){
+/* k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2173(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[37],*a=ab;
+C_word ab[38],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2173,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2176,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],a[34]=((C_word*)t0)[34],tmp=(C_word)a,a+=35,tmp);
+if(C_truep((C_word)C_i_memq(lf[330],((C_word*)t0)[30]))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4351,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 260 dribble */
+t4=((C_word*)((C_word*)t0)[22])[1];
+f_1645(t4,t3,lf[335],C_SCHEME_END_OF_LIST);}
else{
t3=t2;
-f_2155(2,t3,C_SCHEME_UNDEFINED);}}
+f_2176(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){
+/* k4349 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4351(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4351,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4354,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 261 case-sensitive */
+((C_proc3)C_retrieve_symbol_proc(lf[334]))(3,*((C_word*)lf[334]+1),t2,C_SCHEME_FALSE);}
-/* 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){
+/* k4352 in k4349 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4354(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4354,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4357,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 262 keyword-style */
+((C_proc3)C_retrieve_symbol_proc(lf[25]))(3,*((C_word*)lf[25]+1),t2,lf[333]);}
-/* 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){
+/* k4355 in k4352 in k4349 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4357(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4357,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4360,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 263 parentheses-synonyms */
+((C_proc3)C_retrieve_symbol_proc(lf[332]))(3,*((C_word*)lf[332]+1),t2,C_SCHEME_FALSE);}
-/* 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){
+/* k4358 in k4355 in k4352 in k4349 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4360(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 264 symbol-escape */
+((C_proc3)C_retrieve_symbol_proc(lf[331]))(3,*((C_word*)lf[331]+1),((C_word*)t0)[2],C_SCHEME_FALSE);}
-/* 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){
+/* k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2176(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3671,24 +3689,24 @@ C_word t8;
C_word t9;
C_word t10;
C_word t11;
-C_word ab[46],*a=ab;
+C_word ab[47],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2176,2,t0,t1);}
+t2=C_mutate((C_word*)lf[66]+1 /* (set! verbose-mode ...) */,((C_word*)t0)[34]);
+t3=C_set_block_item(lf[67] /* read-error-with-line-number */,0,C_SCHEME_TRUE);
+t4=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2182,a[2]=((C_word*)t0)[34],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
t5=C_SCHEME_END_OF_LIST;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_FALSE;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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");
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4306,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4310,a[2]=t9,a[3]=t6,a[4]=t8,tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 268 collect-options */
t11=((C_word*)((C_word*)t0)[16])[1];
-f_1881(t11,t10,lf[323]);}
+f_1902(t11,t10,lf[329]);}
-/* 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){
+/* k4308 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4310(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3696,15 +3714,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4310,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4272,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4312,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_4272(t5,((C_word*)t0)[2],t1);}
+f_4312(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){
+/* loop520 in k4308 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_4312(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -3713,12 +3731,12 @@ 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);}
+C_save_and_reclaim((void*)trf_4312,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=C_retrieve(lf[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);
+t3=C_retrieve(lf[328]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4341,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
-C_trace("g533534");
+/* g536537 */
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -3726,8 +3744,8 @@ 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){
+/* k4339 in loop520 in k4308 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4341(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3739,59 +3757,59 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4341,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop517530");
+/* loop520533 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_4272(t6,((C_word*)t0)[3],t5);}
+f_4312(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop517530");
+/* loop520533 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_4272(t6,((C_word*)t0)[3],t5);}}
+f_4312(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){
+/* k4304 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4306(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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]);}
+/* batch-driver.scm: 268 append */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[231]+1)))(5,*((C_word*)lf[231]+1),((C_word*)t0)[3],t1,C_retrieve(lf[68]),((C_word*)t0)[2]);}
-/* 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){
+/* k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2182(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[33],*a=ab;
+C_word ab[34],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2182,2,t0,t1);}
+t2=C_mutate((C_word*)lf[68]+1 /* (set! include-pathnames ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2185,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
+if(C_truep(((C_word*)t0)[21])){
+if(C_truep(((C_word*)t0)[28])){
+if(C_truep((C_word)C_i_string_equal_p(((C_word*)t0)[21],((C_word*)t0)[28]))){
+/* batch-driver.scm: 272 quit */
+((C_proc3)C_retrieve_symbol_proc(lf[8]))(3,*((C_word*)lf[8]+1),t3,lf[327]);}
else{
t4=t3;
-f_2164(2,t4,C_SCHEME_UNDEFINED);}}
+f_2185(2,t4,C_SCHEME_UNDEFINED);}}
else{
t4=t3;
-f_2164(2,t4,C_SCHEME_UNDEFINED);}}
+f_2185(2,t4,C_SCHEME_UNDEFINED);}}
else{
t4=t3;
-f_2164(2,t4,C_SCHEME_UNDEFINED);}}
+f_2185(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){
+/* k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2185(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3800,21 +3818,21 @@ C_word t5;
C_word t6;
C_word t7;
C_word t8;
-C_word ab[42],*a=ab;
+C_word ab[43],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2164,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_2185,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|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");
+t6=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2189,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4255,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 273 collect-options */
t8=((C_word*)((C_word*)t0)[16])[1];
-f_1881(t8,t7,lf[240]);}
+f_1902(t8,t7,lf[246]);}
-/* 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){
+/* k4253 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4255(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3822,15 +3840,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4255,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4217,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4257,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_4217(t5,((C_word*)t0)[2],t1);}
+f_4257(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){
+/* loop549 in k4253 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_4257(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -3839,12 +3857,12 @@ 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);}
+C_save_and_reclaim((void*)trf_4257,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[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);
+t3=*((C_word*)lf[300]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4286,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
-C_trace("g562563");
+/* g565566 */
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -3852,8 +3870,8 @@ 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){
+/* k4284 in loop549 in k4253 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4286(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3865,99 +3883,99 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4286,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop546559");
+/* loop549562 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_4217(t6,((C_word*)t0)[3],t5);}
+f_4257(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop546559");
+/* loop549562 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_4217(t6,((C_word*)t0)[3],t5);}}
+f_4257(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){
+/* k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2189(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[33],*a=ab;
+C_word ab[34],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2189,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[33])+1,t1);
+t3=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2192,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[33],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],a[26]=((C_word*)t0)[25],a[27]=((C_word*)t0)[26],a[28]=((C_word*)t0)[27],a[29]=((C_word*)t0)[28],a[30]=((C_word*)t0)[29],a[31]=((C_word*)t0)[30],a[32]=((C_word*)t0)[31],a[33]=((C_word*)t0)[32],tmp=(C_word)a,a+=34,tmp);
+if(C_truep((C_word)C_i_memq(lf[325],((C_word*)t0)[30]))){
+t4=C_set_block_item(lf[326] /* undefine-shadowed-macros */,0,C_SCHEME_FALSE);
t5=t3;
-f_2171(t5,t4);}
+f_2192(t5,t4);}
else{
t4=t3;
-f_2171(t4,C_SCHEME_UNDEFINED);}}
+f_2192(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){
+/* k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2192(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[33],*a=ab;
+C_word ab[34],*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);
+C_save_and_reclaim((void*)trf_2192,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2195,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
+if(C_truep((C_word)C_i_memq(lf[323],((C_word*)t0)[31]))){
+t3=C_set_block_item(lf[324] /* no-argc-checks */,0,C_SCHEME_TRUE);
t4=t2;
-f_2174(t4,t3);}
+f_2195(t4,t3);}
else{
t3=t2;
-f_2174(t3,C_SCHEME_UNDEFINED);}}
+f_2195(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){
+/* k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2195(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[33],*a=ab;
+C_word ab[34],*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);
+C_save_and_reclaim((void*)trf_2195,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2198,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
+if(C_truep((C_word)C_i_memq(lf[321],((C_word*)t0)[31]))){
+t3=C_set_block_item(lf[322] /* no-bound-checks */,0,C_SCHEME_TRUE);
t4=t2;
-f_2177(t4,t3);}
+f_2198(t4,t3);}
else{
t3=t2;
-f_2177(t3,C_SCHEME_UNDEFINED);}}
+f_2198(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){
+/* k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2198(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[33],*a=ab;
+C_word ab[34],*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);
+C_save_and_reclaim((void*)trf_2198,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2201,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
+if(C_truep((C_word)C_i_memq(lf[319],((C_word*)t0)[31]))){
+t3=C_set_block_item(lf[320] /* no-procedure-checks */,0,C_SCHEME_TRUE);
t4=t2;
-f_2180(t4,t3);}
+f_2201(t4,t3);}
else{
t3=t2;
-f_2180(t3,C_SCHEME_UNDEFINED);}}
+f_2201(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){
+/* k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2201(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3965,23 +3983,23 @@ C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[41],*a=ab;
+C_word ab[42],*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);
+C_save_and_reclaim((void*)trf_2201,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2204,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
+if(C_truep((C_word)C_i_memq(lf[315],((C_word*)t0)[31]))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4062,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4112,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4152,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
t7=((C_word*)t5)[1];
-f_4112(t7,t3,C_retrieve(lf[284]));}
+f_4152(t7,t3,C_retrieve(lf[290]));}
else{
t3=t2;
-f_2183(2,t3,C_SCHEME_UNDEFINED);}}
+f_2204(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){
+/* loop582 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_4152(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -3994,41 +4012,41 @@ 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);}
+C_save_and_reclaim((void*)trf_4152,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4184,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4224,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t4=(C_word)C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4151,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4191,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4126,a[2]=t4,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4166,a[2]=t4,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
if(C_truep((C_word)C_i_nullp(t6))){
-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);}
+/* ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),t5,t4,lf[318],C_SCHEME_TRUE);}
else{
t8=(C_word)C_i_cdr(t6);
if(C_truep((C_word)C_i_nullp(t8))){
t9=(C_word)C_i_car(t6);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[310]))(5,*((C_word*)lf[310]+1),t5,t4,lf[312],t9);}
+/* ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),t5,t4,lf[318],t9);}
else{
-C_trace("##sys#error");
-t9=*((C_word*)lf[58]+1);
+/* ##sys#error */
+t9=*((C_word*)lf[60]+1);
((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,lf[0],t6);}}}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k4164 in loop582 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4166(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[318],t1);}
-/* 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){
+/* k4189 in loop582 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4191(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4037,43 +4055,43 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4191,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4156,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_4196,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
if(C_truep((C_word)C_i_nullp(t2))){
-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);}
+/* ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[317],C_SCHEME_TRUE);}
else{
t4=(C_word)C_i_cdr(t2);
if(C_truep((C_word)C_i_nullp(t4))){
t5=(C_word)C_i_car(t2);
-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);}
+/* ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[317],t5);}
else{
-C_trace("##sys#error");
-t5=*((C_word*)lf[58]+1);
+/* ##sys#error */
+t5=*((C_word*)lf[60]+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){
+/* k4194 in k4189 in loop582 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4196(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[317],t1);}
-/* 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){
+/* k4222 in loop582 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4224(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
t3=((C_word*)((C_word*)t0)[3])[1];
-f_4112(t3,((C_word*)t0)[2],t2);}
+f_4152(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){
+/* k4060 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4062(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4081,15 +4099,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4062,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4027,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4067,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_4027(t5,((C_word*)t0)[2],C_retrieve(lf[286]));}
+f_4067(t5,((C_word*)t0)[2],C_retrieve(lf[292]));}
-/* 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){
+/* loop629 in k4060 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_4067(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4102,41 +4120,41 @@ 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);}
+C_save_and_reclaim((void*)trf_4067,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4099,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4139,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t4=(C_word)C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4066,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4106,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
t6=C_SCHEME_END_OF_LIST;
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4041,a[2]=t4,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4081,a[2]=t4,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
if(C_truep((C_word)C_i_nullp(t6))){
-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);}
+/* ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),t5,t4,lf[318],C_SCHEME_TRUE);}
else{
t8=(C_word)C_i_cdr(t6);
if(C_truep((C_word)C_i_nullp(t8))){
t9=(C_word)C_i_car(t6);
-C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[310]))(5,*((C_word*)lf[310]+1),t5,t4,lf[312],t9);}
+/* ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),t5,t4,lf[318],t9);}
else{
-C_trace("##sys#error");
-t9=*((C_word*)lf[58]+1);
+/* ##sys#error */
+t9=*((C_word*)lf[60]+1);
((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,lf[0],t6);}}}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k4079 in loop629 in k4060 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4081(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[318],t1);}
-/* 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){
+/* k4104 in loop629 in k4060 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4106(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4145,84 +4163,84 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4106,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4071,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_4111,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
if(C_truep((C_word)C_i_nullp(t2))){
-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);}
+/* ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[317],C_SCHEME_TRUE);}
else{
t4=(C_word)C_i_cdr(t2);
if(C_truep((C_word)C_i_nullp(t4))){
t5=(C_word)C_i_car(t2);
-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);}
+/* ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[317],t5);}
else{
-C_trace("##sys#error");
-t5=*((C_word*)lf[58]+1);
+/* ##sys#error */
+t5=*((C_word*)lf[60]+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){
+/* k4109 in k4104 in loop629 in k4060 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4111(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[316]))(5,*((C_word*)lf[316]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[317],t1);}
-/* 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){
+/* k4137 in loop629 in k4060 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4139(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
t3=((C_word*)((C_word*)t0)[3])[1];
-f_4027(t3,((C_word*)t0)[2],t2);}
+f_4067(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){
+/* k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2204(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
-C_word ab[42],*a=ab;
+C_word ab[43],*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");
+C_save_and_reclaim((void*)tr2,(void*)f_2204,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2207,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4023,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4048,tmp=(C_word)a,a+=2,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4056,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 297 collect-options */
t6=((C_word*)((C_word*)t0)[17])[1];
-f_1881(t6,t5,lf[308]);}
+f_1902(t6,t5,lf[314]);}
-/* 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){
+/* k4054 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4056(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 297 append-map */
+((C_proc4)C_retrieve_symbol_proc(lf[313]))(4,*((C_word*)lf[313]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* a4047 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4048(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4008,3,t0,t1,t2);}
-t3=C_retrieve(lf[305]);
-C_trace("g692693");
+C_save_and_reclaim((void*)tr3,(void*)f_4048,3,t0,t1,t2);}
+t3=C_retrieve(lf[311]);
+/* g695696 */
t4=t3;
-((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,lf[306]);}
+((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,lf[312]);}
-/* 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){
+/* k4021 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4023(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4230,15 +4248,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4023,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3985,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4025,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_3985(t5,((C_word*)t0)[2],t1);}
+f_4025(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){
+/* loop677 in k4021 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_4025(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4247,12 +4265,12 @@ 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);}
+C_save_and_reclaim((void*)trf_4025,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=C_retrieve(lf[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);
+t3=C_retrieve(lf[310]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4035,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
-C_trace("g681682");
+/* g684685 */
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -4260,82 +4278,82 @@ 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){
+/* k4033 in loop677 in k4021 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4035(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
t3=((C_word*)((C_word*)t0)[3])[1];
-f_3985(t3,((C_word*)t0)[2],t2);}
+f_4025(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){
+/* k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2207(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[36],*a=ab;
+C_word ab[37],*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");
+C_save_and_reclaim((void*)tr2,(void*)f_2207,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[69],C_retrieve(lf[70]));
+t3=C_mutate((C_word*)lf[70]+1 /* (set! features ...) */,t2);
+t4=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2214,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],a[33]=((C_word*)t0)[33],tmp=(C_word)a,a+=34,tmp);
+/* batch-driver.scm: 301 collect-options */
t5=((C_word*)((C_word*)t0)[17])[1];
-f_1881(t5,t4,lf[303]);}
+f_1902(t5,t4,lf[309]);}
-/* 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){
+/* k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2214(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[34],*a=ab;
+C_word ab[35],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2214,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2217,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],a[26]=((C_word*)t0)[25],a[27]=((C_word*)t0)[26],a[28]=((C_word*)t0)[27],a[29]=((C_word*)t0)[28],a[30]=((C_word*)t0)[29],a[31]=((C_word*)t0)[30],a[32]=((C_word*)t0)[31],a[33]=((C_word*)t0)[32],a[34]=((C_word*)t0)[33],tmp=(C_word)a,a+=35,tmp);
+/* batch-driver.scm: 302 dribble */
+t3=((C_word*)((C_word*)t0)[23])[1];
+f_1645(t3,t2,lf[308],C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2217(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[33],*a=ab;
+C_word ab[34],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2217,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2220,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],a[28]=((C_word*)t0)[29],a[29]=((C_word*)t0)[30],a[30]=((C_word*)t0)[31],a[31]=((C_word*)t0)[32],a[32]=((C_word*)t0)[33],a[33]=((C_word*)t0)[34],tmp=(C_word)a,a+=34,tmp);
if(C_truep(((C_word*)t0)[2])){
-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);}
+/* batch-driver.scm: 303 load-verbose */
+((C_proc3)C_retrieve_symbol_proc(lf[307]))(3,*((C_word*)lf[307]+1),t2,C_SCHEME_TRUE);}
else{
t3=t2;
-f_2199(2,t3,C_SCHEME_UNDEFINED);}}
+f_2220(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){
+/* k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2220(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
-C_word ab[37],*a=ab;
+C_word ab[38],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2220,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2223,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],a[28]=((C_word*)t0)[29],a[29]=((C_word*)t0)[30],a[30]=((C_word*)t0)[31],a[31]=((C_word*)t0)[32],a[32]=((C_word*)t0)[33],tmp=(C_word)a,a+=33,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3946,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3986,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
t6=((C_word*)t4)[1];
-f_3946(t6,t2,((C_word*)t0)[2]);}
+f_3986(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){
+/* loop702 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3986(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4344,82 +4362,82 @@ 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);}
+C_save_and_reclaim((void*)trf_3986,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3965,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4005,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t4=(C_word)C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);}
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4002,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 305 ##sys#resolve-include-filename */
+((C_proc5)C_retrieve_symbol_proc(lf[169]))(5,*((C_word*)lf[169]+1),t5,t4,C_SCHEME_FALSE,C_SCHEME_TRUE);}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k4000 in loop702 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4002(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 305 load */
+((C_proc3)C_retrieve_symbol_proc(lf[306]))(3,*((C_word*)lf[306]+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){
+/* k4003 in loop702 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_4005(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
t3=((C_word*)((C_word*)t0)[3])[1];
-f_3946(t3,((C_word*)t0)[2],t2);}
+f_3986(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){
+/* k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2223(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[32],*a=ab;
+C_word ab[33],*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));}
+C_save_and_reclaim((void*)tr2,(void*)f_2223,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2227,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],tmp=(C_word)a,a+=33,tmp);
+/* batch-driver.scm: 307 delete */
+((C_proc5)C_retrieve_symbol_proc(lf[304]))(5,*((C_word*)lf[304]+1),t2,lf[69],C_retrieve(lf[70]),*((C_word*)lf[305]+1));}
-/* 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){
+/* k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2227(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
-C_word ab[35],*a=ab;
+C_word ab[36],*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_save_and_reclaim((void*)tr2,(void*)f_2227,2,t0,t1);}
+t2=C_mutate((C_word*)lf[70]+1 /* (set! features ...) */,t1);
+t3=(C_word)C_a_i_cons(&a,2,lf[71],C_retrieve(lf[70]));
+t4=C_mutate((C_word*)lf[70]+1 /* (set! features ...) */,t3);
+t5=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2235,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],a[32]=((C_word*)t0)[32],tmp=(C_word)a,a+=33,tmp);
+/* batch-driver.scm: 310 user-post-analysis-pass */
((C_proc2)C_retrieve_symbol_proc(lf[6]))(2,*((C_word*)lf[6]+1),t5);}
-/* 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){
+/* k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2235(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[31],*a=ab;
+C_word ab[32],*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]));}
+C_save_and_reclaim((void*)tr2,(void*)f_2235,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[32])+1,t1);
+t3=(*a=C_CLOSURE_TYPE|31,a[1]=(C_word)f_2239,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],tmp=(C_word)a,a+=32,tmp);
+/* batch-driver.scm: 313 append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),t3,((C_word*)((C_word*)t0)[31])[1],C_retrieve(lf[303]));}
-/* 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){
+/* k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2239(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4429,22 +4447,22 @@ C_word t6;
C_word t7;
C_word t8;
C_word t9;
-C_word ab[40],*a=ab;
+C_word ab[41],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2239,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[31])+1,t1);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|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");
+t7=(*a=C_CLOSURE_TYPE|31,a[1]=(C_word)f_2242,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],tmp=(C_word)a,a+=32,tmp);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3949,a[2]=t7,a[3]=t4,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 315 collect-options */
t9=((C_word*)((C_word*)t0)[16])[1];
-f_1881(t9,t8,lf[296]);}
+f_1902(t9,t8,lf[302]);}
-/* 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){
+/* k3947 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3949(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4452,15 +4470,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3949,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3911,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3951,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_3911(t5,((C_word*)t0)[2],t1);}
+f_3951(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){
+/* loop719 in k3947 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3951(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4469,12 +4487,12 @@ 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);}
+C_save_and_reclaim((void*)trf_3951,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[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);
+t3=*((C_word*)lf[300]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3980,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
-C_trace("g732733");
+/* g735736 */
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -4482,8 +4500,8 @@ 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){
+/* k3978 in loop719 in k3947 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3980(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4495,25 +4513,25 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3980,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop716729");
+/* loop719732 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_3911(t6,((C_word*)t0)[3],t5);}
+f_3951(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop716729");
+/* loop719732 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_3911(t6,((C_word*)t0)[3],t5);}}
+f_3951(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){
+/* k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2242(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4529,28 +4547,28 @@ C_word t12;
C_word t13;
C_word t14;
C_word t15;
-C_word ab[58],*a=ab;
+C_word ab[59],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2242,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2246,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],a[26]=((C_word*)t0)[25],a[27]=((C_word*)t0)[26],a[28]=((C_word*)t0)[27],a[29]=((C_word*)t0)[28],a[30]=((C_word*)t0)[29],a[31]=((C_word*)t0)[30],a[32]=((C_word*)t0)[31],tmp=(C_word)a,a+=33,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3846,a[2]=((C_word*)t0)[31],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3850,a[2]=t7,a[3]=t4,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
t9=C_SCHEME_END_OF_LIST;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
t11=C_SCHEME_FALSE;
t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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");
+t13=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3906,a[2]=t1,a[3]=t8,tmp=(C_word)a,a+=4,tmp);
+t14=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3910,a[2]=t13,a[3]=t10,a[4]=t12,tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 321 collect-options */
t15=((C_word*)((C_word*)t0)[16])[1];
-f_1881(t15,t14,lf[295]);}
+f_1902(t15,t14,lf[301]);}
-/* 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){
+/* k3908 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3910(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4558,15 +4576,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3910,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3872,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3912,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_3872(t5,((C_word*)t0)[2],t1);}
+f_3912(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){
+/* loop770 in k3908 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3912(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4575,12 +4593,12 @@ 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);}
+C_save_and_reclaim((void*)trf_3912,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[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);
+t3=*((C_word*)lf[300]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3941,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
-C_trace("g783784");
+/* g786787 */
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -4588,8 +4606,8 @@ 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){
+/* k3939 in loop770 in k3908 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3941(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4601,33 +4619,33 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3941,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop767780");
+/* loop770783 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_3872(t6,((C_word*)t0)[3],t5);}
+f_3912(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop767780");
+/* loop770783 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_3872(t6,((C_word*)t0)[3],t5);}}
+f_3912(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){
+/* k3904 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3906(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 321 append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k3848 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3850(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4635,15 +4653,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3850,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3812,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3852,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_3812(t5,((C_word*)t0)[2],t1);}
+f_3852(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){
+/* loop742 in k3848 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3852(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4665,19 +4683,19 @@ 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);}
+C_save_and_reclaim((void*)trf_3852,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
t3=(C_word)C_slot(t2,C_fix(0));
t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
t5=(C_word)C_a_i_cons(&a,2,C_SCHEME_TRUE,C_SCHEME_END_OF_LIST);
t6=(C_word)C_a_i_cons(&a,2,t4,t5);
-t7=(C_word)C_a_i_cons(&a,2,lf[293],t6);
+t7=(C_word)C_a_i_cons(&a,2,lf[299],t6);
t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
t9=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t8);
t10=C_mutate(((C_word *)((C_word*)t0)[4])+1,t8);
t11=(C_word)C_slot(t2,C_fix(1));
-C_trace("loop739752");
+/* loop742755 */
t17=t1;
t18=t11;
t1=t17;
@@ -4687,7 +4705,7 @@ 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");
+/* loop742755 */
t17=t1;
t18=t11;
t1=t17;
@@ -4698,168 +4716,168 @@ 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){
+/* k3844 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3846(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 318 append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1],t1);}
-/* 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){
+/* k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2246(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[31],*a=ab;
+C_word ab[32],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2246,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[32])+1,t1);
+t3=(*a=C_CLOSURE_TYPE|31,a[1]=(C_word)f_2250,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[32],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],tmp=(C_word)a,a+=32,tmp);
+/* batch-driver.scm: 325 append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),t3,C_retrieve(lf[72]),((C_word*)t0)[2]);}
-/* 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){
+/* k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2250(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[31],*a=ab;
+C_word ab[32],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2250,2,t0,t1);}
+t2=C_mutate((C_word*)lf[72]+1 /* (set! explicit-library-modules ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|31,a[1]=(C_word)f_2253,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],a[25]=((C_word*)t0)[25],a[26]=((C_word*)t0)[26],a[27]=((C_word*)t0)[27],a[28]=((C_word*)t0)[28],a[29]=((C_word*)t0)[29],a[30]=((C_word*)t0)[30],a[31]=((C_word*)t0)[31],tmp=(C_word)a,a+=32,tmp);
+if(C_truep((C_word)C_i_memq(lf[297],((C_word*)t0)[31]))){
+t4=C_set_block_item(lf[298] /* enable-runtime-macros */,0,C_SCHEME_TRUE);
t5=t3;
-f_2232(t5,t4);}
+f_2253(t5,t4);}
else{
t4=t3;
-f_2232(t4,C_SCHEME_UNDEFINED);}}
+f_2253(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){
+/* k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2253(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
-C_word ab[34],*a=ab;
+C_word ab[35],*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);
+C_save_and_reclaim((void*)trf_2253,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|30,a[1]=(C_word)f_2257,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],a[28]=((C_word*)t0)[29],a[29]=((C_word*)t0)[30],a[30]=((C_word*)t0)[31],tmp=(C_word)a,a+=31,tmp);
if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3825,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 331 option-arg */
+f_1537(t3,((C_word*)t0)[2]);}
else{
-t3=C_retrieve(lf[290]);
+t3=C_retrieve(lf[296]);
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));}
+f_2257(2,t5,(C_truep(t4)?C_SCHEME_FALSE:t3));}
else{
t4=t2;
-f_2236(2,t4,C_SCHEME_FALSE);}}}
+f_2257(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){
+/* k3823 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3825(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("batch-driver.scm: 326 arg-val");
-f_1801(((C_word*)t0)[2],t1);}
+/* batch-driver.scm: 331 arg-val */
+f_1822(((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){
+/* k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2257(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[33],*a=ab;
+C_word ab[34],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2257,2,t0,t1);}
+t2=C_mutate((C_word*)lf[73]+1 /* (set! target-heap-size ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|29,a[1]=(C_word)f_2261,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],a[28]=((C_word*)t0)[29],a[29]=((C_word*)t0)[30],tmp=(C_word)a,a+=30,tmp);
if(C_truep(((C_word*)t0)[2])){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3818,a[2]=t3,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 335 option-arg */
+f_1537(t4,((C_word*)t0)[2]);}
else{
t4=t3;
-f_2240(2,t4,C_SCHEME_FALSE);}}
+f_2261(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){
+/* k3816 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3818(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("batch-driver.scm: 330 arg-val");
-f_1801(((C_word*)t0)[2],t1);}
+/* batch-driver.scm: 335 arg-val */
+f_1822(((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){
+/* k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2261(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[32],*a=ab;
+C_word ab[33],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2261,2,t0,t1);}
+t2=C_mutate((C_word*)lf[74]+1 /* (set! target-initial-heap-size ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|28,a[1]=(C_word)f_2265,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],a[28]=((C_word*)t0)[29],tmp=(C_word)a,a+=29,tmp);
if(C_truep(((C_word*)t0)[2])){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3811,a[2]=t3,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 336 option-arg */
+f_1537(t4,((C_word*)t0)[2]);}
else{
t4=t3;
-f_2244(2,t4,C_SCHEME_FALSE);}}
+f_2265(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){
+/* k3809 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3811(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("batch-driver.scm: 331 arg-val");
-f_1801(((C_word*)t0)[2],t1);}
+/* batch-driver.scm: 336 arg-val */
+f_1822(((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){
+/* k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2265(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[31],*a=ab;
+C_word ab[32],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2265,2,t0,t1);}
+t2=C_mutate((C_word*)lf[75]+1 /* (set! target-heap-growth ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|27,a[1]=(C_word)f_2269,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],a[24]=((C_word*)t0)[25],a[25]=((C_word*)t0)[26],a[26]=((C_word*)t0)[27],a[27]=((C_word*)t0)[28],tmp=(C_word)a,a+=28,tmp);
if(C_truep(((C_word*)t0)[2])){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3804,a[2]=t3,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 337 option-arg */
+f_1537(t4,((C_word*)t0)[2]);}
else{
t4=t3;
-f_2248(2,t4,C_SCHEME_FALSE);}}
+f_2269(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){
+/* k3802 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3804(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("batch-driver.scm: 332 arg-val");
-f_1801(((C_word*)t0)[2],t1);}
+/* batch-driver.scm: 337 arg-val */
+f_1822(((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){
+/* k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2269(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4867,35 +4885,35 @@ C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[28],*a=ab;
+C_word ab[29],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2269,2,t0,t1);}
+t2=C_mutate((C_word*)lf[76]+1 /* (set! target-heap-shrinkage ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_2273,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[13],a[11]=((C_word*)t0)[14],a[12]=((C_word*)t0)[15],a[13]=((C_word*)t0)[16],a[14]=((C_word*)t0)[17],a[15]=((C_word*)t0)[18],a[16]=((C_word*)t0)[19],a[17]=((C_word*)t0)[20],a[18]=((C_word*)t0)[21],a[19]=((C_word*)t0)[22],a[20]=((C_word*)t0)[23],a[21]=((C_word*)t0)[24],a[22]=((C_word*)t0)[25],a[23]=((C_word*)t0)[26],a[24]=((C_word*)t0)[27],tmp=(C_word)a,a+=25,tmp);
if(C_truep(((C_word*)t0)[4])){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3784,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 340 option-arg */
+f_1537(t4,((C_word*)t0)[4]);}
else{
-t4=C_retrieve(lf[289]);
+t4=C_retrieve(lf[295]);
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));}
+f_2273(2,t6,(C_truep(t5)?C_SCHEME_FALSE:t4));}
else{
t5=t3;
-f_2252(2,t5,C_SCHEME_FALSE);}}}
+f_2273(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){
+/* k3782 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3784(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("batch-driver.scm: 335 arg-val");
-f_1801(((C_word*)t0)[2],t1);}
+/* batch-driver.scm: 340 arg-val */
+f_1822(((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){
+/* k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2273(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4905,63 +4923,63 @@ C_word t6;
C_word t7;
C_word t8;
C_word t9;
-C_word ab[24],*a=ab;
+C_word ab[25],*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]);
+C_save_and_reclaim((void*)tr2,(void*)f_2273,2,t0,t1);}
+t2=C_mutate((C_word*)lf[77]+1 /* (set! target-stack-size ...) */,t1);
+t3=(C_word)C_i_memq(lf[78],((C_word*)t0)[24]);
t4=(C_word)C_i_not(t3);
-t5=C_mutate((C_word*)lf[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);}
+t5=C_mutate((C_word*)lf[79]+1 /* (set! emit-trace-info ...) */,t4);
+t6=(C_word)C_i_memq(lf[80],((C_word*)t0)[24]);
+t7=C_mutate((C_word*)lf[81]+1 /* (set! disable-stack-overflow-checking ...) */,t6);
+t8=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_2284,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],tmp=(C_word)a,a+=25,tmp);
+if(C_truep((C_word)C_i_memq(lf[293],C_retrieve(lf[36])))){
+/* batch-driver.scm: 346 set-gc-report! */
+((C_proc3)C_retrieve_symbol_proc(lf[294]))(3,*((C_word*)lf[294]+1),t8,C_SCHEME_TRUE);}
else{
t9=t8;
-f_2263(2,t9,C_SCHEME_UNDEFINED);}}
+f_2284(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){
+/* k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2284(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[24],*a=ab;
+C_word ab[25],*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]))){
+C_save_and_reclaim((void*)tr2,(void*)f_2284,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_2287,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],tmp=(C_word)a,a+=25,tmp);
+if(C_truep((C_word)C_i_memq(lf[288],((C_word*)t0)[24]))){
t3=t2;
-f_2266(t3,C_SCHEME_UNDEFINED);}
+f_2287(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]));
+t3=C_mutate((C_word*)lf[289]+1 /* (set! standard-bindings ...) */,C_retrieve(lf[290]));
+t4=C_mutate((C_word*)lf[291]+1 /* (set! extended-bindings ...) */,C_retrieve(lf[292]));
t5=t2;
-f_2266(t5,t4);}}
+f_2287(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){
+/* k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2287(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[27],*a=ab;
+C_word ab[28],*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]));}
+C_save_and_reclaim((void*)trf_2287,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_2290,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],tmp=(C_word)a,a+=25,tmp);
+if(C_truep(C_retrieve(lf[79]))){
+/* batch-driver.scm: 350 dribble */
+t3=((C_word*)((C_word*)t0)[16])[1];
+f_1645(t3,t2,lf[285],(C_word)C_a_i_list(&a,1,lf[286]));}
else{
-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]));}}
+/* batch-driver.scm: 350 dribble */
+t3=((C_word*)((C_word*)t0)[16])[1];
+f_1645(t3,t2,lf[285],(C_word)C_a_i_list(&a,1,lf[287]));}}
-/* 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){
+/* k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2290(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4970,58 +4988,58 @@ C_word t5;
C_word t6;
C_word t7;
C_word t8;
-C_word ab[29],*a=ab;
+C_word ab[30],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2290,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2293,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],tmp=(C_word)a,a+=24,tmp);
if(C_truep(((C_word*)t0)[2])){
t3=(C_word)C_i_car(((C_word*)t0)[2]);
-t4=(C_word)C_eqp(lf[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);
+t4=(C_word)C_eqp(lf[277],t3);
+t5=C_set_block_item(lf[238] /* emit-profile */,0,C_SCHEME_TRUE);
+t6=C_mutate((C_word*)lf[278]+1 /* (set! profiled-procedures ...) */,lf[279]);
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3743,a[2]=t2,a[3]=((C_word*)t0)[16],a[4]=t4,a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
if(C_truep(t4)){
-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]);}
+/* batch-driver.scm: 359 append */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[231]+1)))(5,*((C_word*)lf[231]+1),t7,((C_word*)((C_word*)t0)[6])[1],C_retrieve(lf[283]),lf[284]);}
else{
-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);}}
+/* batch-driver.scm: 359 append */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[231]+1)))(5,*((C_word*)lf[231]+1),t7,((C_word*)((C_word*)t0)[6])[1],C_retrieve(lf[283]),C_SCHEME_END_OF_LIST);}}
else{
t3=t2;
-f_2272(2,t3,C_SCHEME_UNDEFINED);}}
+f_2293(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){
+/* k3741 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3743(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3703,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_3743,2,t0,t1);}
t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
if(C_truep(((C_word*)t0)[4])){
-C_trace("batch-driver.scm: 360 dribble");
+/* batch-driver.scm: 365 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]));}
+f_1645(t3,((C_word*)t0)[2],lf[280],(C_word)C_a_i_list(&a,1,lf[281]));}
else{
-C_trace("batch-driver.scm: 360 dribble");
+/* batch-driver.scm: 365 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]));}}
+f_1645(t3,((C_word*)t0)[2],lf[280],(C_word)C_a_i_list(&a,1,lf[282]));}}
-/* 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){
+/* k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2293(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[23],*a=ab;
+C_word ab[24],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2293,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2296,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
+/* batch-driver.scm: 368 load-identifier-database */
+((C_proc3)C_retrieve_symbol_proc(lf[275]))(3,*((C_word*)lf[275]+1),t2,lf[276]);}
-/* 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){
+/* k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2296(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5029,31 +5047,31 @@ C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[23],*a=ab;
+C_word ab[24],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2296,2,t0,t1);}
+if(C_truep((C_word)C_i_memq(lf[82],((C_word*)t0)[23]))){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2305,a[2]=((C_word*)t0)[22],tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 371 print-version */
+((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,C_SCHEME_TRUE);}
else{
-t2=(C_word)C_i_memq(lf[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);
+t2=(C_word)C_i_memq(lf[84],((C_word*)t0)[23]);
+t3=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2317,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[22],tmp=(C_word)a,a+=24,tmp);
if(C_truep(t2)){
t4=t3;
-f_2296(t4,t2);}
+f_2317(t4,t2);}
else{
-t4=(C_word)C_i_memq(lf[266],((C_word*)t0)[22]);
+t4=(C_word)C_i_memq(lf[272],((C_word*)t0)[23]);
if(C_truep(t4)){
t5=t3;
-f_2296(t5,t4);}
+f_2317(t5,t4);}
else{
-t5=(C_word)C_i_memq(lf[267],((C_word*)t0)[22]);
+t5=(C_word)C_i_memq(lf[273],((C_word*)t0)[23]);
t6=t3;
-f_2296(t6,(C_truep(t5)?t5:(C_word)C_i_memq(lf[268],((C_word*)t0)[22])));}}}}
+f_2317(t6,(C_truep(t5)?t5:(C_word)C_i_memq(lf[274],((C_word*)t0)[23])));}}}}
-/* 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){
+/* k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2317(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5061,184 +5079,184 @@ C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[26],*a=ab;
+C_word ab[27],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2296,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_2317,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]);}
+/* batch-driver.scm: 374 print-usage */
+((C_proc2)C_retrieve_symbol_proc(lf[85]))(2,*((C_word*)lf[85]+1),((C_word*)t0)[23]);}
else{
-if(C_truep((C_word)C_i_memq(lf[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);}
+if(C_truep((C_word)C_i_memq(lf[86],((C_word*)t0)[22]))){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2329,a[2]=((C_word*)t0)[23],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2336,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 376 chicken-version */
+((C_proc2)C_retrieve_symbol_proc(lf[87]))(2,*((C_word*)lf[87]+1),t3);}
else{
-t2=((C_word*)t0)[20];
+t2=((C_word*)t0)[21];
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]));}
+t3=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2351,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[22],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[23],a[12]=((C_word*)t0)[10],a[13]=((C_word*)t0)[11],a[14]=((C_word*)t0)[12],a[15]=((C_word*)t0)[13],a[16]=((C_word*)t0)[14],a[17]=((C_word*)t0)[15],a[18]=((C_word*)t0)[16],a[19]=((C_word*)t0)[17],a[20]=((C_word*)t0)[18],a[21]=((C_word*)t0)[19],a[22]=((C_word*)t0)[20],a[23]=((C_word*)t0)[21],tmp=(C_word)a,a+=24,tmp);
+/* batch-driver.scm: 384 dribble */
+t4=((C_word*)((C_word*)t0)[15])[1];
+f_1645(t4,t3,lf[270],(C_word)C_a_i_list(&a,1,((C_word*)t0)[21]));}
else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);}}}}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2345,a[2]=((C_word*)t0)[23],tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 379 print-version */
+((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t3,C_SCHEME_TRUE);}}}}
-/* 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){
+/* k2343 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2345(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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]);}
+/* batch-driver.scm: 380 display */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[37]+1)))(3,*((C_word*)lf[37]+1),((C_word*)t0)[2],lf[271]);}
-/* 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){
+/* k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2351(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[23],*a=ab;
+C_word ab[24],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2351,2,t0,t1);}
+t2=C_mutate((C_word*)lf[88]+1 /* (set! source-filename ...) */,((C_word*)t0)[23]);
+t3=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2355,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[23],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],tmp=(C_word)a,a+=24,tmp);
+/* batch-driver.scm: 386 debugging */
+((C_proc5)C_retrieve_symbol_proc(lf[104]))(5,*((C_word*)lf[104]+1),t3,lf[265],lf[269],((C_word*)t0)[9]);}
-/* 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){
+/* k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2355(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[23],*a=ab;
+C_word ab[24],*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]));}
+C_save_and_reclaim((void*)tr2,(void*)f_2355,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2358,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
+/* batch-driver.scm: 387 debugging */
+((C_proc5)C_retrieve_symbol_proc(lf[104]))(5,*((C_word*)lf[104]+1),t2,lf[265],lf[268],C_retrieve(lf[36]));}
-/* 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){
+/* k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2358(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[23],*a=ab;
+C_word ab[24],*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]));}
+C_save_and_reclaim((void*)tr2,(void*)f_2358,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2361,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
+/* batch-driver.scm: 388 debugging */
+((C_proc5)C_retrieve_symbol_proc(lf[104]))(5,*((C_word*)lf[104]+1),t2,lf[265],lf[267],C_retrieve(lf[73]));}
-/* 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){
+/* k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2361(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[23],*a=ab;
+C_word ab[24],*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]));}
+C_save_and_reclaim((void*)tr2,(void*)f_2361,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2364,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
+/* batch-driver.scm: 389 debugging */
+((C_proc5)C_retrieve_symbol_proc(lf[104]))(5,*((C_word*)lf[104]+1),t2,lf[265],lf[266],C_retrieve(lf[77]));}
-/* 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){
+/* k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2364(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[23],*a=ab;
+C_word ab[24],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2343,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_2364,2,t0,t1);}
t2=(C_word)C_fudge(C_fix(6));
-t3=C_mutate(((C_word *)((C_word*)t0)[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);}
+t3=C_mutate(((C_word *)((C_word*)t0)[23])+1,t2);
+t4=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2372,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[23],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],tmp=(C_word)a,a+=24,tmp);
+/* batch-driver.scm: 393 make-vector */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[263]+1)))(4,*((C_word*)lf[263]+1),t4,C_retrieve(lf[264]),C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2372(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[23],*a=ab;
+C_word ab[24],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2351,2,t0,t1);}
-t2=C_mutate((C_word*)lf[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");
+C_save_and_reclaim((void*)tr2,(void*)f_2372,2,t0,t1);}
+t2=C_mutate((C_word*)lf[48]+1 /* (set! line-number-database ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2375,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
+/* batch-driver.scm: 394 collect-options */
t4=((C_word*)((C_word*)t0)[10])[1];
-f_1881(t4,t3,lf[256]);}
+f_1902(t4,t3,lf[262]);}
-/* 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){
+/* k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2375(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[24],*a=ab;
+C_word ab[25],*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");
+C_save_and_reclaim((void*)tr2,(void*)f_2375,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_2378,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],tmp=(C_word)a,a+=25,tmp);
+/* batch-driver.scm: 395 collect-options */
t3=((C_word*)((C_word*)t0)[10])[1];
-f_1881(t3,t2,lf[255]);}
+f_1902(t3,t2,lf[261]);}
-/* 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){
+/* k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2378(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[30],*a=ab;
+C_word ab[31],*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");
+C_save_and_reclaim((void*)tr2,(void*)f_2378,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|25,a[1]=(C_word)f_2381,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],tmp=(C_word)a,a+=26,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3711,a[2]=((C_word*)t0)[11],a[3]=t2,a[4]=((C_word*)t0)[18],tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 397 collect-options */
t4=((C_word*)((C_word*)t0)[11])[1];
-f_1881(t4,t3,lf[254]);}
+f_1902(t4,t3,lf[260]);}
-/* 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){
+/* k3709 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3711(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3671,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_3711,2,t0,t1);}
t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[4]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3719,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 399 collect-options */
t4=((C_word*)((C_word*)t0)[2])[1];
-f_1881(t4,t3,lf[253]);}
+f_1902(t4,t3,lf[259]);}
-/* 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){
+/* k3717 in k3709 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3719(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 396 append */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[231]+1)))(5,*((C_word*)lf[231]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2381(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[26],*a=ab;
+C_word ab[27],*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_save_and_reclaim((void*)tr2,(void*)f_2381,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|26,a[1]=(C_word)f_2384,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],a[25]=((C_word*)t0)[24],a[26]=((C_word*)t0)[25],tmp=(C_word)a,a+=27,tmp);
+/* batch-driver.scm: 401 user-read-pass */
((C_proc2)C_retrieve_symbol_proc(lf[3]))(2,*((C_word*)lf[3]+1),t2);}
-/* 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){
+/* k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2384(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5246,24 +5264,24 @@ C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[31],*a=ab;
+C_word ab[32],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2384,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2387,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[12],a[9]=((C_word*)t0)[13],a[10]=((C_word*)t0)[14],a[11]=((C_word*)t0)[15],a[12]=((C_word*)t0)[16],a[13]=((C_word*)t0)[17],a[14]=((C_word*)t0)[18],a[15]=((C_word*)t0)[19],a[16]=((C_word*)t0)[20],a[17]=((C_word*)t0)[21],a[18]=((C_word*)t0)[22],a[19]=((C_word*)t0)[23],a[20]=((C_word*)t0)[24],a[21]=((C_word*)t0)[25],a[22]=((C_word*)t0)[26],tmp=(C_word)a,a+=23,tmp);
if(C_truep(t1)){
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);}
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3547,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+/* batch-driver.scm: 403 dribble */
+t4=((C_word*)((C_word*)t0)[22])[1];
+f_1645(t4,t3,lf[252],C_SCHEME_END_OF_LIST);}
else{
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3556,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp));
t6=((C_word*)t4)[1];
-f_3516(t6,t2,((C_word*)t0)[4]);}}
+f_3556(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){
+/* doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3556(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5279,27 +5297,27 @@ 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);}
+C_save_and_reclaim((void*)trf_3556,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_nullp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3527,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_3567,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
t4=C_SCHEME_END_OF_LIST;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_FALSE;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3531,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[5],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3571,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[5],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3576,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3616,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
t12=((C_word*)t10)[1];
-f_3576(t12,t8,((C_word*)t0)[4]);}
+f_3616(t12,t8,((C_word*)t0)[4]);}
else{
t3=(C_word)C_i_car(t2);
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);}}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3655,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=t2,a[7]=t3,tmp=(C_word)a,a+=8,tmp);
+/* batch-driver.scm: 413 check-and-open-input-file */
+((C_proc3)C_retrieve_symbol_proc(lf[258]))(3,*((C_word*)lf[258]+1),t4,t3);}}
-/* 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){
+/* k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3655(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5312,21 +5330,21 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3655,2,t0,t1);}
t2=((C_word*)t0)[7];
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3658,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3667,a[2]=t3,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3672,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[7],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3704,a[2]=t5,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* ##sys#dynamic-wind */
+t10=*((C_word*)lf[257]+1);
((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t6,t7,t8,t9);}
-/* 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){
+/* a3703 in k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3704(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5334,28 +5352,28 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_3704,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,C_retrieve(lf[255]));
+t3=C_mutate((C_word*)lf[255]+1 /* (set! current-source-filename ...) */,((C_word*)((C_word*)t0)[2])[1]);
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-/* 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){
+/* a3671 in k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3672(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3672,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3676,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+/* batch-driver.scm: 415 read-form */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_1955(t3,t2,((C_word*)t0)[5]);}
+f_1976(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){
+/* k3674 in a3671 in k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3676(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5363,15 +5381,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3676,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3681,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp));
t5=((C_word*)t3)[1];
-f_3641(t5,((C_word*)t0)[2],t1);}
+f_3681(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){
+/* doloop919 in k3674 in a3671 in k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3681(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5379,28 +5397,28 @@ 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);}
+C_save_and_reclaim((void*)trf_3681,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]);}
+/* batch-driver.scm: 418 close-checked-input-file */
+((C_proc4)C_retrieve_symbol_proc(lf[256]))(4,*((C_word*)lf[256]+1),t1,((C_word*)t0)[6],((C_word*)t0)[5]);}
else{
t3=(C_word)C_a_i_cons(&a,2,t2,((C_word*)((C_word*)t0)[4])[1]);
t4=C_mutate(((C_word *)((C_word*)t0)[4])+1,t3);
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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");
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3702,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 416 read-form */
t6=((C_word*)((C_word*)t0)[2])[1];
-f_1955(t6,t5,((C_word*)t0)[6]);}}
+f_1976(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){
+/* k3700 in doloop919 in k3674 in a3671 in k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3702(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)((C_word*)t0)[3])[1];
-f_3641(t2,((C_word*)t0)[2],t1);}
+f_3681(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){
+/* a3666 in k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3667(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5408,24 +5426,24 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_3667,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,C_retrieve(lf[255]));
+t3=C_mutate((C_word*)lf[255]+1 /* (set! current-source-filename ...) */,((C_word*)((C_word*)t0)[2])[1]);
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-/* 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){
+/* k3656 in k3653 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3658(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
t3=((C_word*)((C_word*)t0)[3])[1];
-f_3516(t3,((C_word*)t0)[2],t2);}
+f_3556(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){
+/* loop861 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3616(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5434,12 +5452,12 @@ 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);}
+C_save_and_reclaim((void*)trf_3616,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=C_retrieve(lf[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);
+t3=C_retrieve(lf[253]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3645,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
-C_trace("g874875");
+/* g877878 */
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -5447,8 +5465,8 @@ 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){
+/* k3643 in loop861 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3645(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5460,37 +5478,37 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3645,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop858871");
+/* loop861874 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_3576(t6,((C_word*)t0)[3],t5);}
+f_3616(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop858871");
+/* loop861874 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_3576(t6,((C_word*)t0)[3],t5);}}
+f_3616(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){
+/* k3569 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3571(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3571,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3575,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 410 reverse */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[254]+1)))(3,*((C_word*)lf[254]+1),t2,((C_word*)((C_word*)t0)[2])[1]);}
-/* 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){
+/* k3573 in k3569 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3575(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5503,20 +5521,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3575,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3539,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3579,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3541,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3581,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
-f_3541(t10,t6,((C_word*)t0)[2]);}
+f_3581(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){
+/* loop884 in k3573 in k3569 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3581(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5525,12 +5543,12 @@ 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);}
+C_save_and_reclaim((void*)trf_3581,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=C_retrieve(lf[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);
+t3=C_retrieve(lf[253]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3610,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
-C_trace("g897898");
+/* g900901 */
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -5538,8 +5556,8 @@ 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){
+/* k3608 in loop884 in k3573 in k3569 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3610(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5551,33 +5569,33 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3610,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop881894");
+/* loop884897 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_3541(t6,((C_word*)t0)[3],t5);}
+f_3581(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop881894");
+/* loop884897 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_3541(t6,((C_word*)t0)[3],t5);}}
+f_3581(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){
+/* k3577 in k3573 in k3569 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3579(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 409 append */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[231]+1)))(5,*((C_word*)lf[231]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k3565 in doloop854 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3567(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5586,62 +5604,62 @@ 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){
+/* k3545 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3547(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3547,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3551,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 404 proc */
t3=((C_word*)t0)[5];
((C_proc5)C_retrieve_proc(t3))(5,t3,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k3549 in k3545 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3551(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
t3=((C_word*)t0)[2];
-f_2366(2,t3,t2);}
+f_2387(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){
+/* k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2387(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[22],*a=ab;
+C_word ab[23],*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_save_and_reclaim((void*)tr2,(void*)f_2387,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2390,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],tmp=(C_word)a,a+=23,tmp);
+/* batch-driver.scm: 422 user-preprocessor-pass */
((C_proc2)C_retrieve_symbol_proc(lf[4]))(2,*((C_word*)lf[4]+1),t2);}
-/* 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){
+/* k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2390(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[27],*a=ab;
+C_word ab[28],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2390,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2393,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],tmp=(C_word)a,a+=23,tmp);
if(C_truep(t1)){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3505,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 424 dribble */
+t4=((C_word*)((C_word*)t0)[18])[1];
+f_1645(t4,t3,lf[251],C_SCHEME_END_OF_LIST);}
else{
t3=t2;
-f_2372(t3,C_SCHEME_UNDEFINED);}}
+f_2393(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){
+/* k3503 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3505(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5654,20 +5672,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3505,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3469,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3509,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3471,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t8,a[5]=t5,tmp=(C_word)a,a+=6,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3511,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t8,a[5]=t5,tmp=(C_word)a,a+=6,tmp));
t10=((C_word*)t8)[1];
-f_3471(t10,t6,((C_word*)((C_word*)t0)[4])[1]);}
+f_3511(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){
+/* loop935 in k3503 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3511(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5675,11 +5693,11 @@ 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);}
+C_save_and_reclaim((void*)trf_3511,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3540,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
t4=(C_word)C_slot(t2,C_fix(0));
-C_trace("g948949");
+/* g951952 */
t5=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t5))(3,t5,t3,t4);}
else{
@@ -5687,8 +5705,8 @@ 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){
+/* k3538 in loop935 in k3503 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3540(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5700,83 +5718,83 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3540,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop932945");
+/* loop935948 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_3471(t6,((C_word*)t0)[3],t5);}
+f_3511(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop932945");
+/* loop935948 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_3471(t6,((C_word*)t0)[3],t5);}}
+f_3511(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){
+/* k3507 in k3503 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3509(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
t3=((C_word*)t0)[2];
-f_2372(t3,t2);}
+f_2393(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){
+/* k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2393(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[22],*a=ab;
+C_word ab[23],*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");
+C_save_and_reclaim((void*)trf_2393,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2396,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],tmp=(C_word)a,a+=23,tmp);
+/* batch-driver.scm: 427 print-expr */
t3=((C_word*)((C_word*)t0)[7])[1];
-f_1717(t3,t2,lf[243],lf[244],((C_word*)((C_word*)t0)[3])[1]);}
+f_1730(t3,t2,lf[249],lf[250],((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){
+/* k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2396(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[26],*a=ab;
+C_word ab[27],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2396,2,t0,t1);}
+t2=f_1937(((C_word*)((C_word*)t0)[22])[1]);
+t3=(*a=C_CLOSURE_TYPE|21,a[1]=(C_word)f_2402,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],tmp=(C_word)a,a+=22,tmp);
if(C_truep((C_word)C_i_nullp(((C_word*)((C_word*)t0)[2])[1]))){
t4=t3;
-f_2381(t4,C_SCHEME_UNDEFINED);}
+f_2402(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]);}}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3482,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 430 append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),t4,C_retrieve(lf[72]),((C_word*)((C_word*)t0)[2])[1]);}}
-/* 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){
+/* k3480 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3482(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3482,2,t0,t1);}
+t2=C_mutate((C_word*)lf[72]+1 /* (set! explicit-library-modules ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3502,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* ##sys#append */
+t4=*((C_word*)lf[248]+1);
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)((C_word*)t0)[2])[1],C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k3500 in k3480 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3502(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5786,17 +5804,17 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3502,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[246],t1);
t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,lf[241],t3);
+t4=(C_word)C_a_i_cons(&a,2,lf[247],t3);
t5=(C_word)C_a_i_cons(&a,2,t4,((C_word*)((C_word*)t0)[3])[1]);
t6=C_mutate(((C_word *)((C_word*)t0)[3])+1,t5);
t7=((C_word*)t0)[2];
-f_2381(t7,t6);}
+f_2402(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){
+/* k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2402(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5805,20 +5823,20 @@ C_word t5;
C_word t6;
C_word t7;
C_word t8;
-C_word ab[28],*a=ab;
+C_word ab[29],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2381,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_2402,NULL,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|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]);}
+t6=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_2405,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[13],a[12]=((C_word*)t0)[14],a[13]=((C_word*)t0)[15],a[14]=((C_word*)t0)[16],a[15]=((C_word*)t0)[17],a[16]=((C_word*)t0)[18],a[17]=((C_word*)t0)[19],a[18]=((C_word*)t0)[20],a[19]=((C_word*)t0)[21],tmp=(C_word)a,a+=20,tmp);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3440,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 432 append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),t7,((C_word*)((C_word*)t0)[3])[1],((C_word*)((C_word*)t0)[2])[1]);}
-/* 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){
+/* k3438 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3440(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5826,15 +5844,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3440,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3402,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3442,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_3402(t5,((C_word*)t0)[2],t1);}
+f_3442(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){
+/* loop968 in k3438 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3442(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5843,12 +5861,12 @@ 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);}
+C_save_and_reclaim((void*)trf_3442,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=C_retrieve(lf[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);
+t3=C_retrieve(lf[245]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3471,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
-C_trace("g981982");
+/* g984985 */
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -5856,8 +5874,8 @@ 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){
+/* k3469 in loop968 in k3438 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3471(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5869,37 +5887,37 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3471,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop965978");
+/* loop968981 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_3402(t6,((C_word*)t0)[3],t5);}
+f_3442(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop965978");
+/* loop968981 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_3402(t6,((C_word*)t0)[3],t5);}}
+f_3442(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){
+/* k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2405(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[20],*a=ab;
+C_word ab[21],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2405,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_2408,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],tmp=(C_word)a,a+=21,tmp);
+/* batch-driver.scm: 433 gensym */
+((C_proc2)C_retrieve_symbol_proc(lf[244]))(2,*((C_word*)lf[244]+1),t2);}
-/* 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){
+/* k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2408(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5912,24 +5930,24 @@ C_word t9;
C_word t10;
C_word t11;
C_word t12;
-C_word ab[36],*a=ab;
+C_word ab[37],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2408,2,t0,t1);}
+t2=(C_word)C_i_length(C_retrieve(lf[89]));
+t3=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2414,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[13],a[11]=((C_word*)t0)[14],a[12]=((C_word*)t0)[15],a[13]=((C_word*)t0)[16],a[14]=((C_word*)t0)[17],a[15]=((C_word*)t0)[18],a[16]=((C_word*)t0)[19],a[17]=((C_word*)t0)[20],tmp=(C_word)a,a+=18,tmp);
t4=C_SCHEME_END_OF_LIST;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_FALSE;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);
+t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3180,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[13],a[6]=((C_word*)t0)[4],a[7]=t3,tmp=(C_word)a,a+=8,tmp);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3334,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3374,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
t12=((C_word*)t10)[1];
-f_3334(t12,t8,C_retrieve(lf[237]));}
+f_3374(t12,t8,C_retrieve(lf[243]));}
-/* 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){
+/* loop994 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3374(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5954,22 +5972,22 @@ 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);}
+C_save_and_reclaim((void*)trf_3374,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
t3=(C_word)C_slot(t2,C_fix(0));
t4=(C_word)C_i_cdr(t3);
t5=(C_word)C_i_car(t3);
t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
-t7=(C_word)C_a_i_cons(&a,2,lf[229],t6);
+t7=(C_word)C_a_i_cons(&a,2,lf[235],t6);
t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
t9=(C_word)C_a_i_cons(&a,2,t4,t8);
-t10=(C_word)C_a_i_cons(&a,2,lf[234],t9);
+t10=(C_word)C_a_i_cons(&a,2,lf[240],t9);
t11=(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
t12=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11);
t13=C_mutate(((C_word *)((C_word*)t0)[4])+1,t11);
t14=(C_word)C_slot(t2,C_fix(1));
-C_trace("loop9911004");
+/* loop9941007 */
t20=t1;
t21=t14;
t1=t20;
@@ -5979,7 +5997,7 @@ 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");
+/* loop9941007 */
t20=t1;
t21=t14;
t1=t20;
@@ -5990,8 +6008,8 @@ 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){
+/* k3178 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3180(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6004,20 +6022,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3180,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3184,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3290,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3330,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
-f_3290(t10,t6,C_retrieve(lf[236]));}
+f_3330(t10,t6,C_retrieve(lf[242]));}
-/* 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){
+/* loop1022 in k3178 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3330(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6037,17 +6055,17 @@ 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);}
+C_save_and_reclaim((void*)trf_3330,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
t3=(C_word)C_slot(t2,C_fix(0));
t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
-t5=(C_word)C_a_i_cons(&a,2,lf[235],t4);
+t5=(C_word)C_a_i_cons(&a,2,lf[241],t4);
t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
t7=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
t9=(C_word)C_slot(t2,C_fix(1));
-C_trace("loop10191032");
+/* loop10221035 */
t15=t1;
t16=t9;
t1=t15;
@@ -6057,7 +6075,7 @@ 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");
+/* loop10221035 */
t15=t1;
t16=t9;
t1=t15;
@@ -6068,8 +6086,8 @@ 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){
+/* k3182 in k3178 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3184(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6085,27 +6103,27 @@ 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]))){
+C_save_and_reclaim((void*)tr2,(void*)f_3184,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3188,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t1,a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
+if(C_truep(C_retrieve(lf[238]))){
t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
-t4=(C_word)C_a_i_cons(&a,2,lf[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);
+t4=(C_word)C_a_i_cons(&a,2,lf[235],t3);
+t5=(C_truep(C_retrieve(lf[217]))?(C_word)C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST):(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST));
+t6=(C_word)C_a_i_cons(&a,2,lf[235],t5);
t7=(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
t8=(C_word)C_a_i_cons(&a,2,t4,t7);
-t9=(C_word)C_a_i_cons(&a,2,lf[233],t8);
+t9=(C_word)C_a_i_cons(&a,2,lf[239],t8);
t10=(C_word)C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
-t11=(C_word)C_a_i_cons(&a,2,C_retrieve(lf[230]),t10);
-t12=(C_word)C_a_i_cons(&a,2,lf[234],t11);
+t11=(C_word)C_a_i_cons(&a,2,C_retrieve(lf[236]),t10);
+t12=(C_word)C_a_i_cons(&a,2,lf[240],t11);
t13=t2;
-f_3148(t13,(C_word)C_a_i_cons(&a,2,t12,C_SCHEME_END_OF_LIST));}
+f_3188(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);}}
+f_3188(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){
+/* k3186 in k3182 in k3178 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3188(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6118,20 +6136,20 @@ 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);}
+C_save_and_reclaim((void*)trf_3188,NULL,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3192,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3167,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3207,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
-f_3167(t10,t6,C_retrieve(lf[88]));}
+f_3207(t10,t6,C_retrieve(lf[89]));}
-/* 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){
+/* loop1054 in k3186 in k3182 in k3178 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3207(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6159,25 +6177,25 @@ 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);}
+C_save_and_reclaim((void*)trf_3207,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
t3=(C_word)C_slot(t2,C_fix(0));
t4=(C_word)C_i_car(t3);
t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
-t6=(C_word)C_a_i_cons(&a,2,lf[229],t5);
+t6=(C_word)C_a_i_cons(&a,2,lf[235],t5);
t7=(C_word)C_i_cdr(t3);
t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
-t9=(C_word)C_a_i_cons(&a,2,lf[229],t8);
+t9=(C_word)C_a_i_cons(&a,2,lf[235],t8);
t10=(C_word)C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
t11=(C_word)C_a_i_cons(&a,2,t6,t10);
-t12=(C_word)C_a_i_cons(&a,2,C_retrieve(lf[230]),t11);
-t13=(C_word)C_a_i_cons(&a,2,lf[231],t12);
+t12=(C_word)C_a_i_cons(&a,2,C_retrieve(lf[236]),t11);
+t13=(C_word)C_a_i_cons(&a,2,lf[237],t12);
t14=(C_word)C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
t15=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t14);
t16=C_mutate(((C_word *)((C_word*)t0)[4])+1,t14);
t17=(C_word)C_slot(t2,C_fix(1));
-C_trace("loop10511064");
+/* loop10541067 */
t23=t1;
t24=t17;
t1=t23;
@@ -6187,7 +6205,7 @@ 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");
+/* loop10541067 */
t23=t1;
t24=t17;
t1=t23;
@@ -6198,50 +6216,50 @@ 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){
+/* k3190 in k3186 in k3182 in k3178 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3192(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=C_retrieve(lf[211]);
+t2=C_retrieve(lf[217]);
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]);}
+/* batch-driver.scm: 435 append */
+((C_proc9)C_retrieve_proc(*((C_word*)lf[231]+1)))(9,*((C_word*)lf[231]+1),((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],t1,((C_word*)t0)[4],C_SCHEME_END_OF_LIST,lf[232]);}
else{
if(C_truep(((C_word*)t0)[3])){
-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]);}
+/* batch-driver.scm: 435 append */
+((C_proc9)C_retrieve_proc(*((C_word*)lf[231]+1)))(9,*((C_word*)lf[231]+1),((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],t1,((C_word*)t0)[4],C_SCHEME_END_OF_LIST,lf[233]);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
-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]);}}}
+/* batch-driver.scm: 435 append */
+((C_proc9)C_retrieve_proc(*((C_word*)lf[231]+1)))(9,*((C_word*)lf[231]+1),((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],t1,((C_word*)t0)[4],t3,lf[234]);}}}
-/* 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){
+/* k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2414(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
-C_word ab[23],*a=ab;
+C_word ab[24],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2393,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_2414,2,t0,t1);}
t2=t1;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|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]);}
+t4=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2417,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],tmp=(C_word)a,a+=19,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3119,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_pairp(C_retrieve(lf[228])))){
+/* batch-driver.scm: 457 debugging */
+((C_proc4)C_retrieve_symbol_proc(lf[104]))(4,*((C_word*)lf[104]+1),t5,lf[229],lf[230]);}
else{
t6=t5;
-f_3079(2,t6,C_SCHEME_FALSE);}}
+f_3119(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){
+/* k3117 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3119(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6249,19 +6267,19 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3119,2,t0,t1);}
if(C_truep(t1)){
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3084,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3124,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_3084(t5,((C_word*)t0)[2],C_retrieve(lf[222]));}
+f_3124(t5,((C_word*)t0)[2],C_retrieve(lf[228]));}
else{
t2=((C_word*)t0)[2];
-f_2396(2,t2,C_SCHEME_UNDEFINED);}}
+f_2417(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){
+/* loop1088 in k3117 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3124(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6271,259 +6289,259 @@ 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);}
+C_save_and_reclaim((void*)trf_3124,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3119,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3159,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t4=(C_word)C_slot(t2,C_fix(0));
-t5=*((C_word*)lf[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);}
+t5=*((C_word*)lf[32]+1);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3136,a[2]=t4,a[3]=t5,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* display */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t6,lf[227],t5);}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k3134 in loop1088 in k3117 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3136(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_3136,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3139,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
t3=(C_word)C_i_car(((C_word*)t0)[2]);
-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]);}
+/* display */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+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){
+/* k3137 in k3134 in loop1088 in k3117 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3139(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3139,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3142,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* display */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t2,lf[226],((C_word*)t0)[3]);}
-/* 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){
+/* k3140 in k3137 in k3134 in loop1088 in k3117 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3142(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_3142,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3145,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t3=(C_word)C_i_cdr(((C_word*)t0)[2]);
-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]);}
+/* display */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+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){
+/* k3143 in k3140 in k3137 in k3134 in loop1088 in k3117 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3145(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("write-char/port");
-t2=C_retrieve(lf[33]);
+/* write-char/port */
+t2=C_retrieve(lf[34]);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],C_make_character(10),((C_word*)t0)[2]);}
-/* 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){
+/* k3157 in loop1088 in k3117 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3159(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
t3=((C_word*)((C_word*)t0)[3])[1];
-f_3084(t3,((C_word*)t0)[2],t2);}
+f_3124(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){
+/* k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2417(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[21],*a=ab;
+C_word ab[22],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2417,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2420,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],tmp=(C_word)a,a+=19,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3113,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 461 debugging */
+((C_proc4)C_retrieve_symbol_proc(lf[104]))(4,*((C_word*)lf[104]+1),t3,lf[224],lf[225]);}
-/* 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){
+/* k3111 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3113(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
-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]);}
+/* batch-driver.scm: 462 display-real-name-table */
+((C_proc2)C_retrieve_symbol_proc(lf[223]))(2,*((C_word*)lf[223]+1),((C_word*)t0)[2]);}
else{
t2=((C_word*)t0)[2];
-f_2399(2,t2,C_SCHEME_UNDEFINED);}}
+f_2420(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){
+/* k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2420(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[21],*a=ab;
+C_word ab[22],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2420,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2423,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],tmp=(C_word)a,a+=19,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3107,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 463 debugging */
+((C_proc4)C_retrieve_symbol_proc(lf[104]))(4,*((C_word*)lf[104]+1),t3,lf[221],lf[222]);}
-/* 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){
+/* k3105 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3107(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
-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]);}
+/* batch-driver.scm: 464 display-line-number-database */
+((C_proc2)C_retrieve_symbol_proc(lf[220]))(2,*((C_word*)lf[220]+1),((C_word*)t0)[2]);}
else{
t2=((C_word*)t0)[2];
-f_2402(2,t2,C_SCHEME_UNDEFINED);}}
+f_2423(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){
+/* k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2423(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[18],*a=ab;
+C_word ab[19],*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]));}
+C_save_and_reclaim((void*)tr2,(void*)f_2423,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2426,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],tmp=(C_word)a,a+=19,tmp);
+if(C_truep(C_retrieve(lf[217]))){
+if(C_truep(((C_word*)t0)[11])){
+/* batch-driver.scm: 467 compiler-warning */
+((C_proc5)C_retrieve_symbol_proc(lf[212]))(5,*((C_word*)lf[212]+1),t2,lf[218],lf[219],C_retrieve(lf[217]));}
else{
t3=t2;
-f_2405(2,t3,C_SCHEME_UNDEFINED);}}
+f_2426(2,t3,C_SCHEME_UNDEFINED);}}
else{
t3=t2;
-f_2405(2,t3,C_SCHEME_UNDEFINED);}}
+f_2426(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){
+/* k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2426(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[21],*a=ab;
+C_word ab[22],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2426,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2429,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],tmp=(C_word)a,a+=19,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3092,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_retrieve(lf[159]))){
+/* batch-driver.scm: 469 feature? */
+((C_proc3)C_retrieve_symbol_proc(lf[215]))(3,*((C_word*)lf[215]+1),t3,lf[216]);}
else{
t4=t2;
-f_2408(2,t4,C_SCHEME_UNDEFINED);}}
+f_2429(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){
+/* k3090 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3092(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
-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]);}
+/* batch-driver.scm: 470 compiler-warning */
+((C_proc4)C_retrieve_symbol_proc(lf[212]))(4,*((C_word*)lf[212]+1),((C_word*)t0)[2],lf[213],lf[214]);}
else{
t2=((C_word*)t0)[2];
-f_2408(2,t2,C_SCHEME_UNDEFINED);}}
+f_2429(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){
+/* k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2429(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[18],*a=ab;
+C_word ab[19],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2429,2,t0,t1);}
+t2=C_mutate((C_word*)lf[48]+1 /* (set! line-number-database ...) */,C_retrieve(lf[90]));
+t3=C_set_block_item(lf[90] /* line-number-database-2 */,0,C_SCHEME_FALSE);
+t4=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2434,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],tmp=(C_word)a,a+=19,tmp);
+/* batch-driver.scm: 477 end-time */
+t5=((C_word*)((C_word*)t0)[17])[1];
+f_1947(t5,t4,lf[211]);}
-/* 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){
+/* k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2434(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[17],*a=ab;
+C_word ab[18],*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");
+C_save_and_reclaim((void*)tr2,(void*)f_2434,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2437,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],tmp=(C_word)a,a+=18,tmp);
+/* batch-driver.scm: 478 print-expr */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_1717(t3,t2,lf[203],lf[204],((C_word*)((C_word*)t0)[3])[1]);}
+f_1730(t3,t2,lf[209],lf[210],((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){
+/* k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2437(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[17],*a=ab;
+C_word ab[18],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2437,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2440,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],tmp=(C_word)a,a+=18,tmp);
+if(C_truep((C_word)C_i_memq(lf[208],((C_word*)t0)[3]))){
+/* batch-driver.scm: 480 exit */
+((C_proc2)C_retrieve_symbol_proc(lf[124]))(2,*((C_word*)lf[124]+1),t2);}
else{
t3=t2;
-f_2419(2,t3,C_SCHEME_UNDEFINED);}}
+f_2440(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){
+/* k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2440(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[17],*a=ab;
+C_word ab[18],*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_save_and_reclaim((void*)tr2,(void*)f_2440,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2443,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],tmp=(C_word)a,a+=18,tmp);
+/* batch-driver.scm: 482 user-pass */
((C_proc2)C_retrieve_symbol_proc(lf[5]))(2,*((C_word*)lf[5]+1),t2);}
-/* 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){
+/* k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2443(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[24],*a=ab;
+C_word ab[25],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2443,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2446,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],tmp=(C_word)a,a+=18,tmp);
if(C_truep(t1)){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);}
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3038,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[16],a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[17],tmp=(C_word)a,a+=7,tmp);
+/* batch-driver.scm: 484 dribble */
+t4=((C_word*)((C_word*)t0)[13])[1];
+f_1645(t4,t3,lf[207],C_SCHEME_END_OF_LIST);}
else{
t3=t2;
-f_2425(2,t3,C_SCHEME_UNDEFINED);}}
+f_2446(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){
+/* k3036 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3038(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6537,21 +6555,21 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_3038,2,t0,t1);}
+t2=f_1937(((C_word*)((C_word*)t0)[6])[1]);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3045,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3010,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t9,a[5]=t6,tmp=(C_word)a,a+=6,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3050,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t9,a[5]=t6,tmp=(C_word)a,a+=6,tmp));
t11=((C_word*)t9)[1];
-f_3010(t11,t7,((C_word*)((C_word*)t0)[5])[1]);}
+f_3050(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){
+/* loop1126 in k3036 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_3050(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6559,11 +6577,11 @@ 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);}
+C_save_and_reclaim((void*)trf_3050,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3079,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
t4=(C_word)C_slot(t2,C_fix(0));
-C_trace("g11391140");
+/* g11421143 */
t5=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t5))(3,t5,t3,t4);}
else{
@@ -6571,8 +6589,8 @@ 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){
+/* k3077 in loop1126 in k3036 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3079(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6584,58 +6602,58 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3079,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop11231136");
+/* loop11261139 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_3010(t6,((C_word*)t0)[3],t5);}
+f_3050(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop11231136");
+/* loop11261139 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_3010(t6,((C_word*)t0)[3],t5);}}
+f_3050(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){
+/* k3043 in k3036 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3045(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,t1);
-C_trace("batch-driver.scm: 482 end-time");
+/* batch-driver.scm: 487 end-time */
t3=((C_word*)((C_word*)t0)[3])[1];
-f_1926(t3,((C_word*)t0)[2],lf[200]);}
+f_1947(t3,((C_word*)t0)[2],lf[206]);}
-/* 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){
+/* k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2446(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[19],*a=ab;
+C_word ab[20],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2446,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_3031,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],tmp=(C_word)a,a+=17,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3035,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 492 canonicalize-begin-body */
+((C_proc3)C_retrieve_symbol_proc(lf[205]))(3,*((C_word*)lf[205]+1),t3,((C_word*)((C_word*)t0)[2])[1]);}
-/* 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){
+/* k3033 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3035(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 491 build-node-graph */
+((C_proc3)C_retrieve_symbol_proc(lf[204]))(3,*((C_word*)lf[204]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3031(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6643,54 +6661,54 @@ C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[28],*a=ab;
+C_word ab[29],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2991,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_3031,2,t0,t1);}
t2=(C_word)C_a_i_list(&a,1,t1);
-t3=(C_word)C_a_i_record(&a,4,lf[90],lf[91],lf[92],t2);
+t3=(C_word)C_a_i_record(&a,4,lf[91],lf[92],lf[93],t2);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|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);}
+t6=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2457,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[9],a[12]=((C_word*)t0)[10],a[13]=((C_word*)t0)[11],a[14]=((C_word*)t0)[12],a[15]=((C_word*)t0)[13],a[16]=((C_word*)t0)[14],a[17]=((C_word*)t0)[15],a[18]=((C_word*)t0)[16],tmp=(C_word)a,a+=19,tmp);
+/* batch-driver.scm: 495 print-node */
+t7=((C_word*)((C_word*)t0)[13])[1];
+f_1684(t7,t6,lf[202],lf[203],t3);}
-/* 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){
+/* k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2457(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[18],*a=ab;
+C_word ab[19],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2457,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2460,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],tmp=(C_word)a,a+=19,tmp);
+/* batch-driver.scm: 496 initialize-analysis-database */
+((C_proc2)C_retrieve_symbol_proc(lf[201]))(2,*((C_word*)lf[201]+1),t2);}
-/* 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){
+/* k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2460(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[27],*a=ab;
+C_word ab[28],*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]))){
+C_save_and_reclaim((void*)tr2,(void*)f_2460,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2463,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],tmp=(C_word)a,a+=18,tmp);
+if(C_truep(C_retrieve(lf[185]))){
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2977,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[16],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[17],a[7]=t2,a[8]=((C_word*)t0)[3],a[9]=((C_word*)t0)[18],tmp=(C_word)a,a+=10,tmp);
+if(C_truep((C_word)C_i_memq(lf[199],((C_word*)t0)[2]))){
t4=t3;
-f_2937(2,t4,C_SCHEME_UNDEFINED);}
+f_2977(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]);}}
+/* batch-driver.scm: 501 load-type-database */
+((C_proc3)C_retrieve_symbol_proc(lf[196]))(3,*((C_word*)lf[196]+1),t3,lf[200]);}}
else{
t3=t2;
-f_2442(t3,C_SCHEME_UNDEFINED);}}
+f_2463(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){
+/* k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2977(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6698,39 +6716,39 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_2977,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2980,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3009,tmp=(C_word)a,a+=2,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3017,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 502 collect-options */
t5=((C_word*)((C_word*)t0)[2])[1];
-f_1881(t5,t4,lf[192]);}
+f_1902(t5,t4,lf[198]);}
-/* 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){
+/* k3015 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3017(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("for-each");
-t2=*((C_word*)lf[191]+1);
+/* for-each */
+t2=*((C_word*)lf[197]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* a3008 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3009(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_2969,3,t0,t1,t2);}
-t3=C_retrieve(lf[190]);
-C_trace("g11711172");
+C_save_and_reclaim((void*)tr3,(void*)f_3009,3,t0,t1,t2);}
+t3=C_retrieve(lf[196]);
+/* g11741175 */
t4=t3;
((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,C_SCHEME_FALSE);}
-/* 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){
+/* k2978 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2980(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6738,93 +6756,93 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_2980,2,t0,t1);}
+t2=f_1937(((C_word*)((C_word*)t0)[8])[1]);
+t3=C_set_block_item(lf[96] /* first-analysis */,0,C_SCHEME_FALSE);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2988,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+/* batch-driver.scm: 505 analyze */
t5=((C_word*)((C_word*)t0)[2])[1];
-f_1961(t5,t4,lf[189],((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}
+f_1982(t5,t4,lf[195],((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){
+/* k2986 in k2978 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2988(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2948,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_2988,2,t0,t1);}
t2=C_mutate(((C_word *)((C_word*)t0)[7])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2991,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+/* batch-driver.scm: 506 print-db */
t4=((C_word*)((C_word*)t0)[2])[1];
-f_1693(t4,t3,lf[188],lf[182],((C_word*)((C_word*)t0)[7])[1],C_fix(0));}
+f_1706(t4,t3,lf[194],lf[188],((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){
+/* k2989 in k2986 in k2978 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2991(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_2991,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2994,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+/* batch-driver.scm: 507 end-time */
t3=((C_word*)((C_word*)t0)[4])[1];
-f_1926(t3,t2,lf[187]);}
+f_1947(t3,t2,lf[193]);}
-/* 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){
+/* k2992 in k2989 in k2986 in k2978 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2994(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2994,2,t0,t1);}
+t2=f_1937(((C_word*)((C_word*)t0)[6])[1]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3000,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* batch-driver.scm: 509 debugging */
+((C_proc4)C_retrieve_symbol_proc(lf[104]))(4,*((C_word*)lf[104]+1),t3,lf[105],lf[192]);}
-/* 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){
+/* k2998 in k2992 in k2989 in k2986 in k2978 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3000(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3000,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3003,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 510 scrutinize */
+((C_proc4)C_retrieve_symbol_proc(lf[191]))(4,*((C_word*)lf[191]+1),t2,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}
-/* 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){
+/* k3001 in k2998 in k2992 in k2989 in k2986 in k2978 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3003(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3003,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3006,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 511 end-time */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_1926(t3,t2,lf[184]);}
+f_1947(t3,t2,lf[190]);}
-/* 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){
+/* k3004 in k3001 in k2998 in k2992 in k2989 in k2986 in k2978 in k2975 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_3006(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_set_block_item(lf[95] /* first-analysis */,0,C_SCHEME_TRUE);
+t2=C_set_block_item(lf[96] /* first-analysis */,0,C_SCHEME_TRUE);
t3=((C_word*)t0)[2];
-f_2442(t3,t2);}
+f_2463(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){
+/* k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2463(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6832,150 +6850,150 @@ C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[30],*a=ab;
+C_word ab[31],*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]))){
+C_save_and_reclaim((void*)trf_2463,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2466,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],tmp=(C_word)a,a+=17,tmp);
+if(C_truep(C_retrieve(lf[180]))){
+t3=f_1937(((C_word*)((C_word*)t0)[17])[1]);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2950,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[16],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[14],a[6]=t2,a[7]=((C_word*)t0)[17],tmp=(C_word)a,a+=8,tmp);
+if(C_truep(C_retrieve(lf[185]))){
t5=t4;
-f_2910(2,t5,C_SCHEME_UNDEFINED);}
+f_2950(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);}}
+t5=C_set_block_item(lf[96] /* first-analysis */,0,C_SCHEME_FALSE);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2968,a[2]=((C_word*)t0)[6],a[3]=t4,a[4]=((C_word*)t0)[16],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
+/* batch-driver.scm: 518 analyze */
+t7=((C_word*)((C_word*)t0)[15])[1];
+f_1982(t7,t6,lf[189],((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}}
else{
t3=t2;
-f_2445(t3,C_SCHEME_UNDEFINED);}}
+f_2466(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){
+/* k2966 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2968(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2928,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_2968,2,t0,t1);}
t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2971,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 519 print-db */
t4=((C_word*)((C_word*)t0)[2])[1];
-f_1693(t4,t3,lf[181],lf[182],((C_word*)((C_word*)t0)[5])[1],C_fix(0));}
+f_1706(t4,t3,lf[187],lf[188],((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){
+/* k2969 in k2966 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2971(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("batch-driver.scm: 515 end-time");
+/* batch-driver.scm: 520 end-time */
t2=((C_word*)((C_word*)t0)[3])[1];
-f_1926(t2,((C_word*)t0)[2],lf[180]);}
+f_1947(t2,((C_word*)t0)[2],lf[186]);}
-/* 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){
+/* k2948 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2950(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2950,2,t0,t1);}
+t2=f_1937(((C_word*)((C_word*)t0)[7])[1]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2956,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+/* batch-driver.scm: 522 perform-lambda-lifting! */
+((C_proc4)C_retrieve_symbol_proc(lf[184]))(4,*((C_word*)lf[184]+1),t3,((C_word*)t0)[4],((C_word*)((C_word*)t0)[2])[1]);}
-/* 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){
+/* k2954 in k2948 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2956(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_2956,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2959,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 523 end-time */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_1926(t3,t2,lf[177]);}
+f_1947(t3,t2,lf[183]);}
-/* 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){
+/* k2957 in k2954 in k2948 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2959(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_2959,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2962,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 524 print-node */
t3=((C_word*)((C_word*)t0)[3])[1];
-f_1671(t3,t2,lf[175],lf[176],((C_word*)t0)[2]);}
+f_1684(t3,t2,lf[181],lf[182],((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){
+/* k2960 in k2957 in k2954 in k2948 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2962(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_set_block_item(lf[95] /* first-analysis */,0,C_SCHEME_TRUE);
+t2=C_set_block_item(lf[96] /* first-analysis */,0,C_SCHEME_TRUE);
t3=((C_word*)t0)[2];
-f_2445(t3,t2);}
+f_2466(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){
+/* k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2466(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[19],*a=ab;
+C_word ab[20],*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]));}
+C_save_and_reclaim((void*)trf_2466,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2469,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],tmp=(C_word)a,a+=17,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2944,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 527 vector->list */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[178]+1)))(3,*((C_word*)lf[178]+1),t3,C_retrieve(lf[179]));}
-/* 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){
+/* k2942 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2944(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 527 concatenate */
+((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+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){
+/* k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2469(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[21],*a=ab;
+C_word ab[22],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2469,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2472,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],tmp=(C_word)a,a+=18,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2937,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 528 debugging */
+((C_proc4)C_retrieve_symbol_proc(lf[104]))(4,*((C_word*)lf[104]+1),t3,lf[176],lf[177]);}
-/* 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){
+/* k2935 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2937(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
-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]);}
+/* batch-driver.scm: 529 pp */
+((C_proc3)C_retrieve_symbol_proc(lf[175]))(3,*((C_word*)lf[175]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
else{
t2=((C_word*)t0)[3];
-f_2451(2,t2,C_SCHEME_UNDEFINED);}}
+f_2472(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){
+/* k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2472(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6988,28 +7006,28 @@ C_word t9;
C_word t10;
C_word t11;
C_word t12;
-C_word ab[34],*a=ab;
+C_word ab[35],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2472,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2475,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],tmp=(C_word)a,a+=17,tmp);
+if(C_truep(C_retrieve(lf[166]))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2844,a[2]=t2,a[3]=((C_word*)t0)[13],tmp=(C_word)a,a+=4,tmp);
t4=C_SCHEME_END_OF_LIST;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_FALSE;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2859,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2899,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2861,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2901,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
t12=((C_word*)t10)[1];
-f_2861(t12,t8,((C_word*)t0)[2]);}
+f_2901(t12,t8,((C_word*)t0)[2]);}
else{
t3=t2;
-f_2454(2,t3,C_SCHEME_UNDEFINED);}}
+f_2475(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){
+/* loop1226 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2901(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7018,12 +7036,12 @@ 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);}
+C_save_and_reclaim((void*)trf_2901,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[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);
+t3=*((C_word*)lf[174]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2930,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
-C_trace("g12391240");
+/* g12421243 */
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -7031,8 +7049,8 @@ 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){
+/* k2928 in loop1226 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2930(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7044,33 +7062,33 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2930,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop12231236");
+/* loop12261239 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_2861(t6,((C_word*)t0)[3],t5);}
+f_2901(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop12231236");
+/* loop12261239 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_2861(t6,((C_word*)t0)[3],t5);}}
+f_2901(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){
+/* k2897 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2899(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 539 concatenate */
+((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+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){
+/* k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2844(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7078,15 +7096,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2844,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2806,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2846,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
-f_2806(t5,((C_word*)t0)[2],t1);}
+f_2846(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){
+/* loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2846(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7095,31 +7113,31 @@ 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);}
+C_save_and_reclaim((void*)trf_2846,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2854,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2884,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
-C_trace("g12111212");
+/* g12141215 */
t6=t3;
-f_2814(t6,t4,t5);}
+f_2854(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){
+/* k2882 in loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2884(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
t3=((C_word*)((C_word*)t0)[3])[1];
-f_2806(t3,((C_word*)t0)[2],t2);}
+f_2846(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){
+/* g1214 in loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2854(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7127,85 +7145,85 @@ 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);}
+C_save_and_reclaim((void*)trf_2854,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2858,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2877,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2881,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 534 symbol->string */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[172]+1)))(3,*((C_word*)lf[172]+1),t5,t2);}
-/* 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){
+/* k2879 in g1214 in loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2881(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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]);}
+/* batch-driver.scm: 534 make-pathname */
+((C_proc5)C_retrieve_symbol_proc(lf[170]))(5,*((C_word*)lf[170]+1),((C_word*)t0)[2],C_SCHEME_FALSE,t1,lf[171]);}
-/* 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){
+/* k2875 in g1214 in loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2877(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 533 ##sys#resolve-include-filename */
+((C_proc5)C_retrieve_symbol_proc(lf[169]))(5,*((C_word*)lf[169]+1),((C_word*)t0)[2],t1,C_SCHEME_FALSE,C_SCHEME_TRUE);}
-/* 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){
+/* k2856 in g1214 in loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2858(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2818,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_2858,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2867,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 536 file-exists? */
+((C_proc3)C_retrieve_symbol_proc(lf[168]))(3,*((C_word*)lf[168]+1),t2,t1);}
else{
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-/* 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){
+/* k2865 in k2856 in g1214 in loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2867(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2827,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_2867,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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");
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2870,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 537 dribble */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_1632(t3,t2,lf[161],(C_word)C_a_i_list(&a,1,((C_word*)t0)[3]));}
+f_1645(t3,t2,lf[167],(C_word)C_a_i_list(&a,1,((C_word*)t0)[3]));}
else{
t2=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-/* 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){
+/* k2868 in k2865 in k2856 in g1214 in loop1207 in k2842 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2870(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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]);}
+/* batch-driver.scm: 538 load-inline-file */
+((C_proc3)C_retrieve_symbol_proc(lf[163]))(3,*((C_word*)lf[163]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2475(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[15],*a=ab;
+C_word ab[16],*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");
+C_save_and_reclaim((void*)tr2,(void*)f_2475,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2478,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],tmp=(C_word)a,a+=16,tmp);
+/* batch-driver.scm: 540 collect-options */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_1881(t3,t2,lf[159]);}
+f_1902(t3,t2,lf[165]);}
-/* 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){
+/* k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2478(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7214,24 +7232,24 @@ C_word t5;
C_word t6;
C_word t7;
C_word t8;
-C_word ab[21],*a=ab;
+C_word ab[22],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_2478,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2481,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],tmp=(C_word)a,a+=16,tmp);
if(C_truep((C_word)C_i_nullp(t1))){
t3=t2;
-f_2460(2,t3,C_SCHEME_UNDEFINED);}
+f_2481(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);
+t3=C_set_block_item(lf[161] /* inline-globally */,0,C_SCHEME_TRUE);
+t4=C_set_block_item(lf[162] /* inline-locally */,0,C_SCHEME_TRUE);
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2768,a[2]=t6,a[3]=((C_word*)t0)[10],tmp=(C_word)a,a+=4,tmp));
+t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2808,a[2]=t6,a[3]=((C_word*)t0)[11],tmp=(C_word)a,a+=4,tmp));
t8=((C_word*)t6)[1];
-f_2768(t8,t2,t1);}}
+f_2808(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){
+/* loop1252 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2808(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7240,52 +7258,52 @@ 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);}
+C_save_and_reclaim((void*)trf_2808,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2816,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2826,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
-C_trace("g12561257");
+/* g12591260 */
t6=t3;
-f_2776(t6,t4,t5);}
+f_2816(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){
+/* k2824 in loop1252 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2826(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
t3=((C_word*)((C_word*)t0)[3])[1];
-f_2768(t3,((C_word*)t0)[2],t2);}
+f_2808(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){
+/* g1259 in loop1252 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2816(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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");
+C_save_and_reclaim((void*)trf_2816,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2820,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 546 dribble */
t4=((C_word*)((C_word*)t0)[2])[1];
-f_1632(t4,t3,lf[158],(C_word)C_a_i_list(&a,1,t2));}
+f_1645(t4,t3,lf[164],(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){
+/* k2818 in g1259 in loop1252 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2820(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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]);}
+/* batch-driver.scm: 547 load-inline-file */
+((C_proc3)C_retrieve_symbol_proc(lf[163]))(3,*((C_word*)lf[163]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2481(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7294,332 +7312,390 @@ C_word t5;
C_word t6;
C_word t7;
C_word t8;
-C_word ab[15],*a=ab;
+C_word ab[16],*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]))){
+C_save_and_reclaim((void*)tr2,(void*)f_2481,2,t0,t1);}
+t2=C_set_block_item(lf[48] /* line-number-database */,0,C_SCHEME_FALSE);
+t3=C_set_block_item(lf[94] /* constant-table */,0,C_SCHEME_FALSE);
+t4=C_set_block_item(lf[95] /* inline-table */,0,C_SCHEME_FALSE);
+t5=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2487,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],tmp=(C_word)a,a+=16,tmp);
+if(C_truep(C_retrieve(lf[159]))){
t6=t5;
-f_2466(2,t6,C_SCHEME_UNDEFINED);}
+f_2487(2,t6,C_SCHEME_UNDEFINED);}
else{
t6=(C_word)C_slot(((C_word*)t0)[2],C_fix(3));
t7=(C_word)C_i_car(t6);
-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);}}
+/* batch-driver.scm: 554 scan-toplevel-assignments */
+((C_proc3)C_retrieve_symbol_proc(lf[160]))(3,*((C_word*)lf[160]+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){
+/* k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2487(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[14],*a=ab;
+C_word ab[15],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2487,2,t0,t1);}
+t2=f_1937(((C_word*)((C_word*)t0)[15])[1]);
+t3=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_2493,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],tmp=(C_word)a,a+=15,tmp);
+/* batch-driver.scm: 557 perform-cps-conversion */
+((C_proc3)C_retrieve_symbol_proc(lf[158]))(3,*((C_word*)lf[158]+1),t3,((C_word*)t0)[2]);}
-/* 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){
+/* k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2493(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[15],*a=ab;
+C_word ab[16],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2493,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2496,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],tmp=(C_word)a,a+=16,tmp);
+/* batch-driver.scm: 558 end-time */
+t3=((C_word*)((C_word*)t0)[13])[1];
+f_1947(t3,t2,lf[157]);}
-/* 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){
+/* k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2496(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[15],*a=ab;
+C_word ab[16],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2475,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2496,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2499,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],tmp=(C_word)a,a+=16,tmp);
+/* batch-driver.scm: 559 print-node */
+t3=((C_word*)((C_word*)t0)[12])[1];
+f_1684(t3,t2,lf[155],lf[156],((C_word*)t0)[2]);}
-/* 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){
+/* k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2499(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[16],*a=ab;
+C_word ab[17],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2478,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_2499,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_2504,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[13],a[12]=((C_word*)t0)[14],a[13]=t3,a[14]=((C_word*)t0)[15],tmp=(C_word)a,a+=15,tmp));
t5=((C_word*)t3)[1];
-f_2483(t5,((C_word*)t0)[3],C_fix(1),((C_word*)t0)[2],C_SCHEME_TRUE);}
+f_2504(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){
+/* loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2504(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[24],*a=ab;
+C_word t8;
+C_word ab[27],*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));}
+C_save_and_reclaim((void*)trf_2504,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
+t6=f_1937(((C_word*)((C_word*)t0)[14])[1]);
+t7=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2511,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=t2,a[16]=t5,a[17]=((C_word*)t0)[14],a[18]=t4,tmp=(C_word)a,a+=19,tmp);
+/* batch-driver.scm: 565 analyze */
+t8=((C_word*)((C_word*)t0)[11])[1];
+f_1982(t8,t7,lf[154],((C_word*)t5)[1],(C_word)C_a_i_list(&a,2,t2,t4));}
-/* 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){
+/* k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2511(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[23],*a=ab;
+C_word ab[24],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2511,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_2514,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=t1,a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],tmp=(C_word)a,a+=20,tmp);
+if(C_truep(C_retrieve(lf[96]))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2758,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_memq(lf[152],C_retrieve(lf[36])))){
+/* batch-driver.scm: 568 dump-undefined-globals */
+((C_proc3)C_retrieve_symbol_proc(lf[153]))(3,*((C_word*)lf[153]+1),t3,t1);}
else{
t4=t3;
-f_2718(2,t4,C_SCHEME_UNDEFINED);}}
+f_2758(2,t4,C_SCHEME_UNDEFINED);}}
else{
t3=t2;
-f_2493(2,t3,C_SCHEME_UNDEFINED);}}
+f_2514(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){
+/* k2756 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2758(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2758,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2761,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_memq(lf[150],C_retrieve(lf[36])))){
+/* batch-driver.scm: 570 dump-defined-globals */
+((C_proc3)C_retrieve_symbol_proc(lf[151]))(3,*((C_word*)lf[151]+1),t2,((C_word*)t0)[2]);}
else{
t3=t2;
-f_2721(2,t3,C_SCHEME_UNDEFINED);}}
+f_2761(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){
+/* k2759 in k2756 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2761(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-if(C_truep((C_word)C_i_memq(lf[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]);}
+if(C_truep((C_word)C_i_memq(lf[148],C_retrieve(lf[36])))){
+/* batch-driver.scm: 572 dump-global-refs */
+((C_proc3)C_retrieve_symbol_proc(lf[149]))(3,*((C_word*)lf[149]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[3];
-f_2493(2,t3,t2);}}
+f_2514(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){
+/* k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2514(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[19],*a=ab;
+C_word ab[20],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2514,2,t0,t1);}
+t2=C_set_block_item(lf[96] /* first-analysis */,0,C_SCHEME_FALSE);
+t3=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_2518,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],tmp=(C_word)a,a+=20,tmp);
+/* batch-driver.scm: 574 end-time */
+t4=((C_word*)((C_word*)t0)[13])[1];
+f_1947(t4,t3,lf[147]);}
-/* 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){
+/* k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2518(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[19],*a=ab;
+C_word ab[20],*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");
+C_save_and_reclaim((void*)tr2,(void*)f_2518,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_2521,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],tmp=(C_word)a,a+=20,tmp);
+/* batch-driver.scm: 575 print-db */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_1693(t3,t2,lf[139],lf[140],((C_word*)t0)[15],((C_word*)t0)[14]);}
+f_1706(t3,t2,lf[145],lf[146],((C_word*)t0)[16],((C_word*)t0)[15]);}
-/* 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){
+/* k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2521(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[19],*a=ab;
+C_word ab[20],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2521,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_2524,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],tmp=(C_word)a,a+=20,tmp);
+if(C_truep((C_word)C_i_memq(lf[143],C_retrieve(lf[36])))){
+/* batch-driver.scm: 577 print-program-statistics */
+((C_proc3)C_retrieve_symbol_proc(lf[144]))(3,*((C_word*)lf[144]+1),t2,((C_word*)t0)[16]);}
else{
t3=t2;
-f_2503(2,t3,C_SCHEME_UNDEFINED);}}
+f_2524(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){
+/* k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2524(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[16],*a=ab;
+C_word ab[17],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2524,2,t0,t1);}
+if(C_truep(((C_word*)t0)[19])){
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2530,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[13],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[15],a[8]=((C_word*)t0)[16],a[9]=((C_word*)t0)[17],a[10]=((C_word*)t0)[18],tmp=(C_word)a,a+=11,tmp);
+/* batch-driver.scm: 580 debugging */
+((C_proc5)C_retrieve_symbol_proc(lf[104]))(5,*((C_word*)lf[104]+1),t2,lf[105],lf[110],((C_word*)t0)[15]);}
else{
-t2=(*a=C_CLOSURE_TYPE|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]);}}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2616,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[7],a[11]=((C_word*)t0)[8],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[9],a[14]=((C_word*)t0)[16],a[15]=((C_word*)t0)[17],a[16]=((C_word*)t0)[18],tmp=(C_word)a,a+=17,tmp);
+/* batch-driver.scm: 602 print-node */
+t3=((C_word*)((C_word*)t0)[11])[1];
+f_1684(t3,t2,lf[141],lf[142],((C_word*)((C_word*)t0)[17])[1]);}}
-/* 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){
+/* k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2616(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[24],*a=ab;
+C_word ab[25],*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");
+C_save_and_reclaim((void*)tr2,(void*)f_2616,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2619,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],tmp=(C_word)a,a+=17,tmp);
+if(C_truep(C_retrieve(lf[138]))){
+t3=C_retrieve(lf[138]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2746,a[2]=((C_word*)t0)[14],a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 605 dribble */
t5=((C_word*)((C_word*)t0)[13])[1];
-f_1632(t5,t4,lf[134],(C_word)C_a_i_list(&a,1,t3));}
+f_1645(t5,t4,lf[140],(C_word)C_a_i_list(&a,1,t3));}
else{
t3=t2;
-f_2598(2,t3,C_SCHEME_UNDEFINED);}}
+f_2619(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){
+/* k2744 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2746(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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]);}
+/* batch-driver.scm: 606 emit-global-inline-file */
+((C_proc4)C_retrieve_symbol_proc(lf[139]))(4,*((C_word*)lf[139]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2619(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[15],*a=ab;
+C_word ab[17],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2619,2,t0,t1);}
+t2=f_1937(((C_word*)((C_word*)t0)[16])[1]);
+t3=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2626,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[15],tmp=(C_word)a,a+=17,tmp);
+/* batch-driver.scm: 608 perform-closure-conversion */
+((C_proc4)C_retrieve_symbol_proc(lf[137]))(4,*((C_word*)lf[137]+1),t3,((C_word*)((C_word*)t0)[15])[1],((C_word*)t0)[14]);}
-/* 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){
+/* k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2626(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[16],*a=ab;
+C_word t4;
+C_word ab[17],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2626,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[16])+1,t1);
+t3=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2629,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[15],tmp=(C_word)a,a+=17,tmp);
+/* batch-driver.scm: 609 end-time */
+t4=((C_word*)((C_word*)t0)[12])[1];
+f_1947(t4,t3,lf[136]);}
-/* 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){
+/* k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2629(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[14],*a=ab;
+C_word ab[15],*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");
+C_save_and_reclaim((void*)tr2,(void*)f_2629,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_2632,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[13],a[12]=((C_word*)t0)[14],a[13]=((C_word*)t0)[15],a[14]=((C_word*)t0)[16],tmp=(C_word)a,a+=15,tmp);
+/* batch-driver.scm: 610 print-db */
t3=((C_word*)((C_word*)t0)[3])[1];
-f_1693(t3,t2,lf[128],lf[129],((C_word*)t0)[13],((C_word*)t0)[2]);}
+f_1706(t3,t2,lf[134],lf[135],((C_word*)t0)[14],((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){
+/* k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2632(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[13],*a=ab;
+C_word ab[14],*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]))){
+C_save_and_reclaim((void*)tr2,(void*)f_2632,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_2635,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],tmp=(C_word)a,a+=14,tmp);
+if(C_truep(C_retrieve(lf[132]))){
t3=(C_word)C_fudge(C_fix(6));
t4=(C_word)C_fixnum_difference(t3,((C_word*)((C_word*)t0)[2])[1]);
if(C_truep((C_word)C_fixnum_greaterp(t4,C_fix(60000)))){
-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]);}
+/* batch-driver.scm: 613 display */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[37]+1)))(3,*((C_word*)lf[37]+1),t2,lf[133]);}
else{
t5=t2;
-f_2613(2,t5,C_SCHEME_UNDEFINED);}}
+f_2635(2,t5,C_SCHEME_UNDEFINED);}}
else{
t3=t2;
-f_2613(2,t3,C_SCHEME_UNDEFINED);}}
+f_2635(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){
+/* k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2635(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[12],*a=ab;
+C_word ab[14],*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));}
+C_save_and_reclaim((void*)tr2,(void*)f_2635,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_2638,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
+/* batch-driver.scm: 614 print-node */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_1684(t3,t2,lf[130],lf[131],((C_word*)((C_word*)t0)[12])[1]);}
+
+/* k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2638(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[19],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2638,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_2641,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[13],tmp=(C_word)a,a+=12,tmp);
+if(C_truep(((C_word*)t0)[3])){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2714,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[12],a[4]=t2,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
+/* batch-driver.scm: 616 debugging */
+((C_proc4)C_retrieve_symbol_proc(lf[104]))(4,*((C_word*)lf[104]+1),t3,lf[105],lf[129]);}
else{
t3=t2;
-f_2616(2,t3,C_SCHEME_UNDEFINED);}}
+f_2641(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){
+/* k2712 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2714(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[11],*a=ab;
+C_word t4;
+C_word ab[6],*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");
+C_save_and_reclaim((void*)tr2,(void*)f_2714,2,t0,t1);}
+t2=f_1937(((C_word*)((C_word*)t0)[6])[1]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2720,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* batch-driver.scm: 618 perform-unboxing! */
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t3,((C_word*)((C_word*)t0)[3])[1]);}
+
+/* k2718 in k2712 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2720(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2720,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2723,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 619 end-time */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_1671(t3,t2,lf[123],lf[124],((C_word*)t0)[10]);}
+f_1947(t3,t2,lf[127]);}
-/* 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){
+/* k2721 in k2718 in k2712 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2723(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* batch-driver.scm: 620 print-node */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_1684(t2,((C_word*)t0)[3],lf[125],lf[126],((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2641(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2641,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2644,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
+if(C_truep(((C_word*)t0)[2])){
+/* batch-driver.scm: 621 exit */
+((C_proc3)C_retrieve_symbol_proc(lf[124]))(3,*((C_word*)lf[124]+1),t2,C_fix(0));}
+else{
+t3=t2;
+f_2644(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2644(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7627,101 +7703,101 @@ 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_save_and_reclaim((void*)tr2,(void*)f_2644,2,t0,t1);}
+t2=f_1937(((C_word*)((C_word*)t0)[10])[1]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2652,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2658,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
+/* ##sys#call-with-values */
C_call_with_values(4,0,((C_word*)t0)[2],t3,t4);}
-/* 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){
+/* a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2658(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word ab[13],*a=ab;
if(c!=6) C_bad_argc_2(c,6,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_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");
+C_save_and_reclaim((void*)tr6,(void*)f_2658,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_2662,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t5,a[6]=t4,a[7]=t3,a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=t1,a[11]=((C_word*)t0)[7],a[12]=((C_word*)t0)[8],tmp=(C_word)a,a+=13,tmp);
+/* batch-driver.scm: 626 end-time */
t7=((C_word*)((C_word*)t0)[6])[1];
-f_1926(t7,t6,lf[122]);}
+f_1947(t7,t6,lf[123]);}
-/* 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){
+/* k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2662(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_2662,2,t0,t1);}
+t2=f_1937(((C_word*)((C_word*)t0)[12])[1]);
+t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_2668,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
if(C_truep(((C_word*)t0)[8])){
-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]);}
+/* batch-driver.scm: 628 open-output-file */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[121]+1)))(3,*((C_word*)lf[121]+1),t3,((C_word*)t0)[8]);}
else{
-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);}}
+/* batch-driver.scm: 628 current-output-port */
+((C_proc2)C_retrieve_proc(*((C_word*)lf[122]+1)))(2,*((C_word*)lf[122]+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){
+/* k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2668(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[16],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_2668,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_2671,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
+/* batch-driver.scm: 629 dribble */
t3=((C_word*)((C_word*)t0)[11])[1];
-f_1632(t3,t2,lf[119],(C_word)C_a_i_list(&a,1,((C_word*)t0)[8]));}
+f_1645(t3,t2,lf[120],(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){
+/* k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2671(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2671,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2674,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
+/* batch-driver.scm: 630 generate-code */
+((C_proc9)C_retrieve_symbol_proc(lf[119]))(9,*((C_word*)lf[119]+1),t2,((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[8],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k2672 in k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2674(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_2674,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2677,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
if(C_truep(((C_word*)t0)[3])){
-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]);}
+/* batch-driver.scm: 631 close-output-port */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[118]+1)))(3,*((C_word*)lf[118]+1),t2,((C_word*)t0)[2]);}
else{
t3=t2;
-f_2652(2,t3,C_SCHEME_UNDEFINED);}}
+f_2677(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){
+/* k2675 in k2672 in k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2677(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_2677,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2680,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 632 end-time */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_1926(t3,t2,lf[116]);}
+f_1947(t3,t2,lf[117]);}
-/* 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){
+/* k2678 in k2675 in k2672 in k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2680(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7729,69 +7805,69 @@ 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_save_and_reclaim((void*)tr2,(void*)f_2680,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2683,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_memq(lf[114],C_retrieve(lf[36])))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2699,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 634 ##sys#stop-timer */
+t4=*((C_word*)lf[116]+1);
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)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);}}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f5154,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 635 compiler-cleanup-hook */
+((C_proc2)C_retrieve_symbol_proc(lf[113]))(2,*((C_word*)lf[113]+1),t3);}}
-/* 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){
+/* f5154 in k2678 in k2675 in k2672 in k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f5154(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("batch-driver.scm: 628 dribble");
+/* batch-driver.scm: 636 dribble */
t2=((C_word*)((C_word*)t0)[3])[1];
-f_1632(t2,((C_word*)t0)[2],lf[111],C_SCHEME_END_OF_LIST);}
+f_1645(t2,((C_word*)t0)[2],lf[112],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){
+/* k2697 in k2678 in k2675 in k2672 in k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2699(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 634 ##sys#display-times */
+((C_proc3)C_retrieve_symbol_proc(lf[115]))(3,*((C_word*)lf[115]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2683(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2683,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2686,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 635 compiler-cleanup-hook */
+((C_proc2)C_retrieve_symbol_proc(lf[113]))(2,*((C_word*)lf[113]+1),t2);}
-/* 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){
+/* k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2660 in a2657 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2686(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("batch-driver.scm: 628 dribble");
+/* batch-driver.scm: 636 dribble */
t2=((C_word*)((C_word*)t0)[3])[1];
-f_1632(t2,((C_word*)t0)[2],lf[111],C_SCHEME_END_OF_LIST);}
+f_1645(t2,((C_word*)t0)[2],lf[112],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){
+/* a2651 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2617 in k2614 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2652(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2652,2,t0,t1);}
+/* batch-driver.scm: 625 prepare-for-code-generation */
+((C_proc4)C_retrieve_symbol_proc(lf[111]))(4,*((C_word*)lf[111]+1),t1,((C_word*)((C_word*)t0)[3])[1],((C_word*)t0)[2]);}
-/* 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){
+/* k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2530(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7799,42 +7875,42 @@ 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_save_and_reclaim((void*)tr2,(void*)f_2530,2,t0,t1);}
+t2=f_1937(((C_word*)((C_word*)t0)[10])[1]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2538,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2544,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+/* ##sys#call-with-values */
C_call_with_values(4,0,((C_word*)t0)[2],t3,t4);}
-/* 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){
+/* a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2544(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[11],*a=ab;
if(c!=4) C_bad_argc_2(c,4,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_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");
+C_save_and_reclaim((void*)tr4,(void*)f_2544,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2548,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=t1,a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=t3,tmp=(C_word)a,a+=11,tmp);
+/* batch-driver.scm: 584 end-time */
t5=((C_word*)((C_word*)t0)[4])[1];
-f_1926(t5,t4,lf[108]);}
+f_1947(t5,t4,lf[109]);}
-/* 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){
+/* k2546 in a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2548(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_2548,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2551,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
+/* batch-driver.scm: 585 print-node */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_1671(t3,t2,lf[106],lf[107],((C_word*)t0)[6]);}
+f_1684(t3,t2,lf[107],lf[108],((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){
+/* k2549 in k2546 in a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2551(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7845,132 +7921,132 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2551,2,t0,t1);}
if(C_truep(((C_word*)t0)[9])){
t2=(C_word)C_fixnum_increase(((C_word*)t0)[8]);
-C_trace("batch-driver.scm: 583 loop");
+/* batch-driver.scm: 586 loop */
t3=((C_word*)((C_word*)t0)[7])[1];
-f_2483(t3,((C_word*)t0)[6],t2,((C_word*)t0)[5],C_SCHEME_TRUE);}
+f_2504(t3,((C_word*)t0)[6],t2,((C_word*)t0)[5],C_SCHEME_TRUE);}
else{
-t2=C_retrieve(lf[97]);
+t2=C_retrieve(lf[98]);
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");
+if(C_truep(C_retrieve(lf[99]))){
+t3=f_1937(((C_word*)((C_word*)t0)[4])[1]);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2587,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+/* batch-driver.scm: 593 analyze */
t5=((C_word*)((C_word*)t0)[2])[1];
-f_1961(t5,t4,lf[102],((C_word*)t0)[5],C_SCHEME_END_OF_LIST);}
+f_1982(t5,t4,lf[103],((C_word*)t0)[5],C_SCHEME_END_OF_LIST);}
else{
t3=(C_word)C_fixnum_increase(((C_word*)t0)[8]);
-C_trace("batch-driver.scm: 596 loop");
+/* batch-driver.scm: 599 loop */
t4=((C_word*)((C_word*)t0)[7])[1];
-f_2483(t4,((C_word*)t0)[6],t3,((C_word*)t0)[5],C_SCHEME_FALSE);}}
+f_2504(t4,((C_word*)t0)[6],t3,((C_word*)t0)[5],C_SCHEME_FALSE);}}
else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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]);}}}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2570,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
+/* batch-driver.scm: 588 debugging */
+((C_proc4)C_retrieve_symbol_proc(lf[104]))(4,*((C_word*)lf[104]+1),t3,lf[105],lf[106]);}}}
-/* 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){
+/* k2568 in k2549 in k2546 in a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2570(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=C_set_block_item(lf[97] /* inline-substitutions-enabled */,0,C_SCHEME_TRUE);
+t2=C_set_block_item(lf[98] /* inline-substitutions-enabled */,0,C_SCHEME_TRUE);
t3=(C_word)C_fixnum_increase(((C_word*)t0)[5]);
-C_trace("batch-driver.scm: 587 loop");
+/* batch-driver.scm: 590 loop */
t4=((C_word*)((C_word*)t0)[4])[1];
-f_2483(t4,((C_word*)t0)[3],t3,((C_word*)t0)[2],C_SCHEME_TRUE);}
+f_2504(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){
+/* k2585 in k2549 in k2546 in a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2587(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_2587,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2590,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+/* batch-driver.scm: 594 end-time */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_1926(t3,t2,lf[101]);}
+f_1947(t3,t2,lf[102]);}
-/* 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){
+/* k2588 in k2585 in k2549 in k2546 in a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2590(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2590,2,t0,t1);}
+t2=f_1937(((C_word*)((C_word*)t0)[8])[1]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2596,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+/* batch-driver.scm: 596 transform-direct-lambdas! */
+((C_proc4)C_retrieve_symbol_proc(lf[101]))(4,*((C_word*)lf[101]+1),t3,((C_word*)t0)[4],((C_word*)t0)[2]);}
-/* 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){
+/* k2594 in k2588 in k2585 in k2549 in k2546 in a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2596(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_2596,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2599,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+/* batch-driver.scm: 597 end-time */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_1926(t3,t2,lf[99]);}
+f_1947(t3,t2,lf[100]);}
-/* 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){
+/* k2597 in k2594 in k2588 in k2585 in k2549 in k2546 in a2543 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2599(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=(C_word)C_fixnum_increase(((C_word*)t0)[6]);
-C_trace("batch-driver.scm: 595 loop");
+/* batch-driver.scm: 598 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]);}
+f_2504(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){
+/* a2537 in k2528 in k2522 in k2519 in k2516 in k2512 in k2509 in loop in k2497 in k2494 in k2491 in k2485 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k3029 in k2444 in k2441 in k2438 in k2435 in k2432 in k2427 in k2424 in k2421 in k2418 in k2415 in k2412 in k2406 in k2403 in k2400 in k2394 in k2391 in k2388 in k2385 in k2382 in k2379 in k2376 in k2373 in k2370 in k2362 in k2359 in k2356 in k2353 in k2349 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2538(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2538,2,t0,t1);}
+/* batch-driver.scm: 583 perform-high-level-optimizations */
+((C_proc4)C_retrieve_symbol_proc(lf[97]))(4,*((C_word*)lf[97]+1),t1,((C_word*)((C_word*)t0)[3])[1],((C_word*)t0)[2]);}
-/* 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){
+/* k2334 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2336(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 376 display */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[37]+1)))(3,*((C_word*)lf[37]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k2327 in k2315 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2329(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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]);}
+/* batch-driver.scm: 377 newline */
+((C_proc2)C_retrieve_proc(*((C_word*)lf[45]+1)))(2,*((C_word*)lf[45]+1),((C_word*)t0)[2]);}
-/* 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){
+/* k2303 in k2294 in k2291 in k2288 in k2285 in k2282 in k2271 in k2267 in k2263 in k2259 in k2255 in k2251 in k2248 in k2244 in k2240 in k2237 in k2233 in k2225 in k2221 in k2218 in k2215 in k2212 in k2205 in k2202 in k2199 in k2196 in k2193 in k2190 in k2187 in k2183 in k2180 in k2174 in k2171 in k2168 in k2165 in k2162 in k2159 in k2156 in k2150 in k2144 in k2141 in k2138 in k2135 in k2132 in k2129 in k2126 in k2123 in k2120 in k2117 in k2114 in k2110 in k2107 in k2104 in k2101 in k2098 in k2095 in k2092 in k2089 in k2086 in k2083 in k2080 in k2077 in k2069 in k2065 in k2062 in k2059 in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2305(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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]);}
+/* batch-driver.scm: 372 newline */
+((C_proc2)C_retrieve_proc(*((C_word*)lf[45]+1)))(2,*((C_word*)lf[45]+1),((C_word*)t0)[2]);}
-/* analyze in k1583 in k1577 in k1574 in 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){
+/* analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1982(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -7982,69 +8058,69 @@ 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);
+C_save_and_reclaim((void*)trf_1982,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1984,a[2]=t3,a[3]=t2,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2007,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2012,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
if(C_truep((C_word)C_i_nullp(t4))){
-C_trace("def-no291333");
+/* def-no294336 */
t8=t7;
-f_1991(t8,t1);}
+f_2012(t8,t1);}
else{
t8=(C_word)C_i_car(t4);
t9=(C_word)C_i_cdr(t4);
if(C_truep((C_word)C_i_nullp(t9))){
-C_trace("def-contf292331");
+/* def-contf295334 */
t10=t6;
-f_1986(t10,t1,t8);}
+f_2007(t10,t1,t8);}
else{
t10=(C_word)C_i_car(t9);
t11=(C_word)C_i_cdr(t9);
if(C_truep((C_word)C_i_nullp(t11))){
-C_trace("body289297");
+/* body292300 */
t12=t5;
-f_1963(t12,t1,t8,t10);}
+f_1984(t12,t1,t8,t10);}
else{
-C_trace("##sys#error");
-t12=*((C_word*)lf[58]+1);
+/* ##sys#error */
+t12=*((C_word*)lf[60]+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){
+/* def-no294 in analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2012(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1991,NULL,2,t0,t1);}
-C_trace("def-contf292331");
+C_save_and_reclaim((void*)trf_2012,NULL,2,t0,t1);}
+/* def-contf295334 */
t2=((C_word*)t0)[2];
-f_1986(t2,t1,C_fix(0));}
+f_2007(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){
+/* def-contf295 in analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_2007(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1986,NULL,3,t0,t1,t2);}
-C_trace("body289297");
+C_save_and_reclaim((void*)trf_2007,NULL,3,t0,t1,t2);}
+/* body292300 */
t3=((C_word*)t0)[2];
-f_1963(t3,t1,t2,C_SCHEME_TRUE);}
+f_1984(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){
+/* body292 in analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1984(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_1984,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1988,a[2]=t3,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+/* batch-driver.scm: 165 analyze-expression */
+((C_proc3)C_retrieve_symbol_proc(lf[59]))(3,*((C_word*)lf[59]+1),t4,((C_word*)t0)[2]);}
-/* 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){
+/* k1986 in body292 in analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1988(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8052,66 +8128,66 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_1988,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1991,a[2]=t1,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1996,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2002,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 167 upap */
t5=((C_word*)((C_word*)t0)[6])[1];
((C_proc9)C_retrieve_proc(t5))(9,t5,t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],t3,t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
else{
t3=((C_word*)t0)[7];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}}
-/* 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){
+/* a2001 in k1986 in body292 in analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_2002(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word *a;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_1981,5,t0,t1,t2,t3,t4);}
-t5=C_retrieve(lf[56]);
-C_trace("g328329");
+C_save_and_reclaim((void*)tr5,(void*)f_2002,5,t0,t1,t2,t3,t4);}
+t5=C_retrieve(lf[58]);
+/* g331332 */
t6=t5;
((C_proc6)C_retrieve_proc(t6))(6,t6,t1,((C_word*)t0)[2],t2,t3,t4);}
-/* 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){
+/* a1995 in k1986 in body292 in analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1996(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_1975,4,t0,t1,t2,t3);}
-t4=C_retrieve(lf[55]);
-C_trace("g313314");
+C_save_and_reclaim((void*)tr4,(void*)f_1996,4,t0,t1,t2,t3);}
+t4=C_retrieve(lf[57]);
+/* g316317 */
t5=t4;
((C_proc5)C_retrieve_proc(t5))(5,t5,t1,((C_word*)t0)[2],t2,t3);}
-/* 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){
+/* k1989 in k1986 in body292 in analyze in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1991(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-/* read-form in k1583 in k1577 in k1574 in 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){
+/* read-form in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1976(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_1976,NULL,3,t0,t1,t2);}
+/* batch-driver.scm: 161 ##sys#read */
+((C_proc4)C_retrieve_symbol_proc(lf[56]))(4,*((C_word*)lf[56]+1),t1,t2,((C_word*)((C_word*)t0)[2])[1]);}
-/* end-time in k1583 in k1577 in k1574 in 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){
+/* end-time in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1947(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8119,43 +8195,43 @@ 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);}
+C_save_and_reclaim((void*)trf_1947,NULL,3,t0,t1,t2);}
if(C_truep(((C_word*)((C_word*)t0)[3])[1])){
-t3=*((C_word*)lf[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);}
+t3=*((C_word*)lf[32]+1);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1954,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+/* display */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t4,lf[55],t3);}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k1952 in end-time in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1954(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_1954,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1957,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* display */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t2,((C_word*)t0)[2],((C_word*)t0)[4]);}
-/* 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){
+/* k1955 in k1952 in end-time in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1957(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_1957,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1960,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* display */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t2,lf[54],((C_word*)t0)[3]);}
-/* 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){
+/* k1958 in k1955 in k1952 in end-time in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1960(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8163,24 +8239,24 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_1960,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1963,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t3=(C_word)C_fudge(C_fix(6));
t4=(C_word)C_fixnum_difference(t3,((C_word*)((C_word*)t0)[2])[1]);
-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]);}
+/* write */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[43]+1)))(4,*((C_word*)lf[43]+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){
+/* k1961 in k1958 in k1955 in k1952 in end-time in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1963(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("write-char/port");
-t2=C_retrieve(lf[33]);
+/* write-char/port */
+t2=C_retrieve(lf[34]);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],C_make_character(10),((C_word*)t0)[2]);}
-/* begin-time in k1583 in k1577 in 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){
+/* begin-time in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static C_word C_fcall f_1937(C_word t0){
C_word tmp;
C_word t1;
C_word t2;
@@ -8195,8 +8271,8 @@ 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){
+/* collect-options in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1902(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8204,71 +8280,71 @@ 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);}
+C_save_and_reclaim((void*)trf_1902,NULL,3,t0,t1,t2);}
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1887,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1908,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp));
t6=((C_word*)t4)[1];
-f_1887(t6,t1,((C_word*)t0)[2]);}
+f_1908(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){
+/* loop in collect-options in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1908(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1887,NULL,3,t0,t1,t2);}
+C_save_and_reclaim((void*)trf_1908,NULL,3,t0,t1,t2);}
t3=(C_word)C_i_memq(((C_word*)t0)[4],t2);
if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1895,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("g264265");
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1916,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* g267268 */
t5=t4;
-f_1895(t5,t1,t3);}
+f_1916(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){
+/* g267 in loop in collect-options in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1916(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_1916,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1924,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 150 option-arg */
+f_1537(t3,t2);}
-/* 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){
+/* k1922 in g267 in loop in collect-options in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1924(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_1924,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1928,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t3=(C_word)C_i_cddr(((C_word*)t0)[3]);
-C_trace("batch-driver.scm: 145 loop");
+/* batch-driver.scm: 150 loop */
t4=((C_word*)((C_word*)t0)[2])[1];
-f_1887(t4,t2,t3);}
+f_1908(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){
+/* k1926 in k1922 in g267 in loop in collect-options in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1928(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1907,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1928,2,t0,t1);}
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-/* arg-val in k1583 in k1577 in k1574 in 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){
+/* arg-val in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1822(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8285,44 +8361,44 @@ 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);}
+C_save_and_reclaim((void*)trf_1822,NULL,2,t1,t2);}
t3=(C_word)C_i_string_length(t2);
t4=(C_word)C_fixnum_difference(t3,C_fix(1));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1811,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1832,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
if(C_truep((C_word)C_fixnum_lessp(t3,C_fix(2)))){
-C_trace("batch-driver.scm: 136 string->number");
+/* batch-driver.scm: 141 string->number */
C_string_to_number(3,0,t5,t2);}
else{
t6=(C_word)C_i_string_ref(t2,t4);
t7=(C_word)C_eqp(t6,C_make_character(109));
t8=(C_truep(t7)?t7:(C_word)C_eqp(t6,C_make_character(77)));
if(C_truep(t8)){
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);}
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1863,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1871,a[2]=t9,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 143 substring */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[53]+1)))(5,*((C_word*)lf[53]+1),t10,t2,C_fix(0),t4);}
else{
t9=(C_word)C_eqp(t6,C_make_character(107));
t10=(C_truep(t9)?t9:(C_word)C_eqp(t6,C_make_character(75)));
if(C_truep(t10)){
-t11=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);}
+t11=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1887,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1891,a[2]=t11,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 144 substring */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[53]+1)))(5,*((C_word*)lf[53]+1),t12,t2,C_fix(0),t4);}
else{
-C_trace("batch-driver.scm: 140 string->number");
+/* batch-driver.scm: 145 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){
+/* k1889 in arg-val in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1891(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("batch-driver.scm: 139 string->number");
+/* batch-driver.scm: 144 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){
+/* k1885 in arg-val in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1887(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8332,19 +8408,19 @@ 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]);}}
+/* batch-driver.scm: 146 quit */
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),((C_word*)t0)[3],lf[52],((C_word*)t0)[2]);}}
-/* 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){
+/* k1869 in arg-val in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1871(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("batch-driver.scm: 138 string->number");
+/* batch-driver.scm: 143 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){
+/* k1861 in arg-val in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1863(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8354,11 +8430,11 @@ 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]);}}
+/* batch-driver.scm: 146 quit */
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),((C_word*)t0)[3],lf[52],((C_word*)t0)[2]);}}
-/* 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){
+/* k1830 in arg-val in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1832(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8368,11 +8444,11 @@ 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]);}}
+/* batch-driver.scm: 146 quit */
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),((C_word*)t0)[3],lf[52],((C_word*)t0)[2]);}}
-/* infohook in k1583 in k1577 in k1574 in k4787 in 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){
+/* infohook in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1773(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -8381,16 +8457,16 @@ 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");
+C_save_and_reclaim((void*)tr5,(void*)f_1773,5,t0,t1,t2,t3,t4);}
+t5=C_retrieve(lf[46]);
+t6=(C_truep(t5)?t5:(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1819,tmp=(C_word)a,a+=2,tmp));
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1780,a[2]=t2,a[3]=t4,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* g212213 */
t8=t6;
((C_proc5)C_retrieve_proc(t8))(5,t8,t7,t2,t3,t4);}
-/* 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){
+/* k1778 in infohook in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1780(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8399,20 +8475,20 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_1780,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1783,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1786,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t4=(C_word)C_eqp(lf[51],((C_word*)t0)[2]);
if(C_truep(t4)){
t5=(C_word)C_i_car(t1);
t6=t3;
-f_1765(t6,(C_word)C_i_symbolp(t5));}
+f_1786(t6,(C_word)C_i_symbolp(t5));}
else{
t5=t3;
-f_1765(t5,C_SCHEME_FALSE);}}
+f_1786(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){
+/* k1784 in k1778 in infohook in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1786(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8421,74 +8497,74 @@ 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);}
+C_save_and_reclaim((void*)trf_1786,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=(C_word)C_i_car(((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1797,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1801,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
t5=(C_word)C_i_car(((C_word*)t0)[5]);
-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);}
+/* batch-driver.scm: 133 ##sys#hash-table-ref */
+((C_proc4)C_retrieve_symbol_proc(lf[50]))(4,*((C_word*)lf[50]+1),t4,C_retrieve(lf[48]),t5);}
else{
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[5]);}}
-/* 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){
+/* k1799 in k1784 in k1778 in infohook in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1801(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(C_truep(t1)){
t2=t1;
-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);}
+/* batch-driver.scm: 132 alist-cons */
+((C_proc5)C_retrieve_symbol_proc(lf[49]))(5,*((C_word*)lf[49]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t2);}
else{
-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);}}
+/* batch-driver.scm: 132 alist-cons */
+((C_proc5)C_retrieve_symbol_proc(lf[49]))(5,*((C_word*)lf[49]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}}
-/* 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){
+/* k1795 in k1784 in k1778 in infohook in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1797(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 129 ##sys#hash-table-set! */
+((C_proc5)C_retrieve_symbol_proc(lf[47]))(5,*((C_word*)lf[47]+1),((C_word*)t0)[3],C_retrieve(lf[48]),((C_word*)t0)[2],t1);}
-/* 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){
+/* k1781 in k1778 in infohook in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1783(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-/* f_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){
+/* f_1819 in infohook in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1819(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word *a;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_1798,5,t0,t1,t2,t3,t4);}
+C_save_and_reclaim((void*)tr5,(void*)f_1819,5,t0,t1,t2,t3,t4);}
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
-/* print-expr in k1583 in k1577 in k1574 in 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){
+/* print-expr in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1730(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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");
+C_save_and_reclaim((void*)trf_1730,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1737,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* batch-driver.scm: 119 print-header */
t6=((C_word*)((C_word*)t0)[2])[1];
-f_1647(t6,t5,t2,t3);}
+f_1660(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){
+/* k1735 in print-expr in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1737(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8497,66 +8573,73 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1737,2,t0,t1);}
if(C_truep(t1)){
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1729,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1742,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_1729(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_1742(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-/* 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){
+/* loop195 in k1735 in print-expr in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1742(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[5],*a=ab;
+C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1729,NULL,3,t0,t1,t2);}
+C_save_and_reclaim((void*)trf_1742,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);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1760,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1754,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 122 pretty-print */
+((C_proc3)C_retrieve_symbol_proc(lf[40]))(3,*((C_word*)lf[40]+1),t5,t4);}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k1752 in loop195 in k1735 in print-expr in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1754(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* batch-driver.scm: 123 newline */
+((C_proc2)C_retrieve_proc(*((C_word*)lf[45]+1)))(2,*((C_word*)lf[45]+1),((C_word*)t0)[2]);}
+
+/* k1758 in loop195 in k1735 in print-expr in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1760(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
t3=((C_word*)((C_word*)t0)[3])[1];
-f_1729(t3,((C_word*)t0)[2],t2);}
+f_1742(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){
+/* print-db in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1706(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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");
+C_save_and_reclaim((void*)trf_1706,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1713,a[2]=t5,a[3]=t4,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 114 print-header */
t7=((C_word*)((C_word*)t0)[2])[1];
-f_1647(t7,t6,t2,t3);}
+f_1660(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){
+/* k1711 in print-db in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1713(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8564,186 +8647,186 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1713,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);}
+t2=*((C_word*)lf[32]+1);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1716,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+/* display */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t3,lf[44],t2);}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-/* 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){
+/* k1714 in k1711 in print-db in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1716(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_1716,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1719,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* write */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[43]+1)))(4,*((C_word*)lf[43]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k1717 in k1714 in k1711 in print-db in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1719(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1719,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1722,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* write-char/port */
+t3=C_retrieve(lf[34]);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(41),((C_word*)t0)[2]);}
-/* 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){
+/* k1720 in k1717 in k1714 in k1711 in print-db in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1722(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1722,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1725,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* write-char/port */
+t3=C_retrieve(lf[34]);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(10),((C_word*)t0)[2]);}
-/* 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){
+/* k1723 in k1720 in k1717 in k1714 in k1711 in print-db in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1725(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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]);}
+/* batch-driver.scm: 116 display-analysis-database */
+((C_proc3)C_retrieve_symbol_proc(lf[42]))(3,*((C_word*)lf[42]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* print-node in k1583 in k1577 in k1574 in 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){
+/* print-node in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1684(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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");
+C_save_and_reclaim((void*)trf_1684,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1691,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 108 print-header */
t6=((C_word*)((C_word*)t0)[2])[1];
-f_1647(t6,t5,t2,t3);}
+f_1660(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){
+/* k1689 in print-node in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1691(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1678,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1691,2,t0,t1);}
if(C_truep(t1)){
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-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]);}
+/* batch-driver.scm: 110 dump-nodes */
+((C_proc3)C_retrieve_symbol_proc(lf[39]))(3,*((C_word*)lf[39]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1704,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* batch-driver.scm: 111 build-expression-tree */
+((C_proc3)C_retrieve_symbol_proc(lf[41]))(3,*((C_word*)lf[41]+1),t2,((C_word*)t0)[2]);}}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-/* 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){
+/* k1702 in k1689 in print-node in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1704(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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);}
+/* batch-driver.scm: 111 pretty-print */
+((C_proc3)C_retrieve_symbol_proc(lf[40]))(3,*((C_word*)lf[40]+1),((C_word*)t0)[2],t1);}
-/* print-header in k1583 in k1577 in k1574 in 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){
+/* print-header in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1660(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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");
+C_save_and_reclaim((void*)trf_1660,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1664,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* batch-driver.scm: 101 dribble */
t5=((C_word*)((C_word*)t0)[2])[1];
-f_1632(t5,t4,lf[37],(C_word)C_a_i_list(&a,1,t2));}
+f_1645(t5,t4,lf[38],(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){
+/* k1662 in print-header in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1664(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1664,2,t0,t1);}
+if(C_truep((C_word)C_i_memq(((C_word*)t0)[4],C_retrieve(lf[36])))){
+t2=*((C_word*)lf[32]+1);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1673,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* write-char/port */
+t4=C_retrieve(lf[34]);
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,C_make_character(91),t2);}
else{
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-/* 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){
+/* k1671 in k1662 in print-header in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1673(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_1673,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1676,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* display */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[37]+1)))(4,*((C_word*)lf[37]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k1674 in k1671 in k1662 in print-header in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1676(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1676,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1679,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* write-char/port */
+t3=C_retrieve(lf[34]);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(93),((C_word*)t0)[2]);}
-/* 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){
+/* k1677 in k1674 in k1671 in k1662 in print-header in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1679(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1679,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1682,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* write-char/port */
+t3=C_retrieve(lf[34]);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(10),((C_word*)t0)[2]);}
-/* 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){
+/* k1680 in k1677 in k1674 in k1671 in k1662 in print-header in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1682(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
-/* dribble in k1583 in k1577 in k1574 in 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){
+/* dribble in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1645(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -8751,39 +8834,39 @@ 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);}
+C_save_and_reclaim((void*)trf_1645,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);}
+t4=*((C_word*)lf[32]+1);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1652,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_apply(6,0,t5,C_retrieve(lf[35]),t4,t2,t3);}
else{
t4=C_SCHEME_UNDEFINED;
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-/* 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){
+/* k1650 in dribble in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1652(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1652,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1655,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* write-char/port */
+t3=C_retrieve(lf[34]);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(10),((C_word*)t0)[2]);}
-/* 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){
+/* k1653 in k1650 in dribble in k1593 in k1587 in k1584 in k4827 in k1568 in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_ccall f_1655(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-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]);}
+/* ##sys#flush-output */
+((C_proc3)C_retrieve_symbol_proc(lf[33]))(3,*((C_word*)lf[33]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* option-arg in compile-source-file in 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){
+/* option-arg in compile-source-file in k1530 in k1526 in k1522 in k1518 in k1514 in k1509 in k1506 */
+static void C_fcall f_1537(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8791,410 +8874,415 @@ 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);}
+C_save_and_reclaim((void*)trf_1537,NULL,2,t1,t2);}
t3=(C_word)C_i_cdr(t2);
if(C_truep((C_word)C_i_nullp(t3))){
t4=(C_word)C_i_car(t2);
-C_trace("batch-driver.scm: 50 quit");
+/* 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");
+/* 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] = {
+static C_PTABLE_ENTRY ptable[393] = {
{"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_1508:batch_driver_scm",(void*)f_1508},
+{"f_1511:batch_driver_scm",(void*)f_1511},
+{"f_1516:batch_driver_scm",(void*)f_1516},
+{"f_1520:batch_driver_scm",(void*)f_1520},
{"f_1524:batch_driver_scm",(void*)f_1524},
-{"f_1560:batch_driver_scm",(void*)f_1560},
-{"f_4808:batch_driver_scm",(void*)f_4808},
-{"f_4793:batch_driver_scm",(void*)f_4793},
+{"f_1528:batch_driver_scm",(void*)f_1528},
+{"f_1532:batch_driver_scm",(void*)f_1532},
+{"f_1534:batch_driver_scm",(void*)f_1534},
+{"f_1570:batch_driver_scm",(void*)f_1570},
+{"f_4848:batch_driver_scm",(void*)f_4848},
+{"f_4833:batch_driver_scm",(void*)f_4833},
+{"f_4829:batch_driver_scm",(void*)f_4829},
+{"f_4818:batch_driver_scm",(void*)f_4818},
{"f_4789:batch_driver_scm",(void*)f_4789},
-{"f_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_4793:batch_driver_scm",(void*)f_4793},
+{"f_1586:batch_driver_scm",(void*)f_1586},
+{"f_4785:batch_driver_scm",(void*)f_4785},
+{"f_4746:batch_driver_scm",(void*)f_4746},
+{"f_4748:batch_driver_scm",(void*)f_4748},
+{"f_4777:batch_driver_scm",(void*)f_4777},
+{"f_1589:batch_driver_scm",(void*)f_1589},
+{"f_1595:batch_driver_scm",(void*)f_1595},
+{"f_4727:batch_driver_scm",(void*)f_4727},
+{"f_4723:batch_driver_scm",(void*)f_4723},
+{"f_4719:batch_driver_scm",(void*)f_4719},
{"f_2061:batch_driver_scm",(void*)f_2061},
{"f_2064:batch_driver_scm",(void*)f_2064},
{"f_2067:batch_driver_scm",(void*)f_2067},
-{"f_2070:batch_driver_scm",(void*)f_2070},
-{"f_2073:batch_driver_scm",(void*)f_2073},
-{"f_2076:batch_driver_scm",(void*)f_2076},
+{"f_4704:batch_driver_scm",(void*)f_4704},
+{"f_4648:batch_driver_scm",(void*)f_4648},
+{"f_4656:batch_driver_scm",(void*)f_4656},
+{"f_4658:batch_driver_scm",(void*)f_4658},
+{"f_4696:batch_driver_scm",(void*)f_4696},
+{"f_2071:batch_driver_scm",(void*)f_2071},
+{"f_4598:batch_driver_scm",(void*)f_4598},
+{"f_4600:batch_driver_scm",(void*)f_4600},
+{"f_4635:batch_driver_scm",(void*)f_4635},
+{"f_4639:batch_driver_scm",(void*)f_4639},
{"f_2079:batch_driver_scm",(void*)f_2079},
{"f_2082:batch_driver_scm",(void*)f_2082},
{"f_2085:batch_driver_scm",(void*)f_2085},
{"f_2088:batch_driver_scm",(void*)f_2088},
{"f_2091:batch_driver_scm",(void*)f_2091},
-{"f_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_2094:batch_driver_scm",(void*)f_2094},
+{"f_2097:batch_driver_scm",(void*)f_2097},
+{"f_2100:batch_driver_scm",(void*)f_2100},
+{"f_2103:batch_driver_scm",(void*)f_2103},
+{"f_2106:batch_driver_scm",(void*)f_2106},
+{"f_2109:batch_driver_scm",(void*)f_2109},
+{"f_2112:batch_driver_scm",(void*)f_2112},
+{"f_4501:batch_driver_scm",(void*)f_4501},
+{"f_4503:batch_driver_scm",(void*)f_4503},
+{"f_4532:batch_driver_scm",(void*)f_4532},
{"f_2116:batch_driver_scm",(void*)f_2116},
+{"f_4496:batch_driver_scm",(void*)f_4496},
{"f_2119:batch_driver_scm",(void*)f_2119},
{"f_2122:batch_driver_scm",(void*)f_2122},
{"f_2125:batch_driver_scm",(void*)f_2125},
-{"f_4411:batch_driver_scm",(void*)f_4411},
+{"f_2128:batch_driver_scm",(void*)f_2128},
{"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_2134:batch_driver_scm",(void*)f_2134},
{"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_4451:batch_driver_scm",(void*)f_4451},
{"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_4436:batch_driver_scm",(void*)f_4436},
+{"f_4439:batch_driver_scm",(void*)f_4439},
+{"f_4442:batch_driver_scm",(void*)f_4442},
+{"f_2158:batch_driver_scm",(void*)f_2158},
+{"f_4426:batch_driver_scm",(void*)f_4426},
+{"f_4429:batch_driver_scm",(void*)f_4429},
{"f_2161:batch_driver_scm",(void*)f_2161},
{"f_2164:batch_driver_scm",(void*)f_2164},
-{"f_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_4384:batch_driver_scm",(void*)f_4384},
+{"f_2167:batch_driver_scm",(void*)f_2167},
+{"f_4378:batch_driver_scm",(void*)f_4378},
+{"f_2170:batch_driver_scm",(void*)f_2170},
+{"f_4369:batch_driver_scm",(void*)f_4369},
+{"f_2173:batch_driver_scm",(void*)f_2173},
+{"f_4351:batch_driver_scm",(void*)f_4351},
+{"f_4354:batch_driver_scm",(void*)f_4354},
+{"f_4357:batch_driver_scm",(void*)f_4357},
+{"f_4360:batch_driver_scm",(void*)f_4360},
+{"f_2176:batch_driver_scm",(void*)f_2176},
+{"f_4310:batch_driver_scm",(void*)f_4310},
+{"f_4312:batch_driver_scm",(void*)f_4312},
+{"f_4341:batch_driver_scm",(void*)f_4341},
+{"f_4306:batch_driver_scm",(void*)f_4306},
+{"f_2182:batch_driver_scm",(void*)f_2182},
+{"f_2185:batch_driver_scm",(void*)f_2185},
+{"f_4255:batch_driver_scm",(void*)f_4255},
+{"f_4257:batch_driver_scm",(void*)f_4257},
+{"f_4286:batch_driver_scm",(void*)f_4286},
+{"f_2189:batch_driver_scm",(void*)f_2189},
+{"f_2192:batch_driver_scm",(void*)f_2192},
+{"f_2195:batch_driver_scm",(void*)f_2195},
+{"f_2198:batch_driver_scm",(void*)f_2198},
+{"f_2201:batch_driver_scm",(void*)f_2201},
+{"f_4152:batch_driver_scm",(void*)f_4152},
+{"f_4166:batch_driver_scm",(void*)f_4166},
+{"f_4191:batch_driver_scm",(void*)f_4191},
+{"f_4196:batch_driver_scm",(void*)f_4196},
+{"f_4224:batch_driver_scm",(void*)f_4224},
+{"f_4062:batch_driver_scm",(void*)f_4062},
+{"f_4067:batch_driver_scm",(void*)f_4067},
+{"f_4081:batch_driver_scm",(void*)f_4081},
+{"f_4106:batch_driver_scm",(void*)f_4106},
+{"f_4111:batch_driver_scm",(void*)f_4111},
+{"f_4139:batch_driver_scm",(void*)f_4139},
+{"f_2204:batch_driver_scm",(void*)f_2204},
+{"f_4056:batch_driver_scm",(void*)f_4056},
+{"f_4048:batch_driver_scm",(void*)f_4048},
+{"f_4023:batch_driver_scm",(void*)f_4023},
+{"f_4025:batch_driver_scm",(void*)f_4025},
+{"f_4035:batch_driver_scm",(void*)f_4035},
+{"f_2207:batch_driver_scm",(void*)f_2207},
{"f_2214:batch_driver_scm",(void*)f_2214},
-{"f_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_2217:batch_driver_scm",(void*)f_2217},
+{"f_2220:batch_driver_scm",(void*)f_2220},
+{"f_3986:batch_driver_scm",(void*)f_3986},
+{"f_4002:batch_driver_scm",(void*)f_4002},
+{"f_4005:batch_driver_scm",(void*)f_4005},
+{"f_2223:batch_driver_scm",(void*)f_2223},
+{"f_2227:batch_driver_scm",(void*)f_2227},
+{"f_2235:batch_driver_scm",(void*)f_2235},
+{"f_2239:batch_driver_scm",(void*)f_2239},
+{"f_3949:batch_driver_scm",(void*)f_3949},
+{"f_3951:batch_driver_scm",(void*)f_3951},
+{"f_3980:batch_driver_scm",(void*)f_3980},
+{"f_2242:batch_driver_scm",(void*)f_2242},
+{"f_3910:batch_driver_scm",(void*)f_3910},
+{"f_3912:batch_driver_scm",(void*)f_3912},
+{"f_3941:batch_driver_scm",(void*)f_3941},
+{"f_3906:batch_driver_scm",(void*)f_3906},
+{"f_3850:batch_driver_scm",(void*)f_3850},
+{"f_3852:batch_driver_scm",(void*)f_3852},
+{"f_3846:batch_driver_scm",(void*)f_3846},
+{"f_2246:batch_driver_scm",(void*)f_2246},
+{"f_2250:batch_driver_scm",(void*)f_2250},
+{"f_2253:batch_driver_scm",(void*)f_2253},
+{"f_3825:batch_driver_scm",(void*)f_3825},
+{"f_2257:batch_driver_scm",(void*)f_2257},
+{"f_3818:batch_driver_scm",(void*)f_3818},
+{"f_2261:batch_driver_scm",(void*)f_2261},
+{"f_3811:batch_driver_scm",(void*)f_3811},
+{"f_2265:batch_driver_scm",(void*)f_2265},
+{"f_3804:batch_driver_scm",(void*)f_3804},
{"f_2269:batch_driver_scm",(void*)f_2269},
-{"f_3703:batch_driver_scm",(void*)f_3703},
-{"f_2272:batch_driver_scm",(void*)f_2272},
-{"f_2275:batch_driver_scm",(void*)f_2275},
+{"f_3784:batch_driver_scm",(void*)f_3784},
+{"f_2273:batch_driver_scm",(void*)f_2273},
+{"f_2284:batch_driver_scm",(void*)f_2284},
+{"f_2287:batch_driver_scm",(void*)f_2287},
+{"f_2290:batch_driver_scm",(void*)f_2290},
+{"f_3743:batch_driver_scm",(void*)f_3743},
+{"f_2293:batch_driver_scm",(void*)f_2293},
{"f_2296:batch_driver_scm",(void*)f_2296},
-{"f_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_2317:batch_driver_scm",(void*)f_2317},
+{"f_2345:batch_driver_scm",(void*)f_2345},
{"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_2355:batch_driver_scm",(void*)f_2355},
+{"f_2358:batch_driver_scm",(void*)f_2358},
+{"f_2361:batch_driver_scm",(void*)f_2361},
+{"f_2364:batch_driver_scm",(void*)f_2364},
{"f_2372:batch_driver_scm",(void*)f_2372},
{"f_2375:batch_driver_scm",(void*)f_2375},
-{"f_3442:batch_driver_scm",(void*)f_3442},
-{"f_3462:batch_driver_scm",(void*)f_3462},
+{"f_2378:batch_driver_scm",(void*)f_2378},
+{"f_3711:batch_driver_scm",(void*)f_3711},
+{"f_3719:batch_driver_scm",(void*)f_3719},
{"f_2381:batch_driver_scm",(void*)f_2381},
-{"f_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_3556:batch_driver_scm",(void*)f_3556},
+{"f_3655:batch_driver_scm",(void*)f_3655},
+{"f_3704:batch_driver_scm",(void*)f_3704},
+{"f_3672:batch_driver_scm",(void*)f_3672},
+{"f_3676:batch_driver_scm",(void*)f_3676},
+{"f_3681:batch_driver_scm",(void*)f_3681},
+{"f_3702:batch_driver_scm",(void*)f_3702},
+{"f_3667:batch_driver_scm",(void*)f_3667},
+{"f_3658:batch_driver_scm",(void*)f_3658},
+{"f_3616:batch_driver_scm",(void*)f_3616},
+{"f_3645:batch_driver_scm",(void*)f_3645},
+{"f_3571:batch_driver_scm",(void*)f_3571},
+{"f_3575:batch_driver_scm",(void*)f_3575},
+{"f_3581:batch_driver_scm",(void*)f_3581},
+{"f_3610:batch_driver_scm",(void*)f_3610},
+{"f_3579:batch_driver_scm",(void*)f_3579},
+{"f_3567:batch_driver_scm",(void*)f_3567},
+{"f_3547:batch_driver_scm",(void*)f_3547},
+{"f_3551:batch_driver_scm",(void*)f_3551},
{"f_2387:batch_driver_scm",(void*)f_2387},
-{"f_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_2390:batch_driver_scm",(void*)f_2390},
+{"f_3505:batch_driver_scm",(void*)f_3505},
+{"f_3511:batch_driver_scm",(void*)f_3511},
+{"f_3540:batch_driver_scm",(void*)f_3540},
+{"f_3509:batch_driver_scm",(void*)f_3509},
{"f_2393:batch_driver_scm",(void*)f_2393},
-{"f_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_3482:batch_driver_scm",(void*)f_3482},
+{"f_3502:batch_driver_scm",(void*)f_3502},
{"f_2402:batch_driver_scm",(void*)f_2402},
+{"f_3440:batch_driver_scm",(void*)f_3440},
+{"f_3442:batch_driver_scm",(void*)f_3442},
+{"f_3471:batch_driver_scm",(void*)f_3471},
{"f_2405:batch_driver_scm",(void*)f_2405},
-{"f_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_3374:batch_driver_scm",(void*)f_3374},
+{"f_3180:batch_driver_scm",(void*)f_3180},
+{"f_3330:batch_driver_scm",(void*)f_3330},
+{"f_3184:batch_driver_scm",(void*)f_3184},
+{"f_3188:batch_driver_scm",(void*)f_3188},
+{"f_3207:batch_driver_scm",(void*)f_3207},
+{"f_3192:batch_driver_scm",(void*)f_3192},
+{"f_2414:batch_driver_scm",(void*)f_2414},
+{"f_3119:batch_driver_scm",(void*)f_3119},
+{"f_3124:batch_driver_scm",(void*)f_3124},
+{"f_3136:batch_driver_scm",(void*)f_3136},
+{"f_3139:batch_driver_scm",(void*)f_3139},
+{"f_3142:batch_driver_scm",(void*)f_3142},
+{"f_3145:batch_driver_scm",(void*)f_3145},
+{"f_3159:batch_driver_scm",(void*)f_3159},
+{"f_2417:batch_driver_scm",(void*)f_2417},
+{"f_3113:batch_driver_scm",(void*)f_3113},
+{"f_2420:batch_driver_scm",(void*)f_2420},
+{"f_3107:batch_driver_scm",(void*)f_3107},
+{"f_2423:batch_driver_scm",(void*)f_2423},
+{"f_2426:batch_driver_scm",(void*)f_2426},
+{"f_3092:batch_driver_scm",(void*)f_3092},
+{"f_2429:batch_driver_scm",(void*)f_2429},
+{"f_2434:batch_driver_scm",(void*)f_2434},
+{"f_2437:batch_driver_scm",(void*)f_2437},
+{"f_2440:batch_driver_scm",(void*)f_2440},
+{"f_2443:batch_driver_scm",(void*)f_2443},
+{"f_3038:batch_driver_scm",(void*)f_3038},
+{"f_3050:batch_driver_scm",(void*)f_3050},
+{"f_3079:batch_driver_scm",(void*)f_3079},
+{"f_3045:batch_driver_scm",(void*)f_3045},
+{"f_2446:batch_driver_scm",(void*)f_2446},
+{"f_3035:batch_driver_scm",(void*)f_3035},
+{"f_3031:batch_driver_scm",(void*)f_3031},
{"f_2457:batch_driver_scm",(void*)f_2457},
-{"f_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_2977:batch_driver_scm",(void*)f_2977},
+{"f_3017:batch_driver_scm",(void*)f_3017},
+{"f_3009:batch_driver_scm",(void*)f_3009},
+{"f_2980:batch_driver_scm",(void*)f_2980},
+{"f_2988:batch_driver_scm",(void*)f_2988},
+{"f_2991:batch_driver_scm",(void*)f_2991},
+{"f_2994:batch_driver_scm",(void*)f_2994},
+{"f_3000:batch_driver_scm",(void*)f_3000},
+{"f_3003:batch_driver_scm",(void*)f_3003},
+{"f_3006:batch_driver_scm",(void*)f_3006},
+{"f_2463:batch_driver_scm",(void*)f_2463},
+{"f_2968:batch_driver_scm",(void*)f_2968},
+{"f_2971:batch_driver_scm",(void*)f_2971},
+{"f_2950:batch_driver_scm",(void*)f_2950},
+{"f_2956:batch_driver_scm",(void*)f_2956},
+{"f_2959:batch_driver_scm",(void*)f_2959},
+{"f_2962:batch_driver_scm",(void*)f_2962},
{"f_2466:batch_driver_scm",(void*)f_2466},
+{"f_2944:batch_driver_scm",(void*)f_2944},
+{"f_2469:batch_driver_scm",(void*)f_2469},
+{"f_2937:batch_driver_scm",(void*)f_2937},
{"f_2472:batch_driver_scm",(void*)f_2472},
+{"f_2901:batch_driver_scm",(void*)f_2901},
+{"f_2930:batch_driver_scm",(void*)f_2930},
+{"f_2899:batch_driver_scm",(void*)f_2899},
+{"f_2844:batch_driver_scm",(void*)f_2844},
+{"f_2846:batch_driver_scm",(void*)f_2846},
+{"f_2884:batch_driver_scm",(void*)f_2884},
+{"f_2854:batch_driver_scm",(void*)f_2854},
+{"f_2881:batch_driver_scm",(void*)f_2881},
+{"f_2877:batch_driver_scm",(void*)f_2877},
+{"f_2858:batch_driver_scm",(void*)f_2858},
+{"f_2867:batch_driver_scm",(void*)f_2867},
+{"f_2870:batch_driver_scm",(void*)f_2870},
{"f_2475:batch_driver_scm",(void*)f_2475},
{"f_2478:batch_driver_scm",(void*)f_2478},
-{"f_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_2808:batch_driver_scm",(void*)f_2808},
+{"f_2826:batch_driver_scm",(void*)f_2826},
+{"f_2816:batch_driver_scm",(void*)f_2816},
+{"f_2820:batch_driver_scm",(void*)f_2820},
+{"f_2481:batch_driver_scm",(void*)f_2481},
+{"f_2487:batch_driver_scm",(void*)f_2487},
{"f_2493:batch_driver_scm",(void*)f_2493},
-{"f_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_2496:batch_driver_scm",(void*)f_2496},
+{"f_2499:batch_driver_scm",(void*)f_2499},
+{"f_2504:batch_driver_scm",(void*)f_2504},
+{"f_2511:batch_driver_scm",(void*)f_2511},
+{"f_2758:batch_driver_scm",(void*)f_2758},
+{"f_2761:batch_driver_scm",(void*)f_2761},
+{"f_2514:batch_driver_scm",(void*)f_2514},
+{"f_2518:batch_driver_scm",(void*)f_2518},
+{"f_2521:batch_driver_scm",(void*)f_2521},
+{"f_2524:batch_driver_scm",(void*)f_2524},
{"f_2616:batch_driver_scm",(void*)f_2616},
+{"f_2746:batch_driver_scm",(void*)f_2746},
{"f_2619:batch_driver_scm",(void*)f_2619},
-{"f_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_2626:batch_driver_scm",(void*)f_2626},
+{"f_2629:batch_driver_scm",(void*)f_2629},
+{"f_2632:batch_driver_scm",(void*)f_2632},
+{"f_2635:batch_driver_scm",(void*)f_2635},
+{"f_2638:batch_driver_scm",(void*)f_2638},
+{"f_2714:batch_driver_scm",(void*)f_2714},
+{"f_2720:batch_driver_scm",(void*)f_2720},
+{"f_2723:batch_driver_scm",(void*)f_2723},
+{"f_2641:batch_driver_scm",(void*)f_2641},
+{"f_2644:batch_driver_scm",(void*)f_2644},
{"f_2658:batch_driver_scm",(void*)f_2658},
-{"f_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_2662:batch_driver_scm",(void*)f_2662},
+{"f_2668:batch_driver_scm",(void*)f_2668},
+{"f_2671:batch_driver_scm",(void*)f_2671},
+{"f_2674:batch_driver_scm",(void*)f_2674},
+{"f_2677:batch_driver_scm",(void*)f_2677},
+{"f_2680:batch_driver_scm",(void*)f_2680},
+{"f5154:batch_driver_scm",(void*)f5154},
+{"f_2699:batch_driver_scm",(void*)f_2699},
+{"f_2683:batch_driver_scm",(void*)f_2683},
+{"f_2686:batch_driver_scm",(void*)f_2686},
+{"f_2652:batch_driver_scm",(void*)f_2652},
{"f_2530:batch_driver_scm",(void*)f_2530},
-{"f_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_2544:batch_driver_scm",(void*)f_2544},
+{"f_2548:batch_driver_scm",(void*)f_2548},
+{"f_2551:batch_driver_scm",(void*)f_2551},
+{"f_2570:batch_driver_scm",(void*)f_2570},
+{"f_2587:batch_driver_scm",(void*)f_2587},
+{"f_2590:batch_driver_scm",(void*)f_2590},
+{"f_2596:batch_driver_scm",(void*)f_2596},
+{"f_2599:batch_driver_scm",(void*)f_2599},
+{"f_2538:batch_driver_scm",(void*)f_2538},
+{"f_2336:batch_driver_scm",(void*)f_2336},
+{"f_2329:batch_driver_scm",(void*)f_2329},
+{"f_2305:batch_driver_scm",(void*)f_2305},
+{"f_1982:batch_driver_scm",(void*)f_1982},
+{"f_2012:batch_driver_scm",(void*)f_2012},
+{"f_2007:batch_driver_scm",(void*)f_2007},
+{"f_1984:batch_driver_scm",(void*)f_1984},
+{"f_1988:batch_driver_scm",(void*)f_1988},
+{"f_2002:batch_driver_scm",(void*)f_2002},
+{"f_1996:batch_driver_scm",(void*)f_1996},
{"f_1991:batch_driver_scm",(void*)f_1991},
-{"f_1986:batch_driver_scm",(void*)f_1986},
+{"f_1976:batch_driver_scm",(void*)f_1976},
+{"f_1947:batch_driver_scm",(void*)f_1947},
+{"f_1954:batch_driver_scm",(void*)f_1954},
+{"f_1957:batch_driver_scm",(void*)f_1957},
+{"f_1960:batch_driver_scm",(void*)f_1960},
{"f_1963:batch_driver_scm",(void*)f_1963},
-{"f_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_1937:batch_driver_scm",(void*)f_1937},
+{"f_1902:batch_driver_scm",(void*)f_1902},
+{"f_1908:batch_driver_scm",(void*)f_1908},
{"f_1916:batch_driver_scm",(void*)f_1916},
-{"f_1881:batch_driver_scm",(void*)f_1881},
+{"f_1924:batch_driver_scm",(void*)f_1924},
+{"f_1928:batch_driver_scm",(void*)f_1928},
+{"f_1822:batch_driver_scm",(void*)f_1822},
+{"f_1891:batch_driver_scm",(void*)f_1891},
{"f_1887:batch_driver_scm",(void*)f_1887},
-{"f_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_1871:batch_driver_scm",(void*)f_1871},
+{"f_1863:batch_driver_scm",(void*)f_1863},
+{"f_1832:batch_driver_scm",(void*)f_1832},
+{"f_1773:batch_driver_scm",(void*)f_1773},
{"f_1780:batch_driver_scm",(void*)f_1780},
-{"f_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_1786:batch_driver_scm",(void*)f_1786},
+{"f_1801:batch_driver_scm",(void*)f_1801},
+{"f_1797:batch_driver_scm",(void*)f_1797},
+{"f_1783:batch_driver_scm",(void*)f_1783},
+{"f_1819:batch_driver_scm",(void*)f_1819},
+{"f_1730:batch_driver_scm",(void*)f_1730},
+{"f_1737:batch_driver_scm",(void*)f_1737},
+{"f_1742:batch_driver_scm",(void*)f_1742},
+{"f_1754:batch_driver_scm",(void*)f_1754},
+{"f_1760:batch_driver_scm",(void*)f_1760},
{"f_1706:batch_driver_scm",(void*)f_1706},
-{"f_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_1713:batch_driver_scm",(void*)f_1713},
+{"f_1716:batch_driver_scm",(void*)f_1716},
+{"f_1719:batch_driver_scm",(void*)f_1719},
+{"f_1722:batch_driver_scm",(void*)f_1722},
+{"f_1725:batch_driver_scm",(void*)f_1725},
+{"f_1684:batch_driver_scm",(void*)f_1684},
{"f_1691:batch_driver_scm",(void*)f_1691},
-{"f_1647:batch_driver_scm",(void*)f_1647},
-{"f_1651:batch_driver_scm",(void*)f_1651},
+{"f_1704:batch_driver_scm",(void*)f_1704},
{"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},
+{"f_1664:batch_driver_scm",(void*)f_1664},
+{"f_1673:batch_driver_scm",(void*)f_1673},
+{"f_1676:batch_driver_scm",(void*)f_1676},
+{"f_1679:batch_driver_scm",(void*)f_1679},
+{"f_1682:batch_driver_scm",(void*)f_1682},
+{"f_1645:batch_driver_scm",(void*)f_1645},
+{"f_1652:batch_driver_scm",(void*)f_1652},
+{"f_1655:batch_driver_scm",(void*)f_1655},
+{"f_1537:batch_driver_scm",(void*)f_1537},
{NULL,NULL}};
#endif
diff --git a/bootstrap/c-backend.c b/bootstrap/c-backend.c
index 43214066..fdf54a1e 100644
--- a/bootstrap/c-backend.c
+++ b/bootstrap/c-backend.c
@@ -1,9 +1,9 @@
/* 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)
+ 2010-02-22 11:33
+ Version 4.3.5
+ windows-mingw32-x86 [ manyargs dload ptables ]
+ compiled 2010-02-17 on lenovo-1 (MINGW32_NT-6.0)
command line: c-backend.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -no-lambda-info -local -extend private-namespace.scm -output-file c-backend.c
unit: backend
*/
@@ -16,14 +16,13 @@ C_externimport void C_ccall C_library_toplevel(C_word c,C_word d,C_word k) C_nor
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 C_TLS C_word lf[864];
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){
+static C_word C_fcall stub2463(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub2463(C_word C_buf,C_word C_a0){
C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
C_word lit=(C_word )(C_a0);
return(C_header_size(lit));
@@ -32,10 +31,9 @@ C_ret:
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){
+static C_word C_fcall stub2459(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub2459(C_word C_buf,C_word C_a0){
C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
C_word lit=(C_word )(C_a0);
@@ -52,2645 +50,2674 @@ 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_2508)
+static void C_ccall f_2508(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2511)
+static void C_ccall f_2511(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10305)
+static void C_ccall f_10305(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10308)
+static void C_ccall f_10308(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10335)
+static void C_ccall f_10335(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10331)
+static void C_ccall f_10331(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10311)
+static void C_ccall f_10311(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10314)
+static void C_ccall f_10314(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10327)
+static void C_ccall f_10327(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10317)
+static void C_ccall f_10317(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10320)
+static void C_ccall f_10320(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10323)
+static void C_ccall f_10323(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2597)
+static void C_ccall f_2597(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10005)
+static void C_ccall f_10005(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10281)
+static void C_ccall f_10281(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10279)
+static void C_ccall f_10279(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10267)
+static void C_ccall f_10267(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10237)
+static void C_ccall f_10237(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10198)
+static void C_ccall f_10198(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10185)
+static void C_ccall f_10185(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10181)
+static void C_ccall f_10181(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10067)
+static void C_ccall f_10067(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10014)
+static C_word C_fcall f_10014(C_word *a,C_word t0);
+C_noret_decl(f_9398)
+static void C_ccall f_9398(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9509)
+static void C_fcall f_9509(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9674)
+static void C_ccall f_9674(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9701)
+static void C_fcall f_9701(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9879)
+static void C_ccall f_9879(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9882)
+static void C_ccall f_9882(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9885)
+static void C_ccall f_9885(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9888)
+static void C_ccall f_9888(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9858)
+static void C_ccall f_9858(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9861)
+static void C_ccall f_9861(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9864)
+static void C_ccall f_9864(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9867)
+static void C_ccall f_9867(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9837)
+static void C_ccall f_9837(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9840)
+static void C_ccall f_9840(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9843)
+static void C_ccall f_9843(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9846)
+static void C_ccall f_9846(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9800)
+static void C_ccall f_9800(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9803)
+static void C_ccall f_9803(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9806)
+static void C_ccall f_9806(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9809)
+static void C_ccall f_9809(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9779)
+static void C_ccall f_9779(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9782)
+static void C_ccall f_9782(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9785)
+static void C_ccall f_9785(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9788)
+static void C_ccall f_9788(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9758)
+static void C_ccall f_9758(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9761)
+static void C_ccall f_9761(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9764)
+static void C_ccall f_9764(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9767)
+static void C_ccall f_9767(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9737)
+static void C_ccall f_9737(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9740)
+static void C_ccall f_9740(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9743)
+static void C_ccall f_9743(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9746)
+static void C_ccall f_9746(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9716)
+static void C_ccall f_9716(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9719)
+static void C_ccall f_9719(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_9722)
static void C_ccall f_9722(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_9725)
static void C_ccall f_9725(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_9678)
+static void C_fcall f_9678(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9644)
+static void C_ccall f_9644(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9647)
+static void C_ccall f_9647(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9650)
+static void C_ccall f_9650(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9653)
+static void C_ccall f_9653(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9623)
+static void C_ccall f_9623(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9626)
+static void C_ccall f_9626(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9629)
+static void C_ccall f_9629(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9632)
+static void C_ccall f_9632(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9602)
+static void C_ccall f_9602(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9605)
+static void C_ccall f_9605(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9608)
+static void C_ccall f_9608(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9611)
+static void C_ccall f_9611(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9578)
+static void C_ccall f_9578(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9581)
+static void C_ccall f_9581(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9584)
+static void C_ccall f_9584(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9587)
+static void C_ccall f_9587(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9557)
+static void C_ccall f_9557(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9560)
+static void C_ccall f_9560(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9563)
+static void C_ccall f_9563(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9566)
+static void C_ccall f_9566(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9533)
+static void C_ccall f_9533(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9536)
+static void C_ccall f_9536(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9539)
+static void C_ccall f_9539(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9542)
+static void C_ccall f_9542(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9512)
+static void C_ccall f_9512(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9515)
+static void C_ccall f_9515(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9518)
+static void C_ccall f_9518(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_9521)
-static void C_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;
+static void C_ccall f_9521(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9488)
+static void C_ccall f_9488(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9491)
+static void C_ccall f_9491(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9494)
+static void C_ccall f_9494(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9497)
+static void C_ccall f_9497(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9467)
+static void C_ccall f_9467(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9470)
+static void C_ccall f_9470(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9473)
+static void C_ccall f_9473(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9476)
+static void C_ccall f_9476(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_9400)
-static void C_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;
+static void C_fcall f_9400(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8908)
+static void C_ccall f_8908(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8938)
+static void C_fcall f_8938(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8965)
+static void C_fcall f_8965(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9160)
+static void C_fcall f_9160(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9169)
+static void C_fcall f_9169(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9178)
+static void C_ccall f_9178(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9205)
+static void C_fcall f_9205(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9282)
+static void C_ccall f_9282(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8910)
+static void C_fcall f_8910(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8024)
+static void C_ccall f_8024(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8101)
+static void C_fcall f_8101(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8203)
+static void C_fcall f_8203(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8236)
+static void C_fcall f_8236(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8332)
+static void C_fcall f_8332(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8344)
+static void C_fcall f_8344(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8359)
+static void C_ccall f_8359(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8404)
+static void C_fcall f_8404(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8421)
+static void C_fcall f_8421(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8438)
+static void C_fcall f_8438(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8477)
+static void C_fcall f_8477(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8494)
+static void C_fcall f_8494(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8511)
+static void C_fcall f_8511(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8528)
+static void C_fcall f_8528(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8545)
+static void C_fcall f_8545(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8562)
+static void C_fcall f_8562(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8579)
+static void C_fcall f_8579(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8591)
+static void C_ccall f_8591(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8598)
+static void C_ccall f_8598(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8608)
+static void C_fcall f_8608(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8648)
+static void C_ccall f_8648(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8618)
+static void C_fcall f_8618(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8606)
+static void C_ccall f_8606(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8602)
+static void C_ccall f_8602(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8569)
+static void C_ccall f_8569(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8552)
+static void C_ccall f_8552(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8535)
+static void C_ccall f_8535(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8518)
+static void C_ccall f_8518(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8501)
+static void C_ccall f_8501(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8484)
+static void C_ccall f_8484(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_8449)
static void C_ccall f_8449(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8459)
+static void C_ccall f_8459(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8457)
+static void C_ccall f_8457(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8453)
+static void C_ccall f_8453(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_8445)
static void C_ccall f_8445(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_8432)
+static void C_ccall f_8432(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8415)
+static void C_ccall f_8415(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8363)
+static void C_fcall f_8363(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8031)
+static void C_fcall f_8031(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8026)
+static void C_fcall f_8026(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7959)
+static void C_ccall f_7959(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7963)
+static void C_ccall f_7963(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7966)
+static void C_ccall f_7966(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7969)
+static void C_ccall f_7969(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7972)
+static void C_ccall f_7972(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7978)
+static void C_ccall f_7978(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8022)
+static void C_ccall f_8022(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7981)
+static void C_ccall f_7981(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7989)
+static void C_ccall f_7989(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8010)
+static void C_ccall f_8010(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7993)
+static void C_ccall f_7993(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7984)
+static void C_ccall f_7984(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7465)
+static void C_ccall f_7465(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7471)
+static void C_fcall f_7471(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7946)
+static void C_ccall f_7946(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7479)
+static void C_fcall f_7479(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7483)
+static void C_ccall f_7483(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7486)
+static void C_ccall f_7486(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7489)
+static void C_ccall f_7489(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7492)
+static void C_ccall f_7492(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7498)
+static void C_ccall f_7498(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7844)
+static void C_ccall f_7844(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7847)
+static void C_ccall f_7847(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7943)
+static void C_ccall f_7943(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7850)
+static void C_ccall f_7850(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7853)
static void C_ccall f_7853(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7856)
+static void C_ccall f_7856(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7859)
+static void C_ccall f_7859(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7892)
+static void C_fcall f_7892(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7908)
+static void C_ccall f_7908(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7911)
+static void C_ccall f_7911(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7862)
+static void C_ccall f_7862(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7890)
+static void C_ccall f_7890(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7865)
+static void C_ccall f_7865(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7868)
+static void C_ccall f_7868(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7871)
+static void C_ccall f_7871(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7500)
+static void C_ccall f_7500(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7510)
+static void C_fcall f_7510(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7519)
+static void C_fcall f_7519(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7531)
+static void C_fcall f_7531(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7543)
+static void C_fcall f_7543(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7549)
+static void C_ccall f_7549(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7588)
+static void C_fcall f_7588(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7553)
+static void C_fcall f_7553(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7151)
+static void C_ccall f_7151(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7157)
+static void C_fcall f_7157(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7452)
+static void C_ccall f_7452(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7165)
+static void C_fcall f_7165(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7169)
+static void C_ccall f_7169(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7172)
static void C_ccall f_7172(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7175)
+static void C_ccall f_7175(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7449)
+static void C_ccall f_7449(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7181)
-static void C_fcall f_7181(C_word t0,C_word t1) C_noret;
+static void C_ccall f_7181(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7184)
+static void C_ccall f_7184(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7187)
+static void C_ccall f_7187(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7190)
+static void C_ccall f_7190(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7193)
+static void C_ccall f_7193(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7196)
+static void C_ccall f_7196(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7199)
+static void C_ccall f_7199(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7202)
+static void C_ccall f_7202(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7205)
+static void C_ccall f_7205(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7208)
static void C_ccall f_7208(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7438)
+static void C_ccall f_7438(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7211)
static void C_ccall f_7211(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7214)
static void C_ccall f_7214(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7217)
+static void C_ccall f_7217(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7220)
static void C_ccall f_7220(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7223)
+static void C_ccall f_7223(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7226)
+static void C_ccall f_7226(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7229)
+static void C_ccall f_7229(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7232)
+static void C_ccall f_7232(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7329)
+static void C_ccall f_7329(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7331)
+static void C_fcall f_7331(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7338)
+static void C_fcall f_7338(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7365)
+static void C_ccall f_7365(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7368)
+static void C_ccall f_7368(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7371)
+static void C_ccall f_7371(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7359)
+static void C_ccall f_7359(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7347)
+static void C_ccall f_7347(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7351)
+static void C_ccall f_7351(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7355)
+static void C_ccall f_7355(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7377)
+static void C_ccall f_7377(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7235)
+static void C_ccall f_7235(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7238)
+static void C_ccall f_7238(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7268)
+static void C_ccall f_7268(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7271)
+static void C_ccall f_7271(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7309)
+static void C_ccall f_7309(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7305)
+static void C_ccall f_7305(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7274)
+static void C_ccall f_7274(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7277)
+static void C_ccall f_7277(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7280)
+static void C_ccall f_7280(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7247)
+static void C_ccall f_7247(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7250)
+static void C_ccall f_7250(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7241)
+static void C_ccall f_7241(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7111)
-static void C_ccall f_7111(C_word c,C_word t0,C_word t1) C_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;
+static void C_ccall f_7111(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_7117)
-static void C_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;
+static void C_fcall f_7117(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7129)
+static void C_ccall f_7129(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7132)
+static void C_ccall f_7132(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7138)
+static void C_ccall f_7138(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7057)
+static void C_ccall f_7057(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7061)
+static void C_ccall f_7061(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7066)
+static void C_fcall f_7066(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7095)
+static void C_ccall f_7095(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7098)
+static void C_ccall f_7098(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7041)
+static void C_ccall f_7041(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7047)
+static void C_ccall f_7047(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7055)
+static void C_ccall f_7055(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7025)
+static void C_ccall f_7025(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7031)
+static void C_ccall f_7031(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7039)
+static void C_ccall f_7039(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6936)
+static void C_ccall f_6936(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6945)
+static void C_fcall f_6945(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6974)
+static void C_fcall f_6974(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6984)
+static void C_ccall f_6984(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6859)
+static void C_ccall f_6859(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6863)
+static void C_ccall f_6863(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6877)
+static void C_fcall f_6877(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_6890)
-static void C_ccall f_6890(C_word c,C_word t0,C_word t1,C_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;
+static void C_ccall f_6890(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6922)
+static void C_ccall f_6922(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6893)
+static void C_ccall f_6893(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6896)
+static void C_ccall f_6896(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6866)
+static void C_ccall f_6866(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6869)
+static void C_ccall f_6869(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6872)
+static void C_ccall f_6872(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2599)
+static void C_ccall f_2599(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8) C_noret;
+C_noret_decl(f_6826)
+static void C_ccall f_6826(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6830)
+static void C_ccall f_6830(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6833)
+static void C_ccall f_6833(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6836)
+static void C_ccall f_6836(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6839)
+static void C_ccall f_6839(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6842)
+static void C_ccall f_6842(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6845)
+static void C_ccall f_6845(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6848)
+static void C_ccall f_6848(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6851)
+static void C_ccall f_6851(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6854)
+static void C_ccall f_6854(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6041)
+static void C_fcall f_6041(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6047)
+static void C_fcall f_6047(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6812)
+static void C_ccall f_6812(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6055)
+static void C_fcall f_6055(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6059)
+static void C_ccall f_6059(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6062)
+static void C_ccall f_6062(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6065)
+static void C_ccall f_6065(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6068)
+static void C_ccall f_6068(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6071)
+static void C_ccall f_6071(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6074)
+static void C_ccall f_6074(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6809)
+static void C_ccall f_6809(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6077)
+static void C_fcall f_6077(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6083)
+static void C_ccall f_6083(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6086)
+static void C_ccall f_6086(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6089)
+static void C_ccall f_6089(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6092)
+static void C_ccall f_6092(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6095)
+static void C_ccall f_6095(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6098)
+static void C_ccall f_6098(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6101)
+static void C_ccall f_6101(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6104)
+static void C_ccall f_6104(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6107)
+static void C_ccall f_6107(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6110)
+static void C_ccall f_6110(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6113)
+static void C_ccall f_6113(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6116)
+static void C_ccall f_6116(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6119)
+static void C_ccall f_6119(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6778)
+static void C_ccall f_6778(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6122)
+static void C_ccall f_6122(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_6739)
static void C_ccall f_6739(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_6742)
+static void C_ccall f_6742(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6745)
+static void C_ccall f_6745(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6761)
+static void C_ccall f_6761(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6764)
+static void C_ccall f_6764(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6125)
+static void C_ccall f_6125(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6128)
+static void C_ccall f_6128(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6131)
+static void C_ccall f_6131(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6711)
+static void C_fcall f_6711(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6714)
+static void C_ccall f_6714(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6134)
+static void C_ccall f_6134(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6137)
+static void C_ccall f_6137(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6140)
+static void C_ccall f_6140(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6143)
+static void C_ccall f_6143(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6146)
+static void C_fcall f_6146(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6149)
+static void C_ccall f_6149(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6671)
+static void C_fcall f_6671(C_word t0,C_word t1) C_noret;
C_noret_decl(f_6673)
-static void C_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;
+static void C_fcall f_6673(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6683)
+static void C_ccall f_6683(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6624)
+static void C_ccall f_6624(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6629)
+static void C_fcall f_6629(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6645)
+static void C_ccall f_6645(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6656)
+static void C_ccall f_6656(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6152)
+static void C_ccall f_6152(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6573)
+static void C_fcall f_6573(C_word t0,C_word t1) C_noret;
C_noret_decl(f_6585)
static void C_ccall f_6585(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_6588)
static void C_ccall f_6588(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_6495)
+static void C_ccall f_6495(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6537)
+static void C_fcall f_6537(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6498)
+static void C_ccall f_6498(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6504)
+static void C_fcall f_6504(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6507)
+static void C_ccall f_6507(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6431)
+static void C_ccall f_6431(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6434)
+static void C_ccall f_6434(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6437)
+static void C_ccall f_6437(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6440)
+static void C_ccall f_6440(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6443)
+static void C_ccall f_6443(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6458)
+static void C_fcall f_6458(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6446)
+static void C_ccall f_6446(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6449)
+static void C_ccall f_6449(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6417)
+static void C_ccall f_6417(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6425)
+static void C_ccall f_6425(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6342)
+static void C_ccall f_6342(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6348)
+static void C_ccall f_6348(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6351)
+static void C_ccall f_6351(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6385)
+static void C_ccall f_6385(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6388)
+static void C_ccall f_6388(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6391)
+static void C_ccall f_6391(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6354)
+static void C_ccall f_6354(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6357)
+static void C_ccall f_6357(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6360)
+static void C_ccall f_6360(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6363)
+static void C_ccall f_6363(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6372)
+static void C_ccall f_6372(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6375)
+static void C_ccall f_6375(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6155)
+static void C_ccall f_6155(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6178)
+static void C_fcall f_6178(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6283)
+static void C_ccall f_6283(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6286)
+static void C_ccall f_6286(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6298)
+static void C_ccall f_6298(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6289)
+static void C_ccall f_6289(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_6184)
static void C_ccall f_6184(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_6187)
+static void C_ccall f_6187(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6270)
+static void C_ccall f_6270(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6190)
+static void C_ccall f_6190(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6193)
+static void C_ccall f_6193(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6196)
+static void C_ccall f_6196(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6199)
+static void C_ccall f_6199(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6264)
+static void C_ccall f_6264(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6260)
+static void C_ccall f_6260(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6202)
+static void C_ccall f_6202(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6205)
+static void C_ccall f_6205(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6208)
+static void C_ccall f_6208(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6211)
+static void C_ccall f_6211(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6214)
+static void C_ccall f_6214(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6217)
+static void C_ccall f_6217(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6235)
+static void C_fcall f_6235(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6245)
+static void C_ccall f_6245(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6220)
+static void C_ccall f_6220(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6158)
+static void C_ccall f_6158(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6168)
+static void C_ccall f_6168(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6161)
+static void C_ccall f_6161(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5993)
+static void C_fcall f_5993(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6000)
+static void C_ccall f_6000(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6003)
+static void C_ccall f_6003(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5916)
+static void C_fcall f_5916(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5923)
+static void C_ccall f_5923(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5926)
+static void C_ccall f_5926(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5931)
+static void C_fcall f_5931(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5987)
+static void C_ccall f_5987(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5983)
+static void C_ccall f_5983(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5968)
+static void C_ccall f_5968(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5947)
+static void C_fcall f_5947(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5958)
+static void C_ccall f_5958(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5954)
+static void C_ccall f_5954(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5774)
+static void C_fcall f_5774(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5914)
+static void C_ccall f_5914(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5781)
+static void C_fcall f_5781(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5787)
+static void C_ccall f_5787(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5870)
+static void C_fcall f_5870(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5873)
+static void C_ccall f_5873(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5883)
+static void C_ccall f_5883(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5876)
+static void C_ccall f_5876(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5837)
+static void C_ccall f_5837(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5843)
+static void C_ccall f_5843(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5580)
+static void C_fcall f_5580(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5587)
+static void C_ccall f_5587(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5696)
+static void C_ccall f_5696(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5714)
+static void C_ccall f_5714(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5743)
+static void C_fcall f_5743(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_5765)
-static void C_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;
+static void C_ccall f_5765(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5721)
+static void C_ccall f_5721(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5655)
+static void C_ccall f_5655(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5657)
+static void C_fcall f_5657(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5686)
+static void C_ccall f_5686(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5651)
+static void C_ccall f_5651(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5647)
+static void C_ccall f_5647(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5618)
+static void C_ccall f_5618(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5622)
+static void C_ccall f_5622(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5525)
+static void C_fcall f_5525(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5531)
+static void C_fcall f_5531(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5560)
+static void C_ccall f_5560(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5563)
+static void C_ccall f_5563(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5566)
+static void C_ccall f_5566(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5569)
+static void C_ccall f_5569(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5572)
+static void C_ccall f_5572(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5541)
+static void C_ccall f_5541(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5205)
+static void C_fcall f_5205(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5394)
+static void C_fcall f_5394(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5512)
+static void C_ccall f_5512(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5402)
+static void C_fcall f_5402(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5406)
+static void C_ccall f_5406(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5409)
+static void C_ccall f_5409(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5412)
+static void C_ccall f_5412(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5415)
+static void C_ccall f_5415(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5418)
+static void C_ccall f_5418(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5509)
+static void C_ccall f_5509(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5421)
+static void C_fcall f_5421(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5424)
+static void C_fcall f_5424(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5430)
+static void C_ccall f_5430(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5498)
+static void C_ccall f_5498(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5464)
static void C_ccall f_5464(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5467)
-static void C_ccall f_5467(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5470)
+static void C_fcall f_5470(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5478)
+static void C_ccall f_5478(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5474)
+static void C_ccall f_5474(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5436)
static void C_ccall f_5436(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_5439)
+static void C_ccall f_5439(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5442)
+static void C_ccall f_5442(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5445)
+static void C_ccall f_5445(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5448)
+static void C_ccall f_5448(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5458)
+static void C_ccall f_5458(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5451)
+static void C_ccall f_5451(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5324)
static void C_ccall f_5324(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5343)
+static void C_fcall f_5343(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5381)
+static void C_ccall f_5381(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5351)
+static void C_fcall f_5351(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5355)
+static void C_ccall f_5355(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5358)
+static void C_ccall f_5358(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5361)
+static void C_ccall f_5361(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5364)
+static void C_ccall f_5364(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5378)
+static void C_ccall f_5378(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5374)
+static void C_ccall f_5374(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5367)
+static void C_ccall f_5367(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5327)
static void C_ccall f_5327(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5341)
+static void C_ccall f_5341(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5330)
static void C_ccall f_5330(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_5337)
+static void C_ccall f_5337(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5244)
+static void C_fcall f_5244(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_5246)
-static void C_ccall f_5246(C_word c,C_word t0,C_word t1) C_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;
+static void C_ccall f_5246(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5250)
+static void C_ccall f_5250(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5253)
+static void C_ccall f_5253(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5256)
+static void C_ccall f_5256(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5259)
static void C_ccall f_5259(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5252)
-static void C_ccall f_5252(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5262)
+static void C_ccall f_5262(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5265)
+static void C_ccall f_5265(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5268)
+static void C_ccall f_5268(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5271)
+static void C_ccall f_5271(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5274)
+static void C_ccall f_5274(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5277)
+static void C_ccall f_5277(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5280)
+static void C_ccall f_5280(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5283)
+static void C_ccall f_5283(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5297)
+static void C_ccall f_5297(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5293)
+static void C_ccall f_5293(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5286)
+static void C_ccall f_5286(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5208)
+static void C_fcall f_5208(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5221)
+static void C_fcall f_5221(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5231)
+static void C_ccall f_5231(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5212)
static void C_ccall f_5212(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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;
+static void C_fcall f_4865(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4869)
+static void C_ccall f_4869(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4938)
+static void C_fcall f_4938(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5192)
+static void C_ccall f_5192(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4946)
+static void C_fcall f_4946(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4950)
+static void C_ccall f_4950(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4953)
+static void C_ccall f_4953(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5189)
+static void C_ccall f_5189(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4956)
+static void C_fcall f_4956(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5175)
+static void C_ccall f_5175(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4959)
+static void C_ccall f_4959(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4962)
+static void C_ccall f_4962(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4965)
+static void C_ccall f_4965(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4968)
+static void C_ccall f_4968(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4971)
+static void C_ccall f_4971(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4974)
+static void C_ccall f_4974(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5167)
+static void C_ccall f_5167(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4977)
+static void C_fcall f_4977(C_word t0,C_word t1) C_noret;
C_noret_decl(f_4980)
static void C_ccall f_4980(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5121)
+static void C_ccall f_5121(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5123)
+static void C_fcall f_5123(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5149)
+static void C_ccall f_5149(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5131)
+static void C_fcall f_5131(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5142)
+static void C_ccall f_5142(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4983)
static void C_ccall f_4983(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f11016)
-static void C_ccall f11016(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5070)
+static void C_ccall f_5070(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5073)
+static void C_ccall f_5073(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5076)
+static void C_ccall f_5076(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5079)
+static void C_ccall f_5079(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5095)
+static void C_ccall f_5095(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5098)
+static void C_ccall f_5098(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f11178)
+static void C_ccall f11178(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5101)
+static void C_ccall f_5101(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5104)
+static void C_ccall f_5104(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4986)
static void C_ccall f_4986(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4989)
static void C_ccall f_4989(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_4992)
+static void C_ccall f_4992(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5042)
+static void C_fcall f_5042(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5045)
+static void C_ccall f_5045(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4995)
+static void C_ccall f_4995(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4998)
+static void C_ccall f_4998(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5030)
+static void C_ccall f_5030(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5033)
+static void C_ccall f_5033(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5004)
+static void C_ccall f_5004(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5013)
+static void C_ccall f_5013(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5016)
+static void C_ccall f_5016(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4872)
+static void C_ccall f_4872(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4877)
-static void C_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;
+static void C_fcall f_4877(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_4889)
static void C_ccall f_4889(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_4898)
-static void C_ccall f_4898(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4899)
+static void C_ccall f_4899(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4901)
-static void C_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;
+static void C_fcall f_4901(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4911)
+static void C_ccall f_4911(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4892)
+static void C_ccall f_4892(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4925)
+static void C_ccall f_4925(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4694)
+static void C_fcall f_4694(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4701)
+static void C_ccall f_4701(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4837)
+static void C_fcall f_4837(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4852)
+static void C_ccall f_4852(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4704)
+static void C_ccall f_4704(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4707)
+static void C_ccall f_4707(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4710)
+static void C_ccall f_4710(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4715)
+static void C_fcall f_4715(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4725)
+static void C_ccall f_4725(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4731)
+static void C_ccall f_4731(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4784)
-static void C_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;
+static void C_fcall f_4784(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4794)
+static void C_ccall f_4794(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4734)
+static void C_ccall f_4734(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4757)
+static void C_fcall f_4757(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4767)
+static void C_ccall f_4767(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4737)
static void C_ccall f_4737(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_4740)
+static void C_ccall f_4740(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4525)
+static void C_fcall f_4525(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4686)
+static void C_ccall f_4686(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4545)
+static void C_ccall f_4545(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4644)
+static void C_ccall f_4644(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4648)
+static void C_ccall f_4648(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4652)
static void C_ccall f_4652(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_4656)
+static void C_ccall f_4656(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4678)
+static void C_ccall f_4678(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4674)
+static void C_ccall f_4674(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4666)
+static void C_ccall f_4666(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4664)
+static void C_ccall f_4664(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4660)
+static void C_ccall f_4660(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4563)
static void C_ccall f_4563(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_4566)
+static void C_ccall f_4566(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4569)
+static void C_ccall f_4569(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4633)
+static void C_ccall f_4633(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4572)
+static void C_ccall f_4572(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4575)
+static void C_ccall f_4575(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4578)
+static void C_ccall f_4578(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4593)
+static void C_ccall f_4593(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4598)
+static void C_fcall f_4598(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4613)
+static void C_ccall f_4613(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4581)
+static void C_ccall f_4581(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4528)
+static void C_fcall f_4528(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4542)
+static void C_ccall f_4542(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2644)
+static void C_fcall f_2644(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_4493)
+static void C_fcall f_4493(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4499)
+static void C_ccall f_4499(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4503)
+static void C_ccall f_4503(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2647)
+static void C_fcall f_2647(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4449)
+static void C_ccall f_4449(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4452)
+static void C_ccall f_4452(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4455)
+static void C_ccall f_4455(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4458)
+static void C_ccall f_4458(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4461)
+static void C_ccall f_4461(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4464)
+static void C_ccall f_4464(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4366)
+static void C_ccall f_4366(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4369)
+static void C_ccall f_4369(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4372)
+static void C_ccall f_4372(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4385)
+static void C_fcall f_4385(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4408)
+static void C_ccall f_4408(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4411)
+static void C_ccall f_4411(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4414)
+static void C_ccall f_4414(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4417)
+static void C_ccall f_4417(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4395)
+static void C_ccall f_4395(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4398)
+static void C_ccall f_4398(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4347)
+static void C_ccall f_4347(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4350)
+static void C_ccall f_4350(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4324)
+static void C_ccall f_4324(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4327)
+static void C_ccall f_4327(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4302)
static void C_ccall f_4302(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_4274)
+static void C_ccall f_4274(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4277)
+static void C_ccall f_4277(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4294)
+static void C_ccall f_4294(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4280)
+static void C_ccall f_4280(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4283)
+static void C_ccall f_4283(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4258)
+static void C_ccall f_4258(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4262)
+static void C_ccall f_4262(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4244)
+static void C_ccall f_4244(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4247)
+static void C_ccall f_4247(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4228)
+static void C_ccall f_4228(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4232)
static void C_ccall f_4232(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_4210)
+static void C_ccall f_4210(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4213)
+static void C_ccall f_4213(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4190)
+static void C_ccall f_4190(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4154)
+static void C_ccall f_4154(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4166)
+static void C_ccall f_4166(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4157)
+static void C_ccall f_4157(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4135)
+static void C_ccall f_4135(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4138)
+static void C_ccall f_4138(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4116)
+static void C_ccall f_4116(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4119)
+static void C_ccall f_4119(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4097)
+static void C_ccall f_4097(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4100)
+static void C_ccall f_4100(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4078)
+static void C_ccall f_4078(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4074)
+static void C_ccall f_4074(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4022)
+static void C_ccall f_4022(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4055)
+static void C_ccall f_4055(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4025)
+static void C_ccall f_4025(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4043)
+static void C_ccall f_4043(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4028)
+static void C_ccall f_4028(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4031)
+static void C_ccall f_4031(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3989)
+static void C_ccall f_3989(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3973)
+static void C_ccall f_3973(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f11150)
+static void C_ccall f11150(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3976)
+static void C_ccall f_3976(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3979)
+static void C_ccall f_3979(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3860)
+static void C_ccall f_3860(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3863)
+static void C_ccall f_3863(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3920)
+static void C_fcall f_3920(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3941)
+static void C_ccall f_3941(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3928)
-static void C_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;
+static void C_fcall f_3928(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3932)
+static void C_ccall f_3932(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3935)
+static void C_ccall f_3935(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3866)
+static void C_ccall f_3866(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3876)
+static void C_ccall f_3876(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3878)
+static void C_fcall f_3878(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3893)
+static void C_ccall f_3893(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3869)
-static void C_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;
+static void C_ccall f_3869(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3401)
static void C_ccall f_3401(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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;
+static void C_fcall f_3404(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3810)
+static void C_ccall f_3810(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3806)
+static void C_ccall f_3806(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3410)
-static void C_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;
+static void C_fcall f_3410(C_word t0,C_word t1) C_noret;
+C_noret_decl(f11142)
+static void C_ccall f11142(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3799)
+static void C_ccall f_3799(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2632)
+static void C_ccall f_2632(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3792)
+static void C_ccall f_3792(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3416)
static void C_ccall f_3416(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_3620)
+static void C_fcall f_3620(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3709)
+static void C_ccall f_3709(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3712)
+static void C_ccall f_3712(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3715)
+static void C_ccall f_3715(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3730)
+static void C_fcall f_3730(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3718)
+static void C_ccall f_3718(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3721)
+static void C_ccall f_3721(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3724)
+static void C_ccall f_3724(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3640)
+static void C_ccall f_3640(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3706)
+static void C_ccall f_3706(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3699)
+static void C_ccall f_3699(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3695)
+static void C_ccall f_3695(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3688)
+static void C_ccall f_3688(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3681)
+static void C_ccall f_3681(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3656)
+static void C_ccall f_3656(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3673)
+static void C_ccall f_3673(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3669)
+static void C_ccall f_3669(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3643)
+static void C_ccall f_3643(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3646)
+static void C_ccall f_3646(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3649)
+static void C_ccall f_3649(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3614)
+static void C_ccall f_3614(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3452)
+static void C_ccall f_3452(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3598)
+static void C_ccall f_3598(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3601)
+static void C_ccall f_3601(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3574)
+static void C_ccall f_3574(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3577)
+static void C_ccall f_3577(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3580)
+static void C_ccall f_3580(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f11137)
+static void C_ccall f11137(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3583)
+static void C_ccall f_3583(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3586)
+static void C_ccall f_3586(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3455)
+static void C_ccall f_3455(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3458)
+static void C_ccall f_3458(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3521)
+static void C_fcall f_3521(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3542)
+static void C_ccall f_3542(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3529)
+static void C_fcall f_3529(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3533)
+static void C_ccall f_3533(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3536)
+static void C_ccall f_3536(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3461)
+static void C_ccall f_3461(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3477)
+static void C_ccall f_3477(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3479)
+static void C_fcall f_3479(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3494)
+static void C_ccall f_3494(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3464)
+static void C_ccall f_3464(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3467)
+static void C_ccall f_3467(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3433)
+static void C_ccall f_3433(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3436)
+static void C_ccall f_3436(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3368)
+static void C_ccall f_3368(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f11129)
+static void C_ccall f11129(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3364)
+static void C_ccall f_3364(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3350)
+static void C_ccall f_3350(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3353)
+static void C_ccall f_3353(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3347)
+static void C_ccall f_3347(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f11124)
+static void C_ccall f11124(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3343)
+static void C_ccall f_3343(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3329)
+static void C_ccall f_3329(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3332)
+static void C_ccall f_3332(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3281)
static void C_ccall f_3281(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_3302)
+static void C_ccall f_3302(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f11119)
+static void C_ccall f11119(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3298)
+static void C_ccall f_3298(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3284)
+static void C_ccall f_3284(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3287)
+static void C_ccall f_3287(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3250)
+static void C_ccall f_3250(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3246)
+static void C_ccall f_3246(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3204)
+static void C_ccall f_3204(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3172)
+static void C_ccall f_3172(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3175)
+static void C_ccall f_3175(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3101)
+static void C_ccall f_3101(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3115)
+static void C_ccall f_3115(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3117)
+static void C_fcall f_3117(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3138)
+static void C_ccall f_3138(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3125)
+static void C_fcall f_3125(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3129)
+static void C_ccall f_3129(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3132)
+static void C_ccall f_3132(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3104)
+static void C_ccall f_3104(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3069)
+static void C_ccall f_3069(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3072)
+static void C_ccall f_3072(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3075)
+static void C_ccall f_3075(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3078)
static void C_ccall f_3078(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_noret_decl(f_3040)
+static void C_ccall f_3040(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3043)
+static void C_ccall f_3043(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3046)
+static void C_ccall f_3046(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3049)
+static void C_ccall f_3049(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3003)
+static void C_ccall f_3003(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3006)
+static void C_ccall f_3006(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3009)
+static void C_ccall f_3009(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3012)
+static void C_ccall f_3012(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2970)
+static void C_ccall f_2970(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2973)
+static void C_ccall f_2973(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2976)
+static void C_ccall f_2976(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2979)
+static void C_ccall f_2979(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2951)
+static void C_ccall f_2951(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2954)
+static void C_ccall f_2954(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2924)
+static void C_ccall f_2924(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2927)
+static void C_ccall f_2927(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2898)
+static void C_ccall f_2898(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2901)
+static void C_ccall f_2901(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2904)
+static void C_ccall f_2904(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2844)
+static void C_fcall f_2844(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2854)
+static void C_ccall f_2854(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2857)
+static void C_ccall f_2857(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2860)
+static void C_ccall f_2860(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2786)
+static void C_ccall f_2786(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2789)
+static void C_ccall f_2789(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2792)
+static void C_ccall f_2792(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2795)
+static void C_ccall f_2795(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2798)
+static void C_ccall f_2798(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2801)
+static void C_ccall f_2801(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2602)
+static void C_fcall f_2602(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2614)
+static void C_ccall f_2614(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2622)
+static void C_ccall f_2622(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2606)
+static void C_ccall f_2606(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2557)
+static void C_ccall f_2557(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2565)
+static void C_ccall f_2565(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2567)
+static void C_fcall f_2567(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2582)
+static void C_ccall f_2582(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2514)
+static void C_ccall f_2514(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_2514)
+static void C_ccall f_2514r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_2520)
+static void C_fcall f_2520(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2544)
+static void C_ccall f_2544(C_word c,C_word t0,C_word t1) C_noret;
+
+C_noret_decl(trf_9509)
+static void C_fcall trf_9509(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9509(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9352(t0,t1);}
+f_9509(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_noret_decl(trf_9701)
+static void C_fcall trf_9701(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9701(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9544(t0,t1);}
+f_9701(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_noret_decl(trf_9678)
+static void C_fcall trf_9678(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9678(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_9521(t0,t1,t2);}
+f_9678(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_noret_decl(trf_9400)
+static void C_fcall trf_9400(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9400(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9243(t0,t1);}
+f_9400(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_noret_decl(trf_8938)
+static void C_fcall trf_8938(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8938(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8781(t0,t1);}
+f_8938(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_noret_decl(trf_8965)
+static void C_fcall trf_8965(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8965(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8808(t0,t1);}
+f_8965(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_noret_decl(trf_9160)
+static void C_fcall trf_9160(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9160(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9003(t0,t1);}
+f_9160(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_noret_decl(trf_9169)
+static void C_fcall trf_9169(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9169(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9012(t0,t1);}
+f_9169(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_noret_decl(trf_9205)
+static void C_fcall trf_9205(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9205(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9048(t0,t1);}
+f_9205(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_noret_decl(trf_8910)
+static void C_fcall trf_8910(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8910(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8753(t0,t1);}
+f_8910(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_noret_decl(trf_8101)
+static void C_fcall trf_8101(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8101(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7944(t0,t1);}
+f_8101(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_noret_decl(trf_8203)
+static void C_fcall trf_8203(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8203(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8046(t0,t1);}
+f_8203(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_noret_decl(trf_8236)
+static void C_fcall trf_8236(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8236(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8079(t0,t1);}
+f_8236(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_noret_decl(trf_8332)
+static void C_fcall trf_8332(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8332(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8175(t0,t1);}
+f_8332(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_noret_decl(trf_8344)
+static void C_fcall trf_8344(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8344(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8187(t0,t1);}
+f_8344(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_noret_decl(trf_8404)
+static void C_fcall trf_8404(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8404(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8247(t0,t1);}
+f_8404(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_noret_decl(trf_8421)
+static void C_fcall trf_8421(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8421(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8264(t0,t1);}
+f_8421(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_noret_decl(trf_8438)
+static void C_fcall trf_8438(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8438(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8281(t0,t1);}
+f_8438(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_noret_decl(trf_8477)
+static void C_fcall trf_8477(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8477(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8320(t0,t1);}
+f_8477(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_noret_decl(trf_8494)
+static void C_fcall trf_8494(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8494(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8337(t0,t1);}
+f_8494(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_noret_decl(trf_8511)
+static void C_fcall trf_8511(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8511(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8354(t0,t1);}
+f_8511(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_noret_decl(trf_8528)
+static void C_fcall trf_8528(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8528(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8371(t0,t1);}
+f_8528(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_noret_decl(trf_8545)
+static void C_fcall trf_8545(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8545(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8388(t0,t1);}
+f_8545(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_noret_decl(trf_8562)
+static void C_fcall trf_8562(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8562(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8405(t0,t1);}
+f_8562(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_noret_decl(trf_8579)
+static void C_fcall trf_8579(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8579(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8422(t0,t1);}
+f_8579(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_noret_decl(trf_8608)
+static void C_fcall trf_8608(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8608(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8451(t0,t1,t2);}
+f_8608(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_noret_decl(trf_8618)
+static void C_fcall trf_8618(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8618(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8461(t0,t1);}
+f_8618(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_noret_decl(trf_8363)
+static void C_fcall trf_8363(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8363(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8206(t0,t1,t2);}
+f_8363(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_noret_decl(trf_8031)
+static void C_fcall trf_8031(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8031(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7874(t0,t1,t2);}
+f_8031(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_noret_decl(trf_8026)
+static void C_fcall trf_8026(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8026(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7869(t0,t1);}
+f_8026(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_noret_decl(trf_7471)
+static void C_fcall trf_7471(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7471(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7314(t0,t1,t2);}
+f_7471(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_noret_decl(trf_7479)
+static void C_fcall trf_7479(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7479(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7322(t0,t1,t2);}
+f_7479(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_noret_decl(trf_7892)
+static void C_fcall trf_7892(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7892(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_7735(t0,t1,t2,t3);}
+f_7892(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_noret_decl(trf_7510)
+static void C_fcall trf_7510(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7510(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7353(t0,t1);}
+f_7510(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_noret_decl(trf_7519)
+static void C_fcall trf_7519(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7519(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7362(t0,t1);}
+f_7519(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_noret_decl(trf_7531)
+static void C_fcall trf_7531(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7531(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7374(t0,t1);}
+f_7531(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_noret_decl(trf_7543)
+static void C_fcall trf_7543(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7543(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7386(t0,t1);}
+f_7543(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_noret_decl(trf_7588)
+static void C_fcall trf_7588(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7588(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7431(t0,t1);}
+f_7588(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_noret_decl(trf_7553)
+static void C_fcall trf_7553(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7553(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7396(t0,t1,t2);}
+f_7553(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_noret_decl(trf_7157)
+static void C_fcall trf_7157(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7157(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7000(t0,t1,t2);}
+f_7157(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_noret_decl(trf_7165)
+static void C_fcall trf_7165(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7165(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7008(t0,t1,t2);}
+f_7165(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_noret_decl(trf_7331)
+static void C_fcall trf_7331(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7331(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_7174(t0,t1,t2,t3,t4);}
+f_7331(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_noret_decl(trf_7338)
+static void C_fcall trf_7338(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7338(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7181(t0,t1);}
+f_7338(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_noret_decl(trf_7117)
+static void C_fcall trf_7117(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7117(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6960(t0,t1,t2);}
+f_7117(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_noret_decl(trf_7066)
+static void C_fcall trf_7066(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7066(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6909(t0,t1,t2);}
+f_7066(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_noret_decl(trf_6945)
+static void C_fcall trf_6945(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6945(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6788(t0,t1,t2);}
+f_6945(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_noret_decl(trf_6974)
+static void C_fcall trf_6974(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6974(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6817(t0,t1);}
+f_6974(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_noret_decl(trf_6877)
+static void C_fcall trf_6877(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6877(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6720(t0,t1,t2);}
+f_6877(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_noret_decl(trf_6041)
+static void C_fcall trf_6041(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6041(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_5900(t0,t1);}
+f_6041(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_noret_decl(trf_6047)
+static void C_fcall trf_6047(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6047(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5906(t0,t1,t2);}
+f_6047(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_noret_decl(trf_6055)
+static void C_fcall trf_6055(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6055(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5914(t0,t1,t2);}
+f_6055(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_noret_decl(trf_6077)
+static void C_fcall trf_6077(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6077(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_5936(t0,t1);}
+f_6077(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_noret_decl(trf_6711)
+static void C_fcall trf_6711(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6711(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6554(t0,t1);}
+f_6711(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_noret_decl(trf_6146)
+static void C_fcall trf_6146(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6146(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6002(t0,t1);}
+f_6146(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_noret_decl(trf_6671)
+static void C_fcall trf_6671(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6671(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6514(t0,t1);}
+f_6671(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_noret_decl(trf_6673)
+static void C_fcall trf_6673(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6673(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_6516(t0,t1,t2,t3);}
+f_6673(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6629)
+static void C_fcall trf_6629(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6629(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6629(t0,t1,t2);}
-C_noret_decl(trf_6459)
-static void C_fcall trf_6459(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_6459(void *dummy){
+C_noret_decl(trf_6573)
+static void C_fcall trf_6573(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6573(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6459(t0,t1);}
+f_6573(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_noret_decl(trf_6537)
+static void C_fcall trf_6537(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6537(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6423(t0,t1);}
+f_6537(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_noret_decl(trf_6504)
+static void C_fcall trf_6504(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6504(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6390(t0,t1);}
+f_6504(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_noret_decl(trf_6458)
+static void C_fcall trf_6458(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6458(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6344(t0,t1);}
+f_6458(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_noret_decl(trf_6178)
+static void C_fcall trf_6178(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6178(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6034(t0,t1);}
+f_6178(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_noret_decl(trf_6235)
+static void C_fcall trf_6235(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6235(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_6094(t0,t1,t2,t3);}
+f_6235(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_noret_decl(trf_5993)
+static void C_fcall trf_5993(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5993(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_5888(t0,t1,t2,t3);}
+f_5993(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_noret_decl(trf_5916)
+static void C_fcall trf_5916(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5916(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5811(t0,t1,t2);}
+f_5916(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_noret_decl(trf_5931)
+static void C_fcall trf_5931(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5931(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_5826(t0,t1,t2,t3);}
+f_5931(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_noret_decl(trf_5947)
+static void C_fcall trf_5947(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5947(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_5842(t0,t1);}
+f_5947(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_noret_decl(trf_5774)
+static void C_fcall trf_5774(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5774(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_5669(t0,t1,t2,t3);}
+f_5774(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_noret_decl(trf_5781)
+static void C_fcall trf_5781(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5781(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_5676(t0,t1);}
+f_5781(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_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_5765(t0,t1);}
+f_5870(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_noret_decl(trf_5580)
+static void C_fcall trf_5580(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5580(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5475(t0,t1,t2);}
+f_5580(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_noret_decl(trf_5743)
+static void C_fcall trf_5743(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5743(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_5638(t0,t1,t2,t3);}
+f_5743(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_noret_decl(trf_5657)
+static void C_fcall trf_5657(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5657(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5552(t0,t1,t2);}
+f_5657(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_noret_decl(trf_5525)
+static void C_fcall trf_5525(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5525(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_5420(t0,t1);}
+f_5525(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_noret_decl(trf_5531)
+static void C_fcall trf_5531(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5531(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_5426(t0,t1,t2,t3);}
+f_5531(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_noret_decl(trf_5205)
+static void C_fcall trf_5205(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5205(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_5090(t0,t1);}
+f_5205(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_noret_decl(trf_5394)
+static void C_fcall trf_5394(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5394(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5279(t0,t1,t2);}
+f_5394(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_noret_decl(trf_5402)
+static void C_fcall trf_5402(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5402(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5287(t0,t1,t2);}
+f_5402(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_noret_decl(trf_5421)
+static void C_fcall trf_5421(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5421(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_5306(t0,t1);}
+f_5421(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_noret_decl(trf_5424)
+static void C_fcall trf_5424(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5424(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_5309(t0,t1);}
+f_5424(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_noret_decl(trf_5470)
+static void C_fcall trf_5470(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5470(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_5355(t0,t1);}
+f_5470(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_noret_decl(trf_5343)
+static void C_fcall trf_5343(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5343(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5228(t0,t1,t2);}
+f_5343(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_noret_decl(trf_5351)
+static void C_fcall trf_5351(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5351(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5236(t0,t1,t2);}
+f_5351(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_noret_decl(trf_5244)
+static void C_fcall trf_5244(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5244(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5129(t0,t1,t2);}
+f_5244(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_noret_decl(trf_5208)
+static void C_fcall trf_5208(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5208(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_5093(t0,t1);}
+f_5208(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_noret_decl(trf_5221)
+static void C_fcall trf_5221(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5221(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_5106(t0,t1,t2,t3);}
+f_5221(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_noret_decl(trf_4865)
+static void C_fcall trf_4865(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4865(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4750(t0,t1);}
+f_4865(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_noret_decl(trf_4938)
+static void C_fcall trf_4938(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4938(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4823(t0,t1,t2);}
+f_4938(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_noret_decl(trf_4946)
+static void C_fcall trf_4946(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4946(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4831(t0,t1,t2);}
+f_4946(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_noret_decl(trf_4956)
+static void C_fcall trf_4956(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4956(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4841(t0,t1);}
+f_4956(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_noret_decl(trf_4977)
+static void C_fcall trf_4977(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4977(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4862(t0,t1);}
+f_4977(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_noret_decl(trf_5123)
+static void C_fcall trf_5123(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5123(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5008(t0,t1,t2);}
+f_5123(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_noret_decl(trf_5131)
+static void C_fcall trf_5131(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5131(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5016(t0,t1,t2);}
+f_5131(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_noret_decl(trf_5042)
+static void C_fcall trf_5042(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5042(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4927(t0,t1);}
+f_5042(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_noret_decl(trf_4877)
+static void C_fcall trf_4877(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4877(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4762(t0,t1,t2);}
+f_4877(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_noret_decl(trf_4901)
+static void C_fcall trf_4901(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4901(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4786(t0,t1,t2);}
+f_4901(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_noret_decl(trf_4694)
+static void C_fcall trf_4694(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4694(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4579(t0,t1);}
+f_4694(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_noret_decl(trf_4837)
+static void C_fcall trf_4837(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4837(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4722(t0,t1,t2);}
+f_4837(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_noret_decl(trf_4715)
+static void C_fcall trf_4715(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4715(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_4600(t0,t1,t2,t3);}
+f_4715(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_noret_decl(trf_4784)
+static void C_fcall trf_4784(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4784(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4669(t0,t1,t2);}
+f_4784(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_noret_decl(trf_4757)
+static void C_fcall trf_4757(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4757(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4642(t0,t1,t2);}
+f_4757(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_noret_decl(trf_4525)
+static void C_fcall trf_4525(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4525(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4410(t0,t1);}
+f_4525(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_noret_decl(trf_4598)
+static void C_fcall trf_4598(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4598(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4483(t0,t1,t2);}
+f_4598(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_noret_decl(trf_4528)
+static void C_fcall trf_4528(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4528(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4413(t0,t1);}
+f_4528(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_noret_decl(trf_2644)
+static void C_fcall trf_2644(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2644(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_2622(t0,t1,t2,t3,t4);}
+f_2644(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_noret_decl(trf_4493)
+static void C_fcall trf_4493(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4493(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_4378(t0,t1,t2,t3);}
+f_4493(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_noret_decl(trf_2647)
+static void C_fcall trf_2647(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2647(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_2625(t0,t1,t2,t3);}
+f_2647(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_noret_decl(trf_4385)
+static void C_fcall trf_4385(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4385(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_4279(t0,t1,t2,t3);}
+f_4385(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_noret_decl(trf_3920)
+static void C_fcall trf_3920(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3920(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_3869(t0,t1,t2,t3);}
+f_3920(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_noret_decl(trf_3928)
+static void C_fcall trf_3928(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3928(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_3877(t0,t1,t2,t3);}
+f_3928(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_noret_decl(trf_3878)
+static void C_fcall trf_3878(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3878(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_3827(t0,t1,t2,t3);}
+f_3878(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_noret_decl(trf_3404)
+static void C_fcall trf_3404(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3404(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_3353(t0,t1);}
+f_3404(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_noret_decl(trf_3410)
+static void C_fcall trf_3410(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3410(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_3359(t0,t1);}
+f_3410(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_noret_decl(trf_3620)
+static void C_fcall trf_3620(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3620(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_3569(t0,t1);}
+f_3620(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_noret_decl(trf_3730)
+static void C_fcall trf_3730(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3730(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_3679(t0,t1);}
+f_3730(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_noret_decl(trf_3521)
+static void C_fcall trf_3521(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3521(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_3470(t0,t1,t2,t3);}
+f_3521(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_noret_decl(trf_3529)
+static void C_fcall trf_3529(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3529(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_3478(t0,t1,t2,t3);}
+f_3529(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_noret_decl(trf_3479)
+static void C_fcall trf_3479(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3479(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_3428(t0,t1,t2,t3);}
+f_3479(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_noret_decl(trf_3117)
+static void C_fcall trf_3117(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3117(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_3066(t0,t1,t2,t3);}
+f_3117(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_noret_decl(trf_3125)
+static void C_fcall trf_3125(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3125(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_3074(t0,t1,t2,t3);}
+f_3125(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_noret_decl(trf_2844)
+static void C_fcall trf_2844(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2844(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_2822(t0,t1,t2,t3,t4);}
+f_2844(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_noret_decl(trf_2602)
+static void C_fcall trf_2602(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2602(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2580(t0,t1,t2);}
+f_2602(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_noret_decl(trf_2567)
+static void C_fcall trf_2567(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2567(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2545(t0,t1,t2);}
+f_2567(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_noret_decl(trf_2520)
+static void C_fcall trf_2520(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2520(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2498(t0,t1,t2);}
+f_2520(t0,t1,t2);}
C_noret_decl(tr9)
static void C_fcall tr9(C_proc9 k) C_regparm C_noret;
@@ -2777,12 +2804,12 @@ if(!C_demand(3)){
C_save(t1);
C_reclaim((void*)toplevel_trampoline,NULL);}
toplevel_initialized=1;
-if(!C_demand_2(2452)){
+if(!C_demand_2(2512)){
C_save(t1);
-C_rereclaim2(2452*sizeof(C_word), 1);
+C_rereclaim2(2512*sizeof(C_word), 1);
t1=C_restore;}
a=C_alloc(3);
-C_initialize_lf(lf,853);
+C_initialize_lf(lf,864);
lf[0]=C_h_intern(&lf[0],15,"\010compileroutput");
lf[1]=C_h_intern(&lf[1],12,"\010compilergen");
lf[2]=C_h_intern(&lf[2],7,"newline");
@@ -2819,136 +2846,136 @@ 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[36]=C_h_intern(&lf[36],16,"\004corelet_unboxed");
+lf[37]=C_h_intern(&lf[37],8,"\004coreref");
+lf[38]=C_decode_literal(C_heaptop,"\376B\000\000\002)[");
+lf[39]=C_decode_literal(C_heaptop,"\376B\000\000\012((C_word*)");
+lf[40]=C_h_intern(&lf[40],10,"\004coreunbox");
+lf[41]=C_decode_literal(C_heaptop,"\376B\000\000\004)[1]");
+lf[42]=C_decode_literal(C_heaptop,"\376B\000\000\012((C_word*)");
+lf[43]=C_h_intern(&lf[43],13,"\004coreupdate_i");
+lf[44]=C_decode_literal(C_heaptop,"\376B\000\000\021C_set_block_item(");
+lf[45]=C_h_intern(&lf[45],11,"\004coreupdate");
+lf[46]=C_decode_literal(C_heaptop,"\376B\000\000\002)+");
+lf[47]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
+lf[48]=C_decode_literal(C_heaptop,"\376B\000\000\024C_mutate(((C_word *)");
+lf[49]=C_h_intern(&lf[49],16,"\004coreupdatebox_i");
+lf[50]=C_decode_literal(C_heaptop,"\376B\000\000\003,0,");
+lf[51]=C_decode_literal(C_heaptop,"\376B\000\000\021C_set_block_item(");
+lf[52]=C_h_intern(&lf[52],14,"\004coreupdatebox");
+lf[53]=C_decode_literal(C_heaptop,"\376B\000\000\004)+1,");
+lf[54]=C_decode_literal(C_heaptop,"\376B\000\000\024C_mutate(((C_word *)");
+lf[55]=C_h_intern(&lf[55],12,"\004coreclosure");
+lf[56]=C_decode_literal(C_heaptop,"\376B\000\000\021tmp=(C_word)a,a+=");
+lf[57]=C_decode_literal(C_heaptop,"\376B\000\000\005,tmp)");
+lf[58]=C_decode_literal(C_heaptop,"\376B\000\000\002a[");
+lf[59]=C_decode_literal(C_heaptop,"\376B\000\000\002]=");
+lf[60]=C_h_intern(&lf[60],4,"iota");
+lf[61]=C_decode_literal(C_heaptop,"\376B\000\000\023(*a=C_CLOSURE_TYPE|");
+lf[62]=C_h_intern(&lf[62],8,"\004corebox");
+lf[63]=C_decode_literal(C_heaptop,"\376B\000\000\030,tmp=(C_word)a,a+=2,tmp)");
+lf[64]=C_decode_literal(C_heaptop,"\376B\000\000\031(*a=C_VECTOR_TYPE|1,a[1]=");
+lf[65]=C_h_intern(&lf[65],10,"\004corelocal");
+lf[66]=C_h_intern(&lf[66],13,"\004coresetlocal");
+lf[67]=C_h_intern(&lf[67],11,"\004coreglobal");
+lf[68]=C_decode_literal(C_heaptop,"\376B\000\000\003lf[");
+lf[69]=C_decode_literal(C_heaptop,"\376B\000\000\001]");
+lf[70]=C_decode_literal(C_heaptop,"\376B\000\000\017C_retrieve2(lf[");
+lf[71]=C_decode_literal(C_heaptop,"\376B\000\000\002],");
+lf[72]=C_h_intern(&lf[72],21,"\010compilerc-ify-string");
+lf[73]=C_h_intern(&lf[73],14,"symbol->string");
+lf[74]=C_decode_literal(C_heaptop,"\376B\000\000\016*((C_word*)lf[");
+lf[75]=C_decode_literal(C_heaptop,"\376B\000\000\004]+1)");
+lf[76]=C_decode_literal(C_heaptop,"\376B\000\000\016C_retrieve(lf[");
+lf[77]=C_decode_literal(C_heaptop,"\376B\000\000\002])");
+lf[78]=C_h_intern(&lf[78],14,"\004coresetglobal");
+lf[79]=C_decode_literal(C_heaptop,"\376B\000\000\012 /* (set! ");
+lf[80]=C_decode_literal(C_heaptop,"\376B\000\000\011 ...) */,");
+lf[81]=C_h_intern(&lf[81],17,"string-translate*");
+lf[82]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376B\000\000\002*/\376B\000\000\003* /\376\377\016");
+lf[83]=C_h_intern(&lf[83],8,"->string");
+lf[84]=C_h_intern(&lf[84],28,"\003syssymbol->qualified-string");
+lf[85]=C_decode_literal(C_heaptop,"\376B\000\000\015C_mutate(&lf[");
+lf[86]=C_decode_literal(C_heaptop,"\376B\000\000\001]");
+lf[87]=C_decode_literal(C_heaptop,"\376B\000\000\025C_mutate((C_word*)lf[");
+lf[88]=C_decode_literal(C_heaptop,"\376B\000\000\003]+1");
+lf[89]=C_h_intern(&lf[89],16,"\004coresetglobal_i");
+lf[90]=C_decode_literal(C_heaptop,"\376B\000\000\003lf[");
+lf[91]=C_decode_literal(C_heaptop,"\376B\000\000\005] /* ");
+lf[92]=C_decode_literal(C_heaptop,"\376B\000\000\005 */ =");
+lf[93]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376B\000\000\002*/\376B\000\000\003* /\376\377\016");
+lf[94]=C_decode_literal(C_heaptop,"\376B\000\000\024C_set_block_item(lf[");
+lf[95]=C_decode_literal(C_heaptop,"\376B\000\000\005] /* ");
+lf[96]=C_decode_literal(C_heaptop,"\376B\000\000\006 */,0,");
+lf[97]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376B\000\000\002*/\376B\000\000\003* /\376\377\016");
+lf[98]=C_h_intern(&lf[98],14,"\004coreundefined");
+lf[99]=C_decode_literal(C_heaptop,"\376B\000\000\022C_SCHEME_UNDEFINED");
+lf[100]=C_h_intern(&lf[100],9,"\004corecall");
+lf[101]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[102]=C_decode_literal(C_heaptop,"\376B\000\000\003,0,");
+lf[103]=C_decode_literal(C_heaptop,"\376B\000\000\012goto loop;");
+lf[104]=C_decode_literal(C_heaptop,"\376B\000\000\002c=");
+lf[105]=C_decode_literal(C_heaptop,"\376B\000\000\002=t");
+lf[106]=C_h_intern(&lf[106],26,"lambda-literal-temporaries");
lf[107]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[108]=C_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[108]=C_h_intern(&lf[108],22,"lambda-literal-looping");
+lf[109]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[110]=C_decode_literal(C_heaptop,"\376B\000\000\002)(");
+lf[111]=C_decode_literal(C_heaptop,"\376B\000\000\020C_retrieve_proc(");
+lf[112]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[113]=C_decode_literal(C_heaptop,"\376B\000\000\030C_retrieve2_symbol_proc(");
+lf[114]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
+lf[115]=C_h_intern(&lf[115],13,"string-append");
+lf[116]=C_decode_literal(C_heaptop,"\376B\000\000\003lf[");
+lf[117]=C_decode_literal(C_heaptop,"\376B\000\000\001]");
+lf[118]=C_decode_literal(C_heaptop,"\376B\000\000\020C_retrieve_proc(");
+lf[119]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[120]=C_decode_literal(C_heaptop,"\376B\000\000\016*((C_word*)lf[");
+lf[121]=C_decode_literal(C_heaptop,"\376B\000\000\004]+1)");
+lf[122]=C_decode_literal(C_heaptop,"\376B\000\000\032C_retrieve_symbol_proc(lf[");
+lf[123]=C_decode_literal(C_heaptop,"\376B\000\000\002])");
+lf[124]=C_decode_literal(C_heaptop,"\376B\000\000\016*((C_word*)lf[");
+lf[125]=C_decode_literal(C_heaptop,"\376B\000\000\004]+1)");
+lf[126]=C_decode_literal(C_heaptop,"\376B\000\000\010((C_proc");
+lf[127]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[128]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[129]=C_decode_literal(C_heaptop,"\376B\000\000\002)(");
+lf[130]=C_decode_literal(C_heaptop,"\376B\000\000\002,t");
+lf[131]=C_h_intern(&lf[131],6,"unsafe");
+lf[132]=C_decode_literal(C_heaptop,"\376B\000\000\024(void*)(*((C_word*)t");
+lf[133]=C_decode_literal(C_heaptop,"\376B\000\000\004+1))");
+lf[134]=C_decode_literal(C_heaptop,"\376B\000\000\021C_retrieve_proc(t");
+lf[135]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[136]=C_h_intern(&lf[136],28,"\010compilerno-procedure-checks");
+lf[137]=C_decode_literal(C_heaptop,"\376B\000\000\010((C_proc");
+lf[138]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[139]=C_h_intern(&lf[139],24,"\010compileremit-trace-info");
+lf[140]=C_decode_literal(C_heaptop,"\376B\000\000\011C_trace(\042");
+lf[141]=C_decode_literal(C_heaptop,"\376B\000\000\003\042);");
+lf[142]=C_h_intern(&lf[142],16,"string-translate");
+lf[143]=C_decode_literal(C_heaptop,"\376B\000\000\001\134");
+lf[144]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
+lf[145]=C_decode_literal(C_heaptop,"\376B\000\000\003/* ");
+lf[146]=C_decode_literal(C_heaptop,"\376B\000\000\003 */");
+lf[147]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376B\000\000\002*/\376B\000\000\003* /\376\377\016");
+lf[148]=C_h_intern(&lf[148],27,"lambda-literal-closure-size");
+lf[149]=C_h_intern(&lf[149],28,"\010compilersource-info->string");
+lf[150]=C_h_intern(&lf[150],12,"\004corerecurse");
+lf[151]=C_decode_literal(C_heaptop,"\376B\000\000\012goto loop;");
+lf[152]=C_decode_literal(C_heaptop,"\376B\000\000\002=t");
+lf[153]=C_decode_literal(C_heaptop,"\376B\000\000\003t0,");
+lf[154]=C_h_intern(&lf[154],16,"\004coredirect_call");
+lf[155]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i(&a,");
+lf[156]=C_h_intern(&lf[156],13,"\004corecallunit");
+lf[157]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[158]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
+lf[159]=C_decode_literal(C_heaptop,"\376B\000\000\012_toplevel(");
+lf[160]=C_decode_literal(C_heaptop,"\376B\000\000\024,C_SCHEME_UNDEFINED,");
+lf[161]=C_h_intern(&lf[161],11,"\004corereturn");
+lf[162]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[163]=C_decode_literal(C_heaptop,"\376B\000\000\007return(");
+lf[164]=C_h_intern(&lf[164],11,"\004coreinline");
+lf[165]=C_h_intern(&lf[165],20,"\004coreinline_allocate");
lf[166]=C_decode_literal(C_heaptop,"\376B\000\000\004(&a,");
lf[167]=C_h_intern(&lf[167],15,"\004coreinline_ref");
lf[168]=C_h_intern(&lf[168],34,"\010compilerforeign-result-conversion");
@@ -2971,689 +2998,700 @@ 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[188]=C_h_intern(&lf[188],16,"\004coreunboxed_ref");
+lf[189]=C_h_intern(&lf[189],17,"\004coreunboxed_set!");
+lf[190]=C_decode_literal(C_heaptop,"\376B\000\000\025),C_SCHEME_UNDEFINED)");
+lf[191]=C_decode_literal(C_heaptop,"\376B\000\000\002((");
+lf[192]=C_h_intern(&lf[192],19,"\004coreinline_unboxed");
+lf[193]=C_decode_literal(C_heaptop,"\376B\000\000\001(");
+lf[194]=C_h_intern(&lf[194],11,"\004coreswitch");
+lf[195]=C_decode_literal(C_heaptop,"\376B\000\000\010default:");
+lf[196]=C_decode_literal(C_heaptop,"\376B\000\000\005case ");
+lf[197]=C_decode_literal(C_heaptop,"\376B\000\000\002){");
+lf[198]=C_decode_literal(C_heaptop,"\376B\000\000\007switch(");
+lf[199]=C_h_intern(&lf[199],9,"\004corecond");
+lf[200]=C_decode_literal(C_heaptop,"\376B\000\000\002)\077");
+lf[201]=C_decode_literal(C_heaptop,"\376B\000\000\011(C_truep(");
+lf[202]=C_decode_literal(C_heaptop,"\376B\000\000\010bad form");
+lf[203]=C_h_intern(&lf[203],13,"pair-for-each");
+lf[204]=C_decode_literal(C_heaptop,"\376B\000\000\0010");
+lf[205]=C_h_intern(&lf[205],30,"\010compilerexternal-protos-first");
+lf[206]=C_h_intern(&lf[206],50,"\010compilergenerate-foreign-callback-stub-prototypes");
+lf[207]=C_h_intern(&lf[207],22,"foreign-callback-stubs");
+lf[208]=C_h_intern(&lf[208],29,"\010compilerforeign-declarations");
+lf[209]=C_decode_literal(C_heaptop,"\376B\000\000\002*/");
+lf[210]=C_decode_literal(C_heaptop,"\376B\000\000\012#include \042");
+lf[211]=C_h_intern(&lf[211],28,"\010compilertarget-include-file");
+lf[212]=C_decode_literal(C_heaptop,"\376B\000\000\001\042");
+lf[213]=C_h_intern(&lf[213],18,"\010compilerunit-name");
+lf[214]=C_decode_literal(C_heaptop,"\376B\000\000\011 unit: ");
+lf[215]=C_h_intern(&lf[215],19,"\010compilerused-units");
+lf[216]=C_decode_literal(C_heaptop,"\376B\000\000\017 used units: ");
+lf[217]=C_h_intern(&lf[217],27,"\010compilercompiler-arguments");
+lf[218]=C_decode_literal(C_heaptop,"\376B\000\000\022/* Generated from ");
+lf[219]=C_decode_literal(C_heaptop,"\376B\000\000\030 by the CHICKEN compiler");
+lf[220]=C_decode_literal(C_heaptop,"\376B\000\0000 http://www.call-with-current-continuation.org");
+lf[221]=C_decode_literal(C_heaptop,"\376B\000\000\003 ");
+lf[222]=C_decode_literal(C_heaptop,"\376B\000\000\021 command line: ");
+lf[223]=C_h_intern(&lf[223],18,"string-intersperse");
+lf[224]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[225]=C_decode_literal(C_heaptop,"\376B\000\000\003 ");
+lf[226]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
+lf[227]=C_h_intern(&lf[227],7,"\003sysmap");
+lf[228]=C_h_intern(&lf[228],12,"string-split");
+lf[229]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
+lf[230]=C_h_intern(&lf[230],15,"chicken-version");
+lf[231]=C_h_intern(&lf[231],18,"\003sysdecode-seconds");
+lf[232]=C_h_intern(&lf[232],15,"current-seconds");
+lf[233]=C_decode_literal(C_heaptop,"\376B\000\000\002};");
+lf[234]=C_decode_literal(C_heaptop,"\376B\000\000\002,0");
+lf[235]=C_decode_literal(C_heaptop,"\376B\000\000\026static C_char C_TLS li");
+lf[236]=C_decode_literal(C_heaptop,"\376B\000\000\026[] C_aligned={C_lihdr(");
+lf[237]=C_h_intern(&lf[237],23,"\003syslambda-info->string");
+lf[238]=C_decode_literal(C_heaptop,"\376B\000\000)static double C_possibly_force_alignment;");
+lf[239]=C_decode_literal(C_heaptop,"\376B\000\000\027static C_TLS C_word lf[");
+lf[240]=C_decode_literal(C_heaptop,"\376B\000\000\002];");
+lf[241]=C_decode_literal(C_heaptop,"\376B\000\000\017C_noret_decl(C_");
+lf[242]=C_decode_literal(C_heaptop,"\376B\000\000\012_toplevel)");
+lf[243]=C_decode_literal(C_heaptop,"\376B\000\000\036C_externimport void C_ccall C_");
+lf[244]=C_decode_literal(C_heaptop,"\376B\000\000._toplevel(C_word c,C_word d,C_word k) C_noret;");
+lf[245]=C_decode_literal(C_heaptop,"\376B\000\000+static C_PTABLE_ENTRY *create_ptable(void);");
+lf[246]=C_decode_literal(C_heaptop,"\376B\000\000\012) C_noret;");
+lf[247]=C_h_intern(&lf[247],9,"make-list");
+lf[248]=C_decode_literal(C_heaptop,"\376B\000\000\007,C_word");
+lf[249]=C_decode_literal(C_heaptop,"\376B\000\000\025typedef void (*C_proc");
+lf[250]=C_decode_literal(C_heaptop,"\376B\000\000\010)(C_word");
+lf[251]=C_h_intern(&lf[251],4,"none");
+lf[252]=C_decode_literal(C_heaptop,"\376B\000\000\011,C_word t");
+lf[253]=C_decode_literal(C_heaptop,"\376B\000\000\012) C_noret;");
+lf[254]=C_decode_literal(C_heaptop,"\376B\000\000\015C_noret_decl(");
+lf[255]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[256]=C_decode_literal(C_heaptop,"\376B\000\000\024static void C_ccall ");
+lf[257]=C_decode_literal(C_heaptop,"\376B\000\000\002r(");
+lf[258]=C_decode_literal(C_heaptop,"\376B\000\000\016,...) C_noret;");
+lf[259]=C_decode_literal(C_heaptop,"\376B\000\000\010 C_noret");
+lf[260]=C_decode_literal(C_heaptop,"\376B\000\000\011C_word *a");
+lf[261]=C_decode_literal(C_heaptop,"\376B\000\000\011C_word c,");
+lf[262]=C_h_intern(&lf[262],8,"toplevel");
+lf[263]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
+lf[264]=C_decode_literal(C_heaptop,"\376B\000\000\034C_externexport void C_ccall ");
+lf[265]=C_h_intern(&lf[265],27,"\010compileremit-unsafe-marker");
+lf[266]=C_decode_literal(C_heaptop,"\376B\000\0001C_externexport void C_dynamic_and_unsafe(void) {}");
+lf[267]=C_decode_literal(C_heaptop,"\376B\000\000\017C_noret_decl(C_");
+lf[268]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[269]=C_decode_literal(C_heaptop,"\376B\000\000\011_toplevel");
+lf[270]=C_decode_literal(C_heaptop,"\376B\000\000\010toplevel");
+lf[271]=C_decode_literal(C_heaptop,"\376B\000\000\010C_fcall ");
+lf[272]=C_decode_literal(C_heaptop,"\376B\000\000\010C_ccall ");
+lf[273]=C_decode_literal(C_heaptop,"\376B\000\000\007C_word ");
+lf[274]=C_decode_literal(C_heaptop,"\376B\000\000\005void ");
+lf[275]=C_decode_literal(C_heaptop,"\376B\000\000\007static ");
+lf[276]=C_decode_literal(C_heaptop,"\376B\000\000\015C_noret_decl(");
+lf[277]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[278]=C_h_intern(&lf[278],21,"small-parameter-limit");
+lf[279]=C_h_intern(&lf[279],11,"lset-adjoin");
+lf[280]=C_h_intern(&lf[280],1,"=");
+lf[281]=C_h_intern(&lf[281],32,"lambda-literal-callee-signatures");
+lf[282]=C_h_intern(&lf[282],24,"lambda-literal-allocated");
+lf[283]=C_h_intern(&lf[283],21,"lambda-literal-direct");
+lf[284]=C_h_intern(&lf[284],33,"lambda-literal-rest-argument-mode");
+lf[285]=C_h_intern(&lf[285],28,"lambda-literal-rest-argument");
+lf[286]=C_h_intern(&lf[286],27,"\010compilermake-variable-list");
+lf[287]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[288]=C_h_intern(&lf[288],27,"lambda-literal-customizable");
+lf[289]=C_h_intern(&lf[289],29,"lambda-literal-argument-count");
+lf[290]=C_decode_literal(C_heaptop,"\376B\000\000\020C_adjust_stack(-");
+lf[291]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[292]=C_decode_literal(C_heaptop,"\376B\000\000\010C_word t");
+lf[293]=C_decode_literal(C_heaptop,"\376B\000\000\010=C_pick(");
+lf[294]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[295]=C_decode_literal(C_heaptop,"\376B\000\000\003);}");
+lf[296]=C_h_intern(&lf[296],27,"\010compilermake-argument-list");
+lf[297]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[298]=C_decode_literal(C_heaptop,"\376B\000\000\004(k)(");
+lf[299]=C_decode_literal(C_heaptop,"\376B\000\000\006(a,n);");
+lf[300]=C_decode_literal(C_heaptop,"\376B\000\000\007_vector");
+lf[301]=C_decode_literal(C_heaptop,"\376B\000\000\017=C_restore_rest");
+lf[302]=C_decode_literal(C_heaptop,"\376B\000\000\017a=C_alloc(n+1);");
+lf[303]=C_decode_literal(C_heaptop,"\376B\000\000\017a=C_alloc(n*3);");
+lf[304]=C_decode_literal(C_heaptop,"\376B\000\000\022n=C_rest_count(0);");
+lf[305]=C_decode_literal(C_heaptop,"\376B\000\000\007(C_proc");
+lf[306]=C_decode_literal(C_heaptop,"\376B\000\000\004 k){");
+lf[307]=C_decode_literal(C_heaptop,"\376B\000\000\006int n;");
+lf[308]=C_decode_literal(C_heaptop,"\376B\000\000\013C_word *a,t");
+lf[309]=C_decode_literal(C_heaptop,"\376B\000\000 C_regparm static void C_fcall tr");
+lf[310]=C_decode_literal(C_heaptop,"\376B\000\000\007(C_proc");
+lf[311]=C_decode_literal(C_heaptop,"\376B\000\000\026 k) C_regparm C_noret;");
+lf[312]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[313]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[314]=C_decode_literal(C_heaptop,"\376B\000\000\017C_noret_decl(tr");
+lf[315]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[316]=C_decode_literal(C_heaptop,"\376B\000\000\026static void C_fcall tr");
+lf[317]=C_h_intern(&lf[317],12,"\003sysfor-each");
+lf[318]=C_decode_literal(C_heaptop,"\376B\000\000\003);}");
+lf[319]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[320]=C_decode_literal(C_heaptop,"\376B\000\000\004(k)(");
+lf[321]=C_decode_literal(C_heaptop,"\376B\000\000 C_regparm static void C_fcall tr");
+lf[322]=C_decode_literal(C_heaptop,"\376B\000\000\007(C_proc");
+lf[323]=C_decode_literal(C_heaptop,"\376B\000\000\004 k){");
+lf[324]=C_decode_literal(C_heaptop,"\376B\000\000\017C_noret_decl(tr");
+lf[325]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[326]=C_decode_literal(C_heaptop,"\376B\000\000\026static void C_fcall tr");
+lf[327]=C_decode_literal(C_heaptop,"\376B\000\000\007(C_proc");
+lf[328]=C_decode_literal(C_heaptop,"\376B\000\000\026 k) C_regparm C_noret;");
+lf[329]=C_decode_literal(C_heaptop,"\376B\000\000\003);}");
+lf[330]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[331]=C_decode_literal(C_heaptop,"\376B\000\000 C_regparm static void C_fcall tr");
+lf[332]=C_decode_literal(C_heaptop,"\376B\000\000\016(void *dummy){");
+lf[333]=C_decode_literal(C_heaptop,"\376B\000\000\017C_noret_decl(tr");
+lf[334]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[335]=C_decode_literal(C_heaptop,"\376B\000\000\026static void C_fcall tr");
+lf[336]=C_decode_literal(C_heaptop,"\376B\000\000 (void *dummy) C_regparm C_noret;");
+lf[337]=C_h_intern(&lf[337],23,"lambda-literal-external");
+lf[338]=C_h_intern(&lf[338],17,"get-output-string");
+lf[339]=C_h_intern(&lf[339],19,"\003syswrite-char/port");
+lf[340]=C_h_intern(&lf[340],5,"write");
+lf[341]=C_decode_literal(C_heaptop,"\376B\000\000\003lf[");
+lf[342]=C_h_intern(&lf[342],18,"open-output-string");
+lf[343]=C_h_intern(&lf[343],25,"\010compilerwords-per-flonum");
+lf[344]=C_h_intern(&lf[344],6,"reduce");
+lf[345]=C_h_intern(&lf[345],1,"+");
+lf[346]=C_h_intern(&lf[346],12,"vector->list");
+lf[347]=C_decode_literal(C_heaptop,"\376B\000\000\035type of literal not supported");
+lf[348]=C_h_intern(&lf[348],14,"\010compilerwords");
+lf[349]=C_h_intern(&lf[349],15,"\003sysbytevector\077");
+lf[350]=C_h_intern(&lf[350],32,"\010compilerblock-variable-literal\077");
+lf[351]=C_h_intern(&lf[351],19,"\010compilerimmediate\077");
+lf[352]=C_decode_literal(C_heaptop,"\376B\000\000\007=C_fix(");
+lf[353]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[354]=C_h_intern(&lf[354],19,"\003sysundefined-value");
+lf[355]=C_decode_literal(C_heaptop,"\376B\000\000\024=C_SCHEME_UNDEFINED;");
+lf[356]=C_decode_literal(C_heaptop,"\376B\000\000\015C_SCHEME_TRUE");
+lf[357]=C_decode_literal(C_heaptop,"\376B\000\000\016C_SCHEME_FALSE");
+lf[358]=C_decode_literal(C_heaptop,"\376B\000\000\022=C_make_character(");
lf[359]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[360]=C_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[360]=C_decode_literal(C_heaptop,"\376B\000\000\014C_h_intern(&");
+lf[361]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[362]=C_decode_literal(C_heaptop,"\376B\000\000\001=");
+lf[363]=C_decode_literal(C_heaptop,"\376B\000\000\026=C_SCHEME_END_OF_LIST;");
+lf[364]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[365]=C_h_intern(&lf[365],23,"\010compilerencode-literal");
+lf[366]=C_decode_literal(C_heaptop,"\376B\000\000\034=C_decode_literal(C_heaptop,");
+lf[367]=C_h_intern(&lf[367],20,"\010compilerbig-fixnum\077");
+lf[368]=C_h_intern(&lf[368],6,"modulo");
+lf[369]=C_h_intern(&lf[369],3,"fx/");
+lf[370]=C_h_intern(&lf[370],14,"\003syscopy-bytes");
+lf[371]=C_h_intern(&lf[371],11,"make-string");
+lf[372]=C_h_intern(&lf[372],19,"lambda-literal-body");
+lf[373]=C_decode_literal(C_heaptop,"\376B\000\000\022C_word *a=C_alloc(");
+lf[374]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[375]=C_decode_literal(C_heaptop,"\376B\000\000\010C_word t");
+lf[376]=C_decode_literal(C_heaptop,"\376B\000\000\013C_word tmp;");
+lf[377]=C_decode_literal(C_heaptop,"\376B\000\000\011,C_word t");
+lf[378]=C_decode_literal(C_heaptop,"\376B\000\000\002){");
+lf[379]=C_decode_literal(C_heaptop,"\376B\000\000\024static void C_ccall ");
+lf[380]=C_decode_literal(C_heaptop,"\376B\000\000\002r(");
+lf[381]=C_decode_literal(C_heaptop,"\376B\000\000\002,t");
+lf[382]=C_decode_literal(C_heaptop,"\376B\000\000\004);}}");
lf[383]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
-lf[384]=C_decode_literal(C_heaptop,"\376B\000\000*=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[384]=C_decode_literal(C_heaptop,"\376B\000\000\002r(");
+lf[385]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[386]=C_decode_literal(C_heaptop,"\376B\000\000#=C_restore_rest(a,C_rest_count(0));");
+lf[387]=C_decode_literal(C_heaptop,"\376B\000\000\003);}");
+lf[388]=C_decode_literal(C_heaptop,"\376B\000\000\005else{");
+lf[389]=C_decode_literal(C_heaptop,"\376B\000\000\015a=C_alloc((c-");
+lf[390]=C_decode_literal(C_heaptop,"\376B\000\000\005)*3);");
+lf[391]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[392]=C_decode_literal(C_heaptop,"\376B\000\000\001r");
+lf[393]=C_decode_literal(C_heaptop,"\376B\000\000\022C_save_and_reclaim");
+lf[394]=C_decode_literal(C_heaptop,"\376B\000\000\012((void*)tr");
+lf[395]=C_decode_literal(C_heaptop,"\376B\000\000\011C_reclaim");
+lf[396]=C_decode_literal(C_heaptop,"\376B\000\000\003);}");
+lf[397]=C_decode_literal(C_heaptop,"\376B\000\000\005,NULL");
+lf[398]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[399]=C_decode_literal(C_heaptop,"\376B\000\000\022C_save_and_reclaim");
+lf[400]=C_decode_literal(C_heaptop,"\376B\000\000\012((void*)tr");
+lf[401]=C_decode_literal(C_heaptop,"\376B\000\000\011C_reclaim");
+lf[402]=C_decode_literal(C_heaptop,"\376B\000\000\022C_register_lf2(lf,");
+lf[403]=C_decode_literal(C_heaptop,"\376B\000\000\022,create_ptable());");
+lf[404]=C_decode_literal(C_heaptop,"\376B\000\000\023C_initialize_lf(lf,");
lf[405]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
-lf[406]=C_decode_literal(C_heaptop,"\376B\000\000\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"
+lf[406]=C_decode_literal(C_heaptop,"\376B\000\000\012a=C_alloc(");
+lf[407]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[408]=C_decode_literal(C_heaptop,"\376B\000\000\017if(!C_demand_2(");
+lf[409]=C_decode_literal(C_heaptop,"\376B\000\000\003)){");
+lf[410]=C_decode_literal(C_heaptop,"\376B\000\000\013C_save(t1);");
+lf[411]=C_decode_literal(C_heaptop,"\376B\000\000\015C_rereclaim2(");
+lf[412]=C_decode_literal(C_heaptop,"\376B\000\000\024*sizeof(C_word), 1);");
+lf[413]=C_decode_literal(C_heaptop,"\376B\000\000\016t1=C_restore;}");
+lf[414]=C_decode_literal(C_heaptop,"\376B\000\000\030C_check_nursery_minimum(");
+lf[415]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[416]=C_decode_literal(C_heaptop,"\376B\000\000\015if(!C_demand(");
+lf[417]=C_decode_literal(C_heaptop,"\376B\000\000\003)){");
+lf[418]=C_decode_literal(C_heaptop,"\376B\000\000\013C_save(t1);");
+lf[419]=C_decode_literal(C_heaptop,"\376B\000\000,C_reclaim((void*)toplevel_trampoline,NULL);}");
+lf[420]=C_decode_literal(C_heaptop,"\376B\000\000\027toplevel_initialized=1;");
+lf[421]=C_h_intern(&lf[421],26,"\010compilertarget-stack-size");
+lf[422]=C_decode_literal(C_heaptop,"\376B\000\000\017C_resize_stack(");
+lf[423]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[424]=C_h_intern(&lf[424],30,"\010compilertarget-heap-shrinkage");
+lf[425]=C_decode_literal(C_heaptop,"\376B\000\000\021C_heap_shrinkage=");
+lf[426]=C_h_intern(&lf[426],27,"\010compilertarget-heap-growth");
+lf[427]=C_decode_literal(C_heaptop,"\376B\000\000\016C_heap_growth=");
+lf[428]=C_h_intern(&lf[428],33,"\010compilertarget-initial-heap-size");
+lf[429]=C_decode_literal(C_heaptop,"\376B\000\000\032C_set_or_change_heap_size(");
+lf[430]=C_decode_literal(C_heaptop,"\376B\000\000\004,1);");
+lf[431]=C_h_intern(&lf[431],25,"\010compilertarget-heap-size");
+lf[432]=C_decode_literal(C_heaptop,"\376B\000\000\032C_set_or_change_heap_size(");
+lf[433]=C_decode_literal(C_heaptop,"\376B\000\000\004,1);");
+lf[434]=C_decode_literal(C_heaptop,"\376B\000\000\027C_heap_size_is_fixed=1;");
+lf[435]=C_h_intern(&lf[435],40,"\010compilerdisable-stack-overflow-checking");
+lf[436]=C_decode_literal(C_heaptop,"\376B\000\000\033C_disable_overflow_check=1;");
+lf[437]=C_decode_literal(C_heaptop,"\376B\000\000\012C_word *a;");
+lf[438]=C_decode_literal(C_heaptop,"\376B\000\000;if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);");
+lf[439]=C_decode_literal(C_heaptop,"\376B\000\000\036else C_toplevel_entry(C_text(\042");
+lf[440]=C_decode_literal(C_heaptop,"\376B\000\000\004\042));");
+lf[441]=C_h_intern(&lf[441],4,"fold");
+lf[442]=C_decode_literal(C_heaptop,"\376B\000\000\035if(!C_demand(c*C_SIZEOF_PAIR+");
+lf[443]=C_decode_literal(C_heaptop,"\376B\000\000\003)){");
+lf[444]=C_h_intern(&lf[444],28,"\010compilerinsert-timer-checks");
+lf[445]=C_decode_literal(C_heaptop,"\376B\000\000\026C_check_for_interrupt;");
+lf[446]=C_decode_literal(C_heaptop,"\376B\000\000\005if(c<");
+lf[447]=C_decode_literal(C_heaptop,"\376B\000\000\025) C_bad_min_argc_2(c,");
+lf[448]=C_decode_literal(C_heaptop,"\376B\000\000\005,t0);");
+lf[449]=C_h_intern(&lf[449],23,"\010compilerno-argc-checks");
+lf[450]=C_decode_literal(C_heaptop,"\376B\000\000\004,c2,");
+lf[451]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[452]=C_decode_literal(C_heaptop,"\376B\000\000\001c");
+lf[453]=C_decode_literal(C_heaptop,"\376B\000\000\014C_save_rest(");
+lf[454]=C_decode_literal(C_heaptop,"\376B\000\000\017C_word *a,c2=c;");
+lf[455]=C_decode_literal(C_heaptop,"\376B\000\000\012va_list v;");
+lf[456]=C_decode_literal(C_heaptop,"\376B\000\000\026if(!C_stack_probe(a)){");
+lf[457]=C_decode_literal(C_heaptop,"\376B\000\000\027if(!C_stack_probe(&a)){");
+lf[458]=C_decode_literal(C_heaptop,"\376B\000\000\026C_check_for_interrupt;");
+lf[459]=C_decode_literal(C_heaptop,"\376B\000\000\005if(c<");
+lf[460]=C_decode_literal(C_heaptop,"\376B\000\000\025) C_bad_min_argc_2(c,");
+lf[461]=C_decode_literal(C_heaptop,"\376B\000\000\005,t0);");
+lf[462]=C_decode_literal(C_heaptop,"\376B\000\000\006if(c!=");
+lf[463]=C_decode_literal(C_heaptop,"\376B\000\000\021) C_bad_argc_2(c,");
+lf[464]=C_decode_literal(C_heaptop,"\376B\000\000\005,t0);");
+lf[465]=C_decode_literal(C_heaptop,"\376B\000\000\012C_word *a;");
+lf[466]=C_decode_literal(C_heaptop,"\376B\000\000\005loop:");
+lf[467]=C_decode_literal(C_heaptop,"\376B\000\000\012a=C_alloc(");
+lf[468]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[469]=C_decode_literal(C_heaptop,"\376B\000\000\012C_word ab[");
+lf[470]=C_decode_literal(C_heaptop,"\376B\000\000\010],*a=ab;");
+lf[471]=C_decode_literal(C_heaptop,"\376B\000\000\016C_stack_check;");
+lf[472]=C_decode_literal(C_heaptop,"\376B\000\000\005loop:");
+lf[473]=C_decode_literal(C_heaptop,"\376B\000\000\012C_word *a;");
+lf[474]=C_decode_literal(C_heaptop,"\376B\000\000\010C_word t");
+lf[475]=C_h_intern(&lf[475],6,"fixnum");
+lf[476]=C_decode_literal(C_heaptop,"\376B\000\000\003int");
+lf[477]=C_h_intern(&lf[477],6,"flonum");
+lf[478]=C_decode_literal(C_heaptop,"\376B\000\000\006double");
+lf[479]=C_decode_literal(C_heaptop,"\376B\000\000\004char");
+lf[480]=C_h_intern(&lf[480],7,"pointer");
+lf[481]=C_decode_literal(C_heaptop,"\376B\000\000\006void *");
+lf[482]=C_decode_literal(C_heaptop,"\376B\000\000\003int");
+lf[483]=C_decode_literal(C_heaptop,"\376B\000\000\024invalid unboxed type");
+lf[484]=C_decode_literal(C_heaptop,"\376B\000\000\010C_word t");
+lf[485]=C_decode_literal(C_heaptop,"\376B\000\000\013C_word tmp;");
+lf[486]=C_decode_literal(C_heaptop,"\376B\000\000\002){");
+lf[487]=C_decode_literal(C_heaptop,"\376B\000\000\004,...");
+lf[488]=C_decode_literal(C_heaptop,"\376B\000\000\011C_word *a");
+lf[489]=C_decode_literal(C_heaptop,"\376B\000\000\011C_word c,");
+lf[490]=C_decode_literal(C_heaptop,"\376B\000\000!C_noret_decl(toplevel_trampoline)");
+lf[491]=C_decode_literal(C_heaptop,"\376B\000\000Gstatic void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;");
+lf[492]=C_decode_literal(C_heaptop,"\376B\000\000\077C_regparm static void C_fcall toplevel_trampoline(void *dummy){");
+lf[493]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
+lf[494]=C_decode_literal(C_heaptop,"\376B\000\000\042(2,C_SCHEME_UNDEFINED,C_restore);}");
+lf[495]=C_decode_literal(C_heaptop,"\376B\000\000\017void C_ccall C_");
+lf[496]=C_decode_literal(C_heaptop,"\376B\000\000\022C_main_entry_point");
+lf[497]=C_decode_literal(C_heaptop,"\376B\000\000(static C_TLS int toplevel_initialized=0;");
+lf[498]=C_decode_literal(C_heaptop,"\376B\000\000\010C_fcall ");
+lf[499]=C_decode_literal(C_heaptop,"\376B\000\000\010C_ccall ");
+lf[500]=C_decode_literal(C_heaptop,"\376B\000\000\007C_word ");
+lf[501]=C_decode_literal(C_heaptop,"\376B\000\000\005void ");
+lf[502]=C_decode_literal(C_heaptop,"\376B\000\000\007static ");
+lf[503]=C_decode_literal(C_heaptop,"\376B\000\000\003/* ");
+lf[504]=C_decode_literal(C_heaptop,"\376B\000\000\003 */");
+lf[505]=C_h_intern(&lf[505],16,"\010compilercleanup");
+lf[506]=C_h_intern(&lf[506],18,"\010compilerdebugging");
+lf[507]=C_h_intern(&lf[507],1,"o");
+lf[508]=C_decode_literal(C_heaptop,"\376B\000\000 dropping unused closure argument");
+lf[509]=C_decode_literal(C_heaptop,"\376B\000\000\011_toplevel");
+lf[510]=C_decode_literal(C_heaptop,"\376B\000\000\010toplevel");
+lf[511]=C_h_intern(&lf[511],34,"lambda-literal-unboxed-temporaries");
+lf[512]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[513]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[514]=C_h_intern(&lf[514],18,"\010compilerreal-name");
+lf[515]=C_decode_literal(C_heaptop,"\376B\000\000\021/* end of file */");
+lf[516]=C_h_intern(&lf[516],25,"emit-procedure-table-info");
+lf[517]=C_h_intern(&lf[517],31,"generate-foreign-callback-stubs");
+lf[518]=C_h_intern(&lf[518],31,"\010compilergenerate-foreign-stubs");
+lf[519]=C_h_intern(&lf[519],29,"\010compilerforeign-lambda-stubs");
+lf[520]=C_h_intern(&lf[520],36,"\010compilergenerate-external-variables");
+lf[521]=C_h_intern(&lf[521],27,"\010compilerexternal-variables");
+lf[522]=C_h_intern(&lf[522],1,"p");
+lf[523]=C_decode_literal(C_heaptop,"\376B\000\000\030code generation phase...");
+lf[524]=C_decode_literal(C_heaptop,"\376B\000\000\001{");
+lf[525]=C_decode_literal(C_heaptop,"\376B\000\000\027#ifdef C_ENABLE_PTABLES");
+lf[526]=C_decode_literal(C_heaptop,"\376B\000\000\016return ptable;");
+lf[527]=C_decode_literal(C_heaptop,"\376B\000\000\005#else");
+lf[528]=C_decode_literal(C_heaptop,"\376B\000\000\014return NULL;");
+lf[529]=C_decode_literal(C_heaptop,"\376B\000\000\006#endif");
+lf[530]=C_decode_literal(C_heaptop,"\376B\000\000\001}");
+lf[531]=C_decode_literal(C_heaptop,"\376B\000\000*static C_PTABLE_ENTRY *create_ptable(void)");
+lf[532]=C_decode_literal(C_heaptop,"\376B\000\000\006#endif");
+lf[533]=C_decode_literal(C_heaptop,"\376B\000\000\015{NULL,NULL}};");
+lf[534]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
+lf[535]=C_decode_literal(C_heaptop,"\376B\000\000\013_toplevel},");
+lf[536]=C_decode_literal(C_heaptop,"\376B\000\000\014C_toplevel},");
+lf[537]=C_decode_literal(C_heaptop,"\376B\000\000\002},");
+lf[538]=C_decode_literal(C_heaptop,"\376B\000\000\002{\042");
+lf[539]=C_decode_literal(C_heaptop,"\376B\000\000\011\042,(void*)");
+lf[540]=C_h_intern(&lf[540],29,"\010compilerstring->c-identifier");
+lf[541]=C_decode_literal(C_heaptop,"\376B\000\000\027#ifdef C_ENABLE_PTABLES");
+lf[542]=C_decode_literal(C_heaptop,"\376B\000\000\035static C_PTABLE_ENTRY ptable[");
+lf[543]=C_decode_literal(C_heaptop,"\376B\000\000\005] = {");
+lf[544]=C_h_intern(&lf[544],11,"string-copy");
+lf[545]=C_decode_literal(C_heaptop,"\376B\000\000\007C_word ");
+lf[546]=C_h_intern(&lf[546],13,"list-tabulate");
+lf[547]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[548]=C_decode_literal(C_heaptop,"\376B\000\000\007static ");
+lf[549]=C_h_intern(&lf[549],41,"\010compilergenerate-foreign-callback-header");
+lf[550]=C_decode_literal(C_heaptop,"\376B\000\000\017C_externexport ");
+lf[551]=C_decode_literal(C_heaptop,"\376B\000\000.C_k=C_restore_callback_continuation2(C_level);");
+lf[552]=C_decode_literal(C_heaptop,"\376B\000\000\024C_kontinue(C_k,C_r);");
+lf[553]=C_decode_literal(C_heaptop,"\376B\000\000\024C_kontinue(C_k,C_r);");
+lf[554]=C_decode_literal(C_heaptop,"\376B\000\000\013return C_r;");
+lf[555]=C_decode_literal(C_heaptop,"\376B\000\000\015#undef return");
+lf[556]=C_decode_literal(C_heaptop,"\376B\000\000\006C_ret:");
+lf[557]=C_decode_literal(C_heaptop,"\376B\000\000.C_k=C_restore_callback_continuation2(C_level);");
+lf[558]=C_decode_literal(C_heaptop,"\376B\000\000\024C_kontinue(C_k,C_r);");
+lf[559]=C_decode_literal(C_heaptop,"\376B\000\000\024C_kontinue(C_k,C_r);");
+lf[560]=C_decode_literal(C_heaptop,"\376B\000\000\013return C_r;");
+lf[561]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[562]=C_h_intern(&lf[562],4,"void");
+lf[563]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[564]=C_decode_literal(C_heaptop,"\376B\000\000\004C_r=");
+lf[565]=C_decode_literal(C_heaptop,"\376B\000\0003int C_level=C_save_callback_continuation(&C_a,C_k);");
+lf[566]=C_decode_literal(C_heaptop,"\376B\000\000\002=(");
+lf[567]=C_decode_literal(C_heaptop,"\376B\000\000\003C_a");
+lf[568]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[569]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[570]=C_decode_literal(C_heaptop,"\376B\000\0002C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;");
+lf[571]=C_decode_literal(C_heaptop,"\376B\000\000\002){");
+lf[572]=C_decode_literal(C_heaptop,"\376B\000\000\012) C_noret;");
+lf[573]=C_decode_literal(C_heaptop,"\376B\000\000\024static void C_ccall ");
+lf[574]=C_decode_literal(C_heaptop,"\376B\000\000%(C_word C_c,C_word C_self,C_word C_k,");
+lf[575]=C_decode_literal(C_heaptop,"\376B\000\000\014) C_regparm;");
+lf[576]=C_decode_literal(C_heaptop,"\376B\000\000 C_regparm static C_word C_fcall ");
+lf[577]=C_decode_literal(C_heaptop,"\376B\000\000\015C_noret_decl(");
+lf[578]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[579]=C_decode_literal(C_heaptop,"\376B\000\000\024static void C_ccall ");
+lf[580]=C_decode_literal(C_heaptop,"\376B\000\000%(C_word C_c,C_word C_self,C_word C_k,");
+lf[581]=C_decode_literal(C_heaptop,"\376B\000\000\026static C_word C_fcall ");
+lf[582]=C_decode_literal(C_heaptop,"\376B\000\000\042#define return(x) C_cblock C_r = (");
+lf[583]=C_decode_literal(C_heaptop,"\376B\000\000\036(x))); goto C_ret; C_cblockend");
+lf[584]=C_decode_literal(C_heaptop,"\376B\000\000\010/* from ");
+lf[585]=C_decode_literal(C_heaptop,"\376B\000\000\003 */");
+lf[586]=C_h_intern(&lf[586],21,"foreign-stub-callback");
+lf[587]=C_h_intern(&lf[587],16,"foreign-stub-cps");
+lf[588]=C_decode_literal(C_heaptop,"\376B\000\000\003C_a");
+lf[589]=C_h_intern(&lf[589],27,"foreign-stub-argument-names");
+lf[590]=C_h_intern(&lf[590],17,"foreign-stub-body");
+lf[591]=C_h_intern(&lf[591],17,"foreign-stub-name");
+lf[592]=C_h_intern(&lf[592],24,"foreign-stub-return-type");
+lf[593]=C_decode_literal(C_heaptop,"\376B\000\000\014C_word C_buf");
+lf[594]=C_decode_literal(C_heaptop,"\376B\000\000\003C_a");
+lf[595]=C_h_intern(&lf[595],27,"foreign-stub-argument-types");
+lf[596]=C_h_intern(&lf[596],19,"\010compilerreal-name2");
+lf[597]=C_h_intern(&lf[597],15,"foreign-stub-id");
+lf[598]=C_h_intern(&lf[598],5,"float");
+lf[599]=C_decode_literal(C_heaptop,"\376B\000\000\002+3");
+lf[600]=C_h_intern(&lf[600],8,"c-string");
+lf[601]=C_decode_literal(C_heaptop,"\376B\000\000\004+2+(");
+lf[602]=C_decode_literal(C_heaptop,"\376B\000\000!==NULL\0771:C_bytestowords(C_strlen(");
+lf[603]=C_decode_literal(C_heaptop,"\376B\000\000\003)))");
+lf[604]=C_h_intern(&lf[604],16,"nonnull-c-string");
+lf[605]=C_decode_literal(C_heaptop,"\376B\000\000\033+2+C_bytestowords(C_strlen(");
+lf[606]=C_decode_literal(C_heaptop,"\376B\000\000\002))");
+lf[607]=C_h_intern(&lf[607],3,"ref");
+lf[608]=C_decode_literal(C_heaptop,"\376B\000\000\002+3");
+lf[609]=C_h_intern(&lf[609],5,"const");
+lf[610]=C_h_intern(&lf[610],9,"c-pointer");
+lf[611]=C_h_intern(&lf[611],15,"nonnull-pointer");
+lf[612]=C_h_intern(&lf[612],17,"nonnull-c-pointer");
+lf[613]=C_h_intern(&lf[613],8,"function");
+lf[614]=C_h_intern(&lf[614],8,"instance");
+lf[615]=C_h_intern(&lf[615],16,"nonnull-instance");
+lf[616]=C_h_intern(&lf[616],12,"instance-ref");
+lf[617]=C_h_intern(&lf[617],18,"\003syshash-table-ref");
+lf[618]=C_h_intern(&lf[618],27,"\010compilerforeign-type-table");
+lf[619]=C_h_intern(&lf[619],17,"nonnull-c-string*");
+lf[620]=C_h_intern(&lf[620],25,"nonnull-unsigned-c-string");
+lf[621]=C_h_intern(&lf[621],26,"nonnull-unsigned-c-string*");
+lf[622]=C_h_intern(&lf[622],6,"symbol");
+lf[623]=C_h_intern(&lf[623],9,"c-string*");
+lf[624]=C_h_intern(&lf[624],17,"unsigned-c-string");
+lf[625]=C_h_intern(&lf[625],18,"unsigned-c-string*");
+lf[626]=C_h_intern(&lf[626],6,"double");
+lf[627]=C_h_intern(&lf[627],16,"unsigned-integer");
+lf[628]=C_h_intern(&lf[628],18,"unsigned-integer32");
+lf[629]=C_h_intern(&lf[629],4,"long");
+lf[630]=C_h_intern(&lf[630],7,"integer");
+lf[631]=C_h_intern(&lf[631],9,"integer32");
+lf[632]=C_h_intern(&lf[632],13,"unsigned-long");
+lf[633]=C_h_intern(&lf[633],6,"number");
+lf[634]=C_h_intern(&lf[634],9,"integer64");
+lf[635]=C_h_intern(&lf[635],13,"c-string-list");
+lf[636]=C_h_intern(&lf[636],14,"c-string-list*");
+lf[637]=C_h_intern(&lf[637],3,"int");
+lf[638]=C_h_intern(&lf[638],5,"int32");
+lf[639]=C_h_intern(&lf[639],5,"short");
+lf[640]=C_h_intern(&lf[640],14,"unsigned-short");
+lf[641]=C_h_intern(&lf[641],13,"scheme-object");
+lf[642]=C_h_intern(&lf[642],13,"unsigned-char");
+lf[643]=C_h_intern(&lf[643],12,"unsigned-int");
+lf[644]=C_h_intern(&lf[644],14,"unsigned-int32");
+lf[645]=C_h_intern(&lf[645],4,"byte");
+lf[646]=C_h_intern(&lf[646],13,"unsigned-byte");
+lf[647]=C_decode_literal(C_heaptop,"\376B\000\000\002;}");
+lf[648]=C_decode_literal(C_heaptop,"\376B\000\000\033C_callback_wrapper((void *)");
+lf[649]=C_decode_literal(C_heaptop,"\376B\000\000\007return ");
+lf[650]=C_decode_literal(C_heaptop,"\376B\000\000\002x=");
+lf[651]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[652]=C_decode_literal(C_heaptop,"\376B\000\000\012C_save(x);");
+lf[653]=C_decode_literal(C_heaptop,"\376B\000\000\001a");
+lf[654]=C_decode_literal(C_heaptop,"\376B\000\000\035C_callback_adjust_stack(a,s);");
+lf[655]=C_decode_literal(C_heaptop,"\376B\000\000\013C_word x,s=");
+lf[656]=C_decode_literal(C_heaptop,"\376B\000\000\017,*a=C_alloc(s);");
+lf[657]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[658]=C_decode_literal(C_heaptop,"\376B\000\000\010/* from ");
+lf[659]=C_decode_literal(C_heaptop,"\376B\000\000\003 */");
+lf[660]=C_decode_literal(C_heaptop,"\376B\000\000\0010");
+lf[661]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[662]=C_h_intern(&lf[662],36,"foreign-callback-stub-argument-types");
+lf[663]=C_h_intern(&lf[663],33,"foreign-callback-stub-return-type");
+lf[664]=C_h_intern(&lf[664],24,"foreign-callback-stub-id");
+lf[665]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[666]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[667]=C_h_intern(&lf[667],32,"foreign-callback-stub-qualifiers");
+lf[668]=C_h_intern(&lf[668],26,"foreign-callback-stub-name");
+lf[669]=C_h_intern(&lf[669],4,"quit");
+lf[670]=C_decode_literal(C_heaptop,"\376B\000\000\031illegal foreign type `~A\047");
+lf[671]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
+lf[672]=C_decode_literal(C_heaptop,"\376B\000\000\006C_word");
+lf[673]=C_decode_literal(C_heaptop,"\376B\000\000\006C_char");
+lf[674]=C_decode_literal(C_heaptop,"\376B\000\000\017unsigned C_char");
+lf[675]=C_decode_literal(C_heaptop,"\376B\000\000\014unsigned int");
+lf[676]=C_decode_literal(C_heaptop,"\376B\000\000\005C_u32");
+lf[677]=C_decode_literal(C_heaptop,"\376B\000\000\003int");
+lf[678]=C_decode_literal(C_heaptop,"\376B\000\000\005C_s32");
+lf[679]=C_decode_literal(C_heaptop,"\376B\000\000\005C_s64");
+lf[680]=C_decode_literal(C_heaptop,"\376B\000\000\005short");
+lf[681]=C_decode_literal(C_heaptop,"\376B\000\000\004long");
+lf[682]=C_decode_literal(C_heaptop,"\376B\000\000\016unsigned short");
+lf[683]=C_decode_literal(C_heaptop,"\376B\000\000\015unsigned long");
+lf[684]=C_decode_literal(C_heaptop,"\376B\000\000\005float");
+lf[685]=C_decode_literal(C_heaptop,"\376B\000\000\006double");
+lf[686]=C_decode_literal(C_heaptop,"\376B\000\000\006void *");
+lf[687]=C_decode_literal(C_heaptop,"\376B\000\000\006void *");
+lf[688]=C_decode_literal(C_heaptop,"\376B\000\000\011C_char **");
+lf[689]=C_h_intern(&lf[689],11,"byte-vector");
+lf[690]=C_h_intern(&lf[690],19,"nonnull-byte-vector");
+lf[691]=C_decode_literal(C_heaptop,"\376B\000\000\017unsigned char *");
+lf[692]=C_h_intern(&lf[692],4,"blob");
+lf[693]=C_decode_literal(C_heaptop,"\376B\000\000\017unsigned char *");
+lf[694]=C_h_intern(&lf[694],9,"u16vector");
+lf[695]=C_h_intern(&lf[695],17,"nonnull-u16vector");
+lf[696]=C_decode_literal(C_heaptop,"\376B\000\000\020unsigned short *");
+lf[697]=C_h_intern(&lf[697],8,"s8vector");
+lf[698]=C_h_intern(&lf[698],16,"nonnull-s8vector");
+lf[699]=C_decode_literal(C_heaptop,"\376B\000\000\006char *");
+lf[700]=C_h_intern(&lf[700],9,"u32vector");
+lf[701]=C_h_intern(&lf[701],17,"nonnull-u32vector");
+lf[702]=C_decode_literal(C_heaptop,"\376B\000\000\016unsigned int *");
+lf[703]=C_h_intern(&lf[703],9,"s16vector");
+lf[704]=C_h_intern(&lf[704],17,"nonnull-s16vector");
+lf[705]=C_decode_literal(C_heaptop,"\376B\000\000\007short *");
+lf[706]=C_h_intern(&lf[706],9,"s32vector");
+lf[707]=C_h_intern(&lf[707],17,"nonnull-s32vector");
+lf[708]=C_decode_literal(C_heaptop,"\376B\000\000\005int *");
+lf[709]=C_h_intern(&lf[709],9,"f32vector");
+lf[710]=C_h_intern(&lf[710],17,"nonnull-f32vector");
+lf[711]=C_decode_literal(C_heaptop,"\376B\000\000\007float *");
+lf[712]=C_h_intern(&lf[712],9,"f64vector");
+lf[713]=C_h_intern(&lf[713],17,"nonnull-f64vector");
+lf[714]=C_decode_literal(C_heaptop,"\376B\000\000\010double *");
+lf[715]=C_decode_literal(C_heaptop,"\376B\000\000\006char *");
+lf[716]=C_decode_literal(C_heaptop,"\376B\000\000\017unsigned char *");
+lf[717]=C_decode_literal(C_heaptop,"\376B\000\000\004void");
+lf[718]=C_decode_literal(C_heaptop,"\376B\000\000\001*");
+lf[719]=C_decode_literal(C_heaptop,"\376B\000\000\001&");
+lf[720]=C_decode_literal(C_heaptop,"\376B\000\000\001<");
+lf[721]=C_decode_literal(C_heaptop,"\376B\000\000\002> ");
+lf[722]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
+lf[723]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[724]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[725]=C_decode_literal(C_heaptop,"\376B\000\000\006const ");
+lf[726]=C_decode_literal(C_heaptop,"\376B\000\000\007struct ");
+lf[727]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
+lf[728]=C_decode_literal(C_heaptop,"\376B\000\000\006union ");
+lf[729]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
+lf[730]=C_decode_literal(C_heaptop,"\376B\000\000\005enum ");
+lf[731]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
+lf[732]=C_decode_literal(C_heaptop,"\376B\000\000\001*");
+lf[733]=C_decode_literal(C_heaptop,"\376B\000\000\001&");
+lf[734]=C_decode_literal(C_heaptop,"\376B\000\000\003 (*");
+lf[735]=C_decode_literal(C_heaptop,"\376B\000\000\002)(");
+lf[736]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[737]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
+lf[738]=C_h_intern(&lf[738],3,"...");
+lf[739]=C_decode_literal(C_heaptop,"\376B\000\000\003...");
+lf[740]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[741]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[742]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[743]=C_h_intern(&lf[743],9,"\003syserror");
+lf[744]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
+lf[745]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\010instance\376\003\000\000\002\376\001\000\000\020nonnull-instance\376\377\016");
+lf[746]=C_h_intern(&lf[746],4,"enum");
+lf[747]=C_h_intern(&lf[747],5,"union");
+lf[748]=C_h_intern(&lf[748],6,"struct");
+lf[749]=C_h_intern(&lf[749],8,"template");
+lf[750]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\007pointer\376\003\000\000\002\376\001\000\000\017nonnull-pointer\376\003\000\000\002\376\001\000\000\011c-pointer\376\003\000\000\002\376\001\000\000\021nonnull-c"
"-pointer\376\377\016");
-lf[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[751]=C_h_intern(&lf[751],12,"nonnull-blob");
+lf[752]=C_h_intern(&lf[752],8,"u8vector");
+lf[753]=C_h_intern(&lf[753],16,"nonnull-u8vector");
+lf[754]=C_h_intern(&lf[754],14,"scheme-pointer");
+lf[755]=C_h_intern(&lf[755],22,"nonnull-scheme-pointer");
+lf[756]=C_decode_literal(C_heaptop,"\376B\000\000\042illegal foreign argument type `~A\047");
+lf[757]=C_decode_literal(C_heaptop,"\376B\000\000\001(");
+lf[758]=C_decode_literal(C_heaptop,"\376B\000\000\031C_character_code((C_word)");
+lf[759]=C_decode_literal(C_heaptop,"\376B\000\000\010C_unfix(");
+lf[760]=C_decode_literal(C_heaptop,"\376B\000\000\010C_unfix(");
+lf[761]=C_decode_literal(C_heaptop,"\376B\000\000\030(unsigned short)C_unfix(");
+lf[762]=C_decode_literal(C_heaptop,"\376B\000\000\027C_num_to_unsigned_long(");
+lf[763]=C_decode_literal(C_heaptop,"\376B\000\000\013C_c_double(");
+lf[764]=C_decode_literal(C_heaptop,"\376B\000\000\015C_num_to_int(");
+lf[765]=C_decode_literal(C_heaptop,"\376B\000\000\017C_num_to_int64(");
+lf[766]=C_decode_literal(C_heaptop,"\376B\000\000\016C_num_to_long(");
+lf[767]=C_decode_literal(C_heaptop,"\376B\000\000\026C_num_to_unsigned_int(");
+lf[768]=C_decode_literal(C_heaptop,"\376B\000\000\027C_data_pointer_or_null(");
+lf[769]=C_decode_literal(C_heaptop,"\376B\000\000\017C_data_pointer(");
+lf[770]=C_decode_literal(C_heaptop,"\376B\000\000\027C_data_pointer_or_null(");
+lf[771]=C_decode_literal(C_heaptop,"\376B\000\000\017C_data_pointer(");
+lf[772]=C_decode_literal(C_heaptop,"\376B\000\000\024C_c_pointer_or_null(");
+lf[773]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_pointer_nn(");
+lf[774]=C_decode_literal(C_heaptop,"\376B\000\000\027C_c_bytevector_or_null(");
+lf[775]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_bytevector(");
+lf[776]=C_decode_literal(C_heaptop,"\376B\000\000\027C_c_bytevector_or_null(");
+lf[777]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_bytevector(");
+lf[778]=C_decode_literal(C_heaptop,"\376B\000\000\025C_c_u8vector_or_null(");
+lf[779]=C_decode_literal(C_heaptop,"\376B\000\000\015C_c_u8vector(");
+lf[780]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_u16vector_or_null(");
+lf[781]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_u16vector(");
+lf[782]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_u32vector_or_null(");
+lf[783]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_u32vector(");
+lf[784]=C_decode_literal(C_heaptop,"\376B\000\000\025C_c_s8vector_or_null(");
+lf[785]=C_decode_literal(C_heaptop,"\376B\000\000\015C_c_s8vector(");
+lf[786]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_s16vector_or_null(");
+lf[787]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_s16vector(");
+lf[788]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_s32vector_or_null(");
+lf[789]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_s32vector(");
+lf[790]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_f32vector_or_null(");
+lf[791]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_f32vector(");
+lf[792]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_f64vector_or_null(");
+lf[793]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_f64vector(");
+lf[794]=C_decode_literal(C_heaptop,"\376B\000\000\021C_string_or_null(");
+lf[795]=C_decode_literal(C_heaptop,"\376B\000\000\013C_c_string(");
+lf[796]=C_decode_literal(C_heaptop,"\376B\000\000\010C_truep(");
+lf[797]=C_decode_literal(C_heaptop,"\376B\000\000\024C_c_pointer_or_null(");
+lf[798]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_pointer_nn(");
+lf[799]=C_decode_literal(C_heaptop,"\376B\000\000\024C_c_pointer_or_null(");
+lf[800]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_pointer_nn(");
+lf[801]=C_decode_literal(C_heaptop,"\376B\000\000\024C_c_pointer_or_null(");
+lf[802]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_pointer_nn(");
+lf[803]=C_decode_literal(C_heaptop,"\376B\000\000\024C_c_pointer_or_null(");
+lf[804]=C_decode_literal(C_heaptop,"\376B\000\000\015C_num_to_int(");
+lf[805]=C_decode_literal(C_heaptop,"\376B\000\000\002*(");
+lf[806]=C_decode_literal(C_heaptop,"\376B\000\000\020)C_c_pointer_nn(");
+lf[807]=C_decode_literal(C_heaptop,"\376B\000\000\001*");
+lf[808]=C_decode_literal(C_heaptop,"\376B\000\000\002*(");
+lf[809]=C_decode_literal(C_heaptop,"\376B\000\000\021*)C_c_pointer_nn(");
+lf[810]=C_decode_literal(C_heaptop,"\376B\000\000 illegal foreign return type `~A\047");
+lf[811]=C_decode_literal(C_heaptop,"\376B\000\000\031C_make_character((C_word)");
+lf[812]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fix((C_word)");
+lf[813]=C_decode_literal(C_heaptop,"\376B\000\000%C_fix(C_MOST_POSITIVE_FIXNUM&(C_word)");
+lf[814]=C_decode_literal(C_heaptop,"\376B\000\000\015C_fix((short)");
+lf[815]=C_decode_literal(C_heaptop,"\376B\000\000\025C_fix(0xffff&(C_word)");
+lf[816]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fix((char)");
+lf[817]=C_decode_literal(C_heaptop,"\376B\000\000\023C_fix(0xff&(C_word)");
+lf[818]=C_decode_literal(C_heaptop,"\376B\000\000\012C_flonum(&");
+lf[819]=C_decode_literal(C_heaptop,"\376B\000\000\012C_number(&");
lf[820]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
lf[821]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
-lf[822]=C_decode_literal(C_heaptop,"\376B\000\000\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);
+lf[822]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[823]=C_decode_literal(C_heaptop,"\376B\000\000\025C_mpointer_or_false(&");
+lf[824]=C_decode_literal(C_heaptop,"\376B\000\000\016C_int_to_num(&");
+lf[825]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_double_to_num(&");
+lf[826]=C_decode_literal(C_heaptop,"\376B\000\000\027C_unsigned_int_to_num(&");
+lf[827]=C_decode_literal(C_heaptop,"\376B\000\000\017C_long_to_num(&");
+lf[828]=C_decode_literal(C_heaptop,"\376B\000\000\030C_unsigned_long_to_num(&");
+lf[829]=C_decode_literal(C_heaptop,"\376B\000\000\012C_mk_bool(");
+lf[830]=C_decode_literal(C_heaptop,"\376B\000\000\011((C_word)");
+lf[831]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[832]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
+lf[833]=C_decode_literal(C_heaptop,"\376B\000\000\011,(void*)&");
+lf[834]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
+lf[835]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[836]=C_decode_literal(C_heaptop,"\376B\000\000\025C_mpointer_or_false(&");
+lf[837]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[838]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
+lf[839]=C_decode_literal(C_heaptop,"\376B\000\000\011,(void*)&");
+lf[840]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
+lf[841]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[842]=C_decode_literal(C_heaptop,"\376B\000\000\025C_mpointer_or_false(&");
+lf[843]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[844]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
+lf[845]=C_decode_literal(C_heaptop,"\376B\000\000\016C_int_to_num(&");
+lf[846]=C_decode_literal(C_heaptop,"\376B\000\000\003\377\006\001");
+lf[847]=C_decode_literal(C_heaptop,"\376B\000\000\003\377\006\000");
+lf[848]=C_decode_literal(C_heaptop,"\376B\000\000\002\377\012");
+lf[849]=C_decode_literal(C_heaptop,"\376B\000\000\002\377\016");
+lf[850]=C_decode_literal(C_heaptop,"\376B\000\000\002\377>");
+lf[851]=C_decode_literal(C_heaptop,"\376B\000\000\002\377\036");
+lf[852]=C_decode_literal(C_heaptop,"\376B\000\000\002\377U");
+lf[853]=C_decode_literal(C_heaptop,"\376B\000\000\001\000");
+lf[854]=C_decode_literal(C_heaptop,"\376B\000\000\002\377\001");
+lf[855]=C_decode_literal(C_heaptop,"\376B\000\000\001U");
+lf[856]=C_decode_literal(C_heaptop,"\376B\000\000\001\000");
+lf[857]=C_decode_literal(C_heaptop,"\376B\000\000\001\001");
+lf[858]=C_decode_literal(C_heaptop,"\376B\000\000\037invalid literal - cannot encode");
+lf[859]=C_h_intern(&lf[859],17,"\003sysstring-append");
+lf[860]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[861]=C_h_intern(&lf[861],5,"cons*");
+lf[862]=C_h_intern(&lf[862],6,"random");
+lf[863]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
+C_register_lf2(lf,864,create_ptable());
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2508,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
C_library_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* k2484 */
-static void C_ccall f_2486(C_word c,C_word t0,C_word t1){
+/* k2506 */
+static void C_ccall f_2508(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2508,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2511,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* k2487 in k2484 */
-static void C_ccall f_2489(C_word c,C_word t0,C_word t1){
+/* k2509 in k2506 */
+static void C_ccall f_2511(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3663,29 +3701,29 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2511,2,t0,t1);}
t2=C_set_block_item(lf[0] /* output */,0,C_SCHEME_FALSE);
-t3=C_mutate((C_word*)lf[1]+1 /* (set! gen ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_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);
+t3=C_mutate((C_word*)lf[1]+1 /* (set! gen ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_2514,tmp=(C_word)a,a+=2,tmp));
+t4=C_mutate((C_word*)lf[4]+1 /* (set! gen-list ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_2557,tmp=(C_word)a,a+=2,tmp));
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2597,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10305,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t6);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t6);}
-/* k10146 in k2487 in k2484 */
-static void C_ccall f_10148(C_word c,C_word t0,C_word t1){
+/* k10303 in k2509 in k2506 */
+static void C_ccall f_10305(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10305,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10308,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[852],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[863],t1);}
-/* k10149 in k10146 in k2487 in k2484 */
-static void C_ccall f_10151(C_word c,C_word t0,C_word t1){
+/* k10306 in k10303 in k2509 in k2506 */
+static void C_ccall f_10308(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3693,99 +3731,99 @@ 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_save_and_reclaim((void*)tr2,(void*)f_10308,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10311,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10331,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10335,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
C_trace("c-backend.scm: 57 random");
-((C_proc3)C_retrieve_symbol_proc(lf[851]))(3,*((C_word*)lf[851]+1),t4,C_fix(16777216));}
+((C_proc3)C_retrieve_symbol_proc(lf[862]))(3,*((C_word*)lf[862]+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){
+/* k10333 in k10306 in k10303 in k2509 in k2506 */
+static void C_ccall f_10335(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("number->string");
C_number_to_string(4,0,((C_word*)t0)[2],t1,C_fix(16));}
-/* k10172 in k10149 in k10146 in k2487 in k2484 */
-static void C_ccall f_10174(C_word c,C_word t0,C_word t1){
+/* k10329 in k10306 in k10303 in k2509 in k2506 */
+static void C_ccall f_10331(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* k10152 in k10149 in k10146 in k2487 in k2484 */
-static void C_ccall f_10154(C_word c,C_word t0,C_word t1){
+/* k10309 in k10306 in k10303 in k2509 in k2506 */
+static void C_ccall f_10311(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10311,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10314,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("write-char/port");
-t3=C_retrieve(lf[334]);
+t3=C_retrieve(lf[339]);
((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){
+/* k10312 in k10309 in k10306 in k10303 in k2509 in k2506 */
+static void C_ccall f_10314(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10314,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10317,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10327,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
C_trace("c-backend.scm: 57 current-seconds");
-((C_proc2)C_retrieve_symbol_proc(lf[226]))(2,*((C_word*)lf[226]+1),t3);}
+((C_proc2)C_retrieve_symbol_proc(lf[232]))(2,*((C_word*)lf[232]+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){
+/* k10325 in k10312 in k10309 in k10306 in k10303 in k2509 in k2506 */
+static void C_ccall f_10327(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k10315 in k10312 in k10309 in k10306 in k10303 in k2509 in k2506 */
+static void C_ccall f_10317(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10317,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10320,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("write-char/port");
-t3=C_retrieve(lf[334]);
+t3=C_retrieve(lf[339]);
((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){
+/* k10318 in k10315 in k10312 in k10309 in k10306 in k10303 in k2509 in k2506 */
+static void C_ccall f_10320(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10320,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10323,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),t2,((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k10321 in k10318 in k10315 in k10312 in k10309 in k10306 in k10303 in k2509 in k2506 */
+static void C_ccall f_10323(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("c-backend.scm: 56 string->c-identifier");
-((C_proc3)C_retrieve_symbol_proc(lf[528]))(3,*((C_word*)lf[528]+1),((C_word*)t0)[2],t1);}
+((C_proc3)C_retrieve_symbol_proc(lf[540]))(3,*((C_word*)lf[540]+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){
+/* k2595 in k2509 in k2506 */
+static void C_ccall f_2597(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3805,27 +3843,27 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2597,2,t0,t1);}
t2=C_mutate((C_word*)lf[6]+1 /* (set! unique-id ...) */,t1);
-t3=C_mutate((C_word*)lf[7]+1 /* (set! generate-code ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_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));
+t3=C_mutate((C_word*)lf[7]+1 /* (set! generate-code ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_2599,tmp=(C_word)a,a+=2,tmp));
+t4=C_mutate((C_word*)lf[516]+1 /* (set! emit-procedure-table-info ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6859,tmp=(C_word)a,a+=2,tmp));
+t5=C_mutate((C_word*)lf[505]+1 /* (set! cleanup ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6936,tmp=(C_word)a,a+=2,tmp));
+t6=C_mutate((C_word*)lf[286]+1 /* (set! make-variable-list ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7025,tmp=(C_word)a,a+=2,tmp));
+t7=C_mutate((C_word*)lf[296]+1 /* (set! make-argument-list ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7041,tmp=(C_word)a,a+=2,tmp));
+t8=C_mutate((C_word*)lf[520]+1 /* (set! generate-external-variables ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7057,tmp=(C_word)a,a+=2,tmp));
+t9=C_mutate((C_word*)lf[206]+1 /* (set! generate-foreign-callback-stub-prototypes ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7111,tmp=(C_word)a,a+=2,tmp));
+t10=C_mutate((C_word*)lf[518]+1 /* (set! generate-foreign-stubs ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7151,tmp=(C_word)a,a+=2,tmp));
+t11=C_mutate((C_word*)lf[517]+1 /* (set! generate-foreign-callback-stubs ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7465,tmp=(C_word)a,a+=2,tmp));
+t12=C_mutate((C_word*)lf[549]+1 /* (set! generate-foreign-callback-header ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7959,tmp=(C_word)a,a+=2,tmp));
+t13=C_mutate((C_word*)lf[174]+1 /* (set! foreign-type-declaration ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_8024,tmp=(C_word)a,a+=2,tmp));
+t14=C_mutate((C_word*)lf[173]+1 /* (set! foreign-argument-conversion ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_8908,tmp=(C_word)a,a+=2,tmp));
+t15=C_mutate((C_word*)lf[168]+1 /* (set! foreign-result-conversion ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_9398,tmp=(C_word)a,a+=2,tmp));
+t16=C_mutate((C_word*)lf[365]+1 /* (set! encode-literal ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10005,tmp=(C_word)a,a+=2,tmp));
t17=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t17+1)))(2,t17,C_SCHEME_UNDEFINED);}
-/* ##compiler#encode-literal in k2573 in k2487 in k2484 */
-static void C_ccall f_9848(C_word c,C_word t0,C_word t1,C_word t2){
+/* ##compiler#encode-literal in k2595 in k2509 in k2506 */
+static void C_ccall f_10005(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -3872,142 +3910,142 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_10005,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10014,tmp=(C_word)a,a+=2,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10067,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t5=C_eqp(C_SCHEME_TRUE,t2);
if(C_truep(t5)){
t6=t1;
-t7=(C_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]);}
+t7=C_a_i_string(&a,1,C_make_character(254));
+C_trace("c-backend.scm: 1394 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t6,t7,lf[846]);}
else{
-t6=(C_word)C_eqp(C_SCHEME_FALSE,t2);
+t6=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]);}
+t8=C_a_i_string(&a,1,C_make_character(254));
+C_trace("c-backend.scm: 1394 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t7,t8,lf[847]);}
else{
-if(C_truep((C_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);}
+if(C_truep(C_charp(t2))){
+t7=C_fix(C_character_code(t2));
+t8=f_10014(C_a_i(&a,4),t7);
+C_trace("c-backend.scm: 1398 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t4,lf[848],t8);}
else{
-if(C_truep((C_word)C_i_nullp(t2))){
+if(C_truep(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]);}
+t8=C_a_i_string(&a,1,C_make_character(254));
+C_trace("c-backend.scm: 1394 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t7,t8,lf[849]);}
else{
-if(C_truep((C_word)C_eofp(t2))){
+if(C_truep(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]);}
+t8=C_a_i_string(&a,1,C_make_character(254));
+C_trace("c-backend.scm: 1394 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t7,t8,lf[850]);}
else{
-t7=C_retrieve(lf[349]);
-t8=(C_word)C_eqp(t7,t2);
+t7=C_retrieve(lf[354]);
+t8=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");
+t10=C_a_i_string(&a,1,C_make_character(254));
+C_trace("c-backend.scm: 1394 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t9,t10,lf[851]);}
+else{
+if(C_truep(C_fixnump(t2))){
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10185,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 1403 big-fixnum?");
+((C_proc3)C_retrieve_symbol_proc(lf[367]))(3,*((C_word*)lf[367]+1),t9,t2);}
+else{
+if(C_truep(C_i_numberp(t2))){
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10198,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 1412 number->string");
C_number_to_string(3,0,t9,t2);}
else{
-if(C_truep((C_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);}
+if(C_truep(C_i_symbolp(t2))){
+t9=C_slot(t2,C_fix(1));
+t10=C_i_string_length(t9);
+t11=f_10014(C_a_i(&a,4),t10);
+C_trace("c-backend.scm: 1415 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),t4,lf[857],t11,t9);}
else{
-if(C_truep((C_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);}
+if(C_truep(C_immp(t2))){
+C_trace("c-backend.scm: 1420 bomb");
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t4,lf[858],t2);}
else{
-if(C_truep((C_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);
+if(C_truep(C_byteblockp(t2))){
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10237,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
t10=t2;
-t11=(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);
+t11=stub2459(C_SCHEME_UNDEFINED,t10);
+t12=C_make_character(C_unfix(t11));
+t13=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);}
+t15=stub2463(C_SCHEME_UNDEFINED,t14);
+t16=f_10014(C_a_i(&a,4),t15);
+C_trace("c-backend.scm: 1423 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t9,t13,t16);}
else{
t9=t2;
-t10=(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);
+t10=stub2463(C_SCHEME_UNDEFINED,t9);
+t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10267,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
t12=t2;
-t13=(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);}}}}}}}}}}}}
+t13=stub2459(C_SCHEME_UNDEFINED,t12);
+t14=C_make_character(C_unfix(t13));
+t15=C_a_i_string(&a,1,t14);
+t16=f_10014(C_a_i(&a,4),t10);
+t17=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10279,a[2]=t16,a[3]=t15,a[4]=t11,tmp=(C_word)a,a+=5,tmp);
+t18=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10281,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 1433 list-tabulate");
+((C_proc4)C_retrieve_symbol_proc(lf[546]))(4,*((C_word*)lf[546]+1),t17,t10,t18);}}}}}}}}}}}}
-/* 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){
+/* a10280 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
+static void C_ccall f_10281(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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);}
+C_save_and_reclaim((void*)tr3,(void*)f_10281,3,t0,t1,t2);}
+t3=C_slot(((C_word*)t0)[2],t2);
+C_trace("c-backend.scm: 1433 encode-literal");
+((C_proc3)C_retrieve_symbol_proc(lf[365]))(3,*((C_word*)lf[365]+1),t1,t3);}
-/* 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){
+/* k10277 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
+static void C_ccall f_10279(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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);}
+C_trace("c-backend.scm: 1430 cons*");
+((C_proc5)C_retrieve_symbol_proc(lf[861]))(5,*((C_word*)lf[861]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k10265 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
+static void C_ccall f_10267(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 1397 string-intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[217]))(4,*((C_word*)lf[217]+1),((C_word*)t0)[2],t1,lf[849]);}
+C_trace("c-backend.scm: 1429 string-intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[223]))(4,*((C_word*)lf[223]+1),((C_word*)t0)[2],t1,lf[860]);}
-/* 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){
+/* k10235 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
+static void C_ccall f_10237(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1422 ##sys#string-append");
+((C_proc4)C_retrieve_symbol_proc(lf[859]))(4,*((C_word*)lf[859]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k10196 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
+static void C_ccall f_10198(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1412 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[855],t1,lf[856]);}
-/* 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){
+/* k10183 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
+static void C_ccall f_10185(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4025,51 +4063,51 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10185,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10024,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 1378 number->string");
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10181,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 1410 number->string");
C_number_to_string(3,0,t2,((C_word*)t0)[2]);}
else{
-t2=(C_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){
+t2=C_fixnum_shift_right(((C_word*)t0)[2],C_fix(24));
+t3=C_fixnum_and(C_fix(255),t2);
+t4=C_make_character(C_unfix(t3));
+t5=C_fixnum_shift_right(((C_word*)t0)[2],C_fix(16));
+t6=C_fixnum_and(C_fix(255),t5);
+t7=C_make_character(C_unfix(t6));
+t8=C_fixnum_shift_right(((C_word*)t0)[2],C_fix(8));
+t9=C_fixnum_and(C_fix(255),t8);
+t10=C_make_character(C_unfix(t9));
+t11=C_fixnum_and(C_fix(255),((C_word*)t0)[2]);
+t12=C_make_character(C_unfix(t11));
+t13=C_a_i_string(&a,4,t4,t7,t10,t12);
+C_trace("c-backend.scm: 1404 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[854],t13);}}
+
+/* k10179 in k10183 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
+static void C_ccall f_10181(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1410 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[852],t1,lf[853]);}
-/* 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){
+/* k10065 in ##compiler#encode-literal in k2595 in k2509 in k2506 */
+static void C_ccall f_10067(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[2],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9910,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_10067,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);}
+t3=C_a_i_string(&a,1,C_make_character(254));
+C_trace("c-backend.scm: 1394 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t2,t3,t1);}
-/* encode-size in ##compiler#encode-literal in k2573 in k2487 in k2484 */
-static C_word C_fcall f_9857(C_word *a,C_word t1){
+/* encode-size in ##compiler#encode-literal in k2595 in k2509 in k2506 */
+static C_word C_fcall f_10014(C_word *a,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4081,18 +4119,18 @@ 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));}
+t2=C_fixnum_shift_right(t1,C_fix(16));
+t3=C_fixnum_and(C_fix(255),t2);
+t4=C_make_character(C_unfix(t3));
+t5=C_fixnum_shift_right(t1,C_fix(8));
+t6=C_fixnum_and(C_fix(255),t5);
+t7=C_make_character(C_unfix(t6));
+t8=C_fixnum_and(C_fix(255),t1);
+t9=C_make_character(C_unfix(t8));
+return(C_a_i_string(&a,3,t4,t7,t9));}
-/* ##compiler#foreign-result-conversion in 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){
+/* ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9398(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -4127,117 +4165,117 @@ 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);
+C_save_and_reclaim((void*)tr4,(void*)f_9398,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9400,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
t5=t2;
-t6=(C_word)C_eqp(t5,lf[16]);
-t7=(C_truep(t6)?t6:(C_word)C_eqp(t5,lf[631]));
+t6=C_eqp(t5,lf[16]);
+t7=(C_truep(t6)?t6:C_eqp(t5,lf[642]));
if(C_truep(t7)){
t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[800]);}
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[811]);}
else{
-t8=(C_word)C_eqp(t5,lf[626]);
-t9=(C_truep(t8)?t8:(C_word)C_eqp(t5,lf[627]));
+t8=C_eqp(t5,lf[637]);
+t9=(C_truep(t8)?t8:C_eqp(t5,lf[638]));
if(C_truep(t9)){
t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,lf[801]);}
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,lf[812]);}
else{
-t10=(C_word)C_eqp(t5,lf[632]);
-t11=(C_truep(t10)?t10:(C_word)C_eqp(t5,lf[633]));
+t10=C_eqp(t5,lf[643]);
+t11=(C_truep(t10)?t10:C_eqp(t5,lf[644]));
if(C_truep(t11)){
t12=t1;
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[802]);}
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[813]);}
else{
-t12=(C_word)C_eqp(t5,lf[628]);
+t12=C_eqp(t5,lf[639]);
if(C_truep(t12)){
t13=t1;
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,lf[803]);}
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,lf[814]);}
else{
-t13=(C_word)C_eqp(t5,lf[629]);
+t13=C_eqp(t5,lf[640]);
if(C_truep(t13)){
t14=t1;
-((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,lf[804]);}
+((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,lf[815]);}
else{
-t14=(C_word)C_eqp(t5,lf[634]);
+t14=C_eqp(t5,lf[645]);
if(C_truep(t14)){
t15=t1;
-((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,lf[805]);}
+((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,lf[816]);}
else{
-t15=(C_word)C_eqp(t5,lf[635]);
+t15=C_eqp(t5,lf[646]);
if(C_truep(t15)){
t16=t1;
-((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,lf[806]);}
+((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,lf[817]);}
else{
-t16=(C_word)C_eqp(t5,lf[586]);
-t17=(C_truep(t16)?t16:(C_word)C_eqp(t5,lf[615]));
+t16=C_eqp(t5,lf[598]);
+t17=(C_truep(t16)?t16:C_eqp(t5,lf[626]));
if(C_truep(t17)){
-t18=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9310,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t18=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9467,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t18);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t18);}
else{
-t18=(C_word)C_eqp(t5,lf[622]);
+t18=C_eqp(t5,lf[633]);
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);
+t19=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9488,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t19);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+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);
+t19=C_eqp(t5,lf[604]);
+t20=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9509,a[2]=t4,a[3]=t2,a[4]=t5,a[5]=t3,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
if(C_truep(t19)){
t21=t20;
-f_9352(t21,t19);}
+f_9509(t21,t19);}
else{
-t21=(C_word)C_eqp(t5,lf[588]);
+t21=C_eqp(t5,lf[600]);
if(C_truep(t21)){
t22=t20;
-f_9352(t22,t21);}
+f_9509(t22,t21);}
else{
-t22=(C_word)C_eqp(t5,lf[601]);
+t22=C_eqp(t5,lf[612]);
if(C_truep(t22)){
t23=t20;
-f_9352(t23,t22);}
+f_9509(t23,t22);}
else{
-t23=(C_word)C_eqp(t5,lf[612]);
+t23=C_eqp(t5,lf[623]);
if(C_truep(t23)){
t24=t20;
-f_9352(t24,t23);}
+f_9509(t24,t23);}
else{
-t24=(C_word)C_eqp(t5,lf[608]);
+t24=C_eqp(t5,lf[619]);
if(C_truep(t24)){
t25=t20;
-f_9352(t25,t24);}
+f_9509(t25,t24);}
else{
-t25=(C_word)C_eqp(t5,lf[613]);
+t25=C_eqp(t5,lf[624]);
if(C_truep(t25)){
t26=t20;
-f_9352(t26,t25);}
+f_9509(t26,t25);}
else{
-t26=(C_word)C_eqp(t5,lf[614]);
+t26=C_eqp(t5,lf[625]);
if(C_truep(t26)){
t27=t20;
-f_9352(t27,t26);}
+f_9509(t27,t26);}
else{
-t27=(C_word)C_eqp(t5,lf[609]);
+t27=C_eqp(t5,lf[620]);
if(C_truep(t27)){
t28=t20;
-f_9352(t28,t27);}
+f_9509(t28,t27);}
else{
-t28=(C_word)C_eqp(t5,lf[610]);
+t28=C_eqp(t5,lf[621]);
if(C_truep(t28)){
t29=t20;
-f_9352(t29,t28);}
+f_9509(t29,t28);}
else{
-t29=(C_word)C_eqp(t5,lf[611]);
+t29=C_eqp(t5,lf[622]);
if(C_truep(t29)){
t30=t20;
-f_9352(t30,t29);}
+f_9509(t30,t29);}
else{
-t30=(C_word)C_eqp(t5,lf[624]);
+t30=C_eqp(t5,lf[635]);
t31=t20;
-f_9352(t31,(C_truep(t30)?t30:(C_word)C_eqp(t5,lf[625])));}}}}}}}}}}}}}}}}}}}}
+f_9509(t31,(C_truep(t30)?t30:C_eqp(t5,lf[636])));}}}}}}}}}}}}}}}}}}}}
-/* k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
-static void C_fcall f_9352(C_word t0,C_word t1){
+/* k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_fcall f_9509(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4261,71 +4299,71 @@ 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);}
+C_save_and_reclaim((void*)trf_9509,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9355,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9512,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t2);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t2);}
else{
-t2=(C_word)C_eqp(((C_word*)t0)[4],lf[599]);
+t2=C_eqp(((C_word*)t0)[4],lf[610]);
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);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9533,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t3);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+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]));
+t3=C_eqp(((C_word*)t0)[4],lf[630]);
+t4=(C_truep(t3)?t3:C_eqp(((C_word*)t0)[4],lf[631]));
if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9400,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9557,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t5);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t5);}
else{
-t5=(C_word)C_eqp(((C_word*)t0)[4],lf[623]);
+t5=C_eqp(((C_word*)t0)[4],lf[634]);
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);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9578,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t6);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+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]));
+t6=C_eqp(((C_word*)t0)[4],lf[627]);
+t7=(C_truep(t6)?t6:C_eqp(((C_word*)t0)[4],lf[628]));
if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9445,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9602,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t8);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t8);}
else{
-t8=(C_word)C_eqp(((C_word*)t0)[4],lf[618]);
+t8=C_eqp(((C_word*)t0)[4],lf[629]);
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);
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9623,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t9);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t9);}
else{
-t9=(C_word)C_eqp(((C_word*)t0)[4],lf[621]);
+t9=C_eqp(((C_word*)t0)[4],lf[632]);
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);
+t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9644,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t10);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t10);}
else{
-t10=(C_word)C_eqp(((C_word*)t0)[4],lf[13]);
+t10=C_eqp(((C_word*)t0)[4],lf[13]);
if(C_truep(t10)){
t11=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,lf[818]);}
+((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,lf[829]);}
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]));
+t11=C_eqp(((C_word*)t0)[4],lf[562]);
+t12=(C_truep(t11)?t11:C_eqp(((C_word*)t0)[4],lf[641]));
if(C_truep(t12)){
t13=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,lf[819]);}
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,lf[830]);}
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]);}
+t13=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9674,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_i_symbolp(((C_word*)t0)[3]))){
+C_trace("c-backend.scm: 1347 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[617]))(4,*((C_word*)lf[617]+1),t13,C_retrieve(lf[618]),((C_word*)t0)[3]);}
else{
t14=t13;
-f_9517(2,t14,C_SCHEME_FALSE);}}}}}}}}}}}
+f_9674(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){
+/* k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9674(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4333,24 +4371,24 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9674,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9521,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
-C_trace("g23462347");
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9678,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("g23682369");
t3=t2;
-f_9521(t3,((C_word*)t0)[4],t1);}
+f_9678(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]);
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9701,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_i_listp(((C_word*)t0)[3]))){
+t3=C_i_length(((C_word*)t0)[3]);
t4=t2;
-f_9544(t4,(C_word)C_fixnum_greater_or_equal_p(t3,C_fix(2)));}
+f_9701(t4,C_fixnum_greater_or_equal_p(t3,C_fix(2)));}
else{
t3=t2;
-f_9544(t3,C_SCHEME_FALSE);}}}
+f_9701(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){
+/* k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_fcall f_9701(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4376,859 +4414,859 @@ 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);}
+C_save_and_reclaim((void*)trf_9701,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]));
+t2=C_i_car(((C_word*)t0)[5]);
+t3=C_eqp(t2,lf[611]);
+t4=(C_truep(t3)?t3:C_eqp(t2,lf[612]));
if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9559,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9716,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t5);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t5);}
else{
-t5=(C_word)C_eqp(t2,lf[595]);
+t5=C_eqp(t2,lf[607]);
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);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9737,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t6);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t6);}
else{
-t6=(C_word)C_eqp(t2,lf[603]);
+t6=C_eqp(t2,lf[614]);
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);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9758,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t7);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t7);}
else{
-t7=(C_word)C_eqp(t2,lf[604]);
+t7=C_eqp(t2,lf[615]);
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);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9779,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t8);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t8);}
else{
-t8=(C_word)C_eqp(t2,lf[605]);
+t8=C_eqp(t2,lf[616]);
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);
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9800,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t9);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t9);}
else{
-t9=(C_word)C_eqp(t2,lf[597]);
+t9=C_eqp(t2,lf[609]);
if(C_truep(t9)){
-t10=(C_word)C_i_cadr(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 1330 foreign-result-conversion");
+t10=C_i_cadr(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 1362 foreign-result-conversion");
((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),((C_word*)t0)[4],t10,((C_word*)t0)[3]);}
else{
-t10=(C_word)C_eqp(t2,lf[598]);
-t11=(C_truep(t10)?t10:(C_word)C_eqp(t2,lf[599]));
+t10=C_eqp(t2,lf[480]);
+t11=(C_truep(t10)?t10:C_eqp(t2,lf[610]));
if(C_truep(t11)){
-t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9680,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9837,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t12);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t12);}
else{
-t12=(C_word)C_eqp(t2,lf[602]);
+t12=C_eqp(t2,lf[613]);
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);
+t13=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9858,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t13);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t13);}
else{
-t13=(C_word)C_eqp(t2,lf[735]);
+t13=C_eqp(t2,lf[746]);
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);
+t14=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9879,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t14);}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t14);}
else{
-C_trace("c-backend.scm: 1335 err");
+C_trace("c-backend.scm: 1367 err");
t14=((C_word*)t0)[2];
-f_9243(t14,((C_word*)t0)[4]);}}}}}}}}}}
+f_9400(t14,((C_word*)t0)[4]);}}}}}}}}}}
else{
-C_trace("c-backend.scm: 1336 err");
+C_trace("c-backend.scm: 1368 err");
t2=((C_word*)t0)[2];
-f_9243(t2,((C_word*)t0)[4]);}}
+f_9400(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){
+/* k9877 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9879(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9879,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9882,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[834],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[845],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){
+/* k9880 in k9877 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9882(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9882,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9885,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9883 in k9880 in k9877 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9885(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9885,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9888,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("write-char/port");
-t3=C_retrieve(lf[334]);
+t3=C_retrieve(lf[339]);
((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){
+/* k9886 in k9883 in k9880 in k9877 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9888(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k9856 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9858(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9858,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9861,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[833],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[844],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){
+/* k9859 in k9856 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9861(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9861,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9864,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9862 in k9859 in k9856 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9864(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9864,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9867,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[832],((C_word*)t0)[2]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[843],((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){
+/* k9865 in k9862 in k9859 in k9856 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9867(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k9835 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9837(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9837,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9840,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[831],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[842],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){
+/* k9838 in k9835 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9840(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9840,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9843,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9841 in k9838 in k9835 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9843(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9843,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9846,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[830],((C_word*)t0)[2]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[841],((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){
+/* k9844 in k9841 in k9838 in k9835 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9846(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k9798 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9800(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9800,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9803,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[829],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[840],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){
+/* k9801 in k9798 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9803(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9803,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9806,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9804 in k9801 in k9798 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9806(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9806,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9809,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[828],((C_word*)t0)[2]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[839],((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){
+/* k9807 in k9804 in k9801 in k9798 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9809(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k9777 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9779(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9779,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9782,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[827],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[838],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){
+/* k9780 in k9777 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9782(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9782,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9785,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9783 in k9780 in k9777 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9785(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9785,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9788,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[826],((C_word*)t0)[2]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[837],((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){
+/* k9786 in k9783 in k9780 in k9777 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9788(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k9756 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9758(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9758,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9761,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[825],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[836],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){
+/* k9759 in k9756 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9761(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9761,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9764,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9762 in k9759 in k9756 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9764(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9764,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9767,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[824],((C_word*)t0)[2]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[835],((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){
+/* k9765 in k9762 in k9759 in k9756 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9767(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k9735 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9737(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9737,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9740,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[823],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[834],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){
+/* k9738 in k9735 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9740(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9740,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9743,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9741 in k9738 in k9735 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9743(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9743,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9746,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[822],((C_word*)t0)[2]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[833],((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){
+/* k9744 in k9741 in k9738 in k9735 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9746(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k9714 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9716(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9716,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9719,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[821],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[832],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){
+/* k9717 in k9714 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9719(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9719,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9722,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9720 in k9717 in k9714 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9722(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9722,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9725,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[820],((C_word*)t0)[2]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[831],((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){
+/* k9723 in k9720 in k9717 in k9714 in k9699 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9725(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* g2368 in k9672 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_fcall f_9678(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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_save_and_reclaim((void*)trf_9678,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_vectorp(t2))){
+t3=C_i_vector_ref(t2,C_fix(0));
+C_trace("c-backend.scm: 1349 foreign-result-conversion");
((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t1,t3,((C_word*)t0)[2]);}
else{
t3=t2;
-C_trace("c-backend.scm: 1317 foreign-result-conversion");
+C_trace("c-backend.scm: 1349 foreign-result-conversion");
((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t1,t3,((C_word*)t0)[2]);}}
-/* 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){
+/* k9642 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9644(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9644,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9647,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[817],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[828],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){
+/* k9645 in k9642 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9647(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9647,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9650,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9648 in k9645 in k9642 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9650(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9650,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9653,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("write-char/port");
-t3=C_retrieve(lf[334]);
+t3=C_retrieve(lf[339]);
((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){
+/* k9651 in k9648 in k9645 in k9642 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9653(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k9621 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9623(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9623,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9626,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[816],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[827],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){
+/* k9624 in k9621 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9626(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9626,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9629,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9627 in k9624 in k9621 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9629(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9629,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9632,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("write-char/port");
-t3=C_retrieve(lf[334]);
+t3=C_retrieve(lf[339]);
((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){
+/* k9630 in k9627 in k9624 in k9621 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9632(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k9600 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9602(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9602,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9605,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[815],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[826],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){
+/* k9603 in k9600 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9605(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9605,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9608,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9606 in k9603 in k9600 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9608(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9608,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9611,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("write-char/port");
-t3=C_retrieve(lf[334]);
+t3=C_retrieve(lf[339]);
((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){
+/* k9609 in k9606 in k9603 in k9600 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9611(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k9576 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9578(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9578,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9581,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[814],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[825],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){
+/* k9579 in k9576 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9581(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9581,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9584,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9582 in k9579 in k9576 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9584(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9584,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9587,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("write-char/port");
-t3=C_retrieve(lf[334]);
+t3=C_retrieve(lf[339]);
((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){
+/* k9585 in k9582 in k9579 in k9576 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9587(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k9555 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9557(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9557,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9560,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[813],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[824],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){
+/* k9558 in k9555 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9560(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9560,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9563,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9561 in k9558 in k9555 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9563(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9563,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9566,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("write-char/port");
-t3=C_retrieve(lf[334]);
+t3=C_retrieve(lf[339]);
((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){
+/* k9564 in k9561 in k9558 in k9555 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9566(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k9531 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9533(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9533,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9536,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[812],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[823],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){
+/* k9534 in k9531 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9536(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9536,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9539,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9537 in k9534 in k9531 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9539(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9539,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9542,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[811],((C_word*)t0)[2]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[822],((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){
+/* k9540 in k9537 in k9534 in k9531 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9542(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k9510 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9512(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9512,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9515,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[810],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[821],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){
+/* k9513 in k9510 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9515(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9515,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9518,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9516 in k9513 in k9510 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9518(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9518,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9521,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[809],((C_word*)t0)[2]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[820],((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){
+/* k9519 in k9516 in k9513 in k9510 in k9507 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9521(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k9486 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9488(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9488,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9491,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[808],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[819],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){
+/* k9489 in k9486 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9491(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9491,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9494,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9492 in k9489 in k9486 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9494(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9494,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9497,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("write-char/port");
-t3=C_retrieve(lf[334]);
+t3=C_retrieve(lf[339]);
((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){
+/* k9495 in k9492 in k9489 in k9486 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9497(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k9465 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9467(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9467,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9470,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[807],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[818],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){
+/* k9468 in k9465 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9470(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9470,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9473,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k9471 in k9468 in k9465 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9473(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9473,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9476,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("write-char/port");
-t3=C_retrieve(lf[334]);
+t3=C_retrieve(lf[339]);
((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){
+/* k9474 in k9471 in k9468 in k9465 in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9476(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* err in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
-static void C_fcall f_9243(C_word t0,C_word t1){
+/* err in ##compiler#foreign-result-conversion in k2595 in k2509 in k2506 */
+static void C_fcall f_9400(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_9400,NULL,2,t0,t1);}
+C_trace("c-backend.scm: 1323 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[669]))(4,*((C_word*)lf[669]+1),t1,lf[810],((C_word*)t0)[2]);}
-/* ##compiler#foreign-argument-conversion in k2573 in k2487 in k2484 */
-static void C_ccall f_8751(C_word c,C_word t0,C_word t1,C_word t2){
+/* ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_8908(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5244,42 +5282,42 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_8908,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8910,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
t4=t2;
-t5=(C_word)C_eqp(t4,lf[630]);
+t5=C_eqp(t4,lf[641]);
if(C_truep(t5)){
t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[746]);}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[757]);}
else{
-t6=(C_word)C_eqp(t4,lf[16]);
-t7=(C_truep(t6)?t6:(C_word)C_eqp(t4,lf[631]));
+t6=C_eqp(t4,lf[16]);
+t7=(C_truep(t6)?t6:C_eqp(t4,lf[642]));
if(C_truep(t7)){
t8=t1;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[747]);}
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[758]);}
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);
+t8=C_eqp(t4,lf[645]);
+t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8938,a[2]=t3,a[3]=t2,a[4]=t4,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
if(C_truep(t8)){
t10=t9;
-f_8781(t10,t8);}
+f_8938(t10,t8);}
else{
-t10=(C_word)C_eqp(t4,lf[626]);
+t10=C_eqp(t4,lf[637]);
if(C_truep(t10)){
t11=t9;
-f_8781(t11,t10);}
+f_8938(t11,t10);}
else{
-t11=(C_word)C_eqp(t4,lf[632]);
+t11=C_eqp(t4,lf[643]);
if(C_truep(t11)){
t12=t9;
-f_8781(t12,t11);}
+f_8938(t12,t11);}
else{
-t12=(C_word)C_eqp(t4,lf[633]);
+t12=C_eqp(t4,lf[644]);
t13=t9;
-f_8781(t13,(C_truep(t12)?t12:(C_word)C_eqp(t4,lf[635])));}}}}}}
+f_8938(t13,(C_truep(t12)?t12:C_eqp(t4,lf[646])));}}}}}}
-/* k8779 in ##compiler#foreign-argument-conversion in k2573 in k2487 in k2484 */
-static void C_fcall f_8781(C_word t0,C_word t1){
+/* k8936 in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
+static void C_fcall f_8938(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5290,38 +5328,38 @@ 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);}
+C_save_and_reclaim((void*)trf_8938,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[748]);}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[759]);}
else{
-t2=(C_word)C_eqp(((C_word*)t0)[4],lf[628]);
+t2=C_eqp(((C_word*)t0)[4],lf[639]);
if(C_truep(t2)){
t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[749]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[760]);}
else{
-t3=(C_word)C_eqp(((C_word*)t0)[4],lf[629]);
+t3=C_eqp(((C_word*)t0)[4],lf[640]);
if(C_truep(t3)){
t4=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[750]);}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[761]);}
else{
-t4=(C_word)C_eqp(((C_word*)t0)[4],lf[621]);
+t4=C_eqp(((C_word*)t0)[4],lf[632]);
if(C_truep(t4)){
t5=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[751]);}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[762]);}
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);
+t5=C_eqp(((C_word*)t0)[4],lf[626]);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8965,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
if(C_truep(t5)){
t7=t6;
-f_8808(t7,t5);}
+f_8965(t7,t5);}
else{
-t7=(C_word)C_eqp(((C_word*)t0)[4],lf[622]);
+t7=C_eqp(((C_word*)t0)[4],lf[633]);
t8=t6;
-f_8808(t8,(C_truep(t7)?t7:(C_word)C_eqp(((C_word*)t0)[4],lf[586])));}}}}}}
+f_8965(t8,(C_truep(t7)?t7:C_eqp(((C_word*)t0)[4],lf[598])));}}}}}}
-/* 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){
+/* k8963 in k8936 in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
+static void C_fcall f_8965(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5362,180 +5400,180 @@ 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);}
+C_save_and_reclaim((void*)trf_8965,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[752]);}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[763]);}
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]));
+t2=C_eqp(((C_word*)t0)[4],lf[630]);
+t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[4],lf[631]));
if(C_truep(t3)){
t4=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[753]);}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[764]);}
else{
-t4=(C_word)C_eqp(((C_word*)t0)[4],lf[623]);
+t4=C_eqp(((C_word*)t0)[4],lf[634]);
if(C_truep(t4)){
t5=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[754]);}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[765]);}
else{
-t5=(C_word)C_eqp(((C_word*)t0)[4],lf[618]);
+t5=C_eqp(((C_word*)t0)[4],lf[629]);
if(C_truep(t5)){
t6=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[755]);}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[766]);}
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]));
+t6=C_eqp(((C_word*)t0)[4],lf[627]);
+t7=(C_truep(t6)?t6:C_eqp(((C_word*)t0)[4],lf[628]));
if(C_truep(t7)){
t8=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[756]);}
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[767]);}
else{
-t8=(C_word)C_eqp(((C_word*)t0)[4],lf[598]);
+t8=C_eqp(((C_word*)t0)[4],lf[480]);
if(C_truep(t8)){
t9=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,lf[757]);}
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,lf[768]);}
else{
-t9=(C_word)C_eqp(((C_word*)t0)[4],lf[600]);
+t9=C_eqp(((C_word*)t0)[4],lf[611]);
if(C_truep(t9)){
t10=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,lf[758]);}
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,lf[769]);}
else{
-t10=(C_word)C_eqp(((C_word*)t0)[4],lf[743]);
+t10=C_eqp(((C_word*)t0)[4],lf[754]);
if(C_truep(t10)){
t11=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,lf[759]);}
+((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,lf[770]);}
else{
-t11=(C_word)C_eqp(((C_word*)t0)[4],lf[744]);
+t11=C_eqp(((C_word*)t0)[4],lf[755]);
if(C_truep(t11)){
t12=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[760]);}
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[771]);}
else{
-t12=(C_word)C_eqp(((C_word*)t0)[4],lf[599]);
+t12=C_eqp(((C_word*)t0)[4],lf[610]);
if(C_truep(t12)){
t13=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,lf[761]);}
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,lf[772]);}
else{
-t13=(C_word)C_eqp(((C_word*)t0)[4],lf[601]);
+t13=C_eqp(((C_word*)t0)[4],lf[612]);
if(C_truep(t13)){
t14=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,lf[762]);}
+((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,lf[773]);}
else{
-t14=(C_word)C_eqp(((C_word*)t0)[4],lf[681]);
+t14=C_eqp(((C_word*)t0)[4],lf[692]);
if(C_truep(t14)){
t15=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,lf[763]);}
+((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,lf[774]);}
else{
-t15=(C_word)C_eqp(((C_word*)t0)[4],lf[740]);
+t15=C_eqp(((C_word*)t0)[4],lf[751]);
if(C_truep(t15)){
t16=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,lf[764]);}
+((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,lf[775]);}
else{
-t16=(C_word)C_eqp(((C_word*)t0)[4],lf[678]);
+t16=C_eqp(((C_word*)t0)[4],lf[689]);
if(C_truep(t16)){
t17=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t17+1)))(2,t17,lf[765]);}
+((C_proc2)(void*)(*((C_word*)t17+1)))(2,t17,lf[776]);}
else{
-t17=(C_word)C_eqp(((C_word*)t0)[4],lf[679]);
+t17=C_eqp(((C_word*)t0)[4],lf[690]);
if(C_truep(t17)){
t18=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t18+1)))(2,t18,lf[766]);}
+((C_proc2)(void*)(*((C_word*)t18+1)))(2,t18,lf[777]);}
else{
-t18=(C_word)C_eqp(((C_word*)t0)[4],lf[741]);
+t18=C_eqp(((C_word*)t0)[4],lf[752]);
if(C_truep(t18)){
t19=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t19+1)))(2,t19,lf[767]);}
+((C_proc2)(void*)(*((C_word*)t19+1)))(2,t19,lf[778]);}
else{
-t19=(C_word)C_eqp(((C_word*)t0)[4],lf[742]);
+t19=C_eqp(((C_word*)t0)[4],lf[753]);
if(C_truep(t19)){
t20=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t20+1)))(2,t20,lf[768]);}
+((C_proc2)(void*)(*((C_word*)t20+1)))(2,t20,lf[779]);}
else{
-t20=(C_word)C_eqp(((C_word*)t0)[4],lf[683]);
+t20=C_eqp(((C_word*)t0)[4],lf[694]);
if(C_truep(t20)){
t21=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t21+1)))(2,t21,lf[769]);}
+((C_proc2)(void*)(*((C_word*)t21+1)))(2,t21,lf[780]);}
else{
-t21=(C_word)C_eqp(((C_word*)t0)[4],lf[684]);
+t21=C_eqp(((C_word*)t0)[4],lf[695]);
if(C_truep(t21)){
t22=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t22+1)))(2,t22,lf[770]);}
+((C_proc2)(void*)(*((C_word*)t22+1)))(2,t22,lf[781]);}
else{
-t22=(C_word)C_eqp(((C_word*)t0)[4],lf[689]);
+t22=C_eqp(((C_word*)t0)[4],lf[700]);
if(C_truep(t22)){
t23=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t23+1)))(2,t23,lf[771]);}
+((C_proc2)(void*)(*((C_word*)t23+1)))(2,t23,lf[782]);}
else{
-t23=(C_word)C_eqp(((C_word*)t0)[4],lf[690]);
+t23=C_eqp(((C_word*)t0)[4],lf[701]);
if(C_truep(t23)){
t24=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t24+1)))(2,t24,lf[772]);}
+((C_proc2)(void*)(*((C_word*)t24+1)))(2,t24,lf[783]);}
else{
-t24=(C_word)C_eqp(((C_word*)t0)[4],lf[686]);
+t24=C_eqp(((C_word*)t0)[4],lf[697]);
if(C_truep(t24)){
t25=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t25+1)))(2,t25,lf[773]);}
+((C_proc2)(void*)(*((C_word*)t25+1)))(2,t25,lf[784]);}
else{
-t25=(C_word)C_eqp(((C_word*)t0)[4],lf[687]);
+t25=C_eqp(((C_word*)t0)[4],lf[698]);
if(C_truep(t25)){
t26=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t26+1)))(2,t26,lf[774]);}
+((C_proc2)(void*)(*((C_word*)t26+1)))(2,t26,lf[785]);}
else{
-t26=(C_word)C_eqp(((C_word*)t0)[4],lf[692]);
+t26=C_eqp(((C_word*)t0)[4],lf[703]);
if(C_truep(t26)){
t27=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t27+1)))(2,t27,lf[775]);}
+((C_proc2)(void*)(*((C_word*)t27+1)))(2,t27,lf[786]);}
else{
-t27=(C_word)C_eqp(((C_word*)t0)[4],lf[693]);
+t27=C_eqp(((C_word*)t0)[4],lf[704]);
if(C_truep(t27)){
t28=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t28+1)))(2,t28,lf[776]);}
+((C_proc2)(void*)(*((C_word*)t28+1)))(2,t28,lf[787]);}
else{
-t28=(C_word)C_eqp(((C_word*)t0)[4],lf[695]);
+t28=C_eqp(((C_word*)t0)[4],lf[706]);
if(C_truep(t28)){
t29=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t29+1)))(2,t29,lf[777]);}
+((C_proc2)(void*)(*((C_word*)t29+1)))(2,t29,lf[788]);}
else{
-t29=(C_word)C_eqp(((C_word*)t0)[4],lf[696]);
+t29=C_eqp(((C_word*)t0)[4],lf[707]);
if(C_truep(t29)){
t30=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t30+1)))(2,t30,lf[778]);}
+((C_proc2)(void*)(*((C_word*)t30+1)))(2,t30,lf[789]);}
else{
-t30=(C_word)C_eqp(((C_word*)t0)[4],lf[698]);
+t30=C_eqp(((C_word*)t0)[4],lf[709]);
if(C_truep(t30)){
t31=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t31+1)))(2,t31,lf[779]);}
+((C_proc2)(void*)(*((C_word*)t31+1)))(2,t31,lf[790]);}
else{
-t31=(C_word)C_eqp(((C_word*)t0)[4],lf[699]);
+t31=C_eqp(((C_word*)t0)[4],lf[710]);
if(C_truep(t31)){
t32=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t32+1)))(2,t32,lf[780]);}
+((C_proc2)(void*)(*((C_word*)t32+1)))(2,t32,lf[791]);}
else{
-t32=(C_word)C_eqp(((C_word*)t0)[4],lf[701]);
+t32=C_eqp(((C_word*)t0)[4],lf[712]);
if(C_truep(t32)){
t33=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t33+1)))(2,t33,lf[781]);}
+((C_proc2)(void*)(*((C_word*)t33+1)))(2,t33,lf[792]);}
else{
-t33=(C_word)C_eqp(((C_word*)t0)[4],lf[702]);
+t33=C_eqp(((C_word*)t0)[4],lf[713]);
if(C_truep(t33)){
t34=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t34+1)))(2,t34,lf[782]);}
+((C_proc2)(void*)(*((C_word*)t34+1)))(2,t34,lf[793]);}
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);
+t34=C_eqp(((C_word*)t0)[4],lf[600]);
+t35=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9160,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
if(C_truep(t34)){
t36=t35;
-f_9003(t36,t34);}
+f_9160(t36,t34);}
else{
-t36=(C_word)C_eqp(((C_word*)t0)[4],lf[612]);
+t36=C_eqp(((C_word*)t0)[4],lf[623]);
if(C_truep(t36)){
t37=t35;
-f_9003(t37,t36);}
+f_9160(t37,t36);}
else{
-t37=(C_word)C_eqp(((C_word*)t0)[4],lf[613]);
+t37=C_eqp(((C_word*)t0)[4],lf[624]);
t38=t35;
-f_9003(t38,(C_truep(t37)?t37:(C_word)C_eqp(((C_word*)t0)[4],lf[614])));}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+f_9160(t38,(C_truep(t37)?t37:C_eqp(((C_word*)t0)[4],lf[625])));}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
-/* 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){
+/* k9158 in k8963 in k8936 in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
+static void C_fcall f_9160(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5545,59 +5583,59 @@ 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);}
+C_save_and_reclaim((void*)trf_9160,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[783]);}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[794]);}
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);
+t2=C_eqp(((C_word*)t0)[4],lf[604]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9169,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
if(C_truep(t2)){
t4=t3;
-f_9012(t4,t2);}
+f_9169(t4,t2);}
else{
-t4=(C_word)C_eqp(((C_word*)t0)[4],lf[608]);
+t4=C_eqp(((C_word*)t0)[4],lf[619]);
if(C_truep(t4)){
t5=t3;
-f_9012(t5,t4);}
+f_9169(t5,t4);}
else{
-t5=(C_word)C_eqp(((C_word*)t0)[4],lf[609]);
+t5=C_eqp(((C_word*)t0)[4],lf[620]);
if(C_truep(t5)){
t6=t3;
-f_9012(t6,t5);}
+f_9169(t6,t5);}
else{
-t6=(C_word)C_eqp(((C_word*)t0)[4],lf[610]);
+t6=C_eqp(((C_word*)t0)[4],lf[621]);
t7=t3;
-f_9012(t7,(C_truep(t6)?t6:(C_word)C_eqp(((C_word*)t0)[4],lf[611])));}}}}}
+f_9169(t7,(C_truep(t6)?t6:C_eqp(((C_word*)t0)[4],lf[622])));}}}}}
-/* 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){
+/* k9167 in k9158 in k8963 in k8936 in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
+static void C_fcall f_9169(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9012,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_9169,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[784]);}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[795]);}
else{
-t2=(C_word)C_eqp(((C_word*)t0)[4],lf[13]);
+t2=C_eqp(((C_word*)t0)[4],lf[13]);
if(C_truep(t2)){
t3=((C_word*)t0)[5];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[785]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[796]);}
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]);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9178,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_i_symbolp(((C_word*)t0)[3]))){
+C_trace("c-backend.scm: 1296 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[617]))(4,*((C_word*)lf[617]+1),t3,C_retrieve(lf[618]),((C_word*)t0)[3]);}
else{
t4=t3;
-f_9021(2,t4,C_SCHEME_FALSE);}}}}
+f_9178(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){
+/* k9176 in k9167 in k9158 in k8963 in k8936 in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9178(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5607,29 +5645,29 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9178,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[4];
t3=t1;
-if(C_truep((C_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");
+if(C_truep(C_i_vectorp(t3))){
+t4=C_i_vector_ref(t3,C_fix(0));
+C_trace("c-backend.scm: 1298 foreign-argument-conversion");
((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t2,t4);}
else{
-C_trace("c-backend.scm: 1266 foreign-argument-conversion");
+C_trace("c-backend.scm: 1298 foreign-argument-conversion");
((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t2,t3);}}
else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9205,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_i_listp(((C_word*)t0)[3]))){
+t3=C_i_length(((C_word*)t0)[3]);
t4=t2;
-f_9048(t4,(C_word)C_fixnum_greater_or_equal_p(t3,C_fix(2)));}
+f_9205(t4,C_fixnum_greater_or_equal_p(t3,C_fix(2)));}
else{
t3=t2;
-f_9048(t3,C_SCHEME_FALSE);}}}
+f_9205(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){
+/* k9203 in k9176 in k9167 in k9158 in k8963 in k8936 in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
+static void C_fcall f_9205(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5650,96 +5688,96 @@ 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);}
+C_save_and_reclaim((void*)trf_9205,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]);
+t2=C_i_car(((C_word*)t0)[4]);
+t3=C_eqp(t2,lf[480]);
if(C_truep(t3)){
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[786]);}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[797]);}
else{
-t4=(C_word)C_eqp(t2,lf[600]);
+t4=C_eqp(t2,lf[611]);
if(C_truep(t4)){
t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[787]);}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[798]);}
else{
-t5=(C_word)C_eqp(t2,lf[599]);
+t5=C_eqp(t2,lf[610]);
if(C_truep(t5)){
t6=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[788]);}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[799]);}
else{
-t6=(C_word)C_eqp(t2,lf[601]);
+t6=C_eqp(t2,lf[612]);
if(C_truep(t6)){
t7=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,lf[789]);}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,lf[800]);}
else{
-t7=(C_word)C_eqp(t2,lf[603]);
+t7=C_eqp(t2,lf[614]);
if(C_truep(t7)){
t8=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[790]);}
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[801]);}
else{
-t8=(C_word)C_eqp(t2,lf[604]);
+t8=C_eqp(t2,lf[615]);
if(C_truep(t8)){
t9=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,lf[791]);}
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,lf[802]);}
else{
-t9=(C_word)C_eqp(t2,lf[602]);
+t9=C_eqp(t2,lf[613]);
if(C_truep(t9)){
t10=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,lf[792]);}
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,lf[803]);}
else{
-t10=(C_word)C_eqp(t2,lf[597]);
+t10=C_eqp(t2,lf[609]);
if(C_truep(t10)){
-t11=(C_word)C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 1277 foreign-argument-conversion");
+t11=C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1309 foreign-argument-conversion");
((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),((C_word*)t0)[3],t11);}
else{
-t11=(C_word)C_eqp(t2,lf[735]);
+t11=C_eqp(t2,lf[746]);
if(C_truep(t11)){
t12=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[793]);}
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[804]);}
else{
-t12=(C_word)C_eqp(t2,lf[595]);
+t12=C_eqp(t2,lf[607]);
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]);}
+t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9282,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t14=C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1312 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t13,t14,lf[807]);}
else{
-t13=(C_word)C_eqp(t2,lf[605]);
+t13=C_eqp(t2,lf[616]);
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]);}
+t14=C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1315 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[808],t14,lf[809]);}
else{
-C_trace("c-backend.scm: 1284 err");
+C_trace("c-backend.scm: 1316 err");
t14=((C_word*)t0)[2];
-f_8753(t14,((C_word*)t0)[3]);}}}}}}}}}}}}
+f_8910(t14,((C_word*)t0)[3]);}}}}}}}}}}}}
else{
-C_trace("c-backend.scm: 1285 err");
+C_trace("c-backend.scm: 1317 err");
t2=((C_word*)t0)[2];
-f_8753(t2,((C_word*)t0)[3]);}}
+f_8910(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){
+/* k9280 in k9203 in k9176 in k9167 in k9158 in k8963 in k8936 in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
+static void C_ccall f_9282(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1312 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[805],t1,lf[806]);}
-/* err in ##compiler#foreign-argument-conversion in k2573 in k2487 in k2484 */
-static void C_fcall f_8753(C_word t0,C_word t1){
+/* err in ##compiler#foreign-argument-conversion in k2595 in k2509 in k2506 */
+static void C_fcall f_8910(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_8910,NULL,2,t0,t1);}
+C_trace("c-backend.scm: 1250 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[669]))(4,*((C_word*)lf[669]+1),t1,lf[756],((C_word*)t0)[2]);}
-/* ##compiler#foreign-type-declaration in 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){
+/* ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8024(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5760,56 +5798,56 @@ 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);
+C_save_and_reclaim((void*)tr4,(void*)f_8024,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8026,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8031,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
t6=t2;
-t7=(C_word)C_eqp(t6,lf[630]);
+t7=C_eqp(t6,lf[641]);
if(C_truep(t7)){
-C_trace("c-backend.scm: 1125 str");
+C_trace("c-backend.scm: 1157 str");
t8=t5;
-f_7874(t8,t1,lf[661]);}
+f_8031(t8,t1,lf[672]);}
else{
-t8=(C_word)C_eqp(t6,lf[16]);
-t9=(C_truep(t8)?t8:(C_word)C_eqp(t6,lf[634]));
+t8=C_eqp(t6,lf[16]);
+t9=(C_truep(t8)?t8:C_eqp(t6,lf[645]));
if(C_truep(t9)){
-C_trace("c-backend.scm: 1126 str");
+C_trace("c-backend.scm: 1158 str");
t10=t5;
-f_7874(t10,t1,lf[662]);}
+f_8031(t10,t1,lf[673]);}
else{
-t10=(C_word)C_eqp(t6,lf[631]);
-t11=(C_truep(t10)?t10:(C_word)C_eqp(t6,lf[635]));
+t10=C_eqp(t6,lf[642]);
+t11=(C_truep(t10)?t10:C_eqp(t6,lf[646]));
if(C_truep(t11)){
-C_trace("c-backend.scm: 1127 str");
+C_trace("c-backend.scm: 1159 str");
t12=t5;
-f_7874(t12,t1,lf[663]);}
+f_8031(t12,t1,lf[674]);}
else{
-t12=(C_word)C_eqp(t6,lf[632]);
-t13=(C_truep(t12)?t12:(C_word)C_eqp(t6,lf[616]));
+t12=C_eqp(t6,lf[643]);
+t13=(C_truep(t12)?t12:C_eqp(t6,lf[627]));
if(C_truep(t13)){
-C_trace("c-backend.scm: 1128 str");
+C_trace("c-backend.scm: 1160 str");
t14=t5;
-f_7874(t14,t1,lf[664]);}
+f_8031(t14,t1,lf[675]);}
else{
-t14=(C_word)C_eqp(t6,lf[633]);
-t15=(C_truep(t14)?t14:(C_word)C_eqp(t6,lf[617]));
+t14=C_eqp(t6,lf[644]);
+t15=(C_truep(t14)?t14:C_eqp(t6,lf[628]));
if(C_truep(t15)){
-C_trace("c-backend.scm: 1129 str");
+C_trace("c-backend.scm: 1161 str");
t16=t5;
-f_7874(t16,t1,lf[665]);}
+f_8031(t16,t1,lf[676]);}
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);
+t16=C_eqp(t6,lf[637]);
+t17=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8101,a[2]=t4,a[3]=t2,a[4]=t3,a[5]=t6,a[6]=t1,a[7]=t5,tmp=(C_word)a,a+=8,tmp);
if(C_truep(t16)){
t18=t17;
-f_7944(t18,t16);}
+f_8101(t18,t16);}
else{
-t18=(C_word)C_eqp(t6,lf[619]);
+t18=C_eqp(t6,lf[630]);
t19=t17;
-f_7944(t19,(C_truep(t18)?t18:(C_word)C_eqp(t6,lf[13])));}}}}}}}
+f_8101(t19,(C_truep(t18)?t18: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){
+/* k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8101(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5830,86 +5868,86 @@ 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);}
+C_save_and_reclaim((void*)trf_8101,NULL,2,t0,t1);}
if(C_truep(t1)){
-C_trace("c-backend.scm: 1130 str");
+C_trace("c-backend.scm: 1162 str");
t2=((C_word*)t0)[7];
-f_7874(t2,((C_word*)t0)[6],lf[666]);}
+f_8031(t2,((C_word*)t0)[6],lf[677]);}
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]));
+t2=C_eqp(((C_word*)t0)[5],lf[638]);
+t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[5],lf[631]));
if(C_truep(t3)){
-C_trace("c-backend.scm: 1131 str");
+C_trace("c-backend.scm: 1163 str");
t4=((C_word*)t0)[7];
-f_7874(t4,((C_word*)t0)[6],lf[667]);}
+f_8031(t4,((C_word*)t0)[6],lf[678]);}
else{
-t4=(C_word)C_eqp(((C_word*)t0)[5],lf[623]);
+t4=C_eqp(((C_word*)t0)[5],lf[634]);
if(C_truep(t4)){
-C_trace("c-backend.scm: 1132 str");
+C_trace("c-backend.scm: 1164 str");
t5=((C_word*)t0)[7];
-f_7874(t5,((C_word*)t0)[6],lf[668]);}
+f_8031(t5,((C_word*)t0)[6],lf[679]);}
else{
-t5=(C_word)C_eqp(((C_word*)t0)[5],lf[628]);
+t5=C_eqp(((C_word*)t0)[5],lf[639]);
if(C_truep(t5)){
-C_trace("c-backend.scm: 1133 str");
+C_trace("c-backend.scm: 1165 str");
t6=((C_word*)t0)[7];
-f_7874(t6,((C_word*)t0)[6],lf[669]);}
+f_8031(t6,((C_word*)t0)[6],lf[680]);}
else{
-t6=(C_word)C_eqp(((C_word*)t0)[5],lf[618]);
+t6=C_eqp(((C_word*)t0)[5],lf[629]);
if(C_truep(t6)){
-C_trace("c-backend.scm: 1134 str");
+C_trace("c-backend.scm: 1166 str");
t7=((C_word*)t0)[7];
-f_7874(t7,((C_word*)t0)[6],lf[670]);}
+f_8031(t7,((C_word*)t0)[6],lf[681]);}
else{
-t7=(C_word)C_eqp(((C_word*)t0)[5],lf[629]);
+t7=C_eqp(((C_word*)t0)[5],lf[640]);
if(C_truep(t7)){
-C_trace("c-backend.scm: 1135 str");
+C_trace("c-backend.scm: 1167 str");
t8=((C_word*)t0)[7];
-f_7874(t8,((C_word*)t0)[6],lf[671]);}
+f_8031(t8,((C_word*)t0)[6],lf[682]);}
else{
-t8=(C_word)C_eqp(((C_word*)t0)[5],lf[621]);
+t8=C_eqp(((C_word*)t0)[5],lf[632]);
if(C_truep(t8)){
-C_trace("c-backend.scm: 1136 str");
+C_trace("c-backend.scm: 1168 str");
t9=((C_word*)t0)[7];
-f_7874(t9,((C_word*)t0)[6],lf[672]);}
+f_8031(t9,((C_word*)t0)[6],lf[683]);}
else{
-t9=(C_word)C_eqp(((C_word*)t0)[5],lf[586]);
+t9=C_eqp(((C_word*)t0)[5],lf[598]);
if(C_truep(t9)){
-C_trace("c-backend.scm: 1137 str");
+C_trace("c-backend.scm: 1169 str");
t10=((C_word*)t0)[7];
-f_7874(t10,((C_word*)t0)[6],lf[673]);}
+f_8031(t10,((C_word*)t0)[6],lf[684]);}
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]));
+t10=C_eqp(((C_word*)t0)[5],lf[626]);
+t11=(C_truep(t10)?t10:C_eqp(((C_word*)t0)[5],lf[633]));
if(C_truep(t11)){
-C_trace("c-backend.scm: 1138 str");
+C_trace("c-backend.scm: 1170 str");
t12=((C_word*)t0)[7];
-f_7874(t12,((C_word*)t0)[6],lf[674]);}
+f_8031(t12,((C_word*)t0)[6],lf[685]);}
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]));
+t12=C_eqp(((C_word*)t0)[5],lf[480]);
+t13=(C_truep(t12)?t12:C_eqp(((C_word*)t0)[5],lf[611]));
if(C_truep(t13)){
-C_trace("c-backend.scm: 1140 str");
+C_trace("c-backend.scm: 1172 str");
t14=((C_word*)t0)[7];
-f_7874(t14,((C_word*)t0)[6],lf[675]);}
+f_8031(t14,((C_word*)t0)[6],lf[686]);}
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);
+t14=C_eqp(((C_word*)t0)[5],lf[610]);
+t15=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8203,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(t14)){
t16=t15;
-f_8046(t16,t14);}
+f_8203(t16,t14);}
else{
-t16=(C_word)C_eqp(((C_word*)t0)[5],lf[601]);
+t16=C_eqp(((C_word*)t0)[5],lf[612]);
if(C_truep(t16)){
t17=t15;
-f_8046(t17,t16);}
+f_8203(t17,t16);}
else{
-t17=(C_word)C_eqp(((C_word*)t0)[5],lf[743]);
+t17=C_eqp(((C_word*)t0)[5],lf[754]);
t18=t15;
-f_8046(t18,(C_truep(t17)?t17:(C_word)C_eqp(((C_word*)t0)[5],lf[744])));}}}}}}}}}}}}}
+f_8203(t18,(C_truep(t17)?t17:C_eqp(((C_word*)t0)[5],lf[755])));}}}}}}}}}}}}}
-/* 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){
+/* k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8203(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5922,42 +5960,42 @@ 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);}
+C_save_and_reclaim((void*)trf_8203,NULL,2,t0,t1);}
if(C_truep(t1)){
-C_trace("c-backend.scm: 1141 str");
+C_trace("c-backend.scm: 1173 str");
t2=((C_word*)t0)[7];
-f_7874(t2,((C_word*)t0)[6],lf[676]);}
+f_8031(t2,((C_word*)t0)[6],lf[687]);}
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]));
+t2=C_eqp(((C_word*)t0)[5],lf[635]);
+t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[5],lf[636]));
if(C_truep(t3)){
t4=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[677]);}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[688]);}
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]));
+t4=C_eqp(((C_word*)t0)[5],lf[689]);
+t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[5],lf[690]));
if(C_truep(t5)){
-C_trace("c-backend.scm: 1144 str");
+C_trace("c-backend.scm: 1176 str");
t6=((C_word*)t0)[7];
-f_7874(t6,((C_word*)t0)[6],lf[680]);}
+f_8031(t6,((C_word*)t0)[6],lf[691]);}
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);
+t6=C_eqp(((C_word*)t0)[5],lf[692]);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8236,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(t6)){
t8=t7;
-f_8079(t8,t6);}
+f_8236(t8,t6);}
else{
-t8=(C_word)C_eqp(((C_word*)t0)[5],lf[740]);
+t8=C_eqp(((C_word*)t0)[5],lf[751]);
if(C_truep(t8)){
t9=t7;
-f_8079(t9,t8);}
+f_8236(t9,t8);}
else{
-t9=(C_word)C_eqp(((C_word*)t0)[5],lf[741]);
+t9=C_eqp(((C_word*)t0)[5],lf[752]);
t10=t7;
-f_8079(t10,(C_truep(t9)?t9:(C_word)C_eqp(((C_word*)t0)[5],lf[742])));}}}}}}
+f_8236(t10,(C_truep(t9)?t9:C_eqp(((C_word*)t0)[5],lf[753])));}}}}}}
-/* 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){
+/* k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8236(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5981,83 +6019,83 @@ 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);}
+C_save_and_reclaim((void*)trf_8236,NULL,2,t0,t1);}
if(C_truep(t1)){
-C_trace("c-backend.scm: 1145 str");
+C_trace("c-backend.scm: 1177 str");
t2=((C_word*)t0)[7];
-f_7874(t2,((C_word*)t0)[6],lf[682]);}
+f_8031(t2,((C_word*)t0)[6],lf[693]);}
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]));
+t2=C_eqp(((C_word*)t0)[5],lf[694]);
+t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[5],lf[695]));
if(C_truep(t3)){
-C_trace("c-backend.scm: 1146 str");
+C_trace("c-backend.scm: 1178 str");
t4=((C_word*)t0)[7];
-f_7874(t4,((C_word*)t0)[6],lf[685]);}
+f_8031(t4,((C_word*)t0)[6],lf[696]);}
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]));
+t4=C_eqp(((C_word*)t0)[5],lf[697]);
+t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[5],lf[698]));
if(C_truep(t5)){
-C_trace("c-backend.scm: 1147 str");
+C_trace("c-backend.scm: 1179 str");
t6=((C_word*)t0)[7];
-f_7874(t6,((C_word*)t0)[6],lf[688]);}
+f_8031(t6,((C_word*)t0)[6],lf[699]);}
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]));
+t6=C_eqp(((C_word*)t0)[5],lf[700]);
+t7=(C_truep(t6)?t6:C_eqp(((C_word*)t0)[5],lf[701]));
if(C_truep(t7)){
-C_trace("c-backend.scm: 1148 str");
+C_trace("c-backend.scm: 1180 str");
t8=((C_word*)t0)[7];
-f_7874(t8,((C_word*)t0)[6],lf[691]);}
+f_8031(t8,((C_word*)t0)[6],lf[702]);}
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]));
+t8=C_eqp(((C_word*)t0)[5],lf[703]);
+t9=(C_truep(t8)?t8:C_eqp(((C_word*)t0)[5],lf[704]));
if(C_truep(t9)){
-C_trace("c-backend.scm: 1149 str");
+C_trace("c-backend.scm: 1181 str");
t10=((C_word*)t0)[7];
-f_7874(t10,((C_word*)t0)[6],lf[694]);}
+f_8031(t10,((C_word*)t0)[6],lf[705]);}
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]));
+t10=C_eqp(((C_word*)t0)[5],lf[706]);
+t11=(C_truep(t10)?t10:C_eqp(((C_word*)t0)[5],lf[707]));
if(C_truep(t11)){
-C_trace("c-backend.scm: 1150 str");
+C_trace("c-backend.scm: 1182 str");
t12=((C_word*)t0)[7];
-f_7874(t12,((C_word*)t0)[6],lf[697]);}
+f_8031(t12,((C_word*)t0)[6],lf[708]);}
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]));
+t12=C_eqp(((C_word*)t0)[5],lf[709]);
+t13=(C_truep(t12)?t12:C_eqp(((C_word*)t0)[5],lf[710]));
if(C_truep(t13)){
-C_trace("c-backend.scm: 1151 str");
+C_trace("c-backend.scm: 1183 str");
t14=((C_word*)t0)[7];
-f_7874(t14,((C_word*)t0)[6],lf[700]);}
+f_8031(t14,((C_word*)t0)[6],lf[711]);}
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]));
+t14=C_eqp(((C_word*)t0)[5],lf[712]);
+t15=(C_truep(t14)?t14:C_eqp(((C_word*)t0)[5],lf[713]));
if(C_truep(t15)){
-C_trace("c-backend.scm: 1152 str");
+C_trace("c-backend.scm: 1184 str");
t16=((C_word*)t0)[7];
-f_7874(t16,((C_word*)t0)[6],lf[703]);}
+f_8031(t16,((C_word*)t0)[6],lf[714]);}
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);
+t16=C_eqp(((C_word*)t0)[5],lf[604]);
+t17=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8332,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(t16)){
t18=t17;
-f_8175(t18,t16);}
+f_8332(t18,t16);}
else{
-t18=(C_word)C_eqp(((C_word*)t0)[5],lf[588]);
+t18=C_eqp(((C_word*)t0)[5],lf[600]);
if(C_truep(t18)){
t19=t17;
-f_8175(t19,t18);}
+f_8332(t19,t18);}
else{
-t19=(C_word)C_eqp(((C_word*)t0)[5],lf[608]);
+t19=C_eqp(((C_word*)t0)[5],lf[619]);
if(C_truep(t19)){
t20=t17;
-f_8175(t20,t19);}
+f_8332(t20,t19);}
else{
-t20=(C_word)C_eqp(((C_word*)t0)[5],lf[612]);
+t20=C_eqp(((C_word*)t0)[5],lf[623]);
t21=t17;
-f_8175(t21,(C_truep(t20)?t20:(C_word)C_eqp(((C_word*)t0)[5],lf[611])));}}}}}}}}}}}}
+f_8332(t21,(C_truep(t20)?t20:C_eqp(((C_word*)t0)[5],lf[622])));}}}}}}}}}}}}
-/* 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){
+/* k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8332(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6066,57 +6104,57 @@ 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);}
+C_save_and_reclaim((void*)trf_8332,NULL,2,t0,t1);}
if(C_truep(t1)){
-C_trace("c-backend.scm: 1154 str");
+C_trace("c-backend.scm: 1186 str");
t2=((C_word*)t0)[7];
-f_7874(t2,((C_word*)t0)[6],lf[704]);}
+f_8031(t2,((C_word*)t0)[6],lf[715]);}
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);
+t2=C_eqp(((C_word*)t0)[5],lf[620]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8344,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(t2)){
t4=t3;
-f_8187(t4,t2);}
+f_8344(t4,t2);}
else{
-t4=(C_word)C_eqp(((C_word*)t0)[5],lf[610]);
+t4=C_eqp(((C_word*)t0)[5],lf[621]);
if(C_truep(t4)){
t5=t3;
-f_8187(t5,t4);}
+f_8344(t5,t4);}
else{
-t5=(C_word)C_eqp(((C_word*)t0)[5],lf[613]);
+t5=C_eqp(((C_word*)t0)[5],lf[624]);
t6=t3;
-f_8187(t6,(C_truep(t5)?t5:(C_word)C_eqp(((C_word*)t0)[5],lf[614])));}}}}
+f_8344(t6,(C_truep(t5)?t5:C_eqp(((C_word*)t0)[5],lf[625])));}}}}
-/* 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){
+/* k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8344(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8187,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_8344,NULL,2,t0,t1);}
if(C_truep(t1)){
-C_trace("c-backend.scm: 1156 str");
+C_trace("c-backend.scm: 1188 str");
t2=((C_word*)t0)[7];
-f_7874(t2,((C_word*)t0)[6],lf[705]);}
+f_8031(t2,((C_word*)t0)[6],lf[716]);}
else{
-t2=(C_word)C_eqp(((C_word*)t0)[5],lf[550]);
+t2=C_eqp(((C_word*)t0)[5],lf[562]);
if(C_truep(t2)){
-C_trace("c-backend.scm: 1157 str");
+C_trace("c-backend.scm: 1189 str");
t3=((C_word*)t0)[7];
-f_7874(t3,((C_word*)t0)[6],lf[706]);}
+f_8031(t3,((C_word*)t0)[6],lf[717]);}
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]);}
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8359,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+if(C_truep(C_i_symbolp(((C_word*)t0)[3]))){
+C_trace("c-backend.scm: 1191 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[617]))(4,*((C_word*)lf[617]+1),t3,C_retrieve(lf[618]),((C_word*)t0)[3]);}
else{
t4=t3;
-f_8202(2,t4,C_SCHEME_FALSE);}}}}
+f_8359(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){
+/* k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8359(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6126,36 +6164,36 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8359,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8206,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-C_trace("g19741975");
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8363,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+C_trace("g19961997");
t3=t2;
-f_8206(t3,((C_word*)t0)[5],t1);}
+f_8363(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");
+if(C_truep(C_i_stringp(((C_word*)t0)[4]))){
+C_trace("c-backend.scm: 1194 str");
t2=((C_word*)t0)[3];
-f_7874(t2,((C_word*)t0)[5],((C_word*)t0)[4]);}
+f_8031(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(C_i_listp(((C_word*)t0)[4]))){
+t2=C_i_length(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8404,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+t4=C_eqp(C_fix(2),t2);
if(C_truep(t4)){
-t5=(C_word)C_i_car(((C_word*)t0)[4]);
+t5=C_i_car(((C_word*)t0)[4]);
t6=t3;
-f_8247(t6,(C_word)C_i_memq(t5,lf[739]));}
+f_8404(t6,C_i_memq(t5,lf[750]));}
else{
t5=t3;
-f_8247(t5,C_SCHEME_FALSE);}}
+f_8404(t5,C_SCHEME_FALSE);}}
else{
-C_trace("c-backend.scm: 1212 err");
+C_trace("c-backend.scm: 1244 err");
t2=((C_word*)t0)[2];
-f_7869(t2,((C_word*)t0)[5]);}}}}
+f_8026(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){
+/* k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8404(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6165,25 +6203,25 @@ 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);}
+C_save_and_reclaim((void*)trf_8404,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]);}
+t2=C_i_cadr(((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8415,a[2]=t2,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 1201 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t3,lf[718],((C_word*)t0)[5]);}
else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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]);
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8421,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+t3=C_eqp(C_fix(2),((C_word*)t0)[2]);
if(C_truep(t3)){
-t4=(C_word)C_i_car(((C_word*)t0)[7]);
+t4=C_i_car(((C_word*)t0)[7]);
t5=t2;
-f_8264(t5,(C_word)C_eqp(lf[595],t4));}
+f_8421(t5,C_eqp(lf[607],t4));}
else{
t4=t2;
-f_8264(t4,C_SCHEME_FALSE);}}}
+f_8421(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){
+/* k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8421(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6192,24 +6230,24 @@ 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);}
+C_save_and_reclaim((void*)trf_8421,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]);
+t2=C_i_cadr(((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8432,a[2]=t2,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 1204 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t3,lf[719],((C_word*)t0)[5]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8438,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+if(C_truep(C_fixnum_greaterp(((C_word*)t0)[2],C_fix(2)))){
+t3=C_i_car(((C_word*)t0)[7]);
t4=t2;
-f_8281(t4,(C_word)C_eqp(lf[738],t3));}
+f_8438(t4,C_eqp(lf[749],t3));}
else{
t3=t2;
-f_8281(t3,C_SCHEME_FALSE);}}}
+f_8438(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){
+/* k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8438(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6220,26 +6258,26 @@ 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);}
+C_save_and_reclaim((void*)trf_8438,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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));
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8445,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8449,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=C_i_cadr(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 1209 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t3,t4,lf[724]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8477,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=C_eqp(((C_word*)t0)[2],C_fix(2));
if(C_truep(t3)){
-t4=(C_word)C_i_car(((C_word*)t0)[5]);
+t4=C_i_car(((C_word*)t0)[5]);
t5=t2;
-f_8320(t5,(C_word)C_eqp(lf[597],t4));}
+f_8477(t5,C_eqp(lf[609],t4));}
else{
t4=t2;
-f_8320(t4,C_SCHEME_FALSE);}}}
+f_8477(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){
+/* k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8477(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6249,25 +6287,25 @@ 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);}
+C_save_and_reclaim((void*)trf_8477,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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");
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8484,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_cadr(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 1216 foreign-type-declaration");
((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t2,t3,((C_word*)t0)[4]);}
else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8494,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=C_eqp(((C_word*)t0)[2],C_fix(2));
if(C_truep(t3)){
-t4=(C_word)C_i_car(((C_word*)t0)[5]);
+t4=C_i_car(((C_word*)t0)[5]);
t5=t2;
-f_8337(t5,(C_word)C_eqp(lf[737],t4));}
+f_8494(t5,C_eqp(lf[748],t4));}
else{
t4=t2;
-f_8337(t4,C_SCHEME_FALSE);}}}
+f_8494(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){
+/* k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8494(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6277,25 +6315,25 @@ 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);}
+C_save_and_reclaim((void*)trf_8494,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8501,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1218 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,t3);}
else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8511,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=C_eqp(((C_word*)t0)[2],C_fix(2));
if(C_truep(t3)){
-t4=(C_word)C_i_car(((C_word*)t0)[4]);
+t4=C_i_car(((C_word*)t0)[4]);
t5=t2;
-f_8354(t5,(C_word)C_eqp(lf[736],t4));}
+f_8511(t5,C_eqp(lf[747],t4));}
else{
t4=t2;
-f_8354(t4,C_SCHEME_FALSE);}}}
+f_8511(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){
+/* k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8511(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6305,25 +6343,25 @@ 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);}
+C_save_and_reclaim((void*)trf_8511,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8518,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1220 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,t3);}
else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8528,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=C_eqp(((C_word*)t0)[2],C_fix(2));
if(C_truep(t3)){
-t4=(C_word)C_i_car(((C_word*)t0)[4]);
+t4=C_i_car(((C_word*)t0)[4]);
t5=t2;
-f_8371(t5,(C_word)C_eqp(lf[735],t4));}
+f_8528(t5,C_eqp(lf[746],t4));}
else{
t4=t2;
-f_8371(t4,C_SCHEME_FALSE);}}}
+f_8528(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){
+/* k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8528(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6333,25 +6371,25 @@ 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);}
+C_save_and_reclaim((void*)trf_8528,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8535,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1222 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,t3);}
else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8545,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=C_eqp(((C_word*)t0)[2],C_fix(3));
if(C_truep(t3)){
-t4=(C_word)C_i_car(((C_word*)t0)[4]);
+t4=C_i_car(((C_word*)t0)[4]);
t5=t2;
-f_8388(t5,(C_word)C_i_memq(t4,lf[734]));}
+f_8545(t5,C_i_memq(t4,lf[745]));}
else{
t4=t2;
-f_8388(t4,C_SCHEME_FALSE);}}}
+f_8545(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){
+/* k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8545(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6361,25 +6399,25 @@ 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);}
+C_save_and_reclaim((void*)trf_8545,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8552,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1224 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,t3);}
else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8562,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=C_eqp(((C_word*)t0)[2],C_fix(3));
if(C_truep(t3)){
-t4=(C_word)C_i_car(((C_word*)t0)[4]);
+t4=C_i_car(((C_word*)t0)[4]);
t5=t2;
-f_8405(t5,(C_word)C_eqp(lf[605],t4));}
+f_8562(t5,C_eqp(lf[616],t4));}
else{
t4=t2;
-f_8405(t4,C_SCHEME_FALSE);}}}
+f_8562(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){
+/* k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8562(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6388,24 +6426,24 @@ 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);}
+C_save_and_reclaim((void*)trf_8562,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8569,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1226 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,t3);}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8579,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_fixnum_greater_or_equal_p(((C_word*)t0)[2],C_fix(3)))){
+t3=C_i_car(((C_word*)t0)[4]);
t4=t2;
-f_8422(t4,(C_word)C_eqp(lf[602],t3));}
+f_8579(t4,C_eqp(lf[613],t3));}
else{
t3=t2;
-f_8422(t3,C_SCHEME_FALSE);}}}
+f_8579(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){
+/* k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8579(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6415,43 +6453,43 @@ 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);}
+C_save_and_reclaim((void*)trf_8579,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))){
+t2=C_i_cadr(((C_word*)t0)[5]);
+t3=C_i_caddr(((C_word*)t0)[5]);
+t4=C_i_cdddr(((C_word*)t0)[5]);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8591,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_i_nullp(t4))){
t6=t5;
-f_8434(2,t6,lf[731]);}
+f_8591(2,t6,lf[742]);}
else{
-t6=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t6))){
+t6=C_i_cdr(t4);
+if(C_truep(C_i_nullp(t6))){
t7=t5;
-f_8434(2,t7,(C_word)C_i_car(t4));}
+f_8591(2,t7,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);}}}
+t7=*((C_word*)lf[743]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[744],t4);}}}
else{
-C_trace("c-backend.scm: 1211 err");
+C_trace("c-backend.scm: 1243 err");
t2=((C_word*)t0)[2];
-f_7869(t2,((C_word*)t0)[4]);}}
+f_8026(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){
+/* k8589 in k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8591(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_8591,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8598,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 1232 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t2,((C_word*)t0)[2],lf[741]);}
-/* 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){
+/* k8596 in k8589 in k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8598(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6465,21 +6503,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8598,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8602,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8449,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8606,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8451,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8608,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
t11=((C_word*)t9)[1];
-f_8451(t11,t7,((C_word*)t0)[2]);}
+f_8608(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){
+/* loop2057 in k8596 in k8589 in k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8608(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6489,35 +6527,35 @@ 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);
+C_save_and_reclaim((void*)trf_8608,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8618,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8648,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=C_slot(t2,C_fix(0));
+t6=C_eqp(lf[738],t5);
if(C_truep(t6)){
t7=t3;
-f_8461(t7,(C_word)C_a_i_cons(&a,2,lf[728],C_SCHEME_END_OF_LIST));}
+f_8618(t7,C_a_i_cons(&a,2,lf[739],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]);}}
+C_trace("c-backend.scm: 1239 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t4,t5,lf[740]);}}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k8646 in loop2057 in k8596 in k8589 in k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8648(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8491,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_8648,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));}
+f_8618(t2,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){
+/* k8616 in loop2057 in k8596 in k8589 in k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8618(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6528,86 +6566,86 @@ 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);
+t2=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t1);
t3=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
-t4=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop20352048");
+t4=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop20572070");
t5=((C_word*)((C_word*)t0)[4])[1];
-f_8451(t5,((C_word*)t0)[3],t4);}
+f_8608(t5,((C_word*)t0)[3],t4);}
else{
t2=C_mutate(((C_word *)((C_word*)t0)[2])+1,t1);
t3=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
-t4=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop20352048");
+t4=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop20572070");
t5=((C_word*)((C_word*)t0)[4])[1];
-f_8451(t5,((C_word*)t0)[3],t4);}}
+f_8608(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){
+/* k8604 in k8596 in k8589 in k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8606(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 1203 string-intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[217]))(4,*((C_word*)lf[217]+1),((C_word*)t0)[2],t1,lf[726]);}
+C_trace("c-backend.scm: 1235 string-intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[223]))(4,*((C_word*)lf[223]+1),((C_word*)t0)[2],t1,lf[737]);}
-/* 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){
+/* k8600 in k8596 in k8589 in k8577 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8602(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1231 string-append");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[115]+1)))(9,*((C_word*)lf[115]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[734],((C_word*)t0)[2],lf[735],t1,lf[736]);}
-/* 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){
+/* k8567 in k8560 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8569(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1226 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],t1,lf[733],((C_word*)t0)[2]);}
-/* 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){
+/* k8550 in k8543 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8552(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1224 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],t1,lf[732],((C_word*)t0)[2]);}
-/* 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){
+/* k8533 in k8526 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8535(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1222 string-append");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[115]+1)))(6,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[730],t1,lf[731],((C_word*)t0)[2]);}
-/* 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){
+/* k8516 in k8509 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8518(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1220 string-append");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[115]+1)))(6,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[728],t1,lf[729],((C_word*)t0)[2]);}
-/* 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){
+/* k8499 in k8492 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8501(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1218 string-append");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[115]+1)))(6,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[726],t1,lf[727],((C_word*)t0)[2]);}
-/* 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){
+/* k8482 in k8475 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8484(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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);}
+C_trace("c-backend.scm: 1216 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[725],t1);}
-/* 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){
+/* k8447 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8449(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6616,209 +6654,209 @@ 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_save_and_reclaim((void*)tr2,(void*)f_8449,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8453,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8457,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_8459,tmp=(C_word)a,a+=2,tmp);
+t5=C_i_cddr(((C_word*)t0)[2]);
C_trace("map");
-t6=*((C_word*)lf[221]+1);
+t6=*((C_word*)lf[227]+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){
+/* a8458 in k8447 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8459(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8302,3,t0,t1,t2);}
+C_save_and_reclaim((void*)tr3,(void*)f_8459,3,t0,t1,t2);}
t3=C_retrieve(lf[174]);
-C_trace("g20092010");
+C_trace("g20312032");
t4=t3;
-((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,lf[712]);}
+((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,lf[723]);}
-/* 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){
+/* k8455 in k8447 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8457(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 1179 string-intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[217]))(4,*((C_word*)lf[217]+1),((C_word*)t0)[2],t1,lf[711]);}
+C_trace("c-backend.scm: 1211 string-intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[223]))(4,*((C_word*)lf[223]+1),((C_word*)t0)[2],t1,lf[722]);}
-/* 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){
+/* k8451 in k8447 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8453(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1208 string-append");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[115]+1)))(6,*((C_word*)lf[115]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[720],t1,lf[721]);}
-/* 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){
+/* k8443 in k8436 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8445(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 1175 str");
+C_trace("c-backend.scm: 1207 str");
t2=((C_word*)t0)[3];
-f_7874(t2,((C_word*)t0)[2],t1);}
+f_8031(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){
+/* k8430 in k8419 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8432(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 1172 foreign-type-declaration");
+C_trace("c-backend.scm: 1204 foreign-type-declaration");
((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k8413 in k8402 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_ccall f_8415(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 1169 foreign-type-declaration");
+C_trace("c-backend.scm: 1201 foreign-type-declaration");
((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* g1996 in k8357 in k8342 in k8330 in k8234 in k8201 in k8099 in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8363(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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_save_and_reclaim((void*)trf_8363,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_vectorp(t2))){
+t3=C_i_vector_ref(t2,C_fix(0));
+C_trace("c-backend.scm: 1193 foreign-type-declaration");
((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t1,t3,((C_word*)t0)[2]);}
else{
t3=t2;
-C_trace("c-backend.scm: 1161 foreign-type-declaration");
+C_trace("c-backend.scm: 1193 foreign-type-declaration");
((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t1,t3,((C_word*)t0)[2]);}}
-/* str in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
-static void C_fcall f_7874(C_word t0,C_word t1,C_word t2){
+/* str in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8031(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_8031,NULL,3,t0,t1,t2);}
+C_trace("c-backend.scm: 1155 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),t1,t2,lf[671],((C_word*)t0)[2]);}
-/* err in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
-static void C_fcall f_7869(C_word t0,C_word t1){
+/* err in ##compiler#foreign-type-declaration in k2595 in k2509 in k2506 */
+static void C_fcall f_8026(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_8026,NULL,2,t0,t1);}
+C_trace("c-backend.scm: 1154 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[669]))(4,*((C_word*)lf[669]+1),t1,lf[670],((C_word*)t0)[2]);}
-/* ##compiler#generate-foreign-callback-header in 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){
+/* ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
+static void C_ccall f_7959(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[5],*a=ab;
if(c!=4) C_bad_argc_2(c,4,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_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);}
+C_save_and_reclaim((void*)tr4,(void*)f_7959,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7963,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 1136 foreign-callback-stub-name");
+((C_proc3)C_retrieve_symbol_proc(lf[668]))(3,*((C_word*)lf[668]+1),t4,t3);}
-/* 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){
+/* k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
+static void C_ccall f_7963(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7963,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7966,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 1137 foreign-callback-stub-qualifiers");
+((C_proc3)C_retrieve_symbol_proc(lf[667]))(3,*((C_word*)lf[667]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
+static void C_ccall f_7966(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7966,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7969,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 1138 foreign-callback-stub-return-type");
+((C_proc3)C_retrieve_symbol_proc(lf[663]))(3,*((C_word*)lf[663]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
+static void C_ccall f_7969(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7969,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7972,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 1139 foreign-callback-stub-argument-types");
+((C_proc3)C_retrieve_symbol_proc(lf[662]))(3,*((C_word*)lf[662]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
+static void C_ccall f_7972(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7972,2,t0,t1);}
+t2=C_i_length(t1);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7978,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+C_trace("c-backend.scm: 1141 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t3,t2,lf[666]);}
-/* 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){
+/* k7976 in k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
+static void C_ccall f_7978(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7978,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7981,a[2]=((C_word*)t0)[6],a[3]=t1,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8022,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 1142 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t3,((C_word*)t0)[2],lf[665]);}
-/* 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){
+/* k8020 in k7976 in k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
+static void C_ccall f_8022(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 1110 gen");
+C_trace("c-backend.scm: 1142 gen");
((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[4],C_make_character(32),t1,((C_word*)t0)[3],C_make_character(32),((C_word*)t0)[2],C_make_character(40));}
-/* 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){
+/* k7979 in k7976 in k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
+static void C_ccall f_7981(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7981,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7984,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7989,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-backend.scm: 1143 pair-for-each");
+((C_proc5)C_retrieve_symbol_proc(lf[203]))(5,*((C_word*)lf[203]+1),t2,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* a7988 in k7979 in k7976 in k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
+static void C_ccall f_7989(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -6828,48 +6866,48 @@ 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_save_and_reclaim((void*)tr4,(void*)f_7989,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7993,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8010,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=C_i_car(t3);
+t7=C_i_car(t2);
+C_trace("c-backend.scm: 1145 foreign-type-declaration");
((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t5,t6,t7);}
-/* 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){
+/* k8008 in a7988 in k7979 in k7976 in k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
+static void C_ccall f_8010(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 1113 gen");
+C_trace("c-backend.scm: 1145 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k7991 in a7988 in k7979 in k7976 in k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
+static void C_ccall f_7993(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[3]);
-if(C_truep((C_word)C_i_pairp(t2))){
-C_trace("c-backend.scm: 1114 gen");
+t2=C_i_cdr(((C_word*)t0)[3]);
+if(C_truep(C_i_pairp(t2))){
+C_trace("c-backend.scm: 1146 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(44));}
else{
t3=C_SCHEME_UNDEFINED;
t4=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k7982 in k7979 in k7976 in k7970 in k7967 in k7964 in k7961 in ##compiler#generate-foreign-callback-header in k2595 in k2509 in k2506 */
+static void C_ccall f_7984(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 1116 gen");
+C_trace("c-backend.scm: 1148 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-/* generate-foreign-callback-stubs in 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){
+/* generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7465(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -6878,15 +6916,15 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_7465,4,t0,t1,t2,t3);}
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7314,a[2]=t5,a[3]=t3,tmp=(C_word)a,a+=4,tmp));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7471,a[2]=t5,a[3]=t3,tmp=(C_word)a,a+=4,tmp));
t7=((C_word*)t5)[1];
-f_7314(t7,t1,t2);}
+f_7471(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){
+/* loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_fcall f_7471(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6895,93 +6933,93 @@ 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");
+C_save_and_reclaim((void*)trf_7471,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7479,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7946,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g15231524");
t6=t3;
-f_7322(t6,t4,t5);}
+f_7479(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){
+/* k7944 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7946(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_7471(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){
+/* g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_fcall f_7479(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_7479,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7483,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 1083 foreign-callback-stub-id");
+((C_proc3)C_retrieve_symbol_proc(lf[664]))(3,*((C_word*)lf[664]+1),t3,t2);}
-/* 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){
+/* k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7483(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7483,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7486,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 1084 real-name2");
+((C_proc4)C_retrieve_symbol_proc(lf[596]))(4,*((C_word*)lf[596]+1),t2,t1,((C_word*)t0)[2]);}
-/* 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){
+/* k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7486(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7486,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7489,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 1085 foreign-callback-stub-return-type");
+((C_proc3)C_retrieve_symbol_proc(lf[663]))(3,*((C_word*)lf[663]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7489(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7489,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7492,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 1086 foreign-callback-stub-argument-types");
+((C_proc3)C_retrieve_symbol_proc(lf[662]))(3,*((C_word*)lf[662]+1),t2,((C_word*)t0)[3]);}
-/* 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){
+/* k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7492(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7492,2,t0,t1);}
+t2=C_i_length(t1);
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7498,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=t2,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
+C_trace("c-backend.scm: 1088 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t3,t2,lf[661]);}
-/* 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){
+/* k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7498(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6990,90 +7028,90 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7498,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);}
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7500,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7844,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+C_trace("c-backend.scm: 1115 fold");
+((C_proc6)C_retrieve_symbol_proc(lf[441]))(6,*((C_word*)lf[441]+1),t5,((C_word*)t3)[1],lf[660],((C_word*)t0)[4],t1);}
-/* 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){
+/* k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7844(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_7844,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7847,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+C_trace("c-backend.scm: 1116 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE);}
-/* 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){
+/* k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7847(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[13],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_7847,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7850,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7943,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 1118 cleanup");
+((C_proc3)C_retrieve_symbol_proc(lf[505]))(3,*((C_word*)lf[505]+1),t3,((C_word*)t0)[2]);}
else{
t3=t2;
-f_7693(2,t3,C_SCHEME_UNDEFINED);}}
+f_7850(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){
+/* k7941 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7943(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1118 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[658],t1,lf[659]);}
-/* 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){
+/* k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7850(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7850,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7853,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
+C_trace("c-backend.scm: 1119 generate-foreign-callback-header");
+((C_proc4)C_retrieve_symbol_proc(lf[549]))(4,*((C_word*)lf[549]+1),t2,lf[657],((C_word*)t0)[2]);}
-/* 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){
+/* k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7853(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7853,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7856,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
+C_trace("c-backend.scm: 1120 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,C_make_character(123),C_SCHEME_TRUE,lf[655],((C_word*)t0)[2],lf[656]);}
-/* 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){
+/* k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7856(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7856,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7859,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+C_trace("c-backend.scm: 1121 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[654]);}
-/* 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){
+/* k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7859(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7082,16 +7120,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7859,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7862,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7735,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7892,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
t6=((C_word*)t4)[1];
-f_7735(t6,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_7892(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){
+/* loop1770 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_fcall f_7892(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -7103,43 +7141,43 @@ 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);
+C_save_and_reclaim((void*)trf_7892,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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]);}
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7911,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t7=C_slot(t2,C_fix(0));
+t8=C_slot(t3,C_fix(0));
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7908,a[2]=t7,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 1124 foreign-result-conversion");
+((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t9,t8,lf[653]);}
else{
t6=C_SCHEME_UNDEFINED;
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-/* 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){
+/* k7906 in loop1770 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7908(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1124 gen");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[1]+1)))(9,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[650],t1,((C_word*)t0)[2],lf[651],C_SCHEME_TRUE,lf[652]);}
-/* 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){
+/* k7909 in loop1770 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7911(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=C_slot(((C_word*)t0)[5],C_fix(1));
+t3=C_slot(((C_word*)t0)[4],C_fix(1));
t4=((C_word*)((C_word*)t0)[3])[1];
-f_7735(t4,((C_word*)t0)[2],t2,t3);}
+f_7892(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){
+/* k7860 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7862(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7147,65 +7185,65 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_7862,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7865,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=C_eqp(lf[562],((C_word*)t0)[4]);
if(C_truep(t3)){
t4=t2;
-f_7708(2,t4,C_SCHEME_UNDEFINED);}
+f_7865(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");
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7890,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 1129 foreign-argument-conversion");
((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t4,((C_word*)t0)[4]);}}
-/* 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){
+/* k7888 in k7860 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7890(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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);}
+C_trace("c-backend.scm: 1129 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[649],t1);}
-/* 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){
+/* k7863 in k7860 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7865(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_7865,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7868,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 1130 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,lf[648],((C_word*)t0)[3],C_make_character(44),((C_word*)t0)[2],C_make_character(41));}
-/* 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){
+/* k7866 in k7863 in k7860 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7868(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);
+C_save_and_reclaim((void*)tr2,(void*)f_7868,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7871,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=C_eqp(lf[562],((C_word*)t0)[2]);
if(C_truep(t3)){
-C_trace("c-backend.scm: 1100 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[636]);}
+C_trace("c-backend.scm: 1132 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[647]);}
else{
-C_trace("c-backend.scm: 1099 gen");
+C_trace("c-backend.scm: 1131 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(41));}}
-/* 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){
+/* k7869 in k7866 in k7863 in k7860 in k7857 in k7854 in k7851 in k7848 in k7845 in k7842 in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7871(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 1100 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[636]);}
+C_trace("c-backend.scm: 1132 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[647]);}
-/* compute-size in 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){
+/* compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7500(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -7225,70 +7263,70 @@ 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);}
+C_save_and_reclaim((void*)tr5,(void*)f_7500,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);
+t6=C_eqp(t5,lf[16]);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7510,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t5,a[6]=t1,a[7]=t4,tmp=(C_word)a,a+=8,tmp);
if(C_truep(t6)){
t8=t7;
-f_7353(t8,t6);}
+f_7510(t8,t6);}
else{
-t8=(C_word)C_eqp(t5,lf[626]);
+t8=C_eqp(t5,lf[637]);
if(C_truep(t8)){
t9=t7;
-f_7353(t9,t8);}
+f_7510(t9,t8);}
else{
-t9=(C_word)C_eqp(t5,lf[627]);
+t9=C_eqp(t5,lf[638]);
if(C_truep(t9)){
t10=t7;
-f_7353(t10,t9);}
+f_7510(t10,t9);}
else{
-t10=(C_word)C_eqp(t5,lf[628]);
+t10=C_eqp(t5,lf[639]);
if(C_truep(t10)){
t11=t7;
-f_7353(t11,t10);}
+f_7510(t11,t10);}
else{
-t11=(C_word)C_eqp(t5,lf[13]);
+t11=C_eqp(t5,lf[13]);
if(C_truep(t11)){
t12=t7;
-f_7353(t12,t11);}
+f_7510(t12,t11);}
else{
-t12=(C_word)C_eqp(t5,lf[550]);
+t12=C_eqp(t5,lf[562]);
if(C_truep(t12)){
t13=t7;
-f_7353(t13,t12);}
+f_7510(t13,t12);}
else{
-t13=(C_word)C_eqp(t5,lf[629]);
+t13=C_eqp(t5,lf[640]);
if(C_truep(t13)){
t14=t7;
-f_7353(t14,t13);}
+f_7510(t14,t13);}
else{
-t14=(C_word)C_eqp(t5,lf[630]);
+t14=C_eqp(t5,lf[641]);
if(C_truep(t14)){
t15=t7;
-f_7353(t15,t14);}
+f_7510(t15,t14);}
else{
-t15=(C_word)C_eqp(t5,lf[631]);
+t15=C_eqp(t5,lf[642]);
if(C_truep(t15)){
t16=t7;
-f_7353(t16,t15);}
+f_7510(t16,t15);}
else{
-t16=(C_word)C_eqp(t5,lf[632]);
+t16=C_eqp(t5,lf[643]);
if(C_truep(t16)){
t17=t7;
-f_7353(t17,t16);}
+f_7510(t17,t16);}
else{
-t17=(C_word)C_eqp(t5,lf[633]);
+t17=C_eqp(t5,lf[644]);
if(C_truep(t17)){
t18=t7;
-f_7353(t18,t17);}
+f_7510(t18,t17);}
else{
-t18=(C_word)C_eqp(t5,lf[634]);
+t18=C_eqp(t5,lf[645]);
t19=t7;
-f_7353(t19,(C_truep(t18)?t18:(C_word)C_eqp(t5,lf[635])));}}}}}}}}}}}}
+f_7510(t19,(C_truep(t18)?t18:C_eqp(t5,lf[646])));}}}}}}}}}}}}
-/* 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){
+/* k7508 in compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_fcall f_7510(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7308,79 +7346,79 @@ 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);}
+C_save_and_reclaim((void*)trf_7510,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[7];
t3=((C_word*)t0)[6];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-t2=(C_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);
+t2=C_eqp(((C_word*)t0)[5],lf[598]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7519,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
if(C_truep(t2)){
t4=t3;
-f_7362(t4,t2);}
+f_7519(t4,t2);}
else{
-t4=(C_word)C_eqp(((C_word*)t0)[5],lf[615]);
+t4=C_eqp(((C_word*)t0)[5],lf[626]);
if(C_truep(t4)){
t5=t3;
-f_7362(t5,t4);}
+f_7519(t5,t4);}
else{
-t5=(C_word)C_eqp(((C_word*)t0)[5],lf[599]);
+t5=C_eqp(((C_word*)t0)[5],lf[610]);
if(C_truep(t5)){
t6=t3;
-f_7362(t6,t5);}
+f_7519(t6,t5);}
else{
-t6=(C_word)C_eqp(((C_word*)t0)[5],lf[616]);
+t6=C_eqp(((C_word*)t0)[5],lf[627]);
if(C_truep(t6)){
t7=t3;
-f_7362(t7,t6);}
+f_7519(t7,t6);}
else{
-t7=(C_word)C_eqp(((C_word*)t0)[5],lf[617]);
+t7=C_eqp(((C_word*)t0)[5],lf[628]);
if(C_truep(t7)){
t8=t3;
-f_7362(t8,t7);}
+f_7519(t8,t7);}
else{
-t8=(C_word)C_eqp(((C_word*)t0)[5],lf[618]);
+t8=C_eqp(((C_word*)t0)[5],lf[629]);
if(C_truep(t8)){
t9=t3;
-f_7362(t9,t8);}
+f_7519(t9,t8);}
else{
-t9=(C_word)C_eqp(((C_word*)t0)[5],lf[619]);
+t9=C_eqp(((C_word*)t0)[5],lf[630]);
if(C_truep(t9)){
t10=t3;
-f_7362(t10,t9);}
+f_7519(t10,t9);}
else{
-t10=(C_word)C_eqp(((C_word*)t0)[5],lf[620]);
+t10=C_eqp(((C_word*)t0)[5],lf[631]);
if(C_truep(t10)){
t11=t3;
-f_7362(t11,t10);}
+f_7519(t11,t10);}
else{
-t11=(C_word)C_eqp(((C_word*)t0)[5],lf[621]);
+t11=C_eqp(((C_word*)t0)[5],lf[632]);
if(C_truep(t11)){
t12=t3;
-f_7362(t12,t11);}
+f_7519(t12,t11);}
else{
-t12=(C_word)C_eqp(((C_word*)t0)[5],lf[601]);
+t12=C_eqp(((C_word*)t0)[5],lf[612]);
if(C_truep(t12)){
t13=t3;
-f_7362(t13,t12);}
+f_7519(t13,t12);}
else{
-t13=(C_word)C_eqp(((C_word*)t0)[5],lf[622]);
+t13=C_eqp(((C_word*)t0)[5],lf[633]);
if(C_truep(t13)){
t14=t3;
-f_7362(t14,t13);}
+f_7519(t14,t13);}
else{
-t14=(C_word)C_eqp(((C_word*)t0)[5],lf[623]);
+t14=C_eqp(((C_word*)t0)[5],lf[634]);
if(C_truep(t14)){
t15=t3;
-f_7362(t15,t14);}
+f_7519(t15,t14);}
else{
-t15=(C_word)C_eqp(((C_word*)t0)[5],lf[624]);
+t15=C_eqp(((C_word*)t0)[5],lf[635]);
t16=t3;
-f_7362(t16,(C_truep(t15)?t15:(C_word)C_eqp(((C_word*)t0)[5],lf[625])));}}}}}}}}}}}}}}
+f_7519(t16,(C_truep(t15)?t15:C_eqp(((C_word*)t0)[5],lf[636])));}}}}}}}}}}}}}}
-/* 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){
+/* k7517 in k7508 in compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_fcall f_7519(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7390,33 +7428,33 @@ 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);}
+C_save_and_reclaim((void*)trf_7519,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]);}
+C_trace("c-backend.scm: 1097 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),((C_word*)t0)[7],((C_word*)t0)[6],lf[599]);}
else{
-t2=(C_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);
+t2=C_eqp(((C_word*)t0)[5],lf[600]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7531,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(t2)){
t4=t3;
-f_7374(t4,t2);}
+f_7531(t4,t2);}
else{
-t4=(C_word)C_eqp(((C_word*)t0)[5],lf[612]);
+t4=C_eqp(((C_word*)t0)[5],lf[623]);
if(C_truep(t4)){
t5=t3;
-f_7374(t5,t4);}
+f_7531(t5,t4);}
else{
-t5=(C_word)C_eqp(((C_word*)t0)[5],lf[613]);
+t5=C_eqp(((C_word*)t0)[5],lf[624]);
if(C_truep(t5)){
t6=t3;
-f_7374(t6,t5);}
+f_7531(t6,t5);}
else{
-t6=(C_word)C_eqp(((C_word*)t0)[5],lf[613]);
+t6=C_eqp(((C_word*)t0)[5],lf[624]);
t7=t3;
-f_7374(t7,(C_truep(t6)?t6:(C_word)C_eqp(((C_word*)t0)[5],lf[614])));}}}}}
+f_7531(t7,(C_truep(t6)?t6:C_eqp(((C_word*)t0)[5],lf[625])));}}}}}
-/* 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){
+/* k7529 in k7517 in k7508 in compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_fcall f_7531(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7426,53 +7464,53 @@ 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);}
+C_save_and_reclaim((void*)trf_7531,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]);}
+C_trace("c-backend.scm: 1099 string-append");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[115]+1)))(8,*((C_word*)lf[115]+1),((C_word*)t0)[7],((C_word*)t0)[6],lf[601],((C_word*)t0)[5],lf[602],((C_word*)t0)[5],lf[603]);}
else{
-t2=(C_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);
+t2=C_eqp(((C_word*)t0)[4],lf[604]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7543,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
if(C_truep(t2)){
t4=t3;
-f_7386(t4,t2);}
+f_7543(t4,t2);}
else{
-t4=(C_word)C_eqp(((C_word*)t0)[4],lf[608]);
+t4=C_eqp(((C_word*)t0)[4],lf[619]);
if(C_truep(t4)){
t5=t3;
-f_7386(t5,t4);}
+f_7543(t5,t4);}
else{
-t5=(C_word)C_eqp(((C_word*)t0)[4],lf[609]);
+t5=C_eqp(((C_word*)t0)[4],lf[620]);
if(C_truep(t5)){
t6=t3;
-f_7386(t6,t5);}
+f_7543(t6,t5);}
else{
-t6=(C_word)C_eqp(((C_word*)t0)[4],lf[610]);
+t6=C_eqp(((C_word*)t0)[4],lf[621]);
t7=t3;
-f_7386(t7,(C_truep(t6)?t6:(C_word)C_eqp(((C_word*)t0)[4],lf[611])));}}}}}
+f_7543(t7,(C_truep(t6)?t6:C_eqp(((C_word*)t0)[4],lf[622])));}}}}}
-/* 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){
+/* k7541 in k7529 in k7517 in k7508 in compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_fcall f_7543(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7386,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_7543,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]);}
+C_trace("c-backend.scm: 1101 string-append");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[115]+1)))(6,*((C_word*)lf[115]+1),((C_word*)t0)[6],((C_word*)t0)[5],lf[605],((C_word*)t0)[4],lf[606]);}
else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7549,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
+if(C_truep(C_i_symbolp(((C_word*)t0)[2]))){
+C_trace("c-backend.scm: 1103 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[617]))(4,*((C_word*)lf[617]+1),t2,C_retrieve(lf[618]),((C_word*)t0)[2]);}
else{
t3=t2;
-f_7392(2,t3,C_SCHEME_FALSE);}}}
+f_7549(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){
+/* k7547 in k7541 in k7529 in k7517 in k7508 in compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7549(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7488,101 +7526,101 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7549,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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");
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7553,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+C_trace("g17171718");
t3=t2;
-f_7396(t3,((C_word*)t0)[3],t1);}
+f_7553(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(C_i_pairp(((C_word*)t0)[2]))){
+t2=C_i_car(((C_word*)t0)[2]);
+t3=C_eqp(t2,lf[607]);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7588,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[2],a[5]=t2,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
if(C_truep(t3)){
t5=t4;
-f_7431(t5,t3);}
+f_7588(t5,t3);}
else{
-t5=(C_word)C_eqp(t2,lf[598]);
+t5=C_eqp(t2,lf[480]);
if(C_truep(t5)){
t6=t4;
-f_7431(t6,t5);}
+f_7588(t6,t5);}
else{
-t6=(C_word)C_eqp(t2,lf[599]);
+t6=C_eqp(t2,lf[610]);
if(C_truep(t6)){
t7=t4;
-f_7431(t7,t6);}
+f_7588(t7,t6);}
else{
-t7=(C_word)C_eqp(t2,lf[600]);
+t7=C_eqp(t2,lf[611]);
if(C_truep(t7)){
t8=t4;
-f_7431(t8,t7);}
+f_7588(t8,t7);}
else{
-t8=(C_word)C_eqp(t2,lf[601]);
+t8=C_eqp(t2,lf[612]);
if(C_truep(t8)){
t9=t4;
-f_7431(t9,t8);}
+f_7588(t9,t8);}
else{
-t9=(C_word)C_eqp(t2,lf[602]);
+t9=C_eqp(t2,lf[613]);
if(C_truep(t9)){
t10=t4;
-f_7431(t10,t9);}
+f_7588(t10,t9);}
else{
-t10=(C_word)C_eqp(t2,lf[603]);
+t10=C_eqp(t2,lf[614]);
if(C_truep(t10)){
t11=t4;
-f_7431(t11,t10);}
+f_7588(t11,t10);}
else{
-t11=(C_word)C_eqp(t2,lf[604]);
+t11=C_eqp(t2,lf[615]);
t12=t4;
-f_7431(t12,(C_truep(t11)?t11:(C_word)C_eqp(t2,lf[605])));}}}}}}}}
+f_7588(t12,(C_truep(t11)?t11:C_eqp(t2,lf[616])));}}}}}}}}
else{
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[4]);}}}
-/* 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){
+/* k7586 in k7547 in k7541 in k7529 in k7517 in k7508 in compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_fcall f_7588(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
if(C_truep(t1)){
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1110 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),((C_word*)t0)[7],((C_word*)t0)[6],lf[608]);}
else{
-t2=(C_word)C_eqp(((C_word*)t0)[5],lf[597]);
+t2=C_eqp(((C_word*)t0)[5],lf[609]);
if(C_truep(t2)){
-t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
-C_trace("c-backend.scm: 1079 compute-size");
+t3=C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1111 compute-size");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_7343(5,t4,((C_word*)t0)[7],t3,((C_word*)t0)[2],((C_word*)t0)[6]);}
+f_7500(5,t4,((C_word*)t0)[7],t3,((C_word*)t0)[2],((C_word*)t0)[6]);}
else{
t3=((C_word*)t0)[7];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[6]);}}}
-/* 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){
+/* g1717 in k7547 in k7541 in k7529 in k7517 in k7508 in compute-size in k7496 in k7490 in k7487 in k7484 in k7481 in g1523 in loop1516 in generate-foreign-callback-stubs in k2595 in k2509 in k2506 */
+static void C_fcall f_7553(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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");
+C_save_and_reclaim((void*)trf_7553,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_vectorp(t2))){
+t3=C_i_vector_ref(t2,C_fix(0));
+C_trace("c-backend.scm: 1105 compute-size");
t4=((C_word*)((C_word*)t0)[4])[1];
-f_7343(5,t4,t1,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_7500(5,t4,t1,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
else{
t3=t2;
-C_trace("c-backend.scm: 1073 compute-size");
+C_trace("c-backend.scm: 1105 compute-size");
t4=((C_word*)((C_word*)t0)[4])[1];
-f_7343(5,t4,t1,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}}
+f_7500(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){
+/* ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7151(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -7591,15 +7629,15 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_7151,4,t0,t1,t2,t3);}
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7000,a[2]=t5,a[3]=t3,tmp=(C_word)a,a+=4,tmp));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7157,a[2]=t5,a[3]=t3,tmp=(C_word)a,a+=4,tmp));
t7=((C_word*)t5)[1];
-f_7000(t7,t1,t2);}
+f_7157(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){
+/* loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_fcall f_7157(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7608,67 +7646,67 @@ 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");
+C_save_and_reclaim((void*)trf_7157,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7165,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7452,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g14121413");
t6=t3;
-f_7008(t6,t4,t5);}
+f_7165(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){
+/* k7450 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7452(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_7157(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){
+/* g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_fcall f_7165(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_7165,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7169,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 1016 foreign-stub-id");
+((C_proc3)C_retrieve_symbol_proc(lf[597]))(3,*((C_word*)lf[597]+1),t3,t2);}
-/* 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){
+/* k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7169(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7169,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7172,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 1017 real-name2");
+((C_proc4)C_retrieve_symbol_proc(lf[596]))(4,*((C_word*)lf[596]+1),t2,t1,((C_word*)t0)[2]);}
-/* 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){
+/* k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7172(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7172,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7175,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 1018 foreign-stub-argument-types");
+((C_proc3)C_retrieve_symbol_proc(lf[595]))(3,*((C_word*)lf[595]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7175(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7676,273 +7714,273 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7175,2,t0,t1);}
+t2=C_i_length(t1);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7181,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=t2,a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7449,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 1020 make-variable-list");
+((C_proc4)C_retrieve_symbol_proc(lf[286]))(4,*((C_word*)lf[286]+1),t4,t2,lf[594]);}
-/* 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){
+/* k7447 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7449(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7292,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[581],t1);
-C_trace("c-backend.scm: 988 intersperse");
+C_save_and_reclaim((void*)tr2,(void*)f_7449,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[593],t1);
+C_trace("c-backend.scm: 1020 intersperse");
((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t2,C_make_character(44));}
-/* 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){
+/* k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7181(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7181,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7184,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+C_trace("c-backend.scm: 1021 foreign-stub-return-type");
+((C_proc3)C_retrieve_symbol_proc(lf[592]))(3,*((C_word*)lf[592]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7184(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7184,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7187,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+C_trace("c-backend.scm: 1022 foreign-stub-name");
+((C_proc3)C_retrieve_symbol_proc(lf[591]))(3,*((C_word*)lf[591]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7187(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7187,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7190,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+C_trace("c-backend.scm: 1023 foreign-stub-body");
+((C_proc3)C_retrieve_symbol_proc(lf[590]))(3,*((C_word*)lf[590]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7190(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7190,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7193,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
+C_trace("c-backend.scm: 1024 foreign-stub-argument-names");
+((C_proc3)C_retrieve_symbol_proc(lf[589]))(3,*((C_word*)lf[589]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7193(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_7193,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7196,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
if(C_truep(t1)){
t3=t2;
-f_7039(2,t3,t1);}
+f_7196(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);}}
+C_trace("c-backend.scm: 1024 make-list");
+((C_proc4)C_retrieve_symbol_proc(lf[247]))(4,*((C_word*)lf[247]+1),t2,((C_word*)t0)[8],C_SCHEME_FALSE);}}
-/* 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){
+/* k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7196(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[13],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7196,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_7199,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
+C_trace("c-backend.scm: 1025 foreign-result-conversion");
+((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t2,((C_word*)t0)[9],lf[588]);}
-/* 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){
+/* k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7199(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7199,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7202,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
+C_trace("c-backend.scm: 1026 foreign-stub-cps");
+((C_proc3)C_retrieve_symbol_proc(lf[587]))(3,*((C_word*)lf[587]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7202(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7202,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7205,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=t1,a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
+C_trace("c-backend.scm: 1027 foreign-stub-callback");
+((C_proc3)C_retrieve_symbol_proc(lf[586]))(3,*((C_word*)lf[586]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7205(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[15],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_7205,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_7208,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=t1,a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],tmp=(C_word)a,a+=15,tmp);
+C_trace("c-backend.scm: 1028 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE);}
-/* 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){
+/* k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7208(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[17],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_7208,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7211,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],tmp=(C_word)a,a+=14,tmp);
if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7438,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 1030 cleanup");
+((C_proc3)C_retrieve_symbol_proc(lf[505]))(3,*((C_word*)lf[505]+1),t3,((C_word*)t0)[2]);}
else{
t3=t2;
-f_7054(2,t3,C_SCHEME_UNDEFINED);}}
+f_7211(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){
+/* k7436 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7438(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1030 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[584],t1,lf[585]);}
-/* 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){
+/* k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7211(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_7211,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7214,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
if(C_truep(((C_word*)t0)[12])){
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1032 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[582],((C_word*)t0)[6],lf[583]);}
else{
t3=t2;
-f_7057(2,t3,C_SCHEME_UNDEFINED);}}
+f_7214(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){
+/* k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7214(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_7214,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7217,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
if(C_truep(((C_word*)t0)[10])){
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1035 gen");
+((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[577],((C_word*)t0)[2],lf[578],C_SCHEME_TRUE,lf[579],((C_word*)t0)[2],lf[580]);}
else{
-C_trace("c-backend.scm: 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));}}
+C_trace("c-backend.scm: 1037 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[581],((C_word*)t0)[2],C_make_character(40));}}
-/* 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){
+/* k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7217(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_7217,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7220,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
C_apply(4,0,t2,*((C_word*)lf[1]+1),((C_word*)t0)[3]);}
-/* 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){
+/* k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7220(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[13],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_7220,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_7223,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],tmp=(C_word)a,a+=13,tmp);
if(C_truep(((C_word*)t0)[10])){
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1040 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,lf[572],C_SCHEME_TRUE,lf[573],((C_word*)t0)[2],lf[574]);}
else{
-C_trace("c-backend.scm: 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));}}
+C_trace("c-backend.scm: 1041 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,lf[575],C_SCHEME_TRUE,lf[576],((C_word*)t0)[2],C_make_character(40));}}
-/* 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){
+/* k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7223(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_7223,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7226,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],tmp=(C_word)a,a+=12,tmp);
C_apply(4,0,t2,*((C_word*)lf[1]+1),((C_word*)t0)[2]);}
-/* 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){
+/* k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7226(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7226,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7229,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
+C_trace("c-backend.scm: 1043 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[571]);}
-/* 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){
+/* k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7229(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7229,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7232,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
+C_trace("c-backend.scm: 1044 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[570]);}
-/* 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){
+/* k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7232(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[15],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7232,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7235,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7329,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 1053 iota");
+((C_proc3)C_retrieve_symbol_proc(lf[60]))(3,*((C_word*)lf[60]+1),t3,((C_word*)t0)[6]);}
-/* 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){
+/* k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7329(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7950,33 +7988,33 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7329,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7174,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7331,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_7174(t5,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+f_7331(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){
+/* loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_fcall f_7331(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);
+C_save_and_reclaim((void*)trf_7331,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7338,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=t3,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
+if(C_truep(C_i_pairp(t2))){
+t6=C_i_pairp(t3);
t7=t5;
-f_7181(t7,(C_truep(t6)?(C_word)C_i_pairp(t4):C_SCHEME_FALSE));}
+f_7338(t7,(C_truep(t6)?C_i_pairp(t4):C_SCHEME_FALSE));}
else{
t6=t5;
-f_7181(t6,C_SCHEME_FALSE);}}
+f_7338(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){
+/* k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_fcall f_7338(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7989,131 +8027,131 @@ 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);}
+C_save_and_reclaim((void*)trf_7338,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7377,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=C_slot(((C_word*)t0)[6],C_fix(0));
+t4=C_slot(((C_word*)t0)[5],C_fix(0));
+t5=C_slot(((C_word*)t0)[4],C_fix(0));
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7347,a[2]=t3,a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7359,a[2]=t3,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
if(C_truep(t5)){
-C_trace("c-backend.scm: 1018 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[72]+1)))(3,*((C_word*)lf[72]+1),t7,t5);}
+C_trace("c-backend.scm: 1050 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[73]+1)))(3,*((C_word*)lf[73]+1),t7,t5);}
else{
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7208,a[2]=t4,a[3]=t7,tmp=(C_word)a,a+=4,tmp);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7365,a[2]=t4,a[3]=t7,tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t8);}}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+1),t8);}}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-/* 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){
+/* k7363 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7365(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_7365,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7368,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("write-char/port");
-t3=C_retrieve(lf[334]);
+t3=C_retrieve(lf[339]);
((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){
+/* k7366 in k7363 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7368(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_7368,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7371,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k7369 in k7366 in k7363 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7371(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k7357 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7359(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 1016 foreign-type-declaration");
+C_trace("c-backend.scm: 1048 foreign-type-declaration");
((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k7345 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7347(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7347,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7351,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 1051 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t2,((C_word*)t0)[2],lf[569]);}
-/* 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){
+/* k7349 in k7345 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7351(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_7351,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7355,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 1052 foreign-argument-conversion");
((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7353 in k7349 in k7345 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7355(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1047 gen");
+((C_proc11)C_retrieve_proc(*((C_word*)lf[1]+1)))(11,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[4],lf[566],((C_word*)t0)[3],C_make_character(41),t1,lf[567],((C_word*)t0)[2],lf[568]);}
-/* 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){
+/* k7375 in k7336 in loop1439 in k7327 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7377(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
-t2=(C_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));
+t2=C_slot(((C_word*)t0)[6],C_fix(1));
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
t5=((C_word*)((C_word*)t0)[3])[1];
-f_7174(t5,((C_word*)t0)[2],t2,t3,t4);}
+f_7331(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){
+/* k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7235(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_7235,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7238,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
if(C_truep(((C_word*)t0)[7])){
-C_trace("c-backend.scm: 1022 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[553]);}
+C_trace("c-backend.scm: 1054 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[565]);}
else{
t3=t2;
-f_7081(2,t3,C_SCHEME_UNDEFINED);}}
+f_7238(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){
+/* k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7238(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8122,36 +8160,36 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7238,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7241,a[2]=((C_word*)t0)[9],tmp=(C_word)a,a+=3,tmp);
if(C_truep(((C_word*)t0)[8])){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7247,a[2]=((C_word*)t0)[6],a[3]=t2,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 1056 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,((C_word*)t0)[8],C_SCHEME_TRUE,lf[556]);}
else{
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7268,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+t4=C_eqp(((C_word*)t0)[5],lf[562]);
if(C_truep(t4)){
-C_trace("c-backend.scm: 1035 gen");
+C_trace("c-backend.scm: 1067 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE);}
else{
-C_trace("c-backend.scm: 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]);}}}
+C_trace("c-backend.scm: 1066 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[564],((C_word*)t0)[2]);}}}
-/* 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){
+/* k7266 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7268(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_7268,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7271,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 1068 gen");
((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,((C_word*)t0)[2],C_make_character(40));}
-/* 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){
+/* k7269 in k7266 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7271(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8159,112 +8197,112 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7271,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7274,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7305,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7309,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 1069 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t4,((C_word*)t0)[2],lf[563]);}
-/* 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){
+/* k7307 in k7269 in k7266 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7309(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 1037 intersperse");
+C_trace("c-backend.scm: 1069 intersperse");
((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t1,C_make_character(44));}
-/* 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){
+/* k7303 in k7269 in k7266 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7305(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[1]+1),t1);}
-/* 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){
+/* k7272 in k7269 in k7266 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7274(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);
+C_save_and_reclaim((void*)tr2,(void*)f_7274,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7277,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+t3=C_eqp(((C_word*)t0)[2],lf[562]);
if(C_truep(t3)){
t4=t2;
-f_7120(2,t4,C_SCHEME_UNDEFINED);}
+f_7277(2,t4,C_SCHEME_UNDEFINED);}
else{
-C_trace("c-backend.scm: 1038 gen");
+C_trace("c-backend.scm: 1070 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(41));}}
-/* 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){
+/* k7275 in k7272 in k7269 in k7266 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7277(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7277,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7280,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 1071 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[561]);}
-/* 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){
+/* k7278 in k7275 in k7272 in k7269 in k7266 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7280(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(((C_word*)t0)[4])){
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1073 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[557],C_SCHEME_TRUE,lf[558]);}
else{
if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 1043 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[547]);}
+C_trace("c-backend.scm: 1075 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[559]);}
else{
-C_trace("c-backend.scm: 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]);}}}
+C_trace("c-backend.scm: 1076 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[560]);}}}
-/* 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){
+/* k7245 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7247(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7247,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7250,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 1058 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[555],C_SCHEME_TRUE);}
-/* 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){
+/* k7248 in k7245 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7250(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(((C_word*)t0)[4])){
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1060 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[551],C_SCHEME_TRUE,lf[552]);}
else{
if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 1062 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[553]);}
else{
-C_trace("c-backend.scm: 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]);}}}
+C_trace("c-backend.scm: 1063 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[554]);}}}
-/* 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){
+/* k7239 in k7236 in k7233 in k7230 in k7227 in k7224 in k7221 in k7218 in k7215 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k7194 in k7191 in k7188 in k7185 in k7182 in k7179 in k7173 in k7170 in k7167 in g1412 in loop1405 in ##compiler#generate-foreign-stubs in k2595 in k2509 in k2506 */
+static void C_ccall f_7241(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 1045 gen");
+C_trace("c-backend.scm: 1077 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(125));}
-/* ##compiler#generate-foreign-callback-stub-prototypes in k2573 in k2487 in k2484 */
-static void C_ccall f_6954(C_word c,C_word t0,C_word t1,C_word t2){
+/* ##compiler#generate-foreign-callback-stub-prototypes in k2595 in k2509 in k2506 */
+static void C_ccall f_7111(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8273,15 +8311,15 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_7111,3,t0,t1,t2);}
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6960,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7117,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
t6=((C_word*)t4)[1];
-f_6960(t6,t1,t2);}
+f_7117(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){
+/* loop1386 in ##compiler#generate-foreign-callback-stub-prototypes in k2595 in k2509 in k2506 */
+static void C_fcall f_7117(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8290,63 +8328,63 @@ 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_save_and_reclaim((void*)trf_7117,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7138,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7129,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 1008 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE);}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k7127 in loop1386 in ##compiler#generate-foreign-callback-stub-prototypes in k2595 in k2509 in k2506 */
+static void C_ccall f_7129(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7129,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7132,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 1009 generate-foreign-callback-header");
+((C_proc4)C_retrieve_symbol_proc(lf[549]))(4,*((C_word*)lf[549]+1),t2,lf[550],((C_word*)t0)[2]);}
-/* 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){
+/* k7130 in k7127 in loop1386 in ##compiler#generate-foreign-callback-stub-prototypes in k2595 in k2509 in k2506 */
+static void C_ccall f_7132(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 978 gen");
+C_trace("c-backend.scm: 1010 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(59));}
-/* 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){
+/* k7136 in loop1386 in ##compiler#generate-foreign-callback-stub-prototypes in k2595 in k2509 in k2506 */
+static void C_ccall f_7138(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_7117(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){
+/* ##compiler#generate-external-variables in k2595 in k2509 in k2506 */
+static void C_ccall f_7057(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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_save_and_reclaim((void*)tr3,(void*)f_7057,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7061,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 993 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE);}
-/* 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){
+/* k7059 in ##compiler#generate-external-variables in k2595 in k2509 in k2506 */
+static void C_ccall f_7061(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8354,15 +8392,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7061,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6909,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7066,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_6909(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_7066(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){
+/* loop1366 in k7059 in ##compiler#generate-external-variables in k2595 in k2509 in k2506 */
+static void C_fcall f_7066(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8375,110 +8413,110 @@ 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_save_and_reclaim((void*)trf_7066,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7098,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=C_i_vector_ref(t4,C_fix(0));
+t6=C_i_vector_ref(t4,C_fix(1));
+t7=C_i_vector_ref(t4,C_fix(2));
+t8=(C_truep(t7)?lf[547]:lf[548]);
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7095,a[2]=t8,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 999 foreign-type-declaration");
((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t9,t6,t5);}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k7093 in loop1366 in k7059 in ##compiler#generate-external-variables in k2595 in k2509 in k2506 */
+static void C_ccall f_7095(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 967 gen");
+C_trace("c-backend.scm: 999 gen");
((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,((C_word*)t0)[2],t1,C_make_character(59));}
-/* 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){
+/* k7096 in loop1366 in k7059 in ##compiler#generate-external-variables in k2595 in k2509 in k2506 */
+static void C_ccall f_7098(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_7066(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){
+/* ##compiler#make-argument-list in k2595 in k2509 in k2506 */
+static void C_ccall f_7041(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[3],*a=ab;
if(c!=4) C_bad_argc_2(c,4,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_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);}
+C_save_and_reclaim((void*)tr4,(void*)f_7041,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7047,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 985 list-tabulate");
+((C_proc4)C_retrieve_symbol_proc(lf[546]))(4,*((C_word*)lf[546]+1),t1,t2,t4);}
-/* 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){
+/* a7046 in ##compiler#make-argument-list in k2595 in k2509 in k2506 */
+static void C_ccall f_7047(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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_save_and_reclaim((void*)tr3,(void*)f_7047,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7055,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 987 number->string");
C_number_to_string(3,0,t3,t2);}
-/* 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){
+/* k7053 in a7046 in ##compiler#make-argument-list in k2595 in k2509 in k2506 */
+static void C_ccall f_7055(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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);}
+C_trace("c-backend.scm: 987 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* ##compiler#make-variable-list in 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){
+/* ##compiler#make-variable-list in k2595 in k2509 in k2506 */
+static void C_ccall f_7025(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[3],*a=ab;
if(c!=4) C_bad_argc_2(c,4,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_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);}
+C_save_and_reclaim((void*)tr4,(void*)f_7025,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7031,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 980 list-tabulate");
+((C_proc4)C_retrieve_symbol_proc(lf[546]))(4,*((C_word*)lf[546]+1),t1,t2,t4);}
-/* 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){
+/* a7030 in ##compiler#make-variable-list in k2595 in k2509 in k2506 */
+static void C_ccall f_7031(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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_save_and_reclaim((void*)tr3,(void*)f_7031,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7039,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 982 number->string");
C_number_to_string(3,0,t3,t2);}
-/* 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){
+/* k7037 in a7030 in ##compiler#make-variable-list in k2595 in k2509 in k2506 */
+static void C_ccall f_7039(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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);}
+C_trace("c-backend.scm: 982 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[545],((C_word*)t0)[2],t1);}
-/* ##compiler#cleanup in k2573 in k2487 in k2484 */
-static void C_ccall f_6779(C_word c,C_word t0,C_word t1,C_word t2){
+/* ##compiler#cleanup in k2595 in k2509 in k2506 */
+static void C_ccall f_6936(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8490,18 +8528,18 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_6936,3,t0,t1,t2);}
t3=C_SCHEME_FALSE;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=(C_word)C_i_string_length(t2);
+t5=C_i_string_length(t2);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6788,a[2]=t7,a[3]=t2,a[4]=t4,a[5]=t5,tmp=(C_word)a,a+=6,tmp));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6945,a[2]=t7,a[3]=t2,a[4]=t4,a[5]=t5,tmp=(C_word)a,a+=6,tmp));
t9=((C_word*)t7)[1];
-f_6788(t9,t1,C_fix(0));}
+f_6945(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){
+/* loop in ##compiler#cleanup in k2595 in k2509 in k2506 */
+static void C_fcall f_6945(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8517,43 +8555,43 @@ 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);}
+C_save_and_reclaim((void*)trf_6945,NULL,3,t0,t1,t2);}
t3=t2;
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t3,((C_word*)t0)[5]))){
+if(C_truep(C_fixnum_greater_or_equal_p(t3,((C_word*)t0)[5]))){
t4=((C_word*)((C_word*)t0)[4])[1];
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_truep(t4)?t4:((C_word*)t0)[3]));}
else{
-t4=(C_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);
+t4=C_i_string_ref(((C_word*)t0)[3],t2);
+t5=C_fixnum_lessp(t4,C_make_character(32));
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6974,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[2],a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
if(C_truep(t5)){
t7=t6;
-f_6817(t7,t5);}
+f_6974(t7,t5);}
else{
-t7=(C_word)C_fixnum_greaterp(t4,C_make_character(126));
+t7=C_fixnum_greaterp(t4,C_make_character(126));
if(C_truep(t7)){
t8=t6;
-f_6817(t8,t7);}
+f_6974(t8,t7);}
else{
-t8=(C_word)C_eqp(t4,C_make_character(42));
+t8=C_eqp(t4,C_make_character(42));
if(C_truep(t8)){
-t9=(C_word)C_fixnum_decrease(((C_word*)t0)[5]);
+t9=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);
+if(C_truep(C_fixnum_lessp(t10,t9))){
+t11=C_fixnum_increase(t2);
+t12=C_i_string_ref(((C_word*)t0)[3],t11);
t13=t6;
-f_6817(t13,(C_word)C_eqp(C_make_character(47),t12));}
+f_6974(t13,C_eqp(C_make_character(47),t12));}
else{
t11=t6;
-f_6817(t11,C_SCHEME_FALSE);}}
+f_6974(t11,C_SCHEME_FALSE);}}
else{
t9=t6;
-f_6817(t9,C_SCHEME_FALSE);}}}}}
+f_6974(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){
+/* k6972 in loop in ##compiler#cleanup in k2595 in k2509 in k2506 */
+static void C_fcall f_6974(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8564,33 +8602,33 @@ 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);}
+C_save_and_reclaim((void*)trf_6974,NULL,2,t0,t1);}
if(C_truep(t1)){
if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t2=(C_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");
+t2=C_i_string_set(((C_word*)((C_word*)t0)[7])[1],((C_word*)t0)[6],C_make_character(126));
+t3=C_fixnum_increase(((C_word*)t0)[6]);
+C_trace("c-backend.scm: 974 loop");
t4=((C_word*)((C_word*)t0)[5])[1];
-f_6788(t4,((C_word*)t0)[4],t3);}
+f_6945(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]);}}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6984,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 971 string-copy");
+((C_proc3)C_retrieve_symbol_proc(lf[544]))(3,*((C_word*)lf[544]+1),t2,((C_word*)t0)[3]);}}
else{
if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
-t2=(C_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");
+t2=C_i_string_set(((C_word*)((C_word*)t0)[7])[1],((C_word*)t0)[6],((C_word*)t0)[2]);
+t3=C_fixnum_increase(((C_word*)t0)[6]);
+C_trace("c-backend.scm: 974 loop");
t4=((C_word*)((C_word*)t0)[5])[1];
-f_6788(t4,((C_word*)t0)[4],t3);}
+f_6945(t4,((C_word*)t0)[4],t3);}
else{
-t2=(C_word)C_fixnum_increase(((C_word*)t0)[6]);
-C_trace("c-backend.scm: 942 loop");
+t2=C_fixnum_increase(((C_word*)t0)[6]);
+C_trace("c-backend.scm: 974 loop");
t3=((C_word*)((C_word*)t0)[5])[1];
-f_6788(t3,((C_word*)t0)[4],t2);}}}
+f_6945(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){
+/* k6982 in k6972 in loop in ##compiler#cleanup in k2595 in k2509 in k2506 */
+static void C_ccall f_6984(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8598,14 +8636,14 @@ 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");
+t3=C_i_string_set(((C_word*)((C_word*)t0)[5])[1],((C_word*)t0)[4],C_make_character(126));
+t4=C_fixnum_increase(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 974 loop");
t5=((C_word*)((C_word*)t0)[3])[1];
-f_6788(t5,((C_word*)t0)[2],t4);}
+f_6945(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){
+/* emit-procedure-table-info in k2595 in k2509 in k2506 */
+static void C_ccall f_6859(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -8614,15 +8652,15 @@ 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]);}
+C_save_and_reclaim((void*)tr4,(void*)f_6859,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6863,a[2]=t2,a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=C_i_length(t2);
+t6=C_fixnum_increase(t5);
+C_trace("c-backend.scm: 936 gen");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[1]+1)))(9,*((C_word*)lf[1]+1),t4,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[541],C_SCHEME_TRUE,lf[542],t6,lf[543]);}
-/* 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){
+/* k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
+static void C_ccall f_6863(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8631,120 +8669,120 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6863,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6866,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6720,a[2]=((C_word*)t0)[3],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6877,a[2]=((C_word*)t0)[3],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
-f_6720(t6,t2,((C_word*)t0)[2]);}
+f_6877(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){
+/* doloop1308 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
+static void C_fcall f_6877(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_6877,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_nullp(t2))){
+C_trace("c-backend.scm: 940 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t1,C_SCHEME_TRUE,lf[533]);}
else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6890,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t4=C_i_car(t2);
+C_trace("c-backend.scm: 941 lambda-literal-id");
((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t3,t4);}}
-/* 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){
+/* k6888 in doloop1308 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
+static void C_ccall f_6890(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6890,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6893,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6922,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 942 string->c-identifier");
+((C_proc3)C_retrieve_symbol_proc(lf[540]))(3,*((C_word*)lf[540]+1),t3,((C_word*)t0)[2]);}
-/* 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){
+/* k6920 in k6888 in doloop1308 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
+static void C_ccall f_6922(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 942 gen");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[538],((C_word*)t0)[2],C_make_character(58),t1,lf[539]);}
-/* 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){
+/* k6891 in k6888 in doloop1308 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
+static void C_ccall f_6893(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);
+C_save_and_reclaim((void*)tr2,(void*)f_6893,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6896,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+t3=C_eqp(lf[262],((C_word*)t0)[2]);
if(C_truep(t3)){
-if(C_truep(C_retrieve(lf[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]);}
+if(C_truep(C_retrieve(lf[213]))){
+C_trace("c-backend.scm: 945 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[534],C_retrieve(lf[213]),lf[535]);}
else{
-C_trace("c-backend.scm: 914 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[524]);}}
+C_trace("c-backend.scm: 946 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[536]);}}
else{
-C_trace("c-backend.scm: 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]);}}
+C_trace("c-backend.scm: 947 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,((C_word*)t0)[2],lf[537]);}}
-/* 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){
+/* k6894 in k6891 in k6888 in doloop1308 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
+static void C_ccall f_6896(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
+t2=C_i_cdr(((C_word*)t0)[4]);
t3=((C_word*)((C_word*)t0)[3])[1];
-f_6720(t3,((C_word*)t0)[2],t2);}
+f_6877(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){
+/* k6864 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
+static void C_ccall f_6866(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6866,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6869,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 948 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[532]);}
-/* 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){
+/* k6867 in k6864 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
+static void C_ccall f_6869(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6869,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6872,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 949 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[531]);}
-/* 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){
+/* k6870 in k6867 in k6864 in k6861 in emit-procedure-table-info in k2595 in k2509 in k2506 */
+static void C_ccall f_6872(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 950 gen");
+((C_proc15)C_retrieve_proc(*((C_word*)lf[1]+1)))(15,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[524],C_SCHEME_TRUE,lf[525],C_SCHEME_TRUE,lf[526],C_SCHEME_TRUE,lf[527],C_SCHEME_TRUE,lf[528],C_SCHEME_TRUE,lf[529],C_SCHEME_TRUE,lf[530]);}
-/* ##compiler#generate-code in 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){
+/* ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2599(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8){
C_word tmp;
C_word t9;
C_word t10;
@@ -8787,7 +8825,7 @@ 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);}
+C_save_and_reclaim((void*)tr9,(void*)f_2599,9,t0,t1,t2,t3,t4,t5,t6,t7,t8);}
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
t11=C_SCHEME_UNDEFINED;
@@ -8812,149 +8850,149 @@ 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]);}
+t33=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2602,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t34=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2644,a[2]=t10,tmp=(C_word)a,a+=3,tmp));
+t35=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4525,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
+t36=C_set_block_item(t16,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4694,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp));
+t37=C_set_block_item(t18,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4865,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t38=C_set_block_item(t20,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5205,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t39=C_set_block_item(t22,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5525,a[2]=t2,a[3]=t26,tmp=(C_word)a,a+=4,tmp));
+t40=C_set_block_item(t24,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5580,a[2]=t24,tmp=(C_word)a,a+=3,tmp));
+t41=C_set_block_item(t26,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5774,a[2]=t28,tmp=(C_word)a,a+=3,tmp));
+t42=C_set_block_item(t28,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5916,a[2]=t30,tmp=(C_word)a,a+=3,tmp));
+t43=C_set_block_item(t30,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5993,tmp=(C_word)a,a+=2,tmp));
+t44=C_set_block_item(t32,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6041,a[2]=t4,a[3]=t8,a[4]=t24,a[5]=t22,a[6]=t2,a[7]=t12,tmp=(C_word)a,a+=8,tmp));
+t45=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6826,a[2]=t14,a[3]=t16,a[4]=t18,a[5]=t8,a[6]=t20,a[7]=t32,a[8]=t6,a[9]=t4,a[10]=t1,a[11]=t5,tmp=(C_word)a,a+=12,tmp);
+C_trace("c-backend.scm: 919 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[506]))(4,*((C_word*)lf[506]+1),t45,lf[522],lf[523]);}
-/* 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){
+/* k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6826(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6669,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_6826,2,t0,t1);}
t2=C_mutate((C_word*)lf[0]+1 /* (set! output ...) */,((C_word*)t0)[11]);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6830,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
+C_trace("c-backend.scm: 921 header");
t4=((C_word*)((C_word*)t0)[2])[1];
-f_4410(t4,t3);}
+f_4525(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){
+/* k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6830(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_6830,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6833,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
+C_trace("c-backend.scm: 922 declarations");
t3=((C_word*)((C_word*)t0)[2])[1];
-f_4579(t3,t2);}
+f_4694(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){
+/* k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6833(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]));}
+C_save_and_reclaim((void*)tr2,(void*)f_6833,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6836,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
+C_trace("c-backend.scm: 923 generate-external-variables");
+((C_proc3)C_retrieve_symbol_proc(lf[520]))(3,*((C_word*)lf[520]+1),t2,C_retrieve(lf[521]));}
-/* 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){
+/* k6834 in k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6836(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6836,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6839,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
+C_trace("c-backend.scm: 924 generate-foreign-stubs");
+((C_proc4)C_retrieve_symbol_proc(lf[518]))(4,*((C_word*)lf[518]+1),t2,C_retrieve(lf[519]),((C_word*)t0)[3]);}
-/* 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){
+/* k6837 in k6834 in k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6839(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_6839,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6842,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
+C_trace("c-backend.scm: 925 prototypes");
t3=((C_word*)((C_word*)t0)[2])[1];
-f_4750(t3,t2);}
+f_4865(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){
+/* k6840 in k6837 in k6834 in k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6842(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6842,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6845,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 926 generate-foreign-callback-stubs");
+((C_proc4)C_retrieve_symbol_proc(lf[517]))(4,*((C_word*)lf[517]+1),t2,C_retrieve(lf[207]),((C_word*)t0)[2]);}
-/* 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){
+/* k6843 in k6840 in k6837 in k6834 in k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6845(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_6845,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6848,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 927 trampolines");
t3=((C_word*)((C_word*)t0)[2])[1];
-f_5090(t3,t2);}
+f_5205(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){
+/* k6846 in k6843 in k6840 in k6837 in k6834 in k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6848(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_6848,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6851,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 928 procedures");
t3=((C_word*)((C_word*)t0)[2])[1];
-f_5900(t3,t2);}
+f_6041(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){
+/* k6849 in k6846 in k6843 in k6840 in k6837 in k6834 in k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6851(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6851,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6854,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 929 emit-procedure-table-info");
+((C_proc4)C_retrieve_symbol_proc(lf[516]))(4,*((C_word*)lf[516]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k6852 in k6849 in k6846 in k6843 in k6840 in k6837 in k6834 in k6831 in k6828 in k6824 in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6854(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=((C_word*)t0)[2];
-C_trace("c-backend.scm: 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);}
+C_trace("c-backend.scm: 488 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[515],C_SCHEME_TRUE);}
-/* procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
-static void C_fcall f_5900(C_word t0,C_word t1){
+/* procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_6041(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8962,15 +9000,15 @@ 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);}
+C_save_and_reclaim((void*)trf_6041,NULL,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6047,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp));
t5=((C_word*)t3)[1];
-f_5906(t5,t1,((C_word*)t0)[2]);}
+f_6047(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){
+/* loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_6047(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8979,91 +9017,91 @@ 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");
+C_save_and_reclaim((void*)trf_6047,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6055,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6812,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g10271028");
t6=t3;
-f_5914(t6,t4,t5);}
+f_6055(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){
+/* k6810 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6812(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_6047(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){
+/* g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_6055(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_6055,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6059,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=((C_word*)t0)[6],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
+C_trace("c-backend.scm: 738 lambda-literal-argument-count");
+((C_proc3)C_retrieve_symbol_proc(lf[289]))(3,*((C_word*)lf[289]+1),t3,t2);}
-/* 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){
+/* k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6059(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_6059,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6062,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
+C_trace("c-backend.scm: 739 lambda-literal-id");
((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t2,((C_word*)t0)[6]);}
-/* 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){
+/* k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6062(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6062,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6065,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
+C_trace("c-backend.scm: 740 real-name");
+((C_proc4)C_retrieve_symbol_proc(lf[514]))(4,*((C_word*)lf[514]+1),t2,t1,((C_word*)t0)[2]);}
-/* 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){
+/* k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6065(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6065,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6068,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+C_trace("c-backend.scm: 741 lambda-literal-allocated");
+((C_proc3)C_retrieve_symbol_proc(lf[282]))(3,*((C_word*)lf[282]+1),t2,((C_word*)t0)[6]);}
-/* 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){
+/* k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6068(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6068,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6071,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
+C_trace("c-backend.scm: 742 lambda-literal-rest-argument");
+((C_proc3)C_retrieve_symbol_proc(lf[285]))(3,*((C_word*)lf[285]+1),t2,((C_word*)t0)[7]);}
-/* 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){
+/* k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6071(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9071,67 +9109,67 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_6071,2,t0,t1);}
t2=t1;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_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]);}
+t4=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_6074,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t3,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
+C_trace("c-backend.scm: 743 lambda-literal-customizable");
+((C_proc3)C_retrieve_symbol_proc(lf[288]))(3,*((C_word*)lf[288]+1),t4,((C_word*)t0)[8]);}
-/* 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){
+/* k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6074(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[17],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6074,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6077,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
if(C_truep(t1)){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6809,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 744 lambda-literal-closure-size");
+((C_proc3)C_retrieve_symbol_proc(lf[148]))(3,*((C_word*)lf[148]+1),t3,((C_word*)t0)[8]);}
else{
t3=t2;
-f_5936(t3,C_SCHEME_FALSE);}}
+f_6077(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){
+/* k6807 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6809(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_5936(t2,(C_word)C_eqp(t1,C_fix(0)));}
+f_6077(t2,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){
+/* k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_6077(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[20],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_6077,NULL,2,t0,t1);}
+t2=(C_truep(t1)?C_fixnum_difference(((C_word*)t0)[13],C_fix(1)):C_a_i_minus(&a,2,((C_word*)t0)[13],C_fix(0)));
+t3=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_6083,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=t2,a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[9],a[12]=((C_word*)t0)[10],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[11],a[15]=((C_word*)t0)[12],tmp=(C_word)a,a+=16,tmp);
+C_trace("c-backend.scm: 746 make-variable-list");
+((C_proc4)C_retrieve_symbol_proc(lf[286]))(4,*((C_word*)lf[286]+1),t3,((C_word*)t0)[13],lf[513]);}
-/* 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){
+/* k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6083(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[17],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6083,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_6086,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],tmp=(C_word)a,a+=17,tmp);
+C_trace("c-backend.scm: 747 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t2,((C_word*)t0)[13],lf[512]);}
-/* 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){
+/* k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6086(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9139,19 +9177,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6086,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_6089,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],tmp=(C_word)a,a+=17,tmp);
if(C_truep(((C_word*)t0)[4])){
-t3=(C_word)C_i_cdr(((C_word*)t0)[2]);
-C_trace("c-backend.scm: 721 intersperse");
+t3=C_i_cdr(((C_word*)t0)[2]);
+C_trace("c-backend.scm: 748 intersperse");
((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),t2,t3,C_make_character(44));}
else{
t3=((C_word*)t0)[2];
-C_trace("c-backend.scm: 721 intersperse");
+C_trace("c-backend.scm: 748 intersperse");
((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),t2,t3,C_make_character(44));}}
-/* 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){
+/* k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6089(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9159,404 +9197,418 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6089,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_6092,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=t1,a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],tmp=(C_word)a,a+=17,tmp);
if(C_truep(((C_word*)t0)[4])){
-t3=(C_word)C_i_cdr(((C_word*)t0)[2]);
-C_trace("c-backend.scm: 722 intersperse");
+t3=C_i_cdr(((C_word*)t0)[2]);
+C_trace("c-backend.scm: 749 intersperse");
((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),t2,t3,C_make_character(44));}
else{
t3=((C_word*)t0)[2];
-C_trace("c-backend.scm: 722 intersperse");
+C_trace("c-backend.scm: 749 intersperse");
((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),t2,t3,C_make_character(44));}}
-/* 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){
+/* k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6092(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[18],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6092,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_6095,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],tmp=(C_word)a,a+=18,tmp);
+C_trace("c-backend.scm: 750 lambda-literal-external");
+((C_proc3)C_retrieve_symbol_proc(lf[337]))(3,*((C_word*)lf[337]+1),t2,((C_word*)t0)[12]);}
-/* 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){
+/* k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6095(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[19],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6095,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_6098,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],tmp=(C_word)a,a+=19,tmp);
+C_trace("c-backend.scm: 751 lambda-literal-looping");
+((C_proc3)C_retrieve_symbol_proc(lf[108]))(3,*((C_word*)lf[108]+1),t2,((C_word*)t0)[13]);}
-/* 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){
+/* k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6098(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[20],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6098,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_6101,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],tmp=(C_word)a,a+=20,tmp);
+C_trace("c-backend.scm: 752 lambda-literal-direct");
+((C_proc3)C_retrieve_symbol_proc(lf[283]))(3,*((C_word*)lf[283]+1),t2,((C_word*)t0)[14]);}
-/* 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){
+/* k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6101(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[21],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6101,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_6104,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],tmp=(C_word)a,a+=21,tmp);
+C_trace("c-backend.scm: 753 lambda-literal-rest-argument-mode");
+((C_proc3)C_retrieve_symbol_proc(lf[284]))(3,*((C_word*)lf[284]+1),t2,((C_word*)t0)[15]);}
-/* 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){
+/* k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6104(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[22],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6104,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|21,a[1]=(C_word)f_6107,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],tmp=(C_word)a,a+=22,tmp);
+C_trace("c-backend.scm: 754 lambda-literal-temporaries");
+((C_proc3)C_retrieve_symbol_proc(lf[106]))(3,*((C_word*)lf[106]+1),t2,((C_word*)t0)[16]);}
-/* 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){
+/* k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6107(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[23],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6107,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_6110,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=t1,a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],tmp=(C_word)a,a+=23,tmp);
+C_trace("c-backend.scm: 755 lambda-literal-unboxed-temporaries");
+((C_proc3)C_retrieve_symbol_proc(lf[511]))(3,*((C_word*)lf[511]+1),t2,((C_word*)t0)[17]);}
+
+/* k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6110(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[24],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6110,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6113,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],tmp=(C_word)a,a+=24,tmp);
+if(C_truep(C_retrieve(lf[213]))){
+C_trace("c-backend.scm: 757 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t2,C_retrieve(lf[213]),lf[509]);}
else{
t3=t2;
-f_5969(2,t3,lf[499]);}}
+f_6113(2,t3,lf[510]);}}
-/* 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){
+/* k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6113(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[24],*a=ab;
+C_word ab[25],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6113,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_6116,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],a[23]=((C_word*)t0)[22],a[24]=((C_word*)t0)[23],tmp=(C_word)a,a+=25,tmp);
+if(C_truep(((C_word*)t0)[6])){
+C_trace("c-backend.scm: 759 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[506]))(5,*((C_word*)lf[506]+1),t2,lf[507],lf[508],((C_word*)t0)[15]);}
else{
t3=t2;
-f_5972(2,t3,C_SCHEME_UNDEFINED);}}
+f_6116(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){
+/* k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6116(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[24],*a=ab;
+C_word ab[25],*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_save_and_reclaim((void*)tr2,(void*)f_6116,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_6119,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],a[24]=((C_word*)t0)[24],tmp=(C_word)a,a+=25,tmp);
+C_trace("c-backend.scm: 760 gen");
((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,C_SCHEME_TRUE);}
-/* 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){
+/* k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6119(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[26],*a=ab;
+C_word ab[27],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6119,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6122,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],a[23]=((C_word*)t0)[24],tmp=(C_word)a,a+=24,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6778,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 761 cleanup");
+((C_proc3)C_retrieve_symbol_proc(lf[505]))(3,*((C_word*)lf[505]+1),t3,((C_word*)t0)[2]);}
-/* 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){
+/* k6776 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6778(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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);}
+C_trace("c-backend.scm: 761 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[503],t1,lf[504],C_SCHEME_TRUE);}
-/* 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){
+/* k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6122(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
-C_word ab[29],*a=ab;
+C_word ab[30],*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]);
+C_save_and_reclaim((void*)tr2,(void*)f_6122,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6125,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
+t3=C_eqp(lf[262],((C_word*)t0)[15]);
if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6761,a[2]=((C_word*)t0)[7],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 770 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t4,lf[497]);}
else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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]);}}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6739,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[15],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 763 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t4,lf[502]);}}
-/* 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){
+/* k6737 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6739(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6739,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6742,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 736 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[489]);}
+C_trace("c-backend.scm: 764 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[500]);}
else{
-C_trace("c-backend.scm: 736 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[490]);}}
+C_trace("c-backend.scm: 764 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[501]);}}
-/* 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){
+/* k6740 in k6737 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6742(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6742,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6745,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 738 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[487]);}
+C_trace("c-backend.scm: 766 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[498]);}
else{
-C_trace("c-backend.scm: 739 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[488]);}}
+C_trace("c-backend.scm: 767 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[499]);}}
-/* 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){
+/* k6743 in k6740 in k6737 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6745(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 740 gen");
+C_trace("c-backend.scm: 768 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k6759 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6761(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]))){
+C_save_and_reclaim((void*)tr2,(void*)f_6761,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6764,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_retrieve(lf[213]))){
t3=t2;
-f_6607(2,t3,C_SCHEME_UNDEFINED);}
+f_6764(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]);}}
+C_trace("c-backend.scm: 772 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[496]);}}
-/* 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){
+/* k6762 in k6759 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6764(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 773 gen");
+((C_proc16)C_retrieve_proc(*((C_word*)lf[1]+1)))(16,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[490],C_SCHEME_TRUE,lf[491],C_SCHEME_TRUE,lf[492],C_SCHEME_TRUE,lf[493],((C_word*)t0)[2],lf[494],C_SCHEME_TRUE,C_SCHEME_TRUE,lf[495],((C_word*)t0)[2]);}
-/* 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){
+/* k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6125(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[23],*a=ab;
+C_word ab[24],*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_save_and_reclaim((void*)tr2,(void*)f_6125,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6128,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
+C_trace("c-backend.scm: 778 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(40));}
-/* 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){
+/* k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6128(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[23],*a=ab;
+C_word ab[24],*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])){
+C_save_and_reclaim((void*)tr2,(void*)f_6128,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6131,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
+if(C_truep(((C_word*)t0)[12])){
t3=t2;
-f_5987(2,t3,C_SCHEME_UNDEFINED);}
+f_6131(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]);}}
+C_trace("c-backend.scm: 779 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[489]);}}
-/* 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){
+/* k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6131(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[27],*a=ab;
+C_word ab[28],*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));
+C_save_and_reclaim((void*)tr2,(void*)f_6131,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6134,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6711,a[2]=t2,a[3]=((C_word*)t0)[16],tmp=(C_word)a,a+=4,tmp);
+if(C_truep(((C_word*)t0)[11])){
+t4=C_eqp(((C_word*)t0)[18],C_fix(0));
t5=t3;
-f_6554(t5,(C_word)C_i_not(t4));}
+f_6711(t5,C_i_not(t4));}
else{
t4=t3;
-f_6554(t4,C_SCHEME_FALSE);}}
+f_6711(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){
+/* k6709 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_6711(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6554,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_6711,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6714,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 781 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[488]);}
else{
t2=((C_word*)t0)[2];
-f_5990(2,t2,C_SCHEME_UNDEFINED);}}
+f_6134(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){
+/* k6712 in k6709 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6714(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[3]))){
-C_trace("c-backend.scm: 754 gen");
+if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
+C_trace("c-backend.scm: 782 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(44));}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[2];
-f_5990(2,t3,t2);}}
+f_6134(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){
+/* k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6134(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[23],*a=ab;
+C_word ab[24],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6134,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6137,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
+C_apply(4,0,t2,*((C_word*)lf[1]+1),((C_word*)t0)[16]);}
-/* 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){
+/* k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6137(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[23],*a=ab;
+C_word ab[24],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6137,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6140,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
+if(C_truep(((C_word*)((C_word*)t0)[22])[1])){
+C_trace("c-backend.scm: 784 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[487]);}
else{
t3=t2;
-f_5996(2,t3,C_SCHEME_UNDEFINED);}}
+f_6140(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){
+/* k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6140(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[23],*a=ab;
+C_word ab[24],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6140,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6143,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
+C_trace("c-backend.scm: 785 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[486]);}
-/* 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){
+/* k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6143(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[23],*a=ab;
+C_word ab[24],*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]);
+C_save_and_reclaim((void*)tr2,(void*)f_6143,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6146,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
+t3=C_eqp(((C_word*)t0)[3],lf[251]);
if(C_truep(t3)){
-t4=C_set_block_item(((C_word*)t0)[21],0,C_SCHEME_FALSE);
+t4=C_set_block_item(((C_word*)t0)[22],0,C_SCHEME_FALSE);
t5=t2;
-f_6002(t5,t4);}
+f_6146(t5,t4);}
else{
t4=t2;
-f_6002(t4,C_SCHEME_UNDEFINED);}}
+f_6146(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){
+/* k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_6146(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[23],*a=ab;
+C_word ab[24],*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]);}
+C_save_and_reclaim((void*)trf_6146,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_6149,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],a[23]=((C_word*)t0)[23],tmp=(C_word)a,a+=24,tmp);
+C_trace("c-backend.scm: 787 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[485]);}
-/* 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){
+/* k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6149(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[27],*a=ab;
+C_word t6;
+C_word ab[31],*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));}
+C_save_and_reclaim((void*)tr2,(void*)f_6149,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_6152,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],a[22]=((C_word*)t0)[23],tmp=(C_word)a,a+=23,tmp);
+if(C_truep(((C_word*)((C_word*)t0)[22])[1])){
+C_trace("c-backend.scm: 789 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[474],((C_word*)t0)[21],C_make_character(59));}
else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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));}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6624,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6671,a[2]=((C_word*)t0)[21],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(((C_word*)t0)[4])){
+t5=C_fixnum_decrease(((C_word*)t0)[21]);
+t6=t4;
+f_6671(t6,C_fixnum_plus(((C_word*)t0)[17],t5));}
else{
-t4=t3;
-f_6514(t4,((C_word*)t0)[16]);}}}
+t5=t4;
+f_6671(t5,((C_word*)t0)[17]);}}}
-/* 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){
+/* k6669 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_6671(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9564,15 +9616,15 @@ 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);}
+C_save_and_reclaim((void*)trf_6671,NULL,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6516,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6673,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_6516(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+f_6673(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){
+/* doloop1080 in k6669 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_6673(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -9580,111 +9632,211 @@ 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));
+C_save_and_reclaim((void*)trf_6673,NULL,4,t0,t1,t2,t3);}
+t4=C_eqp(t3,C_fix(0));
if(C_truep(t4)){
t5=C_SCHEME_UNDEFINED;
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
else{
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));}}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6683,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 794 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,lf[484],t2,C_make_character(59));}}
-/* 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){
+/* k6681 in doloop1080 in k6669 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6683(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_fixnum_increase(((C_word*)t0)[5]);
-t3=(C_word)C_fixnum_decrease(((C_word*)t0)[4]);
+t2=C_fixnum_increase(((C_word*)t0)[5]);
+t3=C_fixnum_decrease(((C_word*)t0)[4]);
t4=((C_word*)((C_word*)t0)[3])[1];
-f_6516(t4,((C_word*)t0)[2],t2,t3);}
+f_6673(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){
+/* k6622 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6624(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
+C_word ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6624,2,t0,t1);}
+t2=C_SCHEME_UNDEFINED;
+t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6629,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_6629(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop1090 in k6622 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_6629(C_word t0,C_word t1,C_word t2){
+C_word tmp;
+C_word t3;
+C_word t4;
+C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
-C_word ab[33],*a=ab;
+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*)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{
+C_save_and_reclaim((void*)trf_6629,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6656,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6645,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+t6=C_i_cdr(t4);
+t7=C_eqp(t6,lf[475]);
+if(C_truep(t7)){
+t8=C_i_car(t4);
+C_trace("c-backend.scm: 797 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[476],C_make_character(32),t8,C_make_character(59));}
+else{
+t8=C_eqp(t6,lf[477]);
+if(C_truep(t8)){
+t9=C_i_car(t4);
+C_trace("c-backend.scm: 797 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[478],C_make_character(32),t9,C_make_character(59));}
+else{
+t9=C_eqp(t6,lf[16]);
+if(C_truep(t9)){
+t10=C_i_car(t4);
+C_trace("c-backend.scm: 797 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[479],C_make_character(32),t10,C_make_character(59));}
+else{
+t10=C_eqp(t6,lf[480]);
+if(C_truep(t10)){
+t11=C_i_car(t4);
+C_trace("c-backend.scm: 797 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[481],C_make_character(32),t11,C_make_character(59));}
+else{
+t11=C_eqp(t6,lf[13]);
+if(C_truep(t11)){
+t12=C_i_car(t4);
+C_trace("c-backend.scm: 797 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[482],C_make_character(32),t12,C_make_character(59));}
+else{
+C_trace("c-backend.scm: 733 bomb");
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t5,lf[483],t6);}}}}}}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k6643 in loop1090 in k6622 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6645(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word *a;
+t2=C_i_car(((C_word*)t0)[3]);
+C_trace("c-backend.scm: 797 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,t1,C_make_character(32),t2,C_make_character(59));}
+
+/* k6654 in loop1090 in k6622 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6656(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word *a;
+t2=C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_6629(t3,((C_word*)t0)[2],t2);}
+
+/* k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6152(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word t8;
+C_word t9;
+C_word t10;
+C_word t11;
+C_word ab[32],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6152,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_6155,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[14],a[8]=((C_word*)t0)[15],a[9]=((C_word*)t0)[16],a[10]=((C_word*)t0)[17],a[11]=((C_word*)t0)[18],a[12]=((C_word*)t0)[19],a[13]=((C_word*)t0)[20],a[14]=((C_word*)t0)[21],a[15]=((C_word*)t0)[22],tmp=(C_word)a,a+=16,tmp);
+t3=C_eqp(lf[262],((C_word*)t0)[14]);
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6342,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[17],a[4]=((C_word*)t0)[7],a[5]=t2,a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6417,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 800 fold");
+((C_proc5)C_retrieve_symbol_proc(lf[441]))(5,*((C_word*)lf[441]+1),t4,t5,C_fix(0),((C_word*)t0)[8]);}
+else{
if(C_truep(((C_word*)((C_word*)t0)[21])[1])){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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]);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6431,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[20],a[4]=((C_word*)t0)[17],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 834 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t4,C_SCHEME_TRUE,lf[455]);}
else{
-t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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];
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6495,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[20],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=t2,a[8]=((C_word*)t0)[17],a[9]=((C_word*)t0)[3],tmp=(C_word)a,a+=10,tmp);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6573,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[17],a[4]=t4,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+t6=((C_word*)t0)[10];
if(C_truep(t6)){
t7=t5;
-f_6459(t7,C_SCHEME_FALSE);}
+f_6573(t7,C_SCHEME_FALSE);}
else{
t7=((C_word*)t0)[17];
t8=t5;
-f_6459(t8,(C_word)C_fixnum_greaterp(t7,C_fix(0)));}}}}
+f_6573(t8,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){
+/* k6571 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_6573(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6459,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_6573,NULL,2,t0,t1);}
if(C_truep(t1)){
if(C_truep(((C_word*)t0)[5])){
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 848 gen");
+((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),((C_word*)t0)[4],C_SCHEME_TRUE,lf[465],C_SCHEME_TRUE,lf[466],C_SCHEME_TRUE,lf[467],((C_word*)t0)[3],lf[468]);}
else{
-C_trace("c-backend.scm: 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]);}}
+C_trace("c-backend.scm: 851 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[4],C_SCHEME_TRUE,lf[469],((C_word*)t0)[3],lf[470]);}}
else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6585,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
if(C_truep(((C_word*)t0)[2])){
t3=t2;
-f_6471(2,t3,C_SCHEME_UNDEFINED);}
+f_6585(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]);}}}
+C_trace("c-backend.scm: 853 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[473]);}}}
-/* 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){
+/* k6583 in k6571 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6585(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+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: 821 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[470]);}
+C_trace("c-backend.scm: 854 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[472]);}
else{
t3=t2;
-f_6474(2,t3,C_SCHEME_UNDEFINED);}}
+f_6588(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){
+/* k6586 in k6583 in k6571 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6588(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9694,27 +9846,27 @@ C_word t6;
C_word t7;
C_word *a;
if(C_truep(((C_word*)t0)[3])){
-t2=C_retrieve(lf[129]);
+t2=C_retrieve(lf[131]);
if(C_truep(t2)){
t3=C_SCHEME_UNDEFINED;
t4=((C_word*)t0)[2];
-f_6381(2,t4,t3);}
+f_6495(2,t4,t3);}
else{
-t3=C_retrieve(lf[433]);
+t3=C_retrieve(lf[435]);
if(C_truep(t3)){
t4=C_SCHEME_UNDEFINED;
t5=((C_word*)t0)[2];
-f_6381(2,t5,t4);}
+f_6495(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]);}}}
+C_trace("c-backend.scm: 858 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[471]);}}}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[2];
-f_6381(2,t3,t2);}}
+f_6495(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){
+/* k6493 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6495(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9723,48 +9875,48 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6495,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6498,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6537,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
if(C_truep(((C_word*)t0)[5])){
-t4=C_retrieve(lf[129]);
+t4=C_retrieve(lf[131]);
if(C_truep(t4)){
t5=t3;
-f_6423(t5,C_SCHEME_FALSE);}
+f_6537(t5,C_SCHEME_FALSE);}
else{
-t5=C_retrieve(lf[447]);
+t5=C_retrieve(lf[449]);
t6=t3;
-f_6423(t6,(C_truep(t5)?C_SCHEME_FALSE:(C_word)C_i_not(((C_word*)t0)[2])));}}
+f_6537(t6,(C_truep(t5)?C_SCHEME_FALSE:C_i_not(((C_word*)t0)[2])));}}
else{
t4=t3;
-f_6423(t4,C_SCHEME_FALSE);}}
+f_6537(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){
+/* k6535 in k6493 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_6537(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
if(C_truep(t1)){
-t2=(C_word)C_eqp(((C_word*)t0)[4],lf[245]);
+t2=C_eqp(((C_word*)t0)[4],lf[251]);
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]);}
+if(C_truep(C_fixnum_greaterp(t3,C_fix(2)))){
+C_trace("c-backend.scm: 862 gen");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[459],((C_word*)t0)[3],lf[460],((C_word*)t0)[3],lf[461]);}
else{
t4=((C_word*)t0)[2];
-f_6384(2,t4,C_SCHEME_UNDEFINED);}}
+f_6498(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]);}}
+C_trace("c-backend.scm: 863 gen");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[462],((C_word*)t0)[3],lf[463],((C_word*)t0)[3],lf[464]);}}
else{
t2=((C_word*)t0)[2];
-f_6384(2,t2,C_SCHEME_UNDEFINED);}}
+f_6498(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){
+/* k6496 in k6493 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6498(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9773,86 +9925,86 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6498,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6504,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
t3=((C_word*)t0)[3];
if(C_truep(t3)){
t4=t2;
-f_6390(t4,C_SCHEME_FALSE);}
+f_6504(t4,C_SCHEME_FALSE);}
else{
if(C_truep(((C_word*)t0)[2])){
t4=((C_word*)t0)[2];
t5=t2;
-f_6390(t5,t4);}
+f_6504(t5,t4);}
else{
t4=((C_word*)t0)[5];
t5=t2;
-f_6390(t5,(C_word)C_fixnum_greaterp(t4,C_fix(0)));}}}
+f_6504(t5,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){
+/* k6502 in k6496 in k6493 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_6504(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6390,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_6504,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6507,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_retrieve(lf[444]))){
+C_trace("c-backend.scm: 865 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[458]);}
else{
t3=t2;
-f_6393(2,t3,C_SCHEME_UNDEFINED);}}
+f_6507(2,t3,C_SCHEME_UNDEFINED);}}
else{
t2=((C_word*)t0)[2];
-f_6011(2,t2,C_SCHEME_UNDEFINED);}}
+f_6155(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){
+/* k6505 in k6502 in k6496 in k6493 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6507(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(C_truep(((C_word*)t0)[4])){
t2=((C_word*)t0)[3];
-if(C_truep((C_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]);}
+if(C_truep(C_fixnum_greaterp(t2,C_fix(0)))){
+C_trace("c-backend.scm: 867 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[456]);}
else{
-C_trace("c-backend.scm: 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]);}}
+C_trace("c-backend.scm: 868 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[457]);}}
else{
-C_trace("c-backend.scm: 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]);}}
+C_trace("c-backend.scm: 868 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[457]);}}
-/* 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){
+/* k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6431(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6431,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6434,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 835 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[454]);}
-/* 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){
+/* k6432 in k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6434(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6434,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6437,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 836 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[453]);}
-/* 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){
+/* k6435 in k6432 in k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6437(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9860,31 +10012,31 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6437,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6440,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
t3=((C_word*)t0)[3];
-if(C_truep((C_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");
+if(C_truep(C_fixnum_greaterp(t3,C_fix(0)))){
+t4=C_fixnum_difference(((C_word*)t0)[3],C_fix(1));
+C_trace("c-backend.scm: 838 gen");
((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_make_character(116),t4);}
else{
-C_trace("c-backend.scm: 806 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[450]);}}
+C_trace("c-backend.scm: 839 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[452]);}}
-/* 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){
+/* k6438 in k6435 in k6432 in k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6440(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6440,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6443,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 840 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[450],((C_word*)t0)[3],lf[451]);}
-/* 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){
+/* k6441 in k6438 in k6435 in k6432 in k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6443(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9895,114 +10047,114 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_6443,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6446,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6458,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=C_retrieve(lf[131]);
if(C_truep(t4)){
t5=t3;
-f_6344(t5,C_SCHEME_FALSE);}
+f_6458(t5,C_SCHEME_FALSE);}
else{
-t5=C_retrieve(lf[447]);
+t5=C_retrieve(lf[449]);
if(C_truep(t5)){
t6=t3;
-f_6344(t6,C_SCHEME_FALSE);}
+f_6458(t6,C_SCHEME_FALSE);}
else{
t6=((C_word*)t0)[3];
-t7=(C_word)C_fixnum_greaterp(t6,C_fix(2));
+t7=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));}}}
+f_6458(t8,(C_truep(t7)?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){
+/* k6456 in k6441 in k6438 in k6435 in k6432 in k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_6458(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 842 gen");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[446],((C_word*)t0)[2],lf[447],((C_word*)t0)[2],lf[448]);}
else{
t2=((C_word*)t0)[3];
-f_6332(2,t2,C_SCHEME_UNDEFINED);}}
+f_6446(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){
+/* k6444 in k6441 in k6438 in k6435 in k6432 in k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6446(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6446,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6449,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_retrieve(lf[444]))){
+C_trace("c-backend.scm: 843 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[445]);}
else{
-C_trace("c-backend.scm: 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]);}}
+C_trace("c-backend.scm: 844 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[442],((C_word*)t0)[2],lf[443]);}}
-/* 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){
+/* k6447 in k6444 in k6441 in k6438 in k6435 in k6432 in k6429 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6449(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 844 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[442],((C_word*)t0)[2],lf[443]);}
-/* 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){
+/* a6416 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6417(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[4],*a=ab;
if(c!=4) C_bad_argc_2(c,4,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_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");
+C_save_and_reclaim((void*)tr4,(void*)f_6417,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6425,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 800 literal-size");
t5=((C_word*)((C_word*)t0)[2])[1];
-f_5475(t5,t4,t2);}
+f_5580(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){
+/* k6423 in a6416 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6425(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_fixnum_plus(((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6342(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6342,2,t0,t1);}
+t2=C_i_length(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6348,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 802 gen");
+((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[437],C_SCHEME_TRUE,lf[438],C_SCHEME_TRUE,lf[439],((C_word*)t0)[2],lf[440]);}
-/* 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){
+/* k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6348(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6348,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6351,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+if(C_truep(C_retrieve(lf[435]))){
+C_trace("c-backend.scm: 806 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[436]);}
else{
t3=t2;
-f_6237(2,t3,C_SCHEME_UNDEFINED);}}
+f_6351(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){
+/* k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6351(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10010,109 +10162,109 @@ 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]))){
+C_save_and_reclaim((void*)tr2,(void*)f_6351,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6354,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+if(C_truep(C_retrieve(lf[213]))){
t3=t2;
-f_6240(2,t3,C_SCHEME_UNDEFINED);}
+f_6354(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]);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6385,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_retrieve(lf[428]))){
+C_trace("c-backend.scm: 809 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[429],C_retrieve(lf[428]),lf[430]);}
else{
-if(C_truep(C_retrieve(lf[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]);}
+if(C_truep(C_retrieve(lf[431]))){
+C_trace("c-backend.scm: 811 gen");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[432],C_retrieve(lf[431]),lf[433],C_SCHEME_TRUE,lf[434]);}
else{
t4=C_SCHEME_UNDEFINED;
t5=t3;
-f_6271(2,t5,t4);}}}}
+f_6385(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){
+/* k6383 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6385(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_6385,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6388,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_retrieve(lf[426]))){
+C_trace("c-backend.scm: 814 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[427],C_retrieve(lf[426]),C_make_character(59));}
else{
t3=t2;
-f_6274(2,t3,C_SCHEME_UNDEFINED);}}
+f_6388(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){
+/* k6386 in k6383 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6388(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_6388,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6391,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_retrieve(lf[424]))){
+C_trace("c-backend.scm: 816 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[425],C_retrieve(lf[424]),C_make_character(59));}
else{
t3=t2;
-f_6277(2,t3,C_SCHEME_UNDEFINED);}}
+f_6391(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){
+/* k6389 in k6386 in k6383 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6391(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-if(C_truep(C_retrieve(lf[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]);}
+if(C_truep(C_retrieve(lf[421]))){
+C_trace("c-backend.scm: 818 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[422],C_retrieve(lf[421]),lf[423]);}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[2];
-f_6240(2,t3,t2);}}
+f_6354(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){
+/* k6352 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6354(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6354,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6357,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 819 gen");
+((C_proc16)C_retrieve_proc(*((C_word*)lf[1]+1)))(16,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[414],((C_word*)t0)[3],lf[415],C_SCHEME_TRUE,lf[416],((C_word*)t0)[3],lf[417],C_SCHEME_TRUE,lf[418],C_SCHEME_TRUE,lf[419],C_SCHEME_TRUE,lf[420]);}
-/* 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){
+/* k6355 in k6352 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6357(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6357,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6360,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 824 gen");
+((C_proc14)C_retrieve_proc(*((C_word*)lf[1]+1)))(14,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[408],((C_word*)t0)[2],lf[409],C_SCHEME_TRUE,lf[410],C_SCHEME_TRUE,lf[411],((C_word*)t0)[2],lf[412],C_SCHEME_TRUE,lf[413]);}
-/* 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){
+/* k6358 in k6355 in k6352 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6360(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6360,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6363,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 828 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[406],((C_word*)t0)[2],lf[407]);}
-/* 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){
+/* k6361 in k6358 in k6355 in k6352 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6363(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10120,40 +10272,40 @@ 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));
+C_save_and_reclaim((void*)tr2,(void*)f_6363,2,t0,t1);}
+t2=C_eqp(((C_word*)t0)[4],C_fix(0));
if(C_truep(t2)){
t3=C_SCHEME_UNDEFINED;
t4=((C_word*)t0)[3];
-f_6011(2,t4,t3);}
+f_6155(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]);}}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6372,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 830 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[404],((C_word*)t0)[4],lf[405]);}}
-/* 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){
+/* k6370 in k6361 in k6358 in k6355 in k6352 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6372(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_6372,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6375,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 831 literal-frame");
t3=((C_word*)((C_word*)t0)[2])[1];
-f_5420(t3,t2);}
+f_5525(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){
+/* k6373 in k6370 in k6361 in k6358 in k6355 in k6352 in k6349 in k6346 in k6340 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6375(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 832 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[402],((C_word*)t0)[2],lf[403]);}
-/* 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){
+/* k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6155(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10163,223 +10315,189 @@ C_word t6;
C_word t7;
C_word t8;
C_word t9;
-C_word ab[20],*a=ab;
+C_word ab[19],*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]);
+C_save_and_reclaim((void*)tr2,(void*)f_6155,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6158,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[14],a[6]=((C_word*)t0)[15],tmp=(C_word)a,a+=7,tmp);
+t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6178,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[13],a[9]=t2,a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[14],tmp=(C_word)a,a+=12,tmp);
+t4=C_eqp(lf[262],((C_word*)t0)[7]);
if(C_truep(t4)){
t5=t3;
-f_6034(t5,C_SCHEME_FALSE);}
+f_6178(t5,C_SCHEME_FALSE);}
else{
t5=((C_word*)t0)[3];
if(C_truep(t5)){
t6=t3;
-f_6034(t6,C_SCHEME_FALSE);}
+f_6178(t6,C_SCHEME_FALSE);}
else{
-t6=((C_word*)((C_word*)t0)[15])[1];
+t6=((C_word*)((C_word*)t0)[14])[1];
if(C_truep(t6)){
t7=t3;
-f_6034(t7,t6);}
+f_6178(t7,t6);}
else{
if(C_truep(((C_word*)t0)[2])){
t7=((C_word*)t0)[2];
t8=t3;
-f_6034(t8,t7);}
+f_6178(t8,t7);}
else{
-t7=((C_word*)t0)[11];
+t7=((C_word*)t0)[10];
t8=t3;
-f_6034(t8,(C_word)C_fixnum_greaterp(t7,C_fix(0)));}}}}}
+f_6178(t8,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){
+/* k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_6178(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[11],*a=ab;
+C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6034,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_6178,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));}
+if(C_truep(((C_word*)((C_word*)t0)[11])[1])){
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6184,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
+if(C_truep(C_fixnum_greaterp(((C_word*)t0)[4],C_fix(0)))){
+C_trace("c-backend.scm: 879 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[393],lf[394],((C_word*)t0)[8],C_make_character(114));}
else{
-C_trace("c-backend.scm: 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));}}
+C_trace("c-backend.scm: 879 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[395],lf[394],((C_word*)t0)[8],C_make_character(114));}}
else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6283,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
+if(C_truep(C_fixnum_greaterp(((C_word*)t0)[4],C_fix(0)))){
+C_trace("c-backend.scm: 902 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[399],lf[400]);}
else{
-C_trace("c-backend.scm: 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]);}}}
+C_trace("c-backend.scm: 902 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[401],lf[400]);}}}
else{
-t2=((C_word*)t0)[10];
-f_6014(2,t2,C_SCHEME_UNDEFINED);}}
+t2=((C_word*)t0)[9];
+f_6158(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){
+/* k6281 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6283(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6283,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6286,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
if(C_truep(((C_word*)t0)[4])){
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 904 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,((C_word*)t0)[3],lf[397]);}
else{
-C_trace("c-backend.scm: 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]);}}
+C_trace("c-backend.scm: 905 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,((C_word*)t0)[2],lf[398],((C_word*)t0)[3]);}}
-/* 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){
+/* k6284 in k6281 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6286(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_6286,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6289,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_fixnum_greaterp(((C_word*)t0)[3],C_fix(0)))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6298,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 907 gen");
((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t3,C_make_character(44),((C_word*)t0)[3],C_make_character(44));}
else{
-C_trace("c-backend.scm: 877 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[4],lf[394]);}}
+C_trace("c-backend.scm: 909 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[4],lf[396]);}}
-/* 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){
+/* k6296 in k6284 in k6281 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6298(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_apply(4,0,((C_word*)t0)[3],*((C_word*)lf[1]+1),((C_word*)t0)[2]);}
-/* 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){
+/* k6287 in k6284 in k6281 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6289(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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);}}
+C_trace("c-backend.scm: 909 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[396]);}
-/* 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){
+/* k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6184(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[11],*a=ab;
+C_word ab[10],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6184,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6187,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
+C_trace("c-backend.scm: 880 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[391],((C_word*)t0)[4],lf[392]);}
-/* 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){
+/* k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6187(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[13],*a=ab;
+C_word ab[12],*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_save_and_reclaim((void*)tr2,(void*)f_6187,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6190,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
+if(C_truep(C_fixnum_greaterp(((C_word*)t0)[3],C_fix(0)))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6270,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 882 gen");
((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t3,C_make_character(44),((C_word*)t0)[3],C_make_character(44));}
else{
t3=t2;
-f_6049(2,t3,C_SCHEME_UNDEFINED);}}
+f_6190(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){
+/* k6268 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6270(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_apply(4,0,((C_word*)t0)[3],*((C_word*)lf[1]+1),((C_word*)t0)[2]);}
-/* 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){
+/* k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6190(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[9],*a=ab;
+C_word ab[8],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6190,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6193,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+C_trace("c-backend.scm: 884 gen");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[1]+1)))(9,*((C_word*)lf[1]+1),t2,lf[387],C_SCHEME_TRUE,lf[388],C_SCHEME_TRUE,lf[389],((C_word*)t0)[5],lf[390]);}
-/* 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){
+/* k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6193(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word 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);}}}
+C_save_and_reclaim((void*)tr2,(void*)f_6193,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6196,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+C_trace("c-backend.scm: 887 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[385],((C_word*)t0)[5],lf[386]);}
-/* 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){
+/* k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6196(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6196,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6199,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+C_trace("c-backend.scm: 888 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,((C_word*)t0)[2],lf[384]);}
-/* 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){
+/* k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6199(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10387,89 +10505,89 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6199,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6202,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6260,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6264,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 889 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t4,((C_word*)t0)[5],lf[383]);}
-/* 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){
+/* k6262 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6264(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 857 intersperse");
+C_trace("c-backend.scm: 889 intersperse");
((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t1,C_make_character(44));}
-/* 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){
+/* k6258 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6260(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[1]+1),t1);}
-/* 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){
+/* k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6202(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6202,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6205,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+C_trace("c-backend.scm: 890 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[381],((C_word*)t0)[5],lf[382]);}
-/* 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){
+/* k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6205(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6205,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6208,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 892 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[379],((C_word*)t0)[2],lf[380]);}
-/* 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){
+/* k6206 in k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6208(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_6208,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6211,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
C_apply(4,0,t2,*((C_word*)lf[1]+1),((C_word*)t0)[2]);}
-/* 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){
+/* k6209 in k6206 in k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6211(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6211,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6214,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 894 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[377],((C_word*)t0)[3],lf[378]);}
-/* 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){
+/* k6212 in k6209 in k6206 in k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6214(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6214,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6217,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 895 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[376]);}
-/* 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){
+/* k6215 in k6212 in k6209 in k6206 in k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6217(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10479,17 +10597,17 @@ 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));
+C_save_and_reclaim((void*)tr2,(void*)f_6217,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6220,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t3=C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6094,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6235,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
t7=((C_word*)t5)[1];
-f_6094(t7,t2,t3,((C_word*)t0)[2]);}
+f_6235(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){
+/* doloop1230 in k6215 in k6212 in k6209 in k6206 in k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_6235(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -10497,145 +10615,145 @@ 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));
+C_save_and_reclaim((void*)trf_6235,NULL,4,t0,t1,t2,t3);}
+t4=C_eqp(t3,C_fix(0));
if(C_truep(t4)){
t5=C_SCHEME_UNDEFINED;
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
else{
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));}}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6245,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 899 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,lf[375],t2,C_make_character(59));}}
-/* 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){
+/* k6243 in doloop1230 in k6215 in k6212 in k6209 in k6206 in k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6245(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
-t3=(C_word)C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
+t2=C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
+t3=C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
t4=((C_word*)((C_word*)t0)[3])[1];
-f_6094(t4,((C_word*)t0)[2],t2,t3);}
+f_6235(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){
+/* k6218 in k6215 in k6212 in k6209 in k6206 in k6203 in k6200 in k6197 in k6194 in k6191 in k6188 in k6185 in k6182 in k6176 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6220(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=((C_word*)t0)[3];
-if(C_truep((C_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]);}
+if(C_truep(C_fixnum_greaterp(t2,C_fix(0)))){
+C_trace("c-backend.scm: 900 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[373],((C_word*)t0)[3],lf[374]);}
else{
t3=((C_word*)t0)[2];
-f_6014(2,t3,C_SCHEME_UNDEFINED);}}
+f_6158(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){
+/* k6156 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6158(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6158,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6161,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6168,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 911 lambda-literal-body");
+((C_proc3)C_retrieve_symbol_proc(lf[372]))(3,*((C_word*)lf[372]+1),t3,((C_word*)t0)[2]);}
-/* 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){
+/* k6166 in k6156 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6168(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t2=(C_word)C_fixnum_increase(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 878 expression");
+t2=C_fixnum_increase(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 910 expression");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_2622(t3,((C_word*)t0)[3],t1,t2,((C_word*)t0)[2]);}
+f_2644(t3,((C_word*)t0)[3],t1,t2,((C_word*)t0)[2]);}
else{
t2=((C_word*)t0)[5];
-C_trace("c-backend.scm: 878 expression");
+C_trace("c-backend.scm: 910 expression");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_2622(t3,((C_word*)t0)[3],t1,t2,((C_word*)t0)[2]);}}
+f_2644(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){
+/* k6159 in k6156 in k6153 in k6150 in k6147 in k6144 in k6141 in k6138 in k6135 in k6132 in k6129 in k6126 in k6123 in k6120 in k6117 in k6114 in k6111 in k6108 in k6105 in k6102 in k6099 in k6096 in k6093 in k6090 in k6087 in k6084 in k6081 in k6075 in k6072 in k6069 in k6066 in k6063 in k6060 in k6057 in g1027 in loop1020 in procedures in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6161(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 884 gen");
+C_trace("c-backend.scm: 916 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(125));}
-/* string-like-substring in ##compiler#generate-code in k2573 in k2487 in k2484 */
-static void C_fcall f_5888(C_word t1,C_word t2,C_word t3,C_word t4){
+/* string-like-substring in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5993(C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_5993,NULL,4,t1,t2,t3,t4);}
+t5=C_fixnum_difference(t4,t3);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6000,a[2]=t5,a[3]=t3,a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 722 make-string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[371]+1)))(3,*((C_word*)lf[371]+1),t6,t5);}
-/* 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){
+/* k5998 in string-like-substring in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6000(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6000,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6003,a[2]=t1,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 723 ##sys#copy-bytes");
+((C_proc7)C_retrieve_symbol_proc(lf[370]))(7,*((C_word*)lf[370]+1),t2,((C_word*)t0)[4],t1,((C_word*)t0)[3],C_fix(0),((C_word*)t0)[2]);}
-/* 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){
+/* k6001 in k5998 in string-like-substring in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_6003(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-/* gen-string-constant in ##compiler#generate-code in k2573 in k2487 in k2484 */
-static void C_fcall f_5811(C_word t0,C_word t1,C_word t2){
+/* gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5916(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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));}
+C_save_and_reclaim((void*)trf_5916,NULL,3,t0,t1,t2);}
+t3=C_block_size(t2);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5923,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 711 fx/");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[369]+1)))(4,*((C_word*)lf[369]+1),t4,t3,C_fix(80));}
-/* 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){
+/* k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5923(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_5923,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5926,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 712 modulo");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[368]+1)))(4,*((C_word*)lf[368]+1),t2,((C_word*)t0)[5],C_fix(80));}
-/* 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){
+/* k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5926(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10643,15 +10761,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5926,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5931,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp));
t5=((C_word*)t3)[1];
-f_5826(t5,((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0));}
+f_5931(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){
+/* doloop990 in k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5931(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -10664,132 +10782,132 @@ 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));
+C_save_and_reclaim((void*)trf_5931,NULL,4,t0,t1,t2,t3);}
+t4=C_eqp(t2,C_fix(0));
if(C_truep(t4)){
-t5=(C_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);
+t5=C_eqp(((C_word*)t0)[6],C_fix(0));
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5947,a[2]=((C_word*)t0)[6],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
if(C_truep(t5)){
t7=t6;
-f_5842(t7,t5);}
+f_5947(t7,t5);}
else{
-t7=(C_word)C_eqp(((C_word*)t0)[3],C_fix(0));
+t7=C_eqp(((C_word*)t0)[3],C_fix(0));
t8=t6;
-f_5842(t8,(C_word)C_i_not(t7));}}
+f_5947(t8,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);}}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5968,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5983,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5987,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
+t8=C_fixnum_plus(t3,C_fix(80));
+C_trace("c-backend.scm: 718 string-like-substring");
+f_5993(t7,((C_word*)t0)[4],t3,t8);}}
-/* 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){
+/* k5985 in doloop990 in k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5987(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 700 c-ify-string");
-((C_proc3)C_retrieve_symbol_proc(lf[71]))(3,*((C_word*)lf[71]+1),((C_word*)t0)[2],t1);}
+C_trace("c-backend.scm: 718 c-ify-string");
+((C_proc3)C_retrieve_symbol_proc(lf[72]))(3,*((C_word*)lf[72]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k5981 in doloop990 in k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5983(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 700 gen");
+C_trace("c-backend.scm: 718 gen");
((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],t1,C_SCHEME_TRUE);}
-/* 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){
+/* k5966 in doloop990 in k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5968(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_fixnum_decrease(((C_word*)t0)[5]);
-t3=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(80));
+t2=C_fixnum_decrease(((C_word*)t0)[5]);
+t3=C_fixnum_plus(((C_word*)t0)[4],C_fix(80));
t4=((C_word*)((C_word*)t0)[3])[1];
-f_5826(t4,((C_word*)t0)[2],t2,t3);}
+f_5931(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){
+/* k5945 in doloop990 in k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5947(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5842,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_5947,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5954,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5958,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 717 string-like-substring");
+f_5993(t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
else{
t2=((C_word*)t0)[6];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}}
-/* 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){
+/* k5956 in k5945 in doloop990 in k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5958(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 699 c-ify-string");
-((C_proc3)C_retrieve_symbol_proc(lf[71]))(3,*((C_word*)lf[71]+1),((C_word*)t0)[2],t1);}
+C_trace("c-backend.scm: 717 c-ify-string");
+((C_proc3)C_retrieve_symbol_proc(lf[72]))(3,*((C_word*)lf[72]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k5952 in k5945 in doloop990 in k5924 in k5921 in gen-string-constant in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5954(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 699 gen");
+C_trace("c-backend.scm: 717 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],t1);}
-/* gen-lit in ##compiler#generate-code in k2573 in k2487 in k2484 */
-static void C_fcall f_5669(C_word t0,C_word t1,C_word t2,C_word t3){
+/* gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5774(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_5774,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5781,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_fixnump(t2))){
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5914,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 684 big-fixnum?");
+((C_proc3)C_retrieve_symbol_proc(lf[367]))(3,*((C_word*)lf[367]+1),t5,t2);}
else{
t5=t4;
-f_5676(t5,C_SCHEME_FALSE);}}
+f_5781(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){
+/* k5912 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5914(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_5676(t2,(C_word)C_i_not(t1));}
+f_5781(t2,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){
+/* k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5781(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5676,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_5781,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]);}
+C_trace("c-backend.scm: 685 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[4],lf[352],((C_word*)t0)[3],lf[353]);}
else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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]);}}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5787,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 686 block-variable-literal?");
+((C_proc3)C_retrieve_symbol_proc(lf[350]))(3,*((C_word*)lf[350]+1),t2,((C_word*)t0)[3]);}}
-/* 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){
+/* k5785 in k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5787(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10804,58 +10922,58 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5787,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[5];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
else{
-t2=C_retrieve(lf[349]);
-t3=(C_word)C_eqp(((C_word*)t0)[4],t2);
+t2=C_retrieve(lf[354]);
+t3=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]);}
+C_trace("c-backend.scm: 688 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[3],lf[355]);}
else{
-if(C_truep((C_word)C_booleanp(((C_word*)t0)[4]))){
+if(C_truep(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));}
+C_trace("c-backend.scm: 690 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[3],C_make_character(61),lf[356],C_make_character(59));}
else{
-C_trace("c-backend.scm: 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));}}
+C_trace("c-backend.scm: 690 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[3],C_make_character(61),lf[357],C_make_character(59));}}
else{
-if(C_truep((C_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]);}
+if(C_truep(C_charp(((C_word*)t0)[4]))){
+t4=C_fix(C_character_code(((C_word*)t0)[4]));
+C_trace("c-backend.scm: 692 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[3],lf[358],t4,lf[359]);}
else{
-if(C_truep((C_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);}
+if(C_truep(C_i_symbolp(((C_word*)t0)[4]))){
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5837,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 695 c-ify-string");
+((C_proc3)C_retrieve_symbol_proc(lf[72]))(3,*((C_word*)lf[72]+1),t5,t4);}
else{
-if(C_truep((C_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]);}
+if(C_truep(C_i_nullp(((C_word*)t0)[4]))){
+C_trace("c-backend.scm: 700 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_SCHEME_TRUE,((C_word*)t0)[3],lf[363]);}
else{
-t4=(C_word)C_immp(((C_word*)t0)[4]);
-t5=(C_truep(t4)?C_SCHEME_FALSE:(C_word)C_lambdainfop(((C_word*)t0)[4]));
+t4=C_immp(((C_word*)t0)[4]);
+t5=(C_truep(t4)?C_SCHEME_FALSE:C_lambdainfop(((C_word*)t0)[4]));
if(C_truep(t5)){
t6=((C_word*)t0)[5];
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
else{
-t6=(C_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);
+t6=C_fixnump(((C_word*)t0)[4]);
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5870,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
if(C_truep(t6)){
t8=t7;
-f_5765(t8,t6);}
+f_5870(t8,t6);}
else{
-t8=(C_word)C_immp(((C_word*)t0)[4]);
+t8=C_immp(((C_word*)t0)[4]);
t9=t7;
-f_5765(t9,(C_word)C_i_not(t8));}}}}}}}}}
+f_5870(t9,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){
+/* k5868 in k5785 in k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5870(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10863,84 +10981,84 @@ 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);}
+C_save_and_reclaim((void*)trf_5870,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5873,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 704 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,((C_word*)t0)[2],lf[366]);}
else{
t2=((C_word*)t0)[5];
t3=((C_word*)t0)[3];
-C_trace("c-backend.scm: 643 bomb");
-((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t2,lf[342],t3);}}
+C_trace("c-backend.scm: 661 bomb");
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t2,lf[347],t3);}}
-/* 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){
+/* k5871 in k5868 in k5785 in k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5873(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5873,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5876,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5883,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 705 encode-literal");
+((C_proc3)C_retrieve_symbol_proc(lf[365]))(3,*((C_word*)lf[365]+1),t3,((C_word*)t0)[2]);}
-/* 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){
+/* k5881 in k5871 in k5868 in k5785 in k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5883(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 687 gen-string-constant");
+C_trace("c-backend.scm: 705 gen-string-constant");
t2=((C_word*)((C_word*)t0)[3])[1];
-f_5811(t2,((C_word*)t0)[2],t1);}
+f_5916(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){
+/* k5874 in k5871 in k5868 in k5785 in k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5876(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 688 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[359]);}
+C_trace("c-backend.scm: 706 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[364]);}
-/* 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){
+/* k5835 in k5785 in k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5837(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5837,2,t0,t1);}
+t2=C_block_size(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5843,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 697 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,((C_word*)t0)[2],lf[362]);}
-/* 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){
+/* k5841 in k5835 in k5785 in k5779 in gen-lit in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5843(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 698 gen");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[1]+1)))(9,*((C_word*)lf[1]+1),((C_word*)t0)[5],lf[360],((C_word*)t0)[4],C_make_character(44),((C_word*)t0)[3],C_make_character(44),((C_word*)t0)[2],lf[361]);}
-/* literal-size in ##compiler#generate-code in k2573 in k2487 in k2484 */
-static void C_fcall f_5475(C_word t0,C_word t1,C_word t2){
+/* literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5580(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_5580,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5587,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 664 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[351]))(3,*((C_word*)lf[351]+1),t3,t2);}
-/* 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){
+/* k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5587(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10957,49 +11075,49 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5587,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(0));}
else{
-if(C_truep((C_word)C_i_stringp(((C_word*)t0)[3]))){
+if(C_truep(C_i_stringp(((C_word*)t0)[3]))){
t2=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(0));}
else{
-if(C_truep((C_word)C_i_numberp(((C_word*)t0)[3]))){
-t2=C_retrieve(lf[338]);
+if(C_truep(C_i_numberp(((C_word*)t0)[3]))){
+t2=C_retrieve(lf[343]);
t3=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-if(C_truep((C_word)C_i_symbolp(((C_word*)t0)[3]))){
+if(C_truep(C_i_symbolp(((C_word*)t0)[3]))){
t2=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(10));}
else{
-if(C_truep((C_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");
+if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5618,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+t3=C_i_car(((C_word*)t0)[3]);
+C_trace("c-backend.scm: 668 literal-size");
t4=((C_word*)((C_word*)t0)[2])[1];
-f_5475(t4,t2,t3);}
+f_5580(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);
+if(C_truep(C_i_vectorp(((C_word*)t0)[3]))){
+t2=C_i_vector_length(((C_word*)t0)[3]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5647,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t4=C_SCHEME_END_OF_LIST;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_FALSE;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5651,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5655,a[2]=t8,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 669 vector->list");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[346]+1)))(3,*((C_word*)lf[346]+1),t9,((C_word*)t0)[3]);}
else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}}}}}}}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5696,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 670 block-variable-literal?");
+((C_proc3)C_retrieve_symbol_proc(lf[350]))(3,*((C_word*)lf[350]+1),t2,((C_word*)t0)[3]);}}}}}}}
-/* 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){
+/* k5694 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5696(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11007,27 +11125,27 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5696,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(0));}
else{
-if(C_truep((C_word)C_immp(((C_word*)t0)[3]))){
+if(C_truep(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);}
+C_trace("c-backend.scm: 661 bomb");
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t2,lf[347],t3);}
else{
-if(C_truep((C_word)C_lambdainfop(((C_word*)t0)[3]))){
+if(C_truep(C_lambdainfop(((C_word*)t0)[3]))){
t2=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(0));}
else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}}}}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5714,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 673 ##sys#bytevector?");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[349]+1)))(3,*((C_word*)lf[349]+1),t2,((C_word*)t0)[3]);}}}}
-/* 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){
+/* k5712 in k5694 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5714(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11041,29 +11159,29 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5714,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5721,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=C_block_size(((C_word*)t0)[3]);
+C_trace("c-backend.scm: 673 words");
+((C_proc3)C_retrieve_symbol_proc(lf[348]))(3,*((C_word*)lf[348]+1),t2,t3);}
+else{
+if(C_truep(C_structurep(((C_word*)t0)[3]))){
+t2=C_block_size(((C_word*)t0)[3]);
+t3=C_fixnum_plus(C_fix(2),t2);
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5743,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t5,a[5]=t2,tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
-f_5638(t7,((C_word*)t0)[4],C_fix(0),t3);}
+f_5743(t7,((C_word*)t0)[4],C_fix(0),t3);}
else{
t2=((C_word*)t0)[4];
t3=((C_word*)t0)[3];
-C_trace("c-backend.scm: 643 bomb");
-((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t2,lf[342],t3);}}}
+C_trace("c-backend.scm: 661 bomb");
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t2,lf[347],t3);}}}
-/* loop in 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){
+/* loop in k5712 in k5694 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5743(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -11073,41 +11191,41 @@ 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);}
+C_save_and_reclaim((void*)trf_5743,NULL,4,t0,t1,t2,t3);}
t4=t2;
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t4,((C_word*)t0)[5]))){
+if(C_truep(C_fixnum_greater_or_equal_p(t4,((C_word*)t0)[5]))){
t5=t3;
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
else{
-t5=(C_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");
+t5=C_fixnum_increase(t2);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5765,a[2]=t5,a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+t7=C_slot(((C_word*)t0)[3],t2);
+C_trace("c-backend.scm: 679 literal-size");
t8=((C_word*)((C_word*)t0)[2])[1];
-f_5475(t8,t6,t7);}}
+f_5580(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){
+/* k5763 in loop in k5712 in k5694 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5765(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_fixnum_plus(((C_word*)t0)[5],t1);
-C_trace("c-backend.scm: 661 loop");
+t2=C_fixnum_plus(((C_word*)t0)[5],t1);
+C_trace("c-backend.scm: 679 loop");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_5638(t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+f_5743(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){
+/* k5719 in k5712 in k5694 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5721(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_fixnum_plus(C_fix(2),t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k5653 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5655(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11115,15 +11233,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5655,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5657,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp));
t5=((C_word*)t3)[1];
-f_5552(t5,((C_word*)t0)[2],t1);}
+f_5657(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){
+/* loop925 in k5653 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5657(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -11131,20 +11249,20 @@ 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");
+C_save_and_reclaim((void*)trf_5657,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5686,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+t4=C_slot(t2,C_fix(0));
+C_trace("g941942");
t5=((C_word*)((C_word*)t0)[2])[1];
-f_5475(t5,t3,t4);}
+f_5580(t5,t3,t4);}
else{
t3=((C_word*)((C_word*)t0)[3])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k5684 in loop925 in k5653 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5686(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11156,64 +11274,64 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_5686,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop913926");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop925938");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_5552(t6,((C_word*)t0)[3],t5);}
+f_5657(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop913926");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop925938");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_5552(t6,((C_word*)t0)[3],t5);}}
+f_5657(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){
+/* k5649 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5651(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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);}
+C_trace("c-backend.scm: 669 reduce");
+((C_proc5)C_retrieve_symbol_proc(lf[344]))(5,*((C_word*)lf[344]+1),((C_word*)t0)[2],*((C_word*)lf[345]+1),C_fix(0),t1);}
-/* 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){
+/* k5645 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5647(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_fixnum_plus((C_word)C_fixnum_plus(C_fix(1),((C_word*)t0)[2]),t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fixnum_plus(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){
+/* k5616 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5618(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_5618,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5622,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_cdr(((C_word*)t0)[3]);
+C_trace("c-backend.scm: 668 literal-size");
t4=((C_word*)((C_word*)t0)[2])[1];
-f_5475(t4,t2,t3);}
+f_5580(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){
+/* k5620 in k5616 in k5585 in literal-size in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5622(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_fixnum_plus((C_word)C_fixnum_plus(C_fix(3),((C_word*)t0)[2]),t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fixnum_plus(C_fixnum_plus(C_fix(3),((C_word*)t0)[2]),t1));}
-/* literal-frame in ##compiler#generate-code in k2573 in k2487 in k2484 */
-static void C_fcall f_5420(C_word t0,C_word t1){
+/* literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5525(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11221,15 +11339,15 @@ 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);}
+C_save_and_reclaim((void*)trf_5525,NULL,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5426,a[2]=((C_word*)t0)[3],a[3]=t3,tmp=(C_word)a,a+=4,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5531,a[2]=((C_word*)t0)[3],a[3]=t3,tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
-f_5426(t5,t1,C_fix(0),((C_word*)t0)[2]);}
+f_5531(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){
+/* doloop899 in literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5531(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -11238,90 +11356,90 @@ 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))){
+C_save_and_reclaim((void*)trf_5531,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t3))){
t4=C_SCHEME_UNDEFINED;
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5541,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t5=C_i_car(t3);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5560,a[2]=t2,a[3]=t5,a[4]=t4,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t6);}}
+((C_proc2)C_retrieve_symbol_proc(lf[342]))(2,*((C_word*)lf[342]+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){
+/* k5558 in doloop899 in literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5560(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_5560,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5563,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[336],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t2,lf[341],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){
+/* k5561 in k5558 in doloop899 in literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5563(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_5563,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5566,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
C_trace("write");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[335]+1)))(4,*((C_word*)lf[335]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[340]+1)))(4,*((C_word*)lf[340]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k5564 in k5561 in k5558 in doloop899 in literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5566(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_5566,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5569,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
C_trace("write-char/port");
-t3=C_retrieve(lf[334]);
+t3=C_retrieve(lf[339]);
((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){
+/* k5567 in k5564 in k5561 in k5558 in doloop899 in literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5569(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_5569,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5572,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),t2,((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[338]))(3,*((C_word*)lf[338]+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){
+/* k5570 in k5567 in k5564 in k5561 in k5558 in doloop899 in literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5572(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 640 gen-lit");
+C_trace("c-backend.scm: 658 gen-lit");
t2=((C_word*)((C_word*)t0)[4])[1];
-f_5669(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+f_5774(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){
+/* k5539 in doloop899 in literal-frame in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5541(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_fixnum_increase(((C_word*)t0)[5]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
+t2=C_fixnum_increase(((C_word*)t0)[5]);
+t3=C_i_cdr(((C_word*)t0)[4]);
t4=((C_word*)((C_word*)t0)[3])[1];
-f_5426(t4,((C_word*)t0)[2],t2,t3);}
+f_5531(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){
+/* trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5205(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11338,281 +11456,269 @@ C_word t13;
C_word t14;
C_word t15;
C_word t16;
-C_word t17;
-C_word t18;
-C_word ab[32],*a=ab;
+C_word ab[28],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5090,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_5205,NULL,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_END_OF_LIST;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_SCHEME_END_OF_LIST;
+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(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]);}
+t10=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5208,tmp=(C_word)a,a+=2,tmp));
+t11=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5244,a[2]=t7,tmp=(C_word)a,a+=3,tmp));
+t12=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5324,a[2]=t3,a[3]=t7,a[4]=t5,a[5]=t9,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+t13=C_SCHEME_UNDEFINED;
+t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
+t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5394,a[2]=t14,a[3]=t3,a[4]=t5,a[5]=t7,tmp=(C_word)a,a+=6,tmp));
+t16=((C_word*)t14)[1];
+f_5394(t16,t12,((C_word*)t0)[2]);}
-/* 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){
+/* loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5394(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[11],*a=ab;
+C_word ab[10],*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");
+C_save_and_reclaim((void*)trf_5394,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5402,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5512,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g820821");
t6=t3;
-f_5287(t6,t4,t5);}
+f_5402(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){
+/* k5510 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5512(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_5394(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){
+/* g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5402(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
-C_word ab[8],*a=ab;
+C_word ab[7],*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);}
+C_save_and_reclaim((void*)trf_5402,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5406,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 619 lambda-literal-argument-count");
+((C_proc3)C_retrieve_symbol_proc(lf[289]))(3,*((C_word*)lf[289]+1),t3,t2);}
-/* 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){
+/* k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5406(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[11],*a=ab;
+C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5291,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_5406,2,t0,t1);}
t2=t1;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|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]);}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5409,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t3,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+C_trace("c-backend.scm: 620 lambda-literal-rest-argument");
+((C_proc3)C_retrieve_symbol_proc(lf[285]))(3,*((C_word*)lf[285]+1),t4,((C_word*)t0)[2]);}
-/* 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){
+/* k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5409(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[10],*a=ab;
+C_word ab[9],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5409,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5412,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+C_trace("c-backend.scm: 621 lambda-literal-rest-argument-mode");
+((C_proc3)C_retrieve_symbol_proc(lf[284]))(3,*((C_word*)lf[284]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5412(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[11],*a=ab;
+C_word ab[10],*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_save_and_reclaim((void*)tr2,(void*)f_5412,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5415,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+C_trace("c-backend.scm: 622 lambda-literal-id");
((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5415(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[12],*a=ab;
+C_word ab[11],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5415,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5418,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+C_trace("c-backend.scm: 623 lambda-literal-customizable");
+((C_proc3)C_retrieve_symbol_proc(lf[288]))(3,*((C_word*)lf[288]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5418(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[16],*a=ab;
+C_word ab[15],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_5418,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_5421,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
if(C_truep(t1)){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5509,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 624 lambda-literal-closure-size");
+((C_proc3)C_retrieve_symbol_proc(lf[148]))(3,*((C_word*)lf[148]+1),t3,((C_word*)t0)[2]);}
else{
t3=t2;
-f_5306(t3,C_SCHEME_FALSE);}}
+f_5421(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){
+/* k5507 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5509(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_5306(t2,(C_word)C_eqp(t1,C_fix(0)));}
+f_5421(t2,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){
+/* k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5421(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[13],*a=ab;
+C_word ab[12],*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);
+C_save_and_reclaim((void*)trf_5421,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_5424,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
if(C_truep(t1)){
-t3=(C_word)C_fixnum_decrease(((C_word*)((C_word*)t0)[10])[1]);
-t4=C_mutate(((C_word *)((C_word*)t0)[10])+1,t3);
+t3=C_fixnum_decrease(((C_word*)((C_word*)t0)[9])[1]);
+t4=C_mutate(((C_word *)((C_word*)t0)[9])+1,t3);
t5=t2;
-f_5309(t5,t4);}
+f_5424(t5,t4);}
else{
t3=t2;
-f_5309(t3,C_SCHEME_UNDEFINED);}}
+f_5424(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){
+/* k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5424(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[13],*a=ab;
+C_word ab[12],*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]);}
+C_save_and_reclaim((void*)trf_5424,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_5430,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
+C_trace("c-backend.scm: 626 lambda-literal-direct");
+((C_proc3)C_retrieve_symbol_proc(lf[283]))(3,*((C_word*)lf[283]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5430(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
-C_word ab[13],*a=ab;
+C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5315,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_5430,2,t0,t1);}
if(C_truep(t1)){
t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[12];
+t3=((C_word*)t0)[11];
((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]);}
+if(C_truep(((C_word*)t0)[10])){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5436,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[11],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 628 gen");
+((C_proc11)C_retrieve_proc(*((C_word*)lf[1]+1)))(11,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[333],((C_word*)t0)[8],lf[334],C_SCHEME_TRUE,lf[335],((C_word*)t0)[8],lf[336]);}
else{
-t2=(*a=C_CLOSURE_TYPE|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])){
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5464,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+if(C_truep(((C_word*)t0)[4])){
t3=t2;
-f_5349(2,t3,((C_word*)t0)[3]);}
+f_5464(2,t3,((C_word*)t0)[4]);}
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]);}}}}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5498,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 636 lambda-literal-allocated");
+((C_proc3)C_retrieve_symbol_proc(lf[282]))(3,*((C_word*)lf[282]+1),t3,((C_word*)t0)[2]);}}}}
-/* 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){
+/* k5496 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5498(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_fixnum_greaterp(t1,C_fix(0));
+t2=C_fixnum_greaterp(t1,C_fix(0));
if(C_truep(t2)){
t3=((C_word*)t0)[3];
-f_5349(2,t3,t2);}
+f_5464(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]);}}
+C_trace("c-backend.scm: 636 lambda-literal-external");
+((C_proc3)C_retrieve_symbol_proc(lf[337]))(3,*((C_word*)lf[337]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}}
-/* 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){
+/* k5462 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5464(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[8],*a=ab;
+C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5349,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_5464,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]);
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5470,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(((C_word*)t0)[3])){
+t3=C_eqp(((C_word*)t0)[2],lf[251]);
t4=t2;
-f_5355(t4,(C_word)C_i_not(t3));}
+f_5470(t4,C_i_not(t3));}
else{
t3=t2;
-f_5355(t3,C_SCHEME_FALSE);}}
+f_5470(t3,C_SCHEME_FALSE);}}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[6];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-/* 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){
+/* k5468 in k5462 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5470(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word 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);}
+C_save_and_reclaim((void*)trf_5470,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]);}}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5474,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 638 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[279]))(5,*((C_word*)lf[279]+1),t2,*((C_word*)lf[280]+1),((C_word*)((C_word*)t0)[5])[1],((C_word*)((C_word*)t0)[3])[1]);}
else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5478,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 639 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[279]))(5,*((C_word*)lf[279]+1),t2,*((C_word*)lf[280]+1),((C_word*)((C_word*)t0)[2])[1],((C_word*)((C_word*)t0)[3])[1]);}}
-/* 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){
+/* k5476 in k5468 in k5462 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5478(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11621,8 +11727,8 @@ 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){
+/* k5472 in k5468 in k5462 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5474(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11631,113 +11737,103 @@ 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){
+/* k5434 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5436(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5436,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5439,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 630 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[331],((C_word*)t0)[3],lf[332]);}
-/* 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){
+/* k5437 in k5434 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5439(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5439,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5442,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 631 restore");
+f_5208(t2,((C_word*)((C_word*)t0)[4])[1]);}
-/* 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){
+/* k5440 in k5437 in k5434 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5442(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_5442,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5445,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 632 gen");
((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,((C_word*)t0)[2],C_make_character(40));}
-/* 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){
+/* k5443 in k5440 in k5437 in k5434 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5445(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5445,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5448,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 633 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t2,((C_word*)((C_word*)t0)[2])[1],lf[330]);}
-/* 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){
+/* k5446 in k5443 in k5440 in k5437 in k5434 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5448(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_5448,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5451,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5458,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 634 intersperse");
((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),t3,t1,C_make_character(44));}
-/* 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){
+/* k5456 in k5446 in k5443 in k5440 in k5437 in k5434 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5458(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[1]+1),t1);}
-/* 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){
+/* k5449 in k5446 in k5443 in k5440 in k5437 in k5434 in k5428 in k5422 in k5419 in k5416 in k5413 in k5410 in k5407 in k5404 in g820 in loop782 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5451(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 615 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[323]);}
+C_trace("c-backend.scm: 635 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[329]);}
-/* 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){
+/* k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5324(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
-C_word ab[12],*a=ab;
+C_word ab[11],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_5324,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5327,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5228,a[2]=t4,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5343,a[2]=t4,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
-f_5228(t6,t2,((C_word*)((C_word*)t0)[2])[1]);}
+f_5343(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){
+/* loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5343(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -11746,79 +11842,79 @@ 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");
+C_save_and_reclaim((void*)trf_5343,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5351,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5381,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g872873");
t6=t3;
-f_5236(t6,t4,t5);}
+f_5351(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){
+/* k5379 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5381(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_5343(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){
+/* g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5351(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_5351,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5355,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 643 gen");
+((C_proc13)C_retrieve_proc(*((C_word*)lf[1]+1)))(13,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[324],t2,lf[325],C_SCHEME_TRUE,lf[326],t2,lf[327],t2,lf[328]);}
-/* 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){
+/* k5353 in g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5355(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5355,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5358,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 645 gen");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[321],((C_word*)t0)[3],lf[322],((C_word*)t0)[3],lf[323]);}
-/* 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){
+/* k5356 in k5353 in g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5358(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5358,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5361,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 646 restore");
+f_5208(t2,((C_word*)t0)[3]);}
-/* 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){
+/* k5359 in k5356 in k5353 in g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5361(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_5361,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5364,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 647 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[320],((C_word*)t0)[2],C_make_character(44));}
-/* 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){
+/* k5362 in k5359 in k5356 in k5353 in g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5364(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11826,94 +11922,94 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5364,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5367,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5374,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5378,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 648 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t4,((C_word*)t0)[2],lf[319]);}
-/* 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){
+/* k5376 in k5362 in k5359 in k5356 in k5353 in g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5378(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 630 intersperse");
+C_trace("c-backend.scm: 648 intersperse");
((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t1,C_make_character(44));}
-/* 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){
+/* k5372 in k5362 in k5359 in k5356 in k5353 in g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5374(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[1]+1),t1);}
-/* 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){
+/* k5365 in k5362 in k5359 in k5356 in k5353 in g872 in loop865 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5367(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 631 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[312]);}
+C_trace("c-backend.scm: 649 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[318]);}
-/* 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){
+/* k5325 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5327(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[9],*a=ab;
+C_word ab[8],*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");
+C_save_and_reclaim((void*)tr2,(void*)f_5327,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5330,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5341,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 651 emitter");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_5129(t4,t3,C_SCHEME_FALSE);}
+f_5244(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){
+/* k5339 in k5325 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5341(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("for-each");
-t2=*((C_word*)lf[311]+1);
+t2=*((C_word*)lf[317]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)((C_word*)t0)[2])[1]);}
-/* 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){
+/* k5328 in k5325 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5330(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[4],*a=ab;
+C_word ab[3],*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");
+C_save_and_reclaim((void*)tr2,(void*)f_5330,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5337,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 652 emitter");
t3=((C_word*)((C_word*)t0)[2])[1];
-f_5129(t3,t2,C_SCHEME_TRUE);}
+f_5244(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){
+/* k5335 in k5328 in k5325 in k5322 in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5337(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("for-each");
-t2=*((C_word*)lf[311]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)((C_word*)t0)[2])[1]);}
+t2=*((C_word*)lf[317]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* emitter in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
-static void C_fcall f_5129(C_word t0,C_word t1,C_word t2){
+/* emitter in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5244(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5129,NULL,3,t0,t1,t2);}
+C_save_and_reclaim((void*)trf_5244,NULL,3,t0,t1,t2);}
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5131,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5246,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp));}
-/* f_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){
+/* f_5246 in emitter in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5246(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -11922,159 +12018,159 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_5246,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5250,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t4=(C_truep(((C_word*)t0)[3])?C_make_character(118):lf[312]);
+t5=(C_truep(((C_word*)t0)[3])?C_make_character(118):lf[313]);
+C_trace("c-backend.scm: 597 gen");
+((C_proc14)C_retrieve_proc(*((C_word*)lf[1]+1)))(14,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[314],t2,C_make_character(114),t4,lf[315],C_SCHEME_TRUE,lf[316],t2,C_make_character(114),t5);}
-/* k5133 */
-static void C_ccall f_5135(C_word c,C_word t0,C_word t1){
+/* k5248 */
+static void C_ccall f_5250(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5250,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5253,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 599 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[310],((C_word*)t0)[4],lf[311]);}
-/* k5136 in k5133 */
-static void C_ccall f_5138(C_word c,C_word t0,C_word t1){
+/* k5251 in k5248 */
+static void C_ccall f_5253(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_5253,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5256,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 600 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[309],((C_word*)t0)[4],C_make_character(114));}
-/* k5139 in k5136 in k5133 */
-static void C_ccall f_5141(C_word c,C_word t0,C_word t1){
+/* k5254 in k5251 in k5248 */
+static void C_ccall f_5256(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_5256,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5259,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
if(C_truep(((C_word*)t0)[3])){
-C_trace("c-backend.scm: 581 gen");
+C_trace("c-backend.scm: 601 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(118));}
else{
t3=t2;
-f_5144(2,t3,C_SCHEME_UNDEFINED);}}
+f_5259(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){
+/* k5257 in k5254 in k5251 in k5248 */
+static void C_ccall f_5259(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_5259,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5262,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 602 gen");
+((C_proc11)C_retrieve_proc(*((C_word*)lf[1]+1)))(11,*((C_word*)lf[1]+1),t2,lf[305],((C_word*)t0)[4],lf[306],C_SCHEME_TRUE,lf[307],C_SCHEME_TRUE,lf[308],((C_word*)t0)[4],C_make_character(59));}
-/* k5145 in k5142 in k5139 in k5136 in k5133 */
-static void C_ccall f_5147(C_word c,C_word t0,C_word t1){
+/* k5260 in k5257 in k5254 in k5251 in k5248 */
+static void C_ccall f_5262(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5262,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5265,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 605 restore");
+f_5208(t2,((C_word*)t0)[4]);}
-/* 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){
+/* k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
+static void C_ccall f_5265(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5265,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5268,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 606 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[304]);}
-/* 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){
+/* k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
+static void C_ccall f_5268(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_5268,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5271,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 588 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[296]);}
+C_trace("c-backend.scm: 608 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[302]);}
else{
-C_trace("c-backend.scm: 589 gen");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[297]);}}
+C_trace("c-backend.scm: 609 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[303]);}}
-/* 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){
+/* k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
+static void C_ccall f_5271(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5271,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5274,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 610 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,C_make_character(116),((C_word*)t0)[3],lf[301]);}
-/* 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){
+/* k5272 in k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
+static void C_ccall f_5274(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_5274,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5277,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 591 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[294]);}
+C_trace("c-backend.scm: 611 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[300]);}
else{
t3=t2;
-f_5162(2,t3,C_SCHEME_UNDEFINED);}}
+f_5277(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){
+/* k5275 in k5272 in k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
+static void C_ccall f_5277(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5277,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5280,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 612 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[299]);}
-/* 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){
+/* k5278 in k5275 in k5272 in k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
+static void C_ccall f_5280(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5280,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5283,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 613 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[298]);}
-/* 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){
+/* k5281 in k5278 in k5275 in k5272 in k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
+static void C_ccall f_5283(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12083,39 +12179,39 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5283,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5286,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5293,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5297,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=C_fixnum_plus(((C_word*)t0)[2],C_fix(1));
+C_trace("c-backend.scm: 614 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[296]))(4,*((C_word*)lf[296]+1),t4,t5,lf[297]);}
-/* 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){
+/* k5295 in k5281 in k5278 in k5275 in k5272 in k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
+static void C_ccall f_5297(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 594 intersperse");
+C_trace("c-backend.scm: 614 intersperse");
((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t1,C_make_character(44));}
-/* 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){
+/* k5291 in k5281 in k5278 in k5275 in k5272 in k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
+static void C_ccall f_5293(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[1]+1),t1);}
-/* 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){
+/* k5284 in k5281 in k5278 in k5275 in k5272 in k5269 in k5266 in k5263 in k5260 in k5257 in k5254 in k5251 in k5248 */
+static void C_ccall f_5286(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 595 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[289]);}
+C_trace("c-backend.scm: 615 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[295]);}
-/* restore in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
-static void C_fcall f_5093(C_word t1,C_word t2){
+/* restore in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5208(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12125,55 +12221,55 @@ 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));
+C_save_and_reclaim((void*)trf_5208,NULL,2,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5212,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=C_fixnum_difference(t2,C_fix(1));
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5106,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
+t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5221,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
t8=((C_word*)t6)[1];
-f_5106(t8,t3,t4,C_fix(0));}
+f_5221(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){
+/* doloop790 in restore in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5221(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5106,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_fixnum_lessp(t2,C_fix(0)))){
+C_save_and_reclaim((void*)trf_5221,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_fixnum_lessp(t2,C_fix(0)))){
t4=C_SCHEME_UNDEFINED;
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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]);}}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5231,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 592 gen");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t4,C_SCHEME_TRUE,lf[292],t2,lf[293],t3,lf[294]);}}
-/* 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){
+/* k5229 in doloop790 in restore in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5231(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_fixnum_difference(((C_word*)t0)[5],C_fix(1));
-t3=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
+t2=C_fixnum_difference(((C_word*)t0)[5],C_fix(1));
+t3=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
t4=((C_word*)((C_word*)t0)[3])[1];
-f_5106(t4,((C_word*)t0)[2],t2,t3);}
+f_5221(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){
+/* k5210 in restore in trampolines in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5212(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 593 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_SCHEME_TRUE,lf[290],((C_word*)t0)[2],lf[291]);}
-/* prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
-static void C_fcall f_4750(C_word t0,C_word t1){
+/* prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4865(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12181,15 +12277,15 @@ 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);}
+C_save_and_reclaim((void*)trf_4865,NULL,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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");
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4869,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 521 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t4,C_SCHEME_TRUE);}
-/* 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){
+/* k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4869(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12198,16 +12294,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4869,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4872,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4823,a[2]=t4,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4938,a[2]=t4,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
-f_4823(t6,t2,((C_word*)t0)[2]);}
+f_4938(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){
+/* loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4938(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12216,81 +12312,81 @@ 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");
+C_save_and_reclaim((void*)trf_4938,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4946,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5192,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g665666");
t6=t3;
-f_4831(t6,t4,t5);}
+f_4946(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){
+/* k5190 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5192(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_4938(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){
+/* g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4946(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_4946,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4950,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 524 lambda-literal-argument-count");
+((C_proc3)C_retrieve_symbol_proc(lf[289]))(3,*((C_word*)lf[289]+1),t3,t2);}
-/* 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){
+/* k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4950(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4950,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4953,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 525 lambda-literal-customizable");
+((C_proc3)C_retrieve_symbol_proc(lf[288]))(3,*((C_word*)lf[288]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4953(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_4953,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4956,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
if(C_truep(t1)){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5189,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 526 lambda-literal-closure-size");
+((C_proc3)C_retrieve_symbol_proc(lf[148]))(3,*((C_word*)lf[148]+1),t3,((C_word*)t0)[2]);}
else{
t3=t2;
-f_4841(t3,C_SCHEME_FALSE);}}
+f_4956(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){
+/* k5187 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5189(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_4841(t2,(C_word)C_eqp(t1,C_fix(0)));}
+f_4956(t2,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){
+/* k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4956(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12299,88 +12395,88 @@ 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);
+C_save_and_reclaim((void*)trf_4956,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4959,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5175,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
if(C_truep(t1)){
-t4=(C_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]);}
+t4=C_fixnum_decrease(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 527 make-variable-list");
+((C_proc4)C_retrieve_symbol_proc(lf[286]))(4,*((C_word*)lf[286]+1),t3,t4,lf[287]);}
else{
t4=((C_word*)t0)[5];
-C_trace("c-backend.scm: 507 make-variable-list");
-((C_proc4)C_retrieve_symbol_proc(lf[280]))(4,*((C_word*)lf[280]+1),t3,t4,lf[281]);}}
+C_trace("c-backend.scm: 527 make-variable-list");
+((C_proc4)C_retrieve_symbol_proc(lf[286]))(4,*((C_word*)lf[286]+1),t3,t4,lf[287]);}}
-/* 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){
+/* k5173 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5175(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 507 intersperse");
+C_trace("c-backend.scm: 527 intersperse");
((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t1,C_make_character(44));}
-/* 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){
+/* k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4959(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_4959,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4962,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+C_trace("c-backend.scm: 528 lambda-literal-id");
((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4962(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4962,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4965,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+C_trace("c-backend.scm: 529 lambda-literal-rest-argument");
+((C_proc3)C_retrieve_symbol_proc(lf[285]))(3,*((C_word*)lf[285]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4965(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4965,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4968,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
+C_trace("c-backend.scm: 530 lambda-literal-rest-argument-mode");
+((C_proc3)C_retrieve_symbol_proc(lf[284]))(3,*((C_word*)lf[284]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4968(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4968,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4971,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+C_trace("c-backend.scm: 531 lambda-literal-direct");
+((C_proc3)C_retrieve_symbol_proc(lf[283]))(3,*((C_word*)lf[283]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4971(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4971,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_4974,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
+C_trace("c-backend.scm: 532 lambda-literal-allocated");
+((C_proc3)C_retrieve_symbol_proc(lf[282]))(3,*((C_word*)lf[282]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4974(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12390,57 +12486,57 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4974,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_4977,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
t3=((C_word*)t0)[8];
-t4=C_retrieve(lf[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);}
+t4=C_retrieve(lf[278]);
+if(C_truep(C_fixnum_greater_or_equal_p(t3,t4))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5167,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t6=C_fixnum_increase(((C_word*)t0)[8]);
+C_trace("c-backend.scm: 534 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[279]))(5,*((C_word*)lf[279]+1),t5,*((C_word*)lf[280]+1),((C_word*)((C_word*)t0)[3])[1],t6);}
else{
t5=t2;
-f_4862(t5,C_SCHEME_UNDEFINED);}}
+f_4977(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){
+/* k5165 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5167(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
t3=((C_word*)t0)[2];
-f_4862(t3,t2);}
+f_4977(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){
+/* k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4977(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[13],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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_save_and_reclaim((void*)trf_4977,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_4980,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],tmp=(C_word)a,a+=13,tmp);
+C_trace("c-backend.scm: 535 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE);}
-/* 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){
+/* k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4980(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[15],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4980,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4983,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],tmp=(C_word)a,a+=11,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5121,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 540 lambda-literal-callee-signatures");
+((C_proc3)C_retrieve_symbol_proc(lf[281]))(3,*((C_word*)lf[281]+1),t3,((C_word*)t0)[2]);}
-/* 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){
+/* k5119 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5121(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12448,15 +12544,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5121,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5008,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5123,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
-f_5008(t5,((C_word*)t0)[2],t1);}
+f_5123(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){
+/* loop684 in k5119 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5123(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12465,31 +12561,31 @@ 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");
+C_save_and_reclaim((void*)trf_5123,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5131,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5149,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g691692");
t6=t3;
-f_5016(t6,t4,t5);}
+f_5131(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){
+/* k5147 in loop684 in k5119 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5149(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_5123(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){
+/* g691 in loop684 in k5119 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5131(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12499,21 +12595,21 @@ 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);}
+C_save_and_reclaim((void*)trf_5131,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);}
+t4=C_retrieve(lf[278]);
+if(C_truep(C_fixnum_greater_or_equal_p(t3,t4))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5142,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t6=C_fixnum_increase(t2);
+C_trace("c-backend.scm: 539 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[279]))(5,*((C_word*)lf[279]+1),t5,*((C_word*)lf[280]+1),((C_word*)((C_word*)t0)[2])[1],t6);}
else{
t5=C_SCHEME_UNDEFINED;
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-/* 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){
+/* k5140 in g691 in loop684 in k5119 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5142(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12522,8 +12618,8 @@ 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){
+/* k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4983(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12532,162 +12628,162 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_4983,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4986,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
+t3=C_eqp(lf[262],((C_word*)t0)[5]);
if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5095,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_retrieve(lf[213]))){
+C_trace("c-backend.scm: 550 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),t4,C_retrieve(lf[213]),lf[269]);}
else{
t5=t4;
-f_4980(2,t5,lf[264]);}}
+f_5095(2,t5,lf[270]);}}
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);}}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5070,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[5],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 542 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t4,lf[276],((C_word*)t0)[5],lf[277],C_SCHEME_TRUE);}}
-/* 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){
+/* k5068 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5070(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5070,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5073,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 543 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[275]);}
-/* 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){
+/* k5071 in k5068 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5073(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_5073,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5076,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 524 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[267]);}
+C_trace("c-backend.scm: 544 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[273]);}
else{
-C_trace("c-backend.scm: 524 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[268]);}}
+C_trace("c-backend.scm: 544 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[274]);}}
-/* 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){
+/* k5074 in k5071 in k5068 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5076(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_5076,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5079,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 526 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[265]);}
+C_trace("c-backend.scm: 546 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[271]);}
else{
-C_trace("c-backend.scm: 527 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[266]);}}
+C_trace("c-backend.scm: 547 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[272]);}}
-/* 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){
+/* k5077 in k5074 in k5071 in k5068 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5079(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 528 gen");
+C_trace("c-backend.scm: 548 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k5093 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5095(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5095,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5098,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 551 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,lf[267],t1,lf[268],C_SCHEME_TRUE);}
-/* 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){
+/* k5096 in k5093 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5098(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5098,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5101,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_retrieve(lf[265]))){
+C_trace("c-backend.scm: 553 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,lf[266],C_SCHEME_TRUE);}
else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)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]);}}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f11178,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 554 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,lf[264]);}}
-/* 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){
+/* f11178 in k5096 in k5093 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f11178(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 555 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[263],((C_word*)t0)[2]);}
-/* k4984 in k4981 in k4978 in 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){
+/* k5099 in k5096 in k5093 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5101(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5101,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5104,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 554 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[264]);}
-/* 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){
+/* k5102 in k5099 in k5096 in k5093 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5104(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 555 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[263],((C_word*)t0)[2]);}
-/* 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){
+/* k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4986(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_4986,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4989,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
+C_trace("c-backend.scm: 556 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(40));}
-/* 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){
+/* k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4989(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_4989,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4992,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
if(C_truep(((C_word*)t0)[2])){
t3=t2;
-f_4877(2,t3,C_SCHEME_UNDEFINED);}
+f_4992(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]);}}
+C_trace("c-backend.scm: 557 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[261]);}}
-/* 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){
+/* k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4992(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12695,141 +12791,141 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4992,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4995,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5042,a[2]=t2,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
if(C_truep(((C_word*)t0)[3])){
-t4=(C_word)C_eqp(((C_word*)t0)[2],C_fix(0));
+t4=C_eqp(((C_word*)t0)[2],C_fix(0));
t5=t3;
-f_4927(t5,(C_word)C_i_not(t4));}
+f_5042(t5,C_i_not(t4));}
else{
t4=t3;
-f_4927(t4,C_SCHEME_FALSE);}}
+f_5042(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){
+/* k5040 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_5042(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4927,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_5042,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5045,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 559 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[260]);}
else{
t2=((C_word*)t0)[2];
-f_4880(2,t2,C_SCHEME_UNDEFINED);}}
+f_4995(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){
+/* k5043 in k5040 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5045(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[3]))){
-C_trace("c-backend.scm: 540 gen");
+if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
+C_trace("c-backend.scm: 560 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(44));}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[2];
-f_4880(2,t3,t2);}}
+f_4995(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){
+/* k4993 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4995(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_4995,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4998,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
C_apply(4,0,t2,*((C_word*)lf[1]+1),((C_word*)t0)[4]);}
-/* 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){
+/* k4996 in k4993 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4998(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4883,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_4998,2,t0,t1);}
if(C_truep(((C_word*)t0)[8])){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5004,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 563 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[258]);}
else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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");
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5030,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 571 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(41));}}
-/* 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){
+/* k5028 in k4996 in k4993 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5030(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_5030,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5033,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
if(C_truep(((C_word*)t0)[2])){
-C_trace("c-backend.scm: 554 gen");
+C_trace("c-backend.scm: 574 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_make_character(59));}
else{
-C_trace("c-backend.scm: 553 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[253]);}}
+C_trace("c-backend.scm: 573 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[259]);}}
-/* 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){
+/* k5031 in k5028 in k4996 in k4993 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5033(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 554 gen");
+C_trace("c-backend.scm: 574 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(59));}
-/* 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){
+/* k5002 in k4996 in k4993 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5004(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4889,2,t0,t1);}
-t2=(C_word)C_eqp(((C_word*)t0)[6],lf[245]);
+C_save_and_reclaim((void*)tr2,(void*)f_5004,2,t0,t1);}
+t2=C_eqp(((C_word*)t0)[6],lf[251]);
if(C_truep(t2)){
t3=((C_word*)t0)[5];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_UNDEFINED);}
else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5013,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 566 gen");
+((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[254],((C_word*)t0)[2],lf[255],C_SCHEME_TRUE,lf[256],((C_word*)t0)[2],lf[257]);}}
-/* 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){
+/* k5011 in k5002 in k4996 in k4993 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5013(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_5013,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5016,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_apply(4,0,t2,*((C_word*)lf[1]+1),((C_word*)t0)[2]);}
-/* 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){
+/* k5014 in k5011 in k5002 in k4996 in k4993 in k4990 in k4987 in k4984 in k4981 in k4978 in k4975 in k4972 in k4969 in k4966 in k4963 in k4960 in k4957 in k4954 in k4951 in k4948 in g665 in loop658 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_5016(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_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]);}
+t2=C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
+C_trace("c-backend.scm: 569 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[252],t2,lf[253]);}
-/* 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){
+/* k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4872(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12837,15 +12933,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4872,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4762,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4877,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_4762(t5,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}
+f_4877(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){
+/* loop748 in k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4877(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12854,34 +12950,34 @@ 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]);}
+C_save_and_reclaim((void*)trf_4877,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4925,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4889,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 578 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,lf[249],t4,lf[250]);}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k4887 in loop748 in k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4889(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4889,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4892,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4899,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 579 make-list");
+((C_proc4)C_retrieve_symbol_proc(lf[247]))(4,*((C_word*)lf[247]+1),t3,((C_word*)t0)[2],lf[248]);}
-/* 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){
+/* k4897 in k4887 in loop748 in k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4899(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12889,15 +12985,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4899,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4786,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4901,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_4786(t5,((C_word*)t0)[2],t1);}
+f_4901(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){
+/* loop760 in k4897 in k4887 in loop748 in k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4901(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12906,12 +13002,12 @@ 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))){
+C_save_and_reclaim((void*)trf_4901,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
t3=*((C_word*)lf[1]+1);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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");
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4911,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g767768");
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -12919,50 +13015,50 @@ 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){
+/* k4909 in loop760 in k4897 in k4887 in loop748 in k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4911(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_4901(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){
+/* k4890 in k4887 in loop748 in k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4892(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 560 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[240]);}
+C_trace("c-backend.scm: 580 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[246]);}
-/* 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){
+/* k4923 in loop748 in k4870 in k4867 in prototypes in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4925(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_4877(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){
+/* declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4694(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_4694,NULL,2,t0,t1);}
+t2=C_i_length(((C_word*)t0)[3]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4701,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 492 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[245]);}
-/* 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){
+/* k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4701(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12971,16 +13067,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4701,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4704,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4722,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4837,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
t6=((C_word*)t4)[1];
-f_4722(t6,t2,C_retrieve(lf[209]));}
+f_4837(t6,t2,C_retrieve(lf[215]));}
-/* 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){
+/* loop609 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4837(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12988,59 +13084,59 @@ 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]);}
+C_save_and_reclaim((void*)trf_4837,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4852,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=C_slot(t2,C_fix(0));
+C_trace("c-backend.scm: 495 gen");
+((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[241],t4,lf[242],C_SCHEME_TRUE,lf[243],t4,lf[244]);}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k4850 in loop609 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4852(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_4837(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){
+/* k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4704(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));
+C_save_and_reclaim((void*)tr2,(void*)f_4704,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4707,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=C_eqp(((C_word*)t0)[2],C_fix(0));
if(C_truep(t3)){
t4=t2;
-f_4592(2,t4,C_SCHEME_UNDEFINED);}
+f_4707(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]);}}
+C_trace("c-backend.scm: 499 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,C_SCHEME_TRUE,lf[239],((C_word*)t0)[2],lf[240]);}}
-/* 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){
+/* k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4707(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4707,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4710,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 500 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[238]);}
-/* 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){
+/* k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4710(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13048,15 +13144,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4710,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4600,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4715,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_4600(t5,((C_word*)t0)[3],C_fix(0),((C_word*)t0)[2]);}
+f_4715(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){
+/* doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4715(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -13064,19 +13160,19 @@ 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))){
+C_save_and_reclaim((void*)trf_4715,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t3))){
t4=C_SCHEME_UNDEFINED;
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);}}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4725,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t5=C_i_car(t3);
+C_trace("c-backend.scm: 504 ##sys#lambda-info->string");
+((C_proc3)C_retrieve_symbol_proc(lf[237]))(3,*((C_word*)lf[237]+1),t4,t5);}}
-/* 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){
+/* k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4725(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13087,18 +13183,18 @@ 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));}
+C_save_and_reclaim((void*)tr2,(void*)f_4725,2,t0,t1);}
+t2=C_i_string_length(t1);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4731,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
+t4=C_fixnum_shift_right(t2,C_fix(16));
+t5=C_fixnum_shift_right(t2,C_fix(8));
+t6=C_fixnum_and(C_fix(255),t5);
+t7=C_fixnum_and(C_fix(255),t2);
+C_trace("c-backend.scm: 506 gen");
+((C_proc12)C_retrieve_proc(*((C_word*)lf[1]+1)))(12,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[235],((C_word*)t0)[5],lf[236],t4,C_make_character(44),t6,C_make_character(44),t7,C_make_character(41));}
-/* 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){
+/* k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4731(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13107,16 +13203,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4731,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4734,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4669,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4784,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp));
t6=((C_word*)t4)[1];
-f_4669(t6,t2,C_fix(0));}
+f_4784(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){
+/* doloop632 in k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4784(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13126,31 +13222,31 @@ 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);}
+C_save_and_reclaim((void*)trf_4784,NULL,3,t0,t1,t2);}
t3=t2;
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t3,((C_word*)t0)[4]))){
+if(C_truep(C_fixnum_greater_or_equal_p(t3,((C_word*)t0)[4]))){
t4=C_SCHEME_UNDEFINED;
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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");
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4794,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_i_string_ref(((C_word*)t0)[2],t2);
+t6=C_fix(C_character_code(t5));
+C_trace("c-backend.scm: 513 gen");
((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t4,C_make_character(44),t6);}}
-/* 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){
+/* k4792 in doloop632 in k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4794(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_fixnum_increase(((C_word*)t0)[4]);
+t2=C_fixnum_increase(((C_word*)t0)[4]);
t3=((C_word*)((C_word*)t0)[3])[1];
-f_4669(t3,((C_word*)t0)[2],t2);}
+f_4784(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){
+/* k4732 in k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4734(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13162,19 +13258,19 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_4734,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4737,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+t3=C_fixnum_plus(((C_word*)t0)[2],C_fix(7));
+t4=C_fixnum_and(C_fix(16777208),t3);
+t5=C_fixnum_difference(t4,((C_word*)t0)[2]);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4642,a[2]=t7,tmp=(C_word)a,a+=3,tmp));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4757,a[2]=t7,tmp=(C_word)a,a+=3,tmp));
t9=((C_word*)t7)[1];
-f_4642(t9,t2,t5);}
+f_4757(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){
+/* doloop639 in k4732 in k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4757(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13182,53 +13278,53 @@ 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));
+C_save_and_reclaim((void*)trf_4757,NULL,3,t0,t1,t2);}
+t3=C_eqp(t2,C_fix(0));
if(C_truep(t3)){
t4=C_SCHEME_UNDEFINED;
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4767,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 516 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t4,lf[234]);}}
-/* 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){
+/* k4765 in doloop639 in k4732 in k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4767(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_fixnum_decrease(((C_word*)t0)[4]);
+t2=C_fixnum_decrease(((C_word*)t0)[4]);
t3=((C_word*)((C_word*)t0)[3])[1];
-f_4642(t3,((C_word*)t0)[2],t2);}
+f_4757(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){
+/* k4735 in k4732 in k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4737(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4737,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4740,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 517 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[233]);}
-/* 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){
+/* k4738 in k4735 in k4732 in k4729 in k4723 in doloop623 in k4708 in k4705 in k4702 in k4699 in declarations in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4740(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_fixnum_increase(((C_word*)t0)[5]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
+t2=C_fixnum_increase(((C_word*)t0)[5]);
+t3=C_i_cdr(((C_word*)t0)[4]);
t4=((C_word*)((C_word*)t0)[3])[1];
-f_4600(t4,((C_word*)t0)[2],t2,t3);}
+f_4715(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){
+/* header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4525(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13236,23 +13332,23 @@ 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);}
+C_save_and_reclaim((void*)trf_4525,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4528,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4545,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4686,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 458 current-seconds");
+((C_proc2)C_retrieve_symbol_proc(lf[232]))(2,*((C_word*)lf[232]+1),t4);}
-/* 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){
+/* k4684 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4686(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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);}
+C_trace("c-backend.scm: 458 ##sys#decode-seconds");
+((C_proc4)C_retrieve_symbol_proc(lf[231]))(4,*((C_word*)lf[231]+1),((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
-/* 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){
+/* k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4545(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13266,57 +13362,57 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4545,2,t0,t1);}
+t2=C_i_vector_ref(t1,C_fix(1));
+t3=C_i_vector_ref(t1,C_fix(2));
+t4=C_i_vector_ref(t1,C_fix(3));
+t5=C_i_vector_ref(t1,C_fix(4));
+t6=C_i_vector_ref(t1,C_fix(5));
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4563,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t8=C_fixnum_plus(C_fix(1900),t6);
+t9=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4644,a[2]=t4,a[3]=t3,a[4]=t2,a[5]=((C_word*)t0)[2],a[6]=t8,a[7]=((C_word*)t0)[3],a[8]=t7,tmp=(C_word)a,a+=9,tmp);
+t10=C_fixnum_increase(t5);
+C_trace("c-backend.scm: 466 pad0");
+f_4528(t9,t10);}
-/* 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){
+/* k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4644(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4644,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4648,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
+C_trace("c-backend.scm: 466 pad0");
+f_4528(t2,((C_word*)t0)[2]);}
-/* 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){
+/* k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4648(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4648,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4652,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
+C_trace("c-backend.scm: 466 pad0");
+f_4528(t2,((C_word*)t0)[2]);}
-/* 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){
+/* k4650 in k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4652(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4652,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4656,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
+C_trace("c-backend.scm: 466 pad0");
+f_4528(t2,((C_word*)t0)[2]);}
-/* 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){
+/* k4654 in k4650 in k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4656(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13326,142 +13422,142 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4656,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4660,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4664,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4666,tmp=(C_word)a,a+=2,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4674,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4678,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 469 chicken-version");
+((C_proc3)C_retrieve_symbol_proc(lf[230]))(3,*((C_word*)lf[230]+1),t6,C_SCHEME_TRUE);}
-/* 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){
+/* k4676 in k4654 in k4650 in k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4678(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 449 string-split");
-((C_proc4)C_retrieve_symbol_proc(lf[222]))(4,*((C_word*)lf[222]+1),((C_word*)t0)[2],t1,lf[223]);}
+C_trace("c-backend.scm: 469 string-split");
+((C_proc4)C_retrieve_symbol_proc(lf[228]))(4,*((C_word*)lf[228]+1),((C_word*)t0)[2],t1,lf[229]);}
-/* 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){
+/* k4672 in k4654 in k4650 in k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4674(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("map");
-t2=*((C_word*)lf[221]+1);
+t2=*((C_word*)lf[227]+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){
+/* a4665 in k4654 in k4650 in k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4666(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4551,3,t0,t1,t2);}
-t3=*((C_word*)lf[113]+1);
-C_trace("g556557");
+C_save_and_reclaim((void*)tr3,(void*)f_4666,3,t0,t1,t2);}
+t3=*((C_word*)lf[115]+1);
+C_trace("g568569");
t4=t3;
-((C_proc5)C_retrieve_proc(t4))(5,t4,t1,lf[219],t2,lf[220]);}
+((C_proc5)C_retrieve_proc(t4))(5,t4,t1,lf[225],t2,lf[226]);}
-/* 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){
+/* k4662 in k4654 in k4650 in k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4664(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 447 string-intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[217]))(4,*((C_word*)lf[217]+1),((C_word*)t0)[2],t1,lf[218]);}
+C_trace("c-backend.scm: 467 string-intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[223]))(4,*((C_word*)lf[223]+1),((C_word*)t0)[2],t1,lf[224]);}
-/* 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){
+/* k4658 in k4654 in k4650 in k4646 in k4642 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4660(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 464 gen");
+((C_proc21)C_retrieve_proc(*((C_word*)lf[1]+1)))(21,*((C_word*)lf[1]+1),((C_word*)t0)[8],lf[218],((C_word*)t0)[7],lf[219],C_SCHEME_TRUE,lf[220],C_SCHEME_TRUE,lf[221],((C_word*)t0)[6],C_make_character(45),((C_word*)t0)[5],C_make_character(45),((C_word*)t0)[4],C_make_character(32),((C_word*)t0)[3],C_make_character(58),((C_word*)t0)[2],C_SCHEME_TRUE,t1,lf[222]);}
-/* 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){
+/* k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4563(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]));}
+C_save_and_reclaim((void*)tr2,(void*)f_4563,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4566,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 472 gen-list");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[4]+1)))(3,*((C_word*)lf[4]+1),t2,C_retrieve(lf[217]));}
-/* 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){
+/* k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4566(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_4566,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4569,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 473 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE);}
-/* 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){
+/* k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4569(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]));}
+C_save_and_reclaim((void*)tr2,(void*)f_4569,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4572,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_retrieve(lf[213]))){
+C_trace("c-backend.scm: 474 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,lf[214],C_retrieve(lf[213]));}
else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4633,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 476 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,lf[216]);}}
-/* 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){
+/* k4631 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4633(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]));}
+C_trace("c-backend.scm: 477 gen-list");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[4]+1)))(3,*((C_word*)lf[4]+1),((C_word*)t0)[2],C_retrieve(lf[215]));}
-/* 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){
+/* k4570 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4572(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4572,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4575,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 478 gen");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[1]+1)))(9,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[209],C_SCHEME_TRUE,C_SCHEME_TRUE,lf[210],C_retrieve(lf[211]),lf[212]);}
-/* 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){
+/* k4573 in k4570 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4575(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]));}
+C_save_and_reclaim((void*)tr2,(void*)f_4575,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4578,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_retrieve(lf[205]))){
+C_trace("c-backend.scm: 480 generate-foreign-callback-stub-prototypes");
+((C_proc3)C_retrieve_symbol_proc(lf[206]))(3,*((C_word*)lf[206]+1),t2,C_retrieve(lf[207]));}
else{
t3=t2;
-f_4463(2,t3,C_SCHEME_UNDEFINED);}}
+f_4578(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){
+/* k4576 in k4573 in k4570 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4578(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13469,23 +13565,23 @@ 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_save_and_reclaim((void*)tr2,(void*)f_4578,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4581,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_i_pairp(C_retrieve(lf[208])))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4593,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 482 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE);}
else{
-if(C_truep(C_retrieve(lf[199]))){
+if(C_truep(C_retrieve(lf[205]))){
t3=C_SCHEME_UNDEFINED;
t4=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
-C_trace("c-backend.scm: 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]));}}}
+C_trace("c-backend.scm: 485 generate-foreign-callback-stub-prototypes");
+((C_proc3)C_retrieve_symbol_proc(lf[206]))(3,*((C_word*)lf[206]+1),((C_word*)t0)[2],C_retrieve(lf[207]));}}}
-/* 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){
+/* k4591 in k4576 in k4573 in k4570 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4593(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13493,15 +13589,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4593,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4483,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4598,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_4483(t5,((C_word*)t0)[2],C_retrieve(lf[202]));}
+f_4598(t5,((C_word*)t0)[2],C_retrieve(lf[208]));}
-/* 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){
+/* loop583 in k4591 in k4576 in k4573 in k4570 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4598(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13509,43 +13605,43 @@ 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_save_and_reclaim((void*)trf_4598,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4613,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=C_slot(t2,C_fix(0));
+C_trace("c-backend.scm: 483 gen");
((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,t4);}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k4611 in loop583 in k4591 in k4576 in k4573 in k4570 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4613(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_4598(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){
+/* k4579 in k4576 in k4573 in k4570 in k4567 in k4564 in k4561 in k4543 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4581(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-if(C_truep(C_retrieve(lf[199]))){
+if(C_truep(C_retrieve(lf[205]))){
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-C_trace("c-backend.scm: 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]));}}
+C_trace("c-backend.scm: 485 generate-foreign-callback-stub-prototypes");
+((C_proc3)C_retrieve_symbol_proc(lf[206]))(3,*((C_word*)lf[206]+1),((C_word*)t0)[2],C_retrieve(lf[207]));}}
-/* pad0 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
-static void C_fcall f_4413(C_word t1,C_word t2){
+/* pad0 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4528(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13553,27 +13649,27 @@ 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);}
+C_save_and_reclaim((void*)trf_4528,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");
+if(C_truep(C_fixnum_lessp(t3,C_fix(10)))){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4542,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 456 number->string");
C_number_to_string(3,0,t4,t2);}
else{
t4=t2;
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-/* 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){
+/* k4540 in pad0 in header in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4542(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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);}
+C_trace("c-backend.scm: 456 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[115]+1)))(4,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[204],t1);}
-/* expression in ##compiler#generate-code in 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){
+/* expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_2644(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -13584,31 +13680,31 @@ 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);}
+C_save_and_reclaim((void*)trf_2644,NULL,5,t0,t1,t2,t3,t4);}
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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");
+t9=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2647,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t8,a[5]=t6,tmp=(C_word)a,a+=6,tmp));
+t10=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4493,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
+C_trace("c-backend.scm: 451 expr");
t11=((C_word*)t6)[1];
-f_2625(t11,t1,t2,t3);}
+f_2647(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){
+/* expr-args in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4493(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_4493,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4499,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 445 pair-for-each");
+((C_proc4)C_retrieve_symbol_proc(lf[203]))(4,*((C_word*)lf[203]+1),t1,t4,t2);}
-/* 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){
+/* a4498 in expr-args in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4499(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13617,31 +13713,31 @@ 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]);
+C_save_and_reclaim((void*)tr3,(void*)f_4499,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4503,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t4=C_eqp(t2,((C_word*)t0)[2]);
if(C_truep(t4)){
-t5=(C_word)C_i_car(t2);
-C_trace("c-backend.scm: 428 expr");
+t5=C_i_car(t2);
+C_trace("c-backend.scm: 448 expr");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_2625(t6,t1,t5,((C_word*)t0)[3]);}
+f_2647(t6,t1,t5,((C_word*)t0)[3]);}
else{
-C_trace("c-backend.scm: 427 gen");
+C_trace("c-backend.scm: 447 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,C_make_character(44));}}
-/* 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){
+/* k4501 in a4498 in expr-args in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4503(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_i_car(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 428 expr");
+t2=C_i_car(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 448 expr");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_2625(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
+f_2647(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){
+/* expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_2647(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -13776,46 +13872,59 @@ C_word t133;
C_word t134;
C_word t135;
C_word t136;
+C_word t137;
+C_word t138;
+C_word t139;
+C_word t140;
+C_word t141;
+C_word t142;
+C_word t143;
+C_word t144;
+C_word t145;
+C_word t146;
+C_word t147;
+C_word t148;
+C_word t149;
C_word ab[16],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2625,NULL,4,t0,t1,t2,t3);}
+C_save_and_reclaim((void*)trf_2647,NULL,4,t0,t1,t2,t3);}
t4=t2;
-t5=(C_word)C_slot(t4,C_fix(3));
+t5=C_slot(t4,C_fix(3));
t6=t2;
-t7=(C_word)C_slot(t6,C_fix(2));
+t7=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]);
+t9=C_slot(t8,C_fix(1));
+t10=C_eqp(t9,lf[12]);
if(C_truep(t10)){
-t11=(C_word)C_i_car(t7);
-t12=(C_word)C_eqp(t11,lf[13]);
+t11=C_i_car(t7);
+t12=C_eqp(t11,lf[13]);
if(C_truep(t12)){
-if(C_truep((C_word)C_i_cadr(t7))){
+if(C_truep(C_i_cadr(t7))){
C_trace("c-backend.scm: 84 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t1,lf[14]);}
else{
C_trace("c-backend.scm: 84 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t1,lf[15]);}}
else{
-t13=(C_word)C_eqp(t11,lf[16]);
+t13=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));
+t14=C_i_cadr(t7);
+t15=C_fix(C_character_code(t14));
C_trace("c-backend.scm: 85 gen");
((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[17],t15,C_make_character(41));}
else{
-t14=(C_word)C_eqp(t11,lf[18]);
+t14=C_eqp(t11,lf[18]);
if(C_truep(t14)){
C_trace("c-backend.scm: 86 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t1,lf[19]);}
else{
-t15=(C_word)C_eqp(t11,lf[20]);
+t15=C_eqp(t11,lf[20]);
if(C_truep(t15)){
-t16=(C_word)C_i_cadr(t7);
+t16=C_i_cadr(t7);
C_trace("c-backend.scm: 87 gen");
((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[21],t16,C_make_character(41));}
else{
-t16=(C_word)C_eqp(t11,lf[22]);
+t16=C_eqp(t11,lf[22]);
if(C_truep(t16)){
C_trace("c-backend.scm: 88 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t1,lf[23]);}
@@ -13823,380 +13932,409 @@ 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]);
+t11=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));
+t12=C_i_car(t7);
+if(C_truep(C_i_vectorp(t12))){
+t13=C_i_vector_ref(t12,C_fix(0));
C_trace("c-backend.scm: 94 gen");
((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[26],t13,lf[27]);}
else{
-t13=(C_word)C_i_car(t7);
+t13=C_i_car(t7);
C_trace("c-backend.scm: 95 gen");
((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[28],t13,C_make_character(93));}}
else{
-t12=(C_word)C_eqp(t9,lf[29]);
+t12=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);
+t13=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2786,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
C_trace("c-backend.scm: 98 gen");
((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t13,C_SCHEME_TRUE,lf[32]);}
else{
-t13=(C_word)C_eqp(t9,lf[33]);
+t13=C_eqp(t9,lf[33]);
if(C_truep(t13)){
-t14=(C_word)C_i_car(t7);
+t14=C_i_car(t7);
C_trace("c-backend.scm: 107 gen");
((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t1,lf[34],t14);}
else{
-t14=(C_word)C_eqp(t9,lf[35]);
+t14=C_eqp(t9,lf[35]);
if(C_truep(t14)){
-t15=(C_word)C_i_car(t7);
+t15=C_i_car(t7);
t16=C_SCHEME_UNDEFINED;
t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2822,a[2]=((C_word*)t0)[5],a[3]=t17,tmp=(C_word)a,a+=4,tmp));
+t18=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2844,a[2]=((C_word*)t0)[5],a[3]=t17,tmp=(C_word)a,a+=4,tmp));
t19=((C_word*)t17)[1];
-f_2822(t19,t1,t5,t3,t15);}
+f_2844(t19,t1,t5,t3,t15);}
else{
-t15=(C_word)C_eqp(t9,lf[36]);
+t15=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]);}
+t16=C_i_car(t7);
+t17=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2898,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=t5,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 120 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t17,C_SCHEME_TRUE,t16,C_make_character(61));}
else{
-t16=(C_word)C_eqp(t9,lf[39]);
+t16=C_eqp(t9,lf[37]);
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]);}
+t17=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2924,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,a[6]=t7,tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 126 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t17,lf[39]);}
else{
-t17=(C_word)C_eqp(t9,lf[42]);
+t17=C_eqp(t9,lf[40]);
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]);}
+t18=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2951,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 131 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t18,lf[42]);}
else{
-t18=(C_word)C_eqp(t9,lf[44]);
+t18=C_eqp(t9,lf[43]);
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);
+t19=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2970,a[2]=t7,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
C_trace("c-backend.scm: 136 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t19,lf[47]);}
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t19,lf[44]);}
else{
-t19=(C_word)C_eqp(t9,lf[48]);
+t19=C_eqp(t9,lf[45]);
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);
+t20=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3003,a[2]=t7,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
C_trace("c-backend.scm: 143 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t20,lf[50]);}
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t20,lf[48]);}
else{
-t20=(C_word)C_eqp(t9,lf[51]);
+t20=C_eqp(t9,lf[49]);
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);
+t21=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3040,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
C_trace("c-backend.scm: 150 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t21,lf[53]);}
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t21,lf[51]);}
else{
-t21=(C_word)C_eqp(t9,lf[54]);
+t21=C_eqp(t9,lf[52]);
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));}
+t22=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3069,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 157 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t22,lf[54]);}
else{
-t22=(C_word)C_eqp(t9,lf[61]);
+t22=C_eqp(t9,lf[55]);
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]);}
+t23=C_i_car(t7);
+t24=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3101,a[2]=t5,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=t23,tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 165 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t24,lf[61],t23,C_make_character(44));}
else{
-t23=(C_word)C_eqp(t9,lf[64]);
+t23=C_eqp(t9,lf[62]);
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);}
+t24=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3172,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 175 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t24,lf[64]);}
else{
-t24=(C_word)C_eqp(t9,lf[65]);
+t24=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));}
+t25=C_i_car(t7);
+C_trace("c-backend.scm: 179 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t1,C_make_character(116),t25);}
else{
-t25=(C_word)C_eqp(t9,lf[66]);
+t25=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);}}
+t26=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3204,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=t5,tmp=(C_word)a,a+=6,tmp);
+t27=C_i_car(t7);
+C_trace("c-backend.scm: 182 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t26,C_make_character(116),t27,C_make_character(61));}
else{
-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]);}
+t26=C_eqp(t9,lf[67]);
+if(C_truep(t26)){
+t27=C_i_car(t7);
+t28=C_i_cadr(t7);
+if(C_truep(C_i_caddr(t7))){
+if(C_truep(t28)){
+C_trace("c-backend.scm: 191 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[68],t27,lf[69]);}
else{
-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]);}}}
+t29=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3246,a[2]=t27,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t30=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3250,a[2]=t29,tmp=(C_word)a,a+=3,tmp);
+t31=C_i_cadddr(t7);
+C_trace("c-backend.scm: 192 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[73]+1)))(3,*((C_word*)lf[73]+1),t30,t31);}}
else{
-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]);}
+C_trace("c-backend.scm: 193 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[74],t27,lf[75]);}
else{
-C_trace("c-backend.scm: 195 gen");
-((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t30,lf[85],t27,lf[86]);}}
+C_trace("c-backend.scm: 194 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[76],t27,lf[77]);}}}
else{
-t27=(C_word)C_eqp(t9,lf[87]);
+t27=C_eqp(t9,lf[78]);
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);
+t28=C_i_car(t7);
+t29=C_i_cadr(t7);
+t30=C_i_caddr(t7);
+t31=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3281,a[2]=t30,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
if(C_truep(t29)){
-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]);}
+C_trace("c-backend.scm: 201 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t31,lf[85],t28,lf[86]);}
else{
-t29=(C_word)C_eqp(t9,lf[98]);
+C_trace("c-backend.scm: 202 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t31,lf[87],t28,lf[88]);}}
+else{
+t28=C_eqp(t9,lf[89]);
+if(C_truep(t28)){
+t29=C_i_car(t7);
+t30=C_i_cadr(t7);
+t31=C_i_caddr(t7);
+if(C_truep(t30)){
+t32=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3329,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t33=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3343,a[2]=t29,a[3]=t32,tmp=(C_word)a,a+=4,tmp);
+t34=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3347,a[2]=t33,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 213 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[73]+1)))(3,*((C_word*)lf[73]+1),t34,t31);}
+else{
+t32=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3350,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t33=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3364,a[2]=t29,a[3]=t32,tmp=(C_word)a,a+=4,tmp);
+t34=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3368,a[2]=t33,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 218 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[73]+1)))(3,*((C_word*)lf[73]+1),t34,t31);}}
+else{
+t29=C_eqp(t9,lf[98]);
if(C_truep(t29)){
-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]);
+C_trace("c-backend.scm: 222 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t1,lf[99]);}
+else{
+t30=C_eqp(t9,lf[100]);
if(C_truep(t30)){
-t31=(C_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]);
+t31=C_i_cdr(t5);
+t32=C_i_length(t31);
+t33=t3;
+t34=C_fixnum_increase(t32);
+t35=C_i_cdr(t7);
+t36=C_i_pairp(t35);
+t37=(C_truep(t36)?C_i_cadr(t7):C_SCHEME_FALSE);
+t38=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_3401,a[2]=t36,a[3]=((C_word*)t0)[2],a[4]=t37,a[5]=t33,a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[5],a[8]=t32,a[9]=t34,a[10]=t3,a[11]=t31,a[12]=((C_word*)t0)[4],a[13]=t1,a[14]=t5,a[15]=t7,tmp=(C_word)a,a+=16,tmp);
+C_trace("c-backend.scm: 231 source-info->string");
+((C_proc3)C_retrieve_symbol_proc(lf[149]))(3,*((C_word*)lf[149]+1),t38,t37);}
+else{
+t31=C_eqp(t9,lf[150]);
if(C_truep(t31)){
-t32=(C_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]);
+t32=C_i_length(t5);
+t33=C_fixnum_increase(t32);
+t34=C_i_car(t7);
+t35=C_i_cadr(t7);
+t36=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_3989,a[2]=t35,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],a[5]=t33,a[6]=t5,a[7]=t3,a[8]=((C_word*)t0)[5],a[9]=t32,a[10]=t1,a[11]=t34,tmp=(C_word)a,a+=12,tmp);
+C_trace("c-backend.scm: 315 lambda-literal-closure-size");
+((C_proc3)C_retrieve_symbol_proc(lf[148]))(3,*((C_word*)lf[148]+1),t36,((C_word*)t0)[3]);}
+else{
+t32=C_eqp(t9,lf[154]);
if(C_truep(t32)){
-t33=(C_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]);
+t33=C_i_cdr(t5);
+t34=C_i_length(t33);
+t35=C_fixnum_increase(t34);
+t36=C_i_caddr(t7);
+t37=C_i_cadddr(t7);
+t38=C_eqp(t37,C_fix(0));
+t39=C_i_not(t38);
+t40=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4074,a[2]=t36,a[3]=t37,a[4]=t39,a[5]=((C_word*)t0)[5],a[6]=t3,a[7]=((C_word*)t0)[4],a[8]=t33,a[9]=t1,a[10]=t5,tmp=(C_word)a,a+=11,tmp);
+t41=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4078,a[2]=t40,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 343 find-lambda");
+t42=((C_word*)((C_word*)t0)[2])[1];
+f_2602(t42,t41,t36);}
+else{
+t33=C_eqp(t9,lf[156]);
if(C_truep(t33)){
-t34=(*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]);}
+t34=C_i_length(t5);
+t35=C_fixnum_plus(t34,C_fix(1));
+t36=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4097,a[2]=t3,a[3]=t5,a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t37=C_i_car(t7);
+C_trace("c-backend.scm: 360 gen");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t36,C_SCHEME_TRUE,lf[158],t37,lf[159],t35,lf[160]);}
else{
-t34=(C_word)C_eqp(t9,lf[162]);
+t34=C_eqp(t9,lf[161]);
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));}
+t35=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4116,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 365 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t35,C_SCHEME_TRUE,lf[163]);}
else{
-t35=(C_word)C_eqp(t9,lf[164]);
+t35=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);}
+t36=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4135,a[2]=t3,a[3]=t5,a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t37=C_i_car(t7);
+C_trace("c-backend.scm: 370 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t36,t37,C_make_character(40));}
else{
-t36=(C_word)C_eqp(t9,lf[167]);
+t36=C_eqp(t9,lf[165]);
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]);}
+t37=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4154,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t38=C_i_car(t7);
+t39=C_i_length(t5);
+C_trace("c-backend.scm: 375 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t37,t38,lf[166],t39);}
else{
-t37=(C_word)C_eqp(t9,lf[170]);
+t37=C_eqp(t9,lf[167]);
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]);}
+t38=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4190,a[2]=t1,a[3]=t7,tmp=(C_word)a,a+=4,tmp);
+t39=C_i_cadr(t7);
+C_trace("c-backend.scm: 383 foreign-result-conversion");
+((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t38,t39,lf[169]);}
else{
-t39=(C_word)C_eqp(t9,lf[182]);
+t38=C_eqp(t9,lf[170]);
+if(C_truep(t38)){
+t39=C_i_cadr(t7);
+t40=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4210,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t41=C_i_car(t7);
+t42=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4228,a[2]=t39,a[3]=t41,a[4]=t40,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 387 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t42,t39,lf[175]);}
+else{
+t39=C_eqp(t9,lf[176]);
if(C_truep(t39)){
-t40=(C_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]);}
+t40=C_i_car(t7);
+t41=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4244,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t42=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4258,a[2]=t40,a[3]=t41,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 393 foreign-result-conversion");
+((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t42,t40,lf[181]);}
else{
-t40=(C_word)C_eqp(t9,lf[188]);
+t40=C_eqp(t9,lf[182]);
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]);}
+t41=C_i_car(t7);
+t42=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4274,a[2]=t41,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+t43=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4302,a[2]=t42,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 399 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t43,t41,lf[187]);}
else{
-t41=(C_word)C_eqp(t9,lf[193]);
+t41=C_eqp(t9,lf[188]);
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);
+t42=C_i_car(t7);
+C_trace("c-backend.scm: 406 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t1,t42);}
+else{
+t42=C_eqp(t9,lf[189]);
+if(C_truep(t42)){
+t43=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4324,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t44=C_i_car(t7);
+C_trace("c-backend.scm: 409 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t43,lf[191],t44,C_make_character(61));}
+else{
+t43=C_eqp(t9,lf[192]);
+if(C_truep(t43)){
+t44=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4347,a[2]=t3,a[3]=t5,a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t45=C_i_car(t7);
C_trace("c-backend.scm: 414 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t42,lf[195]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t44,t45,lf[193]);}
+else{
+t44=C_eqp(t9,lf[194]);
+if(C_truep(t44)){
+t45=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4366,a[2]=t1,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=t7,tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 419 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t45,C_SCHEME_TRUE,lf[198]);}
else{
-C_trace("c-backend.scm: 422 bomb");
-((C_proc3)C_retrieve_symbol_proc(lf[8]))(3,*((C_word*)lf[8]+1),t1,lf[196]);}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+t45=C_eqp(t9,lf[199]);
+if(C_truep(t45)){
+t46=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4449,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 434 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t46,lf[201]);}
+else{
+t46=t2;
+t47=C_slot(t46,C_fix(1));
+C_trace("c-backend.scm: 442 bomb");
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t1,lf[202],t47);}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
-/* 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){
+/* k4447 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4449(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_4449,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4452,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 435 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k4450 in k4447 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4452(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4452,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4455,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 436 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[200]);}
-/* 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){
+/* k4453 in k4450 in k4447 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4455(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_4455,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4458,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 437 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k4456 in k4453 in k4450 in k4447 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4458(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_4458,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4461,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 438 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(58));}
-/* 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){
+/* k4459 in k4456 in k4453 in k4450 in k4447 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4461(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_4461,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4464,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_caddr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 439 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k4462 in k4459 in k4456 in k4453 in k4450 in k4447 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4464(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 420 gen");
+C_trace("c-backend.scm: 440 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-/* 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){
+/* k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4366(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_4366,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4369,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=C_i_car(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 420 expr");
t4=((C_word*)((C_word*)t0)[4])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[3]);}
+f_2647(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){
+/* k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4369(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_4369,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4372,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 421 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[197]);}
-/* 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){
+/* k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4372(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14206,17 +14344,17 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_4372,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[6]);
+t3=C_i_cdr(((C_word*)t0)[5]);
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4279,a[2]=t5,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4385,a[2]=t5,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t7=((C_word*)t5)[1];
-f_4279(t7,((C_word*)t0)[2],t2,t3);}
+f_4385(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){
+/* doloop509 in k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_4385(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -14224,368 +14362,412 @@ 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));
+C_save_and_reclaim((void*)trf_4385,NULL,4,t0,t1,t2,t3);}
+t4=C_eqp(t2,C_fix(0));
if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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]);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4395,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 425 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,lf[195]);}
else{
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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]);}}
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4408,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[2],a[6]=t3,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
+C_trace("c-backend.scm: 428 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,lf[196]);}}
-/* 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){
+/* k4406 in doloop509 in k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4408(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_4408,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4411,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+t3=C_i_car(((C_word*)t0)[6]);
+C_trace("c-backend.scm: 429 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k4409 in k4406 in doloop509 in k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4411(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_4411,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4414,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+C_trace("c-backend.scm: 430 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(58));}
-/* 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){
+/* k4412 in k4409 in k4406 in doloop509 in k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4414(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_4414,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4417,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+t3=C_i_cadr(((C_word*)t0)[6]);
+C_trace("c-backend.scm: 431 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k4415 in k4412 in k4409 in k4406 in doloop509 in k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4417(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_fixnum_decrease(((C_word*)t0)[5]);
-t3=(C_word)C_i_cddr(((C_word*)t0)[4]);
+t2=C_fixnum_decrease(((C_word*)t0)[5]);
+t3=C_i_cddr(((C_word*)t0)[4]);
t4=((C_word*)((C_word*)t0)[3])[1];
-f_4279(t4,((C_word*)t0)[2],t2,t3);}
+f_4385(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){
+/* k4393 in doloop509 in k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4395(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_4395,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4398,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 426 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k4396 in k4393 in doloop509 in k4370 in k4367 in k4364 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4398(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 407 gen");
+C_trace("c-backend.scm: 427 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(125));}
-/* 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){
+/* k4345 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4347(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4347,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4350,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 415 expr-args");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_4493(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k4348 in k4345 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4350(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 416 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
+
+/* k4322 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4324(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4324,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4327,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 410 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2647(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k4325 in k4322 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4327(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 411 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[190]);}
+
+/* k4300 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4302(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 392 gen");
+C_trace("c-backend.scm: 399 gen");
((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[185],t1,lf[186]);}
-/* 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){
+/* k4272 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4274(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_4274,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4277,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=C_i_car(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 400 expr");
t4=((C_word*)((C_word*)t0)[4])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[3]);}
+f_2647(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){
+/* k4275 in k4272 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4277(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_4277,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4280,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4294,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 401 foreign-argument-conversion");
((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t3,((C_word*)t0)[2]);}
-/* 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){
+/* k4292 in k4275 in k4272 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4294(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 394 gen");
+C_trace("c-backend.scm: 401 gen");
((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[184],t1);}
-/* 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){
+/* k4278 in k4275 in k4272 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4280(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_4280,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4283,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 402 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k4281 in k4278 in k4275 in k4272 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4283(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 396 gen");
+C_trace("c-backend.scm: 403 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[183]);}
-/* 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){
+/* k4256 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4258(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_4258,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4262,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 393 foreign-type-declaration");
((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t2,((C_word*)t0)[2],lf[180]);}
-/* 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){
+/* k4260 in k4256 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4262(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 386 gen");
+C_trace("c-backend.scm: 393 gen");
((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[178],t1,lf[179]);}
-/* 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){
+/* k4242 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4244(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_4244,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4247,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 394 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k4245 in k4242 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4247(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 388 gen");
+C_trace("c-backend.scm: 395 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[177]);}
-/* 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){
+/* k4226 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4228(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_4228,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4232,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 387 foreign-argument-conversion");
((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k4230 in k4226 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4232(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 380 gen");
+C_trace("c-backend.scm: 387 gen");
((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),((C_word*)t0)[4],C_make_character(40),((C_word*)t0)[3],lf[172],((C_word*)t0)[2],C_make_character(41),t1);}
-/* 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){
+/* k4208 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4210(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_4210,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4213,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 388 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k4211 in k4208 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4213(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 382 gen");
+C_trace("c-backend.scm: 389 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[171]);}
-/* 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){
+/* k4188 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4190(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_i_car(((C_word*)t0)[3]);
-C_trace("c-backend.scm: 376 gen");
+t2=C_i_car(((C_word*)t0)[3]);
+C_trace("c-backend.scm: 383 gen");
((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],t1,t2,C_make_character(41));}
-/* 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){
+/* k4152 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4154(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_4154,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4157,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_i_pairp(((C_word*)t0)[4]))){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4166,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 378 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,C_make_character(44));}
else{
-C_trace("c-backend.scm: 373 gen");
+C_trace("c-backend.scm: 380 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_make_character(41));}}
-/* 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){
+/* k4164 in k4152 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4166(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 372 expr-args");
+C_trace("c-backend.scm: 379 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]);}
+f_4493(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){
+/* k4155 in k4152 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4157(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 373 gen");
+C_trace("c-backend.scm: 380 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-/* 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){
+/* k4133 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4135(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_4135,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4138,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 371 expr-args");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_4378(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_4493(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){
+/* k4136 in k4133 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4138(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 365 gen");
+C_trace("c-backend.scm: 372 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-/* 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){
+/* k4114 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4116(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_4116,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4119,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 366 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k4117 in k4114 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4119(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 360 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[160]);}
+C_trace("c-backend.scm: 367 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[162]);}
-/* 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){
+/* k4095 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4097(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_4097,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4100,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 361 expr-args");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_4378(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_4493(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){
+/* k4098 in k4095 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4100(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 355 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[155]);}
+C_trace("c-backend.scm: 362 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[157]);}
-/* 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){
+/* k4076 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4078(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 336 lambda-literal-closure-size");
-((C_proc3)C_retrieve_symbol_proc(lf[146]))(3,*((C_word*)lf[146]+1),((C_word*)t0)[2],t1);}
+C_trace("c-backend.scm: 343 lambda-literal-closure-size");
+((C_proc3)C_retrieve_symbol_proc(lf[148]))(3,*((C_word*)lf[148]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k4072 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4074(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14593,117 +14775,117 @@ 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_save_and_reclaim((void*)tr2,(void*)f_4074,2,t0,t1);}
+t2=C_eqp(t1,C_fix(0));
+t3=C_i_car(((C_word*)t0)[10]);
+t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4022,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+C_trace("c-backend.scm: 345 gen");
((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t4,((C_word*)t0)[2],C_make_character(40));}
-/* 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){
+/* k4020 in k4072 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4022(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_4022,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4025,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
if(C_truep(((C_word*)t0)[3])){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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));}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4055,a[2]=((C_word*)t0)[9],a[3]=t2,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 347 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t3,lf[155],((C_word*)t0)[2],C_make_character(41));}
else{
t3=t2;
-f_3974(2,t3,C_SCHEME_UNDEFINED);}}
+f_4025(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){
+/* k4053 in k4020 in k4072 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4055(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
-t2=(C_word)C_i_not(((C_word*)t0)[4]);
+t2=C_i_not(((C_word*)t0)[4]);
if(C_truep(t2)){
if(C_truep(t2)){
-C_trace("c-backend.scm: 341 gen");
+C_trace("c-backend.scm: 348 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_make_character(44));}
else{
t3=C_SCHEME_UNDEFINED;
t4=((C_word*)t0)[3];
-f_3974(2,t4,t3);}}
+f_4025(2,t4,t3);}}
else{
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[2]))){
-C_trace("c-backend.scm: 341 gen");
+if(C_truep(C_i_pairp(((C_word*)t0)[2]))){
+C_trace("c-backend.scm: 348 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],C_make_character(44));}
else{
t3=C_SCHEME_UNDEFINED;
t4=((C_word*)t0)[3];
-f_3974(2,t4,t3);}}}
+f_4025(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){
+/* k4023 in k4020 in k4072 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4025(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_4025,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4028,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
if(C_truep(((C_word*)t0)[4])){
t3=t2;
-f_3977(2,t3,C_SCHEME_UNDEFINED);}
+f_4028(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");
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4043,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 350 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t3,((C_word*)t0)[2],((C_word*)t0)[5]);}}
+f_2647(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){
+/* k4041 in k4023 in k4020 in k4072 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4043(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-if(C_truep((C_word)C_i_pairp(((C_word*)t0)[3]))){
-C_trace("c-backend.scm: 344 gen");
+if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
+C_trace("c-backend.scm: 351 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(44));}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[2];
-f_3977(2,t3,t2);}}
+f_4028(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){
+/* k4026 in k4023 in k4020 in k4072 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4028(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_4028,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4031,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_i_pairp(((C_word*)t0)[4]))){
+C_trace("c-backend.scm: 352 expr-args");
t3=((C_word*)((C_word*)t0)[3])[1];
-f_4378(t3,t2,((C_word*)t0)[4],((C_word*)t0)[2]);}
+f_4493(t3,t2,((C_word*)t0)[4],((C_word*)t0)[2]);}
else{
-C_trace("c-backend.scm: 346 gen");
+C_trace("c-backend.scm: 353 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[5],C_make_character(41));}}
-/* 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){
+/* k4029 in k4026 in k4023 in k4020 in k4072 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_4031(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 346 gen");
+C_trace("c-backend.scm: 353 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-/* 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){
+/* k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3989(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14711,81 +14893,81 @@ 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));
+C_save_and_reclaim((void*)tr2,(void*)f_3989,2,t0,t1);}
+t2=C_eqp(t1,C_fix(0));
if(C_truep(((C_word*)t0)[11])){
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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]);}
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3860,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],tmp=(C_word)a,a+=8,tmp);
+C_trace("c-backend.scm: 317 lambda-literal-temporaries");
+((C_proc3)C_retrieve_symbol_proc(lf[106]))(3,*((C_word*)lf[106]+1),t3,((C_word*)t0)[4]);}
else{
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3973,a[2]=t2,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[10],tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 330 gen");
((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t3,((C_word*)t0)[2],C_make_character(40));}}
-/* 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){
+/* k3971 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3973(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_3973,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3976,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f10988,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 325 expr-args");
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11150,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 332 expr-args");
t4=((C_word*)((C_word*)t0)[5])[1];
-f_4378(t4,t3,((C_word*)t0)[4],((C_word*)t0)[3]);}
+f_4493(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]);}}
+C_trace("c-backend.scm: 331 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[153]);}}
-/* 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){
+/* f11150 in k3971 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f11150(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 326 gen");
+C_trace("c-backend.scm: 333 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-/* 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){
+/* k3974 in k3971 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3976(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3976,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3979,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 332 expr-args");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_4378(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_4493(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){
+/* k3977 in k3974 in k3971 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3979(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 326 gen");
+C_trace("c-backend.scm: 333 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-/* 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){
+/* k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3860(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_3860,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3863,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+t3=C_fixnum_plus(t1,((C_word*)t0)[2]);
+C_trace("c-backend.scm: 318 iota");
+((C_proc5)C_retrieve_symbol_proc(lf[60]))(5,*((C_word*)lf[60]+1),t2,((C_word*)t0)[6],t3,C_fix(1));}
-/* 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){
+/* k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3863(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14794,16 +14976,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3863,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3866,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3869,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3920,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t6=((C_word*)t4)[1];
-f_3869(t6,t2,((C_word*)t0)[2],t1);}
+f_3920(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){
+/* loop407 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_3920(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -14815,83 +14997,83 @@ 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);
+C_save_and_reclaim((void*)trf_3920,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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");
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3928,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3941,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t8=C_slot(t2,C_fix(0));
+t9=C_slot(t3,C_fix(0));
+C_trace("g418419");
t10=t6;
-f_3877(t10,t7,t8,t9);}
+f_3928(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){
+/* k3939 in loop407 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3941(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=C_slot(((C_word*)t0)[5],C_fix(1));
+t3=C_slot(((C_word*)t0)[4],C_fix(1));
t4=((C_word*)((C_word*)t0)[3])[1];
-f_3869(t4,((C_word*)t0)[2],t2,t3);}
+f_3920(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){
+/* g418 in loop407 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_3928(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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_save_and_reclaim((void*)trf_3928,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3932,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 321 gen");
((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t4,C_SCHEME_TRUE,C_make_character(116),t3,C_make_character(61));}
-/* 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){
+/* k3930 in g418 in loop407 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3932(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3932,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3935,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 322 expr");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_2625(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_2647(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){
+/* k3933 in k3930 in g418 in loop407 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3935(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 316 gen");
+C_trace("c-backend.scm: 323 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(59));}
-/* 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){
+/* k3864 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3866(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_3866,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3869,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3876,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 327 iota");
+((C_proc5)C_retrieve_symbol_proc(lf[60]))(5,*((C_word*)lf[60]+1),t3,((C_word*)t0)[2],C_fix(1),C_fix(1));}
-/* 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){
+/* k3874 in k3864 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3876(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14899,15 +15081,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3876,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3827,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3878,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_3827(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+f_3878(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){
+/* loop428 in k3874 in k3864 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_3878(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -14918,42 +15100,42 @@ 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);
+C_save_and_reclaim((void*)trf_3878,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));}
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3893,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t7=C_slot(t2,C_fix(0));
+t8=C_slot(t3,C_fix(0));
+C_trace("c-backend.scm: 326 gen");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t6,C_SCHEME_TRUE,C_make_character(116),t8,lf[152],t7,C_make_character(59));}
else{
t6=C_SCHEME_UNDEFINED;
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-/* 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){
+/* k3891 in loop428 in k3874 in k3864 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3893(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=C_slot(((C_word*)t0)[5],C_fix(1));
+t3=C_slot(((C_word*)t0)[4],C_fix(1));
t4=((C_word*)((C_word*)t0)[3])[1];
-f_3827(t4,((C_word*)t0)[2],t2,t3);}
+f_3878(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){
+/* k3867 in k3864 in k3861 in k3858 in k3987 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3869(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 328 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[151]);}
-/* 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){
+/* k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3401(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14961,19 +15143,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3401,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_3404,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],tmp=(C_word)a,a+=16,tmp);
if(C_truep(((C_word*)t0)[2])){
-t3=(C_word)C_i_cddr(((C_word*)t0)[15]);
-t4=(C_word)C_i_pairp(t3);
+t3=C_i_cddr(((C_word*)t0)[15]);
+t4=C_i_pairp(t3);
t5=t2;
-f_3353(t5,(C_truep(t4)?(C_word)C_i_caddr(((C_word*)t0)[15]):C_SCHEME_FALSE));}
+f_3404(t5,(C_truep(t4)?C_i_caddr(((C_word*)t0)[15]):C_SCHEME_FALSE));}
else{
t3=t2;
-f_3353(t3,C_SCHEME_FALSE);}}
+f_3404(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){
+/* k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_3404(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14982,37 +15164,37 @@ 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);
+C_save_and_reclaim((void*)trf_3404,NULL,2,t0,t1);}
+t2=(C_truep(t1)?C_i_cadddr(((C_word*)t0)[15]):C_SCHEME_FALSE);
+t3=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_3410,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t2,a[10]=t1,a[11]=((C_word*)t0)[9],a[12]=((C_word*)t0)[10],a[13]=((C_word*)t0)[11],a[14]=((C_word*)t0)[12],a[15]=((C_word*)t0)[13],a[16]=((C_word*)t0)[14],tmp=(C_word)a,a+=17,tmp);
if(C_truep(t2)){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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");
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3806,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3810,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 234 find-lambda");
t6=((C_word*)((C_word*)t0)[2])[1];
-f_2580(t6,t5,t1);}
+f_2602(t6,t5,t1);}
else{
t4=t3;
-f_3359(t4,C_SCHEME_FALSE);}}
+f_3410(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){
+/* k3808 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3810(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 227 lambda-literal-closure-size");
-((C_proc3)C_retrieve_symbol_proc(lf[146]))(3,*((C_word*)lf[146]+1),((C_word*)t0)[2],t1);}
+C_trace("c-backend.scm: 234 lambda-literal-closure-size");
+((C_proc3)C_retrieve_symbol_proc(lf[148]))(3,*((C_word*)lf[148]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k3804 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3806(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_3359(t2,(C_word)C_eqp(t1,C_fix(0)));}
+f_3410(t2,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){
+/* k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_3410(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15025,60 +15207,60 @@ 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);
+C_save_and_reclaim((void*)trf_3410,NULL,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[16]);
+t3=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_3416,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=t2,tmp=(C_word)a,a+=16,tmp);
if(C_truep(((C_word*)t0)[3])){
-if(C_truep(C_retrieve(lf[137]))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3741,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_retrieve(lf[139]))){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3792,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
t5=((C_word*)t0)[2];
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2610,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2632,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
C_trace("c-backend.scm: 71 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t6,t5);}
+((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t6,t5);}
else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3748,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3799,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
t5=((C_word*)t0)[2];
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f10980,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11142,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
C_trace("c-backend.scm: 72 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t6,t5);}}
+((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t6,t5);}}
else{
t4=t3;
-f_3365(2,t4,C_SCHEME_UNDEFINED);}}
+f_3416(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){
+/* f11142 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f11142(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("c-backend.scm: 72 string-translate*");
-((C_proc4)C_retrieve_symbol_proc(lf[80]))(4,*((C_word*)lf[80]+1),((C_word*)t0)[2],t1,lf[145]);}
+((C_proc4)C_retrieve_symbol_proc(lf[81]))(4,*((C_word*)lf[81]+1),((C_word*)t0)[2],t1,lf[147]);}
-/* 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){
+/* k3797 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3799(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 239 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[145],t1,lf[146]);}
-/* 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){
+/* k2630 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2632(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("c-backend.scm: 71 string-translate");
-((C_proc5)C_retrieve_symbol_proc(lf[140]))(5,*((C_word*)lf[140]+1),((C_word*)t0)[2],t1,lf[141],lf[142]);}
+((C_proc5)C_retrieve_symbol_proc(lf[142]))(5,*((C_word*)lf[142]+1),((C_word*)t0)[2],t1,lf[143],lf[144]);}
-/* 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){
+/* k3790 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3792(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 238 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[140],t1,lf[141]);}
-/* 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){
+/* k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3416(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15096,45 +15278,45 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3416,2,t0,t1);}
+t2=C_slot(((C_word*)t0)[15],C_fix(1));
+t3=C_eqp(lf[33],t2);
if(C_truep(t3)){
-t4=(C_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]);}
+t4=C_slot(((C_word*)t0)[15],C_fix(2));
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3433,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[14],tmp=(C_word)a,a+=6,tmp);
+t6=C_i_car(t4);
+C_trace("c-backend.scm: 242 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,t6,C_make_character(40),((C_word*)t0)[10],lf[102]);}
else{
if(C_truep(((C_word*)t0)[9])){
-t4=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_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");
+t4=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3452,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[12],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[6],a[11]=((C_word*)t0)[7],a[12]=((C_word*)t0)[10],a[13]=((C_word*)t0)[8],a[14]=((C_word*)t0)[14],tmp=(C_word)a,a+=15,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3614,a[2]=((C_word*)t0)[5],a[3]=t4,a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 246 lambda-literal-id");
((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t5,((C_word*)t0)[5]);}
else{
-t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3620,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[12],a[8]=((C_word*)t0)[13],a[9]=((C_word*)t0)[14],a[10]=((C_word*)t0)[15],tmp=(C_word)a,a+=11,tmp);
+t5=C_slot(((C_word*)t0)[15],C_fix(1));
+t6=C_eqp(lf[67],t5);
if(C_truep(t6)){
-t7=C_retrieve(lf[129]);
+t7=C_retrieve(lf[131]);
if(C_truep(t7)){
t8=t4;
-f_3569(t8,C_SCHEME_FALSE);}
+f_3620(t8,C_SCHEME_FALSE);}
else{
-t8=C_retrieve(lf[134]);
+t8=C_retrieve(lf[136]);
if(C_truep(t8)){
t9=t4;
-f_3569(t9,C_SCHEME_FALSE);}
+f_3620(t9,C_SCHEME_FALSE);}
else{
-t9=(C_word)C_i_car(((C_word*)t0)[2]);
+t9=C_i_car(((C_word*)t0)[2]);
t10=t4;
-f_3569(t10,(C_word)C_i_not(t9));}}}
+f_3620(t10,C_i_not(t9));}}}
else{
t7=t4;
-f_3569(t7,C_SCHEME_FALSE);}}}}
+f_3620(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){
+/* k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_3620(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15147,49 +15329,49 @@ 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);}
+C_save_and_reclaim((void*)trf_3620,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);
+t2=C_slot(((C_word*)t0)[10],C_fix(2));
+t3=C_i_car(t2);
+t4=C_i_cadr(t2);
+t5=C_i_caddr(t2);
t6=C_SCHEME_FALSE;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_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]);}
+t8=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_3640,a[2]=t3,a[3]=t2,a[4]=t4,a[5]=t5,a[6]=t7,a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[9],tmp=(C_word)a,a+=12,tmp);
+C_trace("c-backend.scm: 280 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t8,C_SCHEME_TRUE,lf[126],((C_word*)t0)[5],lf[127]);}
else{
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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");
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3709,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+C_trace("c-backend.scm: 299 gen");
((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,C_make_character(116),((C_word*)t0)[4],C_make_character(61));}}
-/* 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){
+/* k3707 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3709(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3709,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3712,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
+C_trace("c-backend.scm: 300 expr");
t3=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t3,t2,((C_word*)t0)[2],((C_word*)t0)[7]);}
+f_2647(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){
+/* k3710 in k3707 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3712(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3712,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3715,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
+C_trace("c-backend.scm: 301 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,C_make_character(59),C_SCHEME_TRUE,lf[137],((C_word*)t0)[4],lf[138]);}
-/* 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){
+/* k3713 in k3710 in k3707 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3715(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15198,65 +15380,65 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3715,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3718,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
+t3=C_retrieve(lf[131]);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3730,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
if(C_truep(t3)){
t5=t4;
-f_3679(t5,t3);}
+f_3730(t5,t3);}
else{
-t5=C_retrieve(lf[134]);
+t5=C_retrieve(lf[136]);
t6=t4;
-f_3679(t6,(C_truep(t5)?t5:(C_word)C_i_car(((C_word*)t0)[2])));}}
+f_3730(t6,(C_truep(t5)?t5: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){
+/* k3728 in k3713 in k3710 in k3707 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_3730(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 304 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[132],((C_word*)t0)[2],lf[133]);}
else{
-C_trace("c-backend.scm: 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]);}}
+C_trace("c-backend.scm: 305 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[134],((C_word*)t0)[2],lf[135]);}}
-/* 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){
+/* k3716 in k3713 in k3710 in k3707 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3718(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_3718,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3721,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 306 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,lf[129],((C_word*)t0)[3],lf[130],((C_word*)t0)[2],C_make_character(44));}
-/* 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){
+/* k3719 in k3716 in k3713 in k3710 in k3707 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3721(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3721,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3724,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 307 expr-args");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_4378(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_4493(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){
+/* k3722 in k3719 in k3716 in k3713 in k3710 in k3707 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3724(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 301 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[126]);}
+C_trace("c-backend.scm: 308 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[128]);}
-/* 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){
+/* k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3640(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15268,71 +15450,71 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3640,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3643,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)t0)[5])){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3656,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3681,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 282 number->string");
C_number_to_string(3,0,t4,((C_word*)t0)[2]);}
else{
if(C_truep(((C_word*)t0)[4])){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3688,a[2]=t2,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3695,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 289 number->string");
C_number_to_string(3,0,t4,((C_word*)t0)[2]);}
else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3699,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3706,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 293 number->string");
C_number_to_string(3,0,t4,((C_word*)t0)[2]);}}}
-/* 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){
+/* k3704 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3706(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 293 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[124],t1,lf[125]);}
-/* 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){
+/* k3697 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3699(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,t1);
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 294 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[122],((C_word*)t0)[2],lf[123]);}
-/* 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){
+/* k3693 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3695(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 289 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[120],t1,lf[121]);}
-/* 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){
+/* k3686 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3688(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 290 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[118],((C_word*)((C_word*)t0)[3])[1],lf[119]);}
-/* 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){
+/* k3679 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3681(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 282 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[115]+1)))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[116],t1,lf[117]);}
-/* 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){
+/* k3654 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3656(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15341,83 +15523,83 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3656,2,t0,t1);}
t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
if(C_truep(((C_word*)t0)[4])){
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 284 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[111],((C_word*)((C_word*)t0)[5])[1],lf[112]);}
else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);}}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3669,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3673,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=C_i_cadddr(((C_word*)t0)[2]);
+C_trace("c-backend.scm: 286 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[73]+1)))(3,*((C_word*)lf[73]+1),t4,t5);}}
-/* 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){
+/* k3671 in k3654 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3673(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 279 c-ify-string");
-((C_proc3)C_retrieve_symbol_proc(lf[71]))(3,*((C_word*)lf[71]+1),((C_word*)t0)[2],t1);}
+C_trace("c-backend.scm: 286 c-ify-string");
+((C_proc3)C_retrieve_symbol_proc(lf[72]))(3,*((C_word*)lf[72]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k3667 in k3654 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3669(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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));}
+C_trace("c-backend.scm: 285 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[113],((C_word*)((C_word*)t0)[2])[1],lf[114],t1,C_make_character(41));}
-/* 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){
+/* k3641 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3643(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_3643,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3646,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 295 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,lf[110],((C_word*)t0)[3],C_make_character(44),((C_word*)((C_word*)t0)[2])[1],C_make_character(44));}
-/* 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){
+/* k3644 in k3641 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3646(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3646,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3649,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 296 expr-args");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_4378(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_4493(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){
+/* k3647 in k3644 in k3641 in k3638 in k3618 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3649(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 290 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[107]);}
+C_trace("c-backend.scm: 297 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[109]);}
-/* 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){
+/* k3612 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3614(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_eqp(((C_word*)t0)[4],t1);
+t2=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]);}
+C_trace("c-backend.scm: 247 lambda-literal-looping");
+((C_proc3)C_retrieve_symbol_proc(lf[108]))(3,*((C_word*)lf[108]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
else{
t3=((C_word*)t0)[3];
-f_3401(2,t3,C_SCHEME_FALSE);}}
+f_3452(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){
+/* k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3452(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15425,134 +15607,134 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3452,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3455,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[13],a[8]=((C_word*)t0)[14],tmp=(C_word)a,a+=9,tmp);
+C_trace("c-backend.scm: 248 lambda-literal-temporaries");
+((C_proc3)C_retrieve_symbol_proc(lf[106]))(3,*((C_word*)lf[106]+1),t2,((C_word*)t0)[7]);}
else{
-t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3574,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[14],tmp=(C_word)a,a+=11,tmp);
if(C_truep(((C_word*)t0)[5])){
t3=t2;
-f_3523(2,t3,C_SCHEME_UNDEFINED);}
+f_3574(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");
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3598,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[10],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 263 gen");
((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,C_make_character(116),((C_word*)t0)[4],C_make_character(61));}}}
-/* 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){
+/* k3596 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3598(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3598,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3601,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 264 expr");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_2625(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_2647(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){
+/* k3599 in k3596 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3601(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 258 gen");
+C_trace("c-backend.scm: 265 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(59));}
-/* 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){
+/* k3572 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3574(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3574,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3577,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
+C_trace("c-backend.scm: 266 gen");
((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,((C_word*)t0)[2],C_make_character(40));}
-/* 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){
+/* k3575 in k3572 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3577(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_3577,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3580,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)t0)[3])){
t3=t2;
-f_3529(2,t3,C_SCHEME_UNDEFINED);}
+f_3580(2,t3,C_SCHEME_UNDEFINED);}
else{
-C_trace("c-backend.scm: 260 gen");
+C_trace("c-backend.scm: 267 gen");
((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,((C_word*)t0)[2],C_make_character(44));}}
-/* 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){
+/* k3578 in k3575 in k3572 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3580(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_3580,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3583,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
if(C_truep(((C_word*)t0)[3])){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f10975,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
-C_trace("c-backend.scm: 262 expr-args");
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11137,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 269 expr-args");
t4=((C_word*)((C_word*)t0)[6])[1];
-f_4378(t4,t3,((C_word*)t0)[5],((C_word*)t0)[4]);}
+f_4493(t4,t3,((C_word*)t0)[5],((C_word*)t0)[4]);}
else{
-C_trace("c-backend.scm: 261 gen");
+C_trace("c-backend.scm: 268 gen");
((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_make_character(116),((C_word*)t0)[2],C_make_character(44));}}
-/* 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){
+/* f11137 in k3578 in k3575 in k3572 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f11137(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 263 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[105]);}
+C_trace("c-backend.scm: 270 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[107]);}
-/* 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){
+/* k3581 in k3578 in k3575 in k3572 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3583(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3583,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3586,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 269 expr-args");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_4378(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_4493(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){
+/* k3584 in k3581 in k3578 in k3575 in k3572 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3586(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 263 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[105]);}
+C_trace("c-backend.scm: 270 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[107]);}
-/* 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){
+/* k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3455(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_3455,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3458,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
+t3=C_fixnum_plus(t1,((C_word*)t0)[6]);
+C_trace("c-backend.scm: 249 iota");
+((C_proc5)C_retrieve_symbol_proc(lf[60]))(5,*((C_word*)lf[60]+1),t2,((C_word*)t0)[5],t3,C_fix(1));}
-/* 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){
+/* k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3458(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15561,16 +15743,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3458,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3461,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3470,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3521,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t6=((C_word*)t4)[1];
-f_3470(t6,t2,((C_word*)t0)[2],t1);}
+f_3521(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){
+/* loop286 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_3521(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -15582,83 +15764,83 @@ 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);
+C_save_and_reclaim((void*)trf_3521,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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");
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3529,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3542,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t8=C_slot(t2,C_fix(0));
+t9=C_slot(t3,C_fix(0));
+C_trace("g297298");
t10=t6;
-f_3478(t10,t7,t8,t9);}
+f_3529(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){
+/* k3540 in loop286 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3542(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=C_slot(((C_word*)t0)[5],C_fix(1));
+t3=C_slot(((C_word*)t0)[4],C_fix(1));
t4=((C_word*)((C_word*)t0)[3])[1];
-f_3470(t4,((C_word*)t0)[2],t2,t3);}
+f_3521(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){
+/* g297 in loop286 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_3529(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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_save_and_reclaim((void*)trf_3529,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3533,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 252 gen");
((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t4,C_SCHEME_TRUE,C_make_character(116),t3,C_make_character(61));}
-/* 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){
+/* k3531 in g297 in loop286 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3533(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3533,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3536,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 253 expr");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_2625(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_2647(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){
+/* k3534 in k3531 in g297 in loop286 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3536(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 247 gen");
+C_trace("c-backend.scm: 254 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(59));}
-/* 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){
+/* k3459 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3461(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_3461,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3464,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3477,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 258 iota");
+((C_proc5)C_retrieve_symbol_proc(lf[60]))(5,*((C_word*)lf[60]+1),t3,((C_word*)t0)[2],C_fix(1),C_fix(1));}
-/* 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){
+/* k3475 in k3459 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3477(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15666,15 +15848,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3477,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3428,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3479,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_3428(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+f_3479(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){
+/* loop307 in k3475 in k3459 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_3479(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -15685,181 +15867,181 @@ 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);
+C_save_and_reclaim((void*)trf_3479,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));}
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3494,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t7=C_slot(t2,C_fix(0));
+t8=C_slot(t3,C_fix(0));
+C_trace("c-backend.scm: 257 gen");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t6,C_SCHEME_TRUE,C_make_character(116),t8,lf[105],t7,C_make_character(59));}
else{
t6=C_SCHEME_UNDEFINED;
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-/* 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){
+/* k3492 in loop307 in k3475 in k3459 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3494(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=C_slot(((C_word*)t0)[5],C_fix(1));
+t3=C_slot(((C_word*)t0)[4],C_fix(1));
t4=((C_word*)((C_word*)t0)[3])[1];
-f_3428(t4,((C_word*)t0)[2],t2,t3);}
+f_3479(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){
+/* k3462 in k3459 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3464(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_3464,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3467,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
if(C_truep(((C_word*)t0)[3])){
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 260 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[4],C_SCHEME_TRUE,lf[103]);}
else{
-C_trace("c-backend.scm: 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));}}
+C_trace("c-backend.scm: 259 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[104],((C_word*)t0)[2],C_make_character(59));}}
-/* 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){
+/* k3465 in k3462 in k3459 in k3456 in k3453 in k3450 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3467(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 260 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_SCHEME_TRUE,lf[103]);}
-/* 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){
+/* k3431 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3433(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3433,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3436,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 243 expr-args");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_4378(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_4493(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){
+/* k3434 in k3431 in k3414 in k3408 in k3402 in k3399 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3436(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 237 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[99]);}
+C_trace("c-backend.scm: 244 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[101]);}
-/* 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){
+/* k3366 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3368(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3368,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11129,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-backend.scm: 72 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t2,t1);}
+((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+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){
+/* f11129 in k3366 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f11129(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("c-backend.scm: 72 string-translate*");
-((C_proc4)C_retrieve_symbol_proc(lf[80]))(4,*((C_word*)lf[80]+1),((C_word*)t0)[2],t1,lf[95]);}
+((C_proc4)C_retrieve_symbol_proc(lf[81]))(4,*((C_word*)lf[81]+1),((C_word*)t0)[2],t1,lf[97]);}
-/* 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){
+/* k3362 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3364(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 217 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[94],((C_word*)t0)[2],lf[95],t1,lf[96]);}
-/* 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){
+/* k3348 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3350(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3350,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3353,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 219 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k3351 in k3348 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3353(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 213 gen");
+C_trace("c-backend.scm: 220 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-/* 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){
+/* k3345 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3347(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3347,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11124,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-backend.scm: 72 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t2,t1);}
+((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+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){
+/* f11124 in k3345 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f11124(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("c-backend.scm: 72 string-translate*");
-((C_proc4)C_retrieve_symbol_proc(lf[80]))(4,*((C_word*)lf[80]+1),((C_word*)t0)[2],t1,lf[91]);}
+((C_proc4)C_retrieve_symbol_proc(lf[81]))(4,*((C_word*)lf[81]+1),((C_word*)t0)[2],t1,lf[93]);}
-/* 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){
+/* k3341 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3343(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 212 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[90],((C_word*)t0)[2],lf[91],t1,lf[92]);}
-/* 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){
+/* k3327 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3329(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3329,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3332,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 214 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k3330 in k3327 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3332(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 208 gen");
+C_trace("c-backend.scm: 215 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(59));}
-/* 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){
+/* k3279 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3281(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15867,130 +16049,130 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3281,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3284,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3298,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3302,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 203 ##sys#symbol->qualified-string");
+((C_proc3)C_retrieve_symbol_proc(lf[84]))(3,*((C_word*)lf[84]+1),t4,((C_word*)t0)[2]);}
-/* 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){
+/* k3300 in k3279 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3302(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3302,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11119,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-backend.scm: 72 ->string");
-((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t2,t1);}
+((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+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){
+/* f11119 in k3300 in k3279 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f11119(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("c-backend.scm: 72 string-translate*");
-((C_proc4)C_retrieve_symbol_proc(lf[80]))(4,*((C_word*)lf[80]+1),((C_word*)t0)[2],t1,lf[81]);}
+((C_proc4)C_retrieve_symbol_proc(lf[81]))(4,*((C_word*)lf[81]+1),((C_word*)t0)[2],t1,lf[82]);}
-/* 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){
+/* k3296 in k3279 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3298(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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]);}
+C_trace("c-backend.scm: 203 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[79],t1,lf[80]);}
-/* 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){
+/* k3282 in k3279 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3284(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3284,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3287,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 204 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k3285 in k3282 in k3279 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3287(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 198 gen");
+C_trace("c-backend.scm: 205 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-/* 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){
+/* k3248 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3250(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 185 c-ify-string");
-((C_proc3)C_retrieve_symbol_proc(lf[71]))(3,*((C_word*)lf[71]+1),((C_word*)t0)[2],t1);}
+C_trace("c-backend.scm: 192 c-ify-string");
+((C_proc3)C_retrieve_symbol_proc(lf[72]))(3,*((C_word*)lf[72]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k3244 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3246(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 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));}
+C_trace("c-backend.scm: 192 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[70],((C_word*)t0)[2],lf[71],t1,C_make_character(41));}
-/* 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){
+/* k3202 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3204(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_i_car(((C_word*)t0)[5]);
-C_trace("c-backend.scm: 176 expr");
+t2=C_i_car(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 183 expr");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_2625(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
+f_2647(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){
+/* k3170 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3172(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3172,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3175,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 176 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k3173 in k3170 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3175(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 170 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[62]);}
+C_trace("c-backend.scm: 177 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[63]);}
-/* 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){
+/* k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3101(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_3101,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3104,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3115,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 171 iota");
+((C_proc5)C_retrieve_symbol_proc(lf[60]))(5,*((C_word*)lf[60]+1),t3,((C_word*)t0)[6],C_fix(1),C_fix(1));}
-/* 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){
+/* k3113 in k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3115(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15998,15 +16180,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3115,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3066,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3117,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_3066(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+f_3117(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){
+/* loop182 in k3113 in k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_3117(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -16018,194 +16200,194 @@ 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);
+C_save_and_reclaim((void*)trf_3117,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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");
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3125,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3138,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t8=C_slot(t2,C_fix(0));
+t9=C_slot(t3,C_fix(0));
+C_trace("g193194");
t10=t6;
-f_3074(t10,t7,t8,t9);}
+f_3125(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){
+/* k3136 in loop182 in k3113 in k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3138(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=C_slot(((C_word*)t0)[5],C_fix(1));
+t3=C_slot(((C_word*)t0)[4],C_fix(1));
t4=((C_word*)((C_word*)t0)[3])[1];
-f_3066(t4,((C_word*)t0)[2],t2,t3);}
+f_3117(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){
+/* g193 in loop182 in k3113 in k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_3125(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_3125,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3129,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 168 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t4,lf[58],t3,lf[59]);}
-/* 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){
+/* k3127 in g193 in loop182 in k3113 in k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3129(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3129,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3132,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 169 expr");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_2625(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_2647(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){
+/* k3130 in k3127 in g193 in loop182 in k3113 in k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3132(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 163 gen");
+C_trace("c-backend.scm: 170 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(44));}
-/* 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){
+/* k3102 in k3099 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3104(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_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]);}
+t2=C_fixnum_increase(((C_word*)t0)[3]);
+C_trace("c-backend.scm: 172 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[56],t2,lf[57]);}
-/* 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){
+/* k3067 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3069(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3069,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3072,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 158 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k3070 in k3067 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3072(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3072,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3075,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 159 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[53]);}
-/* 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){
+/* k3073 in k3070 in k3067 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3075(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3075,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3078,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 160 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k3076 in k3073 in k3070 in k3067 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3078(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 154 gen");
+C_trace("c-backend.scm: 161 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(41));}
-/* 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){
+/* k3038 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3040(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3040,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3043,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 151 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k3041 in k3038 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3043(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3043,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3046,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 152 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[50]);}
-/* 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){
+/* k3044 in k3041 in k3038 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3046(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3046,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3049,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 153 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k3047 in k3044 in k3041 in k3038 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3049(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 147 gen");
+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));}
-/* 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){
+/* k3001 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3003(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3003,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3006,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=C_i_car(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 144 expr");
t4=((C_word*)((C_word*)t0)[4])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[3]);}
+f_2647(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){
+/* k3004 in k3001 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3006(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -16213,140 +16395,178 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3006,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3009,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+t3=C_i_car(((C_word*)t0)[2]);
+t4=C_fixnum_plus(t3,C_fix(1));
+C_trace("c-backend.scm: 145 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[46],t4,lf[47]);}
-/* 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){
+/* k3007 in k3004 in k3001 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3009(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_3009,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3012,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 146 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k3010 in k3007 in k3004 in k3001 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_3012(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 140 gen");
+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));}
-/* 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){
+/* k2968 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2970(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_2970,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2973,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=C_i_car(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 137 expr");
t4=((C_word*)((C_word*)t0)[4])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[3]);}
+f_2647(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){
+/* k2971 in k2968 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2973(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2973,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2976,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+t3=C_i_car(((C_word*)t0)[2]);
+C_trace("c-backend.scm: 138 gen");
((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_make_character(44),t3,C_make_character(44));}
-/* 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){
+/* k2974 in k2971 in k2968 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2976(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_2976,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2979,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 139 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k2977 in k2974 in k2971 in k2968 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2979(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 133 gen");
+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));}
-/* 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){
+/* k2949 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2951(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_2951,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2954,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 132 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k2952 in k2949 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2954(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-backend.scm: 126 gen");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[40]);}
+C_trace("c-backend.scm: 133 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[41]);}
-/* 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){
+/* k2922 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2924(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_2924,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2927,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 127 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k2925 in k2922 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2927(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word *a;
+t2=C_i_car(((C_word*)t0)[3]);
+t3=C_fixnum_plus(t2,C_fix(1));
+C_trace("c-backend.scm: 128 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[38],t3,C_make_character(93));}
-/* 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){
+/* k2896 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2898(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
+C_word ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2898,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2901,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=C_i_car(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 121 expr");
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_2647(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k2899 in k2896 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2901(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2901,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2904,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 122 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(59));}
+
+/* k2902 in k2899 in k2896 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2904(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
C_word *a;
-t2=(C_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));}
+t2=C_i_cadr(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 123 expr");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_2647(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
-/* loop in expr in expression in ##compiler#generate-code in 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){
+/* loop in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_2844(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -16354,174 +16574,174 @@ 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);}
+C_save_and_reclaim((void*)trf_2844,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);
+if(C_truep(C_fixnum_greaterp(t5,C_fix(0)))){
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2854,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t4,a[6]=t3,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
C_trace("c-backend.scm: 112 gen");
((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t6,C_SCHEME_TRUE,C_make_character(116),t3,C_make_character(61));}
else{
-t6=(C_word)C_i_car(t2);
+t6=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);}}
+f_2647(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){
+/* k2852 in loop in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2854(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2854,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2857,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+t3=C_i_car(((C_word*)t0)[7]);
C_trace("c-backend.scm: 113 expr");
t4=((C_word*)((C_word*)t0)[2])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[6]);}
+f_2647(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){
+/* k2855 in k2852 in loop in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2857(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2857,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2860,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
C_trace("c-backend.scm: 114 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(59));}
-/* 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){
+/* k2858 in k2855 in k2852 in loop in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2860(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
-t2=(C_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]);
+t2=C_i_cdr(((C_word*)t0)[6]);
+t3=C_fixnum_increase(((C_word*)t0)[5]);
+t4=C_fixnum_decrease(((C_word*)t0)[4]);
C_trace("c-backend.scm: 115 loop");
t5=((C_word*)((C_word*)t0)[3])[1];
-f_2822(t5,((C_word*)t0)[2],t2,t3,t4);}
+f_2844(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){
+/* k2784 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2786(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2786,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2789,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
C_trace("c-backend.scm: 99 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k2787 in k2784 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2789(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2789,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2792,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
C_trace("c-backend.scm: 100 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[31]);}
-/* 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){
+/* k2790 in k2787 in k2784 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2792(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2792,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2795,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=C_i_cadr(((C_word*)t0)[4]);
C_trace("c-backend.scm: 101 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k2793 in k2790 in k2787 in k2784 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2795(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2795,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2798,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
C_trace("c-backend.scm: 102 gen");
((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_make_character(125),C_SCHEME_TRUE,lf[30]);}
-/* 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){
+/* k2796 in k2793 in k2790 in k2787 in k2784 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2798(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2798,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2801,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_caddr(((C_word*)t0)[4]);
C_trace("c-backend.scm: 103 expr");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+f_2647(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){
+/* k2799 in k2796 in k2793 in k2790 in k2787 in k2784 in expr in expression in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2801(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("c-backend.scm: 104 gen");
((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],C_make_character(125));}
-/* find-lambda in ##compiler#generate-code in k2573 in k2487 in k2484 */
-static void C_fcall f_2580(C_word t0,C_word t1,C_word t2){
+/* find-lambda in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_fcall f_2602(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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_save_and_reclaim((void*)trf_2602,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2606,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2614,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
C_trace("c-backend.scm: 68 find");
((C_proc4)C_retrieve_symbol_proc(lf[11]))(4,*((C_word*)lf[11]+1),t3,t4,((C_word*)t0)[2]);}
-/* 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){
+/* a2613 in find-lambda in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2614(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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_save_and_reclaim((void*)tr3,(void*)f_2614,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2622,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
C_trace("c-backend.scm: 68 lambda-literal-id");
((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t3,t2);}
-/* 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){
+/* k2620 in a2613 in find-lambda in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2622(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_eqp(((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k2604 in find-lambda in ##compiler#generate-code in k2595 in k2509 in k2506 */
+static void C_ccall f_2606(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -16534,21 +16754,21 @@ 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){
+/* ##compiler#gen-list in k2509 in k2506 */
+static void C_ccall f_2557(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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_save_and_reclaim((void*)tr3,(void*)f_2557,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2565,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
C_trace("c-backend.scm: 50 intersperse");
((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),t3,t2,C_make_character(32));}
-/* k2541 in ##compiler#gen-list in k2487 in k2484 */
-static void C_ccall f_2543(C_word c,C_word t0,C_word t1){
+/* k2563 in ##compiler#gen-list in k2509 in k2506 */
+static void C_ccall f_2565(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -16556,15 +16776,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2565,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2545,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2567,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_2545(t5,((C_word*)t0)[2],t1);}
+f_2567(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){
+/* loop50 in k2563 in ##compiler#gen-list in k2509 in k2506 */
+static void C_fcall f_2567(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -16572,10 +16792,10 @@ 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_save_and_reclaim((void*)trf_2567,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2582,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=C_slot(t2,C_fix(0));
C_trace("c-backend.scm: 49 display");
((C_proc4)C_retrieve_proc(*((C_word*)lf[3]+1)))(4,*((C_word*)lf[3]+1),t3,t4,*((C_word*)lf[0]+1));}
else{
@@ -16583,31 +16803,31 @@ 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){
+/* k2580 in loop50 in k2563 in ##compiler#gen-list in k2509 in k2506 */
+static void C_ccall f_2582(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_2567(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,...){
+/* ##compiler#gen in k2509 in k2506 */
+static void C_ccall f_2514(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
C_word *a,c2=c;
C_save_rest(t1,c2,2);
if(!C_demand(c*C_SIZEOF_PAIR+5)){
-C_save_and_reclaim((void*)tr2r,(void*)f_2492r,2,t0,t1);}
+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_2492r(t0,t1,t2);}}
+f_2514r(t0,t1,t2);}}
-static void C_ccall f_2492r(C_word t0,C_word t1,C_word 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;
@@ -16616,12 +16836,12 @@ 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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2520,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
t6=((C_word*)t4)[1];
-f_2498(t6,t1,t2);}
+f_2520(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){
+/* loop34 in ##compiler#gen in k2509 in k2506 */
+static void C_fcall f_2520(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -16630,11 +16850,11 @@ 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);
+C_save_and_reclaim((void*)trf_2520,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2544,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=C_eqp(C_SCHEME_TRUE,t4);
if(C_truep(t5)){
C_trace("c-backend.scm: 43 newline");
((C_proc3)C_retrieve_proc(*((C_word*)lf[2]+1)))(3,*((C_word*)lf[2]+1),t3,*((C_word*)lf[0]+1));}
@@ -16646,802 +16866,812 @@ 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){
+/* k2542 in loop34 in ##compiler#gen in k2509 in k2506 */
+static void C_ccall f_2544(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_2520(t3,((C_word*)t0)[2],t2);}
#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[785] = {
+static C_PTABLE_ENTRY ptable[795] = {
{"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_2508:c_backend_scm",(void*)f_2508},
+{"f_2511:c_backend_scm",(void*)f_2511},
+{"f_10305:c_backend_scm",(void*)f_10305},
+{"f_10308:c_backend_scm",(void*)f_10308},
+{"f_10335:c_backend_scm",(void*)f_10335},
+{"f_10331:c_backend_scm",(void*)f_10331},
+{"f_10311:c_backend_scm",(void*)f_10311},
+{"f_10314:c_backend_scm",(void*)f_10314},
+{"f_10327:c_backend_scm",(void*)f_10327},
+{"f_10317:c_backend_scm",(void*)f_10317},
+{"f_10320:c_backend_scm",(void*)f_10320},
+{"f_10323:c_backend_scm",(void*)f_10323},
+{"f_2597:c_backend_scm",(void*)f_2597},
+{"f_10005:c_backend_scm",(void*)f_10005},
+{"f_10281:c_backend_scm",(void*)f_10281},
+{"f_10279:c_backend_scm",(void*)f_10279},
+{"f_10267:c_backend_scm",(void*)f_10267},
+{"f_10237:c_backend_scm",(void*)f_10237},
+{"f_10198:c_backend_scm",(void*)f_10198},
+{"f_10185:c_backend_scm",(void*)f_10185},
+{"f_10181:c_backend_scm",(void*)f_10181},
+{"f_10067:c_backend_scm",(void*)f_10067},
+{"f_10014:c_backend_scm",(void*)f_10014},
+{"f_9398:c_backend_scm",(void*)f_9398},
+{"f_9509:c_backend_scm",(void*)f_9509},
+{"f_9674:c_backend_scm",(void*)f_9674},
+{"f_9701:c_backend_scm",(void*)f_9701},
+{"f_9879:c_backend_scm",(void*)f_9879},
+{"f_9882:c_backend_scm",(void*)f_9882},
+{"f_9885:c_backend_scm",(void*)f_9885},
+{"f_9888:c_backend_scm",(void*)f_9888},
+{"f_9858:c_backend_scm",(void*)f_9858},
+{"f_9861:c_backend_scm",(void*)f_9861},
+{"f_9864:c_backend_scm",(void*)f_9864},
+{"f_9867:c_backend_scm",(void*)f_9867},
+{"f_9837:c_backend_scm",(void*)f_9837},
+{"f_9840:c_backend_scm",(void*)f_9840},
+{"f_9843:c_backend_scm",(void*)f_9843},
+{"f_9846:c_backend_scm",(void*)f_9846},
+{"f_9800:c_backend_scm",(void*)f_9800},
+{"f_9803:c_backend_scm",(void*)f_9803},
+{"f_9806:c_backend_scm",(void*)f_9806},
+{"f_9809:c_backend_scm",(void*)f_9809},
+{"f_9779:c_backend_scm",(void*)f_9779},
+{"f_9782:c_backend_scm",(void*)f_9782},
+{"f_9785:c_backend_scm",(void*)f_9785},
+{"f_9788:c_backend_scm",(void*)f_9788},
+{"f_9758:c_backend_scm",(void*)f_9758},
+{"f_9761:c_backend_scm",(void*)f_9761},
+{"f_9764:c_backend_scm",(void*)f_9764},
+{"f_9767:c_backend_scm",(void*)f_9767},
+{"f_9737:c_backend_scm",(void*)f_9737},
+{"f_9740:c_backend_scm",(void*)f_9740},
+{"f_9743:c_backend_scm",(void*)f_9743},
+{"f_9746:c_backend_scm",(void*)f_9746},
+{"f_9716:c_backend_scm",(void*)f_9716},
+{"f_9719:c_backend_scm",(void*)f_9719},
{"f_9722:c_backend_scm",(void*)f_9722},
{"f_9725:c_backend_scm",(void*)f_9725},
-{"f_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_9678:c_backend_scm",(void*)f_9678},
+{"f_9644:c_backend_scm",(void*)f_9644},
+{"f_9647:c_backend_scm",(void*)f_9647},
+{"f_9650:c_backend_scm",(void*)f_9650},
+{"f_9653:c_backend_scm",(void*)f_9653},
+{"f_9623:c_backend_scm",(void*)f_9623},
+{"f_9626:c_backend_scm",(void*)f_9626},
+{"f_9629:c_backend_scm",(void*)f_9629},
+{"f_9632:c_backend_scm",(void*)f_9632},
+{"f_9602:c_backend_scm",(void*)f_9602},
+{"f_9605:c_backend_scm",(void*)f_9605},
+{"f_9608:c_backend_scm",(void*)f_9608},
+{"f_9611:c_backend_scm",(void*)f_9611},
+{"f_9578:c_backend_scm",(void*)f_9578},
+{"f_9581:c_backend_scm",(void*)f_9581},
+{"f_9584:c_backend_scm",(void*)f_9584},
+{"f_9587:c_backend_scm",(void*)f_9587},
+{"f_9557:c_backend_scm",(void*)f_9557},
+{"f_9560:c_backend_scm",(void*)f_9560},
+{"f_9563:c_backend_scm",(void*)f_9563},
+{"f_9566:c_backend_scm",(void*)f_9566},
+{"f_9533:c_backend_scm",(void*)f_9533},
+{"f_9536:c_backend_scm",(void*)f_9536},
+{"f_9539:c_backend_scm",(void*)f_9539},
+{"f_9542:c_backend_scm",(void*)f_9542},
+{"f_9512:c_backend_scm",(void*)f_9512},
+{"f_9515:c_backend_scm",(void*)f_9515},
+{"f_9518:c_backend_scm",(void*)f_9518},
{"f_9521:c_backend_scm",(void*)f_9521},
-{"f_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_9488:c_backend_scm",(void*)f_9488},
+{"f_9491:c_backend_scm",(void*)f_9491},
+{"f_9494:c_backend_scm",(void*)f_9494},
+{"f_9497:c_backend_scm",(void*)f_9497},
+{"f_9467:c_backend_scm",(void*)f_9467},
+{"f_9470:c_backend_scm",(void*)f_9470},
+{"f_9473:c_backend_scm",(void*)f_9473},
+{"f_9476:c_backend_scm",(void*)f_9476},
{"f_9400:c_backend_scm",(void*)f_9400},
-{"f_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_8908:c_backend_scm",(void*)f_8908},
+{"f_8938:c_backend_scm",(void*)f_8938},
+{"f_8965:c_backend_scm",(void*)f_8965},
+{"f_9160:c_backend_scm",(void*)f_9160},
+{"f_9169:c_backend_scm",(void*)f_9169},
+{"f_9178:c_backend_scm",(void*)f_9178},
+{"f_9205:c_backend_scm",(void*)f_9205},
+{"f_9282:c_backend_scm",(void*)f_9282},
+{"f_8910:c_backend_scm",(void*)f_8910},
+{"f_8024:c_backend_scm",(void*)f_8024},
+{"f_8101:c_backend_scm",(void*)f_8101},
+{"f_8203:c_backend_scm",(void*)f_8203},
+{"f_8236:c_backend_scm",(void*)f_8236},
+{"f_8332:c_backend_scm",(void*)f_8332},
+{"f_8344:c_backend_scm",(void*)f_8344},
+{"f_8359:c_backend_scm",(void*)f_8359},
+{"f_8404:c_backend_scm",(void*)f_8404},
+{"f_8421:c_backend_scm",(void*)f_8421},
+{"f_8438:c_backend_scm",(void*)f_8438},
+{"f_8477:c_backend_scm",(void*)f_8477},
+{"f_8494:c_backend_scm",(void*)f_8494},
+{"f_8511:c_backend_scm",(void*)f_8511},
+{"f_8528:c_backend_scm",(void*)f_8528},
+{"f_8545:c_backend_scm",(void*)f_8545},
+{"f_8562:c_backend_scm",(void*)f_8562},
+{"f_8579:c_backend_scm",(void*)f_8579},
+{"f_8591:c_backend_scm",(void*)f_8591},
+{"f_8598:c_backend_scm",(void*)f_8598},
+{"f_8608:c_backend_scm",(void*)f_8608},
+{"f_8648:c_backend_scm",(void*)f_8648},
+{"f_8618:c_backend_scm",(void*)f_8618},
+{"f_8606:c_backend_scm",(void*)f_8606},
+{"f_8602:c_backend_scm",(void*)f_8602},
+{"f_8569:c_backend_scm",(void*)f_8569},
+{"f_8552:c_backend_scm",(void*)f_8552},
+{"f_8535:c_backend_scm",(void*)f_8535},
+{"f_8518:c_backend_scm",(void*)f_8518},
+{"f_8501:c_backend_scm",(void*)f_8501},
+{"f_8484:c_backend_scm",(void*)f_8484},
{"f_8449:c_backend_scm",(void*)f_8449},
+{"f_8459:c_backend_scm",(void*)f_8459},
+{"f_8457:c_backend_scm",(void*)f_8457},
+{"f_8453:c_backend_scm",(void*)f_8453},
{"f_8445:c_backend_scm",(void*)f_8445},
-{"f_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_8432:c_backend_scm",(void*)f_8432},
+{"f_8415:c_backend_scm",(void*)f_8415},
+{"f_8363:c_backend_scm",(void*)f_8363},
+{"f_8031:c_backend_scm",(void*)f_8031},
+{"f_8026:c_backend_scm",(void*)f_8026},
+{"f_7959:c_backend_scm",(void*)f_7959},
+{"f_7963:c_backend_scm",(void*)f_7963},
+{"f_7966:c_backend_scm",(void*)f_7966},
+{"f_7969:c_backend_scm",(void*)f_7969},
+{"f_7972:c_backend_scm",(void*)f_7972},
+{"f_7978:c_backend_scm",(void*)f_7978},
+{"f_8022:c_backend_scm",(void*)f_8022},
+{"f_7981:c_backend_scm",(void*)f_7981},
+{"f_7989:c_backend_scm",(void*)f_7989},
+{"f_8010:c_backend_scm",(void*)f_8010},
+{"f_7993:c_backend_scm",(void*)f_7993},
+{"f_7984:c_backend_scm",(void*)f_7984},
+{"f_7465:c_backend_scm",(void*)f_7465},
+{"f_7471:c_backend_scm",(void*)f_7471},
+{"f_7946:c_backend_scm",(void*)f_7946},
+{"f_7479:c_backend_scm",(void*)f_7479},
+{"f_7483:c_backend_scm",(void*)f_7483},
+{"f_7486:c_backend_scm",(void*)f_7486},
+{"f_7489:c_backend_scm",(void*)f_7489},
+{"f_7492:c_backend_scm",(void*)f_7492},
+{"f_7498:c_backend_scm",(void*)f_7498},
+{"f_7844:c_backend_scm",(void*)f_7844},
+{"f_7847:c_backend_scm",(void*)f_7847},
+{"f_7943:c_backend_scm",(void*)f_7943},
+{"f_7850:c_backend_scm",(void*)f_7850},
{"f_7853:c_backend_scm",(void*)f_7853},
-{"f_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_7856:c_backend_scm",(void*)f_7856},
+{"f_7859:c_backend_scm",(void*)f_7859},
+{"f_7892:c_backend_scm",(void*)f_7892},
+{"f_7908:c_backend_scm",(void*)f_7908},
+{"f_7911:c_backend_scm",(void*)f_7911},
+{"f_7862:c_backend_scm",(void*)f_7862},
+{"f_7890:c_backend_scm",(void*)f_7890},
+{"f_7865:c_backend_scm",(void*)f_7865},
+{"f_7868:c_backend_scm",(void*)f_7868},
+{"f_7871:c_backend_scm",(void*)f_7871},
+{"f_7500:c_backend_scm",(void*)f_7500},
+{"f_7510:c_backend_scm",(void*)f_7510},
+{"f_7519:c_backend_scm",(void*)f_7519},
+{"f_7531:c_backend_scm",(void*)f_7531},
+{"f_7543:c_backend_scm",(void*)f_7543},
+{"f_7549:c_backend_scm",(void*)f_7549},
+{"f_7588:c_backend_scm",(void*)f_7588},
+{"f_7553:c_backend_scm",(void*)f_7553},
+{"f_7151:c_backend_scm",(void*)f_7151},
+{"f_7157:c_backend_scm",(void*)f_7157},
+{"f_7452:c_backend_scm",(void*)f_7452},
+{"f_7165:c_backend_scm",(void*)f_7165},
+{"f_7169:c_backend_scm",(void*)f_7169},
{"f_7172:c_backend_scm",(void*)f_7172},
-{"f_7174:c_backend_scm",(void*)f_7174},
+{"f_7175:c_backend_scm",(void*)f_7175},
+{"f_7449:c_backend_scm",(void*)f_7449},
{"f_7181:c_backend_scm",(void*)f_7181},
+{"f_7184:c_backend_scm",(void*)f_7184},
+{"f_7187:c_backend_scm",(void*)f_7187},
+{"f_7190:c_backend_scm",(void*)f_7190},
+{"f_7193:c_backend_scm",(void*)f_7193},
+{"f_7196:c_backend_scm",(void*)f_7196},
+{"f_7199:c_backend_scm",(void*)f_7199},
+{"f_7202:c_backend_scm",(void*)f_7202},
+{"f_7205:c_backend_scm",(void*)f_7205},
{"f_7208:c_backend_scm",(void*)f_7208},
+{"f_7438:c_backend_scm",(void*)f_7438},
{"f_7211:c_backend_scm",(void*)f_7211},
{"f_7214:c_backend_scm",(void*)f_7214},
-{"f_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_7217:c_backend_scm",(void*)f_7217},
{"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_7223:c_backend_scm",(void*)f_7223},
+{"f_7226:c_backend_scm",(void*)f_7226},
+{"f_7229:c_backend_scm",(void*)f_7229},
+{"f_7232:c_backend_scm",(void*)f_7232},
+{"f_7329:c_backend_scm",(void*)f_7329},
+{"f_7331:c_backend_scm",(void*)f_7331},
+{"f_7338:c_backend_scm",(void*)f_7338},
+{"f_7365:c_backend_scm",(void*)f_7365},
+{"f_7368:c_backend_scm",(void*)f_7368},
+{"f_7371:c_backend_scm",(void*)f_7371},
+{"f_7359:c_backend_scm",(void*)f_7359},
+{"f_7347:c_backend_scm",(void*)f_7347},
+{"f_7351:c_backend_scm",(void*)f_7351},
+{"f_7355:c_backend_scm",(void*)f_7355},
+{"f_7377:c_backend_scm",(void*)f_7377},
+{"f_7235:c_backend_scm",(void*)f_7235},
+{"f_7238:c_backend_scm",(void*)f_7238},
+{"f_7268:c_backend_scm",(void*)f_7268},
+{"f_7271:c_backend_scm",(void*)f_7271},
+{"f_7309:c_backend_scm",(void*)f_7309},
+{"f_7305:c_backend_scm",(void*)f_7305},
+{"f_7274:c_backend_scm",(void*)f_7274},
+{"f_7277:c_backend_scm",(void*)f_7277},
+{"f_7280:c_backend_scm",(void*)f_7280},
+{"f_7247:c_backend_scm",(void*)f_7247},
+{"f_7250:c_backend_scm",(void*)f_7250},
+{"f_7241:c_backend_scm",(void*)f_7241},
{"f_7111:c_backend_scm",(void*)f_7111},
-{"f_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_7129:c_backend_scm",(void*)f_7129},
+{"f_7132:c_backend_scm",(void*)f_7132},
+{"f_7138:c_backend_scm",(void*)f_7138},
+{"f_7057:c_backend_scm",(void*)f_7057},
+{"f_7061:c_backend_scm",(void*)f_7061},
+{"f_7066:c_backend_scm",(void*)f_7066},
+{"f_7095:c_backend_scm",(void*)f_7095},
+{"f_7098:c_backend_scm",(void*)f_7098},
+{"f_7041:c_backend_scm",(void*)f_7041},
+{"f_7047:c_backend_scm",(void*)f_7047},
+{"f_7055:c_backend_scm",(void*)f_7055},
+{"f_7025:c_backend_scm",(void*)f_7025},
+{"f_7031:c_backend_scm",(void*)f_7031},
+{"f_7039:c_backend_scm",(void*)f_7039},
+{"f_6936:c_backend_scm",(void*)f_6936},
+{"f_6945:c_backend_scm",(void*)f_6945},
+{"f_6974:c_backend_scm",(void*)f_6974},
+{"f_6984:c_backend_scm",(void*)f_6984},
+{"f_6859:c_backend_scm",(void*)f_6859},
+{"f_6863:c_backend_scm",(void*)f_6863},
+{"f_6877:c_backend_scm",(void*)f_6877},
{"f_6890:c_backend_scm",(void*)f_6890},
-{"f_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_6922:c_backend_scm",(void*)f_6922},
+{"f_6893:c_backend_scm",(void*)f_6893},
+{"f_6896:c_backend_scm",(void*)f_6896},
+{"f_6866:c_backend_scm",(void*)f_6866},
+{"f_6869:c_backend_scm",(void*)f_6869},
+{"f_6872:c_backend_scm",(void*)f_6872},
+{"f_2599:c_backend_scm",(void*)f_2599},
+{"f_6826:c_backend_scm",(void*)f_6826},
+{"f_6830:c_backend_scm",(void*)f_6830},
+{"f_6833:c_backend_scm",(void*)f_6833},
+{"f_6836:c_backend_scm",(void*)f_6836},
+{"f_6839:c_backend_scm",(void*)f_6839},
+{"f_6842:c_backend_scm",(void*)f_6842},
+{"f_6845:c_backend_scm",(void*)f_6845},
+{"f_6848:c_backend_scm",(void*)f_6848},
+{"f_6851:c_backend_scm",(void*)f_6851},
+{"f_6854:c_backend_scm",(void*)f_6854},
+{"f_6041:c_backend_scm",(void*)f_6041},
+{"f_6047:c_backend_scm",(void*)f_6047},
+{"f_6812:c_backend_scm",(void*)f_6812},
+{"f_6055:c_backend_scm",(void*)f_6055},
+{"f_6059:c_backend_scm",(void*)f_6059},
+{"f_6062:c_backend_scm",(void*)f_6062},
+{"f_6065:c_backend_scm",(void*)f_6065},
+{"f_6068:c_backend_scm",(void*)f_6068},
+{"f_6071:c_backend_scm",(void*)f_6071},
+{"f_6074:c_backend_scm",(void*)f_6074},
+{"f_6809:c_backend_scm",(void*)f_6809},
+{"f_6077:c_backend_scm",(void*)f_6077},
+{"f_6083:c_backend_scm",(void*)f_6083},
+{"f_6086:c_backend_scm",(void*)f_6086},
+{"f_6089:c_backend_scm",(void*)f_6089},
+{"f_6092:c_backend_scm",(void*)f_6092},
+{"f_6095:c_backend_scm",(void*)f_6095},
+{"f_6098:c_backend_scm",(void*)f_6098},
+{"f_6101:c_backend_scm",(void*)f_6101},
+{"f_6104:c_backend_scm",(void*)f_6104},
+{"f_6107:c_backend_scm",(void*)f_6107},
+{"f_6110:c_backend_scm",(void*)f_6110},
+{"f_6113:c_backend_scm",(void*)f_6113},
+{"f_6116:c_backend_scm",(void*)f_6116},
+{"f_6119:c_backend_scm",(void*)f_6119},
+{"f_6778:c_backend_scm",(void*)f_6778},
+{"f_6122:c_backend_scm",(void*)f_6122},
{"f_6739:c_backend_scm",(void*)f_6739},
-{"f_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_6742:c_backend_scm",(void*)f_6742},
+{"f_6745:c_backend_scm",(void*)f_6745},
+{"f_6761:c_backend_scm",(void*)f_6761},
+{"f_6764:c_backend_scm",(void*)f_6764},
+{"f_6125:c_backend_scm",(void*)f_6125},
+{"f_6128:c_backend_scm",(void*)f_6128},
+{"f_6131:c_backend_scm",(void*)f_6131},
+{"f_6711:c_backend_scm",(void*)f_6711},
+{"f_6714:c_backend_scm",(void*)f_6714},
+{"f_6134:c_backend_scm",(void*)f_6134},
+{"f_6137:c_backend_scm",(void*)f_6137},
+{"f_6140:c_backend_scm",(void*)f_6140},
+{"f_6143:c_backend_scm",(void*)f_6143},
+{"f_6146:c_backend_scm",(void*)f_6146},
+{"f_6149:c_backend_scm",(void*)f_6149},
+{"f_6671:c_backend_scm",(void*)f_6671},
{"f_6673:c_backend_scm",(void*)f_6673},
-{"f_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_6683:c_backend_scm",(void*)f_6683},
+{"f_6624:c_backend_scm",(void*)f_6624},
+{"f_6629:c_backend_scm",(void*)f_6629},
+{"f_6645:c_backend_scm",(void*)f_6645},
+{"f_6656:c_backend_scm",(void*)f_6656},
+{"f_6152:c_backend_scm",(void*)f_6152},
+{"f_6573:c_backend_scm",(void*)f_6573},
{"f_6585:c_backend_scm",(void*)f_6585},
{"f_6588:c_backend_scm",(void*)f_6588},
-{"f_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_6495:c_backend_scm",(void*)f_6495},
+{"f_6537:c_backend_scm",(void*)f_6537},
+{"f_6498:c_backend_scm",(void*)f_6498},
+{"f_6504:c_backend_scm",(void*)f_6504},
+{"f_6507:c_backend_scm",(void*)f_6507},
+{"f_6431:c_backend_scm",(void*)f_6431},
+{"f_6434:c_backend_scm",(void*)f_6434},
+{"f_6437:c_backend_scm",(void*)f_6437},
+{"f_6440:c_backend_scm",(void*)f_6440},
+{"f_6443:c_backend_scm",(void*)f_6443},
+{"f_6458:c_backend_scm",(void*)f_6458},
+{"f_6446:c_backend_scm",(void*)f_6446},
+{"f_6449:c_backend_scm",(void*)f_6449},
+{"f_6417:c_backend_scm",(void*)f_6417},
+{"f_6425:c_backend_scm",(void*)f_6425},
+{"f_6342:c_backend_scm",(void*)f_6342},
+{"f_6348:c_backend_scm",(void*)f_6348},
+{"f_6351:c_backend_scm",(void*)f_6351},
+{"f_6385:c_backend_scm",(void*)f_6385},
+{"f_6388:c_backend_scm",(void*)f_6388},
+{"f_6391:c_backend_scm",(void*)f_6391},
+{"f_6354:c_backend_scm",(void*)f_6354},
+{"f_6357:c_backend_scm",(void*)f_6357},
+{"f_6360:c_backend_scm",(void*)f_6360},
+{"f_6363:c_backend_scm",(void*)f_6363},
+{"f_6372:c_backend_scm",(void*)f_6372},
+{"f_6375:c_backend_scm",(void*)f_6375},
+{"f_6155:c_backend_scm",(void*)f_6155},
+{"f_6178:c_backend_scm",(void*)f_6178},
+{"f_6283:c_backend_scm",(void*)f_6283},
+{"f_6286:c_backend_scm",(void*)f_6286},
+{"f_6298:c_backend_scm",(void*)f_6298},
+{"f_6289:c_backend_scm",(void*)f_6289},
{"f_6184:c_backend_scm",(void*)f_6184},
-{"f_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_6187:c_backend_scm",(void*)f_6187},
+{"f_6270:c_backend_scm",(void*)f_6270},
+{"f_6190:c_backend_scm",(void*)f_6190},
+{"f_6193:c_backend_scm",(void*)f_6193},
+{"f_6196:c_backend_scm",(void*)f_6196},
+{"f_6199:c_backend_scm",(void*)f_6199},
+{"f_6264:c_backend_scm",(void*)f_6264},
+{"f_6260:c_backend_scm",(void*)f_6260},
+{"f_6202:c_backend_scm",(void*)f_6202},
+{"f_6205:c_backend_scm",(void*)f_6205},
+{"f_6208:c_backend_scm",(void*)f_6208},
+{"f_6211:c_backend_scm",(void*)f_6211},
+{"f_6214:c_backend_scm",(void*)f_6214},
+{"f_6217:c_backend_scm",(void*)f_6217},
+{"f_6235:c_backend_scm",(void*)f_6235},
+{"f_6245:c_backend_scm",(void*)f_6245},
+{"f_6220:c_backend_scm",(void*)f_6220},
+{"f_6158:c_backend_scm",(void*)f_6158},
+{"f_6168:c_backend_scm",(void*)f_6168},
+{"f_6161:c_backend_scm",(void*)f_6161},
+{"f_5993:c_backend_scm",(void*)f_5993},
+{"f_6000:c_backend_scm",(void*)f_6000},
+{"f_6003:c_backend_scm",(void*)f_6003},
+{"f_5916:c_backend_scm",(void*)f_5916},
+{"f_5923:c_backend_scm",(void*)f_5923},
+{"f_5926:c_backend_scm",(void*)f_5926},
+{"f_5931:c_backend_scm",(void*)f_5931},
+{"f_5987:c_backend_scm",(void*)f_5987},
+{"f_5983:c_backend_scm",(void*)f_5983},
+{"f_5968:c_backend_scm",(void*)f_5968},
+{"f_5947:c_backend_scm",(void*)f_5947},
+{"f_5958:c_backend_scm",(void*)f_5958},
+{"f_5954:c_backend_scm",(void*)f_5954},
+{"f_5774:c_backend_scm",(void*)f_5774},
+{"f_5914:c_backend_scm",(void*)f_5914},
+{"f_5781:c_backend_scm",(void*)f_5781},
+{"f_5787:c_backend_scm",(void*)f_5787},
+{"f_5870:c_backend_scm",(void*)f_5870},
+{"f_5873:c_backend_scm",(void*)f_5873},
+{"f_5883:c_backend_scm",(void*)f_5883},
+{"f_5876:c_backend_scm",(void*)f_5876},
+{"f_5837:c_backend_scm",(void*)f_5837},
+{"f_5843:c_backend_scm",(void*)f_5843},
+{"f_5580:c_backend_scm",(void*)f_5580},
+{"f_5587:c_backend_scm",(void*)f_5587},
+{"f_5696:c_backend_scm",(void*)f_5696},
+{"f_5714:c_backend_scm",(void*)f_5714},
+{"f_5743:c_backend_scm",(void*)f_5743},
{"f_5765:c_backend_scm",(void*)f_5765},
-{"f_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_5721:c_backend_scm",(void*)f_5721},
+{"f_5655:c_backend_scm",(void*)f_5655},
+{"f_5657:c_backend_scm",(void*)f_5657},
+{"f_5686:c_backend_scm",(void*)f_5686},
+{"f_5651:c_backend_scm",(void*)f_5651},
+{"f_5647:c_backend_scm",(void*)f_5647},
+{"f_5618:c_backend_scm",(void*)f_5618},
+{"f_5622:c_backend_scm",(void*)f_5622},
+{"f_5525:c_backend_scm",(void*)f_5525},
+{"f_5531:c_backend_scm",(void*)f_5531},
+{"f_5560:c_backend_scm",(void*)f_5560},
+{"f_5563:c_backend_scm",(void*)f_5563},
+{"f_5566:c_backend_scm",(void*)f_5566},
+{"f_5569:c_backend_scm",(void*)f_5569},
+{"f_5572:c_backend_scm",(void*)f_5572},
+{"f_5541:c_backend_scm",(void*)f_5541},
+{"f_5205:c_backend_scm",(void*)f_5205},
+{"f_5394:c_backend_scm",(void*)f_5394},
+{"f_5512:c_backend_scm",(void*)f_5512},
+{"f_5402:c_backend_scm",(void*)f_5402},
+{"f_5406:c_backend_scm",(void*)f_5406},
+{"f_5409:c_backend_scm",(void*)f_5409},
+{"f_5412:c_backend_scm",(void*)f_5412},
+{"f_5415:c_backend_scm",(void*)f_5415},
+{"f_5418:c_backend_scm",(void*)f_5418},
+{"f_5509:c_backend_scm",(void*)f_5509},
+{"f_5421:c_backend_scm",(void*)f_5421},
+{"f_5424:c_backend_scm",(void*)f_5424},
+{"f_5430:c_backend_scm",(void*)f_5430},
+{"f_5498:c_backend_scm",(void*)f_5498},
{"f_5464:c_backend_scm",(void*)f_5464},
-{"f_5467:c_backend_scm",(void*)f_5467},
+{"f_5470:c_backend_scm",(void*)f_5470},
+{"f_5478:c_backend_scm",(void*)f_5478},
+{"f_5474:c_backend_scm",(void*)f_5474},
{"f_5436:c_backend_scm",(void*)f_5436},
-{"f_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_5439:c_backend_scm",(void*)f_5439},
+{"f_5442:c_backend_scm",(void*)f_5442},
+{"f_5445:c_backend_scm",(void*)f_5445},
+{"f_5448:c_backend_scm",(void*)f_5448},
+{"f_5458:c_backend_scm",(void*)f_5458},
+{"f_5451:c_backend_scm",(void*)f_5451},
{"f_5324:c_backend_scm",(void*)f_5324},
+{"f_5343:c_backend_scm",(void*)f_5343},
+{"f_5381:c_backend_scm",(void*)f_5381},
+{"f_5351:c_backend_scm",(void*)f_5351},
+{"f_5355:c_backend_scm",(void*)f_5355},
+{"f_5358:c_backend_scm",(void*)f_5358},
+{"f_5361:c_backend_scm",(void*)f_5361},
+{"f_5364:c_backend_scm",(void*)f_5364},
+{"f_5378:c_backend_scm",(void*)f_5378},
+{"f_5374:c_backend_scm",(void*)f_5374},
+{"f_5367:c_backend_scm",(void*)f_5367},
{"f_5327:c_backend_scm",(void*)f_5327},
+{"f_5341:c_backend_scm",(void*)f_5341},
{"f_5330:c_backend_scm",(void*)f_5330},
-{"f_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_5337:c_backend_scm",(void*)f_5337},
+{"f_5244:c_backend_scm",(void*)f_5244},
{"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_5250:c_backend_scm",(void*)f_5250},
+{"f_5253:c_backend_scm",(void*)f_5253},
+{"f_5256:c_backend_scm",(void*)f_5256},
{"f_5259:c_backend_scm",(void*)f_5259},
-{"f_5252:c_backend_scm",(void*)f_5252},
+{"f_5262:c_backend_scm",(void*)f_5262},
+{"f_5265:c_backend_scm",(void*)f_5265},
+{"f_5268:c_backend_scm",(void*)f_5268},
+{"f_5271:c_backend_scm",(void*)f_5271},
+{"f_5274:c_backend_scm",(void*)f_5274},
+{"f_5277:c_backend_scm",(void*)f_5277},
+{"f_5280:c_backend_scm",(void*)f_5280},
+{"f_5283:c_backend_scm",(void*)f_5283},
+{"f_5297:c_backend_scm",(void*)f_5297},
+{"f_5293:c_backend_scm",(void*)f_5293},
+{"f_5286:c_backend_scm",(void*)f_5286},
+{"f_5208:c_backend_scm",(void*)f_5208},
+{"f_5221:c_backend_scm",(void*)f_5221},
+{"f_5231:c_backend_scm",(void*)f_5231},
{"f_5212:c_backend_scm",(void*)f_5212},
-{"f_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_4869:c_backend_scm",(void*)f_4869},
+{"f_4938:c_backend_scm",(void*)f_4938},
+{"f_5192:c_backend_scm",(void*)f_5192},
+{"f_4946:c_backend_scm",(void*)f_4946},
+{"f_4950:c_backend_scm",(void*)f_4950},
+{"f_4953:c_backend_scm",(void*)f_4953},
+{"f_5189:c_backend_scm",(void*)f_5189},
+{"f_4956:c_backend_scm",(void*)f_4956},
+{"f_5175:c_backend_scm",(void*)f_5175},
+{"f_4959:c_backend_scm",(void*)f_4959},
+{"f_4962:c_backend_scm",(void*)f_4962},
+{"f_4965:c_backend_scm",(void*)f_4965},
+{"f_4968:c_backend_scm",(void*)f_4968},
+{"f_4971:c_backend_scm",(void*)f_4971},
+{"f_4974:c_backend_scm",(void*)f_4974},
+{"f_5167:c_backend_scm",(void*)f_5167},
+{"f_4977:c_backend_scm",(void*)f_4977},
{"f_4980:c_backend_scm",(void*)f_4980},
+{"f_5121:c_backend_scm",(void*)f_5121},
+{"f_5123:c_backend_scm",(void*)f_5123},
+{"f_5149:c_backend_scm",(void*)f_5149},
+{"f_5131:c_backend_scm",(void*)f_5131},
+{"f_5142:c_backend_scm",(void*)f_5142},
{"f_4983:c_backend_scm",(void*)f_4983},
-{"f11016:c_backend_scm",(void*)f11016},
+{"f_5070:c_backend_scm",(void*)f_5070},
+{"f_5073:c_backend_scm",(void*)f_5073},
+{"f_5076:c_backend_scm",(void*)f_5076},
+{"f_5079:c_backend_scm",(void*)f_5079},
+{"f_5095:c_backend_scm",(void*)f_5095},
+{"f_5098:c_backend_scm",(void*)f_5098},
+{"f11178:c_backend_scm",(void*)f11178},
+{"f_5101:c_backend_scm",(void*)f_5101},
+{"f_5104:c_backend_scm",(void*)f_5104},
{"f_4986:c_backend_scm",(void*)f_4986},
{"f_4989:c_backend_scm",(void*)f_4989},
-{"f_4871:c_backend_scm",(void*)f_4871},
-{"f_4874:c_backend_scm",(void*)f_4874},
+{"f_4992:c_backend_scm",(void*)f_4992},
+{"f_5042:c_backend_scm",(void*)f_5042},
+{"f_5045:c_backend_scm",(void*)f_5045},
+{"f_4995:c_backend_scm",(void*)f_4995},
+{"f_4998:c_backend_scm",(void*)f_4998},
+{"f_5030:c_backend_scm",(void*)f_5030},
+{"f_5033:c_backend_scm",(void*)f_5033},
+{"f_5004:c_backend_scm",(void*)f_5004},
+{"f_5013:c_backend_scm",(void*)f_5013},
+{"f_5016:c_backend_scm",(void*)f_5016},
+{"f_4872:c_backend_scm",(void*)f_4872},
{"f_4877:c_backend_scm",(void*)f_4877},
-{"f_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_4899:c_backend_scm",(void*)f_4899},
{"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_4911:c_backend_scm",(void*)f_4911},
+{"f_4892:c_backend_scm",(void*)f_4892},
+{"f_4925:c_backend_scm",(void*)f_4925},
+{"f_4694:c_backend_scm",(void*)f_4694},
+{"f_4701:c_backend_scm",(void*)f_4701},
+{"f_4837:c_backend_scm",(void*)f_4837},
+{"f_4852:c_backend_scm",(void*)f_4852},
+{"f_4704:c_backend_scm",(void*)f_4704},
+{"f_4707:c_backend_scm",(void*)f_4707},
+{"f_4710:c_backend_scm",(void*)f_4710},
+{"f_4715:c_backend_scm",(void*)f_4715},
+{"f_4725:c_backend_scm",(void*)f_4725},
+{"f_4731:c_backend_scm",(void*)f_4731},
{"f_4784:c_backend_scm",(void*)f_4784},
-{"f_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_4794:c_backend_scm",(void*)f_4794},
+{"f_4734:c_backend_scm",(void*)f_4734},
+{"f_4757:c_backend_scm",(void*)f_4757},
+{"f_4767:c_backend_scm",(void*)f_4767},
{"f_4737:c_backend_scm",(void*)f_4737},
-{"f_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_4740:c_backend_scm",(void*)f_4740},
+{"f_4525:c_backend_scm",(void*)f_4525},
+{"f_4686:c_backend_scm",(void*)f_4686},
+{"f_4545:c_backend_scm",(void*)f_4545},
+{"f_4644:c_backend_scm",(void*)f_4644},
+{"f_4648:c_backend_scm",(void*)f_4648},
{"f_4652:c_backend_scm",(void*)f_4652},
-{"f_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_4656:c_backend_scm",(void*)f_4656},
+{"f_4678:c_backend_scm",(void*)f_4678},
+{"f_4674:c_backend_scm",(void*)f_4674},
+{"f_4666:c_backend_scm",(void*)f_4666},
+{"f_4664:c_backend_scm",(void*)f_4664},
+{"f_4660:c_backend_scm",(void*)f_4660},
{"f_4563:c_backend_scm",(void*)f_4563},
-{"f_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_4566:c_backend_scm",(void*)f_4566},
+{"f_4569:c_backend_scm",(void*)f_4569},
+{"f_4633:c_backend_scm",(void*)f_4633},
+{"f_4572:c_backend_scm",(void*)f_4572},
+{"f_4575:c_backend_scm",(void*)f_4575},
+{"f_4578:c_backend_scm",(void*)f_4578},
+{"f_4593:c_backend_scm",(void*)f_4593},
+{"f_4598:c_backend_scm",(void*)f_4598},
+{"f_4613:c_backend_scm",(void*)f_4613},
+{"f_4581:c_backend_scm",(void*)f_4581},
+{"f_4528:c_backend_scm",(void*)f_4528},
+{"f_4542:c_backend_scm",(void*)f_4542},
+{"f_2644:c_backend_scm",(void*)f_2644},
+{"f_4493:c_backend_scm",(void*)f_4493},
+{"f_4499:c_backend_scm",(void*)f_4499},
+{"f_4503:c_backend_scm",(void*)f_4503},
+{"f_2647:c_backend_scm",(void*)f_2647},
+{"f_4449:c_backend_scm",(void*)f_4449},
+{"f_4452:c_backend_scm",(void*)f_4452},
+{"f_4455:c_backend_scm",(void*)f_4455},
+{"f_4458:c_backend_scm",(void*)f_4458},
+{"f_4461:c_backend_scm",(void*)f_4461},
+{"f_4464:c_backend_scm",(void*)f_4464},
+{"f_4366:c_backend_scm",(void*)f_4366},
+{"f_4369:c_backend_scm",(void*)f_4369},
+{"f_4372:c_backend_scm",(void*)f_4372},
+{"f_4385:c_backend_scm",(void*)f_4385},
+{"f_4408:c_backend_scm",(void*)f_4408},
+{"f_4411:c_backend_scm",(void*)f_4411},
+{"f_4414:c_backend_scm",(void*)f_4414},
+{"f_4417:c_backend_scm",(void*)f_4417},
+{"f_4395:c_backend_scm",(void*)f_4395},
+{"f_4398:c_backend_scm",(void*)f_4398},
+{"f_4347:c_backend_scm",(void*)f_4347},
+{"f_4350:c_backend_scm",(void*)f_4350},
+{"f_4324:c_backend_scm",(void*)f_4324},
+{"f_4327:c_backend_scm",(void*)f_4327},
{"f_4302:c_backend_scm",(void*)f_4302},
-{"f_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_4274:c_backend_scm",(void*)f_4274},
+{"f_4277:c_backend_scm",(void*)f_4277},
+{"f_4294:c_backend_scm",(void*)f_4294},
+{"f_4280:c_backend_scm",(void*)f_4280},
+{"f_4283:c_backend_scm",(void*)f_4283},
+{"f_4258:c_backend_scm",(void*)f_4258},
+{"f_4262:c_backend_scm",(void*)f_4262},
+{"f_4244:c_backend_scm",(void*)f_4244},
+{"f_4247:c_backend_scm",(void*)f_4247},
+{"f_4228:c_backend_scm",(void*)f_4228},
{"f_4232:c_backend_scm",(void*)f_4232},
-{"f_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_4210:c_backend_scm",(void*)f_4210},
+{"f_4213:c_backend_scm",(void*)f_4213},
+{"f_4190:c_backend_scm",(void*)f_4190},
+{"f_4154:c_backend_scm",(void*)f_4154},
+{"f_4166:c_backend_scm",(void*)f_4166},
+{"f_4157:c_backend_scm",(void*)f_4157},
+{"f_4135:c_backend_scm",(void*)f_4135},
+{"f_4138:c_backend_scm",(void*)f_4138},
+{"f_4116:c_backend_scm",(void*)f_4116},
+{"f_4119:c_backend_scm",(void*)f_4119},
+{"f_4097:c_backend_scm",(void*)f_4097},
+{"f_4100:c_backend_scm",(void*)f_4100},
+{"f_4078:c_backend_scm",(void*)f_4078},
+{"f_4074:c_backend_scm",(void*)f_4074},
+{"f_4022:c_backend_scm",(void*)f_4022},
+{"f_4055:c_backend_scm",(void*)f_4055},
+{"f_4025:c_backend_scm",(void*)f_4025},
+{"f_4043:c_backend_scm",(void*)f_4043},
+{"f_4028:c_backend_scm",(void*)f_4028},
+{"f_4031:c_backend_scm",(void*)f_4031},
+{"f_3989:c_backend_scm",(void*)f_3989},
+{"f_3973:c_backend_scm",(void*)f_3973},
+{"f11150:c_backend_scm",(void*)f11150},
+{"f_3976:c_backend_scm",(void*)f_3976},
+{"f_3979:c_backend_scm",(void*)f_3979},
+{"f_3860:c_backend_scm",(void*)f_3860},
+{"f_3863:c_backend_scm",(void*)f_3863},
+{"f_3920:c_backend_scm",(void*)f_3920},
+{"f_3941:c_backend_scm",(void*)f_3941},
{"f_3928:c_backend_scm",(void*)f_3928},
-{"f_3809:c_backend_scm",(void*)f_3809},
-{"f_3812:c_backend_scm",(void*)f_3812},
+{"f_3932:c_backend_scm",(void*)f_3932},
+{"f_3935:c_backend_scm",(void*)f_3935},
+{"f_3866:c_backend_scm",(void*)f_3866},
+{"f_3876:c_backend_scm",(void*)f_3876},
+{"f_3878:c_backend_scm",(void*)f_3878},
+{"f_3893:c_backend_scm",(void*)f_3893},
{"f_3869:c_backend_scm",(void*)f_3869},
-{"f_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_3810:c_backend_scm",(void*)f_3810},
+{"f_3806:c_backend_scm",(void*)f_3806},
{"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},
+{"f11142:c_backend_scm",(void*)f11142},
+{"f_3799:c_backend_scm",(void*)f_3799},
+{"f_2632:c_backend_scm",(void*)f_2632},
+{"f_3792:c_backend_scm",(void*)f_3792},
{"f_3416:c_backend_scm",(void*)f_3416},
-{"f_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_3620:c_backend_scm",(void*)f_3620},
+{"f_3709:c_backend_scm",(void*)f_3709},
+{"f_3712:c_backend_scm",(void*)f_3712},
+{"f_3715:c_backend_scm",(void*)f_3715},
+{"f_3730:c_backend_scm",(void*)f_3730},
+{"f_3718:c_backend_scm",(void*)f_3718},
+{"f_3721:c_backend_scm",(void*)f_3721},
+{"f_3724:c_backend_scm",(void*)f_3724},
+{"f_3640:c_backend_scm",(void*)f_3640},
+{"f_3706:c_backend_scm",(void*)f_3706},
+{"f_3699:c_backend_scm",(void*)f_3699},
+{"f_3695:c_backend_scm",(void*)f_3695},
+{"f_3688:c_backend_scm",(void*)f_3688},
+{"f_3681:c_backend_scm",(void*)f_3681},
+{"f_3656:c_backend_scm",(void*)f_3656},
+{"f_3673:c_backend_scm",(void*)f_3673},
+{"f_3669:c_backend_scm",(void*)f_3669},
+{"f_3643:c_backend_scm",(void*)f_3643},
+{"f_3646:c_backend_scm",(void*)f_3646},
+{"f_3649:c_backend_scm",(void*)f_3649},
+{"f_3614:c_backend_scm",(void*)f_3614},
+{"f_3452:c_backend_scm",(void*)f_3452},
+{"f_3598:c_backend_scm",(void*)f_3598},
+{"f_3601:c_backend_scm",(void*)f_3601},
+{"f_3574:c_backend_scm",(void*)f_3574},
+{"f_3577:c_backend_scm",(void*)f_3577},
+{"f_3580:c_backend_scm",(void*)f_3580},
+{"f11137:c_backend_scm",(void*)f11137},
+{"f_3583:c_backend_scm",(void*)f_3583},
+{"f_3586:c_backend_scm",(void*)f_3586},
+{"f_3455:c_backend_scm",(void*)f_3455},
+{"f_3458:c_backend_scm",(void*)f_3458},
+{"f_3521:c_backend_scm",(void*)f_3521},
+{"f_3542:c_backend_scm",(void*)f_3542},
+{"f_3529:c_backend_scm",(void*)f_3529},
+{"f_3533:c_backend_scm",(void*)f_3533},
+{"f_3536:c_backend_scm",(void*)f_3536},
+{"f_3461:c_backend_scm",(void*)f_3461},
+{"f_3477:c_backend_scm",(void*)f_3477},
+{"f_3479:c_backend_scm",(void*)f_3479},
+{"f_3494:c_backend_scm",(void*)f_3494},
+{"f_3464:c_backend_scm",(void*)f_3464},
+{"f_3467:c_backend_scm",(void*)f_3467},
+{"f_3433:c_backend_scm",(void*)f_3433},
+{"f_3436:c_backend_scm",(void*)f_3436},
+{"f_3368:c_backend_scm",(void*)f_3368},
+{"f11129:c_backend_scm",(void*)f11129},
+{"f_3364:c_backend_scm",(void*)f_3364},
+{"f_3350:c_backend_scm",(void*)f_3350},
+{"f_3353:c_backend_scm",(void*)f_3353},
+{"f_3347:c_backend_scm",(void*)f_3347},
+{"f11124:c_backend_scm",(void*)f11124},
+{"f_3343:c_backend_scm",(void*)f_3343},
+{"f_3329:c_backend_scm",(void*)f_3329},
+{"f_3332:c_backend_scm",(void*)f_3332},
{"f_3281:c_backend_scm",(void*)f_3281},
-{"f_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_3302:c_backend_scm",(void*)f_3302},
+{"f11119:c_backend_scm",(void*)f11119},
+{"f_3298:c_backend_scm",(void*)f_3298},
+{"f_3284:c_backend_scm",(void*)f_3284},
+{"f_3287:c_backend_scm",(void*)f_3287},
+{"f_3250:c_backend_scm",(void*)f_3250},
+{"f_3246:c_backend_scm",(void*)f_3246},
+{"f_3204:c_backend_scm",(void*)f_3204},
+{"f_3172:c_backend_scm",(void*)f_3172},
+{"f_3175:c_backend_scm",(void*)f_3175},
+{"f_3101:c_backend_scm",(void*)f_3101},
+{"f_3115:c_backend_scm",(void*)f_3115},
+{"f_3117:c_backend_scm",(void*)f_3117},
+{"f_3138:c_backend_scm",(void*)f_3138},
+{"f_3125:c_backend_scm",(void*)f_3125},
+{"f_3129:c_backend_scm",(void*)f_3129},
+{"f_3132:c_backend_scm",(void*)f_3132},
+{"f_3104:c_backend_scm",(void*)f_3104},
+{"f_3069:c_backend_scm",(void*)f_3069},
+{"f_3072:c_backend_scm",(void*)f_3072},
+{"f_3075:c_backend_scm",(void*)f_3075},
{"f_3078:c_backend_scm",(void*)f_3078},
-{"f_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},
+{"f_3040:c_backend_scm",(void*)f_3040},
+{"f_3043:c_backend_scm",(void*)f_3043},
+{"f_3046:c_backend_scm",(void*)f_3046},
+{"f_3049:c_backend_scm",(void*)f_3049},
+{"f_3003:c_backend_scm",(void*)f_3003},
+{"f_3006:c_backend_scm",(void*)f_3006},
+{"f_3009:c_backend_scm",(void*)f_3009},
+{"f_3012:c_backend_scm",(void*)f_3012},
+{"f_2970:c_backend_scm",(void*)f_2970},
+{"f_2973:c_backend_scm",(void*)f_2973},
+{"f_2976:c_backend_scm",(void*)f_2976},
+{"f_2979:c_backend_scm",(void*)f_2979},
+{"f_2951:c_backend_scm",(void*)f_2951},
+{"f_2954:c_backend_scm",(void*)f_2954},
+{"f_2924:c_backend_scm",(void*)f_2924},
+{"f_2927:c_backend_scm",(void*)f_2927},
+{"f_2898:c_backend_scm",(void*)f_2898},
+{"f_2901:c_backend_scm",(void*)f_2901},
+{"f_2904:c_backend_scm",(void*)f_2904},
+{"f_2844:c_backend_scm",(void*)f_2844},
+{"f_2854:c_backend_scm",(void*)f_2854},
+{"f_2857:c_backend_scm",(void*)f_2857},
+{"f_2860:c_backend_scm",(void*)f_2860},
+{"f_2786:c_backend_scm",(void*)f_2786},
+{"f_2789:c_backend_scm",(void*)f_2789},
+{"f_2792:c_backend_scm",(void*)f_2792},
+{"f_2795:c_backend_scm",(void*)f_2795},
+{"f_2798:c_backend_scm",(void*)f_2798},
+{"f_2801:c_backend_scm",(void*)f_2801},
+{"f_2602:c_backend_scm",(void*)f_2602},
+{"f_2614:c_backend_scm",(void*)f_2614},
+{"f_2622:c_backend_scm",(void*)f_2622},
+{"f_2606:c_backend_scm",(void*)f_2606},
+{"f_2557:c_backend_scm",(void*)f_2557},
+{"f_2565:c_backend_scm",(void*)f_2565},
+{"f_2567:c_backend_scm",(void*)f_2567},
+{"f_2582:c_backend_scm",(void*)f_2582},
+{"f_2514:c_backend_scm",(void*)f_2514},
+{"f_2520:c_backend_scm",(void*)f_2520},
+{"f_2544:c_backend_scm",(void*)f_2544},
{NULL,NULL}};
#endif
diff --git a/bootstrap/c-platform.c b/bootstrap/c-platform.c
index 3d1dcb31..faeeefc8 100644
--- a/bootstrap/c-platform.c
+++ b/bootstrap/c-platform.c
@@ -1,9 +1,9 @@
/* 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)
+ 2010-02-22 11:33
+ Version 4.3.5
+ windows-mingw32-x86 [ manyargs dload ptables ]
+ compiled 2010-02-17 on lenovo-1 (MINGW32_NT-6.0)
command line: c-platform.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -no-lambda-info -local -extend private-namespace.scm -output-file c-platform.c
unit: platform
*/
@@ -16,1164 +16,1182 @@ C_externimport void C_ccall C_library_toplevel(C_word c,C_word d,C_word k) C_nor
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 C_TLS C_word lf[913];
static double C_possibly_force_alignment;
C_noret_decl(C_platform_toplevel)
C_externexport void C_ccall C_platform_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_1311)
+static void C_ccall f_1311(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1314)
+static void C_ccall f_1314(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4964)
+static void C_ccall f_4964(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1337)
+static void C_ccall f_1337(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1340)
+static void C_ccall f_1340(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4787)
+static void C_ccall f_4787(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_4928)
+static void C_ccall f_4928(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4791)
+static void C_ccall f_4791(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4859)
+static void C_ccall f_4859(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4866)
+static void C_fcall f_4866(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4882)
+static void C_ccall f_4882(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4857)
+static void C_ccall f_4857(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4813)
+static void C_ccall f_4813(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1343)
+static void C_ccall f_1343(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4637)
+static void C_ccall f_4637(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_4739)
+static void C_ccall f_4739(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4737)
+static void C_ccall f_4737(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4708)
+static void C_ccall f_4708(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4706)
+static void C_ccall f_4706(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1346)
+static void C_ccall f_1346(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4478)
+static void C_ccall f_4478(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_4595)
+static void C_ccall f_4595(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4593)
+static void C_ccall f_4593(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4518)
+static void C_ccall f_4518(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4525)
+static void C_fcall f_4525(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4541)
+static void C_ccall f_4541(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4516)
+static void C_ccall f_4516(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1349)
+static void C_ccall f_1349(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4360)
+static void C_ccall f_4360(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_4463)
+static void C_ccall f_4463(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4395)
+static void C_fcall f_4395(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4415)
+static void C_ccall f_4415(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1352)
+static void C_ccall f_1352(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4358)
+static void C_ccall f_4358(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1429)
+static void C_ccall f_1429(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4354)
+static void C_ccall f_4354(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1432)
+static void C_ccall f_1432(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1624)
+static void C_ccall f_1624(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1627)
+static void C_ccall f_1627(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4137)
+static void C_ccall f_4137(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_4310)
+static void C_ccall f_4310(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4153)
+static void C_fcall f_4153(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4255)
+static void C_ccall f_4255(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4186)
+static void C_fcall f_4186(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4222)
+static void C_ccall f_4222(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4189)
+static void C_fcall f_4189(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4159)
+static void C_fcall f_4159(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1630)
+static void C_ccall f_1630(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1846)
+static void C_ccall f_1846(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1849)
+static void C_ccall f_1849(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1987)
+static void C_ccall f_1987(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1990)
+static void C_ccall f_1990(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1993)
+static void C_ccall f_1993(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1996)
+static void C_ccall f_1996(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1999)
+static void C_ccall f_1999(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2002)
+static void C_ccall f_2002(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2005)
+static void C_ccall f_2005(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2008)
+static void C_ccall f_2008(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2011)
+static void C_ccall f_2011(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2014)
+static void C_ccall f_2014(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2041)
+static void C_ccall f_2041(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2044)
+static void C_ccall f_2044(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2266)
+static void C_ccall f_2266(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2269)
+static void C_ccall f_2269(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2272)
+static void C_ccall f_2272(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2275)
+static void C_ccall f_2275(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2278)
+static void C_ccall f_2278(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2281)
+static void C_ccall f_2281(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2284)
+static void C_ccall f_2284(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2287)
+static void C_ccall f_2287(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2290)
+static void C_ccall f_2290(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2293)
+static void C_ccall f_2293(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2296)
+static void C_ccall f_2296(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2299)
+static void C_ccall f_2299(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2302)
+static void C_ccall f_2302(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2305)
+static void C_ccall f_2305(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2308)
+static void C_ccall f_2308(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2311)
+static void C_ccall f_2311(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2314)
+static void C_ccall f_2314(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2317)
+static void C_ccall f_2317(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2320)
+static void C_ccall f_2320(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2323)
+static void C_ccall f_2323(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2326)
+static void C_ccall f_2326(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2329)
+static void C_ccall f_2329(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2332)
+static void C_ccall f_2332(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2335)
+static void C_ccall f_2335(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2338)
+static void C_ccall f_2338(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2341)
+static void C_ccall f_2341(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2344)
+static void C_ccall f_2344(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2347)
+static void C_ccall f_2347(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2350)
+static void C_ccall f_2350(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2353)
+static void C_ccall f_2353(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2356)
+static void C_ccall f_2356(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2359)
+static void C_ccall f_2359(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2362)
+static void C_ccall f_2362(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2365)
+static void C_ccall f_2365(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2368)
+static void C_ccall f_2368(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2371)
+static void C_ccall f_2371(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2374)
+static void C_ccall f_2374(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2377)
+static void C_ccall f_2377(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2380)
+static void C_ccall f_2380(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2383)
+static void C_ccall f_2383(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2386)
+static void C_ccall f_2386(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2389)
+static void C_ccall f_2389(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2392)
+static void C_ccall f_2392(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2395)
+static void C_ccall f_2395(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2398)
+static void C_ccall f_2398(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2401)
+static void C_ccall f_2401(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2404)
+static void C_ccall f_2404(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2407)
+static void C_ccall f_2407(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2410)
+static void C_ccall f_2410(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2413)
+static void C_ccall f_2413(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2416)
+static void C_ccall f_2416(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2419)
+static void C_ccall f_2419(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2422)
+static void C_ccall f_2422(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2425)
+static void C_ccall f_2425(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2428)
+static void C_ccall f_2428(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2431)
+static void C_ccall f_2431(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2434)
+static void C_ccall f_2434(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2437)
+static void C_ccall f_2437(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2440)
+static void C_ccall f_2440(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2443)
+static void C_ccall f_2443(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2446)
+static void C_ccall f_2446(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2449)
+static void C_ccall f_2449(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2452)
+static void C_ccall f_2452(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2455)
+static void C_ccall f_2455(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2458)
+static void C_ccall f_2458(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2461)
+static void C_ccall f_2461(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2464)
+static void C_ccall f_2464(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2467)
+static void C_ccall f_2467(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2470)
+static void C_ccall f_2470(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2473)
+static void C_ccall f_2473(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2476)
+static void C_ccall f_2476(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2479)
+static void C_ccall f_2479(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2482)
+static void C_ccall f_2482(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2485)
+static void C_ccall f_2485(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2488)
+static void C_ccall f_2488(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2491)
+static void C_ccall f_2491(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2494)
+static void C_ccall f_2494(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2497)
+static void C_ccall f_2497(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2500)
+static void C_ccall f_2500(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2503)
+static void C_ccall f_2503(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2506)
+static void C_ccall f_2506(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2509)
+static void C_ccall f_2509(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2512)
+static void C_ccall f_2512(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2515)
+static void C_ccall f_2515(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2518)
+static void C_ccall f_2518(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2521)
+static void C_ccall f_2521(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2524)
+static void C_ccall f_2524(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2527)
+static void C_ccall f_2527(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2530)
+static void C_ccall f_2530(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2533)
+static void C_ccall f_2533(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2536)
+static void C_ccall f_2536(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2539)
+static void C_ccall f_2539(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2542)
+static void C_ccall f_2542(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2545)
+static void C_ccall f_2545(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2548)
+static void C_ccall f_2548(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2551)
+static void C_ccall f_2551(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2554)
+static void C_ccall f_2554(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2557)
+static void C_ccall f_2557(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2560)
+static void C_ccall f_2560(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2563)
+static void C_ccall f_2563(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2566)
+static void C_ccall f_2566(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2569)
+static void C_ccall f_2569(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2572)
+static void C_ccall f_2572(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2575)
+static void C_ccall f_2575(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2578)
+static void C_ccall f_2578(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2581)
+static void C_ccall f_2581(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2584)
+static void C_ccall f_2584(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2587)
+static void C_ccall f_2587(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2590)
+static void C_ccall f_2590(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2593)
+static void C_ccall f_2593(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2596)
+static void C_ccall f_2596(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2599)
+static void C_ccall f_2599(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2602)
+static void C_ccall f_2602(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2605)
+static void C_ccall f_2605(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2608)
+static void C_ccall f_2608(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2611)
+static void C_ccall f_2611(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2614)
+static void C_ccall f_2614(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2617)
+static void C_ccall f_2617(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2620)
+static void C_ccall f_2620(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2623)
+static void C_ccall f_2623(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2626)
+static void C_ccall f_2626(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2629)
+static void C_ccall f_2629(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2632)
+static void C_ccall f_2632(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2635)
+static void C_ccall f_2635(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2638)
+static void C_ccall f_2638(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2641)
+static void C_ccall f_2641(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2644)
+static void C_ccall f_2644(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2647)
+static void C_ccall f_2647(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2650)
+static void C_ccall f_2650(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2653)
+static void C_ccall f_2653(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2656)
+static void C_ccall f_2656(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2659)
+static void C_ccall f_2659(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2662)
+static void C_ccall f_2662(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2665)
+static void C_ccall f_2665(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2668)
+static void C_ccall f_2668(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2671)
+static void C_ccall f_2671(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2674)
+static void C_ccall f_2674(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2677)
+static void C_ccall f_2677(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2680)
+static void C_ccall f_2680(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2683)
+static void C_ccall f_2683(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2686)
+static void C_ccall f_2686(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2689)
+static void C_ccall f_2689(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2692)
+static void C_ccall f_2692(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2695)
+static void C_ccall f_2695(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2698)
+static void C_ccall f_2698(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2701)
+static void C_ccall f_2701(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2704)
+static void C_ccall f_2704(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2707)
+static void C_ccall f_2707(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2710)
+static void C_ccall f_2710(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2713)
+static void C_ccall f_2713(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2716)
+static void C_ccall f_2716(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2719)
+static void C_ccall f_2719(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2722)
+static void C_ccall f_2722(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2725)
+static void C_ccall f_2725(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2728)
+static void C_ccall f_2728(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2731)
+static void C_ccall f_2731(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2734)
+static void C_ccall f_2734(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2737)
+static void C_ccall f_2737(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2740)
+static void C_ccall f_2740(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2743)
+static void C_ccall f_2743(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2746)
+static void C_ccall f_2746(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2749)
+static void C_ccall f_2749(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2752)
+static void C_ccall f_2752(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2755)
+static void C_ccall f_2755(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2758)
+static void C_ccall f_2758(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2761)
+static void C_ccall f_2761(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2764)
+static void C_ccall f_2764(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2767)
+static void C_ccall f_2767(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2770)
+static void C_ccall f_2770(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2773)
+static void C_ccall f_2773(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2776)
+static void C_ccall f_2776(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2779)
+static void C_ccall f_2779(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2782)
+static void C_ccall f_2782(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2785)
+static void C_ccall f_2785(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2788)
+static void C_ccall f_2788(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2791)
+static void C_ccall f_2791(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2794)
+static void C_ccall f_2794(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2797)
+static void C_ccall f_2797(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2800)
+static void C_ccall f_2800(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2803)
+static void C_ccall f_2803(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2806)
+static void C_ccall f_2806(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2809)
+static void C_ccall f_2809(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2812)
+static void C_ccall f_2812(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2815)
+static void C_ccall f_2815(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2818)
+static void C_ccall f_2818(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2821)
+static void C_ccall f_2821(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2824)
+static void C_ccall f_2824(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2827)
+static void C_ccall f_2827(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2830)
+static void C_ccall f_2830(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2833)
+static void C_ccall f_2833(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2836)
+static void C_ccall f_2836(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2839)
+static void C_ccall f_2839(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2842)
+static void C_ccall f_2842(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2845)
+static void C_ccall f_2845(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2848)
+static void C_ccall f_2848(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2851)
+static void C_ccall f_2851(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2854)
+static void C_ccall f_2854(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2857)
+static void C_ccall f_2857(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2860)
+static void C_ccall f_2860(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2863)
+static void C_ccall f_2863(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2866)
+static void C_ccall f_2866(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2869)
+static void C_ccall f_2869(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2872)
+static void C_ccall f_2872(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2875)
+static void C_ccall f_2875(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2878)
+static void C_ccall f_2878(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2881)
+static void C_ccall f_2881(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2884)
+static void C_ccall f_2884(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2887)
+static void C_ccall f_2887(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2890)
+static void C_ccall f_2890(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2893)
+static void C_ccall f_2893(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2896)
+static void C_ccall f_2896(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2899)
+static void C_ccall f_2899(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2902)
+static void C_ccall f_2902(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2905)
+static void C_ccall f_2905(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2908)
+static void C_ccall f_2908(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2911)
+static void C_ccall f_2911(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2914)
+static void C_ccall f_2914(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2917)
+static void C_ccall f_2917(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2920)
+static void C_ccall f_2920(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2923)
+static void C_ccall f_2923(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2926)
+static void C_ccall f_2926(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2929)
+static void C_ccall f_2929(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2932)
+static void C_ccall f_2932(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2935)
+static void C_ccall f_2935(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2938)
+static void C_ccall f_2938(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2941)
+static void C_ccall f_2941(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2944)
+static void C_ccall f_2944(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2947)
+static void C_ccall f_2947(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2950)
+static void C_ccall f_2950(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2953)
+static void C_ccall f_2953(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2956)
+static void C_ccall f_2956(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2959)
+static void C_ccall f_2959(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2962)
+static void C_ccall f_2962(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2965)
+static void C_ccall f_2965(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2968)
+static void C_ccall f_2968(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2971)
+static void C_ccall f_2971(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2974)
+static void C_ccall f_2974(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2977)
+static void C_ccall f_2977(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2980)
+static void C_ccall f_2980(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2983)
+static void C_ccall f_2983(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2986)
+static void C_ccall f_2986(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2989)
+static void C_ccall f_2989(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2992)
+static void C_ccall f_2992(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2995)
+static void C_ccall f_2995(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2998)
+static void C_ccall f_2998(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3001)
+static void C_ccall f_3001(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3004)
+static void C_ccall f_3004(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3007)
+static void C_ccall f_3007(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3010)
+static void C_ccall f_3010(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3013)
+static void C_ccall f_3013(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3016)
+static void C_ccall f_3016(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3019)
+static void C_ccall f_3019(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3022)
+static void C_ccall f_3022(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3025)
+static void C_ccall f_3025(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3028)
+static void C_ccall f_3028(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3031)
+static void C_ccall f_3031(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3034)
+static void C_ccall f_3034(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3037)
+static void C_ccall f_3037(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3040)
+static void C_ccall f_3040(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3043)
+static void C_ccall f_3043(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3046)
+static void C_ccall f_3046(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3049)
+static void C_ccall f_3049(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3052)
+static void C_ccall f_3052(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3055)
+static void C_ccall f_3055(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3058)
+static void C_ccall f_3058(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3061)
+static void C_ccall f_3061(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3064)
+static void C_ccall f_3064(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3067)
+static void C_ccall f_3067(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3070)
+static void C_ccall f_3070(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3073)
+static void C_ccall f_3073(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3076)
+static void C_ccall f_3076(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3079)
+static void C_ccall f_3079(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3082)
+static void C_ccall f_3082(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3085)
+static void C_ccall f_3085(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3088)
+static void C_ccall f_3088(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3091)
+static void C_ccall f_3091(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3094)
+static void C_ccall f_3094(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3097)
+static void C_ccall f_3097(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3100)
+static void C_ccall f_3100(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3103)
+static void C_ccall f_3103(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3106)
+static void C_ccall f_3106(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3109)
+static void C_ccall f_3109(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3112)
+static void C_ccall f_3112(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3115)
+static void C_ccall f_3115(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3118)
+static void C_ccall f_3118(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3121)
+static void C_ccall f_3121(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3124)
+static void C_ccall f_3124(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3127)
+static void C_ccall f_3127(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3130)
+static void C_ccall f_3130(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3133)
+static void C_ccall f_3133(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3136)
+static void C_ccall f_3136(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3139)
+static void C_ccall f_3139(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4065)
+static void C_ccall f_4065(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
C_noret_decl(f_4103)
-static void C_ccall f_4103(C_word c,C_word t0,C_word t1,C_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;
+static void C_ccall f_4103(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3142)
+static void C_ccall f_3142(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3145)
+static void C_ccall f_3145(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3148)
+static void C_ccall f_3148(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3151)
+static void C_ccall f_3151(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3154)
+static void C_ccall f_3154(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3157)
+static void C_ccall f_3157(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3160)
+static void C_ccall f_3160(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3163)
+static void C_ccall f_3163(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3166)
+static void C_ccall f_3166(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3909)
+static void C_ccall f_3909(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_4041)
+static void C_ccall f_4041(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3985)
+static void C_fcall f_3985(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4011)
+static void C_ccall f_4011(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3935)
+static void C_fcall f_3935(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3169)
+static void C_ccall f_3169(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3172)
+static void C_ccall f_3172(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3175)
+static void C_ccall f_3175(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3178)
+static void C_ccall f_3178(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3181)
+static void C_ccall f_3181(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3184)
+static void C_ccall f_3184(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3187)
+static void C_ccall f_3187(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3190)
+static void C_ccall f_3190(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3193)
+static void C_ccall f_3193(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3196)
+static void C_ccall f_3196(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3199)
+static void C_ccall f_3199(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3202)
+static void C_ccall f_3202(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3205)
+static void C_ccall f_3205(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3208)
+static void C_ccall f_3208(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3211)
+static void C_ccall f_3211(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3214)
+static void C_ccall f_3214(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3217)
+static void C_ccall f_3217(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3220)
+static void C_ccall f_3220(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3223)
+static void C_ccall f_3223(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3226)
+static void C_ccall f_3226(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3229)
+static void C_ccall f_3229(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3232)
+static void C_ccall f_3232(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3235)
+static void C_ccall f_3235(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3238)
+static void C_ccall f_3238(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3241)
+static void C_ccall f_3241(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3244)
+static void C_ccall f_3244(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3247)
+static void C_ccall f_3247(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3250)
+static void C_ccall f_3250(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3253)
+static void C_ccall f_3253(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3256)
+static void C_ccall f_3256(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3259)
+static void C_ccall f_3259(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3262)
+static void C_ccall f_3262(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3265)
+static void C_ccall f_3265(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3268)
+static void C_ccall f_3268(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3271)
+static void C_ccall f_3271(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3274)
+static void C_ccall f_3274(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3277)
+static void C_ccall f_3277(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3280)
+static void C_ccall f_3280(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3283)
+static void C_ccall f_3283(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3286)
+static void C_ccall f_3286(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3289)
+static void C_ccall f_3289(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3292)
+static void C_ccall f_3292(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3295)
+static void C_ccall f_3295(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3298)
+static void C_ccall f_3298(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3301)
+static void C_ccall f_3301(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3304)
+static void C_ccall f_3304(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3307)
+static void C_ccall f_3307(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3310)
+static void C_ccall f_3310(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3313)
+static void C_ccall f_3313(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3316)
+static void C_ccall f_3316(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3319)
+static void C_ccall f_3319(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3322)
+static void C_ccall f_3322(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3325)
+static void C_ccall f_3325(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3328)
+static void C_ccall f_3328(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3331)
+static void C_ccall f_3331(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3334)
+static void C_ccall f_3334(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3337)
+static void C_ccall f_3337(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3340)
+static void C_ccall f_3340(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3343)
+static void C_ccall f_3343(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3346)
+static void C_ccall f_3346(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3349)
+static void C_ccall f_3349(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3352)
+static void C_ccall f_3352(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3355)
+static void C_ccall f_3355(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3358)
+static void C_ccall f_3358(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3361)
+static void C_ccall f_3361(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3364)
+static void C_ccall f_3364(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3367)
+static void C_ccall f_3367(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3370)
+static void C_ccall f_3370(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3507)
+static void C_ccall f_3507(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3510)
+static void C_ccall f_3510(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3513)
+static void C_ccall f_3513(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3516)
+static void C_ccall f_3516(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3660)
static void C_ccall f_3660(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3663)
static void C_ccall f_3663(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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(f_3829)
+static void C_ccall f_3829(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_3859)
+static void C_ccall f_3859(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3881)
+static void C_ccall f_3881(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3667)
+static void C_ccall f_3667(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3670)
+static void C_ccall f_3670(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3673)
+static void C_ccall f_3673(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3747)
+static void C_ccall f_3747(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_3801)
+static void C_ccall f_3801(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3776)
+static void C_fcall f_3776(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3773)
+static void C_ccall f_3773(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3676)
+static void C_ccall f_3676(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3702)
+static void C_ccall f_3702(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_3679)
+static void C_ccall f_3679(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3682)
+static void C_ccall f_3682(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3685)
+static void C_ccall f_3685(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3688)
+static void C_ccall f_3688(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3691)
+static void C_ccall f_3691(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3694)
+static void C_ccall f_3694(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3697)
+static void C_ccall f_3697(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3700)
+static void C_ccall f_3700(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3518)
+static void C_ccall f_3518(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_3537)
+static void C_ccall f_3537(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3554)
+static void C_ccall f_3554(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3610)
+static void C_ccall f_3610(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3606)
+static void C_ccall f_3606(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3602)
+static void C_ccall f_3602(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3598)
+static void C_ccall f_3598(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3372)
+static void C_ccall f_3372(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_3394)
+static void C_ccall f_3394(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3460)
+static void C_ccall f_3460(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3458)
+static void C_ccall f_3458(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2046)
+static void C_ccall f_2046(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_2080)
+static void C_ccall f_2080(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2107)
+static void C_ccall f_2107(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2110)
+static void C_ccall f_2110(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2113)
+static void C_ccall f_2113(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2184)
+static void C_ccall f_2184(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2180)
+static void C_ccall f_2180(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2155)
+static void C_ccall f_2155(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2015)
+static void C_ccall f_2015(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_1851)
+static void C_fcall f_1851(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1857)
+static void C_ccall f_1857(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_1869)
+static void C_ccall f_1869(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1958)
+static void C_ccall f_1958(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1892)
+static void C_fcall f_1892(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1912)
+static void C_ccall f_1912(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1889)
+static void C_ccall f_1889(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1632)
+static void C_ccall f_1632(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_1642)
+static void C_ccall f_1642(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1787)
+static void C_ccall f_1787(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1734)
+static void C_fcall f_1734(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1749)
+static void C_ccall f_1749(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1731)
+static void C_ccall f_1731(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1685)
+static void C_fcall f_1685(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1714)
+static void C_ccall f_1714(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1679)
+static void C_ccall f_1679(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1671)
+static void C_ccall f_1671(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1663)
+static void C_ccall f_1663(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1434)
+static void C_ccall f_1434(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_1581)
+static void C_ccall f_1581(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1450)
+static void C_fcall f_1450(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1459)
+static void C_fcall f_1459(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1462)
+static void C_fcall f_1462(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1354)
+static void C_fcall f_1354(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1356)
+static void C_ccall f_1356(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_1422)
+static void C_ccall f_1422(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(trf_4832)
-static void C_fcall trf_4832(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_4832(void *dummy){
+C_noret_decl(trf_4866)
+static void C_fcall trf_4866(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4866(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4832(t0,t1);}
+f_4866(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_noret_decl(trf_4525)
+static void C_fcall trf_4525(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4525(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4491(t0,t1);}
+f_4525(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_noret_decl(trf_4395)
+static void C_fcall trf_4395(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4395(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4361(t0,t1);}
+f_4395(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_noret_decl(trf_4153)
+static void C_fcall trf_4153(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4153(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4119(t0,t1);}
+f_4153(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_noret_decl(trf_4186)
+static void C_fcall trf_4186(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4186(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4152(t0,t1);}
+f_4186(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_noret_decl(trf_4189)
+static void C_fcall trf_4189(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4189(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4155(t0,t1);}
+f_4189(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_noret_decl(trf_4159)
+static void C_fcall trf_4159(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4159(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4125(t0,t1);}
+f_4159(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_noret_decl(trf_3985)
+static void C_fcall trf_3985(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3985(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_3951(t0,t1);}
+f_3985(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_noret_decl(trf_3935)
+static void C_fcall trf_3935(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3935(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_3901(t0,t1);}
+f_3935(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_noret_decl(trf_3776)
+static void C_fcall trf_3776(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3776(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_3742(t0,t1);}
+f_3776(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_noret_decl(trf_1851)
+static void C_fcall trf_1851(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1851(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_1844(t0,t1,t2,t3,t4);}
+f_1851(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_noret_decl(trf_1892)
+static void C_fcall trf_1892(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1892(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_1885(t0,t1);}
+f_1892(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_noret_decl(trf_1734)
+static void C_fcall trf_1734(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1734(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_1727(t0,t1);}
+f_1734(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_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_1678(t0,t1,t2);}
+f_1685(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_noret_decl(trf_1450)
+static void C_fcall trf_1450(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1450(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_1443(t0,t1);}
+f_1450(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_noret_decl(trf_1459)
+static void C_fcall trf_1459(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1459(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_1452(t0,t1);}
+f_1459(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_noret_decl(trf_1462)
+static void C_fcall trf_1462(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1462(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_1455(t0,t1);}
+f_1462(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_noret_decl(trf_1354)
+static void C_fcall trf_1354(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1354(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_1347(t0,t1,t2,t3);}
+f_1354(t0,t1,t2,t3);}
C_noret_decl(tr5)
static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
@@ -1244,12 +1262,12 @@ if(!C_demand(3)){
C_save(t1);
C_reclaim((void*)toplevel_trampoline,NULL);}
toplevel_initialized=1;
-if(!C_demand_2(13251)){
+if(!C_demand_2(13265)){
C_save(t1);
-C_rereclaim2(13251*sizeof(C_word), 1);
+C_rereclaim2(13265*sizeof(C_word), 1);
t1=C_restore;}
a=C_alloc(3);
-C_initialize_lf(lf,908);
+C_initialize_lf(lf,913);
lf[0]=C_h_intern(&lf[0],36,"\010compilerdefault-optimization-passes");
lf[1]=C_h_intern(&lf[1],29,"\010compilerdefault-declarations");
lf[2]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\014always-bound\376\003\000\000\002\376\001\000\000\022\003sysstandard-input\376\003\000\000\002\376\001\000\000\023\003sysstandard-ou"
@@ -1285,32 +1303,29 @@ 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"
+lf[16]=C_h_intern(&lf[16],34,"\010compilermembership-test-operators");
+lf[17]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376B\000\000\010C_i_memq\376B\000\000\005C_eqp\376\003\000\000\002\376\003\000\000\002\376B\000\000\012C_u_i_memq\376B\000\000\005C_eqp\376\003\000\000\002\376\003\000\000\002\376B"
"\000\000\012C_i_member\376B\000\000\012C_i_equalp\376\003\000\000\002\376\003\000\000\002\376B\000\000\010C_i_memv\376B\000\000\010C_i_eqvp\376\377\016");
-lf[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"
+lf[18]=C_h_intern(&lf[18],32,"\010compilermembership-unfold-limit");
+lf[19]=C_h_intern(&lf[19],28,"\010compilertarget-include-file");
+lf[20]=C_decode_literal(C_heaptop,"\376B\000\000\011chicken.h");
+lf[21]=C_h_intern(&lf[21],31,"\010compilervalid-compiler-options");
+lf[22]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005-help\376\003\000\000\002\376\001\000\000\001h\376\003\000\000\002\376\001\000\000\004help\376\003\000\000\002\376\001\000\000\007version\376\003\000\000\002\376\001\000\000\007verbose\376\003\000\000\002\376"
+"\001\000\000\014explicit-use\376\003\000\000\002\376\001\000\000\010no-trace\376\003\000\000\002\376\001\000\000\013no-warnings\376\003\000\000\002\376\001\000\000\006unsafe\376\003\000\000\002\376\001\000\000"
+"\005block\376\003\000\000\002\376\001\000\000\014check-syntax\376\003\000\000\002\376\001\000\000\011to-stdout\376\003\000\000\002\376\001\000\000\025no-usual-integrations\376\003"
+"\000\000\002\376\001\000\000\020case-insensitive\376\003\000\000\002\376\001\000\000\016no-lambda-info\376\003\000\000\002\376\001\000\000\007profile\376\003\000\000\002\376\001\000\000\006inlin"
+"e\376\003\000\000\002\376\001\000\000\024keep-shadowed-macros\376\003\000\000\002\376\001\000\000\021ignore-repository\376\003\000\000\002\376\001\000\000\021fixnum-arith"
+"metic\376\003\000\000\002\376\001\000\000\022disable-interrupts\376\003\000\000\002\376\001\000\000\026optimize-leaf-routines\376\003\000\000\002\376\001\000\000\013lambd"
+"a-lift\376\003\000\000\002\376\001\000\000\016compile-syntax\376\003\000\000\002\376\001\000\000\014tag-pointers\376\003\000\000\002\376\001\000\000\022accumulate-profile"
+"\376\003\000\000\002\376\001\000\000\035disable-stack-overflow-checks\376\003\000\000\002\376\001\000\000\020unsafe-libraries\376\003\000\000\002\376\001\000\000\003raw\376\003"
+"\000\000\002\376\001\000\000\036emit-external-prototypes-first\376\003\000\000\002\376\001\000\000\007release\376\003\000\000\002\376\001\000\000\005local\376\003\000\000\002\376\001\000\000\015"
+"inline-global\376\003\000\000\002\376\001\000\000\014analyze-only\376\003\000\000\002\376\001\000\000\007dynamic\376\003\000\000\002\376\001\000\000\012scrutinize\376\003\000\000\002\376\001\000"
+"\000\016no-argc-checks\376\003\000\000\002\376\001\000\000\023no-procedure-checks\376\003\000\000\002\376\001\000\000\017no-bound-checks\376\003\000\000\002\376\001\000\000&"
+"no-procedure-checks-for-usual-bindings\376\003\000\000\002\376\001\000\000\022no-compiler-syntax\376\003\000\000\002\376\001\000\000\027no-p"
+"arentheses-synonyms\376\003\000\000\002\376\001\000\000\020no-symbol-escape\376\003\000\000\002\376\001\000\000\013r5rs-syntax\376\003\000\000\002\376\001\000\000\031emit"
+"-all-import-libraries\376\003\000\000\002\376\001\000\000\012setup-mode\376\003\000\000\002\376\001\000\000\010unboxing\376\377\016");
+lf[23]=C_h_intern(&lf[23],45,"\010compilervalid-compiler-options-with-argument");
+lf[24]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005debug\376\003\000\000\002\376\001\000\000\013output-file\376\003\000\000\002\376\001\000\000\014include-path\376\003\000\000\002\376\001\000\000\011heap-size\376\003\000"
"\000\002\376\001\000\000\012stack-size\376\003\000\000\002\376\001\000\000\004unit\376\003\000\000\002\376\001\000\000\004uses\376\003\000\000\002\376\001\000\000\015keyword-style\376\003\000\000\002\376\001\000\000\021re"
"quire-extension\376\003\000\000\002\376\001\000\000\014inline-limit\376\003\000\000\002\376\001\000\000\014profile-name\376\003\000\000\002\376\001\000\000\017disable-war"
"ning\376\003\000\000\002\376\001\000\000\024parenthesis-synonyms\376\003\000\000\002\376\001\000\000\007prelude\376\003\000\000\002\376\001\000\000\010postlude\376\003\000\000\002\376\001\000\000\010p"
@@ -1319,8 +1334,8 @@ lf[26]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005debug
"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"
+lf[25]=C_h_intern(&lf[25],34,"\010compilerdefault-standard-bindings");
+lf[26]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003not\376\003\000\000\002\376\001\000\000\010boolean\077\376\003\000\000\002\376\001\000\000\005apply\376\003\000\000\002\376\001\000\000\036call-with-current-contin"
"uation\376\003\000\000\002\376\001\000\000\003eq\077\376\003\000\000\002\376\001\000\000\004eqv\077\376\003\000\000\002\376\001\000\000\006equal\077\376\003\000\000\002\376\001\000\000\005pair\077\376\003\000\000\002\376\001\000\000\004cons\376\003"
"\000\000\002\376\001\000\000\003car\376\003\000\000\002\376\001\000\000\003cdr\376\003\000\000\002\376\001\000\000\004caar\376\003\000\000\002\376\001\000\000\004cadr\376\003\000\000\002\376\001\000\000\004cdar\376\003\000\000\002\376\001\000\000\004cddr"
"\376\003\000\000\002\376\001\000\000\005caaar\376\003\000\000\002\376\001\000\000\005caadr\376\003\000\000\002\376\001\000\000\005cadar\376\003\000\000\002\376\001\000\000\005caddr\376\003\000\000\002\376\001\000\000\005cdaar\376\003\000\000\002"
@@ -1361,8 +1376,8 @@ lf[28]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003not\3
"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"
+lf[27]=C_h_intern(&lf[27],34,"\010compilerdefault-extended-bindings");
+lf[28]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\013bitwise-and\376\003\000\000\002\376\001\000\000\013bitwise-ior\376\003\000\000\002\376\001\000\000\013bitwise-xor\376\003\000\000\002\376\001\000\000\013bitwise"
"-not\376\003\000\000\002\376\001\000\000\004add1\376\003\000\000\002\376\001\000\000\004sub1\376\003\000\000\002\376\001\000\000\003fx+\376\003\000\000\002\376\001\000\000\003fx-\376\003\000\000\002\376\001\000\000\003fx*\376\003\000\000\002\376\001\000\000"
"\003fx/\376\003\000\000\002\376\001\000\000\005fxmod\376\003\000\000\002\376\001\000\000\001o\376\003\000\000\002\376\001\000\000\003fx=\376\003\000\000\002\376\001\000\000\003fx>\376\003\000\000\002\376\001\000\000\003fx<\376\003\000\000\002\376\001\000\000\004f"
"x>=\376\003\000\000\002\376\001\000\000\004fx<=\376\003\000\000\002\376\001\000\000\007fixnum\077\376\003\000\000\002\376\001\000\000\005fxneg\376\003\000\000\002\376\001\000\000\005fxmax\376\003\000\000\002\376\001\000\000\005fxmin\376"
@@ -1372,34 +1387,35 @@ lf[30]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\013bitwi
"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"
+"\000\005fpexp\376\003\000\000\002\376\001\000\000\006fpexpt\376\003\000\000\002\376\001\000\000\005fplog\376\003\000\000\002\376\001\000\000\006fpsqrt\376\003\000\000\002\376\001\000\000\005fpabs\376\003\000\000\002\376\001\000\000\012f"
+"pinteger\077\376\003\000\000\002\376\001\000\000\020arithmetic-shift\376\003\000\000\002\376\001\000\000\004void\376\003\000\000\002\376\001\000\000\014flush-output\376\003\000\000\002\376\001\000\000"
+"\017thread-specific\376\003\000\000\002\376\001\000\000\024thread-specific-set!\376\003\000\000\002\376\001\000\000\011not-pair\077\376\003\000\000\002\376\001\000\000\005atom\077"
+"\376\003\000\000\002\376\001\000\000\012null-list\077\376\003\000\000\002\376\001\000\000\005print\376\003\000\000\002\376\001\000\000\006print*\376\003\000\000\002\376\001\000\000\005error\376\003\000\000\002\376\001\000\000\010cpu-"
+"time\376\003\000\000\002\376\001\000\000\014proper-list\077\376\003\000\000\002\376\001\000\000\007call/cc\376\003\000\000\002\376\001\000\000\011blob-size\376\003\000\000\002\376\001\000\000\025u8vector"
+"->blob/shared\376\003\000\000\002\376\001\000\000\025s8vector->blob/shared\376\003\000\000\002\376\001\000\000\026u16vector->blob/shared\376\003\000\000"
+"\002\376\001\000\000\026s16vector->blob/shared\376\003\000\000\002\376\001\000\000\026u32vector->blob/shared\376\003\000\000\002\376\001\000\000\026s32vector-"
+">blob/shared\376\003\000\000\002\376\001\000\000\026f32vector->blob/shared\376\003\000\000\002\376\001\000\000\026f64vector->blob/shared\376\003\000\000"
+"\002\376\001\000\000\025blob->u8vector/shared\376\003\000\000\002\376\001\000\000\025blob->s8vector/shared\376\003\000\000\002\376\001\000\000\026blob->u16vec"
+"tor/shared\376\003\000\000\002\376\001\000\000\026blob->s16vector/shared\376\003\000\000\002\376\001\000\000\026blob->u32vector/shared\376\003\000\000\002\376"
+"\001\000\000\026blob->s32vector/shared\376\003\000\000\002\376\001\000\000\026blob->f32vector/shared\376\003\000\000\002\376\001\000\000\026blob->f64vec"
+"tor/shared\376\003\000\000\002\376\001\000\000\011block-ref\376\003\000\000\002\376\001\000\000\012block-set!\376\003\000\000\002\376\001\000\000\017number-of-slots\376\003\000\000\002\376"
+"\001\000\000\017substring-index\376\003\000\000\002\376\001\000\000\022substring-index-ci\376\003\000\000\002\376\001\000\000\016hash-table-ref\376\003\000\000\002\376\001\000\000"
+"\004any\077\376\003\000\000\002\376\001\000\000\013read-string\376\003\000\000\002\376\001\000\000\013substring=\077\376\003\000\000\002\376\001\000\000\016substring-ci=\077\376\003\000\000\002\376\001\000\000"
+"\005first\376\003\000\000\002\376\001\000\000\006second\376\003\000\000\002\376\001\000\000\005third\376\003\000\000\002\376\001\000\000\006fourth\376\003\000\000\002\376\001\000\000\024make-record-insta"
+"nce\376\003\000\000\002\376\001\000\000\017u8vector-length\376\003\000\000\002\376\001\000\000\017s8vector-length\376\003\000\000\002\376\001\000\000\020u16vector-length\376"
+"\003\000\000\002\376\001\000\000\020s16vector-length\376\003\000\000\002\376\001\000\000\020u32vector-length\376\003\000\000\002\376\001\000\000\020s32vector-length\376\003\000"
+"\000\002\376\001\000\000\020f32vector-length\376\003\000\000\002\376\001\000\000\020f64vector-length\376\003\000\000\002\376\001\000\000\006setter\376\003\000\000\002\376\001\000\000\014u8vec"
+"tor-ref\376\003\000\000\002\376\001\000\000\014s8vector-ref\376\003\000\000\002\376\001\000\000\015u16vector-ref\376\003\000\000\002\376\001\000\000\015s16vector-ref\376\003\000\000\002"
+"\376\001\000\000\015u32vector-ref\376\003\000\000\002\376\001\000\000\015s32vector-ref\376\003\000\000\002\376\001\000\000\015f32vector-ref\376\003\000\000\002\376\001\000\000\015f64vec"
+"tor-ref\376\003\000\000\002\376\001\000\000\016f32vector-set!\376\003\000\000\002\376\001\000\000\016f64vector-set!\376\003\000\000\002\376\001\000\000\015u8vector-set!\376\003"
+"\000\000\002\376\001\000\000\015s8vector-set!\376\003\000\000\002\376\001\000\000\016u16vector-set!\376\003\000\000\002\376\001\000\000\016s16vector-set!\376\003\000\000\002\376\001\000\000\016u"
+"32vector-set!\376\003\000\000\002\376\001\000\000\016s32vector-set!\376\003\000\000\002\376\001\000\000\014locative-ref\376\003\000\000\002\376\001\000\000\015locative-se"
+"t!\376\003\000\000\002\376\001\000\000\020locative->object\376\003\000\000\002\376\001\000\000\011locative\077\376\003\000\000\002\376\001\000\000\012global-ref\376\003\000\000\002\376\001\000\000\015nul"
+"l-pointer\077\376\003\000\000\002\376\001\000\000\017pointer->object\376\003\000\000\002\376\001\000\000\007flonum\077\376\003\000\000\002\376\001\000\000\007finite\077\376\003\000\000\002\376\001\000\000\020a"
+"ddress->pointer\376\003\000\000\002\376\001\000\000\020pointer->address\376\003\000\000\002\376\001\000\000\006printf\376\003\000\000\002\376\001\000\000\007sprintf\376\003\000\000\002\376"
+"\001\000\000\006format\376\377\016");
+lf[29]=C_h_intern(&lf[29],26,"\010compilerinternal-bindings");
+lf[30]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\010\003sysslot\376\003\000\000\002\376\001\000\000\013\003syssetslot\376\003\000\000\002\376\001\000\000\015\003sysblock-ref\376\003\000\000\002\376\001\000\000\016\003sysbloc"
"k-set!\376\003\000\000\002\376\001\000\000\042\003syscall-with-current-continuation\376\003\000\000\002\376\001\000\000\010\003syssize\376\003\000\000\002\376\001\000\000\010\003s"
"ysbyte\376\003\000\000\002\376\001\000\000\013\003syssetbyte\376\003\000\000\002\376\001\000\000\014\003syspointer\077\376\003\000\000\002\376\001\000\000\026\003sysgeneric-structure"
"\077\376\003\000\000\002\376\001\000\000\016\003sysstructure\077\376\003\000\000\002\376\001\000\000\023\003syscheck-structure\376\003\000\000\002\376\001\000\000\017\003syscheck-exact\376"
@@ -1421,8 +1437,8 @@ lf[32]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\010\003s
"\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"
+lf[31]=C_h_intern(&lf[31],30,"\010compilernon-foldable-bindings");
+lf[32]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006vector\376\003\000\000\002\376\001\000\000\004cons\376\003\000\000\002\376\001\000\000\004list\376\003\000\000\002\376\001\000\000\006string\376\003\000\000\002\376\001\000\000\013make-vecto"
"r\376\003\000\000\002\376\001\000\000\013make-string\376\003\000\000\002\376\001\000\000\016string->symbol\376\003\000\000\002\376\001\000\000\006values\376\003\000\000\002\376\001\000\000\022current-"
"input-port\376\003\000\000\002\376\001\000\000\023current-output-port\376\003\000\000\002\376\001\000\000\011read-char\376\003\000\000\002\376\001\000\000\012write-char\376\003"
"\000\000\002\376\001\000\000\006printf\376\003\000\000\002\376\001\000\000\007fprintf\376\003\000\000\002\376\001\000\000\006format\376\003\000\000\002\376\001\000\000\005apply\376\003\000\000\002\376\001\000\000\036call-wit"
@@ -1438,111 +1454,112 @@ lf[34]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006vecto
"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");
+"read-string!\376\003\000\000\002\376\001\000\000\001o\376\003\000\000\002\376\001\000\000\020address->pointer\376\003\000\000\002\376\001\000\000\020pointer->address\376\003\000\000\002"
+"\376\001\000\000\022\003sysmake-structure\376\003\000\000\002\376\001\000\000\006print*\376\003\000\000\002\376\001\000\000\017\003sysmake-vector\376\003\000\000\002\376\001\000\000\011\003sysap"
+"ply\376\003\000\000\002\376\001\000\000\014\003syssetislot\376\003\000\000\002\376\001\000\000\015\003sysblock-ref\376\003\000\000\002\376\001\000\000\010\003sysbyte\376\003\000\000\002\376\001\000\000\013\003sys"
+"setbyte\376\003\000\000\002\376\001\000\000\017u8vector-length\376\003\000\000\002\376\001\000\000\017s8vector-length\376\003\000\000\002\376\001\000\000\020u16vector-len"
+"gth\376\003\000\000\002\376\001\000\000\020s16vector-length\376\003\000\000\002\376\001\000\000\020u32vector-length\376\003\000\000\002\376\001\000\000\020s32vector-lengt"
+"h\376\003\000\000\002\376\001\000\000\020f32vector-length\376\003\000\000\002\376\001\000\000\020f64vector-length\376\003\000\000\002\376\001\000\000\020\003sysapply-values\376"
+"\003\000\000\002\376\001\000\000\012\003syssetter\376\003\000\000\002\376\001\000\000\006setter\376\003\000\000\002\376\001\000\000\016f32vector-set!\376\003\000\000\002\376\001\000\000\016f64vector-s"
+"et!\376\003\000\000\002\376\001\000\000\014u8vector-ref\376\003\000\000\002\376\001\000\000\014s8vector-ref\376\003\000\000\002\376\001\000\000\015u16vector-ref\376\003\000\000\002\376\001\000\000\015"
+"s16vector-ref\376\003\000\000\002\376\001\000\000\015u32vector-ref\376\003\000\000\002\376\001\000\000\015s32vector-ref\376\003\000\000\002\376\001\000\000\015u8vector-se"
+"t!\376\003\000\000\002\376\001\000\000\015s8vector-set!\376\003\000\000\002\376\001\000\000\016u16vector-set!\376\003\000\000\002\376\001\000\000\016s16vector-set!\376\003\000\000\002\376\001"
+"\000\000\016u32vector-set!\376\003\000\000\002\376\001\000\000\016s32vector-set!\376\003\000\000\002\376\001\000\000\021\003sysintern-symbol\376\003\000\000\002\376\001\000\000\017\003s"
+"ysmake-symbol\376\003\000\000\002\376\001\000\000\024make-record-instance\376\003\000\000\002\376\001\000\000\005error\376\003\000\000\002\376\001\000\000\010cpu-time\376\003\000\000"
+"\002\376\001\000\000\016\003sysblock-set!\376\377\016");
+lf[33]=C_h_intern(&lf[33],26,"\010compilerfoldable-bindings");
+lf[34]=C_h_intern(&lf[34],6,"fixnum");
+lf[35]=C_h_intern(&lf[35],11,"number-type");
+lf[36]=C_h_intern(&lf[36],6,"unsafe");
+lf[37]=C_h_intern(&lf[37],4,"node");
+lf[38]=C_h_intern(&lf[38],11,"\004coreinline");
+lf[39]=C_h_intern(&lf[39],9,"\004corecall");
+lf[40]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[41]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[42]=C_h_intern(&lf[42],20,"\004coreinline_allocate");
lf[43]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[44]=C_h_intern(&lf[44],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[44]=C_h_intern(&lf[44],14,"\010compilerqnode");
+lf[45]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\005C_eqp\376\377\016");
+lf[46]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[47]=C_h_intern(&lf[47],5,"quote");
+lf[48]=C_h_intern(&lf[48],13,"\004corevariable");
+lf[49]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[50]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\000\376\377\016");
+lf[51]=C_h_intern(&lf[51],5,"cons*");
+lf[52]=C_h_intern(&lf[52],6,"append");
+lf[53]=C_h_intern(&lf[53],7,"butlast");
+lf[54]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[55]=C_h_intern(&lf[55],9,"\004coreproc");
+lf[56]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\007C_apply\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[57]=C_h_intern(&lf[57],6,"values");
+lf[58]=C_h_intern(&lf[58],10,"\003sysvalues");
+lf[59]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\016C_apply_values\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[60]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[61]=C_h_intern(&lf[61],7,"\003sysget");
+lf[62]=C_h_intern(&lf[62],18,"\010compilerintrinsic");
+lf[63]=C_h_intern(&lf[63],4,"last");
+lf[64]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[65]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\006C_slot\376\377\016");
+lf[66]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\016C_i_vector_ref\376\377\016");
+lf[67]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[68]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
lf[69]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[70]=C_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[70]=C_h_intern(&lf[70],6,"vector");
+lf[71]=C_h_intern(&lf[71],12,"\010compilerget");
+lf[72]=C_h_intern(&lf[72],14,"rest-parameter");
+lf[73]=C_h_intern(&lf[73],30,"call-with-current-continuation");
+lf[74]=C_h_intern(&lf[74],16,"\010compilerrewrite");
+lf[75]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[76]=C_h_intern(&lf[76],11,"\004corelambda");
lf[77]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[78]=C_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[78]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[79]=C_h_intern(&lf[79],3,"let");
+lf[80]=C_h_intern(&lf[80],16,"\010compilervarnode");
+lf[81]=C_h_intern(&lf[81],6,"gensym");
+lf[82]=C_h_intern(&lf[82],2,"f_");
+lf[83]=C_h_intern(&lf[83],18,"\010compilerdebugging");
+lf[84]=C_h_intern(&lf[84],1,"o");
+lf[85]=C_decode_literal(C_heaptop,"\376B\000\000)removing single-valued `call-with-values\047");
+lf[86]=C_h_intern(&lf[86],1,"r");
+lf[87]=C_h_intern(&lf[87],5,"value");
+lf[88]=C_h_intern(&lf[88],14,"\004coreundefined");
+lf[89]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_vector");
+lf[90]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[91]=C_h_intern(&lf[91],13,"list-tabulate");
lf[92]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[93]=C_h_intern(&lf[93],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[93]=C_h_intern(&lf[93],16,"inline-transient");
+lf[94]=C_h_intern(&lf[94],8,"assigned");
+lf[95]=C_h_intern(&lf[95],10,"references");
+lf[96]=C_h_intern(&lf[96],30,"\010compilerdecompose-lambda-list");
+lf[97]=C_h_intern(&lf[97],18,"substring-index-ci");
+lf[98]=C_h_intern(&lf[98],22,"\003syssubstring-index-ci");
+lf[99]=C_h_intern(&lf[99],15,"substring-index");
+lf[100]=C_h_intern(&lf[100],19,"\003syssubstring-index");
+lf[101]=C_h_intern(&lf[101],14,"substring-ci=\077");
+lf[102]=C_h_intern(&lf[102],18,"\003syssubstring-ci=\077");
+lf[103]=C_h_intern(&lf[103],11,"substring=\077");
+lf[104]=C_h_intern(&lf[104],15,"\003syssubstring=\077");
+lf[105]=C_h_intern(&lf[105],11,"read-string");
+lf[106]=C_h_intern(&lf[106],20,"\003sysread-string/port");
+lf[107]=C_h_intern(&lf[107],18,"\003sysstandard-input");
+lf[108]=C_h_intern(&lf[108],10,"write-char");
+lf[109]=C_h_intern(&lf[109],19,"\003syswrite-char/port");
+lf[110]=C_h_intern(&lf[110],19,"\003sysstandard-output");
+lf[111]=C_h_intern(&lf[111],9,"read-char");
+lf[112]=C_h_intern(&lf[112],18,"\003sysread-char/port");
+lf[113]=C_decode_literal(C_heaptop,"\376B\000\000\016C_u_i_bit_setp");
+lf[114]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_bit_setp");
+lf[115]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[116]=C_h_intern(&lf[116],8,"bit-set\077");
lf[117]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[118]=C_h_intern(&lf[118],8,"bit-set\077");
+lf[118]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\006C_anyp\376\377\016");
lf[119]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[120]=C_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"
+lf[120]=C_h_intern(&lf[120],6,"global");
+lf[121]=C_h_intern(&lf[121],4,"any\077");
+lf[122]=C_h_intern(&lf[122],8,"\003sysvoid");
+lf[123]=C_h_intern(&lf[123],19,"\003sysundefined-value");
+lf[124]=C_h_intern(&lf[124],4,"void");
+lf[125]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\003car\376\001\000\000\010set-car!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\003cdr\376\001\000\000\010set-cdr!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\016has"
"h-table-ref\376\001\000\000\017hash-table-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\011block-ref\376\001\000\000\012block-set!\376\003\000\000\002\376\003\000\000\002"
"\376\001\000\000\014locative-ref\376\001\000\000\015locative-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\014u8vector-ref\376\001\000\000\015u8vector-set!"
"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\014s8vector-ref\376\001\000\000\015s8vector-set!\376\003\000\000\002\376\003\000\000\002\376\001\000\000\015u16vector-ref\376\001\000\000\016u1"
@@ -1556,803 +1573,810 @@ lf[127]=C_decode_literal(C_heaptop,"\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[126]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[127]=C_h_intern(&lf[127],10,"\003syssetter");
+lf[128]=C_h_intern(&lf[128],7,"call/cc");
+lf[129]=C_h_intern(&lf[129],20,"thread-specific-set!");
+lf[130]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_setslot");
+lf[131]=C_h_intern(&lf[131],15,"thread-specific");
+lf[132]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[133]=C_h_intern(&lf[133],15,"\003sysmake-vector");
+lf[134]=C_h_intern(&lf[134],11,"make-vector");
+lf[135]=C_h_intern(&lf[135],22,"f64vector->blob/shared");
+lf[136]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[137]=C_h_intern(&lf[137],22,"f32vector->blob/shared");
lf[138]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[139]=C_h_intern(&lf[139],22,"f32vector->blob/shared");
+lf[139]=C_h_intern(&lf[139],22,"s32vector->blob/shared");
lf[140]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[141]=C_h_intern(&lf[141],22,"s32vector->blob/shared");
+lf[141]=C_h_intern(&lf[141],22,"u32vector->blob/shared");
lf[142]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[143]=C_h_intern(&lf[143],22,"u32vector->blob/shared");
+lf[143]=C_h_intern(&lf[143],22,"s16vector->blob/shared");
lf[144]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[145]=C_h_intern(&lf[145],22,"s16vector->blob/shared");
+lf[145]=C_h_intern(&lf[145],22,"u16vector->blob/shared");
lf[146]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[147]=C_h_intern(&lf[147],22,"u16vector->blob/shared");
+lf[147]=C_h_intern(&lf[147],21,"s8vector->blob/shared");
lf[148]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[149]=C_h_intern(&lf[149],21,"s8vector->blob/shared");
+lf[149]=C_h_intern(&lf[149],21,"u8vector->blob/shared");
lf[150]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
-lf[151]=C_h_intern(&lf[151],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[151]=C_h_intern(&lf[151],10,"null-list\077");
+lf[152]=C_decode_literal(C_heaptop,"\376B\000\000\017C_i_null_list_p");
+lf[153]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_nullp");
+lf[154]=C_h_intern(&lf[154],5,"atom\077");
+lf[155]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_not_pair_p");
+lf[156]=C_h_intern(&lf[156],9,"not-pair\077");
lf[157]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_not_pair_p");
-lf[158]=C_h_intern(&lf[158],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[158]=C_h_intern(&lf[158],16,"f64vector-length");
+lf[159]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_64vector_length");
+lf[160]=C_h_intern(&lf[160],16,"f32vector-length");
+lf[161]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_32vector_length");
+lf[162]=C_h_intern(&lf[162],16,"s32vector-length");
lf[163]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_32vector_length");
-lf[164]=C_h_intern(&lf[164],16,"s32vector-length");
+lf[164]=C_h_intern(&lf[164],16,"u32vector-length");
lf[165]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_32vector_length");
-lf[166]=C_h_intern(&lf[166],16,"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[166]=C_h_intern(&lf[166],16,"s16vector-length");
+lf[167]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_16vector_length");
+lf[168]=C_h_intern(&lf[168],16,"u16vector-length");
lf[169]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_16vector_length");
-lf[170]=C_h_intern(&lf[170],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[170]=C_h_intern(&lf[170],15,"s8vector-length");
+lf[171]=C_decode_literal(C_heaptop,"\376B\000\000\024C_u_i_8vector_length");
+lf[172]=C_h_intern(&lf[172],15,"u8vector-length");
lf[173]=C_decode_literal(C_heaptop,"\376B\000\000\024C_u_i_8vector_length");
-lf[174]=C_h_intern(&lf[174],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[174]=C_h_intern(&lf[174],14,"f64vector-set!");
+lf[175]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_f64vector_set");
+lf[176]=C_h_intern(&lf[176],14,"f32vector-set!");
+lf[177]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_f32vector_set");
+lf[178]=C_h_intern(&lf[178],14,"s32vector-set!");
+lf[179]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_s32vector_set");
+lf[180]=C_h_intern(&lf[180],14,"u32vector-set!");
+lf[181]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_u32vector_set");
+lf[182]=C_h_intern(&lf[182],14,"s16vector-set!");
+lf[183]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_s16vector_set");
+lf[184]=C_h_intern(&lf[184],14,"u16vector-set!");
+lf[185]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_u16vector_set");
+lf[186]=C_h_intern(&lf[186],13,"s8vector-set!");
+lf[187]=C_decode_literal(C_heaptop,"\376B\000\000\022C_u_i_s8vector_set");
+lf[188]=C_h_intern(&lf[188],13,"u8vector-set!");
+lf[189]=C_decode_literal(C_heaptop,"\376B\000\000\022C_u_i_u8vector_set");
+lf[190]=C_h_intern(&lf[190],13,"s32vector-ref");
+lf[191]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_i_s32vector_ref");
+lf[192]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_s32vector_ref");
+lf[193]=C_h_intern(&lf[193],13,"u32vector-ref");
+lf[194]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_i_u32vector_ref");
+lf[195]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_u32vector_ref");
+lf[196]=C_h_intern(&lf[196],13,"f64vector-ref");
+lf[197]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_i_f64vector_ref");
+lf[198]=C_h_intern(&lf[198],13,"f32vector-ref");
+lf[199]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_i_f32vector_ref");
+lf[200]=C_h_intern(&lf[200],13,"s16vector-ref");
+lf[201]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_s16vector_ref");
+lf[202]=C_h_intern(&lf[202],13,"u16vector-ref");
+lf[203]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_u16vector_ref");
+lf[204]=C_h_intern(&lf[204],12,"s8vector-ref");
+lf[205]=C_decode_literal(C_heaptop,"\376B\000\000\022C_u_i_s8vector_ref");
+lf[206]=C_h_intern(&lf[206],12,"u8vector-ref");
+lf[207]=C_decode_literal(C_heaptop,"\376B\000\000\022C_u_i_u8vector_ref");
+lf[208]=C_h_intern(&lf[208],9,"blob-size");
+lf[209]=C_decode_literal(C_heaptop,"\376B\000\000\014C_block_size");
+lf[210]=C_h_intern(&lf[210],17,"\003sysdirect-return");
+lf[211]=C_decode_literal(C_heaptop,"\376B\000\000\017C_direct_return");
+lf[212]=C_h_intern(&lf[212],37,"\003sysforeign-unsigned-integer-argument");
+lf[213]=C_decode_literal(C_heaptop,"\376B\000\000&C_i_foreign_unsigned_integer_argumentp");
+lf[214]=C_h_intern(&lf[214],28,"\003sysforeign-integer-argument");
+lf[215]=C_decode_literal(C_heaptop,"\376B\000\000\035C_i_foreign_integer_argumentp");
+lf[216]=C_h_intern(&lf[216],28,"\003sysforeign-pointer-argument");
+lf[217]=C_decode_literal(C_heaptop,"\376B\000\000\035C_i_foreign_pointer_argumentp");
+lf[218]=C_h_intern(&lf[218],27,"\003sysforeign-string-argument");
+lf[219]=C_decode_literal(C_heaptop,"\376B\000\000\034C_i_foreign_string_argumentp");
+lf[220]=C_h_intern(&lf[220],34,"\003sysforeign-number-vector-argument");
+lf[221]=C_decode_literal(C_heaptop,"\376B\000\000#C_i_foreign_number_vector_argumentp");
+lf[222]=C_h_intern(&lf[222],26,"\003sysforeign-block-argument");
+lf[223]=C_decode_literal(C_heaptop,"\376B\000\000\033C_i_foreign_block_argumentp");
+lf[224]=C_h_intern(&lf[224],27,"\003sysforeign-flonum-argument");
+lf[225]=C_decode_literal(C_heaptop,"\376B\000\000\034C_i_foreign_flonum_argumentp");
+lf[226]=C_h_intern(&lf[226],25,"\003sysforeign-char-argument");
+lf[227]=C_decode_literal(C_heaptop,"\376B\000\000\032C_i_foreign_char_argumentp");
+lf[228]=C_h_intern(&lf[228],27,"\003sysforeign-fixnum-argument");
+lf[229]=C_decode_literal(C_heaptop,"\376B\000\000\034C_i_foreign_fixnum_argumentp");
+lf[230]=C_h_intern(&lf[230],13,"locative-set!");
+lf[231]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_locative_set");
+lf[232]=C_h_intern(&lf[232],16,"locative->object");
+lf[233]=C_decode_literal(C_heaptop,"\376B\000\000\026C_i_locative_to_object");
+lf[234]=C_h_intern(&lf[234],14,"\003sysimmediate\077");
+lf[235]=C_decode_literal(C_heaptop,"\376B\000\000\006C_immp");
+lf[236]=C_h_intern(&lf[236],13,"null-pointer\077");
+lf[237]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_null_pointerp");
+lf[238]=C_decode_literal(C_heaptop,"\376B\000\000\017C_null_pointerp");
+lf[239]=C_h_intern(&lf[239],17,"\003sysnull-pointer\077");
lf[240]=C_decode_literal(C_heaptop,"\376B\000\000\017C_null_pointerp");
-lf[241]=C_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[241]=C_decode_literal(C_heaptop,"\376B\000\000\017C_null_pointerp");
+lf[242]=C_h_intern(&lf[242],14,"\003syspermanent\077");
+lf[243]=C_decode_literal(C_heaptop,"\376B\000\000\014C_permanentp");
+lf[244]=C_h_intern(&lf[244],27,"\003sysflonum-in-fixnum-range\077");
+lf[245]=C_decode_literal(C_heaptop,"\376B\000\000\032C_flonum_in_fixnum_range_p");
+lf[246]=C_h_intern(&lf[246],25,"\003sysfits-in-unsigned-int\077");
+lf[247]=C_decode_literal(C_heaptop,"\376B\000\000\030C_fits_in_unsigned_int_p");
+lf[248]=C_h_intern(&lf[248],16,"\003sysfits-in-int\077");
+lf[249]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fits_in_int_p");
+lf[250]=C_h_intern(&lf[250],9,"\003sysfudge");
+lf[251]=C_decode_literal(C_heaptop,"\376B\000\000\007C_fudge");
+lf[252]=C_h_intern(&lf[252],11,"string-ci=\077");
+lf[253]=C_decode_literal(C_heaptop,"\376B\000\000\025C_i_string_ci_equal_p");
+lf[254]=C_h_intern(&lf[254],8,"string=\077");
+lf[255]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_string_equal_p");
+lf[256]=C_decode_literal(C_heaptop,"\376B\000\000\024C_u_i_string_equal_p");
+lf[257]=C_h_intern(&lf[257],18,"\003sysdouble->number");
+lf[258]=C_decode_literal(C_heaptop,"\376B\000\000\022C_double_to_number");
+lf[259]=C_h_intern(&lf[259],15,"\003syspoke-double");
+lf[260]=C_decode_literal(C_heaptop,"\376B\000\000\015C_poke_double");
+lf[261]=C_h_intern(&lf[261],16,"\003syspoke-integer");
+lf[262]=C_decode_literal(C_heaptop,"\376B\000\000\016C_poke_integer");
+lf[263]=C_h_intern(&lf[263],12,"\003syssetislot");
+lf[264]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_set_i_slot");
+lf[265]=C_h_intern(&lf[265],15,"pointer->object");
+lf[266]=C_decode_literal(C_heaptop,"\376B\000\000\023C_pointer_to_object");
+lf[267]=C_h_intern(&lf[267],13,"\003syspeek-byte");
+lf[268]=C_decode_literal(C_heaptop,"\376B\000\000\013C_peek_byte");
+lf[269]=C_h_intern(&lf[269],15,"\003syspeek-fixnum");
+lf[270]=C_decode_literal(C_heaptop,"\376B\000\000\015C_peek_fixnum");
+lf[271]=C_h_intern(&lf[271],11,"\003syssetbyte");
+lf[272]=C_decode_literal(C_heaptop,"\376B\000\000\011C_setbyte");
+lf[273]=C_h_intern(&lf[273],8,"\003sysbyte");
+lf[274]=C_decode_literal(C_heaptop,"\376B\000\000\011C_subbyte");
+lf[275]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[276]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\033C_i_fixnum_arithmetic_shift\376\377\016");
lf[277]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[278]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\033C_i_fixnum_arithmetic_shift\376\377\016");
+lf[278]=C_decode_literal(C_heaptop,"\376B\000\000\026C_a_i_arithmetic_shift");
lf[279]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[280]=C_decode_literal(C_heaptop,"\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[280]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\024C_fixnum_shift_right\376\377\016");
+lf[281]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\023C_fixnum_shift_left\376\377\016");
+lf[282]=C_h_intern(&lf[282],20,"\010compilerbig-fixnum\077");
+lf[283]=C_h_intern(&lf[283],16,"arithmetic-shift");
+lf[284]=C_h_intern(&lf[284],5,"fxior");
+lf[285]=C_decode_literal(C_heaptop,"\376B\000\000\013C_fixnum_or");
+lf[286]=C_decode_literal(C_heaptop,"\376B\000\000\015C_u_fixnum_or");
+lf[287]=C_h_intern(&lf[287],5,"fxand");
+lf[288]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_and");
+lf[289]=C_decode_literal(C_heaptop,"\376B\000\000\016C_u_fixnum_and");
+lf[290]=C_h_intern(&lf[290],5,"fxxor");
+lf[291]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_xor");
+lf[292]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_xor");
+lf[293]=C_h_intern(&lf[293],5,"fxneg");
+lf[294]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fixnum_negate");
+lf[295]=C_decode_literal(C_heaptop,"\376B\000\000\021C_u_fixnum_negate");
+lf[296]=C_h_intern(&lf[296],5,"fxshr");
+lf[297]=C_decode_literal(C_heaptop,"\376B\000\000\024C_fixnum_shift_right");
+lf[298]=C_h_intern(&lf[298],5,"fxshl");
+lf[299]=C_decode_literal(C_heaptop,"\376B\000\000\023C_fixnum_shift_left");
+lf[300]=C_h_intern(&lf[300],3,"fx-");
+lf[301]=C_decode_literal(C_heaptop,"\376B\000\000\023C_fixnum_difference");
+lf[302]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_fixnum_difference");
+lf[303]=C_h_intern(&lf[303],3,"fx+");
+lf[304]=C_decode_literal(C_heaptop,"\376B\000\000\015C_fixnum_plus");
+lf[305]=C_decode_literal(C_heaptop,"\376B\000\000\017C_u_fixnum_plus");
+lf[306]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\016C_i_set_i_slot\376\377\016");
+lf[307]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[308]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\013C_i_setslot\376\377\016");
lf[309]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[310]=C_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[310]=C_h_intern(&lf[310],19,"\010compilerimmediate\077");
+lf[311]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\013C_i_setslot\376\377\016");
+lf[312]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[313]=C_h_intern(&lf[313],11,"\003syssetslot");
+lf[314]=C_h_intern(&lf[314],16,"pointer->address");
+lf[315]=C_decode_literal(C_heaptop,"\376B\000\000\030C_a_i_pointer_to_address");
+lf[316]=C_h_intern(&lf[316],16,"address->pointer");
+lf[317]=C_decode_literal(C_heaptop,"\376B\000\000\030C_a_i_address_to_pointer");
+lf[318]=C_h_intern(&lf[318],6,"string");
+lf[319]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_string");
+lf[320]=C_h_intern(&lf[320],18,"\003sysmake-structure");
+lf[321]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_record");
+lf[322]=C_h_intern(&lf[322],10,"\003sysvector");
+lf[323]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_vector");
+lf[324]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_vector");
+lf[325]=C_h_intern(&lf[325],8,"\003syslist");
+lf[326]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_list");
+lf[327]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\001\000\000\000\003\376\377\016");
+lf[328]=C_h_intern(&lf[328],4,"list");
+lf[329]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_list");
+lf[330]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\001\000\000\000\003\376\377\016");
+lf[331]=C_h_intern(&lf[331],8,"\003syscons");
lf[332]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_cons");
-lf[333]=C_h_intern(&lf[333],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[333]=C_h_intern(&lf[333],4,"cons");
+lf[334]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_cons");
+lf[335]=C_h_intern(&lf[335],7,"fpround");
+lf[336]=C_decode_literal(C_heaptop,"\376B\000\000\025C_a_i_flonum_truncate");
+lf[337]=C_h_intern(&lf[337],9,"fpceiling");
+lf[338]=C_decode_literal(C_heaptop,"\376B\000\000\025C_a_i_flonum_truncate");
+lf[339]=C_decode_literal(C_heaptop,"\376B\000\000\025C_a_i_flonum_truncate");
+lf[340]=C_h_intern(&lf[340],10,"fptruncate");
+lf[341]=C_decode_literal(C_heaptop,"\376B\000\000\025C_a_i_flonum_truncate");
+lf[342]=C_h_intern(&lf[342],5,"fpabs");
+lf[343]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_abs");
+lf[344]=C_h_intern(&lf[344],6,"fpsqrt");
+lf[345]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_sqrt");
+lf[346]=C_h_intern(&lf[346],5,"fplog");
+lf[347]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_log");
+lf[348]=C_h_intern(&lf[348],6,"fpexpt");
+lf[349]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_expt");
+lf[350]=C_h_intern(&lf[350],5,"fpexp");
+lf[351]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_exp");
+lf[352]=C_h_intern(&lf[352],7,"fpatan2");
+lf[353]=C_decode_literal(C_heaptop,"\376B\000\000\022C_a_i_flonum_atan2");
+lf[354]=C_h_intern(&lf[354],6,"fpatan");
+lf[355]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_atan");
+lf[356]=C_h_intern(&lf[356],6,"fpacos");
+lf[357]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_acos");
+lf[358]=C_h_intern(&lf[358],6,"fpasin");
+lf[359]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_asin");
+lf[360]=C_h_intern(&lf[360],5,"fptan");
+lf[361]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_tan");
+lf[362]=C_h_intern(&lf[362],5,"fpcos");
+lf[363]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_cos");
+lf[364]=C_h_intern(&lf[364],5,"fpsin");
+lf[365]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_sin");
+lf[366]=C_h_intern(&lf[366],5,"round");
+lf[367]=C_h_intern(&lf[367],6,"flonum");
+lf[368]=C_h_intern(&lf[368],8,"truncate");
+lf[369]=C_h_intern(&lf[369],7,"ceiling");
+lf[370]=C_h_intern(&lf[370],5,"floor");
+lf[371]=C_h_intern(&lf[371],7,"fpfloor");
+lf[372]=C_h_intern(&lf[372],4,"odd\077");
+lf[373]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_oddp");
+lf[374]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_oddp");
+lf[375]=C_h_intern(&lf[375],5,"even\077");
+lf[376]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_evenp");
+lf[377]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_evenp");
+lf[378]=C_h_intern(&lf[378],9,"remainder");
+lf[379]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fixnum_modulo");
+lf[380]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fixnum_modulo");
+lf[381]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_fixnumoddp");
+lf[382]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_fixnumoddp");
+lf[383]=C_decode_literal(C_heaptop,"\376B\000\000\017C_i_fixnumevenp");
+lf[384]=C_decode_literal(C_heaptop,"\376B\000\000\017C_i_fixnumevenp");
+lf[385]=C_h_intern(&lf[385],15,"\003sysmake-symbol");
+lf[386]=C_decode_literal(C_heaptop,"\376B\000\000\015C_make_symbol");
+lf[387]=C_h_intern(&lf[387],17,"\003sysintern-symbol");
+lf[388]=C_decode_literal(C_heaptop,"\376B\000\000\022C_string_to_symbol");
+lf[389]=C_h_intern(&lf[389],18,"\003syscontext-switch");
+lf[390]=C_decode_literal(C_heaptop,"\376B\000\000\020C_context_switch");
+lf[391]=C_h_intern(&lf[391],14,"return-to-host");
+lf[392]=C_decode_literal(C_heaptop,"\376B\000\000\020C_return_to_host");
+lf[393]=C_h_intern(&lf[393],23,"\003sysensure-heap-reserve");
+lf[394]=C_decode_literal(C_heaptop,"\376B\000\000\025C_ensure_heap_reserve");
+lf[395]=C_h_intern(&lf[395],19,"\003sysallocate-vector");
+lf[396]=C_decode_literal(C_heaptop,"\376B\000\000\021C_allocate_vector");
+lf[397]=C_h_intern(&lf[397],34,"\003syscall-with-current-continuation");
+lf[398]=C_decode_literal(C_heaptop,"\376B\000\000\011C_call_cc");
+lf[399]=C_h_intern(&lf[399],14,"number->string");
+lf[400]=C_decode_literal(C_heaptop,"\376B\000\000\022C_number_to_string");
+lf[401]=C_h_intern(&lf[401],14,"string->number");
+lf[402]=C_decode_literal(C_heaptop,"\376B\000\000\022C_string_to_number");
+lf[403]=C_h_intern(&lf[403],14,"exact->inexact");
+lf[404]=C_decode_literal(C_heaptop,"\376B\000\000\022C_exact_to_inexact");
+lf[405]=C_h_intern(&lf[405],2,"<=");
+lf[406]=C_decode_literal(C_heaptop,"\376B\000\000\021C_less_or_equal_p");
+lf[407]=C_h_intern(&lf[407],2,">=");
+lf[408]=C_decode_literal(C_heaptop,"\376B\000\000\024C_greater_or_equal_p");
+lf[409]=C_h_intern(&lf[409],1,"<");
+lf[410]=C_decode_literal(C_heaptop,"\376B\000\000\007C_lessp");
+lf[411]=C_h_intern(&lf[411],1,">");
+lf[412]=C_decode_literal(C_heaptop,"\376B\000\000\012C_greaterp");
+lf[413]=C_h_intern(&lf[413],1,"=");
+lf[414]=C_decode_literal(C_heaptop,"\376B\000\000\011C_nequalp");
+lf[415]=C_h_intern(&lf[415],1,"/");
+lf[416]=C_decode_literal(C_heaptop,"\376B\000\000\010C_divide");
+lf[417]=C_h_intern(&lf[417],1,"+");
+lf[418]=C_decode_literal(C_heaptop,"\376B\000\000\006C_plus");
+lf[419]=C_h_intern(&lf[419],1,"-");
+lf[420]=C_decode_literal(C_heaptop,"\376B\000\000\007C_minus");
+lf[421]=C_h_intern(&lf[421],1,"*");
+lf[422]=C_decode_literal(C_heaptop,"\376B\000\000\007C_times");
+lf[423]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_less_or_equalp");
+lf[424]=C_decode_literal(C_heaptop,"\376B\000\000\025C_i_greater_or_equalp");
+lf[425]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_lessp");
+lf[426]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_greaterp");
+lf[427]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_nequalp");
+lf[428]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_divide");
+lf[429]=C_decode_literal(C_heaptop,"\376B\000\000\013C_a_i_minus");
+lf[430]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_plus");
+lf[431]=C_decode_literal(C_heaptop,"\376B\000\000\013C_a_i_times");
+lf[432]=C_h_intern(&lf[432],4,"argv");
+lf[433]=C_decode_literal(C_heaptop,"\376B\000\000\012C_get_argv");
+lf[434]=C_h_intern(&lf[434],3,"lcm");
+lf[435]=C_h_intern(&lf[435],3,"gcd");
+lf[436]=C_h_intern(&lf[436],8,"identity");
+lf[437]=C_h_intern(&lf[437],7,"\003syslcm");
+lf[438]=C_h_intern(&lf[438],7,"\003sysgcd");
+lf[439]=C_h_intern(&lf[439],5,"\003sys=");
+lf[440]=C_h_intern(&lf[440],6,"\003sys>=");
+lf[441]=C_h_intern(&lf[441],16,"\003syslist->vector");
+lf[442]=C_h_intern(&lf[442],12,"list->vector");
+lf[443]=C_h_intern(&lf[443],16,"\003sysvector->list");
+lf[444]=C_h_intern(&lf[444],12,"vector->list");
+lf[445]=C_h_intern(&lf[445],11,"vector-set!");
+lf[446]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_vector_set");
+lf[447]=C_h_intern(&lf[447],12,"list->string");
+lf[448]=C_h_intern(&lf[448],16,"\003syslist->string");
+lf[449]=C_h_intern(&lf[449],12,"string->list");
+lf[450]=C_h_intern(&lf[450],16,"\003sysstring->list");
+lf[451]=C_h_intern(&lf[451],13,"string-append");
+lf[452]=C_h_intern(&lf[452],17,"\003sysstring-append");
+lf[453]=C_h_intern(&lf[453],9,"substring");
+lf[454]=C_h_intern(&lf[454],13,"\003syssubstring");
+lf[455]=C_h_intern(&lf[455],20,"make-record-instance");
+lf[456]=C_h_intern(&lf[456],14,"\003sysblock-set!");
+lf[457]=C_h_intern(&lf[457],10,"block-set!");
+lf[458]=C_h_intern(&lf[458],3,"map");
+lf[459]=C_h_intern(&lf[459],7,"\003sysmap");
+lf[460]=C_h_intern(&lf[460],8,"for-each");
+lf[461]=C_h_intern(&lf[461],12,"\003sysfor-each");
+lf[462]=C_h_intern(&lf[462],6,"setter");
+lf[463]=C_decode_literal(C_heaptop,"\376B\000\000\030C_fixnum_less_or_equal_p");
+lf[464]=C_decode_literal(C_heaptop,"\376B\000\000\030C_flonum_less_or_equal_p");
+lf[465]=C_decode_literal(C_heaptop,"\376B\000\000\033C_fixnum_greater_or_equal_p");
+lf[466]=C_decode_literal(C_heaptop,"\376B\000\000\033C_flonum_greater_or_equal_p");
+lf[467]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fixnum_lessp");
+lf[468]=C_decode_literal(C_heaptop,"\376B\000\000\016C_flonum_lessp");
+lf[469]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_greaterp");
+lf[470]=C_decode_literal(C_heaptop,"\376B\000\000\021C_flonum_greaterp");
+lf[471]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
+lf[472]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_equalp");
+lf[473]=C_h_intern(&lf[473],14,"\003syscheck-char");
+lf[474]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_char_2");
+lf[475]=C_h_intern(&lf[475],19,"\003syscheck-structure");
+lf[476]=C_decode_literal(C_heaptop,"\376B\000\000\025C_i_check_structure_2");
+lf[477]=C_h_intern(&lf[477],16,"\003syscheck-vector");
+lf[478]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_check_vector_2");
+lf[479]=C_h_intern(&lf[479],21,"\003syscheck-byte-vector");
+lf[480]=C_decode_literal(C_heaptop,"\376B\000\000\026C_i_check_bytevector_2");
+lf[481]=C_h_intern(&lf[481],16,"\003syscheck-string");
+lf[482]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_check_string_2");
+lf[483]=C_h_intern(&lf[483],16,"\003syscheck-symbol");
+lf[484]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_check_symbol_2");
+lf[485]=C_h_intern(&lf[485],14,"\003syscheck-pair");
+lf[486]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_pair_2");
+lf[487]=C_h_intern(&lf[487],14,"\003syscheck-list");
+lf[488]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_list_2");
+lf[489]=C_h_intern(&lf[489],16,"\003syscheck-number");
+lf[490]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_check_number_2");
+lf[491]=C_h_intern(&lf[491],15,"\003syscheck-exact");
+lf[492]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_check_exact_2");
+lf[493]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_check_char");
+lf[494]=C_decode_literal(C_heaptop,"\376B\000\000\023C_i_check_structure");
+lf[495]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_vector");
+lf[496]=C_decode_literal(C_heaptop,"\376B\000\000\024C_i_check_bytevector");
+lf[497]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_string");
+lf[498]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_symbol");
+lf[499]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_check_pair");
+lf[500]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_check_list");
+lf[501]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_number");
+lf[502]=C_decode_literal(C_heaptop,"\376B\000\000\017C_i_check_exact");
+lf[503]=C_h_intern(&lf[503],14,"inexact->exact");
+lf[504]=C_decode_literal(C_heaptop,"\376B\000\000\024C_i_inexact_to_exact");
+lf[505]=C_h_intern(&lf[505],13,"string-length");
+lf[506]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_string_length");
+lf[507]=C_h_intern(&lf[507],17,"\003sysvector-length");
+lf[508]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_vector_length");
+lf[509]=C_h_intern(&lf[509],13,"vector-length");
+lf[510]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_vector_length");
+lf[511]=C_h_intern(&lf[511],13,"integer->char");
+lf[512]=C_decode_literal(C_heaptop,"\376B\000\000\020C_make_character");
+lf[513]=C_decode_literal(C_heaptop,"\376B\000\000\007C_unfix");
+lf[514]=C_h_intern(&lf[514],13,"char->integer");
+lf[515]=C_decode_literal(C_heaptop,"\376B\000\000\005C_fix");
+lf[516]=C_decode_literal(C_heaptop,"\376B\000\000\020C_character_code");
+lf[517]=C_decode_literal(C_heaptop,"\376B\000\000\005C_fix");
+lf[518]=C_decode_literal(C_heaptop,"\376B\000\000\015C_header_size");
+lf[519]=C_decode_literal(C_heaptop,"\376B\000\000\005C_fix");
+lf[520]=C_decode_literal(C_heaptop,"\376B\000\000\015C_header_size");
+lf[521]=C_h_intern(&lf[521],9,"negative\077");
+lf[522]=C_decode_literal(C_heaptop,"\376B\000\000\017C_u_i_negativep");
+lf[523]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_negativep");
+lf[524]=C_decode_literal(C_heaptop,"\376B\000\000\016C_flonum_lessp");
+lf[525]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fixnum_lessp");
+lf[526]=C_h_intern(&lf[526],9,"positive\077");
+lf[527]=C_decode_literal(C_heaptop,"\376B\000\000\017C_u_i_positivep");
+lf[528]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_positivep");
+lf[529]=C_decode_literal(C_heaptop,"\376B\000\000\021C_flonum_greaterp");
+lf[530]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_greaterp");
+lf[531]=C_h_intern(&lf[531],5,"zero\077");
+lf[532]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_zerop");
+lf[533]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_zerop");
+lf[534]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
+lf[535]=C_h_intern(&lf[535],4,"atan");
+lf[536]=C_decode_literal(C_heaptop,"\376B\000\000\013C_a_i_atan2");
+lf[537]=C_h_intern(&lf[537],4,"sqrt");
+lf[538]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_sqrt");
+lf[539]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_atan");
+lf[540]=C_h_intern(&lf[540],4,"acos");
+lf[541]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_acos");
+lf[542]=C_h_intern(&lf[542],4,"asin");
+lf[543]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_asin");
+lf[544]=C_h_intern(&lf[544],3,"log");
+lf[545]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_log");
+lf[546]=C_h_intern(&lf[546],3,"tan");
+lf[547]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_tan");
+lf[548]=C_h_intern(&lf[548],3,"cos");
+lf[549]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_cos");
+lf[550]=C_h_intern(&lf[550],3,"sin");
+lf[551]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_sin");
+lf[552]=C_h_intern(&lf[552],3,"exp");
+lf[553]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_exp");
+lf[554]=C_h_intern(&lf[554],5,"fpneg");
+lf[555]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_i_flonum_negate");
+lf[556]=C_h_intern(&lf[556],3,"fp/");
+lf[557]=C_decode_literal(C_heaptop,"\376B\000\000\025C_a_i_flonum_quotient");
+lf[558]=C_h_intern(&lf[558],3,"fp*");
+lf[559]=C_decode_literal(C_heaptop,"\376B\000\000\022C_a_i_flonum_times");
+lf[560]=C_h_intern(&lf[560],3,"fp-");
+lf[561]=C_decode_literal(C_heaptop,"\376B\000\000\027C_a_i_flonum_difference");
+lf[562]=C_h_intern(&lf[562],3,"fp+");
+lf[563]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_plus");
+lf[564]=C_h_intern(&lf[564],11,"bitwise-not");
+lf[565]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_bitwise_not");
+lf[566]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_not");
+lf[567]=C_h_intern(&lf[567],11,"bitwise-ior");
+lf[568]=C_decode_literal(C_heaptop,"\376B\000\000\013C_fixnum_or");
+lf[569]=C_decode_literal(C_heaptop,"\376B\000\000\015C_u_fixnum_or");
+lf[570]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_bitwise_ior");
+lf[571]=C_h_intern(&lf[571],11,"bitwise-and");
+lf[572]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_and");
+lf[573]=C_decode_literal(C_heaptop,"\376B\000\000\016C_u_fixnum_and");
+lf[574]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_bitwise_and");
+lf[575]=C_h_intern(&lf[575],11,"bitwise-xor");
+lf[576]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_xor");
+lf[577]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_xor");
+lf[578]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_bitwise_xor");
+lf[579]=C_h_intern(&lf[579],3,"abs");
+lf[580]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_abs");
+lf[581]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_abs");
+lf[582]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_abs");
+lf[583]=C_h_intern(&lf[583],8,"set-cdr!");
+lf[584]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_set_cdr");
+lf[585]=C_decode_literal(C_heaptop,"\376B\000\000\015C_u_i_set_cdr");
+lf[586]=C_h_intern(&lf[586],8,"set-car!");
+lf[587]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_set_car");
+lf[588]=C_decode_literal(C_heaptop,"\376B\000\000\015C_u_i_set_car");
+lf[589]=C_h_intern(&lf[589],6,"member");
+lf[590]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_member");
+lf[591]=C_h_intern(&lf[591],5,"assoc");
+lf[592]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_assoc");
+lf[593]=C_h_intern(&lf[593],4,"memq");
+lf[594]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_memq");
+lf[595]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_memq");
+lf[596]=C_h_intern(&lf[596],4,"assq");
lf[597]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_assq");
lf[598]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_assq");
-lf[599]=C_h_intern(&lf[599],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[599]=C_h_intern(&lf[599],4,"memv");
+lf[600]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_memv");
+lf[601]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_memq");
+lf[602]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_memq");
+lf[603]=C_h_intern(&lf[603],4,"assv");
+lf[604]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_assv");
+lf[605]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_assq");
+lf[606]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_assq");
+lf[607]=C_h_intern(&lf[607],15,"number-of-slots");
+lf[608]=C_decode_literal(C_heaptop,"\376B\000\000\014C_block_size");
+lf[609]=C_h_intern(&lf[609],9,"block-ref");
+lf[610]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[611]=C_h_intern(&lf[611],15,"\003sysbytevector\077");
+lf[612]=C_decode_literal(C_heaptop,"\376B\000\000\015C_bytevectorp");
+lf[613]=C_h_intern(&lf[613],14,"\003sysstructure\077");
+lf[614]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_structurep");
+lf[615]=C_h_intern(&lf[615],9,"list-tail");
+lf[616]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_list_tail");
+lf[617]=C_h_intern(&lf[617],13,"char-downcase");
+lf[618]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_char_downcase");
+lf[619]=C_h_intern(&lf[619],11,"char-upcase");
+lf[620]=C_decode_literal(C_heaptop,"\376B\000\000\021C_u_i_char_upcase");
+lf[621]=C_h_intern(&lf[621],16,"char-lower-case\077");
+lf[622]=C_decode_literal(C_heaptop,"\376B\000\000\026C_u_i_char_lower_casep");
+lf[623]=C_h_intern(&lf[623],16,"char-upper-case\077");
+lf[624]=C_decode_literal(C_heaptop,"\376B\000\000\026C_u_i_char_upper_casep");
+lf[625]=C_h_intern(&lf[625],16,"char-whitespace\077");
+lf[626]=C_decode_literal(C_heaptop,"\376B\000\000\026C_u_i_char_whitespacep");
+lf[627]=C_h_intern(&lf[627],16,"char-alphabetic\077");
+lf[628]=C_decode_literal(C_heaptop,"\376B\000\000\026C_u_i_char_alphabeticp");
+lf[629]=C_h_intern(&lf[629],13,"char-numeric\077");
+lf[630]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_char_numericp");
+lf[631]=C_h_intern(&lf[631],5,"fpmin");
+lf[632]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_flonum_min");
+lf[633]=C_h_intern(&lf[633],5,"fpmax");
+lf[634]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_flonum_max");
+lf[635]=C_h_intern(&lf[635],5,"fxmin");
+lf[636]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_fixnum_min");
+lf[637]=C_h_intern(&lf[637],5,"fxmax");
+lf[638]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_fixnum_max");
+lf[639]=C_h_intern(&lf[639],4,"fp<=");
+lf[640]=C_decode_literal(C_heaptop,"\376B\000\000\030C_flonum_less_or_equal_p");
+lf[641]=C_h_intern(&lf[641],4,"fp>=");
+lf[642]=C_decode_literal(C_heaptop,"\376B\000\000\033C_flonum_greater_or_equal_p");
+lf[643]=C_h_intern(&lf[643],3,"fp<");
+lf[644]=C_decode_literal(C_heaptop,"\376B\000\000\016C_flonum_lessp");
+lf[645]=C_h_intern(&lf[645],3,"fp>");
+lf[646]=C_decode_literal(C_heaptop,"\376B\000\000\021C_flonum_greaterp");
+lf[647]=C_h_intern(&lf[647],3,"fp=");
+lf[648]=C_decode_literal(C_heaptop,"\376B\000\000\017C_flonum_equalp");
+lf[649]=C_h_intern(&lf[649],4,"fx<=");
+lf[650]=C_decode_literal(C_heaptop,"\376B\000\000\030C_fixnum_less_or_equal_p");
+lf[651]=C_h_intern(&lf[651],4,"fx>=");
+lf[652]=C_decode_literal(C_heaptop,"\376B\000\000\033C_fixnum_greater_or_equal_p");
+lf[653]=C_h_intern(&lf[653],3,"fx<");
+lf[654]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fixnum_lessp");
+lf[655]=C_h_intern(&lf[655],3,"fx>");
+lf[656]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_greaterp");
+lf[657]=C_h_intern(&lf[657],3,"fx=");
+lf[658]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
+lf[659]=C_h_intern(&lf[659],5,"fxmod");
+lf[660]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fixnum_modulo");
+lf[661]=C_h_intern(&lf[661],3,"fx/");
+lf[662]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fixnum_divide");
+lf[663]=C_h_intern(&lf[663],3,"fx*");
+lf[664]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fixnum_times");
+lf[665]=C_h_intern(&lf[665],5,"fxnot");
+lf[666]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_not");
+lf[667]=C_h_intern(&lf[667],8,"\003syssize");
+lf[668]=C_decode_literal(C_heaptop,"\376B\000\000\014C_block_size");
+lf[669]=C_h_intern(&lf[669],13,"\003sysblock-ref");
+lf[670]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_block_ref");
+lf[671]=C_h_intern(&lf[671],8,"\003sysslot");
+lf[672]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[673]=C_h_intern(&lf[673],7,"char<=\077");
+lf[674]=C_decode_literal(C_heaptop,"\376B\000\000\030C_fixnum_less_or_equal_p");
+lf[675]=C_h_intern(&lf[675],7,"char>=\077");
+lf[676]=C_decode_literal(C_heaptop,"\376B\000\000\033C_fixnum_greater_or_equal_p");
+lf[677]=C_h_intern(&lf[677],6,"char<\077");
+lf[678]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fixnum_lessp");
+lf[679]=C_h_intern(&lf[679],6,"char>\077");
+lf[680]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_greaterp");
+lf[681]=C_h_intern(&lf[681],6,"char=\077");
+lf[682]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
+lf[683]=C_h_intern(&lf[683],10,"vector-ref");
+lf[684]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_vector_ref");
+lf[685]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[686]=C_h_intern(&lf[686],11,"string-set!");
+lf[687]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_string_set");
+lf[688]=C_decode_literal(C_heaptop,"\376B\000\000\014C_setsubchar");
+lf[689]=C_h_intern(&lf[689],10,"string-ref");
+lf[690]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_string_ref");
+lf[691]=C_decode_literal(C_heaptop,"\376B\000\000\011C_subchar");
+lf[692]=C_h_intern(&lf[692],11,"eof-object\077");
+lf[693]=C_decode_literal(C_heaptop,"\376B\000\000\006C_eofp");
+lf[694]=C_h_intern(&lf[694],12,"proper-list\077");
+lf[695]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_listp");
+lf[696]=C_h_intern(&lf[696],5,"list\077");
+lf[697]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_listp");
+lf[698]=C_h_intern(&lf[698],8,"inexact\077");
+lf[699]=C_decode_literal(C_heaptop,"\376B\000\000\016C_u_i_inexactp");
+lf[700]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_inexactp");
+lf[701]=C_decode_literal(C_heaptop,"\376B\000\000\012C_nfixnump");
+lf[702]=C_h_intern(&lf[702],6,"exact\077");
+lf[703]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_exactp");
+lf[704]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_exactp");
lf[705]=C_decode_literal(C_heaptop,"\376B\000\000\011C_fixnump");
-lf[706]=C_h_intern(&lf[706],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[706]=C_h_intern(&lf[706],22,"\003sysgeneric-structure\077");
+lf[707]=C_decode_literal(C_heaptop,"\376B\000\000\014C_structurep");
+lf[708]=C_h_intern(&lf[708],8,"pointer\077");
+lf[709]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_safe_pointerp");
+lf[710]=C_h_intern(&lf[710],12,"\003syspointer\077");
+lf[711]=C_decode_literal(C_heaptop,"\376B\000\000\015C_anypointerp");
+lf[712]=C_h_intern(&lf[712],10,"fpinteger\077");
+lf[713]=C_decode_literal(C_heaptop,"\376B\000\000\020C_u_i_fpintegerp");
+lf[714]=C_h_intern(&lf[714],7,"finite\077");
+lf[715]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_finitep");
+lf[716]=C_h_intern(&lf[716],7,"fixnum\077");
+lf[717]=C_decode_literal(C_heaptop,"\376B\000\000\011C_fixnump");
+lf[718]=C_h_intern(&lf[718],7,"flonum\077");
+lf[719]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_flonump");
+lf[720]=C_h_intern(&lf[720],8,"integer\077");
+lf[721]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_integerp");
+lf[722]=C_h_intern(&lf[722],5,"real\077");
+lf[723]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_numberp");
+lf[724]=C_h_intern(&lf[724],9,"rational\077");
+lf[725]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_rationalp");
+lf[726]=C_h_intern(&lf[726],8,"complex\077");
+lf[727]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_numberp");
+lf[728]=C_h_intern(&lf[728],7,"number\077");
+lf[729]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_numberp");
+lf[730]=C_h_intern(&lf[730],8,"boolean\077");
+lf[731]=C_decode_literal(C_heaptop,"\376B\000\000\012C_booleanp");
+lf[732]=C_h_intern(&lf[732],5,"port\077");
+lf[733]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_portp");
+lf[734]=C_h_intern(&lf[734],10,"procedure\077");
+lf[735]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_closurep");
+lf[736]=C_h_intern(&lf[736],9,"\003syspair\077");
+lf[737]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_pairp");
+lf[738]=C_h_intern(&lf[738],5,"pair\077");
+lf[739]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_pairp");
+lf[740]=C_h_intern(&lf[740],11,"\003sysvector\077");
+lf[741]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_vectorp");
+lf[742]=C_h_intern(&lf[742],7,"vector\077");
+lf[743]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_vectorp");
+lf[744]=C_h_intern(&lf[744],7,"symbol\077");
+lf[745]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_symbolp");
+lf[746]=C_h_intern(&lf[746],9,"locative\077");
+lf[747]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_locativep");
+lf[748]=C_h_intern(&lf[748],7,"string\077");
+lf[749]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_stringp");
+lf[750]=C_h_intern(&lf[750],5,"char\077");
+lf[751]=C_decode_literal(C_heaptop,"\376B\000\000\007C_charp");
+lf[752]=C_h_intern(&lf[752],3,"not");
+lf[753]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_not");
+lf[754]=C_h_intern(&lf[754],6,"length");
+lf[755]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_length");
+lf[756]=C_h_intern(&lf[756],9,"\003sysnull\077");
+lf[757]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_nullp");
+lf[758]=C_h_intern(&lf[758],5,"null\077");
+lf[759]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_nullp");
+lf[760]=C_h_intern(&lf[760],8,"list-ref");
+lf[761]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_list_ref");
+lf[762]=C_decode_literal(C_heaptop,"\376B\000\000\016C_u_i_list_ref");
+lf[763]=C_h_intern(&lf[763],8,"\003syseqv\077");
+lf[764]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_eqvp");
+lf[765]=C_h_intern(&lf[765],4,"eqv\077");
+lf[766]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_eqvp");
+lf[767]=C_h_intern(&lf[767],7,"\003syseq\077");
+lf[768]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
+lf[769]=C_h_intern(&lf[769],3,"eq\077");
+lf[770]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
+lf[771]=C_h_intern(&lf[771],3,"cdr");
+lf[772]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_cdr");
+lf[773]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[774]=C_h_intern(&lf[774],6,"cddddr");
+lf[775]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_cddddr");
+lf[776]=C_h_intern(&lf[776],5,"cdddr");
+lf[777]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_cdddr");
+lf[778]=C_h_intern(&lf[778],4,"cddr");
+lf[779]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_cddr");
+lf[780]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cddddr");
+lf[781]=C_h_intern(&lf[781],6,"cdddar");
+lf[782]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cdddar");
+lf[783]=C_h_intern(&lf[783],6,"cddadr");
+lf[784]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cddadr");
+lf[785]=C_h_intern(&lf[785],6,"cddaar");
+lf[786]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cddaar");
+lf[787]=C_h_intern(&lf[787],6,"cdaddr");
+lf[788]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cdaddr");
+lf[789]=C_h_intern(&lf[789],6,"cdadar");
+lf[790]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cdadar");
+lf[791]=C_h_intern(&lf[791],6,"cdaadr");
+lf[792]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cdaadr");
+lf[793]=C_h_intern(&lf[793],6,"cdaaar");
+lf[794]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cdaaar");
+lf[795]=C_h_intern(&lf[795],6,"cadddr");
+lf[796]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cadddr");
+lf[797]=C_h_intern(&lf[797],6,"caddar");
+lf[798]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_caddar");
+lf[799]=C_h_intern(&lf[799],6,"cadadr");
+lf[800]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cadadr");
+lf[801]=C_h_intern(&lf[801],6,"cadaar");
+lf[802]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cadaar");
+lf[803]=C_h_intern(&lf[803],6,"caaddr");
+lf[804]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_caaddr");
+lf[805]=C_h_intern(&lf[805],6,"caadar");
+lf[806]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_caadar");
+lf[807]=C_h_intern(&lf[807],6,"caaaar");
+lf[808]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_caaaar");
+lf[809]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_cdddr");
+lf[810]=C_h_intern(&lf[810],5,"cddar");
+lf[811]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_cddar");
+lf[812]=C_h_intern(&lf[812],5,"cdadr");
+lf[813]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_cdadr");
+lf[814]=C_h_intern(&lf[814],5,"cdaar");
+lf[815]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_cdaar");
+lf[816]=C_h_intern(&lf[816],5,"caddr");
+lf[817]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_caddr");
+lf[818]=C_h_intern(&lf[818],5,"cadar");
+lf[819]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_cadar");
+lf[820]=C_h_intern(&lf[820],5,"caaar");
+lf[821]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_caaar");
+lf[822]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_cddr");
+lf[823]=C_h_intern(&lf[823],4,"cdar");
+lf[824]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_cdar");
+lf[825]=C_h_intern(&lf[825],4,"caar");
+lf[826]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_caar");
+lf[827]=C_h_intern(&lf[827],22,"\003syscontinuation-graft");
+lf[828]=C_decode_literal(C_heaptop,"\376B\000\000\024C_continuation_graft");
+lf[829]=C_h_intern(&lf[829],12,"locative-ref");
+lf[830]=C_decode_literal(C_heaptop,"\376B\000\000\016C_locative_ref");
+lf[831]=C_h_intern(&lf[831],8,"cpu-time");
+lf[832]=C_decode_literal(C_heaptop,"\376B\000\000\012C_cpu_time");
+lf[833]=C_h_intern(&lf[833],20,"\003syscall-with-values");
+lf[834]=C_decode_literal(C_heaptop,"\376B\000\000\022C_call_with_values");
+lf[835]=C_decode_literal(C_heaptop,"\376B\000\000\024C_u_call_with_values");
+lf[836]=C_h_intern(&lf[836],16,"call-with-values");
+lf[837]=C_decode_literal(C_heaptop,"\376B\000\000\022C_call_with_values");
+lf[838]=C_decode_literal(C_heaptop,"\376B\000\000\024C_u_call_with_values");
+lf[839]=C_decode_literal(C_heaptop,"\376B\000\000\010C_values");
+lf[840]=C_decode_literal(C_heaptop,"\376B\000\000\010C_values");
+lf[841]=C_h_intern(&lf[841],6,"fourth");
+lf[842]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_cadddr");
+lf[843]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cadddr");
+lf[844]=C_h_intern(&lf[844],5,"third");
+lf[845]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_caddr");
+lf[846]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_caddr");
+lf[847]=C_h_intern(&lf[847],6,"second");
+lf[848]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_cadr");
+lf[849]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_cadr");
+lf[850]=C_h_intern(&lf[850],5,"first");
+lf[851]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_car");
+lf[852]=C_decode_literal(C_heaptop,"\376B\000\000\011C_u_i_car");
+lf[853]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_cadddr");
+lf[854]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cadddr");
+lf[855]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_caddr");
+lf[856]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_caddr");
+lf[857]=C_h_intern(&lf[857],4,"cadr");
+lf[858]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_cadr");
+lf[859]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_cadr");
+lf[860]=C_h_intern(&lf[860],7,"\003syscdr");
+lf[861]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_cdr");
+lf[862]=C_decode_literal(C_heaptop,"\376B\000\000\011C_u_i_cdr");
+lf[863]=C_h_intern(&lf[863],7,"\003syscar");
+lf[864]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_car");
+lf[865]=C_decode_literal(C_heaptop,"\376B\000\000\011C_u_i_car");
+lf[866]=C_h_intern(&lf[866],3,"car");
+lf[867]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_car");
+lf[868]=C_decode_literal(C_heaptop,"\376B\000\000\011C_u_i_car");
+lf[869]=C_h_intern(&lf[869],9,"\003sysapply");
+lf[870]=C_h_intern(&lf[870],5,"apply");
+lf[871]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\012C_i_equalp\376\377\016");
+lf[872]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[873]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\005C_eqp\376\377\016");
+lf[874]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[875]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[876]=C_h_intern(&lf[876],6,"equal\077");
+lf[877]=C_h_intern(&lf[877],4,"sub1");
+lf[878]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_decrease");
+lf[879]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_fixnum_decrease");
+lf[880]=C_decode_literal(C_heaptop,"\376B\000\000\013C_a_i_minus");
+lf[881]=C_h_intern(&lf[881],4,"add1");
+lf[882]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_increase");
+lf[883]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_fixnum_increase");
+lf[884]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_plus");
+lf[885]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\024C_fixnum_shift_right\376\377\016");
+lf[886]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[887]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\017C_fixnum_divide\376\377\016");
+lf[888]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[889]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[890]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\012C_quotient\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[891]=C_h_intern(&lf[891],8,"quotient");
+lf[892]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[893]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\024C_fixnum_shift_right\376\377\016");
+lf[894]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\017C_fixnum_divide\376\377\016");
+lf[895]=C_h_intern(&lf[895],19,"\010compilerfold-inner");
+lf[896]=C_h_intern(&lf[896],6,"remove");
+lf[897]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\021C_u_fixnum_negate\376\377\016");
+lf[898]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[899]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\017C_fixnum_negate\376\377\016");
lf[900]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
lf[901]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
-lf[902]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\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);
+lf[902]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\025C_u_fixnum_difference\376\377\016");
+lf[903]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\023C_fixnum_difference\376\377\016");
+lf[904]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[905]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[906]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[907]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\023C_fixnum_shift_left\376\377\016");
+lf[908]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\016C_fixnum_times\376\377\016");
+lf[909]=C_decode_literal(C_heaptop,"\376B\000\000\015C_fixnum_plus");
+lf[910]=C_decode_literal(C_heaptop,"\376B\000\000\017C_u_fixnum_plus");
+lf[911]=C_h_intern(&lf[911],15,"lset-difference");
+lf[912]=C_h_intern(&lf[912],10,"lset-union");
+C_register_lf2(lf,913,create_ptable());
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1311,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
C_library_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* k1301 */
-static void C_ccall f_1303(C_word c,C_word t0,C_word t1){
+/* k1309 */
+static void C_ccall f_1311(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1311,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1314,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* k1304 in k1301 */
-static void C_ccall f_1306(C_word c,C_word t0,C_word t1){
+/* k1312 in k1309 */
+static void C_ccall f_1314(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2376,10 +2400,9 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1314,2,t0,t1);}
t2=C_set_block_item(lf[0] /* default-optimization-passes */,0,C_fix(3));
t3=C_mutate((C_word*)lf[1]+1 /* (set! default-declarations ...) */,lf[2]);
t4=C_mutate((C_word*)lf[3]+1 /* (set! default-debugging-declarations ...) */,lf[4]);
@@ -2390,59 +2413,58 @@ 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){
+t12=C_mutate((C_word*)lf[16]+1 /* (set! membership-test-operators ...) */,lf[17]);
+t13=C_set_block_item(lf[18] /* membership-unfold-limit */,0,C_fix(20));
+t14=C_mutate((C_word*)lf[19]+1 /* (set! target-include-file ...) */,lf[20]);
+t15=C_mutate((C_word*)lf[21]+1 /* (set! valid-compiler-options ...) */,lf[22]);
+t16=C_mutate((C_word*)lf[23]+1 /* (set! valid-compiler-options-with-argument ...) */,lf[24]);
+t17=C_mutate((C_word*)lf[25]+1 /* (set! default-standard-bindings ...) */,lf[26]);
+t18=C_mutate((C_word*)lf[27]+1 /* (set! default-extended-bindings ...) */,lf[28]);
+t19=C_mutate((C_word*)lf[29]+1 /* (set! internal-bindings ...) */,lf[30]);
+t20=C_mutate((C_word*)lf[31]+1 /* (set! non-foldable-bindings ...) */,lf[32]);
+t21=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1337,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t22=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4964,a[2]=t21,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 195 lset-union");
+((C_proc5)C_retrieve_symbol_proc(lf[912]))(5,*((C_word*)lf[912]+1),t22,*((C_word*)lf[769]+1),*((C_word*)lf[25]+1),*((C_word*)lf[27]+1));}
+
+/* k4962 in k1312 in k1309 */
+static void C_ccall f_4964(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-platform.scm: 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));}
+C_trace("c-platform.scm: 193 lset-difference");
+((C_proc5)C_retrieve_symbol_proc(lf[911]))(5,*((C_word*)lf[911]+1),((C_word*)t0)[2],*((C_word*)lf[769]+1),t1,*((C_word*)lf[31]+1));}
-/* k1328 in k1304 in k1301 */
-static void C_ccall f_1330(C_word c,C_word t0,C_word t1){
+/* k1335 in k1312 in k1309 */
+static void C_ccall f_1337(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1337,2,t0,t1);}
+t2=C_mutate((C_word*)lf[33]+1 /* (set! foldable-bindings ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1340,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 201 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t3,lf[417],C_fix(19),C_fix(0),lf[909],lf[910],C_SCHEME_FALSE);}
-/* k1331 in k1328 in k1304 in k1301 */
-static void C_ccall f_1333(C_word c,C_word t0,C_word t1){
+/* k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1340(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1340,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1343,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4787,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 203 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[421],C_fix(8),t3);}
-/* 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){
+/* a4786 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4787(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -2450,14 +2472,14 @@ 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);}
+C_save_and_reclaim((void*)tr6,(void*)f_4787,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4791,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4928,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 212 remove");
+((C_proc4)C_retrieve_symbol_proc(lf[896]))(4,*((C_word*)lf[896]+1),t6,t7,t5);}
-/* 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){
+/* a4927 in a4786 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4928(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2469,22 +2491,22 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_4928,3,t0,t1,t2);}
t3=t2;
-t4=(C_word)C_slot(t3,C_fix(1));
-t5=(C_word)C_eqp(lf[49],t4);
+t4=C_slot(t3,C_fix(1));
+t5=C_eqp(lf[47],t4);
if(C_truep(t5)){
t6=t2;
-t7=(C_word)C_slot(t6,C_fix(2));
-t8=(C_word)C_i_car(t7);
+t7=C_slot(t6,C_fix(2));
+t8=C_i_car(t7);
t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_eqp(C_fix(1),t8));}
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_eqp(C_fix(1),t8));}
else{
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
-/* 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){
+/* k4789 in a4786 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4791(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2497,32 +2519,32 @@ 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));}
+C_save_and_reclaim((void*)tr2,(void*)f_4791,2,t0,t1);}
+if(C_truep(C_i_nullp(t1))){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4813,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 217 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t2,C_fix(0));}
else{
-t2=(C_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);
+t2=C_i_cdr(t1);
+if(C_truep(C_i_nullp(t2))){
+t3=C_i_car(t1);
+t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
t5=((C_word*)t0)[2];
t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[900],t4));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[905],t4));}
else{
-t3=(C_word)C_eqp(C_retrieve(lf[37]),lf[36]);
+t3=C_eqp(C_retrieve(lf[35]),lf[34]);
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);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4857,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4859,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 225 fold-inner");
+((C_proc4)C_retrieve_symbol_proc(lf[895]))(4,*((C_word*)lf[895]+1),t4,t5,t1);}
else{
t4=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}}}
-/* 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){
+/* a4858 in k4789 in a4786 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4859(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -2535,23 +2557,23 @@ 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);
+C_save_and_reclaim((void*)tr4,(void*)f_4859,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4866,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t5=t3;
-t6=(C_word)C_slot(t5,C_fix(1));
-t7=(C_word)C_eqp(lf[49],t6);
+t6=C_slot(t5,C_fix(1));
+t7=C_eqp(lf[47],t6);
if(C_truep(t7)){
t8=t3;
-t9=(C_word)C_slot(t8,C_fix(2));
-t10=(C_word)C_i_car(t9);
+t9=C_slot(t8,C_fix(2));
+t10=C_i_car(t9);
t11=t4;
-f_4832(t11,(C_word)C_eqp(C_fix(2),t10));}
+f_4866(t11,C_eqp(C_fix(2),t10));}
else{
t8=t4;
-f_4832(t8,C_SCHEME_FALSE);}}
+f_4866(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){
+/* k4864 in a4858 in k4789 in a4786 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_4866(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2559,75 +2581,75 @@ 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);}
+C_save_and_reclaim((void*)trf_4866,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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));}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4882,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 228 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t2,C_fix(1));}
else{
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[4],((C_word*)t0)[2]);
+t2=C_a_i_list(&a,2,((C_word*)t0)[4],((C_word*)t0)[2]);
t3=((C_word*)t0)[3];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[903],t2));}}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[38],lf[908],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){
+/* k4880 in k4864 in a4858 in k4789 in a4786 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4882(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4848,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_4882,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[902],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[38],lf[907],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){
+/* k4855 in k4789 in a4786 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4857(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4823,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_4857,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[901],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[906],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){
+/* k4811 in k4789 in a4786 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4813(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4779,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_4813,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[899],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[904],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){
+/* k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1343(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1343,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1346,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4637,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 233 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[419],C_fix(8),t3);}
-/* 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){
+/* a4636 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4637(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -2648,39 +2670,39 @@ 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))){
+C_save_and_reclaim((void*)tr6,(void*)f_4637,6,t0,t1,t2,t3,t4,t5);}
+if(C_truep(C_i_nullp(t5))){
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}
else{
-t6=(C_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);
+t6=C_i_cdr(t5);
+t7=C_i_nullp(t6);
+t8=(C_truep(t7)?C_eqp(C_retrieve(lf[35]),lf[34]):C_SCHEME_FALSE);
if(C_truep(t8)){
-if(C_truep(C_retrieve(lf[38]))){
+if(C_truep(C_retrieve(lf[36]))){
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);
+t10=C_a_i_record(&a,4,lf[37],lf[38],lf[897],t9);
+t11=C_a_i_list(&a,2,t4,t10);
t12=t1;
t13=t12;
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[893],t11));}
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,C_a_i_record(&a,4,lf[37],lf[39],lf[898],t11));}
else{
t9=t5;
-t10=(C_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);
+t10=C_a_i_record(&a,4,lf[37],lf[38],lf[899],t9);
+t11=C_a_i_list(&a,2,t4,t10);
t12=t1;
t13=t12;
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[895],t11));}}
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,C_a_i_record(&a,4,lf[37],lf[39],lf[900],t11));}}
else{
-t9=(C_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);}}}
+t9=C_i_car(t5);
+t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4737,a[2]=t1,a[3]=t4,a[4]=t9,tmp=(C_word)a,a+=5,tmp);
+t11=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4739,tmp=(C_word)a,a+=2,tmp);
+t12=C_i_cdr(t5);
+C_trace("c-platform.scm: 253 remove");
+((C_proc4)C_retrieve_symbol_proc(lf[896]))(4,*((C_word*)lf[896]+1),t10,t11,t12);}}}
-/* 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){
+/* a4738 in a4636 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4739(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2692,22 +2714,22 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_4739,3,t0,t1,t2);}
t3=t2;
-t4=(C_word)C_slot(t3,C_fix(1));
-t5=(C_word)C_eqp(lf[49],t4);
+t4=C_slot(t3,C_fix(1));
+t5=C_eqp(lf[47],t4);
if(C_truep(t5)){
t6=t2;
-t7=(C_word)C_slot(t6,C_fix(2));
-t8=(C_word)C_i_car(t7);
+t7=C_slot(t6,C_fix(2));
+t8=C_i_car(t7);
t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_eqp(t8,C_fix(0)));}
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_eqp(t8,C_fix(0)));}
else{
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
-/* 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){
+/* k4735 in a4636 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4737(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2717,16 +2739,16 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_4737,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+t3=C_eqp(C_retrieve(lf[35]),lf[34]);
if(C_truep(t3)){
-t4=(C_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);}
+t4=C_i_length(t2);
+if(C_truep(C_fixnum_greater_or_equal_p(t4,C_fix(2)))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4706,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4708,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 264 fold-inner");
+((C_proc4)C_retrieve_symbol_proc(lf[895]))(4,*((C_word*)lf[895]+1),t5,t6,t2);}
else{
t5=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_FALSE);}}
@@ -2734,8 +2756,8 @@ 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){
+/* a4707 in k4735 in a4636 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4708(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -2743,42 +2765,42 @@ 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);
+C_save_and_reclaim((void*)tr4,(void*)f_4708,4,t0,t1,t2,t3);}
+t4=(C_truep(C_retrieve(lf[36]))?lf[902]:lf[903]);
+t5=C_a_i_list(&a,2,t2,t3);
t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[39],lf[40],t4,t5));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[38],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){
+/* k4704 in k4735 in a4636 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4706(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4672,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_4706,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[896],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[901],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){
+/* k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1346(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1346,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1349,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4478,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 271 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[415],C_fix(8),t3);}
-/* 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){
+/* a4477 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4478(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -2789,21 +2811,21 @@ 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);}
+C_save_and_reclaim((void*)tr6,(void*)f_4478,6,t0,t1,t2,t3,t4,t5);}
+t6=C_i_length(t5);
+if(C_truep(C_fixnum_greater_or_equal_p(t6,C_fix(2)))){
+t7=C_i_car(t5);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4593,a[2]=t1,a[3]=t4,a[4]=t7,tmp=(C_word)a,a+=5,tmp);
+t9=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4595,tmp=(C_word)a,a+=2,tmp);
+t10=C_i_cdr(t5);
+C_trace("c-platform.scm: 280 remove");
+((C_proc4)C_retrieve_symbol_proc(lf[896]))(4,*((C_word*)lf[896]+1),t8,t9,t10);}
else{
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_SCHEME_FALSE);}}
-/* 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){
+/* a4594 in a4477 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4595(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2815,22 +2837,22 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_4595,3,t0,t1,t2);}
t3=t2;
-t4=(C_word)C_slot(t3,C_fix(1));
-t5=(C_word)C_eqp(lf[49],t4);
+t4=C_slot(t3,C_fix(1));
+t5=C_eqp(lf[47],t4);
if(C_truep(t5)){
t6=t2;
-t7=(C_word)C_slot(t6,C_fix(2));
-t8=(C_word)C_i_car(t7);
+t7=C_slot(t6,C_fix(2));
+t8=C_i_car(t7);
t9=t1;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_eqp(C_fix(1),t8));}
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_eqp(C_fix(1),t8));}
else{
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
-/* 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){
+/* k4591 in a4477 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4593(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2840,16 +2862,16 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_4593,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+t3=C_eqp(C_retrieve(lf[35]),lf[34]);
if(C_truep(t3)){
-t4=(C_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);}
+t4=C_i_length(t2);
+if(C_truep(C_fixnum_greater_or_equal_p(t4,C_fix(2)))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4516,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4518,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 291 fold-inner");
+((C_proc4)C_retrieve_symbol_proc(lf[895]))(4,*((C_word*)lf[895]+1),t5,t6,t2);}
else{
t5=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_FALSE);}}
@@ -2857,8 +2879,8 @@ 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){
+/* a4517 in k4591 in a4477 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4518(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -2871,23 +2893,23 @@ 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);
+C_save_and_reclaim((void*)tr4,(void*)f_4518,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4525,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t5=t3;
-t6=(C_word)C_slot(t5,C_fix(1));
-t7=(C_word)C_eqp(lf[49],t6);
+t6=C_slot(t5,C_fix(1));
+t7=C_eqp(lf[47],t6);
if(C_truep(t7)){
t8=t3;
-t9=(C_word)C_slot(t8,C_fix(2));
-t10=(C_word)C_i_car(t9);
+t9=C_slot(t8,C_fix(2));
+t10=C_i_car(t9);
t11=t4;
-f_4491(t11,(C_word)C_eqp(C_fix(2),t10));}
+f_4525(t11,C_eqp(C_fix(2),t10));}
else{
t8=t4;
-f_4491(t8,C_SCHEME_FALSE);}}
+f_4525(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){
+/* k4523 in a4517 in k4591 in a4477 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_4525(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2895,61 +2917,61 @@ 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);}
+C_save_and_reclaim((void*)trf_4525,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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));}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4541,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 294 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t2,C_fix(1));}
else{
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[4],((C_word*)t0)[2]);
+t2=C_a_i_list(&a,2,((C_word*)t0)[4],((C_word*)t0)[2]);
t3=((C_word*)t0)[3];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[889],t2));}}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[38],lf[894],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){
+/* k4539 in k4523 in a4517 in k4591 in a4477 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4541(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4507,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_4541,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[888],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[38],lf[893],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){
+/* k4514 in k4591 in a4477 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4516(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4482,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_4516,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[887],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[892],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){
+/* k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1349(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1349,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1352,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4360,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 298 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[891],C_fix(8),t3);}
-/* 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){
+/* a4359 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4360(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -2966,47 +2988,47 @@ 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));
+C_save_and_reclaim((void*)tr6,(void*)f_4360,6,t0,t1,t2,t3,t4,t5);}
+t6=C_i_length(t5);
+t7=C_eqp(t6,C_fix(2));
if(C_truep(t7)){
-t8=(C_word)C_eqp(lf[36],C_retrieve(lf[37]));
+t8=C_eqp(lf[34],C_retrieve(lf[35]));
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);
+t9=C_i_cadr(t5);
+t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4395,a[2]=t1,a[3]=t4,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+t11=C_slot(t9,C_fix(1));
+t12=C_eqp(lf[47],t11);
if(C_truep(t12)){
-t13=(C_word)C_slot(t9,C_fix(2));
-t14=(C_word)C_i_car(t13);
+t13=C_slot(t9,C_fix(2));
+t14=C_i_car(t13);
t15=t10;
-f_4361(t15,(C_word)C_eqp(C_fix(2),t14));}
+f_4395(t15,C_eqp(C_fix(2),t14));}
else{
t13=t10;
-f_4361(t13,C_SCHEME_FALSE);}}
+f_4395(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);}}
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4463,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t10=C_a_i_record(&a,4,lf[37],lf[55],lf[890],C_SCHEME_END_OF_LIST);
+C_trace("c-platform.scm: 318 cons*");
+((C_proc5)C_retrieve_symbol_proc(lf[51]))(5,*((C_word*)lf[51]+1),t9,t10,t4,t5);}}
else{
t8=t1;
((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-/* 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){
+/* k4461 in a4359 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4463(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4429,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_4463,2,t0,t1);}
t2=((C_word*)t0)[2];
t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[884],t1));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[37],lf[39],lf[889],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){
+/* k4393 in a4359 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_4395(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3017,22 +3039,22 @@ 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);}
+C_save_and_reclaim((void*)trf_4395,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));}
+t2=C_i_car(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4415,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-platform.scm: 314 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t3,C_fix(1));}
else{
t2=((C_word*)t0)[4];
-t3=(C_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);
+t3=C_a_i_record(&a,4,lf[37],lf[38],lf[887],t2);
+t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
t5=((C_word*)t0)[2];
t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[883],t4));}}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[888],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){
+/* k4413 in k4393 in a4359 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4415(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3041,16 +3063,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4415,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
+t3=C_a_i_record(&a,4,lf[37],lf[38],lf[885],t2);
+t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
t5=((C_word*)t0)[2];
t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[881],t4));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[886],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){
+/* k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1352(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3058,85 +3080,85 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_1352,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1354,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1429,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4358,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 338 op1");
+f_1354(t4,lf[882],lf[883],lf[884]);}
-/* 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){
+/* k4356 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4358(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-platform.scm: 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);}
+C_trace("c-platform.scm: 338 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),((C_word*)t0)[2],lf[881],C_fix(8),t1);}
-/* 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){
+/* k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1429(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_1429,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1432,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4354,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 339 op1");
+f_1354(t3,lf[878],lf[879],lf[880]);}
-/* 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){
+/* k4352 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4354(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-platform.scm: 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);}
+C_trace("c-platform.scm: 339 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),((C_word*)t0)[2],lf[877],C_fix(8),t1);}
-/* 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){
+/* k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1432(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1432,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1434,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1624,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 359 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t3,lf[765],C_fix(8),t2);}
-/* k1615 in 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){
+/* k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1624(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_1624,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1627,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 360 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[763],C_fix(8),((C_word*)t0)[2]);}
-/* k1618 in k1615 in 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){
+/* k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1627(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1627,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1630,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4137,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 362 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[876],C_fix(8),t3);}
-/* 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){
+/* a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4137(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -3154,52 +3176,52 @@ 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));
+C_save_and_reclaim((void*)tr6,(void*)f_4137,6,t0,t1,t2,t3,t4,t5);}
+t6=C_i_length(t5);
+t7=C_eqp(t6,C_fix(2));
if(C_truep(t7)){
-t8=(C_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);
+t8=C_i_car(t5);
+t9=C_i_cadr(t5);
+t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4153,a[2]=t8,a[3]=t9,a[4]=t4,a[5]=t5,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+t11=C_slot(t8,C_fix(1));
+t12=C_eqp(lf[48],t11);
if(C_truep(t12)){
-t13=(C_word)C_slot(t9,C_fix(1));
-t14=(C_word)C_eqp(lf[50],t13);
+t13=C_slot(t9,C_fix(1));
+t14=C_eqp(lf[48],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);}
+t15=C_slot(t8,C_fix(2));
+t16=C_slot(t9,C_fix(2));
+if(C_truep(C_i_equalp(t15,t16))){
+t17=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4310,a[2]=t10,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 374 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t17,C_SCHEME_TRUE);}
else{
t17=t10;
-f_4119(t17,C_SCHEME_FALSE);}}
+f_4153(t17,C_SCHEME_FALSE);}}
else{
t15=t10;
-f_4119(t15,C_SCHEME_FALSE);}}
+f_4153(t15,C_SCHEME_FALSE);}}
else{
t13=t10;
-f_4119(t13,C_SCHEME_FALSE);}}
+f_4153(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){
+/* k4308 in a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4310(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4276,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_4310,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
-f_4119(t3,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[870],t2));}
+f_4153(t3,C_a_i_record(&a,4,lf[37],lf[39],lf[875],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){
+/* k4151 in a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_4153(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3211,27 +3233,27 @@ 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);}
+C_save_and_reclaim((void*)trf_4153,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[6];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4159,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4186,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t4=C_slot(((C_word*)t0)[2],C_fix(1));
+t5=C_eqp(lf[47],t4);
if(C_truep(t5)){
-t6=(C_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);}
+t6=C_slot(((C_word*)t0)[2],C_fix(2));
+t7=C_i_car(t6);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4255,a[2]=t7,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 377 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[310]))(3,*((C_word*)lf[310]+1),t8,t7);}
else{
t6=t3;
-f_4152(t6,C_SCHEME_FALSE);}}}
+f_4186(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){
+/* k4253 in k4151 in a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4255(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3239,13 +3261,13 @@ C_word *a;
if(C_truep(t1)){
t2=t1;
t3=((C_word*)t0)[3];
-f_4152(t3,t2);}
+f_4186(t3,t2);}
else{
t2=((C_word*)t0)[3];
-f_4152(t2,(C_word)C_i_symbolp(((C_word*)t0)[2]));}}
+f_4186(t2,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){
+/* k4184 in k4151 in a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_4186(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3256,34 +3278,34 @@ 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);
+C_save_and_reclaim((void*)trf_4186,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4189,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
if(C_truep(t1)){
t3=t2;
-f_4155(t3,t1);}
+f_4189(t3,t1);}
else{
-t3=(C_word)C_slot(((C_word*)t0)[2],C_fix(1));
-t4=(C_word)C_eqp(lf[49],t3);
+t3=C_slot(((C_word*)t0)[2],C_fix(1));
+t4=C_eqp(lf[47],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);}
+t5=C_slot(((C_word*)t0)[2],C_fix(2));
+t6=C_i_car(t5);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4222,a[2]=t6,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 380 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[310]))(3,*((C_word*)lf[310]+1),t7,t6);}
else{
t5=t2;
-f_4155(t5,C_SCHEME_FALSE);}}}
+f_4189(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){
+/* k4220 in k4184 in k4151 in a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4222(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
-f_4155(t2,(C_truep(t1)?t1:(C_word)C_i_symbolp(((C_word*)t0)[2])));}
+f_4189(t2,(C_truep(t1)?t1: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){
+/* k4187 in k4184 in k4151 in a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_4189(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3291,19 +3313,19 @@ 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);}
+C_save_and_reclaim((void*)trf_4189,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);
+t3=C_a_i_record(&a,4,lf[37],lf[38],lf[873],t2);
+t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
t5=((C_word*)t0)[2];
-f_4125(t5,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[869],t4));}
+f_4159(t5,C_a_i_record(&a,4,lf[37],lf[39],lf[874],t4));}
else{
t2=((C_word*)t0)[2];
-f_4125(t2,C_SCHEME_FALSE);}}
+f_4159(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){
+/* k4157 in k4151 in a4136 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_4159(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3313,3607 +3335,3715 @@ 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);}
+C_save_and_reclaim((void*)trf_4159,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=t1;
t3=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
t2=((C_word*)t0)[3];
-t3=(C_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);
+t3=C_a_i_record(&a,4,lf[37],lf[38],lf[871],t2);
+t4=C_a_i_list(&a,2,((C_word*)t0)[2],t3);
t5=((C_word*)t0)[4];
t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[867],t4));}}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[872],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){
+/* k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1630(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1630,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1632,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1846,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 417 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t3,lf[870],C_fix(8),t2);}
-/* k1837 in k1621 in k1618 in k1615 in 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){
+/* k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1846(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_1846,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1849,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 418 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[869],C_fix(8),((C_word*)t0)[2]);}
-/* k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1849(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1849,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1851,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1987,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 448 rewrite-c..r");
+f_1851(t3,lf[866],lf[867],lf[868],C_fix(0));}
+
+/* k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1987(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1987,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1990,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 449 rewrite-c..r");
+f_1851(t2,lf[863],lf[864],lf[865],C_fix(0));}
+
+/* k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1990(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1990,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1993,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("c-platform.scm: 450 rewrite-c..r");
-f_1844(t3,lf[861],lf[862],lf[863],C_fix(0));}
+f_1851(t2,lf[860],lf[861],lf[862],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){
+/* k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1993(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1993,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1996,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("c-platform.scm: 451 rewrite-c..r");
-f_1844(t2,lf[858],lf[859],lf[860],C_fix(0));}
+f_1851(t2,lf[857],lf[858],lf[859],C_fix(1));}
-/* k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1996(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1996,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1999,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("c-platform.scm: 452 rewrite-c..r");
-f_1844(t2,lf[855],lf[856],lf[857],C_fix(0));}
+f_1851(t2,lf[816],lf[855],lf[856],C_fix(2));}
-/* k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1999(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1999,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2002,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("c-platform.scm: 453 rewrite-c..r");
-f_1844(t2,lf[852],lf[853],lf[854],C_fix(1));}
+f_1851(t2,lf[795],lf[853],lf[854],C_fix(3));}
-/* k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2002(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2002,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2005,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("c-platform.scm: 454 rewrite-c..r");
-f_1844(t2,lf[811],lf[850],lf[851],C_fix(2));}
+f_1851(t2,lf[850],lf[851],lf[852],C_fix(0));}
-/* k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2005(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2005,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2008,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("c-platform.scm: 455 rewrite-c..r");
-f_1844(t2,lf[790],lf[848],lf[849],C_fix(3));}
+f_1851(t2,lf[847],lf[848],lf[849],C_fix(1));}
-/* k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2008(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2008,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2011,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("c-platform.scm: 456 rewrite-c..r");
-f_1844(t2,lf[845],lf[846],lf[847],C_fix(0));}
+f_1851(t2,lf[844],lf[845],lf[846],C_fix(2));}
-/* k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2011(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[4],*a=ab;
+C_word ab[3],*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_save_and_reclaim((void*)tr2,(void*)f_2011,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2014,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 457 rewrite-c..r");
-f_1844(t2,lf[842],lf[843],lf[844],C_fix(1));}
+f_1851(t2,lf[841],lf[842],lf[843],C_fix(3));}
-/* k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2014(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[4],*a=ab;
+C_word t4;
+C_word ab[6],*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));}
+C_save_and_reclaim((void*)tr2,(void*)f_2014,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_2015,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2041,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 464 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t3,lf[57],C_fix(8),t2);}
-/* k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2041(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_2041,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2044,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 465 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[58],C_fix(8),((C_word*)t0)[2]);}
-/* k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2044(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2044,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_2046,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2266,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 496 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t3,lf[836],C_fix(8),t2);}
-/* k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2266(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2266,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2269,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 497 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[833],C_fix(8),((C_word*)t0)[2]);}
-/* k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2269(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
+C_word ab[3],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2269,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2272,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 499 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[57],C_fix(13),lf[840],C_SCHEME_TRUE);}
-/* k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2272(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2272,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2275,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 500 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[58],C_fix(13),lf[839],C_SCHEME_TRUE);}
-/* k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2275(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2275,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2278,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 501 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[59],C_fix(13),lf[835],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[836],C_fix(13),lf[838],C_SCHEME_FALSE);}
-/* k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2278(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2278,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2281,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 502 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[60],C_fix(13),lf[834],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[836],C_fix(13),lf[837],C_SCHEME_TRUE);}
-/* k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2281(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2281,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2284,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 503 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[831],C_fix(13),lf[833],C_SCHEME_FALSE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[833],C_fix(13),lf[835],C_SCHEME_FALSE);}
-/* k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2284(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2284,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2287,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 504 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[831],C_fix(13),lf[832],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[833],C_fix(13),lf[834],C_SCHEME_TRUE);}
-/* k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2287(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2287,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2290,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 505 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[828],C_fix(13),lf[830],C_SCHEME_FALSE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[831],C_fix(13),lf[832],C_SCHEME_TRUE);}
-/* k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2290(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2290,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2293,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 506 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[828],C_fix(13),lf[829],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[829],C_fix(13),lf[830],C_SCHEME_TRUE);}
-/* k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2293(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2293,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2296,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 507 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[826],C_fix(13),lf[827],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[827],C_fix(13),lf[828],C_SCHEME_TRUE);}
-/* k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2296(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2296,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2299,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 509 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[825],C_fix(2),C_fix(1),lf[826],C_SCHEME_FALSE);}
-/* k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2299(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2299,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2302,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 510 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[823],C_fix(2),C_fix(1),lf[824],C_SCHEME_FALSE);}
-/* k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2302(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2302,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2305,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 511 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[778],C_fix(2),C_fix(1),lf[822],C_SCHEME_FALSE);}
-/* k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2305(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2305,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2308,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 512 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[820],C_fix(2),C_fix(1),lf[821],C_SCHEME_FALSE);}
-/* k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2308(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2308,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2311,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 513 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[818],C_fix(2),C_fix(1),lf[819],C_SCHEME_FALSE);}
-/* k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2311(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2311,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2314,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 514 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[816],C_fix(2),C_fix(1),lf[817],C_SCHEME_FALSE);}
-/* k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2314(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2314,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2317,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 515 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[814],C_fix(2),C_fix(1),lf[815],C_SCHEME_FALSE);}
-/* k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2317(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2317,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2320,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 516 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[812],C_fix(2),C_fix(1),lf[813],C_SCHEME_FALSE);}
-/* k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2320(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2320,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2323,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 517 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[810],C_fix(2),C_fix(1),lf[811],C_SCHEME_FALSE);}
-/* k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2323(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2323,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2326,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 518 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[776],C_fix(2),C_fix(1),lf[809],C_SCHEME_FALSE);}
-/* k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2326(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2326,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2329,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 519 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[807],C_fix(2),C_fix(1),lf[808],C_SCHEME_FALSE);}
-/* k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2329(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2329,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2332,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 520 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[805],C_fix(2),C_fix(1),lf[806],C_SCHEME_FALSE);}
-/* k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2332(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2332,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2335,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 521 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[803],C_fix(2),C_fix(1),lf[804],C_SCHEME_FALSE);}
-/* k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2335(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2335,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2338,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 522 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[801],C_fix(2),C_fix(1),lf[802],C_SCHEME_FALSE);}
-/* k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2338(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2338,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2341,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 523 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[799],C_fix(2),C_fix(1),lf[800],C_SCHEME_FALSE);}
-/* k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2341(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2341,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2344,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 524 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[797],C_fix(2),C_fix(1),lf[798],C_SCHEME_FALSE);}
-/* k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2344(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2344,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2347,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 525 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[795],C_fix(2),C_fix(1),lf[796],C_SCHEME_FALSE);}
-/* k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2347(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2347,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2350,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 526 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[793],C_fix(2),C_fix(1),lf[794],C_SCHEME_FALSE);}
-/* k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2350(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2350,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2353,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 527 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[791],C_fix(2),C_fix(1),lf[792],C_SCHEME_FALSE);}
-/* k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2353(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2353,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2356,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 528 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[789],C_fix(2),C_fix(1),lf[790],C_SCHEME_FALSE);}
-/* k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2356(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2356,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2359,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 529 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[787],C_fix(2),C_fix(1),lf[788],C_SCHEME_FALSE);}
-/* k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2359(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2359,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2362,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 530 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[785],C_fix(2),C_fix(1),lf[786],C_SCHEME_FALSE);}
-/* k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2362(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2362,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2365,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 531 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[783],C_fix(2),C_fix(1),lf[784],C_SCHEME_FALSE);}
-/* k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2365(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2365,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2368,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 532 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[781],C_fix(2),C_fix(1),lf[782],C_SCHEME_FALSE);}
-/* k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2368(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2368,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2371,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 533 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[774],C_fix(2),C_fix(1),lf[780],C_SCHEME_FALSE);}
-/* k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2371(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2371,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2374,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 535 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[778],C_fix(2),C_fix(1),lf[779],C_SCHEME_TRUE);}
-/* k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2374(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2374,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2377,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 536 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[776],C_fix(2),C_fix(1),lf[777],C_SCHEME_TRUE);}
-/* k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2377(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2377,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2380,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 537 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[774],C_fix(2),C_fix(1),lf[775],C_SCHEME_TRUE);}
-/* k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2380(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2380,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2383,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 539 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[771],C_fix(7),C_fix(1),lf[773],C_fix(1),C_SCHEME_FALSE);}
-/* k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2383(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2383,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2386,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 540 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[771],C_fix(2),C_fix(1),lf[772],C_SCHEME_TRUE);}
-/* k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2386(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2386,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2389,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 542 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[769],C_fix(1),C_fix(2),lf[770]);}
-/* k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2389(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2389,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2392,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 543 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[767],C_fix(1),C_fix(2),lf[768]);}
-/* k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2392(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2392,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2395,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 544 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[764],C_fix(1),C_fix(2),lf[765]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[765],C_fix(1),C_fix(2),lf[766]);}
-/* k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2395(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2395,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2398,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 545 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[762],C_fix(1),C_fix(2),lf[763]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[763],C_fix(1),C_fix(2),lf[764]);}
-/* k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2398(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2398,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2401,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 547 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[760],C_fix(2),C_fix(2),lf[762],C_SCHEME_FALSE);}
-/* k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2401(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2401,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2404,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 548 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[760],C_fix(2),C_fix(2),lf[761],C_SCHEME_TRUE);}
-/* k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2404(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2404,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2407,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 549 rewrite");
-((C_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]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[758],C_fix(2),C_fix(1),lf[759],C_SCHEME_TRUE);}
-/* k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2407(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2407,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2410,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 550 rewrite");
-((C_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]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[756],C_fix(2),C_fix(1),lf[757],C_SCHEME_TRUE);}
-/* k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2410(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2410,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2413,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 551 rewrite");
-((C_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]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[754],C_fix(2),C_fix(1),lf[755],C_SCHEME_TRUE);}
-/* k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2413(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2413,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2416,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 552 rewrite");
-((C_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]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[752],C_fix(2),C_fix(1),lf[753],C_SCHEME_TRUE);}
-/* k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2416(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2416,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2419,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 553 rewrite");
-((C_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]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[750],C_fix(2),C_fix(1),lf[751],C_SCHEME_TRUE);}
-/* k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2419(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2419,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2422,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 554 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[748],C_fix(2),C_fix(1),lf[749],C_SCHEME_TRUE);}
-/* k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2422(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2422,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2425,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 555 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[746],C_fix(2),C_fix(1),lf[747],C_SCHEME_TRUE);}
-/* k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2425(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2425,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2428,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 556 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[744],C_fix(2),C_fix(1),lf[745],C_SCHEME_TRUE);}
-/* k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2428(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2428,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2431,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 557 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[742],C_fix(2),C_fix(1),lf[743],C_SCHEME_TRUE);}
-/* k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2431(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2431,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2434,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 558 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[740],C_fix(2),C_fix(1),lf[741],C_SCHEME_TRUE);}
-/* k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2434(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2434,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2437,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 559 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[738],C_fix(2),C_fix(1),lf[739],C_SCHEME_TRUE);}
-/* k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2437(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2437,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2440,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 560 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[736],C_fix(2),C_fix(1),lf[737],C_SCHEME_TRUE);}
-/* k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2440(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2440,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2443,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 561 rewrite");
-((C_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]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[734],C_fix(2),C_fix(1),lf[735],C_SCHEME_TRUE);}
-/* k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2443(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2443,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2446,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 562 rewrite");
-((C_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]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[732],C_fix(2),C_fix(1),lf[733],C_SCHEME_TRUE);}
-/* k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2446(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2446,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2449,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 563 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[730],C_fix(2),C_fix(1),lf[731],C_SCHEME_TRUE);}
-/* k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2449(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2449,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2452,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 564 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[728],C_fix(2),C_fix(1),lf[729],C_SCHEME_TRUE);}
-/* k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2452(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2452,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2455,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 565 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[726],C_fix(2),C_fix(1),lf[727],C_SCHEME_TRUE);}
-/* k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2455(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2455,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2458,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 566 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[724],C_fix(2),C_fix(1),lf[725],C_SCHEME_TRUE);}
-/* k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2458(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2458,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2461,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 567 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[722],C_fix(2),C_fix(1),lf[723],C_SCHEME_TRUE);}
-/* k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2461(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2461,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2464,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 568 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[720],C_fix(2),C_fix(1),lf[721],C_SCHEME_TRUE);}
-/* k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2464(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2464,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2467,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 569 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[718],C_fix(2),C_fix(1),lf[719],C_SCHEME_TRUE);}
-/* k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2467(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2467,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2470,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 570 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[716],C_fix(2),C_fix(1),lf[717],C_SCHEME_TRUE);}
-/* k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2470(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2470,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2473,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 571 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[714],C_fix(2),C_fix(1),lf[715],C_SCHEME_FALSE);}
-/* k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2473(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2473,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2476,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 572 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[712],C_fix(2),C_fix(1),lf[713],C_SCHEME_FALSE);}
-/* k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2476(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2476,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2479,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 573 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[710],C_fix(2),C_fix(1),lf[711],C_SCHEME_TRUE);}
-/* k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2479(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2479,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2482,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 574 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[708],C_fix(2),C_fix(1),lf[709],C_SCHEME_TRUE);}
-/* k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2482(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2482,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2485,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 575 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[706],C_fix(2),C_fix(1),lf[707],C_SCHEME_TRUE);}
-/* k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2485(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2485,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2488,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 576 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[702],C_fix(2),C_fix(1),lf[705],C_SCHEME_FALSE);}
-/* k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2488(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2488,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2491,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 577 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[702],C_fix(2),C_fix(1),lf[704],C_SCHEME_TRUE);}
-/* k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2491(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2491,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2494,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 578 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[702],C_fix(2),C_fix(1),lf[703],C_SCHEME_FALSE);}
-/* k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2494(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2494,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2497,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 579 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[698],C_fix(2),C_fix(1),lf[701],C_SCHEME_FALSE);}
-/* k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2497(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2497,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2500,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 580 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[698],C_fix(2),C_fix(1),lf[700],C_SCHEME_TRUE);}
-/* k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2500(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2500,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2503,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 581 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[698],C_fix(2),C_fix(1),lf[699],C_SCHEME_FALSE);}
-/* k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2503(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2503,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2506,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 582 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[696],C_fix(2),C_fix(1),lf[697],C_SCHEME_TRUE);}
-/* k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2506(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2506,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2509,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 583 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[694],C_fix(2),C_fix(1),lf[695],C_SCHEME_TRUE);}
-/* k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2509(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2509,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2512,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 584 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[692],C_fix(2),C_fix(1),lf[693],C_SCHEME_TRUE);}
-/* k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2512(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2512,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2515,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 585 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[689],C_fix(2),C_fix(2),lf[691],C_SCHEME_FALSE);}
-/* k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2515(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2515,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2518,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 586 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[689],C_fix(2),C_fix(2),lf[690],C_SCHEME_TRUE);}
-/* k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2518(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2518,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2521,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 587 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[686],C_fix(2),C_fix(3),lf[688],C_SCHEME_FALSE);}
-/* k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2521(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2521,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2524,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 588 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[686],C_fix(2),C_fix(3),lf[687],C_SCHEME_TRUE);}
-/* k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2524(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2524,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2527,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 589 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[683],C_fix(2),C_fix(2),lf[685],C_SCHEME_FALSE);}
-/* k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2527(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2527,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2530,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 590 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[683],C_fix(2),C_fix(2),lf[684],C_SCHEME_TRUE);}
-/* k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2530(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2530,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2533,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 591 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[681],C_fix(2),C_fix(2),lf[682],C_SCHEME_TRUE);}
-/* k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2533(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2533,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2536,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 592 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[679],C_fix(2),C_fix(2),lf[680],C_SCHEME_TRUE);}
-/* k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2536(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2536,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2539,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 593 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[677],C_fix(2),C_fix(2),lf[678],C_SCHEME_TRUE);}
-/* k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2539(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2539,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2542,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 594 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[675],C_fix(2),C_fix(2),lf[676],C_SCHEME_TRUE);}
-/* k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2542(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2542,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2545,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 595 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[673],C_fix(2),C_fix(2),lf[674],C_SCHEME_TRUE);}
-/* k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2545(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2545,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2548,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 596 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[671],C_fix(2),C_fix(2),lf[672],C_SCHEME_TRUE);}
-/* k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2548(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2548,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2551,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 597 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[669],C_fix(2),C_fix(2),lf[670],C_SCHEME_TRUE);}
-/* k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2551(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2551,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2554,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 598 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[667],C_fix(2),C_fix(1),lf[668],C_SCHEME_TRUE);}
-/* k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2554(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2554,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2557,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 599 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[665],C_fix(2),C_fix(1),lf[666],C_SCHEME_TRUE);}
-/* k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2557(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2557,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2560,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 600 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[663],C_fix(2),C_fix(2),lf[664],C_SCHEME_TRUE);}
-/* k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2560(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2560,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2563,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 601 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[661],C_fix(2),C_fix(2),lf[662],C_SCHEME_FALSE);}
-/* k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2563(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2563,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2566,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 602 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[659],C_fix(2),C_fix(2),lf[660],C_SCHEME_FALSE);}
-/* k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2566(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2566,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2569,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 603 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[657],C_fix(2),C_fix(2),lf[658],C_SCHEME_TRUE);}
-/* k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2569(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2569,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2572,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 604 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[655],C_fix(2),C_fix(2),lf[656],C_SCHEME_TRUE);}
-/* k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2572(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2572,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2575,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 605 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[653],C_fix(2),C_fix(2),lf[654],C_SCHEME_TRUE);}
-/* k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2575(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2575,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2578,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 606 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[651],C_fix(2),C_fix(2),lf[652],C_SCHEME_TRUE);}
-/* k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2578(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2578,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2581,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 607 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[649],C_fix(2),C_fix(2),lf[650],C_SCHEME_TRUE);}
-/* k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2581(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2581,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2584,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 608 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[647],C_fix(2),C_fix(2),lf[648],C_SCHEME_FALSE);}
-/* k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2584(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2584,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2587,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 609 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[645],C_fix(2),C_fix(2),lf[646],C_SCHEME_FALSE);}
-/* k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2587(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2587,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2590,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 610 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[643],C_fix(2),C_fix(2),lf[644],C_SCHEME_FALSE);}
-/* k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2590(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2590,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2593,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 611 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[641],C_fix(2),C_fix(2),lf[642],C_SCHEME_FALSE);}
-/* k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2593(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2593,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2596,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 612 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[639],C_fix(2),C_fix(2),lf[640],C_SCHEME_FALSE);}
-/* k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2596(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2596,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2599,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 613 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[637],C_fix(2),C_fix(2),lf[638],C_SCHEME_FALSE);}
-/* k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2599(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2599,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2602,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 614 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[635],C_fix(2),C_fix(2),lf[636],C_SCHEME_FALSE);}
-/* k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2602(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2602,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2605,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 615 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[633],C_fix(2),C_fix(2),lf[634],C_SCHEME_FALSE);}
-/* k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2605(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2605,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2608,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 616 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[631],C_fix(2),C_fix(2),lf[632],C_SCHEME_FALSE);}
-/* k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2608(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2608,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2611,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 617 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[629],C_fix(2),C_fix(1),lf[630],C_SCHEME_TRUE);}
-/* k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2611(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2611,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2614,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 618 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[627],C_fix(2),C_fix(1),lf[628],C_SCHEME_TRUE);}
-/* k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2614(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2614,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2617,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 619 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[625],C_fix(2),C_fix(1),lf[626],C_SCHEME_TRUE);}
-/* k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2617(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2617,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2620,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 620 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[623],C_fix(2),C_fix(1),lf[624],C_SCHEME_TRUE);}
-/* k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2620(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2620,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2623,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 621 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[621],C_fix(2),C_fix(1),lf[622],C_SCHEME_TRUE);}
-/* k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2623(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2623,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2626,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 622 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[619],C_fix(2),C_fix(1),lf[620],C_SCHEME_TRUE);}
-/* k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2626(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2626,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2629,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 623 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[617],C_fix(2),C_fix(1),lf[618],C_SCHEME_TRUE);}
-/* k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2629(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2629,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2632,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 624 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[615],C_fix(2),C_fix(2),lf[616],C_SCHEME_TRUE);}
-/* k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2632(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2632,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2635,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 625 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[613],C_fix(2),C_fix(2),lf[614],C_SCHEME_TRUE);}
-/* k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2635(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2635,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2638,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 626 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[611],C_fix(2),C_fix(2),lf[612],C_SCHEME_TRUE);}
-/* k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2638(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2638,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2641,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 627 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[609],C_fix(2),C_fix(2),lf[610],C_SCHEME_FALSE);}
-/* k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2641(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2641,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2644,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 628 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[607],C_fix(2),C_fix(1),lf[608],C_SCHEME_FALSE);}
-/* k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2644(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2644,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2647,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 630 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[595],C_fix(14),lf[36],C_fix(2),lf[597],lf[598]);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[603],C_fix(14),lf[34],C_fix(2),lf[605],lf[606]);}
-/* k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2647(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2647,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2650,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 631 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[603],C_fix(2),C_fix(2),lf[604],C_SCHEME_TRUE);}
-/* k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2650(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2650,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2653,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 632 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[591],C_fix(14),lf[36],C_fix(2),lf[593],lf[594]);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[599],C_fix(14),lf[34],C_fix(2),lf[601],lf[602]);}
-/* k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2653(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2653,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2656,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 633 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[599],C_fix(2),C_fix(2),lf[600],C_SCHEME_TRUE);}
-/* k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2656(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2656,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2659,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 634 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[588],C_fix(17),C_fix(2),lf[589],lf[590]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[596],C_fix(17),C_fix(2),lf[597],lf[598]);}
-/* k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2659(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2659,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2662,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 635 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[585],C_fix(17),C_fix(2),lf[586],lf[587]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[593],C_fix(17),C_fix(2),lf[594],lf[595]);}
-/* k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2662(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2662,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2665,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 636 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[591],C_fix(2),C_fix(2),lf[592],C_SCHEME_TRUE);}
-/* k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2665(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2665,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2668,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 637 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[589],C_fix(2),C_fix(2),lf[590],C_SCHEME_TRUE);}
-/* k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2668(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2668,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2671,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 639 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[578],C_fix(4),lf[315],C_fix(0));}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[586],C_fix(4),lf[313],C_fix(0));}
-/* k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2671(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2671,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2674,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 640 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[575],C_fix(4),lf[315],C_fix(1));}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[583],C_fix(4),lf[313],C_fix(1));}
-/* k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2674(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2674,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2677,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 641 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[578],C_fix(17),C_fix(2),lf[579],lf[580]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[586],C_fix(17),C_fix(2),lf[587],lf[588]);}
-/* k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2677(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2677,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2680,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 642 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[575],C_fix(17),C_fix(2),lf[576],lf[577]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[583],C_fix(17),C_fix(2),lf[584],lf[585]);}
-/* k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2680(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2680,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2683,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 644 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[571],C_fix(14),lf[36],C_fix(1),lf[573],lf[574]);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[579],C_fix(14),lf[34],C_fix(1),lf[581],lf[582]);}
-/* k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2683(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2683,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2686,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 645 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[579],C_fix(16),C_fix(1),lf[580],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2686(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2686,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2689,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 647 rewrite");
-((C_proc9)C_retrieve_symbol_proc(lf[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));}
+((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[575],C_fix(21),C_fix(0),lf[576],lf[577],lf[578],*((C_word*)lf[9]+1));}
-/* k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2689(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2689,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2692,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 648 rewrite");
-((C_proc9)C_retrieve_symbol_proc(lf[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));}
+((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[571],C_fix(21),C_fix(-1),lf[572],lf[573],lf[574],*((C_word*)lf[9]+1));}
-/* k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2692(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2692,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2695,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 649 rewrite");
-((C_proc9)C_retrieve_symbol_proc(lf[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));}
+((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[567],C_fix(21),C_fix(0),lf[568],lf[569],lf[570],*((C_word*)lf[9]+1));}
-/* k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2695(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2695,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2698,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 651 rewrite");
-((C_proc9)C_retrieve_symbol_proc(lf[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]);}
+((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[564],C_fix(22),C_fix(1),lf[565],C_SCHEME_TRUE,*((C_word*)lf[9]+1),lf[566]);}
-/* k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2698(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2698,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2701,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 653 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[562],C_fix(16),C_fix(2),lf[563],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2701(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2701,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2704,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 654 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[560],C_fix(16),C_fix(2),lf[561],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2704(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2704,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2707,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 655 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[558],C_fix(16),C_fix(2),lf[559],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2707(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2707,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2710,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 656 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[556],C_fix(16),C_fix(2),lf[557],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2710(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2710,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2713,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 657 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[554],C_fix(16),C_fix(1),lf[555],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2713(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2713,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2716,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 659 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[552],C_fix(16),C_fix(1),lf[553],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2716(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2716,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2719,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 660 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[550],C_fix(16),C_fix(1),lf[551],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2719(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2719,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2722,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 661 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[548],C_fix(16),C_fix(1),lf[549],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2722(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2722,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2725,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 662 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[546],C_fix(16),C_fix(1),lf[547],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2725(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2725,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2728,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 663 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[544],C_fix(16),C_fix(1),lf[545],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2728(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2728,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2731,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 664 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[542],C_fix(16),C_fix(1),lf[543],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2731(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2731,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2734,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 665 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[540],C_fix(16),C_fix(1),lf[541],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2734(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2734,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2737,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 666 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[535],C_fix(16),C_fix(1),lf[539],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2737(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2737,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2740,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 667 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[537],C_fix(16),C_fix(1),lf[538],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2740(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2740,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2743,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 668 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[535],C_fix(16),C_fix(2),lf[536],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2743(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2743,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2746,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 670 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[523],C_fix(5),lf[526],C_fix(0),lf[36]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[531],C_fix(5),lf[534],C_fix(0),lf[34]);}
-/* 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){
+/* k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2746(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2746,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2749,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 671 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[531],C_fix(2),C_fix(1),lf[533],C_SCHEME_TRUE);}
-/* 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){
+/* k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2749(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2749,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2752,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 672 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[531],C_fix(2),C_fix(1),lf[532],C_SCHEME_FALSE);}
-/* 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){
+/* k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2752(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2752,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2755,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 673 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[518],C_fix(5),lf[522],C_fix(0),lf[36]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[526],C_fix(5),lf[530],C_fix(0),lf[34]);}
-/* 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){
+/* k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2755(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2755,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2758,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 674 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[518],C_fix(5),lf[521],C_fix(0),lf[356]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[526],C_fix(5),lf[529],C_fix(0),lf[367]);}
-/* 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){
+/* k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2758(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2758,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2761,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 675 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[526],C_fix(2),C_fix(1),lf[528],C_SCHEME_TRUE);}
-/* 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){
+/* k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2761(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2761,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2764,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 676 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[526],C_fix(2),C_fix(1),lf[527],C_SCHEME_FALSE);}
-/* 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){
+/* k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2764(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2764,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2767,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 677 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[513],C_fix(5),lf[517],C_fix(0),lf[36]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[521],C_fix(5),lf[525],C_fix(0),lf[34]);}
-/* 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){
+/* k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2767(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2767,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2770,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 678 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[513],C_fix(5),lf[516],C_fix(0),lf[356]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[521],C_fix(5),lf[524],C_fix(0),lf[367]);}
-/* 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){
+/* k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2770(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2770,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2773,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 679 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[521],C_fix(2),C_fix(1),lf[523],C_SCHEME_TRUE);}
-/* 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){
+/* k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2773(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2773,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2776,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 680 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[521],C_fix(2),C_fix(1),lf[522],C_SCHEME_FALSE);}
-/* 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){
+/* k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2776(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2776,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2779,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 682 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[501],C_fix(6),lf[511],lf[512],C_SCHEME_FALSE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[509],C_fix(6),lf[519],lf[520],C_SCHEME_FALSE);}
-/* 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){
+/* k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2779(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2779,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2782,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 683 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[497],C_fix(6),lf[509],lf[510],C_SCHEME_FALSE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[505],C_fix(6),lf[517],lf[518],C_SCHEME_FALSE);}
-/* 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){
+/* k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2782(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2782,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2785,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 684 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[506],C_fix(6),lf[507],lf[508],C_SCHEME_TRUE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[514],C_fix(6),lf[515],lf[516],C_SCHEME_TRUE);}
-/* 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){
+/* k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2785(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2785,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2788,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 685 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[503],C_fix(6),lf[504],lf[505],C_SCHEME_TRUE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[511],C_fix(6),lf[512],lf[513],C_SCHEME_TRUE);}
-/* 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){
+/* k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2788(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2788,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2791,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 687 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[509],C_fix(2),C_fix(1),lf[510],C_SCHEME_TRUE);}
-/* 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){
+/* k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2791(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2791,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2794,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 688 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[507],C_fix(2),C_fix(1),lf[508],C_SCHEME_TRUE);}
-/* 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){
+/* k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2794(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2794,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2797,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 689 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[505],C_fix(2),C_fix(1),lf[506],C_SCHEME_TRUE);}
-/* 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){
+/* k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2797(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2797,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2800,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 690 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[503],C_fix(2),C_fix(1),lf[504],C_SCHEME_TRUE);}
-/* 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){
+/* k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2800(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2800,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2803,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 692 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[491],C_fix(2),C_fix(1),lf[502],C_SCHEME_TRUE);}
-/* 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){
+/* k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2803(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2803,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2806,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 693 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[489],C_fix(2),C_fix(1),lf[501],C_SCHEME_TRUE);}
-/* 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){
+/* k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2806(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2806,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2809,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 694 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[487],C_fix(2),C_fix(1),lf[500],C_SCHEME_TRUE);}
-/* 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){
+/* k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2809(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2809,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2812,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 695 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[485],C_fix(2),C_fix(1),lf[499],C_SCHEME_TRUE);}
-/* 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){
+/* k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2812(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2812,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2815,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 696 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[483],C_fix(2),C_fix(1),lf[498],C_SCHEME_TRUE);}
-/* 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){
+/* k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2815(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2815,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2818,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 697 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[481],C_fix(2),C_fix(1),lf[497],C_SCHEME_TRUE);}
-/* 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){
+/* k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2818(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2818,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2821,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 698 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[479],C_fix(2),C_fix(1),lf[496],C_SCHEME_TRUE);}
-/* 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){
+/* k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2821(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2821,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2824,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 699 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[477],C_fix(2),C_fix(1),lf[495],C_SCHEME_TRUE);}
-/* 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){
+/* k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2824(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2824,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2827,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 700 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[475],C_fix(2),C_fix(2),lf[494],C_SCHEME_TRUE);}
-/* 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){
+/* k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2827(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2827,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2830,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 701 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[473],C_fix(2),C_fix(1),lf[493],C_SCHEME_TRUE);}
-/* 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){
+/* k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2830(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2830,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2833,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 702 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[491],C_fix(2),C_fix(2),lf[492],C_SCHEME_TRUE);}
-/* 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){
+/* k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2833(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2833,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2836,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 703 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[489],C_fix(2),C_fix(2),lf[490],C_SCHEME_TRUE);}
-/* 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){
+/* k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2836(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2836,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2839,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 704 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[487],C_fix(2),C_fix(2),lf[488],C_SCHEME_TRUE);}
-/* 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){
+/* k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2839(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2839,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2842,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 705 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[485],C_fix(2),C_fix(2),lf[486],C_SCHEME_TRUE);}
-/* 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){
+/* k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2842(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2842,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2845,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 706 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[483],C_fix(2),C_fix(2),lf[484],C_SCHEME_TRUE);}
-/* 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){
+/* k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2845(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2845,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2848,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 707 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[481],C_fix(2),C_fix(2),lf[482],C_SCHEME_TRUE);}
-/* 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){
+/* k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2848(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2848,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2851,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 708 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[479],C_fix(2),C_fix(2),lf[480],C_SCHEME_TRUE);}
-/* 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){
+/* k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2851(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2851,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2854,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 709 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[477],C_fix(2),C_fix(2),lf[478],C_SCHEME_TRUE);}
-/* 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){
+/* k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2854(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2854,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2857,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 710 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[475],C_fix(2),C_fix(3),lf[476],C_SCHEME_TRUE);}
-/* 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){
+/* k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2857(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2857,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2860,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 711 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[473],C_fix(2),C_fix(2),lf[474],C_SCHEME_TRUE);}
-/* 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){
+/* k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2860(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2860,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2863,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 713 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[405],C_fix(9),lf[463],lf[464],C_SCHEME_TRUE,C_SCHEME_TRUE);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[413],C_fix(9),lf[471],lf[472],C_SCHEME_TRUE,C_SCHEME_TRUE);}
-/* 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){
+/* k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2863(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2863,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2866,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 714 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[403],C_fix(9),lf[461],lf[462],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[411],C_fix(9),lf[469],lf[470],C_SCHEME_TRUE,C_SCHEME_FALSE);}
-/* 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){
+/* k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2866(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2866,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2869,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 715 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[401],C_fix(9),lf[459],lf[460],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[409],C_fix(9),lf[467],lf[468],C_SCHEME_TRUE,C_SCHEME_FALSE);}
-/* 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){
+/* k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2869(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2869,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2872,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 716 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[399],C_fix(9),lf[457],lf[458],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[407],C_fix(9),lf[465],lf[466],C_SCHEME_TRUE,C_SCHEME_FALSE);}
-/* 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){
+/* k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2872(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2872,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2875,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 717 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[397],C_fix(9),lf[455],lf[456],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[405],C_fix(9),lf[463],lf[464],C_SCHEME_TRUE,C_SCHEME_FALSE);}
-/* 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){
+/* k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2875(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2875,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2878,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 719 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[454],C_fix(11),C_fix(1),lf[129],C_SCHEME_TRUE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[462],C_fix(11),C_fix(1),lf[127],C_SCHEME_TRUE);}
-/* 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){
+/* k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2878(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2878,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2881,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 720 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[452],C_fix(11),C_fix(2),lf[453],C_SCHEME_TRUE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[460],C_fix(11),C_fix(2),lf[461],C_SCHEME_TRUE);}
-/* 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){
+/* k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2881(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2881,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2884,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 721 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[450],C_fix(11),C_fix(2),lf[451],C_SCHEME_TRUE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[458],C_fix(11),C_fix(2),lf[459],C_SCHEME_TRUE);}
-/* 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){
+/* k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2884(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2884,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2887,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 722 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[449],C_fix(11),C_fix(3),lf[315],C_SCHEME_TRUE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[457],C_fix(11),C_fix(3),lf[313],C_SCHEME_TRUE);}
-/* 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){
+/* k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2887(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2887,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2890,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 723 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[448],C_fix(11),C_fix(3),lf[315],C_SCHEME_FALSE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[456],C_fix(11),C_fix(3),lf[313],C_SCHEME_FALSE);}
-/* 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){
+/* k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2890(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2890,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2893,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 724 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[447],C_fix(11),C_SCHEME_FALSE,lf[318],C_SCHEME_FALSE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[455],C_fix(11),C_SCHEME_FALSE,lf[320],C_SCHEME_FALSE);}
-/* 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){
+/* k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2893(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2893,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2896,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 725 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[445],C_fix(11),C_fix(3),lf[446],C_SCHEME_FALSE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[453],C_fix(11),C_fix(3),lf[454],C_SCHEME_FALSE);}
-/* 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){
+/* k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2896(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2896,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2899,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 726 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[443],C_fix(11),C_fix(2),lf[444],C_SCHEME_FALSE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[451],C_fix(11),C_fix(2),lf[452],C_SCHEME_FALSE);}
-/* 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){
+/* k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2899(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2899,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2902,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 727 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[441],C_fix(11),C_fix(1),lf[442],C_SCHEME_TRUE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[449],C_fix(11),C_fix(1),lf[450],C_SCHEME_TRUE);}
-/* 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){
+/* k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2902(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2902,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2905,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 728 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[439],C_fix(11),C_fix(1),lf[440],C_SCHEME_TRUE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[447],C_fix(11),C_fix(1),lf[448],C_SCHEME_TRUE);}
-/* 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){
+/* k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2905(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2905,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2908,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 730 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[437],C_fix(11),C_fix(3),lf[315],C_SCHEME_FALSE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[445],C_fix(11),C_fix(3),lf[313],C_SCHEME_FALSE);}
-/* 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){
+/* k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2908(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2908,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2911,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 731 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[445],C_fix(2),C_fix(3),lf[446],C_SCHEME_TRUE);}
-/* 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){
+/* k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2911(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2911,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2914,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 733 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[435],C_fix(11),C_fix(1),lf[436],C_SCHEME_TRUE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[443],C_fix(11),C_fix(1),lf[444],C_SCHEME_TRUE);}
-/* 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){
+/* k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2914(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2914,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2917,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 734 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[433],C_fix(11),C_fix(1),lf[434],C_SCHEME_TRUE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[441],C_fix(11),C_fix(1),lf[442],C_SCHEME_TRUE);}
-/* 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){
+/* k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2917(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2917,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2920,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 735 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[432],C_fix(11),C_fix(2),lf[399],C_SCHEME_TRUE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[440],C_fix(11),C_fix(2),lf[407],C_SCHEME_TRUE);}
-/* 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){
+/* k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2920(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2920,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2923,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 736 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[431],C_fix(11),C_fix(2),lf[405],C_SCHEME_TRUE);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[439],C_fix(11),C_fix(2),lf[413],C_SCHEME_TRUE);}
-/* 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){
+/* k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2923(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2923,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2926,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 738 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[427],C_fix(12),lf[430],C_SCHEME_TRUE,C_fix(2));}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[435],C_fix(12),lf[438],C_SCHEME_TRUE,C_fix(2));}
-/* 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){
+/* k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2926(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2926,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2929,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 739 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[426],C_fix(12),lf[429],C_SCHEME_TRUE,C_fix(2));}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[434],C_fix(12),lf[437],C_SCHEME_TRUE,C_fix(2));}
-/* 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){
+/* k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2929(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2929,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2932,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 740 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[428],C_fix(12),C_SCHEME_FALSE,C_SCHEME_TRUE,C_fix(1));}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[436],C_fix(12),C_SCHEME_FALSE,C_SCHEME_TRUE,C_fix(1));}
-/* 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){
+/* k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2932(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2932,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2935,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 742 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[427],C_fix(18),C_fix(0));}
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[435],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){
+/* k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2935(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2935,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2938,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 743 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[426],C_fix(18),C_fix(1));}
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[434],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){
+/* k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2938(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2938,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2941,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 744 rewrite");
-((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[326],C_fix(18),C_SCHEME_END_OF_LIST);}
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[328],C_fix(18),C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2941(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2941,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2944,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 746 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[424],C_fix(13),lf[425],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[432],C_fix(13),lf[433],C_SCHEME_TRUE);}
-/* 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){
+/* k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2944(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2944,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2947,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 748 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[413],C_fix(16),C_fix(2),lf[423],C_SCHEME_TRUE,C_fix(4));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[421],C_fix(16),C_fix(2),lf[431],C_SCHEME_TRUE,C_fix(4));}
-/* 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){
+/* k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2947(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2947,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2950,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 749 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[409],C_fix(16),C_fix(2),lf[422],C_SCHEME_TRUE,C_fix(4));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[417],C_fix(16),C_fix(2),lf[430],C_SCHEME_TRUE,C_fix(4));}
-/* 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){
+/* k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2950(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2950,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2953,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 750 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[411],C_fix(16),C_fix(2),lf[421],C_SCHEME_TRUE,C_fix(4));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[419],C_fix(16),C_fix(2),lf[429],C_SCHEME_TRUE,C_fix(4));}
-/* 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){
+/* k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2953(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2953,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2956,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 751 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[407],C_fix(16),C_fix(2),lf[420],C_SCHEME_TRUE,C_fix(4));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[415],C_fix(16),C_fix(2),lf[428],C_SCHEME_TRUE,C_fix(4));}
-/* 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){
+/* k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2956(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2956,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2959,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 752 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[405],C_fix(17),C_fix(2),lf[419]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[413],C_fix(17),C_fix(2),lf[427]);}
-/* 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){
+/* k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2959(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2959,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2962,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 753 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[403],C_fix(17),C_fix(2),lf[418]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[411],C_fix(17),C_fix(2),lf[426]);}
-/* 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){
+/* k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2962(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2962,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2965,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 754 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[401],C_fix(17),C_fix(2),lf[417]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[409],C_fix(17),C_fix(2),lf[425]);}
-/* 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){
+/* k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2965(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2965,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2968,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 755 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[399],C_fix(17),C_fix(2),lf[416]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[407],C_fix(17),C_fix(2),lf[424]);}
-/* 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){
+/* k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2968(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2968,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2971,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 756 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[397],C_fix(17),C_fix(2),lf[415]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[405],C_fix(17),C_fix(2),lf[423]);}
-/* 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){
+/* k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2971(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2971,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2974,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 758 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[413],C_fix(13),lf[414],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[421],C_fix(13),lf[422],C_SCHEME_TRUE);}
-/* 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){
+/* k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2974(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2974,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2977,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 759 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[411],C_fix(13),lf[412],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[419],C_fix(13),lf[420],C_SCHEME_TRUE);}
-/* 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){
+/* k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2977(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2977,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2980,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 760 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[409],C_fix(13),lf[410],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[417],C_fix(13),lf[418],C_SCHEME_TRUE);}
-/* 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){
+/* k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2980(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2980,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2983,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 761 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[407],C_fix(13),lf[408],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[415],C_fix(13),lf[416],C_SCHEME_TRUE);}
-/* 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){
+/* k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2983(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2983,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2986,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 762 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[405],C_fix(13),lf[406],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[413],C_fix(13),lf[414],C_SCHEME_TRUE);}
-/* 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){
+/* k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2986(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2986,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2989,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 763 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[403],C_fix(13),lf[404],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[411],C_fix(13),lf[412],C_SCHEME_TRUE);}
-/* 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){
+/* k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2989(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2989,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2992,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 764 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[401],C_fix(13),lf[402],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[409],C_fix(13),lf[410],C_SCHEME_TRUE);}
-/* 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){
+/* k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2992(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2992,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2995,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 765 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[399],C_fix(13),lf[400],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[407],C_fix(13),lf[408],C_SCHEME_TRUE);}
-/* 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){
+/* k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2995(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2995,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2998,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 766 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[397],C_fix(13),lf[398],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[405],C_fix(13),lf[406],C_SCHEME_TRUE);}
-/* 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){
+/* k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2998(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2998,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3001,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 768 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[395],C_fix(13),lf[396],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[403],C_fix(13),lf[404],C_SCHEME_TRUE);}
-/* 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){
+/* k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3001(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3001,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3004,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 769 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[393],C_fix(13),lf[394],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[401],C_fix(13),lf[402],C_SCHEME_TRUE);}
-/* 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){
+/* k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3004(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3004,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3007,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 770 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[391],C_fix(13),lf[392],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[399],C_fix(13),lf[400],C_SCHEME_TRUE);}
-/* 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){
+/* k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3007(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3007,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3010,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 771 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[389],C_fix(13),lf[390],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[397],C_fix(13),lf[398],C_SCHEME_TRUE);}
-/* 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){
+/* k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3010(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3010,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3013,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 772 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[387],C_fix(13),lf[388],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[395],C_fix(13),lf[396],C_SCHEME_TRUE);}
-/* 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){
+/* k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3013(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3013,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3016,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 773 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[385],C_fix(13),lf[386],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[393],C_fix(13),lf[394],C_SCHEME_TRUE);}
-/* 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){
+/* k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3016(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3016,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3019,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 774 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[383],C_fix(13),lf[384],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[391],C_fix(13),lf[392],C_SCHEME_TRUE);}
-/* 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){
+/* k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3019(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3019,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3022,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 775 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[381],C_fix(13),lf[382],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[389],C_fix(13),lf[390],C_SCHEME_TRUE);}
-/* 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){
+/* k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3022(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3022,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3025,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 776 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[379],C_fix(13),lf[380],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[387],C_fix(13),lf[388],C_SCHEME_TRUE);}
-/* 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){
+/* k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3025(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3025,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3028,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 777 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[377],C_fix(13),lf[378],C_SCHEME_TRUE);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[385],C_fix(13),lf[386],C_SCHEME_TRUE);}
-/* 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){
+/* k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3028(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3028,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3031,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 779 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[367],C_fix(14),lf[36],C_fix(1),lf[375],lf[376]);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[375],C_fix(14),lf[34],C_fix(1),lf[383],lf[384]);}
-/* 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){
+/* k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3031(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3031,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3034,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 780 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[364],C_fix(14),lf[36],C_fix(1),lf[373],lf[374]);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[372],C_fix(14),lf[34],C_fix(1),lf[381],lf[382]);}
-/* 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){
+/* k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3034(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3034,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3037,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 781 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[370],C_fix(14),lf[36],C_fix(2),lf[371],lf[372]);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[378],C_fix(14),lf[34],C_fix(2),lf[379],lf[380]);}
-/* 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){
+/* k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3037(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3037,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3040,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 783 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[375],C_fix(2),C_fix(1),lf[377],C_SCHEME_TRUE);}
-/* 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){
+/* k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3040(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3040,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3043,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 784 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[375],C_fix(2),C_fix(1),lf[376],C_SCHEME_FALSE);}
-/* 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){
+/* k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3043(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3043,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3046,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 785 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[372],C_fix(2),C_fix(1),lf[374],C_SCHEME_TRUE);}
-/* 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){
+/* k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3046(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3046,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3049,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 786 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[372],C_fix(2),C_fix(1),lf[373],C_SCHEME_FALSE);}
-/* 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){
+/* k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3049(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3049,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3052,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 788 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[362],C_fix(15),lf[356],lf[36],lf[363],C_SCHEME_FALSE);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[370],C_fix(15),lf[367],lf[34],lf[371],C_SCHEME_FALSE);}
-/* 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){
+/* k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3052(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3052,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3055,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 789 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[360],C_fix(15),lf[356],lf[36],lf[361],C_SCHEME_FALSE);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[369],C_fix(15),lf[367],lf[34],lf[337],C_SCHEME_FALSE);}
-/* 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){
+/* k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3055(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3055,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3058,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 790 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[358],C_fix(15),lf[356],lf[36],lf[359],C_SCHEME_FALSE);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[368],C_fix(15),lf[367],lf[34],lf[340],C_SCHEME_FALSE);}
-/* 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){
+/* k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3058(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3058,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3061,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 791 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[355],C_fix(15),lf[356],lf[36],lf[357],C_SCHEME_FALSE);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[366],C_fix(15),lf[367],lf[34],lf[335],C_SCHEME_FALSE);}
-/* 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){
+/* k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3061(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3061,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3064,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 793 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[364],C_fix(16),C_fix(1),lf[365],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3064(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3064,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3067,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 794 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[362],C_fix(16),C_fix(1),lf[363],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3067(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3067,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3070,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 795 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[360],C_fix(16),C_fix(1),lf[361],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3070(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3070,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3073,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 796 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[358],C_fix(16),C_fix(1),lf[359],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3073(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3073,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3076,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 797 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[356],C_fix(16),C_fix(1),lf[357],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3076(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3076,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3079,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 798 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[354],C_fix(16),C_fix(1),lf[355],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3079(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3079,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3082,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 799 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[352],C_fix(16),C_fix(2),lf[353],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3082(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3082,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3085,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 800 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[350],C_fix(16),C_fix(1),lf[351],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3085(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3085,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3088,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 801 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[348],C_fix(16),C_fix(2),lf[349],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3088(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3088,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3091,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 802 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[346],C_fix(16),C_fix(1),lf[347],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3091(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3091,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3094,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 803 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[344],C_fix(16),C_fix(1),lf[345],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
+
+/* k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3094(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3094,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3097,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 804 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[342],C_fix(16),C_fix(1),lf[343],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3097(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3097,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3100,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 805 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[331],C_fix(16),C_fix(2),lf[332],C_SCHEME_TRUE,C_fix(3));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[340],C_fix(16),C_fix(1),lf[341],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3100(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3100,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3103,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 806 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[329],C_fix(16),C_fix(2),lf[330],C_SCHEME_TRUE,C_fix(3));}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[335],C_fix(16),C_fix(1),lf[339],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3103(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3103,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3106,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 807 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[326],C_fix(16),C_SCHEME_FALSE,lf[327],C_SCHEME_TRUE,lf[328]);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[337],C_fix(16),C_fix(1),lf[338],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3106(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3106,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3109,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 808 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[323],C_fix(16),C_SCHEME_FALSE,lf[324],C_SCHEME_TRUE,lf[325]);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[335],C_fix(16),C_fix(1),lf[336],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3109(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3109,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3112,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 810 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[333],C_fix(16),C_fix(2),lf[334],C_SCHEME_TRUE,C_fix(3));}
-/* 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){
+/* k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3112(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3112,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3115,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 811 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[331],C_fix(16),C_fix(2),lf[332],C_SCHEME_TRUE,C_fix(3));}
-/* 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){
+/* k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3115(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3115,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3118,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 812 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[328],C_fix(16),C_SCHEME_FALSE,lf[329],C_SCHEME_TRUE,lf[330]);}
-/* 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){
+/* k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3118(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3118,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3121,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 813 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[325],C_fix(16),C_SCHEME_FALSE,lf[326],C_SCHEME_TRUE,lf[327]);}
+
+/* k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3121(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3121,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3124,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 814 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[70],C_fix(16),C_SCHEME_FALSE,lf[324],C_SCHEME_TRUE,C_SCHEME_TRUE);}
+
+/* k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3124(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3124,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3127,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 815 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[322],C_fix(16),C_SCHEME_FALSE,lf[323],C_SCHEME_TRUE,C_SCHEME_TRUE);}
+
+/* k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3127(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3127,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3130,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 816 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[320],C_fix(16),C_SCHEME_FALSE,lf[321],C_SCHEME_TRUE,C_SCHEME_TRUE);}
+
+/* k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3130(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3130,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3133,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 817 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[318],C_fix(16),C_SCHEME_FALSE,lf[319],C_SCHEME_TRUE,C_SCHEME_TRUE);}
-/* 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){
+/* k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3133(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3133,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3136,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 818 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[316],C_fix(16),C_fix(1),lf[317],C_SCHEME_FALSE,C_fix(2));}
+
+/* k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3136(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3136,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3139,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 819 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[314],C_fix(16),C_fix(1),lf[315],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
+
+/* k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3139(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3139,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3142,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4065,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 821 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[313],C_fix(8),t3);}
-/* 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){
+/* a4064 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4065(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -6931,32 +7061,32 @@ 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));
+C_save_and_reclaim((void*)tr6,(void*)f_4065,6,t0,t1,t2,t3,t4,t5);}
+t6=C_i_length(t5);
+t7=C_eqp(t6,C_fix(3));
if(C_truep(t7)){
-t8=(C_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);
+t8=C_i_caddr(t5);
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4103,a[2]=t1,a[3]=t4,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+t10=C_slot(t8,C_fix(1));
+t11=C_eqp(lf[47],t10);
if(C_truep(t11)){
-t12=(C_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);}
+t12=C_slot(t8,C_fix(2));
+t13=C_i_car(t12);
+C_trace("c-platform.scm: 834 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[310]))(3,*((C_word*)lf[310]+1),t9,t13);}
else{
t12=t5;
-t13=(C_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);
+t13=C_a_i_record(&a,4,lf[37],lf[38],lf[311],t12);
+t14=C_a_i_list(&a,2,t4,t13);
t15=t1;
t16=t15;
-((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[314],t14));}}
+((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,C_a_i_record(&a,4,lf[37],lf[39],lf[312],t14));}}
else{
t8=t1;
((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-/* 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){
+/* k4101 in a4064 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4103(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6969,134 +7099,134 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4103,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);
+t3=C_a_i_record(&a,4,lf[37],lf[38],lf[306],t2);
+t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
t5=((C_word*)t0)[2];
t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[309],t4));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[307],t4));}
else{
t2=((C_word*)t0)[4];
-t3=(C_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);
+t3=C_a_i_record(&a,4,lf[37],lf[38],lf[308],t2);
+t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
t5=((C_word*)t0)[2];
t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[311],t4));}}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[309],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){
+/* k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3142(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3142,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3145,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 839 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[303],C_fix(17),C_fix(2),lf[304],lf[305]);}
-/* 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){
+/* k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3145(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3145,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3148,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 840 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[300],C_fix(17),C_fix(2),lf[301],lf[302]);}
-/* 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){
+/* k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3148(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3148,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3151,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 841 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[298],C_fix(17),C_fix(2),lf[299]);}
-/* 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){
+/* k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3151(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3151,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3154,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 842 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[296],C_fix(17),C_fix(2),lf[297]);}
-/* 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){
+/* k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3154(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3154,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3157,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 843 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[293],C_fix(17),C_fix(1),lf[294],lf[295]);}
-/* 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){
+/* k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3157(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3157,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3160,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 844 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[290],C_fix(17),C_fix(2),lf[291],lf[292]);}
-/* 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){
+/* k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3160(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3160,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3163,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 845 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[287],C_fix(17),C_fix(2),lf[288],lf[289]);}
-/* 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){
+/* k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3163(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3163,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3166,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 846 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[284],C_fix(17),C_fix(2),lf[285],lf[286]);}
-/* 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){
+/* k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3166(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3166,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3169,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3909,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 848 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[283],C_fix(8),t3);}
-/* 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){
+/* a3908 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3909(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -7113,51 +7243,51 @@ 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);
+C_save_and_reclaim((void*)tr6,(void*)f_3909,6,t0,t1,t2,t3,t4,t5);}
+t6=C_i_length(t5);
+t7=C_eqp(C_fix(2),t6);
if(C_truep(t7)){
-t8=(C_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);
+t8=C_i_cadr(t5);
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3935,a[2]=t5,a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+t10=C_slot(t8,C_fix(1));
+t11=C_eqp(lf[47],t10);
if(C_truep(t11)){
-t12=(C_word)C_eqp(C_retrieve(lf[37]),lf[36]);
+t12=C_eqp(C_retrieve(lf[35]),lf[34]);
if(C_truep(t12)){
-t13=(C_word)C_slot(t8,C_fix(2));
-t14=(C_word)C_i_car(t13);
+t13=C_slot(t8,C_fix(2));
+t14=C_i_car(t13);
if(C_truep(t14)){
-t15=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);}
+t15=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3985,a[2]=t8,a[3]=t9,a[4]=t5,a[5]=t14,tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_fixnump(t14))){
+t16=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4041,a[2]=t15,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 863 big-fixnum?");
+((C_proc3)C_retrieve_symbol_proc(lf[282]))(3,*((C_word*)lf[282]+1),t16,t14);}
else{
t16=t15;
-f_3951(t16,C_SCHEME_FALSE);}}
+f_3985(t16,C_SCHEME_FALSE);}}
else{
t15=t9;
-f_3901(t15,C_SCHEME_FALSE);}}
+f_3935(t15,C_SCHEME_FALSE);}}
else{
t13=t9;
-f_3901(t13,C_SCHEME_FALSE);}}
+f_3935(t13,C_SCHEME_FALSE);}}
else{
t12=t9;
-f_3901(t12,C_SCHEME_FALSE);}}
+f_3935(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){
+/* k4039 in a3908 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4041(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_3951(t2,(C_word)C_i_not(t1));}
+f_3985(t2,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){
+/* k3983 in a3908 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_3985(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7167,37 +7297,37 @@ 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);}
+C_save_and_reclaim((void*)trf_3985,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);}
+if(C_truep(C_fixnum_lessp(((C_word*)t0)[5],C_fix(0)))){
+t2=C_i_car(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4011,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=C_fixnum_negate(((C_word*)t0)[5]);
+C_trace("c-platform.scm: 867 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t3,t4);}
else{
-t2=(C_word)C_i_car(((C_word*)t0)[4]);
-t3=(C_word)C_a_i_list(&a,2,t2,((C_word*)t0)[2]);
+t2=C_i_car(((C_word*)t0)[4]);
+t3=C_a_i_list(&a,2,t2,((C_word*)t0)[2]);
t4=((C_word*)t0)[3];
-f_3901(t4,(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[283],t3));}}
+f_3935(t4,C_a_i_record(&a,4,lf[37],lf[38],lf[281],t3));}}
else{
t2=((C_word*)t0)[3];
-f_3901(t2,C_SCHEME_FALSE);}}
+f_3935(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){
+/* k4009 in k3983 in a3908 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_4011(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3977,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_4011,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
-f_3901(t3,(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[282],t2));}
+f_3935(t3,C_a_i_record(&a,4,lf[37],lf[38],lf[280],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){
+/* k3933 in a3908 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_3935(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7215,927 +7345,927 @@ 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);}
+C_save_and_reclaim((void*)trf_3935,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=t1;
-t3=(C_word)C_a_i_list(&a,2,((C_word*)t0)[4],t2);
+t3=C_a_i_list(&a,2,((C_word*)t0)[4],t2);
t4=((C_word*)t0)[3];
t5=t4;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[277],t3));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_record(&a,4,lf[37],lf[39],lf[275],t3));}
else{
-t2=(C_word)C_eqp(C_retrieve(lf[37]),lf[36]);
+t2=C_eqp(C_retrieve(lf[35]),lf[34]);
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);
+t4=C_a_i_record(&a,4,lf[37],lf[38],lf[276],t3);
+t5=C_a_i_list(&a,2,((C_word*)t0)[4],t4);
t6=((C_word*)t0)[3];
t7=t6;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[279],t5));}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_record(&a,4,lf[37],lf[39],lf[277],t5));}
else{
-t3=(C_word)C_a_i_list(&a,2,lf[280],*((C_word*)lf[9]+1));
+t3=C_a_i_list(&a,2,lf[278],*((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);
+t5=C_a_i_record(&a,4,lf[37],lf[42],t3,t4);
+t6=C_a_i_list(&a,2,((C_word*)t0)[4],t5);
t7=((C_word*)t0)[3];
t8=t7;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_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]);}
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_a_i_record(&a,4,lf[37],lf[39],lf[279],t6));}}}
-/* 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){
+/* k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3169(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3169,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3172,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 876 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[261],C_fix(17),C_fix(3),lf[262]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[273],C_fix(17),C_fix(2),lf[274]);}
-/* 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){
+/* k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3172(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3172,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3175,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 877 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[259],C_fix(17),C_fix(1),lf[260]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[271],C_fix(17),C_fix(3),lf[272]);}
-/* 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){
+/* k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3175(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3175,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3178,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 878 rewrite");
-((C_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]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[269],C_fix(17),C_fix(2),lf[270]);}
-/* 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){
+/* k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3178(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3178,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3181,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 879 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[254],C_fix(17),C_fix(2),lf[255]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[267],C_fix(17),C_fix(2),lf[268]);}
-/* 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){
+/* k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3181(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3181,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3184,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 880 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[252],C_fix(17),C_fix(1),lf[253]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[265],C_fix(17),C_fix(2),lf[266]);}
-/* 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){
+/* k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3184(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3184,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3187,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 881 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[250],C_fix(17),C_fix(1),lf[251]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[263],C_fix(17),C_fix(3),lf[264]);}
-/* 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){
+/* k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3187(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3187,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3190,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 882 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[248],C_fix(17),C_fix(1),lf[249]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[261],C_fix(17),C_fix(3),lf[262]);}
-/* 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){
+/* k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3190(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3190,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3193,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 883 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[246],C_fix(17),C_fix(1),lf[247]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[259],C_fix(17),C_fix(3),lf[260]);}
-/* 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){
+/* k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3193(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3193,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3196,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 884 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[244],C_fix(17),C_fix(1),lf[245]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[257],C_fix(17),C_fix(1),lf[258]);}
-/* 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){
+/* k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3196(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3196,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3199,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 885 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[241],C_fix(17),C_fix(1),lf[242],lf[243]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[254],C_fix(17),C_fix(2),lf[255],lf[256]);}
-/* 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){
+/* k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3199(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3199,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3202,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 886 rewrite");
-((C_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]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[252],C_fix(17),C_fix(2),lf[253]);}
-/* 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){
+/* k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3202(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3202,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3205,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 887 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[236],C_fix(17),C_fix(1),lf[237]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[250],C_fix(17),C_fix(1),lf[251]);}
-/* 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){
+/* k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3205(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3205,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3208,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 888 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[234],C_fix(17),C_fix(1),lf[235]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[248],C_fix(17),C_fix(1),lf[249]);}
-/* 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){
+/* k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3208(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3208,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3211,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 889 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[232],C_fix(17),C_fix(2),lf[233]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[246],C_fix(17),C_fix(1),lf[247]);}
-/* 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){
+/* k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3211(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3211,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3214,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 890 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[230],C_fix(17),C_fix(1),lf[231]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[244],C_fix(17),C_fix(1),lf[245]);}
-/* 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){
+/* k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3214(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3214,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3217,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 891 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[228],C_fix(17),C_fix(1),lf[229]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[242],C_fix(17),C_fix(1),lf[243]);}
-/* 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){
+/* k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3217(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3217,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3220,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 892 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[226],C_fix(17),C_fix(1),lf[227]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[239],C_fix(17),C_fix(1),lf[240],lf[241]);}
-/* 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){
+/* k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3220(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3220,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3223,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 893 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[224],C_fix(17),C_fix(1),lf[225]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[236],C_fix(17),C_fix(1),lf[237],lf[238]);}
-/* 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){
+/* k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3223(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3223,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3226,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 894 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[222],C_fix(17),C_fix(2),lf[223]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[234],C_fix(17),C_fix(1),lf[235]);}
-/* 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){
+/* k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3226(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3226,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3229,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 895 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[220],C_fix(17),C_fix(1),lf[221]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[232],C_fix(17),C_fix(1),lf[233]);}
-/* 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){
+/* k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3229(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3229,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3232,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 896 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[218],C_fix(17),C_fix(1),lf[219]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[230],C_fix(17),C_fix(2),lf[231]);}
-/* 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){
+/* k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3232(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3232,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3235,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 897 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[216],C_fix(17),C_fix(1),lf[217]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[228],C_fix(17),C_fix(1),lf[229]);}
-/* 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){
+/* k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3235(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3235,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3238,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 898 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[214],C_fix(17),C_fix(1),lf[215]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[226],C_fix(17),C_fix(1),lf[227]);}
-/* 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){
+/* k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3238(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3238,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3241,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 899 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[212],C_fix(17),C_fix(2),lf[213]);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[224],C_fix(17),C_fix(1),lf[225]);}
+
+/* k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3241(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3241,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3244,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 900 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[222],C_fix(17),C_fix(1),lf[223]);}
-/* 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){
+/* k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3244(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3244,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3247,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 901 rewrite");
-((C_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);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[220],C_fix(17),C_fix(2),lf[221]);}
+
+/* k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3247(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3247,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3250,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 902 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[218],C_fix(17),C_fix(1),lf[219]);}
-/* 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){
+/* k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3250(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3250,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3253,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 903 rewrite");
-((C_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);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[216],C_fix(17),C_fix(1),lf[217]);}
-/* 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){
+/* k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3253(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3253,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3256,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 904 rewrite");
-((C_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);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[214],C_fix(17),C_fix(1),lf[215]);}
-/* 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){
+/* k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3256(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3256,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3259,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 905 rewrite");
-((C_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);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[212],C_fix(17),C_fix(1),lf[213]);}
-/* 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){
+/* k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3259(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3259,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3262,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 906 rewrite");
-((C_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);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[210],C_fix(17),C_fix(2),lf[211]);}
-/* 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){
+/* k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3262(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3262,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3265,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 908 rewrite");
-((C_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));}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[208],C_fix(2),C_fix(1),lf[209],C_SCHEME_FALSE);}
-/* 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){
+/* k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3265(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_3265,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3268,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 910 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[206],C_fix(2),C_fix(2),lf[207],C_SCHEME_FALSE);}
-/* 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){
+/* k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3268(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3268,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3271,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 911 rewrite");
-((C_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]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[204],C_fix(2),C_fix(2),lf[205],C_SCHEME_FALSE);}
-/* 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){
+/* k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3271(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3271,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3274,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 912 rewrite");
-((C_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]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[202],C_fix(2),C_fix(2),lf[203],C_SCHEME_FALSE);}
-/* 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){
+/* k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3274(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3274,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3277,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 913 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[200],C_fix(2),C_fix(2),lf[201],C_SCHEME_FALSE);}
-/* 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){
+/* k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3277(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3277,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3280,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 915 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[188],C_fix(2),C_fix(3),lf[189],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[198],C_fix(16),C_fix(2),lf[199],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3280(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3280,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3283,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 916 rewrite");
-((C_proc8)C_retrieve_symbol_proc(lf[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);}
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[196],C_fix(16),C_fix(2),lf[197],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
-/* 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){
+/* k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3283(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3283,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3286,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 918 rewrite");
-((C_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);}
+((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[193],C_fix(22),C_fix(2),lf[194],C_SCHEME_FALSE,*((C_word*)lf[9]+1),lf[195]);}
-/* 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){
+/* k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3286(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3286,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3289,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 919 rewrite");
-((C_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);}
+((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[190],C_fix(22),C_fix(2),lf[191],C_SCHEME_FALSE,*((C_word*)lf[9]+1),lf[192]);}
-/* 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){
+/* k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3289(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3289,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3292,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 921 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[188],C_fix(2),C_fix(3),lf[189],C_SCHEME_FALSE);}
-/* 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){
+/* k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3292(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3292,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3295,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 922 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[186],C_fix(2),C_fix(3),lf[187],C_SCHEME_FALSE);}
-/* 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){
+/* k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3295(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3295,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3298,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 923 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[184],C_fix(2),C_fix(3),lf[185],C_SCHEME_FALSE);}
-/* 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){
+/* k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3298(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3298,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3301,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 924 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[182],C_fix(2),C_fix(3),lf[183],C_SCHEME_FALSE);}
-/* 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){
+/* k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3301(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3301,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3304,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 925 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[180],C_fix(2),C_fix(3),lf[181],C_SCHEME_FALSE);}
-/* 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){
+/* k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3304(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3304,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3307,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 926 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[178],C_fix(2),C_fix(3),lf[179],C_SCHEME_FALSE);}
-/* 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){
+/* k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3307(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3307,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3310,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 927 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[176],C_fix(2),C_fix(3),lf[177],C_SCHEME_FALSE);}
-/* 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){
+/* k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3310(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3310,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3313,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 928 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[174],C_fix(2),C_fix(3),lf[175],C_SCHEME_FALSE);}
-/* 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){
+/* k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3313(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3313,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3316,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 930 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[172],C_fix(2),C_fix(1),lf[173],C_SCHEME_FALSE);}
-/* 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){
+/* k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3316(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3316,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3319,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 931 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[170],C_fix(2),C_fix(1),lf[171],C_SCHEME_FALSE);}
-/* 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){
+/* k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3319(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3319,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3322,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 932 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[158],C_fix(17),C_fix(1),lf[159]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[168],C_fix(2),C_fix(1),lf[169],C_SCHEME_FALSE);}
-/* 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){
+/* k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3322(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3322,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3325,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 933 rewrite");
-((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[156],C_fix(17),C_fix(1),lf[157]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[166],C_fix(2),C_fix(1),lf[167],C_SCHEME_FALSE);}
-/* 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){
+/* k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3325(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3325,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3328,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 934 rewrite");
-((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[153],C_fix(17),C_fix(1),lf[154],lf[155]);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[164],C_fix(2),C_fix(1),lf[165],C_SCHEME_FALSE);}
-/* 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){
+/* k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3328(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3328,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3331,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 935 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[162],C_fix(2),C_fix(1),lf[163],C_SCHEME_FALSE);}
-/* 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){
+/* k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3331(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3331,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3334,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 936 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[160],C_fix(2),C_fix(1),lf[161],C_SCHEME_FALSE);}
-/* 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){
+/* k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3334(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3334,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3337,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 937 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[158],C_fix(2),C_fix(1),lf[159],C_SCHEME_FALSE);}
-/* 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){
+/* k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3337(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3337,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3340,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 939 rewrite");
-((C_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);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[156],C_fix(17),C_fix(1),lf[157]);}
-/* 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){
+/* k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3340(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3340,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3343,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 940 rewrite");
-((C_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);}
+((C_proc6)C_retrieve_symbol_proc(lf[74]))(6,*((C_word*)lf[74]+1),t2,lf[154],C_fix(17),C_fix(1),lf[155]);}
-/* 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){
+/* k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3343(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_3343,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3346,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("c-platform.scm: 941 rewrite");
-((C_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);}
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[151],C_fix(17),C_fix(1),lf[152],lf[153]);}
-/* 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){
+/* k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3346(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3346,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3349,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 943 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[149],C_fix(7),C_fix(1),lf[150],C_fix(1),C_SCHEME_FALSE);}
-/* 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){
+/* k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3349(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3349,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3352,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 944 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[147],C_fix(7),C_fix(1),lf[148],C_fix(1),C_SCHEME_FALSE);}
+
+/* k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3352(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3352,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3355,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 945 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[145],C_fix(7),C_fix(1),lf[146],C_fix(1),C_SCHEME_FALSE);}
+
+/* k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3355(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3355,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3358,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 946 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[143],C_fix(7),C_fix(1),lf[144],C_fix(1),C_SCHEME_FALSE);}
+
+/* k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3358(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3358,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3361,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 947 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[141],C_fix(7),C_fix(1),lf[142],C_fix(1),C_SCHEME_FALSE);}
-/* 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){
+/* k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3361(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3361,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3364,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 948 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[139],C_fix(7),C_fix(1),lf[140],C_fix(1),C_SCHEME_FALSE);}
+
+/* k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3364(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3364,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3367,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 949 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[137],C_fix(7),C_fix(1),lf[138],C_fix(1),C_SCHEME_FALSE);}
+
+/* k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3367(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3367,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3370,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 950 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[135],C_fix(7),C_fix(1),lf[136],C_fix(1),C_SCHEME_FALSE);}
+
+/* k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3370(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3370,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3372,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3507,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 978 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t3,lf[134],C_fix(8),t2);}
-/* 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){
+/* k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3507(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3507,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3510,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 979 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[133],C_fix(8),((C_word*)t0)[2]);}
-/* 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){
+/* k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3510(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3510,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3513,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 981 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[131],C_fix(7),C_fix(1),lf[132],C_fix(10),C_SCHEME_FALSE);}
-/* 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){
+/* k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3513(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3513,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3516,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 982 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[74]))(8,*((C_word*)lf[74]+1),t2,lf[129],C_fix(20),C_fix(2),lf[130],C_fix(10),C_SCHEME_FALSE);}
-/* 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){
+/* k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3516(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3516,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3518,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3660,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 1004 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t3,lf[73],C_fix(8),t2);}
-/* 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){
+/* k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3660(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3660,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3663,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1005 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[128],C_fix(8),((C_word*)t0)[2]);}
-/* 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){
+/* k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3663(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3663,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3667,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3829,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 1035 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[127],C_fix(8),t3);}
-/* 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){
+/* a3828 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3829(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -8149,19 +8279,19 @@ 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);
+C_save_and_reclaim((void*)tr6,(void*)f_3829,6,t0,t1,t2,t3,t4,t5);}
+t6=C_i_length(t5);
+t7=C_eqp(C_fix(1),t6);
if(C_truep(t7)){
-t8=(C_word)C_i_car(t5);
-t9=(C_word)C_slot(t8,C_fix(1));
-t10=(C_word)C_eqp(lf[50],t9);
+t8=C_i_car(t5);
+t9=C_slot(t8,C_fix(1));
+t10=C_eqp(lf[48],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);
+t11=C_slot(t8,C_fix(2));
+t12=C_i_car(t11);
+t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3859,a[2]=t1,a[3]=t4,a[4]=t12,tmp=(C_word)a,a+=5,tmp);
C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[63]))(4,*((C_word*)lf[63]+1),t13,t12,lf[64]);}
+((C_proc4)C_retrieve_symbol_proc(lf[61]))(4,*((C_word*)lf[61]+1),t13,t12,lf[62]);}
else{
t11=t1;
((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,C_SCHEME_FALSE);}}
@@ -8169,8 +8299,8 @@ 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){
+/* k3857 in a3828 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3859(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8178,14 +8308,14 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3859,2,t0,t1);}
if(C_truep(t1)){
-t2=(C_word)C_i_assq(((C_word*)t0)[4],lf[127]);
+t2=C_i_assq(((C_word*)t0)[4],lf[125]);
if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3881,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t4=C_i_cdr(t2);
+C_trace("c-platform.scm: 1047 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[80]))(3,*((C_word*)lf[80]+1),t3,t4);}
else{
t3=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
@@ -8193,60 +8323,60 @@ 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){
+/* k3879 in k3857 in a3828 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3881(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3847,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_3881,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[128],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[126],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){
+/* k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3667(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3667,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3670,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1049 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[124],C_fix(3),lf[123]);}
-/* 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){
+/* k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3670(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3670,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3673,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1050 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[122],C_fix(3),lf[123]);}
-/* 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){
+/* k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3673(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3673,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3676,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3747,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 1052 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[121],C_fix(8),t3);}
-/* 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){
+/* a3746 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3747(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -8262,38 +8392,38 @@ 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);
+C_save_and_reclaim((void*)tr6,(void*)f_3747,6,t0,t1,t2,t3,t4,t5);}
+t6=C_i_length(t5);
+t7=C_eqp(C_fix(1),t6);
if(C_truep(t7)){
-t8=(C_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);
+t8=C_i_car(t5);
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3773,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3776,a[2]=t1,a[3]=t4,a[4]=t8,a[5]=t9,tmp=(C_word)a,a+=6,tmp);
+t11=C_slot(t8,C_fix(1));
+t12=C_eqp(lf[48],t11);
if(C_truep(t12)){
-t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3801,a[2]=t10,tmp=(C_word)a,a+=3,tmp);
+t14=C_slot(t8,C_fix(2));
+t15=C_i_car(t14);
+C_trace("c-platform.scm: 1061 get");
+((C_proc5)C_retrieve_symbol_proc(lf[71]))(5,*((C_word*)lf[71]+1),t13,t2,t15,lf[120]);}
else{
t13=t10;
-f_3742(t13,C_SCHEME_FALSE);}}
+f_3776(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){
+/* k3799 in a3746 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3801(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_3742(t2,(C_word)C_i_not(t1));}
+f_3776(t2,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){
+/* k3774 in a3746 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_3776(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8302,48 +8432,48 @@ 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);}
+C_save_and_reclaim((void*)trf_3776,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);}
+C_trace("c-platform.scm: 1062 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),((C_word*)t0)[5],C_SCHEME_TRUE);}
else{
-t2=(C_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);
+t2=C_a_i_list(&a,1,((C_word*)t0)[4]);
+t3=C_a_i_record(&a,4,lf[37],lf[38],lf[118],t2);
+t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
t5=((C_word*)t0)[2];
t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[121],t4));}}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[119],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){
+/* k3771 in a3746 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3773(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3739,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_3773,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[119],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[117],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){
+/* k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3676(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3676,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3679,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3702,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 1067 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t2,lf[116],C_fix(8),t3);}
-/* 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){
+/* a3701 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3702(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -8357,116 +8487,116 @@ 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);
+C_save_and_reclaim((void*)tr6,(void*)f_3702,6,t0,t1,t2,t3,t4,t5);}
+t6=C_i_length(t5);
+t7=C_eqp(C_fix(2),t6);
if(C_truep(t7)){
-t8=(C_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]));
+t8=C_eqp(C_retrieve(lf[35]),lf[34]);
+t9=(C_truep(t8)?C_a_i_list(&a,1,lf[113]):C_a_i_list(&a,1,lf[114]));
t10=t5;
-t11=(C_word)C_a_i_record(&a,4,lf[39],lf[40],t9,t10);
-t12=(C_word)C_a_i_list(&a,2,t4,t11);
+t11=C_a_i_record(&a,4,lf[37],lf[38],t9,t10);
+t12=C_a_i_list(&a,2,t4,t11);
t13=t1;
t14=t13;
-((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[117],t12));}
+((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,C_a_i_record(&a,4,lf[37],lf[39],lf[115],t12));}
else{
t8=t1;
((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-/* 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){
+/* k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3679(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3679,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3682,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1079 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[111],C_fix(23),C_fix(0),lf[112],lf[107]);}
-/* 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){
+/* k3680 in k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3682(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3682,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3685,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1080 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[108],C_fix(23),C_fix(1),lf[109],lf[110]);}
-/* 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){
+/* k3683 in k3680 in k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3685(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_3685,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3688,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1081 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[105],C_fix(23),C_fix(1),lf[106],lf[107]);}
-/* 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){
+/* k3686 in k3683 in k3680 in k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3688(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3688,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3691,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1082 rewrite");
+((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[103],C_fix(23),C_fix(2),lf[104],C_fix(0),C_fix(0),C_SCHEME_FALSE);}
-/* 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){
+/* k3689 in k3686 in k3683 in k3680 in k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3691(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3691,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3694,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1083 rewrite");
+((C_proc9)C_retrieve_symbol_proc(lf[74]))(9,*((C_word*)lf[74]+1),t2,lf[101],C_fix(23),C_fix(2),lf[102],C_fix(0),C_fix(0),C_SCHEME_FALSE);}
-/* 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){
+/* k3692 in k3689 in k3686 in k3683 in k3680 in k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3694(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_3694,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3697,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1084 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[99],C_fix(23),C_fix(2),lf[100],C_fix(0));}
-/* 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){
+/* k3695 in k3692 in k3689 in k3686 in k3683 in k3680 in k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3697(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_3697,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3700,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1085 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[74]))(7,*((C_word*)lf[74]+1),t2,lf[97],C_fix(23),C_fix(2),lf[98],C_fix(0));}
-/* 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){
+/* k3698 in k3695 in k3692 in k3689 in k3686 in k3683 in k3680 in k3677 in k3674 in k3671 in k3668 in k3665 in k3661 in k3658 in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3700(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
-/* rewrite-call/cc in 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){
+/* rewrite-call/cc in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3518(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -8480,19 +8610,19 @@ 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);
+C_save_and_reclaim((void*)tr6,(void*)f_3518,6,t0,t1,t2,t3,t4,t5);}
+t6=C_i_length(t5);
+t7=C_eqp(C_fix(1),t6);
if(C_truep(t7)){
-t8=(C_word)C_i_car(t5);
-t9=(C_word)C_slot(t8,C_fix(1));
-t10=(C_word)C_eqp(lf[50],t9);
+t8=C_i_car(t5);
+t9=C_slot(t8,C_fix(1));
+t10=C_eqp(lf[48],t9);
if(C_truep(t10)){
-t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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]);}
+t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3537,a[2]=t1,a[3]=t2,a[4]=t4,a[5]=t8,tmp=(C_word)a,a+=6,tmp);
+t12=C_slot(t8,C_fix(2));
+t13=C_i_car(t12);
+C_trace("c-platform.scm: 990 get");
+((C_proc5)C_retrieve_symbol_proc(lf[71]))(5,*((C_word*)lf[71]+1),t11,t2,t13,lf[87]);}
else{
t11=t1;
((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,C_SCHEME_FALSE);}}
@@ -8500,8 +8630,8 @@ 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){
+/* k3535 in rewrite-call/cc in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3537(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8513,18 +8643,18 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3537,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);
+t3=C_slot(t2,C_fix(1));
+t4=C_eqp(lf[76],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);}
+t6=C_slot(t5,C_fix(2));
+t7=C_i_caddr(t6);
+t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3554,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t7,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-platform.scm: 993 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[96]))(4,*((C_word*)lf[96]+1),((C_word*)t0)[2],t7,t8);}
else{
t5=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_FALSE);}}
@@ -8532,8 +8662,8 @@ 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){
+/* a3553 in k3535 in rewrite-call/cc in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3554(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -8542,81 +8672,81 @@ 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));
+C_save_and_reclaim((void*)tr5,(void*)f_3554,5,t0,t1,t2,t3,t4);}
+t5=C_eqp(t3,C_fix(2));
if(C_truep(t5)){
-t6=(C_truep(t4)?t4:(C_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]);}
+t6=(C_truep(t4)?t4:C_i_cadr(((C_word*)t0)[5]));
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3610,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+C_trace("c-platform.scm: 998 get");
+((C_proc5)C_retrieve_symbol_proc(lf[71]))(5,*((C_word*)lf[71]+1),t7,((C_word*)t0)[2],t6,lf[95]);}
else{
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
-/* 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){
+/* k3608 in a3553 in k3535 in rewrite-call/cc in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3610(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3576,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_3610,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[6];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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]);}}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3606,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("c-platform.scm: 999 get");
+((C_proc5)C_retrieve_symbol_proc(lf[71]))(5,*((C_word*)lf[71]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[94]);}}
-/* 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){
+/* k3604 in k3608 in a3553 in k3535 in rewrite-call/cc in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3606(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3572,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_3606,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[6];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3602,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-platform.scm: 1000 get");
+((C_proc5)C_retrieve_symbol_proc(lf[71]))(5,*((C_word*)lf[71]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[93]);}}
-/* 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){
+/* k3600 in k3604 in k3608 in a3553 in k3535 in rewrite-call/cc in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3602(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3568,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_3602,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);}}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3598,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-platform.scm: 1003 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t2,C_SCHEME_FALSE);}}
-/* 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){
+/* k3596 in k3600 in k3604 in k3608 in a3553 in k3535 in rewrite-call/cc in k3514 in k3511 in k3508 in k3505 in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3598(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3564,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,3,((C_word*)t0)[4],((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_3598,2,t0,t1);}
+t2=C_a_i_list(&a,3,((C_word*)t0)[4],((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[94],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[92],t2));}
-/* rewrite-make-vector in 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){
+/* rewrite-make-vector in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3372(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -8627,16 +8757,16 @@ 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);
+C_save_and_reclaim((void*)tr6,(void*)f_3372,6,t0,t1,t2,t3,t4,t5);}
+t6=C_i_length(t5);
+if(C_truep(C_i_pairp(t5))){
+t7=C_i_car(t5);
+t8=C_slot(t7,C_fix(1));
+t9=C_eqp(lf[47],t8);
if(C_truep(t9)){
-t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);}
+t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3394,a[2]=t1,a[3]=t4,a[4]=t5,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-platform.scm: 960 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[81]))(2,*((C_word*)lf[81]+1),t10);}
else{
t10=t1;
((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_SCHEME_FALSE);}}
@@ -8644,8 +8774,8 @@ 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){
+/* k3392 in rewrite-make-vector in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3394(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8660,21 +8790,21 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3394,2,t0,t1);}
+t2=C_slot(((C_word*)t0)[5],C_fix(2));
+t3=C_i_car(t2);
+if(C_truep(C_fixnump(t3))){
+if(C_truep(C_fixnum_less_or_equal_p(t3,C_fix(32)))){
+t4=C_i_cdr(((C_word*)t0)[4]);
+t5=C_i_pairp(t4);
+t6=(C_truep(t5)?C_i_cadr(((C_word*)t0)[4]):C_a_i_record(&a,4,lf[37],lf[88],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST));
+t7=C_a_i_list(&a,1,t1);
+t8=C_fixnum_increase(t3);
+t9=C_a_i_list(&a,2,lf[89],t8);
+t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3458,a[2]=t7,a[3]=((C_word*)t0)[2],a[4]=t6,a[5]=((C_word*)t0)[3],a[6]=t9,tmp=(C_word)a,a+=7,tmp);
+t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3460,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 977 list-tabulate");
+((C_proc4)C_retrieve_symbol_proc(lf[91]))(4,*((C_word*)lf[91]+1),t10,t3,t11);}
else{
t4=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
@@ -8682,19 +8812,19 @@ 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){
+/* a3459 in k3392 in rewrite-make-vector in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3460(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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]);}
+C_save_and_reclaim((void*)tr3,(void*)f_3460,3,t0,t1,t2);}
+C_trace("c-platform.scm: 977 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[80]))(3,*((C_word*)lf[80]+1),t1,((C_word*)t0)[2]);}
-/* 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){
+/* k3456 in k3392 in rewrite-make-vector in k3368 in k3365 in k3362 in k3359 in k3356 in k3353 in k3350 in k3347 in k3344 in k3341 in k3338 in k3335 in k3332 in k3329 in k3326 in k3323 in k3320 in k3317 in k3314 in k3311 in k3308 in k3305 in k3302 in k3299 in k3296 in k3293 in k3290 in k3287 in k3284 in k3281 in k3278 in k3275 in k3272 in k3269 in k3266 in k3263 in k3260 in k3257 in k3254 in k3251 in k3248 in k3245 in k3242 in k3239 in k3236 in k3233 in k3230 in k3227 in k3224 in k3221 in k3218 in k3215 in k3212 in k3209 in k3206 in k3203 in k3200 in k3197 in k3194 in k3191 in k3188 in k3185 in k3182 in k3179 in k3176 in k3173 in k3170 in k3167 in k3164 in k3161 in k3158 in k3155 in k3152 in k3149 in k3146 in k3143 in k3140 in k3137 in k3134 in k3131 in k3128 in k3125 in k3122 in k3119 in k3116 in k3113 in k3110 in k3107 in k3104 in k3101 in k3098 in k3095 in k3092 in k3089 in k3086 in k3083 in k3080 in k3077 in k3074 in k3071 in k3068 in k3065 in k3062 in k3059 in k3056 in k3053 in k3050 in k3047 in k3044 in k3041 in k3038 in k3035 in k3032 in k3029 in k3026 in k3023 in k3020 in k3017 in k3014 in k3011 in k3008 in k3005 in k3002 in k2999 in k2996 in k2993 in k2990 in k2987 in k2984 in k2981 in k2978 in k2975 in k2972 in k2969 in k2966 in k2963 in k2960 in k2957 in k2954 in k2951 in k2948 in k2945 in k2942 in k2939 in k2936 in k2933 in k2930 in k2927 in k2924 in k2921 in k2918 in k2915 in k2912 in k2909 in k2906 in k2903 in k2900 in k2897 in k2894 in k2891 in k2888 in k2885 in k2882 in k2879 in k2876 in k2873 in k2870 in k2867 in k2864 in k2861 in k2858 in k2855 in k2852 in k2849 in k2846 in k2843 in k2840 in k2837 in k2834 in k2831 in k2828 in k2825 in k2822 in k2819 in k2816 in k2813 in k2810 in k2807 in k2804 in k2801 in k2798 in k2795 in k2792 in k2789 in k2786 in k2783 in k2780 in k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in k2759 in k2756 in k2753 in k2750 in k2747 in k2744 in k2741 in k2738 in k2735 in k2732 in k2729 in k2726 in k2723 in k2720 in k2717 in k2714 in k2711 in k2708 in k2705 in k2702 in k2699 in k2696 in k2693 in k2690 in k2687 in k2684 in k2681 in k2678 in k2675 in k2672 in k2669 in k2666 in k2663 in k2660 in k2657 in k2654 in k2651 in k2648 in k2645 in k2642 in k2639 in k2636 in k2633 in k2630 in k2627 in k2624 in k2621 in k2618 in k2615 in k2612 in k2609 in k2606 in k2603 in k2600 in k2597 in k2594 in k2591 in k2588 in k2585 in k2582 in k2579 in k2576 in k2573 in k2570 in k2567 in k2564 in k2561 in k2558 in k2555 in k2552 in k2549 in k2546 in k2543 in k2540 in k2537 in k2534 in k2531 in k2528 in k2525 in k2522 in k2519 in k2516 in k2513 in k2510 in k2507 in k2504 in k2501 in k2498 in k2495 in k2492 in k2489 in k2486 in k2483 in k2480 in k2477 in k2474 in k2471 in k2468 in k2465 in k2462 in k2459 in k2456 in k2453 in k2450 in k2447 in k2444 in k2441 in k2438 in k2435 in k2432 in k2429 in k2426 in k2423 in k2420 in k2417 in k2414 in k2411 in k2408 in k2405 in k2402 in k2399 in k2396 in k2393 in k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_3458(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8704,17 +8834,17 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3458,2,t0,t1);}
+t2=C_a_i_record(&a,4,lf[37],lf[42],((C_word*)t0)[6],t1);
+t3=C_a_i_list(&a,2,((C_word*)t0)[5],t2);
+t4=C_a_i_record(&a,4,lf[37],lf[39],lf[90],t3);
+t5=C_a_i_list(&a,2,((C_word*)t0)[4],t4);
t6=((C_word*)t0)[3];
t7=t6;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_record(&a,4,lf[39],lf[81],((C_word*)t0)[2],t5));}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_record(&a,4,lf[37],lf[79],((C_word*)t0)[2],t5));}
-/* rewrite-c-w-v in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2046(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -8731,24 +8861,24 @@ 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);
+C_save_and_reclaim((void*)tr6,(void*)f_2046,6,t0,t1,t2,t3,t4,t5);}
+t6=C_i_length(t5);
+t7=C_eqp(C_fix(2),t6);
if(C_truep(t7)){
-t8=(C_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);
+t8=C_i_car(t5);
+t9=C_i_cadr(t5);
+t10=C_slot(t8,C_fix(1));
+t11=C_eqp(lf[48],t10);
if(C_truep(t11)){
-t12=(C_word)C_slot(t9,C_fix(1));
-t13=(C_word)C_eqp(lf[50],t12);
+t12=C_slot(t9,C_fix(1));
+t13=C_eqp(lf[48],t12);
if(C_truep(t13)){
-t14=(C_word)C_slot(t9,C_fix(2));
-t15=(C_word)C_i_car(t14);
+t14=C_slot(t9,C_fix(2));
+t15=C_i_car(t14);
if(C_truep(t15)){
-t16=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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]);}
+t16=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2080,a[2]=t1,a[3]=t8,a[4]=t4,a[5]=t9,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-platform.scm: 477 get");
+((C_proc5)C_retrieve_symbol_proc(lf[71]))(5,*((C_word*)lf[71]+1),t16,t2,t15,lf[87]);}
else{
t16=t1;
((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,C_SCHEME_FALSE);}}
@@ -8762,8 +8892,8 @@ 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){
+/* k2078 in rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2080(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8780,25 +8910,25 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2080,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);
+t3=C_slot(t2,C_fix(1));
+t4=C_eqp(lf[76],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))){
+t6=C_slot(t5,C_fix(2));
+t7=C_i_caddr(t6);
+if(C_truep(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);
+t9=C_slot(t8,C_fix(2));
+t10=C_i_caddr(t9);
+t11=C_i_length(t10);
+t12=C_eqp(C_fix(2),t11);
if(C_truep(t12)){
-t13=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);}
+t13=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2107,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+C_trace("c-platform.scm: 482 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[81]))(2,*((C_word*)lf[81]+1),t13);}
else{
t13=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,C_SCHEME_FALSE);}}
@@ -8812,20 +8942,20 @@ 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){
+/* k2105 in k2078 in rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2107(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2107,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2110,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+C_trace("c-platform.scm: 483 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[81]))(3,*((C_word*)lf[81]+1),t2,lf[86]);}
-/* 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){
+/* k2108 in k2105 in k2078 in rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2110(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8833,29 +8963,29 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_2110,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2113,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
t3=((C_word*)t0)[2];
-t4=(C_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);}
+t4=C_slot(t3,C_fix(2));
+C_trace("c-platform.scm: 484 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[83]))(5,*((C_word*)lf[83]+1),t2,lf[84],lf[85],t4);}
-/* 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){
+/* k2111 in k2108 in k2105 in k2078 in rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2113(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2113,2,t0,t1);}
+t2=C_a_i_list(&a,1,((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2184,a[2]=((C_word*)t0)[7],a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
+C_trace("c-platform.scm: 489 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[81]))(3,*((C_word*)lf[81]+1),t3,lf[82]);}
-/* 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){
+/* k2182 in k2111 in k2108 in k2105 in k2078 in rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2184(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8863,15 +8993,15 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2184,2,t0,t1);}
+t2=C_a_i_list(&a,1,((C_word*)t0)[8]);
+t3=C_a_i_list(&a,4,t1,C_SCHEME_FALSE,t2,C_fix(0));
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2180,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t3,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+C_trace("c-platform.scm: 492 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[80]))(3,*((C_word*)lf[80]+1),t4,((C_word*)t0)[8]);}
-/* 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){
+/* k2178 in k2182 in k2111 in k2108 in k2105 in k2078 in rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2180(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8881,17 +9011,17 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_2180,2,t0,t1);}
+t2=C_a_i_list(&a,3,((C_word*)t0)[8],((C_word*)t0)[7],t1);
+t3=C_a_i_record(&a,4,lf[37],lf[39],lf[77],t2);
+t4=C_a_i_list(&a,1,t3);
+t5=C_a_i_record(&a,4,lf[37],lf[76],((C_word*)t0)[6],t4);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2155,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t5,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-platform.scm: 495 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[80]))(3,*((C_word*)lf[80]+1),t6,((C_word*)t0)[2]);}
-/* 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){
+/* k2153 in k2178 in k2182 in k2111 in k2108 in k2105 in k2078 in rewrite-c-w-v in k2042 in k2039 in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2155(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8900,16 +9030,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_2155,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_record(&a,4,lf[37],lf[39],lf[78],t2);
+t4=C_a_i_list(&a,2,((C_word*)t0)[4],t3);
t5=((C_word*)t0)[3];
t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[39],lf[81],((C_word*)t0)[2],t4));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[79],((C_word*)t0)[2],t4));}
-/* rvalues in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in 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){
+/* rvalues in k2012 in k2009 in k2006 in k2003 in k2000 in k1997 in k1994 in k1991 in k1988 in k1985 in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_2015(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -8919,32 +9049,32 @@ 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));
+C_save_and_reclaim((void*)tr6,(void*)f_2015,6,t0,t1,t2,t3,t4,t5);}
+t6=C_i_length(t5);
+t7=C_eqp(t6,C_fix(1));
if(C_truep(t7)){
-t8=(C_word)C_a_i_cons(&a,2,t4,t5);
+t8=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));}
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_a_i_record(&a,4,lf[37],lf[39],lf[75],t8));}
else{
t8=t1;
((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-/* rewrite-c..r in k1840 in k1837 in k1621 in k1618 in 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){
+/* rewrite-c..r in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_1851(C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_1851,NULL,5,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1857,a[2]=t3,a[3]=t4,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-platform.scm: 422 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[74]))(5,*((C_word*)lf[74]+1),t1,t2,C_fix(8),t6);}
-/* 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){
+/* a1856 in rewrite-c..r in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1857(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -8953,19 +9083,19 @@ 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));
+C_save_and_reclaim((void*)tr6,(void*)f_1857,6,t0,t1,t2,t3,t4,t5);}
+t6=C_i_length(t5);
+t7=C_eqp(t6,C_fix(1));
if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);}
+t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1869,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t4,a[7]=t5,tmp=(C_word)a,a+=8,tmp);
+C_trace("c-platform.scm: 429 call-with-current-continuation");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[73]+1)))(3,*((C_word*)lf[73]+1),t1,t8);}
else{
t8=t1;
((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-/* 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){
+/* a1868 in a1856 in rewrite-c..r in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1869(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8979,32 +9109,32 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_1869,3,t0,t1,t2);}
+t3=C_i_car(((C_word*)t0)[7]);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1889,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_1892,a[2]=t4,a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=t1,a[9]=((C_word*)t0)[6],a[10]=t3,tmp=(C_word)a,a+=11,tmp);
+t6=C_slot(t3,C_fix(1));
+t7=C_eqp(lf[48],t6);
if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1958,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t9=C_slot(t3,C_fix(2));
+t10=C_i_car(t9);
+C_trace("c-platform.scm: 437 get");
+((C_proc5)C_retrieve_symbol_proc(lf[71]))(5,*((C_word*)lf[71]+1),t8,((C_word*)t0)[2],t10,lf[72]);}
else{
t8=t5;
-f_1885(t8,C_SCHEME_FALSE);}}
+f_1892(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){
+/* k1956 in a1868 in a1856 in rewrite-c..r in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1958(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_1885(t2,(C_word)C_eqp(lf[72],t1));}
+f_1892(t2,C_eqp(lf[70],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){
+/* k1890 in a1868 in a1856 in rewrite-c..r in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_1892(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9022,38 +9152,38 @@ 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);}
+C_save_and_reclaim((void*)trf_1892,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]);}
+t2=(C_truep(C_retrieve(lf[36]))?lf[65]:lf[66]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1912,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=t2,a[5]=((C_word*)t0)[10],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-platform.scm: 443 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t3,((C_word*)t0)[7]);}
else{
-t2=(C_truep(C_retrieve(lf[38]))?((C_word*)t0)[6]:C_SCHEME_FALSE);
+t2=(C_truep(C_retrieve(lf[36]))?((C_word*)t0)[6]:C_SCHEME_FALSE);
if(C_truep(t2)){
-t3=(C_word)C_a_i_list(&a,1,((C_word*)t0)[6]);
+t3=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);
+t5=C_a_i_record(&a,4,lf[37],lf[38],t3,t4);
+t6=C_a_i_list(&a,2,((C_word*)t0)[9],t5);
t7=((C_word*)t0)[8];
t8=t7;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[70],t6));}
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_a_i_record(&a,4,lf[37],lf[39],lf[68],t6));}
else{
if(C_truep(((C_word*)t0)[4])){
-t3=(C_word)C_a_i_list(&a,1,((C_word*)t0)[4]);
+t3=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);
+t5=C_a_i_record(&a,4,lf[37],lf[38],t3,t4);
+t6=C_a_i_list(&a,2,((C_word*)t0)[9],t5);
t7=((C_word*)t0)[8];
t8=t7;
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[71],t6));}
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_a_i_record(&a,4,lf[37],lf[39],lf[69],t6));}
else{
-C_trace("c-platform.scm: 448 return");
+C_trace("c-platform.scm: 446 return");
t3=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t3))(3,t3,((C_word*)t0)[2],C_SCHEME_FALSE);}}}}
-/* 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){
+/* k1910 in k1890 in a1868 in a1856 in rewrite-c..r in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1912(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9062,47 +9192,47 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_1912,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_record(&a,4,lf[37],lf[38],((C_word*)t0)[4],t2);
+t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
t5=((C_word*)t0)[2];
t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[69],t4));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[67],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){
+/* k1887 in a1868 in a1856 in rewrite-c..r in k1847 in k1844 in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1889(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1882,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_1889,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[66],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[37],lf[39],lf[64],t2));}
-/* rewrite-apply in k1621 in k1618 in k1615 in 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){
+/* rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1632(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word ab[5],*a=ab;
if(c!=6) C_bad_argc_2(c,6,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr6,(void*)f_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);}
+C_save_and_reclaim((void*)tr6,(void*)f_1632,6,t0,t1,t2,t3,t4,t5);}
+if(C_truep(C_i_pairp(t5))){
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1642,a[2]=t4,a[3]=t1,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-platform.scm: 395 last");
+((C_proc3)C_retrieve_symbol_proc(lf[63]))(3,*((C_word*)lf[63]+1),t6,t5);}
else{
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
-/* 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){
+/* k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1642(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9123,44 +9253,44 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_1642,2,t0,t1);}
+t2=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);
+t4=C_slot(t3,C_fix(1));
+t5=C_eqp(lf[47],t4);
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1663,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t7=C_i_car(((C_word*)t0)[4]);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1671,a[2]=((C_word*)t0)[2],a[3]=t7,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1731,a[2]=t1,a[3]=t8,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 402 butlast");
+((C_proc3)C_retrieve_symbol_proc(lf[53]))(3,*((C_word*)lf[53]+1),t9,((C_word*)t0)[4]);}
else{
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1734,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+t7=C_slot(t2,C_fix(1));
+t8=C_eqp(lf[48],t7);
if(C_truep(t8)){
-t9=(C_word)C_i_length(((C_word*)t0)[4]);
-t10=(C_word)C_eqp(C_fix(2),t9);
+t9=C_i_length(((C_word*)t0)[4]);
+t10=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);
+t11=C_slot(t2,C_fix(2));
+t12=C_i_car(t11);
+if(C_truep((C_truep(C_eqp(t12,lf[57]))?C_SCHEME_TRUE:(C_truep(C_eqp(t12,lf[58]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
+t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1787,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[63]))(4,*((C_word*)lf[63]+1),t13,t12,lf[64]);}
+((C_proc4)C_retrieve_symbol_proc(lf[61]))(4,*((C_word*)lf[61]+1),t13,t12,lf[62]);}
else{
t13=t6;
-f_1727(t13,C_SCHEME_FALSE);}}
+f_1734(t13,C_SCHEME_FALSE);}}
else{
t11=t6;
-f_1727(t11,C_SCHEME_FALSE);}}
+f_1734(t11,C_SCHEME_FALSE);}}
else{
t9=t6;
-f_1727(t9,C_SCHEME_FALSE);}}}
+f_1734(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){
+/* k1785 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1787(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9168,19 +9298,19 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1787,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);
+t2=C_a_i_record(&a,4,lf[37],lf[55],lf[59],C_SCHEME_END_OF_LIST);
+t3=C_i_cadr(((C_word*)t0)[4]);
+t4=C_a_i_list(&a,3,t2,((C_word*)t0)[3],t3);
t5=((C_word*)t0)[2];
-f_1727(t5,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[62],t4));}
+f_1734(t5,C_a_i_record(&a,4,lf[37],lf[39],lf[60],t4));}
else{
t2=((C_word*)t0)[2];
-f_1727(t2,C_SCHEME_FALSE);}}
+f_1734(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){
+/* k1732 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_1734(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9188,31 +9318,31 @@ 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);}
+C_save_and_reclaim((void*)trf_1734,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=t1;
t3=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1749,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=C_a_i_record(&a,4,lf[37],lf[55],lf[56],C_SCHEME_END_OF_LIST);
+C_trace("c-platform.scm: 415 cons*");
+((C_proc5)C_retrieve_symbol_proc(lf[51]))(5,*((C_word*)lf[51]+1),t2,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}}
-/* 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){
+/* k1747 in k1732 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1749(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1742,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1749,2,t0,t1);}
t2=((C_word*)t0)[2];
t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[56],t1));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[37],lf[39],lf[54],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){
+/* k1729 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1731(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9229,24 +9359,24 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_1731,2,t0,t1);}
+t2=C_i_cdr(t1);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1672,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1679,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t8=((C_word*)t0)[2];
-t9=(C_word)C_slot(t8,C_fix(2));
-t10=(C_word)C_i_car(t9);
+t9=C_slot(t8,C_fix(2));
+t10=C_i_car(t9);
t11=C_SCHEME_UNDEFINED;
t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1678,a[2]=t4,a[3]=t12,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
+t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1685,a[2]=t4,a[3]=t12,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
t14=((C_word*)t12)[1];
-f_1678(t14,t7,t10);}
+f_1685(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){
+/* loop433 in k1729 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_1685(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9255,11 +9385,11 @@ 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_save_and_reclaim((void*)trf_1685,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_retrieve(lf[44]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1714,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
C_trace("g449450");
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
@@ -9268,8 +9398,8 @@ 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){
+/* k1712 in loop433 in k1729 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1714(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9281,53 +9411,53 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_1714,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
+t5=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);}
+f_1685(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
+t5=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);}}
+f_1685(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){
+/* k1677 in k1729 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1679(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-platform.scm: 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);}
+C_trace("c-platform.scm: 402 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[52]+1)))(4,*((C_word*)lf[52]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k1669 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1671(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("c-platform.scm: 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);}
+C_trace("c-platform.scm: 400 cons*");
+((C_proc5)C_retrieve_symbol_proc(lf[51]))(5,*((C_word*)lf[51]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k1661 in k1640 in rewrite-apply in k1628 in k1625 in k1622 in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1663(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1656,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1663,2,t0,t1);}
t2=((C_word*)t0)[2];
t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[52],t1));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[37],lf[39],lf[50],t1));}
-/* eqv?-id in 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){
+/* eqv?-id in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1434(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -9345,52 +9475,52 @@ 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));
+C_save_and_reclaim((void*)tr6,(void*)f_1434,6,t0,t1,t2,t3,t4,t5);}
+t6=C_i_length(t5);
+t7=C_eqp(t6,C_fix(2));
if(C_truep(t7)){
-t8=(C_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);
+t8=C_i_car(t5);
+t9=C_i_cadr(t5);
+t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1450,a[2]=t8,a[3]=t9,a[4]=t4,a[5]=t5,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+t11=C_slot(t8,C_fix(1));
+t12=C_eqp(lf[48],t11);
if(C_truep(t12)){
-t13=(C_word)C_slot(t9,C_fix(1));
-t14=(C_word)C_eqp(lf[50],t13);
+t13=C_slot(t9,C_fix(1));
+t14=C_eqp(lf[48],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);}
+t15=C_slot(t8,C_fix(2));
+t16=C_slot(t9,C_fix(2));
+if(C_truep(C_i_equalp(t15,t16))){
+t17=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1581,a[2]=t10,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 351 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t17,C_SCHEME_TRUE);}
else{
t17=t10;
-f_1443(t17,C_SCHEME_FALSE);}}
+f_1450(t17,C_SCHEME_FALSE);}}
else{
t15=t10;
-f_1443(t15,C_SCHEME_FALSE);}}
+f_1450(t15,C_SCHEME_FALSE);}}
else{
t13=t10;
-f_1443(t13,C_SCHEME_FALSE);}}
+f_1450(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){
+/* k1579 in eqv?-id in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1581(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1574,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_1581,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
-f_1443(t3,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[51],t2));}
+f_1450(t3,C_a_i_record(&a,4,lf[37],lf[39],lf[49],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){
+/* k1448 in eqv?-id in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_1450(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9401,26 +9531,26 @@ 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);}
+C_save_and_reclaim((void*)trf_1450,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[6];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1459,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=C_slot(((C_word*)t0)[2],C_fix(1));
+t4=C_eqp(lf[47],t3);
if(C_truep(t4)){
-t5=(C_word)C_slot(((C_word*)t0)[2],C_fix(2));
-t6=(C_word)C_i_car(t5);
-t7=(C_word)C_i_flonump(t6);
+t5=C_slot(((C_word*)t0)[2],C_fix(2));
+t6=C_i_car(t5);
+t7=C_i_flonump(t6);
t8=t2;
-f_1452(t8,(C_word)C_i_not(t7));}
+f_1459(t8,C_i_not(t7));}
else{
t5=t2;
-f_1452(t5,C_SCHEME_FALSE);}}}
+f_1459(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){
+/* k1457 in k1448 in eqv?-id in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_1459(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9431,26 +9561,26 @@ 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);
+C_save_and_reclaim((void*)trf_1459,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1462,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
if(C_truep(t1)){
t3=t2;
-f_1455(t3,t1);}
+f_1462(t3,t1);}
else{
-t3=(C_word)C_slot(((C_word*)t0)[2],C_fix(1));
-t4=(C_word)C_eqp(lf[49],t3);
+t3=C_slot(((C_word*)t0)[2],C_fix(1));
+t4=C_eqp(lf[47],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);
+t5=C_slot(((C_word*)t0)[2],C_fix(2));
+t6=C_i_car(t5);
+t7=C_i_flonump(t6);
t8=t2;
-f_1455(t8,(C_word)C_i_not(t7));}
+f_1462(t8,C_i_not(t7));}
else{
t5=t2;
-f_1455(t5,C_SCHEME_FALSE);}}}
+f_1462(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){
+/* k1460 in k1457 in k1448 in eqv?-id in k1430 in k1427 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_1462(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9459,30 +9589,30 @@ 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);}
+C_save_and_reclaim((void*)trf_1462,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);
+t3=C_a_i_record(&a,4,lf[37],lf[38],lf[45],t2);
+t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
t5=((C_word*)t0)[2];
t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[48],t4));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[46],t4));}
else{
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-/* op1 in 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){
+/* op1 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_fcall f_1354(C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1347,NULL,4,t1,t2,t3,t4);}
+C_save_and_reclaim((void*)trf_1354,NULL,4,t1,t2,t3,t4);}
t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1349,a[2]=t4,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1356,a[2]=t4,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp));}
-/* f_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){
+/* f_1356 in op1 in k1350 in k1347 in k1344 in k1341 in k1338 in k1335 in k1312 in k1309 */
+static void C_ccall f_1356(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -9506,42 +9636,42 @@ 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));
+C_save_and_reclaim((void*)tr6,(void*)f_1356,6,t0,t1,t2,t3,t4,t5);}
+t6=C_i_length(t5);
+t7=C_eqp(t6,C_fix(1));
if(C_truep(t7)){
-t8=(C_word)C_eqp(lf[36],C_retrieve(lf[37]));
+t8=C_eqp(lf[34],C_retrieve(lf[35]));
if(C_truep(t8)){
-if(C_truep(C_retrieve(lf[38]))){
+if(C_truep(C_retrieve(lf[36]))){
t9=((C_word*)t0)[4];
-t10=(C_word)C_a_i_list(&a,1,t9);
+t10=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);
+t12=C_a_i_record(&a,4,lf[37],lf[38],t10,t11);
+t13=C_a_i_list(&a,2,t4,t12);
t14=t1;
t15=t14;
-((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[42],t13));}
+((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,C_a_i_record(&a,4,lf[37],lf[39],lf[40],t13));}
else{
t9=((C_word*)t0)[3];
-t10=(C_word)C_a_i_list(&a,1,t9);
+t10=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);
+t12=C_a_i_record(&a,4,lf[37],lf[38],t10,t11);
+t13=C_a_i_list(&a,2,t4,t12);
t14=t1;
t15=t14;
-((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[43],t13));}}
+((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,C_a_i_record(&a,4,lf[37],lf[39],lf[41],t13));}}
else{
-t9=(C_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));}}
+t9=C_a_i_list(&a,2,((C_word*)t0)[2],C_fix(4));
+t10=C_i_car(t5);
+t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1422,a[2]=t1,a[3]=t4,a[4]=t9,a[5]=t10,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-platform.scm: 337 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[44]))(3,*((C_word*)lf[44]+1),t11,C_fix(1));}}
else{
t8=t1;
((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
-/* k1413 */
-static void C_ccall f_1415(C_word c,C_word t0,C_word t1){
+/* k1420 */
+static void C_ccall f_1422(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9550,518 +9680,527 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_1422,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_record(&a,4,lf[37],lf[42],((C_word*)t0)[4],t2);
+t4=C_a_i_list(&a,2,((C_word*)t0)[3],t3);
t5=((C_word*)t0)[2];
t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[45],t4));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[37],lf[39],lf[43],t4));}
#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[503] = {
+static C_PTABLE_ENTRY ptable[512] = {
{"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_1311:c_platform_scm",(void*)f_1311},
+{"f_1314:c_platform_scm",(void*)f_1314},
+{"f_4964:c_platform_scm",(void*)f_4964},
+{"f_1337:c_platform_scm",(void*)f_1337},
+{"f_1340:c_platform_scm",(void*)f_1340},
+{"f_4787:c_platform_scm",(void*)f_4787},
+{"f_4928:c_platform_scm",(void*)f_4928},
+{"f_4791:c_platform_scm",(void*)f_4791},
+{"f_4859:c_platform_scm",(void*)f_4859},
+{"f_4866:c_platform_scm",(void*)f_4866},
+{"f_4882:c_platform_scm",(void*)f_4882},
+{"f_4857:c_platform_scm",(void*)f_4857},
+{"f_4813:c_platform_scm",(void*)f_4813},
+{"f_1343:c_platform_scm",(void*)f_1343},
+{"f_4637:c_platform_scm",(void*)f_4637},
+{"f_4739:c_platform_scm",(void*)f_4739},
+{"f_4737:c_platform_scm",(void*)f_4737},
+{"f_4708:c_platform_scm",(void*)f_4708},
+{"f_4706:c_platform_scm",(void*)f_4706},
+{"f_1346:c_platform_scm",(void*)f_1346},
+{"f_4478:c_platform_scm",(void*)f_4478},
+{"f_4595:c_platform_scm",(void*)f_4595},
+{"f_4593:c_platform_scm",(void*)f_4593},
+{"f_4518:c_platform_scm",(void*)f_4518},
+{"f_4525:c_platform_scm",(void*)f_4525},
+{"f_4541:c_platform_scm",(void*)f_4541},
+{"f_4516:c_platform_scm",(void*)f_4516},
+{"f_1349:c_platform_scm",(void*)f_1349},
+{"f_4360:c_platform_scm",(void*)f_4360},
+{"f_4463:c_platform_scm",(void*)f_4463},
+{"f_4395:c_platform_scm",(void*)f_4395},
+{"f_4415:c_platform_scm",(void*)f_4415},
+{"f_1352:c_platform_scm",(void*)f_1352},
+{"f_4358:c_platform_scm",(void*)f_4358},
+{"f_1429:c_platform_scm",(void*)f_1429},
+{"f_4354:c_platform_scm",(void*)f_4354},
+{"f_1432:c_platform_scm",(void*)f_1432},
+{"f_1624:c_platform_scm",(void*)f_1624},
+{"f_1627:c_platform_scm",(void*)f_1627},
+{"f_4137:c_platform_scm",(void*)f_4137},
+{"f_4310:c_platform_scm",(void*)f_4310},
+{"f_4153:c_platform_scm",(void*)f_4153},
+{"f_4255:c_platform_scm",(void*)f_4255},
+{"f_4186:c_platform_scm",(void*)f_4186},
+{"f_4222:c_platform_scm",(void*)f_4222},
+{"f_4189:c_platform_scm",(void*)f_4189},
+{"f_4159:c_platform_scm",(void*)f_4159},
+{"f_1630:c_platform_scm",(void*)f_1630},
+{"f_1846:c_platform_scm",(void*)f_1846},
+{"f_1849:c_platform_scm",(void*)f_1849},
+{"f_1987:c_platform_scm",(void*)f_1987},
+{"f_1990:c_platform_scm",(void*)f_1990},
+{"f_1993:c_platform_scm",(void*)f_1993},
+{"f_1996:c_platform_scm",(void*)f_1996},
+{"f_1999:c_platform_scm",(void*)f_1999},
+{"f_2002:c_platform_scm",(void*)f_2002},
+{"f_2005:c_platform_scm",(void*)f_2005},
+{"f_2008:c_platform_scm",(void*)f_2008},
+{"f_2011:c_platform_scm",(void*)f_2011},
+{"f_2014:c_platform_scm",(void*)f_2014},
+{"f_2041:c_platform_scm",(void*)f_2041},
+{"f_2044:c_platform_scm",(void*)f_2044},
+{"f_2266:c_platform_scm",(void*)f_2266},
+{"f_2269:c_platform_scm",(void*)f_2269},
+{"f_2272:c_platform_scm",(void*)f_2272},
+{"f_2275:c_platform_scm",(void*)f_2275},
+{"f_2278:c_platform_scm",(void*)f_2278},
+{"f_2281:c_platform_scm",(void*)f_2281},
+{"f_2284:c_platform_scm",(void*)f_2284},
+{"f_2287:c_platform_scm",(void*)f_2287},
+{"f_2290:c_platform_scm",(void*)f_2290},
+{"f_2293:c_platform_scm",(void*)f_2293},
+{"f_2296:c_platform_scm",(void*)f_2296},
+{"f_2299:c_platform_scm",(void*)f_2299},
+{"f_2302:c_platform_scm",(void*)f_2302},
+{"f_2305:c_platform_scm",(void*)f_2305},
+{"f_2308:c_platform_scm",(void*)f_2308},
+{"f_2311:c_platform_scm",(void*)f_2311},
+{"f_2314:c_platform_scm",(void*)f_2314},
+{"f_2317:c_platform_scm",(void*)f_2317},
+{"f_2320:c_platform_scm",(void*)f_2320},
+{"f_2323:c_platform_scm",(void*)f_2323},
+{"f_2326:c_platform_scm",(void*)f_2326},
+{"f_2329:c_platform_scm",(void*)f_2329},
+{"f_2332:c_platform_scm",(void*)f_2332},
+{"f_2335:c_platform_scm",(void*)f_2335},
+{"f_2338:c_platform_scm",(void*)f_2338},
+{"f_2341:c_platform_scm",(void*)f_2341},
+{"f_2344:c_platform_scm",(void*)f_2344},
+{"f_2347:c_platform_scm",(void*)f_2347},
+{"f_2350:c_platform_scm",(void*)f_2350},
+{"f_2353:c_platform_scm",(void*)f_2353},
+{"f_2356:c_platform_scm",(void*)f_2356},
+{"f_2359:c_platform_scm",(void*)f_2359},
+{"f_2362:c_platform_scm",(void*)f_2362},
+{"f_2365:c_platform_scm",(void*)f_2365},
+{"f_2368:c_platform_scm",(void*)f_2368},
+{"f_2371:c_platform_scm",(void*)f_2371},
+{"f_2374:c_platform_scm",(void*)f_2374},
+{"f_2377:c_platform_scm",(void*)f_2377},
+{"f_2380:c_platform_scm",(void*)f_2380},
+{"f_2383:c_platform_scm",(void*)f_2383},
+{"f_2386:c_platform_scm",(void*)f_2386},
+{"f_2389:c_platform_scm",(void*)f_2389},
+{"f_2392:c_platform_scm",(void*)f_2392},
+{"f_2395:c_platform_scm",(void*)f_2395},
+{"f_2398:c_platform_scm",(void*)f_2398},
+{"f_2401:c_platform_scm",(void*)f_2401},
+{"f_2404:c_platform_scm",(void*)f_2404},
+{"f_2407:c_platform_scm",(void*)f_2407},
+{"f_2410:c_platform_scm",(void*)f_2410},
+{"f_2413:c_platform_scm",(void*)f_2413},
+{"f_2416:c_platform_scm",(void*)f_2416},
+{"f_2419:c_platform_scm",(void*)f_2419},
+{"f_2422:c_platform_scm",(void*)f_2422},
+{"f_2425:c_platform_scm",(void*)f_2425},
+{"f_2428:c_platform_scm",(void*)f_2428},
+{"f_2431:c_platform_scm",(void*)f_2431},
+{"f_2434:c_platform_scm",(void*)f_2434},
+{"f_2437:c_platform_scm",(void*)f_2437},
+{"f_2440:c_platform_scm",(void*)f_2440},
+{"f_2443:c_platform_scm",(void*)f_2443},
+{"f_2446:c_platform_scm",(void*)f_2446},
+{"f_2449:c_platform_scm",(void*)f_2449},
+{"f_2452:c_platform_scm",(void*)f_2452},
+{"f_2455:c_platform_scm",(void*)f_2455},
+{"f_2458:c_platform_scm",(void*)f_2458},
+{"f_2461:c_platform_scm",(void*)f_2461},
+{"f_2464:c_platform_scm",(void*)f_2464},
+{"f_2467:c_platform_scm",(void*)f_2467},
+{"f_2470:c_platform_scm",(void*)f_2470},
+{"f_2473:c_platform_scm",(void*)f_2473},
+{"f_2476:c_platform_scm",(void*)f_2476},
+{"f_2479:c_platform_scm",(void*)f_2479},
+{"f_2482:c_platform_scm",(void*)f_2482},
+{"f_2485:c_platform_scm",(void*)f_2485},
+{"f_2488:c_platform_scm",(void*)f_2488},
+{"f_2491:c_platform_scm",(void*)f_2491},
+{"f_2494:c_platform_scm",(void*)f_2494},
+{"f_2497:c_platform_scm",(void*)f_2497},
+{"f_2500:c_platform_scm",(void*)f_2500},
+{"f_2503:c_platform_scm",(void*)f_2503},
+{"f_2506:c_platform_scm",(void*)f_2506},
+{"f_2509:c_platform_scm",(void*)f_2509},
+{"f_2512:c_platform_scm",(void*)f_2512},
+{"f_2515:c_platform_scm",(void*)f_2515},
+{"f_2518:c_platform_scm",(void*)f_2518},
+{"f_2521:c_platform_scm",(void*)f_2521},
+{"f_2524:c_platform_scm",(void*)f_2524},
+{"f_2527:c_platform_scm",(void*)f_2527},
+{"f_2530:c_platform_scm",(void*)f_2530},
+{"f_2533:c_platform_scm",(void*)f_2533},
+{"f_2536:c_platform_scm",(void*)f_2536},
+{"f_2539:c_platform_scm",(void*)f_2539},
+{"f_2542:c_platform_scm",(void*)f_2542},
+{"f_2545:c_platform_scm",(void*)f_2545},
+{"f_2548:c_platform_scm",(void*)f_2548},
+{"f_2551:c_platform_scm",(void*)f_2551},
+{"f_2554:c_platform_scm",(void*)f_2554},
+{"f_2557:c_platform_scm",(void*)f_2557},
+{"f_2560:c_platform_scm",(void*)f_2560},
+{"f_2563:c_platform_scm",(void*)f_2563},
+{"f_2566:c_platform_scm",(void*)f_2566},
+{"f_2569:c_platform_scm",(void*)f_2569},
+{"f_2572:c_platform_scm",(void*)f_2572},
+{"f_2575:c_platform_scm",(void*)f_2575},
+{"f_2578:c_platform_scm",(void*)f_2578},
+{"f_2581:c_platform_scm",(void*)f_2581},
+{"f_2584:c_platform_scm",(void*)f_2584},
+{"f_2587:c_platform_scm",(void*)f_2587},
+{"f_2590:c_platform_scm",(void*)f_2590},
+{"f_2593:c_platform_scm",(void*)f_2593},
+{"f_2596:c_platform_scm",(void*)f_2596},
+{"f_2599:c_platform_scm",(void*)f_2599},
+{"f_2602:c_platform_scm",(void*)f_2602},
+{"f_2605:c_platform_scm",(void*)f_2605},
+{"f_2608:c_platform_scm",(void*)f_2608},
+{"f_2611:c_platform_scm",(void*)f_2611},
+{"f_2614:c_platform_scm",(void*)f_2614},
+{"f_2617:c_platform_scm",(void*)f_2617},
+{"f_2620:c_platform_scm",(void*)f_2620},
+{"f_2623:c_platform_scm",(void*)f_2623},
+{"f_2626:c_platform_scm",(void*)f_2626},
+{"f_2629:c_platform_scm",(void*)f_2629},
+{"f_2632:c_platform_scm",(void*)f_2632},
+{"f_2635:c_platform_scm",(void*)f_2635},
+{"f_2638:c_platform_scm",(void*)f_2638},
+{"f_2641:c_platform_scm",(void*)f_2641},
+{"f_2644:c_platform_scm",(void*)f_2644},
+{"f_2647:c_platform_scm",(void*)f_2647},
+{"f_2650:c_platform_scm",(void*)f_2650},
+{"f_2653:c_platform_scm",(void*)f_2653},
+{"f_2656:c_platform_scm",(void*)f_2656},
+{"f_2659:c_platform_scm",(void*)f_2659},
+{"f_2662:c_platform_scm",(void*)f_2662},
+{"f_2665:c_platform_scm",(void*)f_2665},
+{"f_2668:c_platform_scm",(void*)f_2668},
+{"f_2671:c_platform_scm",(void*)f_2671},
+{"f_2674:c_platform_scm",(void*)f_2674},
+{"f_2677:c_platform_scm",(void*)f_2677},
+{"f_2680:c_platform_scm",(void*)f_2680},
+{"f_2683:c_platform_scm",(void*)f_2683},
+{"f_2686:c_platform_scm",(void*)f_2686},
+{"f_2689:c_platform_scm",(void*)f_2689},
+{"f_2692:c_platform_scm",(void*)f_2692},
+{"f_2695:c_platform_scm",(void*)f_2695},
+{"f_2698:c_platform_scm",(void*)f_2698},
+{"f_2701:c_platform_scm",(void*)f_2701},
+{"f_2704:c_platform_scm",(void*)f_2704},
+{"f_2707:c_platform_scm",(void*)f_2707},
+{"f_2710:c_platform_scm",(void*)f_2710},
+{"f_2713:c_platform_scm",(void*)f_2713},
+{"f_2716:c_platform_scm",(void*)f_2716},
+{"f_2719:c_platform_scm",(void*)f_2719},
+{"f_2722:c_platform_scm",(void*)f_2722},
+{"f_2725:c_platform_scm",(void*)f_2725},
+{"f_2728:c_platform_scm",(void*)f_2728},
+{"f_2731:c_platform_scm",(void*)f_2731},
+{"f_2734:c_platform_scm",(void*)f_2734},
+{"f_2737:c_platform_scm",(void*)f_2737},
+{"f_2740:c_platform_scm",(void*)f_2740},
+{"f_2743:c_platform_scm",(void*)f_2743},
+{"f_2746:c_platform_scm",(void*)f_2746},
+{"f_2749:c_platform_scm",(void*)f_2749},
+{"f_2752:c_platform_scm",(void*)f_2752},
+{"f_2755:c_platform_scm",(void*)f_2755},
+{"f_2758:c_platform_scm",(void*)f_2758},
+{"f_2761:c_platform_scm",(void*)f_2761},
+{"f_2764:c_platform_scm",(void*)f_2764},
+{"f_2767:c_platform_scm",(void*)f_2767},
+{"f_2770:c_platform_scm",(void*)f_2770},
+{"f_2773:c_platform_scm",(void*)f_2773},
+{"f_2776:c_platform_scm",(void*)f_2776},
+{"f_2779:c_platform_scm",(void*)f_2779},
+{"f_2782:c_platform_scm",(void*)f_2782},
+{"f_2785:c_platform_scm",(void*)f_2785},
+{"f_2788:c_platform_scm",(void*)f_2788},
+{"f_2791:c_platform_scm",(void*)f_2791},
+{"f_2794:c_platform_scm",(void*)f_2794},
+{"f_2797:c_platform_scm",(void*)f_2797},
+{"f_2800:c_platform_scm",(void*)f_2800},
+{"f_2803:c_platform_scm",(void*)f_2803},
+{"f_2806:c_platform_scm",(void*)f_2806},
+{"f_2809:c_platform_scm",(void*)f_2809},
+{"f_2812:c_platform_scm",(void*)f_2812},
+{"f_2815:c_platform_scm",(void*)f_2815},
+{"f_2818:c_platform_scm",(void*)f_2818},
+{"f_2821:c_platform_scm",(void*)f_2821},
+{"f_2824:c_platform_scm",(void*)f_2824},
+{"f_2827:c_platform_scm",(void*)f_2827},
+{"f_2830:c_platform_scm",(void*)f_2830},
+{"f_2833:c_platform_scm",(void*)f_2833},
+{"f_2836:c_platform_scm",(void*)f_2836},
+{"f_2839:c_platform_scm",(void*)f_2839},
+{"f_2842:c_platform_scm",(void*)f_2842},
+{"f_2845:c_platform_scm",(void*)f_2845},
+{"f_2848:c_platform_scm",(void*)f_2848},
+{"f_2851:c_platform_scm",(void*)f_2851},
+{"f_2854:c_platform_scm",(void*)f_2854},
+{"f_2857:c_platform_scm",(void*)f_2857},
+{"f_2860:c_platform_scm",(void*)f_2860},
+{"f_2863:c_platform_scm",(void*)f_2863},
+{"f_2866:c_platform_scm",(void*)f_2866},
+{"f_2869:c_platform_scm",(void*)f_2869},
+{"f_2872:c_platform_scm",(void*)f_2872},
+{"f_2875:c_platform_scm",(void*)f_2875},
+{"f_2878:c_platform_scm",(void*)f_2878},
+{"f_2881:c_platform_scm",(void*)f_2881},
+{"f_2884:c_platform_scm",(void*)f_2884},
+{"f_2887:c_platform_scm",(void*)f_2887},
+{"f_2890:c_platform_scm",(void*)f_2890},
+{"f_2893:c_platform_scm",(void*)f_2893},
+{"f_2896:c_platform_scm",(void*)f_2896},
+{"f_2899:c_platform_scm",(void*)f_2899},
+{"f_2902:c_platform_scm",(void*)f_2902},
+{"f_2905:c_platform_scm",(void*)f_2905},
+{"f_2908:c_platform_scm",(void*)f_2908},
+{"f_2911:c_platform_scm",(void*)f_2911},
+{"f_2914:c_platform_scm",(void*)f_2914},
+{"f_2917:c_platform_scm",(void*)f_2917},
+{"f_2920:c_platform_scm",(void*)f_2920},
+{"f_2923:c_platform_scm",(void*)f_2923},
+{"f_2926:c_platform_scm",(void*)f_2926},
+{"f_2929:c_platform_scm",(void*)f_2929},
+{"f_2932:c_platform_scm",(void*)f_2932},
+{"f_2935:c_platform_scm",(void*)f_2935},
+{"f_2938:c_platform_scm",(void*)f_2938},
+{"f_2941:c_platform_scm",(void*)f_2941},
+{"f_2944:c_platform_scm",(void*)f_2944},
+{"f_2947:c_platform_scm",(void*)f_2947},
+{"f_2950:c_platform_scm",(void*)f_2950},
+{"f_2953:c_platform_scm",(void*)f_2953},
+{"f_2956:c_platform_scm",(void*)f_2956},
+{"f_2959:c_platform_scm",(void*)f_2959},
+{"f_2962:c_platform_scm",(void*)f_2962},
+{"f_2965:c_platform_scm",(void*)f_2965},
+{"f_2968:c_platform_scm",(void*)f_2968},
+{"f_2971:c_platform_scm",(void*)f_2971},
+{"f_2974:c_platform_scm",(void*)f_2974},
+{"f_2977:c_platform_scm",(void*)f_2977},
+{"f_2980:c_platform_scm",(void*)f_2980},
+{"f_2983:c_platform_scm",(void*)f_2983},
+{"f_2986:c_platform_scm",(void*)f_2986},
+{"f_2989:c_platform_scm",(void*)f_2989},
+{"f_2992:c_platform_scm",(void*)f_2992},
+{"f_2995:c_platform_scm",(void*)f_2995},
+{"f_2998:c_platform_scm",(void*)f_2998},
+{"f_3001:c_platform_scm",(void*)f_3001},
+{"f_3004:c_platform_scm",(void*)f_3004},
+{"f_3007:c_platform_scm",(void*)f_3007},
+{"f_3010:c_platform_scm",(void*)f_3010},
+{"f_3013:c_platform_scm",(void*)f_3013},
+{"f_3016:c_platform_scm",(void*)f_3016},
+{"f_3019:c_platform_scm",(void*)f_3019},
+{"f_3022:c_platform_scm",(void*)f_3022},
+{"f_3025:c_platform_scm",(void*)f_3025},
+{"f_3028:c_platform_scm",(void*)f_3028},
+{"f_3031:c_platform_scm",(void*)f_3031},
+{"f_3034:c_platform_scm",(void*)f_3034},
+{"f_3037:c_platform_scm",(void*)f_3037},
+{"f_3040:c_platform_scm",(void*)f_3040},
+{"f_3043:c_platform_scm",(void*)f_3043},
+{"f_3046:c_platform_scm",(void*)f_3046},
+{"f_3049:c_platform_scm",(void*)f_3049},
+{"f_3052:c_platform_scm",(void*)f_3052},
+{"f_3055:c_platform_scm",(void*)f_3055},
+{"f_3058:c_platform_scm",(void*)f_3058},
+{"f_3061:c_platform_scm",(void*)f_3061},
+{"f_3064:c_platform_scm",(void*)f_3064},
+{"f_3067:c_platform_scm",(void*)f_3067},
+{"f_3070:c_platform_scm",(void*)f_3070},
+{"f_3073:c_platform_scm",(void*)f_3073},
+{"f_3076:c_platform_scm",(void*)f_3076},
+{"f_3079:c_platform_scm",(void*)f_3079},
+{"f_3082:c_platform_scm",(void*)f_3082},
+{"f_3085:c_platform_scm",(void*)f_3085},
+{"f_3088:c_platform_scm",(void*)f_3088},
+{"f_3091:c_platform_scm",(void*)f_3091},
+{"f_3094:c_platform_scm",(void*)f_3094},
+{"f_3097:c_platform_scm",(void*)f_3097},
+{"f_3100:c_platform_scm",(void*)f_3100},
+{"f_3103:c_platform_scm",(void*)f_3103},
+{"f_3106:c_platform_scm",(void*)f_3106},
+{"f_3109:c_platform_scm",(void*)f_3109},
+{"f_3112:c_platform_scm",(void*)f_3112},
+{"f_3115:c_platform_scm",(void*)f_3115},
+{"f_3118:c_platform_scm",(void*)f_3118},
+{"f_3121:c_platform_scm",(void*)f_3121},
+{"f_3124:c_platform_scm",(void*)f_3124},
+{"f_3127:c_platform_scm",(void*)f_3127},
+{"f_3130:c_platform_scm",(void*)f_3130},
+{"f_3133:c_platform_scm",(void*)f_3133},
+{"f_3136:c_platform_scm",(void*)f_3136},
+{"f_3139:c_platform_scm",(void*)f_3139},
+{"f_4065:c_platform_scm",(void*)f_4065},
{"f_4103:c_platform_scm",(void*)f_4103},
-{"f_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_3142:c_platform_scm",(void*)f_3142},
+{"f_3145:c_platform_scm",(void*)f_3145},
+{"f_3148:c_platform_scm",(void*)f_3148},
+{"f_3151:c_platform_scm",(void*)f_3151},
+{"f_3154:c_platform_scm",(void*)f_3154},
+{"f_3157:c_platform_scm",(void*)f_3157},
+{"f_3160:c_platform_scm",(void*)f_3160},
+{"f_3163:c_platform_scm",(void*)f_3163},
+{"f_3166:c_platform_scm",(void*)f_3166},
+{"f_3909:c_platform_scm",(void*)f_3909},
+{"f_4041:c_platform_scm",(void*)f_4041},
+{"f_3985:c_platform_scm",(void*)f_3985},
+{"f_4011:c_platform_scm",(void*)f_4011},
+{"f_3935:c_platform_scm",(void*)f_3935},
+{"f_3169:c_platform_scm",(void*)f_3169},
+{"f_3172:c_platform_scm",(void*)f_3172},
+{"f_3175:c_platform_scm",(void*)f_3175},
+{"f_3178:c_platform_scm",(void*)f_3178},
+{"f_3181:c_platform_scm",(void*)f_3181},
+{"f_3184:c_platform_scm",(void*)f_3184},
+{"f_3187:c_platform_scm",(void*)f_3187},
+{"f_3190:c_platform_scm",(void*)f_3190},
+{"f_3193:c_platform_scm",(void*)f_3193},
+{"f_3196:c_platform_scm",(void*)f_3196},
+{"f_3199:c_platform_scm",(void*)f_3199},
+{"f_3202:c_platform_scm",(void*)f_3202},
+{"f_3205:c_platform_scm",(void*)f_3205},
+{"f_3208:c_platform_scm",(void*)f_3208},
+{"f_3211:c_platform_scm",(void*)f_3211},
+{"f_3214:c_platform_scm",(void*)f_3214},
+{"f_3217:c_platform_scm",(void*)f_3217},
+{"f_3220:c_platform_scm",(void*)f_3220},
+{"f_3223:c_platform_scm",(void*)f_3223},
+{"f_3226:c_platform_scm",(void*)f_3226},
+{"f_3229:c_platform_scm",(void*)f_3229},
+{"f_3232:c_platform_scm",(void*)f_3232},
+{"f_3235:c_platform_scm",(void*)f_3235},
+{"f_3238:c_platform_scm",(void*)f_3238},
+{"f_3241:c_platform_scm",(void*)f_3241},
+{"f_3244:c_platform_scm",(void*)f_3244},
+{"f_3247:c_platform_scm",(void*)f_3247},
+{"f_3250:c_platform_scm",(void*)f_3250},
+{"f_3253:c_platform_scm",(void*)f_3253},
+{"f_3256:c_platform_scm",(void*)f_3256},
+{"f_3259:c_platform_scm",(void*)f_3259},
+{"f_3262:c_platform_scm",(void*)f_3262},
+{"f_3265:c_platform_scm",(void*)f_3265},
+{"f_3268:c_platform_scm",(void*)f_3268},
+{"f_3271:c_platform_scm",(void*)f_3271},
+{"f_3274:c_platform_scm",(void*)f_3274},
+{"f_3277:c_platform_scm",(void*)f_3277},
+{"f_3280:c_platform_scm",(void*)f_3280},
+{"f_3283:c_platform_scm",(void*)f_3283},
+{"f_3286:c_platform_scm",(void*)f_3286},
+{"f_3289:c_platform_scm",(void*)f_3289},
+{"f_3292:c_platform_scm",(void*)f_3292},
+{"f_3295:c_platform_scm",(void*)f_3295},
+{"f_3298:c_platform_scm",(void*)f_3298},
+{"f_3301:c_platform_scm",(void*)f_3301},
+{"f_3304:c_platform_scm",(void*)f_3304},
+{"f_3307:c_platform_scm",(void*)f_3307},
+{"f_3310:c_platform_scm",(void*)f_3310},
+{"f_3313:c_platform_scm",(void*)f_3313},
+{"f_3316:c_platform_scm",(void*)f_3316},
+{"f_3319:c_platform_scm",(void*)f_3319},
+{"f_3322:c_platform_scm",(void*)f_3322},
+{"f_3325:c_platform_scm",(void*)f_3325},
+{"f_3328:c_platform_scm",(void*)f_3328},
+{"f_3331:c_platform_scm",(void*)f_3331},
+{"f_3334:c_platform_scm",(void*)f_3334},
+{"f_3337:c_platform_scm",(void*)f_3337},
+{"f_3340:c_platform_scm",(void*)f_3340},
+{"f_3343:c_platform_scm",(void*)f_3343},
+{"f_3346:c_platform_scm",(void*)f_3346},
+{"f_3349:c_platform_scm",(void*)f_3349},
+{"f_3352:c_platform_scm",(void*)f_3352},
+{"f_3355:c_platform_scm",(void*)f_3355},
+{"f_3358:c_platform_scm",(void*)f_3358},
+{"f_3361:c_platform_scm",(void*)f_3361},
+{"f_3364:c_platform_scm",(void*)f_3364},
+{"f_3367:c_platform_scm",(void*)f_3367},
+{"f_3370:c_platform_scm",(void*)f_3370},
+{"f_3507:c_platform_scm",(void*)f_3507},
+{"f_3510:c_platform_scm",(void*)f_3510},
+{"f_3513:c_platform_scm",(void*)f_3513},
+{"f_3516:c_platform_scm",(void*)f_3516},
{"f_3660:c_platform_scm",(void*)f_3660},
{"f_3663:c_platform_scm",(void*)f_3663},
-{"f_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},
+{"f_3829:c_platform_scm",(void*)f_3829},
+{"f_3859:c_platform_scm",(void*)f_3859},
+{"f_3881:c_platform_scm",(void*)f_3881},
+{"f_3667:c_platform_scm",(void*)f_3667},
+{"f_3670:c_platform_scm",(void*)f_3670},
+{"f_3673:c_platform_scm",(void*)f_3673},
+{"f_3747:c_platform_scm",(void*)f_3747},
+{"f_3801:c_platform_scm",(void*)f_3801},
+{"f_3776:c_platform_scm",(void*)f_3776},
+{"f_3773:c_platform_scm",(void*)f_3773},
+{"f_3676:c_platform_scm",(void*)f_3676},
+{"f_3702:c_platform_scm",(void*)f_3702},
+{"f_3679:c_platform_scm",(void*)f_3679},
+{"f_3682:c_platform_scm",(void*)f_3682},
+{"f_3685:c_platform_scm",(void*)f_3685},
+{"f_3688:c_platform_scm",(void*)f_3688},
+{"f_3691:c_platform_scm",(void*)f_3691},
+{"f_3694:c_platform_scm",(void*)f_3694},
+{"f_3697:c_platform_scm",(void*)f_3697},
+{"f_3700:c_platform_scm",(void*)f_3700},
+{"f_3518:c_platform_scm",(void*)f_3518},
+{"f_3537:c_platform_scm",(void*)f_3537},
+{"f_3554:c_platform_scm",(void*)f_3554},
+{"f_3610:c_platform_scm",(void*)f_3610},
+{"f_3606:c_platform_scm",(void*)f_3606},
+{"f_3602:c_platform_scm",(void*)f_3602},
+{"f_3598:c_platform_scm",(void*)f_3598},
+{"f_3372:c_platform_scm",(void*)f_3372},
+{"f_3394:c_platform_scm",(void*)f_3394},
+{"f_3460:c_platform_scm",(void*)f_3460},
+{"f_3458:c_platform_scm",(void*)f_3458},
+{"f_2046:c_platform_scm",(void*)f_2046},
+{"f_2080:c_platform_scm",(void*)f_2080},
+{"f_2107:c_platform_scm",(void*)f_2107},
+{"f_2110:c_platform_scm",(void*)f_2110},
+{"f_2113:c_platform_scm",(void*)f_2113},
+{"f_2184:c_platform_scm",(void*)f_2184},
+{"f_2180:c_platform_scm",(void*)f_2180},
+{"f_2155:c_platform_scm",(void*)f_2155},
+{"f_2015:c_platform_scm",(void*)f_2015},
+{"f_1851:c_platform_scm",(void*)f_1851},
+{"f_1857:c_platform_scm",(void*)f_1857},
+{"f_1869:c_platform_scm",(void*)f_1869},
+{"f_1958:c_platform_scm",(void*)f_1958},
+{"f_1892:c_platform_scm",(void*)f_1892},
+{"f_1912:c_platform_scm",(void*)f_1912},
+{"f_1889:c_platform_scm",(void*)f_1889},
+{"f_1632:c_platform_scm",(void*)f_1632},
+{"f_1642:c_platform_scm",(void*)f_1642},
+{"f_1787:c_platform_scm",(void*)f_1787},
+{"f_1734:c_platform_scm",(void*)f_1734},
+{"f_1749:c_platform_scm",(void*)f_1749},
+{"f_1731:c_platform_scm",(void*)f_1731},
+{"f_1685:c_platform_scm",(void*)f_1685},
+{"f_1714:c_platform_scm",(void*)f_1714},
+{"f_1679:c_platform_scm",(void*)f_1679},
+{"f_1671:c_platform_scm",(void*)f_1671},
+{"f_1663:c_platform_scm",(void*)f_1663},
+{"f_1434:c_platform_scm",(void*)f_1434},
+{"f_1581:c_platform_scm",(void*)f_1581},
+{"f_1450:c_platform_scm",(void*)f_1450},
+{"f_1459:c_platform_scm",(void*)f_1459},
+{"f_1462:c_platform_scm",(void*)f_1462},
+{"f_1354:c_platform_scm",(void*)f_1354},
+{"f_1356:c_platform_scm",(void*)f_1356},
+{"f_1422:c_platform_scm",(void*)f_1422},
{NULL,NULL}};
#endif
diff --git a/bootstrap/chicken-syntax.c b/bootstrap/chicken-syntax.c
index 7297e743..89a20216 100644
--- a/bootstrap/chicken-syntax.c
+++ b/bootstrap/chicken-syntax.c
@@ -1,9 +1,9 @@
/* 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)
+ 2010-02-22 11:31
+ Version 4.3.5
+ windows-mingw32-x86 [ manyargs dload ptables ]
+ compiled 2010-02-17 on lenovo-1 (MINGW32_NT-6.0)
command line: chicken-syntax.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -explicit-use -no-trace -output-file chicken-syntax.c
unit: chicken_syntax
*/
@@ -12,2196 +12,2215 @@
static C_PTABLE_ENTRY *create_ptable(void);
-static C_TLS C_word lf[244];
+static C_TLS C_word lf[255];
static double C_possibly_force_alignment;
-static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,28),40,97,50,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};
+static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,28),40,97,50,51,57,55,32,102,111,114,109,50,50,48,49,32,114,50,50,48,50,32,99,50,50,48,51,41,0,0,0,0};
+static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,52),40,97,50,52,48,55,32,105,110,112,117,116,50,49,55,48,50,49,56,51,32,114,101,110,97,109,101,50,49,55,57,50,49,56,52,32,99,111,109,112,97,114,101,50,49,54,55,50,49,56,53,41,0,0,0,0};
+static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,52),40,97,50,52,54,51,32,105,110,112,117,116,50,49,49,56,50,49,51,49,32,114,101,110,97,109,101,50,49,50,55,50,49,51,50,32,99,111,109,112,97,114,101,50,49,49,53,50,49,51,51,41,0,0,0,0};
+static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,25),40,97,50,54,50,57,32,120,50,49,48,53,32,114,50,49,48,54,32,99,50,49,48,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,28),40,97,50,54,53,52,32,102,111,114,109,50,48,57,56,32,114,50,48,57,57,32,99,50,49,48,48,41,0,0,0,0};
+static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,28),40,97,50,54,55,54,32,102,111,114,109,50,48,57,48,32,114,50,48,57,49,32,99,50,48,57,50,41,0,0,0,0};
+static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,28),40,97,50,55,49,51,32,102,111,114,109,50,48,55,54,32,114,50,48,55,55,32,99,50,48,55,56,41,0,0,0,0};
+static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,37),40,108,111,111,112,32,115,50,48,51,50,32,100,50,48,51,51,32,99,115,50,48,51,52,32,101,120,112,111,114,116,115,50,48,51,53,41,0,0,0};
+static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,28),40,97,50,56,49,55,32,102,111,114,109,50,48,50,51,32,114,50,48,50,52,32,99,50,48,50,53,41,0,0,0,0};
+static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,47),40,108,111,111,112,32,120,115,49,57,57,56,32,118,97,114,115,49,57,57,57,32,98,115,50,48,48,48,32,118,97,108,115,50,48,48,49,32,114,101,115,116,50,48,48,50,41,0};
+static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,28),40,97,51,48,57,56,32,102,111,114,109,49,57,56,57,32,114,49,57,57,48,32,99,49,57,57,49,41,0,0,0,0};
+static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,40),40,108,111,111,112,32,120,115,49,57,54,50,32,118,97,114,115,49,57,54,51,32,118,97,108,115,49,57,54,52,32,114,101,115,116,49,57,54,53,41};
+static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,28),40,97,51,51,50,57,32,102,111,114,109,49,57,53,51,32,114,49,57,53,52,32,99,49,57,53,53,41,0,0,0,0};
+static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,22),40,108,111,111,112,32,115,108,111,116,115,49,57,50,50,32,105,49,57,50,51,41,0,0};
+static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,7),40,103,49,57,49,53,41,0};
+static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,56,57,57,32,103,49,57,48,57,49,57,49,51,41,0,0,0,0};
+static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,56,55,50,32,103,49,56,56,50,49,56,56,54,41,0,0,0,0};
+static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,28),40,97,51,53,50,57,32,102,111,114,109,49,56,53,51,32,114,49,56,53,52,32,99,49,56,53,53,41,0,0,0,0};
+static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,7),40,103,49,56,48,54,41,0};
+static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,55,57,48,32,103,49,56,48,48,49,56,48,52,41,0,0,0,0};
+static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,20),40,112,97,114,115,101,45,99,108,97,117,115,101,32,99,49,55,54,53,41,0,0,0,0};
+static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,56,50,54,32,103,49,56,51,54,49,56,52,48,41,0,0,0,0};
+static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,28),40,97,52,48,48,48,32,102,111,114,109,49,55,53,48,32,114,49,55,53,49,32,99,49,55,53,50,41,0,0,0,0};
+static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,28),40,97,52,52,50,51,32,102,111,114,109,49,55,51,53,32,114,49,55,51,54,32,99,49,55,51,55,41,0,0,0,0};
+static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,28),40,97,52,54,51,55,32,102,111,114,109,49,55,48,57,32,114,49,55,49,48,32,99,49,55,49,49,41,0,0,0,0};
+static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,49,53,56,51,41,0,0,0,0};
+static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,15),40,103,101,110,118,97,114,115,32,110,49,53,56,49,41,0};
+static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,7),40,97,52,56,57,50,41,0};
+static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,30),40,108,111,111,112,49,54,56,48,32,103,49,54,57,48,49,54,57,53,32,103,49,54,57,49,49,54,57,54,41,0,0};
+static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,27),40,98,117,105,108,100,32,118,97,114,115,50,49,54,53,50,32,118,114,101,115,116,49,54,53,51,41,0,0,0,0,0};
+static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,27),40,97,52,57,48,50,32,118,97,114,115,49,49,54,52,56,32,118,97,114,115,50,49,54,52,57,41,0,0,0,0,0};
+static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,34),40,97,52,56,54,48,32,118,97,114,115,49,54,51,48,32,97,114,103,99,49,54,51,49,32,114,101,115,116,49,54,51,50,41,0,0,0,0,0,0};
+static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,22),40,97,52,56,53,48,32,99,49,54,50,56,32,98,111,100,121,49,54,50,57,41,0,0};
+static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,34),40,97,53,50,50,53,32,118,97,114,115,49,54,48,56,32,97,114,103,99,49,54,48,57,32,114,101,115,116,49,54,49,48,41,0,0,0,0,0,0};
+static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,53,56,57,32,103,49,53,57,57,49,54,48,51,41,0,0,0,0};
+static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,28),40,97,52,55,51,57,32,102,111,114,109,49,53,55,55,32,114,49,53,55,56,32,99,49,53,55,57,41,0,0,0,0};
+static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,27),40,108,111,111,112,32,97,114,103,115,49,53,53,53,32,118,97,114,100,101,102,115,49,53,53,54,41,0,0,0,0,0};
+static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,28),40,97,53,50,56,55,32,102,111,114,109,49,53,51,56,32,114,49,53,51,57,32,99,49,53,52,48,41,0,0,0,0};
+static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,28),40,97,53,54,48,49,32,102,111,114,109,49,53,49,57,32,114,49,53,50,48,32,99,49,53,50,49,41,0,0,0,0};
+static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,58),40,114,101,99,117,114,32,118,97,114,115,49,51,55,49,32,100,101,102,97,117,108,116,101,114,45,110,97,109,101,115,49,51,55,50,32,100,101,102,115,49,51,55,51,32,110,101,120,116,45,103,117,121,49,51,55,52,41,0,0,0,0,0,0};
+static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,72),40,109,97,107,101,45,100,101,102,97,117,108,116,45,112,114,111,99,115,32,118,97,114,115,49,51,54,53,32,98,111,100,121,45,112,114,111,99,49,51,54,54,32,100,101,102,97,117,108,116,101,114,45,110,97,109,101,115,49,51,54,55,32,100,101,102,115,49,51,54,56,41};
+static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,48),40,114,101,99,117,114,32,118,97,114,115,49,51,56,55,32,100,101,102,97,117,108,116,101,114,115,49,51,56,56,32,110,111,110,45,100,101,102,97,117,108,116,115,49,51,56,57,41};
+static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,61),40,109,97,107,101,45,105,102,45,116,114,101,101,32,118,97,114,115,49,51,56,49,32,100,101,102,97,117,108,116,101,114,115,49,51,56,50,32,98,111,100,121,45,112,114,111,99,49,51,56,51,32,114,101,115,116,49,51,56,52,41,0,0,0};
+static C_char C_TLS li43[] C_aligned={C_lihdr(0,0,31),40,112,114,101,102,105,120,45,115,121,109,32,112,114,101,102,105,120,49,52,50,54,32,115,121,109,49,52,50,55,41,0};
+static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,15),40,103,49,52,57,56,32,118,97,114,49,53,48,48,41,0};
+static C_char C_TLS li45[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,52,56,50,32,103,49,52,57,50,49,52,57,54,41,0,0,0,0};
+static C_char C_TLS li46[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,52,53,54,32,103,49,52,54,54,49,52,55,48,41,0,0,0,0};
+static C_char C_TLS li47[] C_aligned={C_lihdr(0,0,13),40,103,49,52,52,55,32,118,49,52,52,57,41,0,0,0};
+static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,52,51,49,32,103,49,52,52,49,49,52,52,53,41,0,0,0,0};
+static C_char C_TLS li49[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,52,48,52,32,103,49,52,49,52,49,52,49,56,41,0,0,0,0};
+static C_char C_TLS li50[] C_aligned={C_lihdr(0,0,28),40,97,53,56,50,54,32,102,111,114,109,49,51,53,52,32,114,49,51,53,53,32,99,49,51,53,54,41,0,0,0,0};
+static C_char C_TLS li51[] C_aligned={C_lihdr(0,0,7),40,103,49,51,51,55,41,0};
+static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,51,50,49,32,103,49,51,51,49,49,51,51,53,41,0,0,0,0};
+static C_char C_TLS li53[] C_aligned={C_lihdr(0,0,20),40,101,120,112,97,110,100,32,99,108,97,117,115,101,115,49,51,48,56,41,0,0,0,0};
+static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,28),40,97,54,52,49,57,32,102,111,114,109,49,50,57,51,32,114,49,50,57,52,32,99,49,50,57,53,41,0,0,0,0};
+static C_char C_TLS li55[] C_aligned={C_lihdr(0,0,13),40,102,111,108,100,32,98,115,49,50,54,53,41,0,0,0};
+static C_char C_TLS li56[] C_aligned={C_lihdr(0,0,28),40,97,54,54,49,57,32,102,111,114,109,49,50,53,55,32,114,49,50,53,56,32,99,49,50,53,57,41,0,0,0,0};
+static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,28),40,113,117,111,116,105,102,121,45,112,114,111,99,32,120,115,49,50,51,51,32,105,100,49,50,51,52,41,0,0,0,0};
+static C_char C_TLS li58[] C_aligned={C_lihdr(0,0,28),40,97,54,55,56,50,32,102,111,114,109,49,50,50,56,32,114,49,50,50,57,32,99,49,50,51,48,41,0,0,0,0};
+static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,28),40,97,54,56,56,55,32,102,111,114,109,49,50,49,56,32,114,49,50,49,57,32,99,49,50,50,48,41,0,0,0,0};
+static C_char C_TLS li60[] C_aligned={C_lihdr(0,0,8),40,108,111,111,107,117,112,41};
+static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,7),40,103,49,50,48,48,41,0};
+static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,56,52,32,103,49,49,57,52,49,49,57,56,41,0,0,0,0};
+static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,54,49,32,103,49,49,55,49,49,49,55,53,41,0,0,0,0};
+static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,14),40,103,49,49,53,50,32,118,98,49,49,53,52,41,0,0};
+static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,51,54,32,103,49,49,52,54,49,49,53,48,41,0,0,0,0};
+static C_char C_TLS li66[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,49,50,32,103,49,49,50,50,49,49,50,54,41,0,0,0,0};
+static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,13),40,103,49,48,57,56,32,118,49,49,48,48,41,0,0,0};
+static C_char C_TLS li68[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,48,56,50,32,103,49,48,57,50,49,48,57,54,41,0,0,0,0};
+static C_char C_TLS li69[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,48,53,55,32,103,49,48,54,55,49,48,55,49,41,0,0,0,0};
+static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,28),40,97,54,57,55,48,32,102,111,114,109,49,48,52,54,32,114,49,48,52,55,32,99,49,48,52,56,41,0,0,0,0};
+static C_char C_TLS li71[] C_aligned={C_lihdr(0,0,20),40,102,111,108,100,32,118,98,105,110,100,105,110,103,115,49,48,51,53,41,0,0,0,0};
+static C_char C_TLS li72[] C_aligned={C_lihdr(0,0,28),40,97,55,51,52,49,32,102,111,114,109,49,48,50,55,32,114,49,48,50,56,32,99,49,48,50,57,41,0,0,0,0};
+static C_char C_TLS li73[] C_aligned={C_lihdr(0,0,20),40,97,112,112,101,110,100,42,32,105,108,56,54,49,32,108,56,54,50,41,0,0,0,0};
+static C_char C_TLS li74[] C_aligned={C_lihdr(0,0,19),40,109,97,112,42,32,112,114,111,99,56,54,51,32,108,56,54,52,41,0,0,0,0,0};
+static C_char C_TLS li75[] C_aligned={C_lihdr(0,0,13),40,108,111,111,107,117,112,32,118,57,51,54,41,0,0,0};
+static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,11),40,103,57,56,51,32,118,57,56,53,41,0,0,0,0,0};
+static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,57,54,55,32,103,57,55,55,57,56,49,41,0,0,0,0,0,0,0};
+static C_char C_TLS li78[] C_aligned={C_lihdr(0,0,35),40,102,111,108,100,32,108,108,105,115,116,115,57,53,50,32,101,120,112,115,57,53,51,32,108,108,105,115,116,115,50,57,53,52,41,0,0,0,0,0};
+static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,48,48,50,32,103,49,48,49,50,49,48,49,54,41,0,0,0,0};
+static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,23),40,108,111,111,112,32,108,108,105,115,116,115,57,51,57,32,97,99,99,57,52,48,41,0};
+static C_char C_TLS li81[] C_aligned={C_lihdr(0,0,11),40,103,57,50,57,32,118,57,51,49,41,0,0,0,0,0};
+static C_char C_TLS li82[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,57,49,51,32,103,57,50,51,57,50,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li83[] C_aligned={C_lihdr(0,0,23),40,108,111,111,112,32,108,108,105,115,116,115,56,57,56,32,97,99,99,56,57,57,41,0};
+static C_char C_TLS li84[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,56,55,53,32,103,56,56,53,56,56,57,41,0,0,0,0,0,0,0};
+static C_char C_TLS li85[] C_aligned={C_lihdr(0,0,25),40,97,55,52,49,51,32,102,111,114,109,56,53,50,32,114,56,53,51,32,99,56,53,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li86[] C_aligned={C_lihdr(0,0,18),40,97,55,57,54,50,32,103,56,52,49,56,52,50,56,52,51,41,0,0,0,0,0,0};
+static C_char C_TLS li87[] C_aligned={C_lihdr(0,0,25),40,97,55,57,51,56,32,102,111,114,109,56,50,56,32,114,56,50,57,32,99,56,51,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li88[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,55,57,54,32,103,56,48,54,56,49,49,32,103,56,48,55,56,49,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li89[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,55,54,57,32,103,55,55,57,55,56,51,41,0,0,0,0,0,0,0};
+static C_char C_TLS li90[] C_aligned={C_lihdr(0,0,25),40,97,55,57,56,48,32,102,111,114,109,55,52,54,32,114,55,52,55,32,99,55,52,56,41,0,0,0,0,0,0,0};
+static C_char C_TLS li91[] C_aligned={C_lihdr(0,0,25),40,97,56,50,48,56,32,102,111,114,109,55,51,56,32,114,55,51,57,32,99,55,52,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,25),40,97,56,50,54,49,32,102,111,114,109,55,51,48,32,114,55,51,49,32,99,55,51,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li93[] C_aligned={C_lihdr(0,0,12),40,103,55,49,56,32,97,50,55,50,49,41,0,0,0,0};
+static C_char C_TLS li94[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,54,57,56,32,103,55,48,56,55,49,51,32,103,55,48,57,55,49,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li95[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,54,55,49,32,103,54,56,49,54,56,54,32,103,54,56,50,54,56,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li96[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,54,52,52,32,103,54,53,52,54,53,57,32,103,54,53,53,54,54,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li97[] C_aligned={C_lihdr(0,0,6),40,103,54,51,50,41,0,0};
+static C_char C_TLS li98[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,54,49,54,32,103,54,50,54,54,51,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li99[] C_aligned={C_lihdr(0,0,6),40,103,54,48,55,41,0,0};
+static C_char C_TLS li100[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,53,57,49,32,103,54,48,49,54,48,53,41,0,0,0,0,0,0,0};
+static C_char C_TLS li101[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,53,54,55,32,103,53,55,55,53,56,49,41,0,0,0,0,0,0,0};
+static C_char C_TLS li102[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,53,52,51,32,103,53,53,51,53,53,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li103[] C_aligned={C_lihdr(0,0,25),40,97,56,51,48,54,32,102,111,114,109,53,51,49,32,114,53,51,50,32,99,53,51,51,41,0,0,0,0,0,0,0};
+static C_char C_TLS li104[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,115,115,53,48,51,41,0,0,0,0};
+static C_char C_TLS li105[] C_aligned={C_lihdr(0,0,25),40,97,56,55,57,50,32,102,111,114,109,52,56,53,32,114,52,56,54,32,99,52,56,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li106[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,52,53,51,32,103,52,54,51,52,54,56,32,103,52,54,52,52,54,57,41,0,0,0,0,0,0,0};
+static C_char C_TLS li107[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,52,50,48,32,103,52,51,48,52,51,53,32,103,52,51,49,52,51,54,41,0,0,0,0,0,0,0};
+static C_char C_TLS li108[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,51,56,55,32,103,51,57,55,52,48,50,32,103,51,57,56,52,48,51,41,0,0,0,0,0,0,0};
+static C_char C_TLS li109[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,51,53,52,32,103,51,54,52,51,54,57,32,103,51,54,53,51,55,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li110[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,51,50,52,32,103,51,51,52,51,51,57,32,103,51,51,53,51,52,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li111[] C_aligned={C_lihdr(0,0,11),40,108,111,111,112,32,110,51,53,48,41,0,0,0,0,0};
+static C_char C_TLS li112[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,50,55,52,32,103,50,56,52,50,56,57,32,103,50,56,53,50,57,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li113[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,51,48,49,32,103,51,49,49,51,49,53,41,0,0,0,0,0,0,0};
+static C_char C_TLS li114[] C_aligned={C_lihdr(0,0,6),40,103,50,54,48,41,0,0};
+static C_char C_TLS li115[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,50,52,52,32,103,50,53,52,50,53,56,41,0,0,0,0,0,0,0};
+static C_char C_TLS li116[] C_aligned={C_lihdr(0,0,6),40,103,50,51,53,41,0,0};
+static C_char C_TLS li117[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,50,49,57,32,103,50,50,57,50,51,51,41,0,0,0,0,0,0,0};
+static C_char C_TLS li118[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,49,57,53,32,103,50,48,53,50,48,57,41,0,0,0,0,0,0,0};
+static C_char C_TLS li119[] C_aligned={C_lihdr(0,0,25),40,97,56,57,49,51,32,102,111,114,109,49,56,54,32,114,49,56,55,32,99,49,56,56,41,0,0,0,0,0,0,0};
+static C_char C_TLS li120[] C_aligned={C_lihdr(0,0,25),40,97,57,53,57,57,32,102,111,114,109,49,54,56,32,114,49,54,57,32,99,49,55,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li121[] C_aligned={C_lihdr(0,0,25),40,97,57,55,51,54,32,102,111,114,109,49,52,54,32,114,49,52,55,32,99,49,52,56,41,0,0,0,0,0,0,0};
+static C_char C_TLS li122[] C_aligned={C_lihdr(0,0,7),40,97,57,56,56,50,41,0};
+static C_char C_TLS li123[] C_aligned={C_lihdr(0,0,22),40,100,111,108,111,111,112,49,51,53,32,120,49,51,57,32,120,115,49,52,48,41,0,0};
+static C_char C_TLS li124[] C_aligned={C_lihdr(0,0,7),40,97,57,56,56,55,41,0};
+static C_char C_TLS li125[] C_aligned={C_lihdr(0,0,7),40,97,57,57,50,48,41,0};
+static C_char C_TLS li126[] C_aligned={C_lihdr(0,0,7),40,97,57,56,55,54,41,0};
+static C_char C_TLS li127[] C_aligned={C_lihdr(0,0,25),40,97,57,56,53,48,32,102,111,114,109,49,49,52,32,114,49,49,53,32,99,49,49,54,41,0,0,0,0,0,0,0};
+static C_char C_TLS li128[] C_aligned={C_lihdr(0,0,25),40,97,57,57,51,57,32,102,111,114,109,49,48,55,32,114,49,48,56,32,99,49,48,57,41,0,0,0,0,0,0,0};
+static C_char C_TLS li129[] C_aligned={C_lihdr(0,0,22),40,97,57,57,53,55,32,102,111,114,109,57,55,32,114,57,56,32,99,57,57,41,0,0};
+static C_char C_TLS li130[] C_aligned={C_lihdr(0,0,23),40,97,49,48,48,53,54,32,102,111,114,109,54,55,32,114,54,56,32,99,54,57,41,0};
+static C_char C_TLS li131[] C_aligned={C_lihdr(0,0,22),40,109,97,112,115,108,111,116,115,32,115,108,111,116,115,52,55,32,105,52,56,41,0,0};
+static C_char C_TLS li132[] C_aligned={C_lihdr(0,0,20),40,97,49,48,49,57,57,32,120,50,57,32,114,51,48,32,99,51,49,41,0,0,0,0};
+static C_char C_TLS li133[] C_aligned={C_lihdr(0,0,22),40,97,49,48,54,52,54,32,102,111,114,109,57,32,114,49,48,32,99,49,49,41,0,0};
+static C_char C_TLS li134[] C_aligned={C_lihdr(0,0,20),40,97,49,48,55,53,52,32,102,111,114,109,49,32,114,50,32,99,51,41,0,0,0,0};
+static C_char C_TLS li135[] C_aligned={C_lihdr(0,0,10),40,116,111,112,108,101,118,101,108,41,0,0,0,0,0,0};
C_noret_decl(C_chicken_syntax_toplevel)
C_externexport void C_ccall C_chicken_syntax_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_2259)
+static void C_ccall f_2259(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2263)
+static void C_ccall f_2263(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10755)
+static void C_ccall f_10755(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10759)
+static void C_ccall f_10759(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10766)
+static void C_ccall f_10766(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10753)
static void C_ccall f_10753(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_2266)
+static void C_ccall f_2266(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10647)
+static void C_ccall f_10647(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10738)
+static void C_ccall f_10738(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10745)
+static void C_ccall f_10745(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10660)
+static void C_ccall f_10660(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10645)
+static void C_ccall f_10645(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2269)
+static void C_ccall f_2269(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10200)
+static void C_ccall f_10200(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10204)
+static void C_ccall f_10204(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10213)
+static void C_ccall f_10213(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10216)
static void C_ccall f_10216(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_10222)
+static void C_ccall f_10222(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10225)
+static void C_ccall f_10225(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10228)
+static void C_ccall f_10228(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10231)
+static void C_ccall f_10231(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10641)
+static void C_ccall f_10641(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10601)
+static void C_ccall f_10601(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10633)
+static void C_ccall f_10633(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10593)
+static void C_ccall f_10593(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10549)
+static void C_ccall f_10549(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10260)
+static void C_fcall f_10260(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10270)
+static void C_ccall f_10270(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10537)
+static void C_ccall f_10537(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10273)
+static void C_ccall f_10273(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10533)
+static void C_ccall f_10533(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10276)
+static void C_ccall f_10276(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10323)
+static void C_fcall f_10323(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10287)
+static void C_ccall f_10287(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10258)
+static void C_ccall f_10258(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10254)
+static void C_ccall f_10254(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10198)
+static void C_ccall f_10198(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2272)
+static void C_ccall f_2272(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10057)
+static void C_ccall f_10057(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10061)
+static void C_ccall f_10061(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10064)
+static void C_ccall f_10064(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10067)
+static void C_ccall f_10067(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10103)
+static void C_ccall f_10103(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10118)
+static void C_fcall f_10118(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10172)
+static void C_ccall f_10172(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10133)
+static void C_ccall f_10133(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10096)
+static void C_ccall f_10096(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10055)
+static void C_ccall f_10055(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2275)
+static void C_ccall f_2275(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9958)
+static void C_ccall f_9958(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_9962)
+static void C_ccall f_9962(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9965)
+static void C_ccall f_9965(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9968)
+static void C_ccall f_9968(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10047)
static void C_ccall f_10047(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_9956)
+static void C_ccall f_9956(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2278)
+static void C_ccall f_2278(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9940)
+static void C_ccall f_9940(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_9948)
+static void C_ccall f_9948(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9938)
+static void C_ccall f_9938(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2281)
+static void C_ccall f_2281(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9851)
+static void C_ccall f_9851(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_9855)
static void C_ccall f_9855(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_9858)
+static void C_ccall f_9858(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9861)
+static void C_ccall f_9861(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9927)
+static void C_ccall f_9927(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9864)
+static void C_ccall f_9864(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9877)
+static void C_ccall f_9877(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9921)
+static void C_ccall f_9921(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9888)
+static void C_ccall f_9888(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9896)
+static void C_ccall f_9896(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9898)
+static void C_fcall f_9898(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9915)
+static void C_ccall f_9915(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9883)
+static void C_ccall f_9883(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9875)
+static void C_ccall f_9875(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9871)
+static void C_ccall f_9871(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9849)
+static void C_ccall f_9849(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2284)
+static void C_ccall f_2284(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9737)
+static void C_ccall f_9737(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_9741)
+static void C_ccall f_9741(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9750)
+static void C_ccall f_9750(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9753)
+static void C_ccall f_9753(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9756)
+static void C_fcall f_9756(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9816)
+static void C_ccall f_9816(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9791)
+static void C_ccall f_9791(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9735)
+static void C_ccall f_9735(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2287)
+static void C_ccall f_2287(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9600)
+static void C_ccall f_9600(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_9604)
+static void C_ccall f_9604(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9616)
+static void C_ccall f_9616(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9619)
+static void C_ccall f_9619(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9622)
+static void C_ccall f_9622(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9669)
+static void C_ccall f_9669(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9598)
+static void C_ccall f_9598(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2290)
+static void C_ccall f_2290(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8914)
+static void C_ccall f_8914(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_8918)
+static void C_ccall f_8918(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9561)
+static void C_fcall f_9561(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9590)
+static void C_ccall f_9590(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8927)
+static void C_ccall f_8927(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9517)
+static void C_fcall f_9517(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9555)
+static void C_ccall f_9555(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9544)
+static void C_fcall f_9544(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9552)
+static void C_ccall f_9552(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8930)
+static void C_ccall f_8930(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9473)
+static void C_fcall f_9473(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9511)
+static void C_ccall f_9511(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9500)
+static void C_fcall f_9500(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9508)
+static void C_ccall f_9508(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8933)
+static void C_ccall f_8933(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8936)
+static void C_ccall f_8936(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8939)
+static void C_ccall f_8939(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9438)
+static void C_fcall f_9438(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9467)
+static void C_ccall f_9467(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9387)
+static void C_ccall f_9387(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9389)
+static void C_fcall f_9389(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9422)
static void C_ccall f_9422(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_9402)
+static void C_fcall f_9402(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9298)
+static void C_ccall f_9298(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9365)
+static void C_fcall f_9365(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9379)
+static void C_ccall f_9379(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9310)
+static void C_ccall f_9310(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9312)
+static void C_fcall f_9312(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9345)
+static void C_ccall f_9345(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9325)
+static void C_fcall f_9325(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9306)
+static void C_ccall f_9306(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9302)
+static void C_ccall f_9302(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8950)
+static void C_ccall f_8950(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9234)
+static void C_fcall f_9234(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9247)
+static void C_fcall f_9247(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9154)
+static void C_ccall f_9154(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9172)
+static void C_fcall f_9172(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9185)
+static void C_fcall f_9185(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9162)
+static void C_ccall f_9162(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9158)
+static void C_ccall f_9158(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9150)
+static void C_ccall f_9150(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9142)
+static void C_ccall f_9142(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9074)
+static void C_fcall f_9074(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9087)
+static void C_fcall f_9087(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8994)
+static void C_ccall f_8994(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9012)
+static void C_fcall f_9012(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9025)
+static void C_fcall f_9025(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9002)
+static void C_ccall f_9002(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_8998)
static void C_ccall f_8998(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_8990)
+static void C_ccall f_8990(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8912)
+static void C_ccall f_8912(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2293)
+static void C_ccall f_2293(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8793)
+static void C_ccall f_8793(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_8797)
+static void C_ccall f_8797(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8803)
+static void C_ccall f_8803(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8904)
+static void C_ccall f_8904(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8809)
+static void C_ccall f_8809(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8812)
+static void C_ccall f_8812(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8815)
+static void C_ccall f_8815(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8855)
+static void C_fcall f_8855(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8878)
+static void C_ccall f_8878(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8885)
+static void C_ccall f_8885(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8892)
+static void C_ccall f_8892(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_8868)
static void C_ccall f_8868(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_8818)
+static void C_ccall f_8818(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8791)
+static void C_ccall f_8791(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2296)
+static void C_ccall f_2296(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8307)
+static void C_ccall f_8307(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_8311)
+static void C_ccall f_8311(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8320)
+static void C_ccall f_8320(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8323)
+static void C_ccall f_8323(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8326)
+static void C_ccall f_8326(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8754)
+static void C_fcall f_8754(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8783)
+static void C_ccall f_8783(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8329)
+static void C_ccall f_8329(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8719)
+static void C_fcall f_8719(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8748)
+static void C_ccall f_8748(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8332)
+static void C_ccall f_8332(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8675)
+static void C_fcall f_8675(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8713)
+static void C_ccall f_8713(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_8702)
-static void C_fcall f_8702(C_word t0,C_word t1,C_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;
+static void C_fcall f_8702(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8710)
+static void C_ccall f_8710(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8335)
+static void C_ccall f_8335(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8631)
+static void C_fcall f_8631(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8669)
+static void C_ccall f_8669(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8658)
+static void C_fcall f_8658(C_word t0,C_word t1) C_noret;
C_noret_decl(f_8666)
-static void C_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;
+static void C_ccall f_8666(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8338)
+static void C_ccall f_8338(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8582)
+static void C_fcall f_8582(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8615)
+static void C_ccall f_8615(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8595)
+static void C_fcall f_8595(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8527)
+static void C_ccall f_8527(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8533)
+static void C_fcall f_8533(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8566)
+static void C_ccall f_8566(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8546)
+static void C_fcall f_8546(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8531)
+static void C_ccall f_8531(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8349)
+static void C_ccall f_8349(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8423)
+static void C_fcall f_8423(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8436)
+static void C_fcall f_8436(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8454)
+static C_word C_fcall f_8454(C_word *a,C_word t0,C_word t1,C_word t2);
+C_noret_decl(f_8421)
+static void C_ccall f_8421(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_8417)
static void C_ccall f_8417(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_8397)
+static void C_ccall f_8397(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8305)
+static void C_ccall f_8305(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2299)
+static void C_ccall f_2299(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8262)
+static void C_ccall f_8262(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_8266)
+static void C_ccall f_8266(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8273)
+static void C_ccall f_8273(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8293)
+static void C_ccall f_8293(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8297)
+static void C_ccall f_8297(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8260)
+static void C_ccall f_8260(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2302)
+static void C_ccall f_2302(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8209)
+static void C_ccall f_8209(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_8213)
+static void C_ccall f_8213(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8220)
+static void C_ccall f_8220(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8248)
+static void C_ccall f_8248(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8252)
+static void C_ccall f_8252(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8207)
+static void C_ccall f_8207(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2305)
+static void C_ccall f_2305(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7981)
+static void C_ccall f_7981(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7985)
+static void C_ccall f_7985(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7994)
+static void C_ccall f_7994(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8166)
+static void C_fcall f_8166(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8195)
+static void C_ccall f_8195(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_8063)
static void C_ccall f_8063(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_8096)
+static void C_fcall f_8096(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8109)
+static void C_fcall f_8109(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8094)
+static void C_ccall f_8094(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8090)
+static void C_ccall f_8090(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7979)
+static void C_ccall f_7979(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2308)
+static void C_ccall f_2308(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7939)
+static void C_ccall f_7939(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7943)
+static void C_ccall f_7943(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7963)
+static void C_ccall f_7963(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_7971)
static void C_ccall f_7971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7946)
+static void C_ccall f_7946(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7953)
+static void C_ccall f_7953(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7957)
+static void C_ccall f_7957(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7937)
+static void C_ccall f_7937(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2311)
+static void C_ccall f_2311(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7414)
+static void C_ccall f_7414(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7418)
+static void C_ccall f_7418(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7427)
+static void C_ccall f_7427(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7430)
+static void C_ccall f_7430(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7900)
+static void C_fcall f_7900(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7929)
+static void C_ccall f_7929(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7505)
+static void C_ccall f_7505(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7860)
+static void C_fcall f_7860(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7873)
+static void C_ccall f_7873(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7508)
+static void C_ccall f_7508(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7812)
+static void C_fcall f_7812(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7854)
+static void C_ccall f_7854(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7839)
+static void C_fcall f_7839(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7851)
+static void C_ccall f_7851(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7847)
+static void C_ccall f_7847(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7511)
+static void C_ccall f_7511(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7766)
+static void C_fcall f_7766(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7799)
+static void C_ccall f_7799(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7806)
static void C_ccall f_7806(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7523)
+static void C_ccall f_7523(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7726)
+static void C_fcall f_7726(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7530)
+static void C_ccall f_7530(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7532)
-static void C_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;
+static void C_fcall f_7532(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7720)
+static void C_ccall f_7720(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7604)
+static void C_fcall f_7604(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7686)
+static void C_ccall f_7686(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7643)
+static void C_ccall f_7643(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7623)
+static void C_ccall f_7623(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7556)
+static void C_fcall f_7556(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7594)
+static void C_ccall f_7594(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7583)
+static void C_fcall f_7583(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7591)
+static void C_ccall f_7591(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7550)
+static void C_ccall f_7550(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7554)
+static void C_ccall f_7554(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7512)
+static void C_ccall f_7512(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7463)
+static void C_fcall f_7463(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7486)
+static void C_ccall f_7486(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7490)
+static void C_ccall f_7490(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7432)
+static void C_fcall f_7432(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7453)
+static void C_ccall f_7453(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7412)
+static void C_ccall f_7412(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2314)
+static void C_ccall f_2314(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7342)
+static void C_ccall f_7342(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7346)
+static void C_ccall f_7346(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7355)
+static void C_ccall f_7355(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7358)
+static void C_ccall f_7358(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7363)
+static void C_fcall f_7363(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7400)
+static void C_ccall f_7400(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7381)
+static void C_ccall f_7381(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7340)
+static void C_ccall f_7340(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2317)
+static void C_ccall f_2317(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6971)
+static void C_ccall f_6971(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6975)
+static void C_ccall f_6975(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6984)
+static void C_ccall f_6984(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6987)
+static void C_ccall f_6987(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7298)
+static void C_fcall f_7298(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7296)
+static void C_ccall f_7296(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_6990)
static void C_ccall f_6990(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7246)
+static void C_fcall f_7246(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7288)
+static void C_ccall f_7288(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7273)
+static void C_fcall f_7273(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7285)
+static void C_ccall f_7285(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7281)
+static void C_ccall f_7281(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6993)
+static void C_ccall f_6993(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7206)
+static void C_fcall f_7206(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7013)
+static void C_ccall f_7013(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7027)
+static void C_fcall f_7027(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7200)
+static void C_ccall f_7200(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7054)
+static void C_fcall f_7054(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7152)
+static void C_fcall f_7152(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7082)
+static void C_ccall f_7082(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7096)
+static void C_fcall f_7096(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7123)
+static C_word C_fcall f_7123(C_word *a,C_word t0,C_word t1);
+C_noret_decl(f_7090)
+static void C_ccall f_7090(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7086)
+static void C_ccall f_7086(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7021)
+static void C_ccall f_7021(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7025)
+static void C_ccall f_7025(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7017)
+static void C_ccall f_7017(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6994)
+static C_word C_fcall f_6994(C_word t0,C_word t1);
+C_noret_decl(f_6969)
+static void C_ccall f_6969(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2320)
+static void C_ccall f_2320(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6965)
+static void C_ccall f_6965(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6888)
+static void C_ccall f_6888(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6892)
+static void C_ccall f_6892(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6895)
+static void C_ccall f_6895(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6898)
+static void C_ccall f_6898(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6933)
+static void C_ccall f_6933(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6886)
+static void C_ccall f_6886(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2323)
+static void C_ccall f_2323(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6783)
+static void C_ccall f_6783(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6787)
+static void C_ccall f_6787(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6874)
+static void C_ccall f_6874(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6870)
+static void C_ccall f_6870(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6789)
+static void C_fcall f_6789(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6793)
+static void C_ccall f_6793(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6850)
+static void C_ccall f_6850(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6802)
+static void C_fcall f_6802(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6824)
+static void C_ccall f_6824(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6814)
+static void C_fcall f_6814(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6805)
+static void C_ccall f_6805(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6781)
+static void C_ccall f_6781(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2326)
+static void C_ccall f_2326(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6620)
+static void C_ccall f_6620(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6624)
+static void C_ccall f_6624(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6633)
+static void C_ccall f_6633(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6636)
+static void C_ccall f_6636(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6641)
+static void C_fcall f_6641(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6686)
+static void C_ccall f_6686(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_6753)
static void C_ccall f_6753(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_6715)
+static void C_ccall f_6715(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6655)
+static void C_ccall f_6655(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6659)
+static void C_ccall f_6659(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6618)
+static void C_ccall f_6618(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2329)
+static void C_ccall f_2329(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6420)
+static void C_ccall f_6420(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6424)
+static void C_ccall f_6424(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6433)
+static void C_ccall f_6433(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6436)
+static void C_ccall f_6436(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6439)
+static void C_ccall f_6439(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6442)
+static void C_ccall f_6442(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6445)
+static void C_ccall f_6445(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6452)
+static void C_ccall f_6452(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6470)
+static void C_fcall f_6470(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6486)
+static void C_ccall f_6486(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6492)
+static void C_ccall f_6492(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6552)
+static void C_fcall f_6552(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6579)
+static C_word C_fcall f_6579(C_word *a,C_word t0,C_word t1);
+C_noret_decl(f_6546)
+static void C_ccall f_6546(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6542)
+static void C_ccall f_6542(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_6534)
static void C_ccall f_6534(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_6530)
static void C_ccall f_6530(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_6499)
+static void C_ccall f_6499(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6468)
+static void C_ccall f_6468(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6418)
+static void C_ccall f_6418(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2332)
+static void C_ccall f_2332(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6414)
+static void C_ccall f_6414(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6410)
+static void C_ccall f_6410(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5827)
+static void C_ccall f_5827(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_5831)
+static void C_ccall f_5831(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5843)
+static void C_ccall f_5843(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5846)
+static void C_ccall f_5846(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5849)
+static void C_ccall f_5849(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6149)
+static void C_ccall f_6149(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6152)
+static void C_ccall f_6152(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6361)
+static void C_fcall f_6361(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6390)
+static void C_ccall f_6390(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6155)
+static void C_ccall f_6155(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6317)
+static void C_fcall f_6317(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6355)
+static void C_ccall f_6355(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6344)
+static void C_fcall f_6344(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6352)
+static void C_ccall f_6352(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6171)
+static void C_ccall f_6171(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6282)
+static void C_fcall f_6282(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6311)
+static void C_ccall f_6311(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6174)
+static void C_ccall f_6174(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6177)
+static void C_ccall f_6177(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6180)
+static void C_ccall f_6180(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6238)
+static void C_fcall f_6238(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_6276)
-static void C_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;
+static void C_ccall f_6276(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6265)
+static void C_fcall f_6265(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6273)
+static void C_ccall f_6273(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6183)
+static void C_ccall f_6183(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6186)
+static void C_ccall f_6186(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6189)
+static void C_ccall f_6189(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6196)
+static void C_ccall f_6196(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6156)
+static void C_fcall f_6156(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6168)
+static void C_ccall f_6168(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6164)
+static void C_ccall f_6164(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5948)
+static void C_fcall f_5948(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_5954)
+static void C_fcall f_5954(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6142)
+static void C_ccall f_6142(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6130)
+static void C_ccall f_6130(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6114)
+static void C_ccall f_6114(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6078)
+static void C_ccall f_6078(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6028)
+static void C_ccall f_6028(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6016)
+static void C_ccall f_6016(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5851)
+static void C_fcall f_5851(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_5859)
+static void C_ccall f_5859(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5863)
+static void C_ccall f_5863(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5867)
+static void C_ccall f_5867(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5869)
+static void C_fcall f_5869(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_5922)
+static void C_ccall f_5922(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5938)
+static void C_ccall f_5938(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5934)
+static void C_ccall f_5934(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5890)
+static void C_ccall f_5890(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5825)
+static void C_ccall f_5825(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2335)
+static void C_ccall f_2335(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5817)
+static void C_ccall f_5817(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5813)
+static void C_ccall f_5813(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5809)
+static void C_ccall f_5809(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5602)
+static void C_ccall f_5602(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_5606)
+static void C_ccall f_5606(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5609)
+static void C_ccall f_5609(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5612)
+static void C_ccall f_5612(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5619)
+static void C_ccall f_5619(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5769)
+static void C_ccall f_5769(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5654)
+static void C_ccall f_5654(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5730)
+static void C_ccall f_5730(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5742)
+static void C_ccall f_5742(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5714)
+static void C_ccall f_5714(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5600)
+static void C_ccall f_5600(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2338)
+static void C_ccall f_2338(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5592)
+static void C_ccall f_5592(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5288)
+static void C_ccall f_5288(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_5292)
+static void C_ccall f_5292(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5304)
+static void C_ccall f_5304(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5307)
+static void C_ccall f_5307(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5310)
+static void C_ccall f_5310(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5313)
+static void C_ccall f_5313(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5316)
+static void C_ccall f_5316(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5319)
+static void C_ccall f_5319(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5340)
+static void C_fcall f_5340(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5568)
+static void C_ccall f_5568(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5430)
static void C_ccall f_5430(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_5449)
+static void C_ccall f_5449(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5406)
static void C_ccall f_5406(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_5338)
+static void C_ccall f_5338(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5286)
+static void C_ccall f_5286(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2341)
+static void C_ccall f_2341(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5278)
+static void C_ccall f_5278(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5274)
+static void C_ccall f_5274(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5270)
+static void C_ccall f_5270(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5266)
+static void C_ccall f_5266(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4740)
+static void C_ccall f_4740(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_4744)
+static void C_ccall f_4744(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4781)
+static void C_ccall f_4781(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5189)
+static void C_fcall f_5189(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5226)
+static void C_ccall f_5226(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_5230)
+static void C_ccall f_5230(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5183)
+static void C_ccall f_5183(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4784)
+static void C_ccall f_4784(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4787)
+static void C_ccall f_4787(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4790)
+static void C_ccall f_4790(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4793)
+static void C_ccall f_4793(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4796)
+static void C_ccall f_4796(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4799)
+static void C_ccall f_4799(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4802)
+static void C_ccall f_4802(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4805)
+static void C_ccall f_4805(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4808)
+static void C_ccall f_4808(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4811)
+static void C_ccall f_4811(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4814)
+static void C_ccall f_4814(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4825)
+static void C_ccall f_4825(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4851)
+static void C_ccall f_4851(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4861)
+static void C_ccall f_4861(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_4865)
+static void C_ccall f_4865(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4879)
+static void C_fcall f_4879(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4903)
+static void C_ccall f_4903(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4979)
+static void C_fcall f_4979(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5127)
+static void C_ccall f_5127(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5047)
+static void C_ccall f_5047(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5066)
+static void C_ccall f_5066(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5036)
+static void C_ccall f_5036(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5004)
+static void C_ccall f_5004(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4907)
static void C_ccall f_4907(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_4930)
+static void C_fcall f_4930(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4963)
+static void C_ccall f_4963(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4943)
+static void C_fcall f_4943(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4924)
+static void C_ccall f_4924(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4893)
+static void C_ccall f_4893(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4901)
+static void C_ccall f_4901(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4887)
+static void C_ccall f_4887(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4849)
+static void C_ccall f_4849(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4746)
+static void C_fcall f_4746(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_4752)
-static void C_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;
+static void C_fcall f_4752(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4778)
+static void C_ccall f_4778(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4766)
+static void C_ccall f_4766(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4770)
+static void C_ccall f_4770(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4738)
+static void C_ccall f_4738(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2344)
+static void C_ccall f_2344(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4638)
+static void C_ccall f_4638(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_4642)
+static void C_ccall f_4642(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4707)
+static void C_ccall f_4707(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4722)
+static void C_ccall f_4722(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4657)
+static void C_ccall f_4657(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4680)
+static void C_ccall f_4680(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4692)
+static void C_ccall f_4692(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4636)
+static void C_ccall f_4636(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2347)
+static void C_ccall f_2347(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4632)
+static void C_ccall f_4632(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4628)
+static void C_ccall f_4628(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4424)
+static void C_ccall f_4424(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_4428)
+static void C_ccall f_4428(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4431)
+static void C_ccall f_4431(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4434)
+static void C_ccall f_4434(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4437)
+static void C_ccall f_4437(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4448)
+static void C_ccall f_4448(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4476)
+static void C_ccall f_4476(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4568)
static void C_ccall f_4568(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_4422)
+static void C_ccall f_4422(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2350)
+static void C_ccall f_2350(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4414)
+static void C_ccall f_4414(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4410)
+static void C_ccall f_4410(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4001)
+static void C_ccall f_4001(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_4005)
+static void C_ccall f_4005(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4008)
+static void C_ccall f_4008(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4011)
+static void C_ccall f_4011(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4014)
+static void C_ccall f_4014(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4017)
+static void C_ccall f_4017(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4020)
+static void C_ccall f_4020(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4023)
+static void C_ccall f_4023(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4026)
+static void C_ccall f_4026(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4235)
+static void C_ccall f_4235(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4275)
+static void C_ccall f_4275(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4309)
+static void C_fcall f_4309(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4338)
+static void C_ccall f_4338(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4283)
+static void C_ccall f_4283(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4279)
+static void C_ccall f_4279(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4028)
+static void C_fcall f_4028(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4152)
+static void C_fcall f_4152(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4179)
+static C_word C_fcall f_4179(C_word *a,C_word t0,C_word t1);
+C_noret_decl(f_4150)
+static void C_ccall f_4150(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4146)
static void C_ccall f_4146(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_4138)
+static void C_ccall f_4138(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4119)
static void C_ccall f_4119(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_4089)
+static void C_ccall f_4089(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4070)
+static void C_ccall f_4070(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3999)
+static void C_ccall f_3999(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2353)
+static void C_ccall f_2353(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3530)
+static void C_ccall f_3530(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3534)
+static void C_ccall f_3534(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3549)
+static void C_ccall f_3549(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3552)
+static void C_ccall f_3552(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3555)
+static void C_ccall f_3555(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3558)
+static void C_ccall f_3558(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3561)
+static void C_ccall f_3561(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3567)
+static void C_ccall f_3567(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3570)
+static void C_ccall f_3570(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3938)
+static void C_fcall f_3938(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3967)
+static void C_ccall f_3967(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3573)
+static void C_ccall f_3573(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3891)
+static void C_fcall f_3891(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3918)
+static C_word C_fcall f_3918(C_word t0,C_word t1);
+C_noret_decl(f_3889)
+static void C_ccall f_3889(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3885)
+static void C_ccall f_3885(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3602)
+static void C_fcall f_3602(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3628)
+static void C_fcall f_3628(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3664)
+static void C_fcall f_3664(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3644)
+static void C_ccall f_3644(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3640)
static void C_ccall f_3640(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_3596)
+static void C_ccall f_3596(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3528)
+static void C_ccall f_3528(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2356)
+static void C_ccall f_2356(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3520)
+static void C_ccall f_3520(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3330)
+static void C_ccall f_3330(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3334)
+static void C_ccall f_3334(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3337)
+static void C_ccall f_3337(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3340)
+static void C_ccall f_3340(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3343)
+static void C_ccall f_3343(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3346)
+static void C_ccall f_3346(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3355)
+static void C_fcall f_3355(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_3458)
+static void C_ccall f_3458(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3486)
+static void C_ccall f_3486(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3480)
+static void C_ccall f_3480(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3461)
+static void C_ccall f_3461(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3365)
+static void C_ccall f_3365(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3368)
+static void C_ccall f_3368(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3440)
static void C_ccall f_3440(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_3417)
+static void C_ccall f_3417(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3374)
+static void C_ccall f_3374(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3385)
static void C_ccall f_3385(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_3405)
+static void C_ccall f_3405(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3328)
+static void C_ccall f_3328(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2359)
+static void C_ccall f_2359(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3320)
+static void C_ccall f_3320(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3099)
+static void C_ccall f_3099(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3103)
+static void C_ccall f_3103(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3106)
+static void C_ccall f_3106(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3109)
+static void C_ccall f_3109(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3112)
-static void C_fcall f_3112(C_word t0,C_word t1) C_noret;
+static void C_ccall f_3112(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3115)
static void C_ccall f_3115(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3124)
-static void C_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;
+static void C_fcall f_3124(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
+C_noret_decl(f_3243)
+static void C_ccall f_3243(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3271)
+static void C_ccall f_3271(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3304)
+static void C_ccall f_3304(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3277)
+static void C_ccall f_3277(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3265)
+static void C_ccall f_3265(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3246)
+static void C_ccall f_3246(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3134)
+static void C_ccall f_3134(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3137)
+static void C_ccall f_3137(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3233)
+static void C_ccall f_3233(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3198)
+static void C_ccall f_3198(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3143)
static void C_ccall f_3143(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_3166)
+static void C_ccall f_3166(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3186)
+static void C_ccall f_3186(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3097)
+static void C_ccall f_3097(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2362)
+static void C_ccall f_2362(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2818)
+static void C_ccall f_2818(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2822)
+static void C_ccall f_2822(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2825)
+static void C_ccall f_2825(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2828)
+static void C_ccall f_2828(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2831)
+static void C_ccall f_2831(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2834)
-static void C_ccall f_2834(C_word c,C_word t0,C_word t1,C_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;
+static void C_ccall f_2834(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2837)
+static void C_ccall f_2837(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2846)
+static void C_fcall f_2846(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_2992)
+static void C_fcall f_2992(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2995)
+static void C_ccall f_2995(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3004)
+static void C_ccall f_3004(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3029)
+static void C_ccall f_3029(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3054)
+static void C_ccall f_3054(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3076)
+static void C_ccall f_3076(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f11150)
+static void C_ccall f11150(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f11146)
+static void C_ccall f11146(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3061)
+static void C_ccall f_3061(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3048)
+static void C_ccall f_3048(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3044)
+static void C_ccall f_3044(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3023)
+static void C_ccall f_3023(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3019)
+static void C_ccall f_3019(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2986)
+static void C_ccall f_2986(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2856)
+static void C_fcall f_2856(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2863)
+static void C_ccall f_2863(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2971)
+static void C_ccall f_2971(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2959)
+static void C_ccall f_2959(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2955)
+static void C_ccall f_2955(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2891)
+static void C_ccall f_2891(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2919)
+static void C_ccall f_2919(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2931)
+static void C_ccall f_2931(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2915)
+static void C_ccall f_2915(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2816)
+static void C_ccall f_2816(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2365)
+static void C_ccall f_2365(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2714)
+static void C_ccall f_2714(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2718)
+static void C_ccall f_2718(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2724)
+static void C_ccall f_2724(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2808)
static void C_ccall f_2808(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_2769)
+static void C_ccall f_2769(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2781)
+static void C_ccall f_2781(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2712)
+static void C_ccall f_2712(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2368)
+static void C_ccall f_2368(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2677)
+static void C_ccall f_2677(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2681)
+static void C_ccall f_2681(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2688)
+static void C_ccall f_2688(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2700)
-static void C_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;
+static void C_ccall f_2700(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2704)
+static void C_ccall f_2704(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2675)
+static void C_ccall f_2675(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2371)
+static void C_ccall f_2371(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2655)
+static void C_ccall f_2655(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2663)
+static void C_ccall f_2663(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2667)
+static void C_ccall f_2667(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2653)
+static void C_ccall f_2653(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2374)
+static void C_ccall f_2374(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2630)
+static void C_ccall f_2630(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2634)
+static void C_ccall f_2634(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2628)
+static void C_ccall f_2628(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2377)
+static void C_ccall f_2377(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2464)
+static void C_ccall f_2464(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2474)
+static void C_fcall f_2474(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2498)
+static void C_ccall f_2498(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2548)
+static void C_fcall f_2548(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2561)
+static void C_ccall f_2561(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2514)
+static void C_ccall f_2514(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2530)
+static void C_ccall f_2530(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2484)
+static void C_ccall f_2484(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2462)
+static void C_ccall f_2462(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2380)
+static void C_ccall f_2380(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2408)
+static void C_ccall f_2408(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2447)
+static void C_ccall f_2447(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2418)
+static void C_ccall f_2418(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2431)
+static void C_ccall f_2431(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2406)
static void C_ccall f_2406(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_noret_decl(f_2383)
+static void C_ccall f_2383(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2398)
+static void C_ccall f_2398(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2396)
+static void C_ccall f_2396(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2386)
+static void C_ccall f_2386(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2389)
+static void C_ccall f_2389(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2392)
+static void C_ccall f_2392(C_word c,C_word t0,C_word t1) C_noret;
+
+C_noret_decl(trf_10260)
+static void C_fcall trf_10260(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10260(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_10380(t0,t1,t2,t3);}
+f_10260(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_noret_decl(trf_10323)
+static void C_fcall trf_10323(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10323(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_10443(t0,t1);}
+f_10323(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_noret_decl(trf_10118)
+static void C_fcall trf_10118(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10118(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_10238(t0,t1);}
+f_10118(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_noret_decl(trf_9898)
+static void C_fcall trf_9898(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9898(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_10018(t0,t1,t2,t3);}
+f_9898(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_noret_decl(trf_9756)
+static void C_fcall trf_9756(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9756(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9876(t0,t1);}
+f_9756(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_noret_decl(trf_9561)
+static void C_fcall trf_9561(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9561(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_9681(t0,t1,t2);}
+f_9561(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_noret_decl(trf_9517)
+static void C_fcall trf_9517(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9517(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_9637(t0,t1,t2);}
+f_9517(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_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_9664(t0,t1);}
+f_9544(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_noret_decl(trf_9473)
+static void C_fcall trf_9473(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9473(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_9593(t0,t1,t2);}
+f_9473(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_noret_decl(trf_9500)
+static void C_fcall trf_9500(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9500(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9620(t0,t1);}
+f_9500(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_noret_decl(trf_9438)
+static void C_fcall trf_9438(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9438(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_9558(t0,t1,t2);}
+f_9438(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_noret_decl(trf_9389)
+static void C_fcall trf_9389(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9389(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_9509(t0,t1,t2,t3);}
+f_9389(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_noret_decl(trf_9402)
+static void C_fcall trf_9402(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9402(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9522(t0,t1);}
+f_9402(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_noret_decl(trf_9365)
+static void C_fcall trf_9365(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9365(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_9485(t0,t1,t2);}
+f_9365(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_noret_decl(trf_9312)
+static void C_fcall trf_9312(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9312(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_9432(t0,t1,t2,t3);}
+f_9312(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_noret_decl(trf_9325)
+static void C_fcall trf_9325(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9325(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9445(t0,t1);}
+f_9325(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_noret_decl(trf_9234)
+static void C_fcall trf_9234(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9234(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_9354(t0,t1,t2,t3);}
+f_9234(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_noret_decl(trf_9247)
+static void C_fcall trf_9247(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9247(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9367(t0,t1);}
+f_9247(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_noret_decl(trf_9172)
+static void C_fcall trf_9172(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9172(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_9292(t0,t1,t2,t3);}
+f_9172(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_noret_decl(trf_9185)
+static void C_fcall trf_9185(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9185(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9305(t0,t1);}
+f_9185(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_noret_decl(trf_9074)
+static void C_fcall trf_9074(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9074(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_9194(t0,t1,t2,t3);}
+f_9074(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_noret_decl(trf_9087)
+static void C_fcall trf_9087(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9087(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9207(t0,t1);}
+f_9087(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_noret_decl(trf_9012)
+static void C_fcall trf_9012(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9012(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_9132(t0,t1,t2,t3);}
+f_9012(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_noret_decl(trf_9025)
+static void C_fcall trf_9025(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9025(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9145(t0,t1);}
+f_9025(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_noret_decl(trf_8855)
+static void C_fcall trf_8855(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8855(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8975(t0,t1,t2);}
+f_8855(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_noret_decl(trf_8754)
+static void C_fcall trf_8754(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8754(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8874(t0,t1,t2);}
+f_8754(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_noret_decl(trf_8719)
+static void C_fcall trf_8719(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8719(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8839(t0,t1,t2);}
+f_8719(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_noret_decl(trf_8675)
+static void C_fcall trf_8675(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8675(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8795(t0,t1,t2);}
+f_8675(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_noret_decl(trf_8702)
+static void C_fcall trf_8702(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8702(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8822(t0,t1);}
+f_8702(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_noret_decl(trf_8631)
+static void C_fcall trf_8631(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8631(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8751(t0,t1,t2);}
+f_8631(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_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_8778(t0,t1);}
+f_8658(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_noret_decl(trf_8582)
+static void C_fcall trf_8582(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8582(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_8702(t0,t1,t2,t3);}
+f_8582(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_noret_decl(trf_8595)
+static void C_fcall trf_8595(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8595(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8715(t0,t1);}
+f_8595(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_noret_decl(trf_8533)
+static void C_fcall trf_8533(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8533(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_8653(t0,t1,t2,t3);}
+f_8533(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_noret_decl(trf_8546)
+static void C_fcall trf_8546(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8546(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8666(t0,t1);}
+f_8546(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_noret_decl(trf_8423)
+static void C_fcall trf_8423(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8423(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_8543(t0,t1,t2,t3);}
+f_8423(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_noret_decl(trf_8436)
+static void C_fcall trf_8436(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8436(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8556(t0,t1);}
+f_8436(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_noret_decl(trf_8166)
+static void C_fcall trf_8166(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8166(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8286(t0,t1,t2);}
+f_8166(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_noret_decl(trf_8096)
+static void C_fcall trf_8096(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8096(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_8216(t0,t1,t2,t3);}
+f_8096(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_noret_decl(trf_8109)
+static void C_fcall trf_8109(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8109(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8229(t0,t1);}
+f_8109(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_noret_decl(trf_7900)
+static void C_fcall trf_7900(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7900(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8020(t0,t1,t2);}
+f_7900(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_noret_decl(trf_7860)
+static void C_fcall trf_7860(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7860(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_7980(t0,t1,t2,t3);}
+f_7860(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_noret_decl(trf_7812)
+static void C_fcall trf_7812(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7812(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7932(t0,t1,t2);}
+f_7812(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_noret_decl(trf_7839)
+static void C_fcall trf_7839(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7839(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7959(t0,t1,t2);}
+f_7839(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_noret_decl(trf_7766)
+static void C_fcall trf_7766(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7766(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_7886(t0,t1,t2,t3);}
+f_7766(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_noret_decl(trf_7726)
+static void C_fcall trf_7726(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7726(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7846(t0,t1,t2);}
+f_7726(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_noret_decl(trf_7532)
+static void C_fcall trf_7532(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7532(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_7652(t0,t1,t2,t3,t4);}
+f_7532(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_noret_decl(trf_7604)
+static void C_fcall trf_7604(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7604(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7724(t0,t1);}
+f_7604(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_noret_decl(trf_7556)
+static void C_fcall trf_7556(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7556(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7676(t0,t1,t2);}
+f_7556(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_noret_decl(trf_7583)
+static void C_fcall trf_7583(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7583(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7703(t0,t1,t2);}
+f_7583(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_noret_decl(trf_7463)
+static void C_fcall trf_7463(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7463(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_7583(t0,t1,t2,t3);}
+f_7463(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_noret_decl(trf_7432)
+static void C_fcall trf_7432(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7432(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_7552(t0,t1,t2,t3);}
+f_7432(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_noret_decl(trf_7363)
+static void C_fcall trf_7363(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7363(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7483(t0,t1,t2);}
+f_7363(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_noret_decl(trf_7298)
+static void C_fcall trf_7298(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7298(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7418(t0,t1,t2);}
+f_7298(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_noret_decl(trf_7246)
+static void C_fcall trf_7246(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7246(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7366(t0,t1,t2);}
+f_7246(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_noret_decl(trf_7273)
+static void C_fcall trf_7273(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7273(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7393(t0,t1,t2);}
+f_7273(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_noret_decl(trf_7206)
+static void C_fcall trf_7206(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7206(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7326(t0,t1,t2);}
+f_7206(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_noret_decl(trf_7027)
+static void C_fcall trf_7027(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7027(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7147(t0,t1,t2);}
+f_7027(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_noret_decl(trf_7054)
+static void C_fcall trf_7054(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7054(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7174(t0,t1,t2);}
+f_7054(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_noret_decl(trf_7152)
+static void C_fcall trf_7152(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7152(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7272(t0,t1,t2);}
+f_7152(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_noret_decl(trf_7096)
+static void C_fcall trf_7096(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7096(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7216(t0,t1,t2);}
+f_7096(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_noret_decl(trf_6789)
+static void C_fcall trf_6789(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6789(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_6909(t0,t1,t2,t3);}
+f_6789(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_noret_decl(trf_6802)
+static void C_fcall trf_6802(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6802(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6922(t0,t1);}
+f_6802(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_noret_decl(trf_6814)
+static void C_fcall trf_6814(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6814(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6934(t0,t1);}
+f_6814(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_noret_decl(trf_6641)
+static void C_fcall trf_6641(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6641(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6761(t0,t1,t2);}
+f_6641(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_noret_decl(trf_6470)
+static void C_fcall trf_6470(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6470(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6590(t0,t1,t2);}
+f_6470(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_noret_decl(trf_6552)
+static void C_fcall trf_6552(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6552(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6672(t0,t1,t2);}
+f_6552(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_noret_decl(trf_6361)
+static void C_fcall trf_6361(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6361(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6481(t0,t1,t2);}
+f_6361(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_noret_decl(trf_6317)
+static void C_fcall trf_6317(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6317(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6437(t0,t1,t2);}
+f_6317(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_noret_decl(trf_6344)
+static void C_fcall trf_6344(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6344(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6464(t0,t1,t2);}
+f_6344(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_noret_decl(trf_6282)
+static void C_fcall trf_6282(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6282(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6402(t0,t1,t2);}
+f_6282(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_noret_decl(trf_6238)
+static void C_fcall trf_6238(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6238(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6358(t0,t1,t2);}
+f_6238(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_noret_decl(trf_6265)
+static void C_fcall trf_6265(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6265(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6385(t0,t1,t2);}
+f_6265(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_noret_decl(trf_6156)
+static void C_fcall trf_6156(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6156(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6276(t0,t1,t2);}
+f_6156(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_noret_decl(trf_5948)
+static void C_fcall trf_5948(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5948(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -2209,22 +2228,22 @@ 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);}
+f_5948(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_noret_decl(trf_5954)
+static void C_fcall trf_5954(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5954(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_6074(t0,t1,t2,t3,t4);}
+f_5954(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_noret_decl(trf_5851)
+static void C_fcall trf_5851(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5851(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -2232,11 +2251,11 @@ 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);}
+f_5851(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_noret_decl(trf_5869)
+static void C_fcall trf_5869(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5869(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -2244,155 +2263,155 @@ 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);}
+f_5869(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_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_5460(t0,t1,t2,t3);}
+f_5340(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_noret_decl(trf_5189)
+static void C_fcall trf_5189(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5189(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5309(t0,t1,t2);}
+f_5189(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_noret_decl(trf_4879)
+static void C_fcall trf_4879(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4879(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4999(t0,t1);}
+f_4879(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_noret_decl(trf_4979)
+static void C_fcall trf_4979(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4979(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_5099(t0,t1,t2,t3);}
+f_4979(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_noret_decl(trf_4930)
+static void C_fcall trf_4930(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4930(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_5050(t0,t1,t2,t3);}
+f_4930(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_noret_decl(trf_4943)
+static void C_fcall trf_4943(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4943(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_5063(t0,t1);}
+f_4943(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_noret_decl(trf_4746)
+static void C_fcall trf_4746(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4746(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4866(t0,t1,t2);}
+f_4746(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_noret_decl(trf_4752)
+static void C_fcall trf_4752(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4752(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4872(t0,t1,t2);}
+f_4752(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_noret_decl(trf_4309)
+static void C_fcall trf_4309(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4309(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4429(t0,t1,t2);}
+f_4309(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_noret_decl(trf_4028)
+static void C_fcall trf_4028(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4028(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4148(t0,t1,t2);}
+f_4028(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_noret_decl(trf_4152)
+static void C_fcall trf_4152(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4152(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4272(t0,t1,t2);}
+f_4152(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_noret_decl(trf_3938)
+static void C_fcall trf_3938(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3938(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4058(t0,t1,t2);}
+f_3938(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_noret_decl(trf_3891)
+static void C_fcall trf_3891(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3891(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4011(t0,t1,t2);}
+f_3891(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_noret_decl(trf_3602)
+static void C_fcall trf_3602(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3602(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_3722(t0,t1,t2,t3);}
+f_3602(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_noret_decl(trf_3628)
+static void C_fcall trf_3628(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3628(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_3748(t0,t1);}
+f_3628(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_noret_decl(trf_3664)
+static void C_fcall trf_3664(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3664(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_3784(t0,t1);}
+f_3664(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_noret_decl(trf_3355)
+static void C_fcall trf_3355(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3355(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -2400,11 +2419,11 @@ 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);}
+f_3355(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_noret_decl(trf_3124)
+static void C_fcall trf_3124(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3124(void *dummy){
C_word t6=C_pick(0);
C_word t5=C_pick(1);
C_word t4=C_pick(2);
@@ -2413,11 +2432,11 @@ 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);}
+f_3124(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_noret_decl(trf_2846)
+static void C_fcall trf_2846(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2846(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -2425,58 +2444,39 @@ 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);}
+f_2846(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_noret_decl(trf_2992)
+static void C_fcall trf_2992(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2992(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_3112(t0,t1);}
+f_2992(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_noret_decl(trf_2856)
+static void C_fcall trf_2856(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2856(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2976(t0,t1);}
+f_2856(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_noret_decl(trf_2474)
+static void C_fcall trf_2474(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2474(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_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);}
+f_2474(t0,t1);}
-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(trf_2548)
+static void C_fcall trf_2548(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2548(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2548(t0,t1);}
C_noret_decl(tr4)
static void C_fcall tr4(C_proc4 k) C_regparm C_noret;
@@ -2535,12 +2535,12 @@ if(!C_demand(3)){
C_save(t1);
C_reclaim((void*)toplevel_trampoline,NULL);}
toplevel_initialized=1;
-if(!C_demand_2(3170)){
+if(!C_demand_2(3380)){
C_save(t1);
-C_rereclaim2(3170*sizeof(C_word), 1);
+C_rereclaim2(3380*sizeof(C_word), 1);
t1=C_restore;}
a=C_alloc(3);
-C_initialize_lf(lf,244);
+C_initialize_lf(lf,255);
lf[0]=C_h_intern(&lf[0],29,"\003syschicken-macro-environment");
lf[1]=C_h_intern(&lf[1],17,"register-feature!");
lf[2]=C_h_intern(&lf[2],6,"srfi-8");
@@ -2557,20 +2557,20 @@ 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[16]=C_h_intern(&lf[16],24,"\004corelet-compiler-syntax");
+lf[17]=C_h_intern(&lf[17],25,"\003syssyntax-rules-mismatch");
+lf[18]=C_h_intern(&lf[18],9,"\003syslist\077");
+lf[19]=C_h_intern(&lf[19],22,"define-compiler-syntax");
+lf[20]=C_h_intern(&lf[20],27,"\004coredefine-compiler-syntax");
+lf[21]=C_h_intern(&lf[21],6,"lambda");
+lf[22]=C_h_intern(&lf[22],3,"use");
+lf[23]=C_h_intern(&lf[23],22,"\004corerequire-extension");
+lf[24]=C_h_intern(&lf[24],16,"\003syscheck-syntax");
+lf[25]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000");
+lf[26]=C_h_intern(&lf[26],22,"define-compiled-syntax");
+lf[27]=C_h_intern(&lf[27],10,"\003sysappend");
+lf[28]=C_h_intern(&lf[28],13,"define-syntax");
+lf[29]=C_h_intern(&lf[29],17,"define-for-syntax");
lf[30]=C_h_intern(&lf[30],6,"define");
lf[31]=C_h_intern(&lf[31],16,"begin-for-syntax");
lf[32]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\001\000\000\001_");
@@ -2784,31 +2784,227 @@ 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);
+lf[240]=C_h_intern(&lf[240],1,"r");
+lf[241]=C_h_intern(&lf[241],7,"unquote");
+lf[242]=C_h_intern(&lf[242],4,"head");
+lf[243]=C_h_intern(&lf[243],4,"form");
+lf[244]=C_h_intern(&lf[244],16,"unquote-splicing");
+lf[245]=C_h_intern(&lf[245],10,"quasiquote");
+lf[246]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\003\000\000\002\376\001\000\000\006symbol\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
+lf[247]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\001_\376\377\016");
+lf[248]=C_h_intern(&lf[248],15,"define-constant");
+lf[249]=C_h_intern(&lf[249],20,"\004coredefine-constant");
+lf[250]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\001_\376\377\016");
+lf[251]=C_h_intern(&lf[251],21,"\003sysmacro-environment");
+lf[252]=C_h_intern(&lf[252],11,"\003sysprovide");
+lf[253]=C_h_intern(&lf[253],19,"chicken-more-macros");
+lf[254]=C_h_intern(&lf[254],14,"chicken-syntax");
+C_register_lf2(lf,255,create_ptable());
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2259,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* chicken-syntax.scm: 35 ##sys#provide */
-t3=*((C_word*)lf[241]+1);
-((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[242],lf[243]);}
+t3=*((C_word*)lf[252]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[253],lf[254]);}
-/* k2283 */
-static void C_ccall f_2285(C_word c,C_word t0,C_word t1){
+/* k2257 */
+static void C_ccall f_2259(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_2259,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2263,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
/* chicken-syntax.scm: 43 ##sys#macro-environment */
-t3=*((C_word*)lf[240]+1);
+t3=*((C_word*)lf[251]+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){
+/* k2261 in k2257 */
+static void C_ccall f_2263(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2263,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2266,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10753,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10755,a[2]=((C_word)li134),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 48 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a10754 in k2261 in k2257 */
+static void C_ccall f_10755(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
+C_word tmp;
+C_word t5;
+C_word t6;
+C_word ab[4],*a=ab;
+if(c!=5) C_bad_argc_2(c,5,t0);
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr5,(void*)f_10755,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10759,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 50 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[248],t2,lf[250]);}
+
+/* k10757 in a10754 in k2261 in k2257 */
+static void C_ccall f_10759(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10759,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10766,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_cdr(((C_word*)t0)[2]);
+/* ##sys#append */
+t4=*((C_word*)lf[27]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
+
+/* k10764 in k10757 in a10754 in k2261 in k2257 */
+static void C_ccall f_10766(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10766,2,t0,t1);}
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[249],t1));}
+
+/* k10751 in k2261 in k2257 */
+static void C_ccall f_10753(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 45 ##sys#extend-macro-environment */
+t2=*((C_word*)lf[10]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[248],C_SCHEME_END_OF_LIST,t1);}
+
+/* k2264 in k2261 in k2257 */
+static void C_ccall f_2266(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2266,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2269,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10645,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10647,a[2]=((C_word)li133),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 56 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a10646 in k2264 in k2261 in k2257 */
+static void C_ccall f_10647(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
+C_word tmp;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word t8;
+C_word ab[4],*a=ab;
+if(c!=5) C_bad_argc_2(c,5,t0);
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr5,(void*)f_10647,5,t0,t1,t2,t3,t4);}
+t5=C_i_cadr(t2);
+if(C_truep(C_i_pairp(t5))){
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10660,a[2]=t1,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 60 ##sys#check-syntax */
+t7=*((C_word*)lf[24]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t6,lf[159],t2,lf[246]);}
+else{
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10738,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 65 ##sys#check-syntax */
+t7=*((C_word*)lf[24]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t6,lf[159],t2,lf[247]);}}
+
+/* k10736 in a10646 in k2264 in k2261 in k2257 */
+static void C_ccall f_10738(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10738,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10745,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_cdr(((C_word*)t0)[2]);
+/* ##sys#append */
+t4=*((C_word*)lf[27]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
+
+/* k10743 in k10736 in a10646 in k2264 in k2261 in k2257 */
+static void C_ccall f_10745(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10745,2,t0,t1);}
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[162],t1));}
+
+/* k10658 in a10646 in k2264 in k2261 in k2257 */
+static void C_ccall f_10660(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word t8;
+C_word t9;
+C_word t10;
+C_word t11;
+C_word t12;
+C_word t13;
+C_word t14;
+C_word t15;
+C_word t16;
+C_word t17;
+C_word t18;
+C_word t19;
+C_word t20;
+C_word ab[66],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10660,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[3]);
+t3=C_a_i_cons(&a,2,lf[21],C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,lf[41],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,lf[240],t5);
+t7=C_a_i_list(&a,2,lf[241],t6);
+t8=C_a_i_cons(&a,2,lf[242],C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,lf[107],t8);
+t10=C_a_i_list(&a,2,lf[241],t9);
+t11=C_a_i_cons(&a,2,lf[243],C_SCHEME_END_OF_LIST);
+t12=C_a_i_cons(&a,2,lf[107],t11);
+t13=C_a_i_list(&a,2,lf[244],t12);
+t14=C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
+t15=C_a_i_cons(&a,2,t10,t14);
+t16=C_a_i_cons(&a,2,t7,t15);
+t17=C_a_i_list(&a,2,lf[245],t16);
+t18=C_a_i_cons(&a,2,t17,C_SCHEME_END_OF_LIST);
+t19=C_a_i_cons(&a,2,t2,t18);
+t20=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t20+1)))(2,t20,C_a_i_cons(&a,2,lf[162],t19));}
+
+/* k10643 in k2264 in k2261 in k2257 */
+static void C_ccall f_10645(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 53 ##sys#extend-macro-environment */
+t2=*((C_word*)lf[10]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[159],C_SCHEME_END_OF_LIST,t1);}
+
+/* k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2269(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2816,30 +3012,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2269,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2272,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10198,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10200,a[2]=((C_word)li132),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 70 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10200(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_10200,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10204,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 72 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[232],t2,lf[239]);}
-/* k10322 in a10319 in k2287 in k2283 */
-static void C_ccall f_10324(C_word c,C_word t0,C_word t1){
+/* k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10204(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2847,107 +3043,107 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_10204,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_cddr(((C_word*)t0)[4]);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10213,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 75 symbol->string */
t5=*((C_word*)lf[141]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-/* k10331 in k10322 in a10319 in k2287 in k2283 */
-static void C_ccall f_10333(C_word c,C_word t0,C_word t1){
+/* k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10213(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_10213,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10216,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 76 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[41]);}
-/* 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){
+/* k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10216(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_10216,2,t0,t1);}
+t2=C_i_memq(lf[71],*((C_word*)lf[72]+1));
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10222,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t1,a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 78 r */
t4=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[55]);}
-/* 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){
+/* k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10222(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_10222,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_10225,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 79 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[30]);}
-/* 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){
+/* k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10225(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_10225,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_10228,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+/* chicken-syntax.scm: 80 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[67]);}
-/* 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){
+/* k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10228(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_10228,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_10231,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
+/* chicken-syntax.scm: 81 r */
t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-/* 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){
+/* k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10231(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[15],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_10231,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_10601,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10641,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 84 string-append */
t4=*((C_word*)lf[140]+1);
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[238],((C_word*)t0)[2]);}
-/* 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){
+/* k10639 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10641(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 61 string->symbol */
+/* chicken-syntax.scm: 84 string->symbol */
t2=*((C_word*)lf[139]+1);
((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-/* 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){
+/* k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10601(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2955,16 +3151,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_10601,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[10],t2);
+t4=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_10633,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[7],a[10]=t1,a[11]=((C_word*)t0)[8],a[12]=((C_word*)t0)[9],a[13]=t3,tmp=(C_word)a,a+=14,tmp);
/* ##sys#append */
-t5=*((C_word*)lf[29]+1);
+t5=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10633(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2979,32 +3175,32 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_10633,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[13],t1);
+t3=C_a_i_cons(&a,2,lf[69],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[12],t4);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[11],t5);
+t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,((C_word*)t0)[10],t7);
+t9=C_a_i_cons(&a,2,((C_word*)t0)[9],t8);
+t10=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_10549,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=t9,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[8],tmp=(C_word)a,a+=13,tmp);
+t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10593,a[2]=t10,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 87 string-append */
t12=*((C_word*)lf[140]+1);
((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t11,((C_word*)t0)[2],lf[237]);}
-/* 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){
+/* k10591 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10593(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 64 string->symbol */
+/* chicken-syntax.scm: 87 string->symbol */
t2=*((C_word*)lf[139]+1);
((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-/* 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){
+/* k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10549(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3026,29 +3222,29 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_10549,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[80],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[12],C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,lf[41],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,lf[80],t5);
+t7=C_a_i_cons(&a,2,lf[70],t6);
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,t2,t8);
+t10=C_a_i_cons(&a,2,((C_word*)t0)[11],t9);
+t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=C_a_i_cons(&a,2,t1,t11);
+t13=C_a_i_cons(&a,2,((C_word*)t0)[10],t12);
+t14=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10254,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=t13,tmp=(C_word)a,a+=6,tmp);
+t15=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10258,a[2]=t14,tmp=(C_word)a,a+=3,tmp);
t16=C_SCHEME_UNDEFINED;
t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_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));
+t18=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_10260,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t17,a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[12],a[11]=((C_word)li131),tmp=(C_word)a,a+=12,tmp));
t19=((C_word*)t17)[1];
-f_10380(t19,t15,((C_word*)t0)[2],C_fix(1));}
+f_10260(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){
+/* mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_10260(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -3057,69 +3253,69 @@ 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);
+C_save_and_reclaim((void*)trf_10260,NULL,4,t0,t1,t2,t3);}
+t4=C_eqp(t2,C_SCHEME_END_OF_LIST);
if(C_truep(t4)){
t5=t2;
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
else{
-t5=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_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 */
+t5=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_10270,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=t1,a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=t3,a[12]=((C_word*)t0)[9],a[13]=((C_word*)t0)[10],tmp=(C_word)a,a+=14,tmp);
+t6=C_slot(t2,C_fix(0));
+/* chicken-syntax.scm: 92 symbol->string */
t7=*((C_word*)lf[141]+1);
((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}}
-/* 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){
+/* k10268 in mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10270(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[18],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_10270,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_10273,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],tmp=(C_word)a,a+=15,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10537,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 93 string-append */
t4=*((C_word*)lf[140]+1);
((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t3,((C_word*)t0)[2],lf[235],t1,lf[236]);}
-/* 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){
+/* k10535 in k10268 in mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10537(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 70 string->symbol */
+/* chicken-syntax.scm: 93 string->symbol */
t2=*((C_word*)lf[139]+1);
((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-/* 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){
+/* k10271 in k10268 in mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10273(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[17],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_10273,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_10276,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=t1,a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],tmp=(C_word)a,a+=14,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10533,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 94 string-append */
t4=*((C_word*)lf[140]+1);
((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[3],lf[234],((C_word*)t0)[2]);}
-/* 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){
+/* k10531 in k10271 in k10268 in mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10533(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 71 string->symbol */
+/* chicken-syntax.scm: 94 string->symbol */
t2=*((C_word*)lf[139]+1);
((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-/* 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){
+/* k10274 in k10271 in k10268 in mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10276(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3176,68 +3372,68 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_10276,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[233],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,lf[80],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[12],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,lf[80],t6);
+t8=C_a_i_cons(&a,2,lf[73],t7);
+t9=C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
+t10=C_a_i_cons(&a,2,lf[74],t9);
+t11=C_a_i_cons(&a,2,lf[233],C_SCHEME_END_OF_LIST);
+t12=C_a_i_cons(&a,2,((C_word*)t0)[11],t11);
+t13=C_a_i_cons(&a,2,lf[80],t12);
+t14=C_a_i_cons(&a,2,lf[76],t13);
+t15=C_a_i_cons(&a,2,t14,C_SCHEME_END_OF_LIST);
+t16=C_a_i_cons(&a,2,t10,t15);
+t17=C_a_i_cons(&a,2,t3,t16);
+t18=C_a_i_cons(&a,2,((C_word*)t0)[10],t17);
+t19=C_a_i_cons(&a,2,t18,C_SCHEME_END_OF_LIST);
+t20=C_a_i_cons(&a,2,((C_word*)t0)[9],t19);
+t21=C_a_i_cons(&a,2,((C_word*)t0)[8],t20);
+t22=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_10323,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t21,a[8]=((C_word*)t0)[8],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
if(C_truep(((C_word*)t0)[3])){
-t23=(C_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);
+t23=C_a_i_cons(&a,2,lf[80],C_SCHEME_END_OF_LIST);
+t24=C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
+t25=C_a_i_cons(&a,2,((C_word*)t0)[12],t24);
+t26=C_a_i_cons(&a,2,t25,C_SCHEME_END_OF_LIST);
+t27=C_a_i_cons(&a,2,lf[80],t26);
+t28=C_a_i_cons(&a,2,lf[73],t27);
+t29=C_a_i_cons(&a,2,t28,C_SCHEME_END_OF_LIST);
+t30=C_a_i_cons(&a,2,lf[74],t29);
+t31=C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
+t32=C_a_i_cons(&a,2,lf[80],t31);
+t33=C_a_i_cons(&a,2,lf[75],t32);
+t34=C_a_i_cons(&a,2,t33,C_SCHEME_END_OF_LIST);
+t35=C_a_i_cons(&a,2,t30,t34);
+t36=C_a_i_cons(&a,2,t23,t35);
+t37=C_a_i_cons(&a,2,((C_word*)t0)[10],t36);
+t38=C_a_i_cons(&a,2,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);
+t39=C_a_i_cons(&a,2,t37,t38);
t40=t22;
-f_10443(t40,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t39));}
+f_10323(t40,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);
+t23=C_a_i_cons(&a,2,lf[80],C_SCHEME_END_OF_LIST);
+t24=C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
+t25=C_a_i_cons(&a,2,((C_word*)t0)[12],t24);
+t26=C_a_i_cons(&a,2,t25,C_SCHEME_END_OF_LIST);
+t27=C_a_i_cons(&a,2,lf[80],t26);
+t28=C_a_i_cons(&a,2,lf[73],t27);
+t29=C_a_i_cons(&a,2,t28,C_SCHEME_END_OF_LIST);
+t30=C_a_i_cons(&a,2,lf[74],t29);
+t31=C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
+t32=C_a_i_cons(&a,2,lf[80],t31);
+t33=C_a_i_cons(&a,2,lf[75],t32);
+t34=C_a_i_cons(&a,2,t33,C_SCHEME_END_OF_LIST);
+t35=C_a_i_cons(&a,2,t30,t34);
+t36=C_a_i_cons(&a,2,t23,t35);
t37=t22;
-f_10443(t37,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],t36));}}
+f_10323(t37,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){
+/* k10321 in k10274 in k10271 in k10268 in mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_10323(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3251,64 +3447,64 @@ 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 */
+C_save_and_reclaim((void*)trf_10323,NULL,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[8],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[7],t5);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[6],t6);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10287,a[2]=t7,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t9=C_slot(((C_word*)t0)[4],C_fix(1));
+t10=C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
+/* chicken-syntax.scm: 113 mapslots */
t11=((C_word*)((C_word*)t0)[2])[1];
-f_10380(t11,t8,t9,t10);}
+f_10260(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){
+/* k10285 in k10321 in k10274 in k10271 in k10268 in mapslots in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10287(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10407,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_10287,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k10256 in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10258(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k10252 in k10547 in k10631 in k10599 in k10229 in k10226 in k10223 in k10220 in k10214 in k10211 in k10202 in a10199 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10254(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_10254,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* k10196 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10198(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 45 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 68 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[232],C_SCHEME_END_OF_LIST,t1);}
-/* k2290 in k2287 in k2283 */
-static void C_ccall f_2292(C_word c,C_word t0,C_word t1){
+/* k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2272(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3316,56 +3512,56 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2272,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2275,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10055,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10057,a[2]=((C_word)li130),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 118 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10057(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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 */
+C_save_and_reclaim((void*)tr5,(void*)f_10057,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10061,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 120 r */
t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[21]);}
-/* k10179 in a10176 in k2290 in k2287 in k2283 */
-static void C_ccall f_10181(C_word c,C_word t0,C_word t1){
+/* k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10061(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_10061,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10064,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 121 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-/* 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){
+/* k10062 in k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10064(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10064,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10067,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 122 ##sys#check-syntax */
+t3=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[229],((C_word*)t0)[4],lf[231]);}
-/* 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){
+/* k10065 in k10062 in k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10067(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3374,22 +3570,22 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_10067,2,t0,t1);}
+t2=C_i_cddr(((C_word*)t0)[5]);
+if(C_truep(C_i_nullp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10096,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t4=C_i_cdr(((C_word*)t0)[5]);
/* ##sys#append */
-t5=*((C_word*)lf[29]+1);
+t5=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_END_OF_LIST);}
else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10103,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 126 ##sys#check-syntax */
+t4=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,lf[229],((C_word*)t0)[5],lf[230]);}}
-/* 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){
+/* k10101 in k10065 in k10062 in k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10103(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3399,21 +3595,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_10103,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[5]);
+t3=C_i_caddr(((C_word*)t0)[5]);
+t4=C_i_cdddr(((C_word*)t0)[5]);
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10118,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t3,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
+if(C_truep(C_i_pairp(t2))){
+t6=C_i_cdr(t2);
t7=t5;
-f_10238(t7,(C_word)C_i_nullp(t6));}
+f_10118(t7,C_i_nullp(t6));}
else{
t6=t5;
-f_10238(t6,C_SCHEME_FALSE);}}
+f_10118(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){
+/* k10116 in k10101 in k10065 in k10062 in k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_10118(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3427,27 +3623,27 @@ 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);}
+C_save_and_reclaim((void*)trf_10118,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);
+t2=C_i_car(((C_word*)t0)[7]);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,t2,t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10133,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t5,tmp=(C_word)a,a+=5,tmp);
/* ##sys#append */
-t7=*((C_word*)lf[29]+1);
+t7=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);}
else{
-t2=(C_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);
+t2=C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[2],t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10172,a[2]=((C_word*)t0)[5],a[3]=t4,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
/* ##sys#append */
-t6=*((C_word*)lf[29]+1);
+t6=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);}}
-/* 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){
+/* k10170 in k10116 in k10101 in k10065 in k10062 in k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10172(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3456,28 +3652,28 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_10172,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,lf[97],t5));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,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){
+/* k10131 in k10116 in k10101 in k10065 in k10062 in k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10133(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10253,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_10133,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,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){
+/* k10094 in k10065 in k10062 in k10059 in a10056 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10096(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3486,25 +3682,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_10096,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
+t4=C_a_i_cons(&a,2,lf[189],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,t3,t4);
t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,lf[97],t5));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,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){
+/* k10053 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10055(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 92 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 115 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[229],C_SCHEME_END_OF_LIST,t1);}
-/* k2293 in k2290 in k2287 in k2283 */
-static void C_ccall f_2295(C_word c,C_word t0,C_word t1){
+/* k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2275(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3512,56 +3708,56 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2275,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2278,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9956,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9958,a[2]=((C_word)li129),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 138 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a9957 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9958(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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 */
+C_save_and_reclaim((void*)tr5,(void*)f_9958,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9962,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 140 r */
t6=t3;
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[188]);}
-/* 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){
+/* k9960 in a9957 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9962(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9962,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9965,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 141 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[55]);}
-/* 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){
+/* k9963 in k9960 in a9957 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9965(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9965,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9968,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 142 r */
t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-/* 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){
+/* k9966 in k9963 in k9960 in a9957 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9968(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3569,16 +3765,16 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_9968,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[226],C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10047,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+t4=C_i_cdr(((C_word*)t0)[2]);
/* ##sys#append */
-t5=*((C_word*)lf[29]+1);
+t5=*((C_word*)lf[27]+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){
+/* k10045 in k9966 in k9963 in k9960 in a9957 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_10047(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3600,38 +3796,38 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_10047,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[6],t2);
+t4=C_a_i_cons(&a,2,lf[227],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,lf[228],t5);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,lf[95],t7);
+t9=C_a_i_cons(&a,2,lf[96],t8);
+t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
+t11=C_a_i_cons(&a,2,t6,t10);
+t12=C_a_i_cons(&a,2,((C_word*)t0)[5],t11);
+t13=C_a_i_cons(&a,2,((C_word*)t0)[6],t12);
+t14=C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
+t15=C_a_i_cons(&a,2,t3,t14);
+t16=C_a_i_cons(&a,2,lf[97],t15);
+t17=C_a_i_cons(&a,2,t16,C_SCHEME_END_OF_LIST);
+t18=C_a_i_cons(&a,2,((C_word*)t0)[4],t17);
t19=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t19+1)))(2,t19,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t18));}
+((C_proc2)(void*)(*((C_word*)t19+1)))(2,t19,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){
+/* k9954 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9956(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 113 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 136 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[225],C_SCHEME_END_OF_LIST,t1);}
-/* k2296 in k2293 in k2290 in k2287 in k2283 */
-static void C_ccall f_2298(C_word c,C_word t0,C_word t1){
+/* k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2278(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3639,16 +3835,16 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2278,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2281,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9938,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9940,a[2]=((C_word)li128),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 153 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a9939 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9940(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -3656,34 +3852,34 @@ 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);
+C_save_and_reclaim((void*)tr5,(void*)f_9940,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9948,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t6=C_i_cdr(t2);
/* ##sys#append */
-t7=*((C_word*)lf[29]+1);
+t7=*((C_word*)lf[27]+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){
+/* k9946 in a9939 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9948(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10068,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_9948,2,t0,t1);}
t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,lf[224],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k9936 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9938(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 128 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 151 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[56],C_SCHEME_END_OF_LIST,t1);}
-/* 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){
+/* k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2281(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3691,86 +3887,86 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2281,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2284,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9849,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9851,a[2]=((C_word)li127),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 159 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9851(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_9851,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9855,a[2]=t2,a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 161 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[214],t2,lf[223]);}
-/* 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){
+/* k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9855(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9855,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9858,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_cadr(((C_word*)t0)[2]);
+/* chicken-syntax.scm: 162 ##sys#resolve-include-filename */
t4=*((C_word*)lf[222]+1);
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_TRUE);}
-/* 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){
+/* k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9858(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9858,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9861,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 163 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[55]);}
-/* 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){
+/* k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9861(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9861,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9864,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9927,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 164 load-verbose */
t4=*((C_word*)lf[221]+1);
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-/* 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){
+/* k9925 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9927(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
-/* chicken-syntax.scm: 141 print */
+/* chicken-syntax.scm: 164 print */
t2=*((C_word*)lf[218]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[219],((C_word*)t0)[2],lf[220]);}
else{
t2=((C_word*)t0)[3];
-f_9984(2,t2,C_SCHEME_UNDEFINED);}}
+f_9864(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){
+/* k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9864(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3778,16 +3974,16 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9864,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9871,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9875,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9877,a[2]=((C_word*)t0)[2],a[3]=((C_word)li126),tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 166 with-input-from-file */
t5=*((C_word*)lf[217]+1);
((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,((C_word*)t0)[2],t4);}
-/* 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){
+/* a9876 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9877(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3800,20 +3996,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9877,2,t0,t1);}
t2=((C_word*)t0)[2];
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9883,a[2]=t3,a[3]=t5,a[4]=((C_word)li122),tmp=(C_word)a,a+=5,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9888,a[2]=((C_word)li124),tmp=(C_word)a,a+=3,tmp);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9921,a[2]=t5,a[3]=t3,a[4]=((C_word)li125),tmp=(C_word)a,a+=5,tmp);
/* ##sys#dynamic-wind */
t9=*((C_word*)lf[187]+1);
((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t1,t6,t7,t8);}
-/* 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){
+/* a9920 in a9876 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9921(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3821,28 +4017,28 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9921,2,t0,t1);}
t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,*((C_word*)lf[215]+1));
t3=C_mutate((C_word*)lf[215]+1 /* (set! current-source-filename ...) */,((C_word*)((C_word*)t0)[2])[1]);
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-/* 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){
+/* a9887 in a9876 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9888(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9888,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9896,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 169 read */
t3=*((C_word*)lf[216]+1);
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* 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){
+/* k9894 in a9887 in a9876 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9896(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3850,45 +4046,45 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9896,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10018,a[2]=t3,a[3]=((C_word)li126),tmp=(C_word)a,a+=4,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9898,a[2]=t3,a[3]=((C_word)li123),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
-f_10018(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+f_9898(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){
+/* doloop135 in k9894 in a9887 in a9876 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9898(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10018,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_eofp(t2))){
-/* chicken-syntax.scm: 149 reverse */
+C_save_and_reclaim((void*)trf_9898,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_eofp(t2))){
+/* chicken-syntax.scm: 172 reverse */
t4=*((C_word*)lf[61]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t3);}
else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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 */
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9915,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 169 read */
t5=*((C_word*)lf[216]+1);
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-/* 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){
+/* k9913 in doloop135 in k9894 in a9887 in a9876 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9915(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10035,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
+C_save_and_reclaim((void*)tr2,(void*)f_9915,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
t3=((C_word*)((C_word*)t0)[3])[1];
-f_10018(t3,((C_word*)t0)[2],t1,t2);}
+f_9898(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){
+/* a9882 in a9876 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9883(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3896,42 +4092,42 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9883,2,t0,t1);}
t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,*((C_word*)lf[215]+1));
t3=C_mutate((C_word*)lf[215]+1 /* (set! current-source-filename ...) */,((C_word*)((C_word*)t0)[2])[1]);
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
-/* 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){
+/* k9873 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9875(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k9869 in k9862 in k9859 in k9856 in k9853 in a9850 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9871(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9991,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_9871,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k9847 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9849(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 134 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 157 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[214],C_SCHEME_END_OF_LIST,t1);}
-/* 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){
+/* k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2284(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3939,30 +4135,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2284,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2287,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9735,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9737,a[2]=((C_word)li121),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 176 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a9736 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9737(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_9737,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9741,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 178 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[210],t2,lf[213]);}
-/* 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){
+/* k9739 in a9736 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9741(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3970,29 +4166,29 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9741,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_cddr(((C_word*)t0)[4]);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9750,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 181 r */
t5=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[118]);}
-/* 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){
+/* k9748 in k9739 in a9736 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9750(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9750,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9753,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 182 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[41]);}
-/* 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){
+/* k9751 in k9748 in k9739 in a9736 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9753(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4002,21 +4198,21 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_9753,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9756,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+t3=C_eqp(C_SCHEME_END_OF_LIST,((C_word*)t0)[2]);
if(C_truep(t3)){
-t4=(C_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);
+t4=C_a_i_cons(&a,2,lf[212],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,lf[41],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
t7=t2;
-f_9876(t7,(C_word)C_a_i_cons(&a,2,lf[128],t6));}
+f_9756(t7,C_a_i_cons(&a,2,lf[128],t6));}
else{
t4=t2;
-f_9876(t4,(C_word)C_i_car(((C_word*)t0)[2]));}}
+f_9756(t4,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){
+/* k9754 in k9751 in k9748 in k9739 in a9736 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9756(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4028,25 +4224,25 @@ 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]);
+C_save_and_reclaim((void*)trf_9756,NULL,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,lf[74],t2);
+t4=C_a_i_cons(&a,2,lf[180],C_SCHEME_END_OF_LIST);
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9791,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t3,a[5]=t4,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+t6=C_i_length(((C_word*)t0)[3]);
+if(C_truep(C_fixnum_greaterp(t6,C_fix(1)))){
+t7=C_i_cdr(((C_word*)t0)[3]);
/* ##sys#append */
-t8=*((C_word*)lf[29]+1);
+t8=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t5,t7,C_SCHEME_END_OF_LIST);}
else{
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9936,a[2]=t5,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 169 ##sys#strip-syntax */
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9816,a[2]=t5,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 192 ##sys#strip-syntax */
t8=*((C_word*)lf[211]+1);
((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,((C_word*)t0)[6]);}}
-/* 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){
+/* k9814 in k9754 in k9751 in k9748 in k9739 in a9736 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9816(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4054,16 +4250,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9816,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
/* ##sys#append */
-t5=*((C_word*)lf[29]+1);
+t5=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[2],t4,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k9789 in k9754 in k9751 in k9748 in k9739 in a9736 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9791(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4073,26 +4269,26 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9791,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
+t3=C_a_i_cons(&a,2,lf[129],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[4],t5);
t7=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t6));}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,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){
+/* k9733 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9735(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 151 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 174 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[210],C_SCHEME_END_OF_LIST,t1);}
-/* 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){
+/* k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2287(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4100,30 +4296,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2287,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2290,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9598,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9600,a[2]=((C_word)li120),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 197 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a9599 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9600(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_9600,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9604,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 199 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[205],t2,lf[209]);}
-/* 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){
+/* k9602 in a9599 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9604(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4132,43 +4328,43 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9604,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_caddr(((C_word*)t0)[4]);
+t4=C_i_cdddr(((C_word*)t0)[4]);
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9616,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=t3,tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 203 r */
t6=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[131]);}
-/* 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){
+/* k9614 in k9602 in a9599 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9616(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9616,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9619,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 204 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-/* 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){
+/* k9617 in k9614 in k9602 in a9599 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9619(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9619,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9622,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 205 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
-/* 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){
+/* k9620 in k9617 in k9614 in k9602 in a9599 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9622(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4190,35 +4386,35 @@ 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]))){
+C_save_and_reclaim((void*)tr2,(void*)f_9622,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[6],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[5],t5);
+t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,lf[74],t7);
+t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9669,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t4,a[5]=t1,a[6]=t8,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+if(C_truep(C_i_pairp(((C_word*)t0)[2]))){
/* ##sys#append */
-t10=*((C_word*)lf[29]+1);
+t10=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t9,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
else{
-t10=(C_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);
+t10=C_a_i_cons(&a,2,lf[208],C_SCHEME_END_OF_LIST);
+t11=C_a_i_cons(&a,2,lf[41],t10);
+t12=C_a_i_cons(&a,2,t11,C_SCHEME_END_OF_LIST);
+t13=C_a_i_cons(&a,2,lf[128],t12);
+t14=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
+t15=C_a_i_cons(&a,2,lf[41],t14);
+t16=C_a_i_cons(&a,2,t15,C_SCHEME_END_OF_LIST);
+t17=C_a_i_cons(&a,2,((C_word*)t0)[6],t16);
+t18=C_a_i_cons(&a,2,t13,t17);
/* ##sys#append */
-t19=*((C_word*)lf[29]+1);
+t19=*((C_word*)lf[27]+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){
+/* k9667 in k9620 in k9617 in k9614 in k9602 in a9599 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9669(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4231,29 +4427,29 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9669,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[206],t1);
+t3=C_a_i_cons(&a,2,lf[207],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[7],t4);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[6],t5);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[5],t6);
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,((C_word*)t0)[4],t8);
t10=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t9));}
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,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){
+/* k9596 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9598(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 171 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 194 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[205],C_SCHEME_END_OF_LIST,t1);}
-/* 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){
+/* k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2290(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4261,30 +4457,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2290,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2293,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8912,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8914,a[2]=((C_word)li119),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 218 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8914(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_8914,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8918,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 220 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[203],t2,lf[204]);}
-/* 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){
+/* k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8918(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4299,22 +4495,22 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_8918,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_cddr(((C_word*)t0)[4]);
t4=C_SCHEME_END_OF_LIST;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_FALSE;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8927,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9681,a[2]=t5,a[3]=t10,a[4]=t7,a[5]=((C_word)li121),tmp=(C_word)a,a+=6,tmp));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9561,a[2]=t5,a[3]=t10,a[4]=t7,a[5]=((C_word)li118),tmp=(C_word)a,a+=6,tmp));
t12=((C_word*)t10)[1];
-f_9681(t12,t8,t2);}
+f_9561(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){
+/* loop195 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9561(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4323,12 +4519,12 @@ 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))){
+C_save_and_reclaim((void*)trf_9561,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
t3=*((C_word*)lf[78]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9590,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g211212 */
t6=t3;
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
else{
@@ -4336,8 +4532,8 @@ 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){
+/* k9588 in loop195 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9590(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4349,25 +4545,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9590,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop167180 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop195208 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_9681(t6,((C_word*)t0)[3],t5);}
+f_9561(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop167180 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop195208 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_9681(t6,((C_word*)t0)[3],t5);}}
+f_9561(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){
+/* k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8927(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4380,20 +4576,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8927,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8930,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9517,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li117),tmp=(C_word)a,a+=7,tmp));
t10=((C_word*)t8)[1];
-f_9637(t10,t6,((C_word*)t0)[3]);}
+f_9517(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){
+/* loop219 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9517(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4402,21 +4598,21 @@ 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 */
+C_save_and_reclaim((void*)trf_9517,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9544,a[2]=((C_word*)t0)[5],a[3]=((C_word)li116),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9555,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g235236 */
t6=t3;
-f_9664(t6,t4);}
+f_9544(t6,t4);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k9553 in loop219 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9555(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4428,47 +4624,47 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9555,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop191204 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop219232 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_9637(t6,((C_word*)t0)[3],t5);}
+f_9517(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop191204 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop219232 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_9637(t6,((C_word*)t0)[3],t5);}}
+f_9517(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){
+/* g235 in loop219 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9544(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_9544,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9552,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 224 gensym */
t3=*((C_word*)lf[60]+1);
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* 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){
+/* k9550 in g235 in loop219 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9552(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 201 r */
+/* chicken-syntax.scm: 224 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){
+/* k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8930(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4481,20 +4677,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8930,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8933,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9473,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li115),tmp=(C_word)a,a+=7,tmp));
t10=((C_word*)t8)[1];
-f_9593(t10,t6,((C_word*)t0)[3]);}
+f_9473(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){
+/* loop244 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9473(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4503,21 +4699,21 @@ 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 */
+C_save_and_reclaim((void*)trf_9473,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9500,a[2]=((C_word*)t0)[5],a[3]=((C_word)li114),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9511,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g260261 */
t6=t3;
-f_9620(t6,t4);}
+f_9500(t6,t4);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k9509 in loop244 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9511(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4529,73 +4725,73 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9511,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop216229 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop244257 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_9593(t6,((C_word*)t0)[3],t5);}
+f_9473(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop216229 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop244257 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_9593(t6,((C_word*)t0)[3],t5);}}
+f_9473(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){
+/* g260 in loop244 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9500(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_9500,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9508,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 225 gensym */
t3=*((C_word*)lf[60]+1);
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* 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){
+/* k9506 in g260 in loop244 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9508(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 202 r */
+/* chicken-syntax.scm: 225 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){
+/* k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8933(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8933,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8936,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 226 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-/* 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){
+/* k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8936(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8936,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8939,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 227 r */
t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-/* 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){
+/* k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8939(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4614,26 +4810,26 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8939,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8950,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9418,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9298,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t8=C_SCHEME_END_OF_LIST;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
t10=C_SCHEME_FALSE;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9507,a[2]=((C_word*)t0)[4],a[3]=t7,a[4]=t4,a[5]=t6,tmp=(C_word)a,a+=6,tmp);
+t12=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9387,a[2]=((C_word*)t0)[4],a[3]=t7,a[4]=t4,a[5]=t6,tmp=(C_word)a,a+=6,tmp);
t13=C_SCHEME_UNDEFINED;
t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9558,a[2]=t9,a[3]=t14,a[4]=t11,a[5]=((C_word)li116),tmp=(C_word)a,a+=6,tmp));
+t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9438,a[2]=t9,a[3]=t14,a[4]=t11,a[5]=((C_word)li113),tmp=(C_word)a,a+=6,tmp));
t16=((C_word*)t14)[1];
-f_9558(t16,t12,((C_word*)t0)[2]);}
+f_9438(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){
+/* loop301 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9438(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4642,12 +4838,12 @@ 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))){
+C_save_and_reclaim((void*)trf_9438,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
t3=*((C_word*)lf[146]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9467,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g317318 */
t6=t3;
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
else{
@@ -4655,8 +4851,8 @@ 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){
+/* k9465 in loop301 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9467(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4668,25 +4864,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9467,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop273286 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop301314 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_9558(t6,((C_word*)t0)[3],t5);}
+f_9438(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop273286 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop301314 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_9558(t6,((C_word*)t0)[3],t5);}}
+f_9438(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){
+/* k9385 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9387(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4694,15 +4890,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9387,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9389,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=((C_word)li112),tmp=(C_word)a,a+=6,tmp));
t5=((C_word*)t3)[1];
-f_9509(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+f_9389(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){
+/* loop274 in k9385 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9389(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -4714,15 +4910,15 @@ 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);
+C_save_and_reclaim((void*)trf_9389,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
t6=*((C_word*)lf[189]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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 */
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9422,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+t8=C_slot(t2,C_fix(0));
+t9=C_slot(t3,C_fix(0));
+/* g294295 */
t10=t6;
((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t7,t8,t9);}
else{
@@ -4730,8 +4926,8 @@ 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){
+/* k9420 in loop274 in k9385 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9422(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4739,19 +4935,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9422,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9402,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
t4=t3;
-f_9522(t4,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
+f_9402(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
else{
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=t3;
-f_9522(t5,t4);}}
+f_9402(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){
+/* k9400 in k9420 in loop274 in k9385 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9402(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4759,14 +4955,14 @@ 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 */
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+/* loop274288 */
t5=((C_word*)((C_word*)t0)[3])[1];
-f_9509(t5,((C_word*)t0)[2],t3,t4);}
+f_9389(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){
+/* k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9298(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4782,23 +4978,23 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9298,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9302,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9306,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9310,a[2]=((C_word*)t0)[3],a[3]=t7,a[4]=t4,a[5]=t6,tmp=(C_word)a,a+=6,tmp);
+t9=C_i_length(((C_word*)t0)[2]);
t10=C_SCHEME_UNDEFINED;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9485,a[2]=t11,a[3]=((C_word)li114),tmp=(C_word)a,a+=4,tmp));
+t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9365,a[2]=t11,a[3]=((C_word)li111),tmp=(C_word)a,a+=4,tmp));
t13=((C_word*)t11)[1];
-f_9485(t13,t8,t9);}
+f_9365(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){
+/* loop in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9365(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4810,33 +5006,33 @@ 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));
+C_save_and_reclaim((void*)trf_9365,NULL,3,t0,t1,t2);}
+t3=C_eqp(t2,C_fix(0));
if(C_truep(t3)){
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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 */
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9379,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t5=C_fixnum_difference(t2,C_fix(1));
+/* chicken-syntax.scm: 233 loop */
t7=t4;
t8=t5;
t1=t7;
t2=t8;
goto loop;}}
-/* 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){
+/* k9377 in loop in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9379(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9499,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_9379,2,t0,t1);}
t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,C_SCHEME_FALSE,t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k9308 in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9310(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4844,15 +5040,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9310,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9312,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=((C_word)li110),tmp=(C_word)a,a+=6,tmp));
t5=((C_word*)t3)[1];
-f_9432(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+f_9312(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){
+/* loop324 in k9308 in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9312(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -4864,15 +5060,15 @@ 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);
+C_save_and_reclaim((void*)trf_9312,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
t6=*((C_word*)lf[189]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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 */
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9345,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+t8=C_slot(t2,C_fix(0));
+t9=C_slot(t3,C_fix(0));
+/* g344345 */
t10=t6;
((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t7,t8,t9);}
else{
@@ -4880,8 +5076,8 @@ 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){
+/* k9343 in loop324 in k9308 in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9345(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4889,19 +5085,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9345,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9325,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
t4=t3;
-f_9445(t4,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
+f_9325(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
else{
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=t3;
-f_9445(t5,t4);}}
+f_9325(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){
+/* k9323 in k9343 in loop324 in k9308 in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9325(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4909,32 +5105,32 @@ 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 */
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+/* loop324338 */
t5=((C_word*)((C_word*)t0)[3])[1];
-f_9432(t5,((C_word*)t0)[2],t3,t4);}
+f_9312(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){
+/* k9304 in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9306(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k9300 in k9296 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9302(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+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){
+/* k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8950(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4948,21 +5144,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8950,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9150,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9274,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9154,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9354,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li112),tmp=(C_word)a,a+=6,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9234,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li109),tmp=(C_word)a,a+=6,tmp));
t11=((C_word*)t9)[1];
-f_9354(t11,t7,((C_word*)t0)[4],((C_word*)t0)[5]);}
+f_9234(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){
+/* loop354 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9234(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -4978,31 +5174,31 @@ 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);
+C_save_and_reclaim((void*)trf_9234,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=(C_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);
+t6=C_slot(t2,C_fix(0));
+t7=C_slot(t3,C_fix(0));
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,t6,t8);
+t10=C_a_i_cons(&a,2,lf[167],t9);
+t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9247,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,a[6]=t11,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
t13=t12;
-f_9367(t13,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11));}
+f_9247(t13,C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11));}
else{
t13=C_mutate(((C_word *)((C_word*)t0)[2])+1,t11);
t14=t12;
-f_9367(t14,t13);}}
+f_9247(t14,t13);}}
else{
t6=((C_word*)((C_word*)t0)[2])[1];
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-/* 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){
+/* k9245 in loop354 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9247(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5010,14 +5206,14 @@ 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 */
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+/* loop354368 */
t5=((C_word*)((C_word*)t0)[3])[1];
-f_9354(t5,((C_word*)t0)[2],t3,t4);}
+f_9234(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){
+/* k9152 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9154(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5031,21 +5227,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9154,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9158,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9282,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9162,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9292,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li111),tmp=(C_word)a,a+=6,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9172,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li108),tmp=(C_word)a,a+=6,tmp));
t11=((C_word*)t9)[1];
-f_9292(t11,t7,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_9172(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){
+/* loop387 in k9152 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9172(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5061,31 +5257,31 @@ 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);
+C_save_and_reclaim((void*)trf_9172,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=(C_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);
+t6=C_slot(t2,C_fix(0));
+t7=C_slot(t3,C_fix(0));
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,t6,t8);
+t10=C_a_i_cons(&a,2,lf[167],t9);
+t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9185,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,a[6]=t11,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
t13=t12;
-f_9305(t13,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11));}
+f_9185(t13,C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11));}
else{
t13=C_mutate(((C_word *)((C_word*)t0)[2])+1,t11);
t14=t12;
-f_9305(t14,t13);}}
+f_9185(t14,t13);}}
else{
t6=((C_word*)((C_word*)t0)[2])[1];
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-/* 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){
+/* k9183 in loop387 in k9152 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9185(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5093,38 +5289,38 @@ 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 */
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+/* loop387401 */
t5=((C_word*)((C_word*)t0)[3])[1];
-f_9292(t5,((C_word*)t0)[2],t3,t4);}
+f_9172(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){
+/* k9160 in k9152 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9162(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_9162,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[180],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
/* ##sys#append */
-t4=*((C_word*)lf[29]+1);
+t4=*((C_word*)lf[27]+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){
+/* k9156 in k9152 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9158(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+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){
+/* k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9150(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5132,16 +5328,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9150,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9142,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t3,a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
/* ##sys#append */
-t5=*((C_word*)lf[29]+1);
+t5=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9142(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5157,23 +5353,23 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9142,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8990,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=t3,a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
t5=C_SCHEME_END_OF_LIST;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_FALSE;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9114,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8994,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
t10=C_SCHEME_UNDEFINED;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9194,a[2]=t6,a[3]=t11,a[4]=t8,a[5]=((C_word)li110),tmp=(C_word)a,a+=6,tmp));
+t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9074,a[2]=t6,a[3]=t11,a[4]=t8,a[5]=((C_word)li107),tmp=(C_word)a,a+=6,tmp));
t13=((C_word*)t11)[1];
-f_9194(t13,t9,((C_word*)t0)[2],((C_word*)t0)[4]);}
+f_9074(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){
+/* loop420 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9074(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5189,31 +5385,31 @@ 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);
+C_save_and_reclaim((void*)trf_9074,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=(C_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);
+t6=C_slot(t2,C_fix(0));
+t7=C_slot(t3,C_fix(0));
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,t6,t8);
+t10=C_a_i_cons(&a,2,lf[167],t9);
+t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9087,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,a[6]=t11,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
t13=t12;
-f_9207(t13,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11));}
+f_9087(t13,C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11));}
else{
t13=C_mutate(((C_word *)((C_word*)t0)[2])+1,t11);
t14=t12;
-f_9207(t14,t13);}}
+f_9087(t14,t13);}}
else{
t6=((C_word*)((C_word*)t0)[2])[1];
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-/* 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){
+/* k9085 in loop420 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9087(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5221,14 +5417,14 @@ 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 */
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+/* loop420434 */
t5=((C_word*)((C_word*)t0)[3])[1];
-f_9194(t5,((C_word*)t0)[2],t3,t4);}
+f_9074(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){
+/* k8992 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8994(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5242,21 +5438,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8994,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8998,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9122,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9002,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9132,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li109),tmp=(C_word)a,a+=6,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9012,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li106),tmp=(C_word)a,a+=6,tmp));
t11=((C_word*)t9)[1];
-f_9132(t11,t7,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_9012(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){
+/* loop453 in k8992 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9012(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5272,31 +5468,31 @@ 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);
+C_save_and_reclaim((void*)trf_9012,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=(C_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);
+t6=C_slot(t2,C_fix(0));
+t7=C_slot(t3,C_fix(0));
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,t6,t8);
+t10=C_a_i_cons(&a,2,lf[167],t9);
+t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9025,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,a[6]=t11,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
t13=t12;
-f_9145(t13,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11));}
+f_9025(t13,C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11));}
else{
t13=C_mutate(((C_word *)((C_word*)t0)[2])+1,t11);
t14=t12;
-f_9145(t14,t13);}}
+f_9025(t14,t13);}}
else{
t6=((C_word*)((C_word*)t0)[2])[1];
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-/* 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){
+/* k9023 in loop453 in k8992 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_9025(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5304,38 +5500,38 @@ 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 */
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+/* loop453467 */
t5=((C_word*)((C_word*)t0)[3])[1];
-f_9132(t5,((C_word*)t0)[2],t3,t4);}
+f_9012(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){
+/* k9000 in k8992 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_9002(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_9002,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[180],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
/* ##sys#append */
-t4=*((C_word*)lf[29]+1);
+t4=*((C_word*)lf[27]+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){
+/* k8996 in k8992 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8998(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+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){
+/* k8988 in k9140 in k9148 in k8948 in k8937 in k8934 in k8931 in k8928 in k8925 in k8916 in a8913 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8990(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5348,29 +5544,29 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8990,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[5],t5);
+t7=C_a_i_cons(&a,2,lf[187],t6);
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,((C_word*)t0)[4],t8);
t10=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t9));}
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,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){
+/* k8910 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8912(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 193 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 216 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[203],C_SCHEME_END_OF_LIST,t1);}
-/* 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){
+/* k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2293(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5378,101 +5574,101 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2293,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2296,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8791,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8793,a[2]=((C_word)li105),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 251 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8793(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[6],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_8793,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8797,a[2]=t3,a[3]=t4,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 253 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[192],t2,lf[202]);}
-/* 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){
+/* k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8797(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8797,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8803,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 255 r */
t4=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[55]);}
-/* 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){
+/* k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8803(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);
+C_save_and_reclaim((void*)tr2,(void*)f_8803,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8904,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+t3=C_i_cddr(((C_word*)t0)[2]);
/* ##sys#append */
-t4=*((C_word*)lf[29]+1);
+t4=*((C_word*)lf[27]+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){
+/* k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8904(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8904,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8809,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 257 r */
t4=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[201]);}
-/* 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){
+/* k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8809(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8809,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8812,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 258 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[200]);}
-/* 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){
+/* k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8812(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8812,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8815,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 259 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[199]);}
-/* 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){
+/* k8813 in k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8815(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5487,22 +5683,22 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8815,2,t0,t1);}
t2=C_SCHEME_FALSE;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_FALSE;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);
+t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8818,a[2]=t3,a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=t7,a[6]=t5,tmp=(C_word)a,a+=7,tmp);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8855,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t5,a[7]=t7,a[8]=t3,a[9]=t10,a[10]=((C_word)li104),tmp=(C_word)a,a+=11,tmp));
t12=((C_word*)t10)[1];
-f_8975(t12,t8,((C_word*)t0)[2]);}
+f_8855(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){
+/* loop in k8813 in k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8855(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5511,12 +5707,12 @@ 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 */
+C_save_and_reclaim((void*)trf_8855,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_i_car(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8868,a[2]=t1,a[3]=((C_word*)t0)[9],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_8878,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=t4,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=t2,a[12]=((C_word*)t0)[8],tmp=(C_word)a,a+=13,tmp);
+/* chicken-syntax.scm: 266 c */
t6=((C_word*)t0)[5];
((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t3,((C_word*)t0)[2]);}
else{
@@ -5524,8 +5720,8 @@ 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){
+/* k8876 in loop in k8813 in k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8878(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5533,21 +5729,21 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8878,2,t0,t1);}
if(C_truep(t1)){
t2=C_set_block_item(((C_word*)t0)[12],0,C_SCHEME_TRUE);
-t3=(C_word)C_slot(((C_word*)t0)[11],C_fix(1));
-/* chicken-syntax.scm: 247 loop */
+t3=C_slot(((C_word*)t0)[11],C_fix(1));
+/* chicken-syntax.scm: 270 loop */
t4=((C_word*)((C_word*)t0)[10])[1];
-f_8975(t4,((C_word*)t0)[9],t3);}
+f_8855(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 */
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8885,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[8],tmp=(C_word)a,a+=11,tmp);
+/* chicken-syntax.scm: 267 c */
t3=((C_word*)t0)[5];
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[4],((C_word*)t0)[2]);}}
-/* 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){
+/* k8883 in k8876 in loop in k8813 in k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8885(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5555,21 +5751,21 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8885,2,t0,t1);}
if(C_truep(t1)){
t2=C_set_block_item(((C_word*)t0)[10],0,C_SCHEME_TRUE);
-t3=(C_word)C_slot(((C_word*)t0)[9],C_fix(1));
-/* chicken-syntax.scm: 247 loop */
+t3=C_slot(((C_word*)t0)[9],C_fix(1));
+/* chicken-syntax.scm: 270 loop */
t4=((C_word*)((C_word*)t0)[8])[1];
-f_8975(t4,((C_word*)t0)[7],t3);}
+f_8855(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 */
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8892,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 268 c */
t3=((C_word*)t0)[4];
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}}
-/* 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){
+/* k8890 in k8883 in k8876 in loop in k8813 in k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8892(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5578,29 +5774,29 @@ 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 */
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+/* chicken-syntax.scm: 270 loop */
t4=((C_word*)((C_word*)t0)[4])[1];
-f_8975(t4,((C_word*)t0)[3],t3);}
+f_8855(t4,((C_word*)t0)[3],t3);}
else{
-t2=(C_word)C_i_car(((C_word*)t0)[5]);
-/* chicken-syntax.scm: 246 ##sys#error */
+t2=C_i_car(((C_word*)t0)[5]);
+/* chicken-syntax.scm: 269 ##sys#error */
t3=*((C_word*)lf[129]+1);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],lf[198],t2);}}
-/* 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){
+/* k8866 in loop in k8813 in k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8868(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-/* chicken-syntax.scm: 247 loop */
+t2=C_slot(((C_word*)t0)[4],C_fix(1));
+/* chicken-syntax.scm: 270 loop */
t3=((C_word*)((C_word*)t0)[3])[1];
-f_8975(t3,((C_word*)t0)[2],t2);}
+f_8855(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){
+/* k8816 in k8813 in k8810 in k8807 in k8902 in k8801 in k8795 in a8792 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8818(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5608,18 +5804,18 @@ 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)))){
+C_save_and_reclaim((void*)tr2,(void*)f_8818,2,t0,t1);}
+if(C_truep(C_i_memq(lf[193],*((C_word*)lf[72]+1)))){
t2=(C_truep(((C_word*)((C_word*)t0)[6])[1])?((C_word*)((C_word*)t0)[5])[1]:C_SCHEME_FALSE);
if(C_truep(t2)){
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[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));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[194],t3));}
else{
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[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));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[195],t3));}
else{
t3=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(((C_word*)((C_word*)t0)[5])[1])?((C_word*)t0)[4]:lf[196]));}}}
@@ -5627,17 +5823,17 @@ 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){
+/* k8789 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8791(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 226 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 249 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[192],C_SCHEME_END_OF_LIST,t1);}
-/* k2314 in 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){
+/* k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2296(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5645,30 +5841,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2296,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2299,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8305,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8307,a[2]=((C_word)li103),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 282 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8307(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_8307,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8311,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 284 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[186],t2,lf[191]);}
-/* 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){
+/* k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8311(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5676,42 +5872,42 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8311,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_cddr(((C_word*)t0)[4]);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8320,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 287 r */
t5=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[190]);}
-/* 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){
+/* k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8320(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8320,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8323,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 288 r */
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-/* 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){
+/* k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8323(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8323,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8326,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 289 r */
t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-/* 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){
+/* k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8326(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5724,20 +5920,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8326,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8329,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8874,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li105),tmp=(C_word)a,a+=6,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8754,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li102),tmp=(C_word)a,a+=6,tmp));
t10=((C_word*)t8)[1];
-f_8874(t10,t6,((C_word*)t0)[2]);}
+f_8754(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){
+/* loop543 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8754(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5746,12 +5942,12 @@ 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))){
+C_save_and_reclaim((void*)trf_8754,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
t3=*((C_word*)lf[78]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8783,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g559560 */
t6=t3;
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
else{
@@ -5759,8 +5955,8 @@ 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){
+/* k8781 in loop543 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8783(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5772,25 +5968,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8783,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop515528 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop543556 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8874(t6,((C_word*)t0)[3],t5);}
+f_8754(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop515528 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop543556 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8874(t6,((C_word*)t0)[3],t5);}}
+f_8754(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){
+/* k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8329(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5803,20 +5999,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8329,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8332,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8839,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li104),tmp=(C_word)a,a+=6,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8719,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li101),tmp=(C_word)a,a+=6,tmp));
t10=((C_word*)t8)[1];
-f_8839(t10,t6,((C_word*)t0)[2]);}
+f_8719(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){
+/* loop567 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8719(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5825,12 +6021,12 @@ 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))){
+C_save_and_reclaim((void*)trf_8719,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
t3=*((C_word*)lf[146]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8748,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g583584 */
t6=t3;
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
else{
@@ -5838,8 +6034,8 @@ 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){
+/* k8746 in loop567 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8748(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5851,25 +6047,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8748,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop539552 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop567580 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8839(t6,((C_word*)t0)[3],t5);}
+f_8719(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop539552 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop567580 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8839(t6,((C_word*)t0)[3],t5);}}
+f_8719(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){
+/* k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8332(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5882,20 +6078,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8332,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8335,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8675,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li100),tmp=(C_word)a,a+=7,tmp));
t10=((C_word*)t8)[1];
-f_8795(t10,t6,((C_word*)t0)[3]);}
+f_8675(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){
+/* loop591 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8675(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5904,21 +6100,21 @@ 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 */
+C_save_and_reclaim((void*)trf_8675,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8702,a[2]=((C_word*)t0)[5],a[3]=((C_word)li99),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8713,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g607608 */
t6=t3;
-f_8822(t6,t4);}
+f_8702(t6,t4);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k8711 in loop591 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8713(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5930,47 +6126,47 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8713,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop563576 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop591604 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8795(t6,((C_word*)t0)[3],t5);}
+f_8675(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop563576 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop591604 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8795(t6,((C_word*)t0)[3],t5);}}
+f_8675(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){
+/* g607 in loop591 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8702(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_8702,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8710,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 292 gensym */
t3=*((C_word*)lf[60]+1);
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* 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){
+/* k8708 in g607 in loop591 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8710(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 269 r */
+/* chicken-syntax.scm: 292 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){
+/* k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8335(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5983,20 +6179,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8335,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8338,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8631,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li98),tmp=(C_word)a,a+=7,tmp));
t10=((C_word*)t8)[1];
-f_8751(t10,t6,((C_word*)t0)[3]);}
+f_8631(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){
+/* loop616 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8631(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6005,21 +6201,21 @@ 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 */
+C_save_and_reclaim((void*)trf_8631,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8658,a[2]=((C_word*)t0)[5],a[3]=((C_word)li97),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8669,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g632633 */
t6=t3;
-f_8778(t6,t4);}
+f_8658(t6,t4);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k8667 in loop616 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8669(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6031,47 +6227,47 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8669,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop588601 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop616629 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8751(t6,((C_word*)t0)[3],t5);}
+f_8631(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop588601 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop616629 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8751(t6,((C_word*)t0)[3],t5);}}
+f_8631(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){
+/* g632 in loop616 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8658(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_8658,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8666,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 293 gensym */
t3=*((C_word*)lf[60]+1);
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* 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){
+/* k8664 in g632 in loop616 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8666(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 270 r */
+/* chicken-syntax.scm: 293 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){
+/* k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8338(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6085,21 +6281,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8338,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8349,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8647,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8527,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8702,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li99),tmp=(C_word)a,a+=6,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8582,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li96),tmp=(C_word)a,a+=6,tmp));
t11=((C_word*)t9)[1];
-f_8702(t11,t7,((C_word*)t0)[4],((C_word*)t0)[2]);}
+f_8582(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){
+/* loop644 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8582(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -6111,15 +6307,15 @@ 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);
+C_save_and_reclaim((void*)trf_8582,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
t6=*((C_word*)lf[189]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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 */
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8615,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+t8=C_slot(t2,C_fix(0));
+t9=C_slot(t3,C_fix(0));
+/* g664665 */
t10=t6;
((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t7,t8,t9);}
else{
@@ -6127,8 +6323,8 @@ 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){
+/* k8613 in loop644 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8615(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6136,19 +6332,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8615,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8595,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
t4=t3;
-f_8715(t4,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
+f_8595(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
else{
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=t3;
-f_8715(t5,t4);}}
+f_8595(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){
+/* k8593 in k8613 in loop644 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8595(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6156,14 +6352,14 @@ 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 */
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+/* loop644658 */
t5=((C_word*)((C_word*)t0)[3])[1];
-f_8702(t5,((C_word*)t0)[2],t3,t4);}
+f_8582(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){
+/* k8525 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8527(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6176,20 +6372,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8527,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8651,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8531,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8653,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li98),tmp=(C_word)a,a+=6,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8533,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li95),tmp=(C_word)a,a+=6,tmp));
t10=((C_word*)t8)[1];
-f_8653(t10,t6,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_8533(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){
+/* loop671 in k8525 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8533(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -6201,15 +6397,15 @@ 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);
+C_save_and_reclaim((void*)trf_8533,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
t6=*((C_word*)lf[189]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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 */
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8566,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+t8=C_slot(t2,C_fix(0));
+t9=C_slot(t3,C_fix(0));
+/* g691692 */
t10=t6;
((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t7,t8,t9);}
else{
@@ -6217,8 +6413,8 @@ 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){
+/* k8564 in loop671 in k8525 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8566(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6226,19 +6422,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8566,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8546,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
t4=t3;
-f_8666(t4,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
+f_8546(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
else{
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=t3;
-f_8666(t5,t4);}}
+f_8546(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){
+/* k8544 in k8564 in loop671 in k8525 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8546(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6246,23 +6442,23 @@ 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 */
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+/* loop671685 */
t5=((C_word*)((C_word*)t0)[3])[1];
-f_8653(t5,((C_word*)t0)[2],t3,t4);}
+f_8533(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){
+/* k8529 in k8525 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8531(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 271 ##sys#append */
-t2=*((C_word*)lf[29]+1);
+/* chicken-syntax.scm: 294 ##sys#append */
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k8347 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8349(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6276,21 +6472,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8349,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8417,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8541,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8421,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8423,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word*)t0)[6],a[6]=((C_word)li94),tmp=(C_word)a,a+=7,tmp));
t11=((C_word*)t9)[1];
-f_8543(t11,t7,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_8423(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){
+/* loop698 in k8347 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8423(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -6305,30 +6501,30 @@ 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);
+C_save_and_reclaim((void*)trf_8423,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8454,a[2]=((C_word*)t0)[5],a[3]=((C_word)li93),tmp=(C_word)a,a+=4,tmp);
+t7=C_slot(t2,C_fix(0));
+t8=C_slot(t3,C_fix(0));
+t9=f_8454(C_a_i(&a,39),t6,t7,t8);
+t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
+t11=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8436,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,a[6]=t10,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
t12=t11;
-f_8556(t12,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t10));}
+f_8436(t12,C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t10));}
else{
t12=C_mutate(((C_word *)((C_word*)t0)[2])+1,t10);
t13=t11;
-f_8556(t13,t12);}}
+f_8436(t13,t12);}}
else{
t6=((C_word*)((C_word*)t0)[2])[1];
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-/* 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){
+/* k8434 in loop698 in k8347 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8436(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6336,14 +6532,14 @@ 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 */
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+/* loop698712 */
t5=((C_word*)((C_word*)t0)[3])[1];
-f_8543(t5,((C_word*)t0)[2],t3,t4);}
+f_8423(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){
+/* g718 in loop698 in k8347 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static C_word C_fcall f_8454(C_word *a,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6359,31 +6555,31 @@ 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){
+t3=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,lf[188],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,t1,t7);
+t9=C_a_i_cons(&a,2,lf[188],C_SCHEME_END_OF_LIST);
+t10=C_a_i_cons(&a,2,t2,t9);
+t11=C_a_i_cons(&a,2,lf[167],t10);
+t12=C_a_i_cons(&a,2,t11,C_SCHEME_END_OF_LIST);
+t13=C_a_i_cons(&a,2,t8,t12);
+t14=C_a_i_cons(&a,2,t6,t13);
+return(C_a_i_cons(&a,2,((C_word*)t0)[2],t14));}
+
+/* k8419 in k8347 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8421(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k8415 in k8347 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8417(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6394,19 +6590,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8417,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8397,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t6,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
/* ##sys#append */
-t8=*((C_word*)lf[29]+1);
+t8=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t7,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k8395 in k8415 in k8347 in k8336 in k8333 in k8330 in k8327 in k8324 in k8321 in k8318 in k8309 in a8306 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8397(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6422,32 +6618,32 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8397,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,t3,t4);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[6],t5);
+t7=C_a_i_cons(&a,2,lf[187],t6);
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,((C_word*)t0)[5],t8);
+t10=C_a_i_cons(&a,2,((C_word*)t0)[4],t9);
+t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=C_a_i_cons(&a,2,((C_word*)t0)[3],t11);
t13=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t12));}
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,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){
+/* k8303 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8305(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 257 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 280 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[186],C_SCHEME_END_OF_LIST,t1);}
-/* k2317 in k2314 in 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){
+/* k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2299(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6455,73 +6651,73 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2299,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2302,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8260,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8262,a[2]=((C_word)li92),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 307 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a8261 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8262(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_8262,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8266,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 309 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[184],t2,lf[185]);}
-/* 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){
+/* k8264 in a8261 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8266(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8266,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8273,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 310 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
-/* 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){
+/* k8271 in k8264 in a8261 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8273(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8273,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8293,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 311 r */
t4=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[55]);}
-/* 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){
+/* k8291 in k8271 in k8264 in a8261 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8293(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);
+C_save_and_reclaim((void*)tr2,(void*)f_8293,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8297,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t3=C_i_cddr(((C_word*)t0)[2]);
/* ##sys#append */
-t4=*((C_word*)lf[29]+1);
+t4=*((C_word*)lf[27]+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){
+/* k8295 in k8291 in k8271 in k8264 in a8261 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8297(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6529,24 +6725,24 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8297,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,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){
+/* k8258 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8260(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 282 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 305 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[184],C_SCHEME_END_OF_LIST,t1);}
-/* k2320 in k2317 in k2314 in 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){
+/* k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2302(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6554,43 +6750,43 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2302,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2305,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8207,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8209,a[2]=((C_word)li91),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 315 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a8208 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8209(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_8209,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8213,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 317 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[182],t2,lf[183]);}
-/* 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){
+/* k8211 in a8208 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8213(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8213,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8220,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 318 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
-/* 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){
+/* k8218 in k8211 in a8208 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8220(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6598,31 +6794,31 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8220,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_a_i_cons(&a,2,lf[180],C_SCHEME_END_OF_LIST);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8248,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=t3,tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 320 r */
t5=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[55]);}
-/* 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){
+/* k8246 in k8218 in k8211 in a8208 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8248(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);
+C_save_and_reclaim((void*)tr2,(void*)f_8248,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8252,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+t3=C_i_cddr(((C_word*)t0)[2]);
/* ##sys#append */
-t4=*((C_word*)lf[29]+1);
+t4=*((C_word*)lf[27]+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){
+/* k8250 in k8246 in k8218 in k8211 in a8208 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8252(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6631,25 +6827,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8252,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[5],t3);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
t6=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,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){
+/* k8205 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8207(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 290 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 313 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[182],C_SCHEME_END_OF_LIST,t1);}
-/* k2323 in k2320 in k2317 in k2314 in 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){
+/* k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2305(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6657,30 +6853,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2305,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2308,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7979,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7981,a[2]=((C_word)li90),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 324 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7981(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_7981,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7985,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 326 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[175],t2,lf[181]);}
-/* 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){
+/* k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7985(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6688,16 +6884,16 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7985,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_caddr(((C_word*)t0)[4]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7994,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 329 r */
t5=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[21]);}
-/* 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){
+/* k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7994(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6723,41 +6919,41 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7994,2,t0,t1);}
+if(C_truep(C_i_nullp(((C_word*)t0)[4]))){
+t2=C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t2);
+t4=C_a_i_cons(&a,2,t1,t3);
+t5=C_a_i_cons(&a,2,lf[180],C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t6);
+t8=C_a_i_cons(&a,2,t1,t7);
+t9=C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
+t10=C_a_i_cons(&a,2,t4,t9);
t11=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,(C_word)C_a_i_cons(&a,2,lf[97],t10));}
+((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,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);
+t2=C_i_cdr(((C_word*)t0)[4]);
+if(C_truep(C_i_nullp(t2))){
+t3=C_i_car(((C_word*)t0)[4]);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,t3,t4);
t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,lf[167],t5));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_cons(&a,2,lf[167],t5));}
else{
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8063,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8286,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li92),tmp=(C_word)a,a+=6,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8166,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li89),tmp=(C_word)a,a+=6,tmp));
t11=((C_word*)t9)[1];
-f_8286(t11,t7,((C_word*)t0)[4]);}}}
+f_8166(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){
+/* loop769 in k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8166(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6766,12 +6962,12 @@ 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))){
+C_save_and_reclaim((void*)trf_8166,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
t3=*((C_word*)lf[60]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8195,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g785786 */
t6=t3;
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
else{
@@ -6779,8 +6975,8 @@ 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){
+/* k8193 in loop769 in k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8195(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6792,25 +6988,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8195,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop741754 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop769782 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8286(t6,((C_word*)t0)[3],t5);}
+f_8166(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop741754 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop769782 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8286(t6,((C_word*)t0)[3],t5);}}
+f_8166(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){
+/* k8061 in k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8063(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6827,24 +7023,24 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8063,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8090,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
t6=C_SCHEME_END_OF_LIST;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=C_SCHEME_FALSE;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8214,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8094,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
t11=C_SCHEME_UNDEFINED;
t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8216,a[2]=t7,a[3]=t12,a[4]=t9,a[5]=((C_word)li91),tmp=(C_word)a,a+=6,tmp));
+t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8096,a[2]=t7,a[3]=t12,a[4]=t9,a[5]=((C_word)li88),tmp=(C_word)a,a+=6,tmp));
t14=((C_word*)t12)[1];
-f_8216(t14,t10,((C_word*)t0)[2],t1);}
+f_8096(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){
+/* loop796 in k8061 in k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8096(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -6860,31 +7056,31 @@ 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);
+C_save_and_reclaim((void*)trf_8096,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=(C_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);
+t6=C_slot(t2,C_fix(0));
+t7=C_slot(t3,C_fix(0));
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,t6,t8);
+t10=C_a_i_cons(&a,2,lf[167],t9);
+t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8109,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,a[6]=t11,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
t13=t12;
-f_8229(t13,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11));}
+f_8109(t13,C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t11));}
else{
t13=C_mutate(((C_word *)((C_word*)t0)[2])+1,t11);
t14=t12;
-f_8229(t14,t13);}}
+f_8109(t14,t13);}}
else{
t6=((C_word*)((C_word*)t0)[2])[1];
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-/* 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){
+/* k8107 in loop796 in k8061 in k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_8109(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6892,23 +7088,23 @@ 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 */
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+/* loop796810 */
t5=((C_word*)((C_word*)t0)[3])[1];
-f_8216(t5,((C_word*)t0)[2],t3,t4);}
+f_8096(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){
+/* k8092 in k8061 in k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8094(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k8088 in k8061 in k7992 in k7983 in a7980 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_8090(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6917,25 +7113,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8090,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,lf[97],t5));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,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){
+/* k7977 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7979(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 299 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 322 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[175],C_SCHEME_END_OF_LIST,t1);}
-/* k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2308(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6943,30 +7139,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2308,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2311,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7937,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7939,a[2]=((C_word)li87),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 348 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a7938 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7939(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_7939,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7943,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 350 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[174],t2,lf[179]);}
-/* 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){
+/* k7941 in a7938 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7943(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6974,16 +7170,16 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_7943,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7946,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7963,a[2]=((C_word)li86),tmp=(C_word)a,a+=3,tmp);
+t4=C_i_cadr(((C_word*)t0)[3]);
/* for-each */
t5=*((C_word*)lf[178]+1);
((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t2,t3,t4);}
-/* 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){
+/* a7962 in k7941 in a7938 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7963(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6991,71 +7187,71 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_7963,3,t0,t1,t2);}
t3=*((C_word*)lf[176]+1);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8091,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
-/* chicken-syntax.scm: 328 ##sys#current-module */
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7971,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 351 ##sys#current-module */
t5=*((C_word*)lf[177]+1);
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-/* 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){
+/* k7969 in a7962 in k7941 in a7938 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7971(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* g816817 */
+/* g844845 */
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){
+/* k7944 in k7941 in a7938 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7946(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7946,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7953,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 352 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[175]);}
-/* 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){
+/* k7951 in k7944 in k7941 in a7938 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7953(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);
+C_save_and_reclaim((void*)tr2,(void*)f_7953,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7957,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_cdr(((C_word*)t0)[2]);
/* ##sys#append */
-t4=*((C_word*)lf[29]+1);
+t4=*((C_word*)lf[27]+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){
+/* k7955 in k7951 in k7944 in k7941 in a7938 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7957(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8077,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7957,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k7935 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7937(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 323 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 346 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[174],C_SCHEME_END_OF_LIST,t1);}
-/* k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2311(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7063,30 +7259,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2311,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2314,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7412,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7414,a[2]=((C_word)li85),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 356 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7414(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_7414,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7418,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 358 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[171],t2,lf[173]);}
-/* 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){
+/* k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7418(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7094,29 +7290,29 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7418,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_cddr(((C_word*)t0)[4]);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7427,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 361 r */
t5=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[64]);}
-/* 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){
+/* k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7427(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7427,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7430,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 362 r */
t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-/* 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){
+/* k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7430(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7135,26 +7331,26 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7430,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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));
+t6=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7432,a[2]=t3,a[3]=((C_word)li73),tmp=(C_word)a,a+=4,tmp));
+t7=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7463,a[2]=t5,a[3]=((C_word)li74),tmp=(C_word)a,a+=4,tmp));
t8=C_SCHEME_END_OF_LIST;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
t10=C_SCHEME_FALSE;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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);
+t12=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7505,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=t1,a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],tmp=(C_word)a,a+=10,tmp);
t13=C_SCHEME_UNDEFINED;
t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8020,a[2]=t9,a[3]=t14,a[4]=t11,a[5]=((C_word)li87),tmp=(C_word)a,a+=6,tmp));
+t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7900,a[2]=t9,a[3]=t14,a[4]=t11,a[5]=((C_word)li84),tmp=(C_word)a,a+=6,tmp));
t16=((C_word*)t14)[1];
-f_8020(t16,t12,((C_word*)t0)[3]);}
+f_7900(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){
+/* loop875 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7900(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7163,12 +7359,12 @@ 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))){
+C_save_and_reclaim((void*)trf_7900,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
t3=*((C_word*)lf[78]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7929,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g891892 */
t6=t3;
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
else{
@@ -7176,8 +7372,8 @@ 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){
+/* k7927 in loop875 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7929(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7189,25 +7385,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7929,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop847860 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop875888 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8020(t6,((C_word*)t0)[3],t5);}
+f_7900(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop847860 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop875888 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8020(t6,((C_word*)t0)[3],t5);}}
+f_7900(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){
+/* k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7505(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7216,16 +7412,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7505,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7508,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7980,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word)li86),tmp=(C_word)a,a+=5,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7860,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word)li83),tmp=(C_word)a,a+=5,tmp));
t6=((C_word*)t4)[1];
-f_7980(t6,t2,t1,C_SCHEME_END_OF_LIST);}
+f_7860(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){
+/* loop in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7860(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -7240,27 +7436,27 @@ 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))){
+C_save_and_reclaim((void*)trf_7860,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t2))){
t4=t3;
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
else{
-t4=(C_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 */
+t4=C_i_car(t2);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7873,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_i_listp(t4))){
+/* chicken-syntax.scm: 378 append */
t6=*((C_word*)lf[48]+1);
((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t4,t3);}
else{
-if(C_truep((C_word)C_i_pairp(t4))){
-/* chicken-syntax.scm: 356 append* */
+if(C_truep(C_i_pairp(t4))){
+/* chicken-syntax.scm: 379 append* */
t6=((C_word*)((C_word*)t0)[2])[1];
-f_7552(t6,t5,t4,t3);}
+f_7432(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 */
+t6=C_a_i_cons(&a,2,t4,t3);
+t7=C_i_cdr(t2);
+/* chicken-syntax.scm: 381 loop */
t10=t1;
t11=t7;
t12=t6;
@@ -7269,19 +7465,19 @@ 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){
+/* k7871 in loop in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7873(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
-/* chicken-syntax.scm: 358 loop */
+t2=C_i_cdr(((C_word*)t0)[4]);
+/* chicken-syntax.scm: 381 loop */
t3=((C_word*)((C_word*)t0)[3])[1];
-f_7980(t3,((C_word*)t0)[2],t2,t1);}
+f_7860(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){
+/* k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7508(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7294,20 +7490,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7508,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7511,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7812,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li82),tmp=(C_word)a,a+=7,tmp));
t10=((C_word*)t8)[1];
-f_7932(t10,t6,t1);}
+f_7812(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){
+/* loop913 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7812(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7316,21 +7512,21 @@ 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 */
+C_save_and_reclaim((void*)trf_7812,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7839,a[2]=((C_word*)t0)[5],a[3]=((C_word)li81),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7854,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g929930 */
t6=t3;
-f_7959(t6,t4,t5);}
+f_7839(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k7852 in loop913 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7854(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7342,59 +7538,59 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7854,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop885898 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop913926 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7932(t6,((C_word*)t0)[3],t5);}
+f_7812(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop885898 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop913926 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7932(t6,((C_word*)t0)[3],t5);}}
+f_7812(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){
+/* g929 in loop913 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7839(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_7839,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7847,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7851,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 382 gensym */
t5=*((C_word*)lf[60]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-/* 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){
+/* k7849 in g929 in loop913 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7851(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 359 r */
+/* chicken-syntax.scm: 382 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){
+/* k7845 in g929 in loop913 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7847(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7967,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7847,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7511(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7404,17 +7600,17 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7511,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7512,a[2]=t1,a[3]=((C_word)li75),tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7523,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t2,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7766,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=((C_word)li80),tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
-f_7886(t7,t3,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}
+f_7766(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){
+/* loop in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7766(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -7422,56 +7618,56 @@ 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 */
+C_save_and_reclaim((void*)trf_7766,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t2))){
+/* chicken-syntax.scm: 386 reverse */
t4=*((C_word*)lf[61]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t3);}
else{
-t4=(C_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* */
+t4=C_i_car(t2);
+if(C_truep(C_i_pairp(t4))){
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7806,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 390 map* */
t6=((C_word*)((C_word*)t0)[3])[1];
-f_7583(t6,t5,((C_word*)t0)[2],t4);}
+f_7463(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 */
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7799,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 389 lookup */
t6=((C_word*)t0)[2];
-f_7632(3,t6,t5,t4);}}}
+f_7512(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){
+/* k7797 in loop in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7799(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7799,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+t3=C_i_cdr(((C_word*)t0)[4]);
+/* chicken-syntax.scm: 391 loop */
t4=((C_word*)((C_word*)t0)[3])[1];
-f_7886(t4,((C_word*)t0)[2],t3,t2);}
+f_7766(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){
+/* k7804 in loop in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7806(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7806,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+t3=C_i_cdr(((C_word*)t0)[4]);
+/* chicken-syntax.scm: 391 loop */
t4=((C_word*)((C_word*)t0)[3])[1];
-f_7886(t4,((C_word*)t0)[2],t3,t2);}
+f_7766(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){
+/* k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7523(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7484,20 +7680,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7523,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7530,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7846,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li82),tmp=(C_word)a,a+=6,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7726,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li79),tmp=(C_word)a,a+=6,tmp));
t10=((C_word*)t8)[1];
-f_7846(t10,t6,((C_word*)t0)[2]);}
+f_7726(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){
+/* loop1002 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7726(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7516,16 +7712,16 @@ 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);
+C_save_and_reclaim((void*)trf_7726,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_slot(t2,C_fix(0));
+t4=C_i_cadr(t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
+t6=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=(C_word)C_slot(t2,C_fix(1));
-/* loop974987 */
+t8=C_slot(t2,C_fix(1));
+/* loop10021015 */
t14=t1;
t15=t8;
t1=t14;
@@ -7534,8 +7730,8 @@ 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 */
+t8=C_slot(t2,C_fix(1));
+/* loop10021015 */
t14=t1;
t15=t8;
t1=t14;
@@ -7546,8 +7742,8 @@ 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){
+/* k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7530(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7555,15 +7751,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7530,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7532,a[2]=((C_word*)t0)[5],a[3]=t3,a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word)li78),tmp=(C_word)a,a+=9,tmp));
t5=((C_word*)t3)[1];
-f_7652(t5,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+f_7532(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){
+/* fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7532(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -7579,40 +7775,40 @@ 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))){
+C_save_and_reclaim((void*)trf_7532,NULL,5,t0,t1,t2,t3,t4);}
+if(C_truep(C_i_nullp(t2))){
t5=C_SCHEME_END_OF_LIST;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_FALSE;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7670,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7550,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
t10=C_SCHEME_UNDEFINED;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7556,a[2]=t6,a[3]=t11,a[4]=t8,a[5]=((C_word*)t0)[5],a[6]=((C_word)li77),tmp=(C_word)a,a+=7,tmp));
t13=((C_word*)t11)[1];
-f_7676(t13,t9,((C_word*)t0)[4]);}
+f_7556(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 */
+t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7604,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t4,a[5]=t2,a[6]=((C_word*)t0)[7],a[7]=t1,a[8]=t3,tmp=(C_word)a,a+=9,tmp);
+t6=C_i_car(t4);
+if(C_truep(C_i_pairp(t6))){
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7720,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 397 cdar */
t8=*((C_word*)lf[47]+1);
((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,t4);}
else{
t7=t5;
-f_7724(t7,C_SCHEME_FALSE);}}}
+f_7604(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){
+/* k7718 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7720(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_7724(t2,(C_word)C_i_nullp(t1));}
+f_7604(t2,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){
+/* k7602 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7604(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7627,28 +7823,28 @@ 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);}
+C_save_and_reclaim((void*)trf_7604,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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 */
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7643,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 398 caar */
t3=*((C_word*)lf[50]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
else{
-t2=(C_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 */
+t2=C_i_car(((C_word*)t0)[8]);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t3);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[2],t4);
+t6=C_i_car(((C_word*)t0)[4]);
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7686,a[2]=((C_word*)t0)[7],a[3]=t5,a[4]=((C_word*)t0)[2],a[5]=t6,tmp=(C_word)a,a+=6,tmp);
+t8=C_i_cdr(((C_word*)t0)[5]);
+t9=C_i_cdr(((C_word*)t0)[8]);
+t10=C_i_cdr(((C_word*)t0)[4]);
+/* chicken-syntax.scm: 403 fold */
t11=((C_word*)((C_word*)t0)[3])[1];
-f_7652(t11,t7,t8,t9,t10);}}
+f_7532(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){
+/* k7684 in k7602 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7686(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7658,17 +7854,17 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7686,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[5],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[3],t5);
t7=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_cons(&a,2,lf[97],t6));}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,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){
+/* k7641 in k7602 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7643(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7681,35 +7877,35 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7643,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[7]);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,t1,t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7623,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+t7=C_i_cdr(((C_word*)t0)[4]);
+t8=C_i_cdr(((C_word*)t0)[7]);
+t9=C_i_cdr(((C_word*)t0)[3]);
+/* chicken-syntax.scm: 399 fold */
t10=((C_word*)((C_word*)t0)[2])[1];
-f_7652(t10,t6,t7,t8,t9);}
+f_7532(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){
+/* k7621 in k7641 in k7602 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7623(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_7623,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* loop967 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7556(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7718,21 +7914,21 @@ 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 */
+C_save_and_reclaim((void*)trf_7556,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7583,a[2]=((C_word*)t0)[5],a[3]=((C_word)li76),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7594,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g983984 */
t6=t3;
-f_7703(t6,t4,t5);}
+f_7583(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k7592 in loop967 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7594(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7744,135 +7940,135 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7594,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop939952 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop967980 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7676(t6,((C_word*)t0)[3],t5);}
+f_7556(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop939952 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop967980 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7676(t6,((C_word*)t0)[3],t5);}}
+f_7556(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){
+/* g983 in loop967 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7583(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_7583,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7591,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 396 lookup */
t4=((C_word*)t0)[2];
-f_7632(3,t4,t3,t2);}
+f_7512(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){
+/* k7589 in g983 in loop967 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7591(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7711,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7591,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k7548 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7550(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_7550,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7554,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* ##sys#append */
-t3=*((C_word*)lf[29]+1);
+t3=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k7552 in k7548 in fold in k7528 in k7521 in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7554(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7674,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_7554,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,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){
+/* lookup in k7509 in k7506 in k7503 in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7512(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_7632,3,t0,t1,t2);}
-t3=(C_word)C_i_assq(t2,((C_word*)t0)[2]);
+C_save_and_reclaim((void*)tr3,(void*)f_7512,3,t0,t1,t2);}
+t3=C_i_assq(t2,((C_word*)t0)[2]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_cdr(t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* map* in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7463(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7583,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_nullp(t3))){
+C_save_and_reclaim((void*)trf_7463,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t3))){
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
else{
-if(C_truep((C_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 */
+if(C_truep(C_i_pairp(t3))){
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7486,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t5=C_i_car(t3);
+/* chicken-syntax.scm: 371 proc */
t6=t2;
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
else{
-/* chicken-syntax.scm: 347 proc */
+/* chicken-syntax.scm: 370 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){
+/* k7484 in map* in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7486(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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* */
+C_save_and_reclaim((void*)tr2,(void*)f_7486,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7490,a[2]=t1,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_cdr(((C_word*)t0)[4]);
+/* chicken-syntax.scm: 371 map* */
t4=((C_word*)((C_word*)t0)[3])[1];
-f_7583(t4,t2,((C_word*)t0)[2],t3);}
+f_7463(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){
+/* k7488 in k7484 in map* in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7490(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7610,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7490,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* append* in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7432(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -7885,12 +8081,12 @@ 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* */
+C_save_and_reclaim((void*)trf_7432,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_pairp(t2))){
+t4=C_i_car(t2);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7453,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t6=C_i_cdr(t2);
+/* chicken-syntax.scm: 367 append* */
t8=t5;
t9=t6;
t10=t3;
@@ -7900,29 +8096,29 @@ 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));}}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* k7451 in append* in k7428 in k7425 in k7416 in a7413 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7453(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7573,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7453,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k7410 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7412(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 331 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 354 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[171],C_SCHEME_END_OF_LIST,t1);}
-/* k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2314(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7930,30 +8126,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2314,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2317,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7340,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7342,a[2]=((C_word)li72),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 407 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a7341 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7342(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_7342,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7346,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 409 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[170],t2,lf[172]);}
-/* 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){
+/* k7344 in a7341 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7346(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7961,29 +8157,29 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7346,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_cddr(((C_word*)t0)[4]);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7355,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 412 r */
t5=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[64]);}
-/* 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){
+/* k7353 in k7344 in a7341 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7355(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7355,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7358,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 413 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[171]);}
-/* 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){
+/* k7356 in k7353 in k7344 in a7341 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7358(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7991,15 +8187,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7358,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7363,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word)li71),tmp=(C_word)a,a+=7,tmp));
t5=((C_word*)t3)[1];
-f_7483(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_7363(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){
+/* fold in k7356 in k7353 in k7344 in a7341 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7363(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8013,61 +8209,61 @@ 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);
+C_save_and_reclaim((void*)trf_7363,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_nullp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7381,a[2]=((C_word*)t0)[5],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* ##sys#append */
-t4=*((C_word*)lf[29]+1);
+t4=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}
else{
-t3=(C_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 */
+t3=C_i_car(t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7400,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+t6=C_i_cdr(t2);
+/* chicken-syntax.scm: 418 fold */
t9=t5;
t10=t6;
t1=t9;
t2=t10;
goto loop;}}
-/* 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){
+/* k7398 in fold in k7356 in k7353 in k7344 in a7341 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7400(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_7400,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* k7379 in fold in k7356 in k7353 in k7344 in a7341 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7381(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7501,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+C_save_and_reclaim((void*)tr2,(void*)f_7381,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,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){
+/* k7338 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7340(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 382 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 405 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[170],C_SCHEME_END_OF_LIST,t1);}
-/* k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2317(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8075,30 +8271,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2317,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2320,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6969,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6971,a[2]=((C_word)li70),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 422 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6971(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_6971,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6975,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 424 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[166],t2,lf[169]);}
-/* 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){
+/* k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6975(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8106,29 +8302,29 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6975,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_cddr(((C_word*)t0)[4]);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6984,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 427 r */
t5=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[64]);}
-/* 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){
+/* k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6984(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6984,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6987,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 428 r */
t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-/* 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){
+/* k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6987(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8142,21 +8338,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6987,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6990,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7416,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7296,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7418,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li72),tmp=(C_word)a,a+=6,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7298,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li69),tmp=(C_word)a,a+=6,tmp));
t11=((C_word*)t9)[1];
-f_7418(t11,t7,((C_word*)t0)[3]);}
+f_7298(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){
+/* loop1057 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7298(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8175,16 +8371,16 @@ 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);
+C_save_and_reclaim((void*)trf_7298,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_slot(t2,C_fix(0));
+t4=C_i_car(t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
+t6=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=(C_word)C_slot(t2,C_fix(1));
-/* loop10291042 */
+t8=C_slot(t2,C_fix(1));
+/* loop10571070 */
t14=t1;
t15=t8;
t1=t14;
@@ -8193,8 +8389,8 @@ 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 */
+t8=C_slot(t2,C_fix(1));
+/* loop10571070 */
t14=t1;
t15=t8;
t1=t14;
@@ -8205,15 +8401,15 @@ 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){
+/* k7294 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7296(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[29]+1),t1);}
+C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[27]+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){
+/* k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6990(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8226,20 +8422,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_6990,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6993,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7246,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li68),tmp=(C_word)a,a+=7,tmp));
t10=((C_word*)t8)[1];
-f_7366(t10,t6,t1);}
+f_7246(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){
+/* loop1082 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7246(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8248,21 +8444,21 @@ 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 */
+C_save_and_reclaim((void*)trf_7246,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7273,a[2]=((C_word*)t0)[5],a[3]=((C_word)li67),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7288,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g10981099 */
t6=t3;
-f_7393(t6,t4,t5);}
+f_7273(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k7286 in loop1082 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7288(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8274,59 +8470,59 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7288,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop10541067 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop10821095 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7366(t6,((C_word*)t0)[3],t5);}
+f_7246(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop10541067 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop10821095 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7366(t6,((C_word*)t0)[3],t5);}}
+f_7246(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){
+/* g1098 in loop1082 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7273(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_7273,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7281,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7285,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 430 gensym */
t5=*((C_word*)lf[60]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-/* 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){
+/* k7283 in g1098 in loop1082 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7285(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 407 r */
+/* chicken-syntax.scm: 430 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){
+/* k7279 in g1098 in loop1082 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7281(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7401,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7281,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6993(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8340,21 +8536,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6993,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6994,a[2]=t1,a[3]=((C_word)li60),tmp=(C_word)a,a+=4,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7013,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7326,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li69),tmp=(C_word)a,a+=6,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7206,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li66),tmp=(C_word)a,a+=6,tmp));
t11=((C_word*)t9)[1];
-f_7326(t11,t7,((C_word*)t0)[2]);}
+f_7206(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){
+/* loop1112 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7206(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8373,16 +8569,16 @@ 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);
+C_save_and_reclaim((void*)trf_7206,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_slot(t2,C_fix(0));
+t4=C_a_i_list(&a,2,t3,lf[168]);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
+t6=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=(C_word)C_slot(t2,C_fix(1));
-/* loop10841097 */
+t8=C_slot(t2,C_fix(1));
+/* loop11121125 */
t14=t1;
t15=t8;
t1=t14;
@@ -8391,8 +8587,8 @@ 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 */
+t8=C_slot(t2,C_fix(1));
+/* loop11121125 */
t14=t1;
t15=t8;
t1=t14;
@@ -8403,8 +8599,8 @@ 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){
+/* k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7013(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8418,21 +8614,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7013,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7017,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7141,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7021,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7027,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word)li65),tmp=(C_word)a,a+=8,tmp));
t11=((C_word*)t9)[1];
-f_7147(t11,t7,((C_word*)t0)[2]);}
+f_7027(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){
+/* loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7027(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8441,21 +8637,21 @@ 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 */
+C_save_and_reclaim((void*)trf_7027,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7054,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li64),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7200,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g11521153 */
t6=t3;
-f_7174(t6,t4,t5);}
+f_7054(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k7198 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7200(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8467,25 +8663,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7200,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop11081121 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop11361149 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7147(t6,((C_word*)t0)[3],t5);}
+f_7027(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop11081121 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop11361149 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7147(t6,((C_word*)t0)[3],t5);}}
+f_7027(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){
+/* g1152 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7054(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8503,25 +8699,25 @@ 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);
+C_save_and_reclaim((void*)trf_7054,NULL,3,t0,t1,t2);}
+t3=C_i_cadr(t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t4);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[3],t5);
t7=C_SCHEME_END_OF_LIST;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
t9=C_SCHEME_FALSE;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);
+t11=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7082,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,a[5]=t6,a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
+t12=C_i_car(t2);
t13=C_SCHEME_UNDEFINED;
t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7152,a[2]=t8,a[3]=t14,a[4]=t10,a[5]=((C_word*)t0)[2],a[6]=((C_word)li63),tmp=(C_word)a,a+=7,tmp));
t16=((C_word*)t14)[1];
-f_7272(t16,t11,t12);}
+f_7152(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){
+/* loop1161 in g1152 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7152(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8540,16 +8736,16 @@ 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);
+C_save_and_reclaim((void*)trf_7152,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_slot(t2,C_fix(0));
+t4=f_6994(((C_word*)t0)[5],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
+t6=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=(C_word)C_slot(t2,C_fix(1));
-/* loop11331146 */
+t8=C_slot(t2,C_fix(1));
+/* loop11611174 */
t14=t1;
t15=t8;
t1=t14;
@@ -8558,8 +8754,8 @@ 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 */
+t8=C_slot(t2,C_fix(1));
+/* loop11611174 */
t14=t1;
t15=t8;
t1=t14;
@@ -8570,8 +8766,8 @@ 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){
+/* k7080 in g1152 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7082(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8586,22 +8782,22 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7082,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7086,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7210,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=(C_word)C_i_car(((C_word*)t0)[3]);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7090,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t8=C_i_car(((C_word*)t0)[3]);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7096,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word*)t0)[2],a[6]=((C_word)li62),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
-f_7216(t12,t7,t8);}
+f_7096(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){
+/* loop1184 in k7080 in g1152 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_7096(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8621,17 +8817,17 @@ 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);
+C_save_and_reclaim((void*)trf_7096,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7123,a[2]=((C_word*)t0)[5],a[3]=((C_word)li61),tmp=(C_word)a,a+=4,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=f_7123(C_a_i(&a,9),t3,t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
+t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop11561169 */
+t9=C_slot(t2,C_fix(1));
+/* loop11841197 */
t15=t1;
t16=t9;
t1=t15;
@@ -8640,8 +8836,8 @@ 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 */
+t9=C_slot(t2,C_fix(1));
+/* loop11841197 */
t15=t1;
t16=t9;
t1=t15;
@@ -8652,30 +8848,30 @@ 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){
+/* g1200 in loop1184 in k7080 in g1152 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static C_word C_fcall f_7123(C_word *a,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_stack_check;
-t2=f_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));}
+t2=f_6994(((C_word*)t0)[2],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,t1,t3);
+return(C_a_i_cons(&a,2,lf[167],t4));}
-/* 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){
+/* k7088 in k7080 in g1152 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7090(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k7084 in k7080 in g1152 in loop1136 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7086(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8684,83 +8880,83 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7086,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,lf[97],t5));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,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){
+/* k7019 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7021(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_7021,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7025,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
/* ##sys#append */
-t3=*((C_word*)lf[29]+1);
+t3=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k7023 in k7019 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7025(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+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){
+/* k7015 in k7011 in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_7017(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7137,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_7017,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,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){
+/* lookup in k6991 in k6988 in k6985 in k6982 in k6973 in a6970 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static C_word C_fcall f_6994(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_stack_check;
-t2=(C_word)C_i_assq(t1,((C_word*)t0)[2]);
-return((C_word)C_i_cdr(t2));}
+t2=C_i_assq(t1,((C_word*)t0)[2]);
+return(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){
+/* k6967 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6969(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 397 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 420 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[166],C_SCHEME_END_OF_LIST,t1);}
-/* k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2320(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2320,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2323,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6965,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 443 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[163]);}
-/* 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){
+/* k6963 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6965(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8769,57 +8965,57 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6965,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[163],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6886,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6888,a[2]=((C_word)li59),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 444 ##sys#er-transformer */
t6=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-/* 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){
+/* a6887 in k6963 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6888(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_6888,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6892,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 446 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[164],t2,lf[165]);}
-/* 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){
+/* k6890 in a6887 in k6963 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6892(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6892,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6895,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 447 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[131]);}
-/* 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){
+/* k6893 in k6890 in a6887 in k6963 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6895(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6895,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6898,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 448 r */
t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-/* 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){
+/* k6896 in k6893 in k6890 in a6887 in k6963 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6898(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8829,18 +9025,18 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6898,2,t0,t1);}
+t2=C_i_caddr(((C_word*)t0)[5]);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t3);
+t5=C_a_i_cons(&a,2,t1,t4);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6933,a[2]=((C_word*)t0)[3],a[3]=t5,a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 451 r */
t7=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[163]);}
-/* 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){
+/* k6931 in k6896 in k6893 in k6890 in a6887 in k6963 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6933(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8854,30 +9050,30 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6933,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[6]);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[5],t3);
+t5=C_a_i_cons(&a,2,t1,t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[5],t6);
+t8=C_a_i_cons(&a,2,((C_word*)t0)[4],t7);
+t9=C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
+t10=C_a_i_cons(&a,2,((C_word*)t0)[3],t9);
t11=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,(C_word)C_a_i_cons(&a,2,lf[97],t10));}
+((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,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){
+/* k6884 in k6963 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6886(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 418 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 441 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[164],((C_word*)t0)[2],t1);}
-/* k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2323(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8885,30 +9081,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2323,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2326,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6781,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6783,a[2]=((C_word)li58),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 455 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6783(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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 */
+C_save_and_reclaim((void*)tr5,(void*)f_6783,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6787,a[2]=t2,a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 457 r */
t6=t3;
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[21]);}
-/* 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){
+/* k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6787(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8917,49 +9113,49 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6787,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6789,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word)li57),tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6870,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6874,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=C_i_cdr(((C_word*)t0)[2]);
+/* chicken-syntax.scm: 471 quotify-proc */
t6=t2;
-f_6909(t6,t4,t5,lf[159]);}
+f_6789(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){
+/* k6872 in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6874(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k6868 in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6870(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6990,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_6870,2,t0,t1);}
t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,lf[162],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* quotify-proc in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_6789(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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_save_and_reclaim((void*)trf_6789,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6793,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 460 ##sys#check-syntax */
+t5=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t4,t3,t2,lf[161]);}
-/* 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){
+/* k6791 in quotify-proc in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6793(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8971,36 +9167,36 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_6793,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[5]);
+t3=C_i_pairp(t2);
+t4=(C_truep(t3)?C_i_car(t2):t2);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6802,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t4,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_i_pairp(t2))){
+t6=C_i_cdr(t2);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6850,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+t8=C_i_cdr(((C_word*)t0)[5]);
/* ##sys#append */
-t9=*((C_word*)lf[29]+1);
+t9=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,t8,C_SCHEME_END_OF_LIST);}
else{
t6=t5;
-f_6922(t6,(C_word)C_i_cadr(((C_word*)t0)[5]));}}
+f_6802(t6,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){
+/* k6848 in k6791 in quotify-proc in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6850(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6970,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_6850,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
-f_6922(t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
+f_6802(t3,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){
+/* k6800 in k6791 in quotify-proc in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_6802(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9011,65 +9207,65 @@ 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);
+C_save_and_reclaim((void*)trf_6802,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6805,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+t3=C_i_pairp(t1);
+t4=C_i_not(t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6814,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
if(C_truep(t4)){
t6=t5;
-f_6934(t6,t4);}
+f_6814(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 */
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6824,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t7=C_i_car(t1);
+/* chicken-syntax.scm: 466 c */
t8=((C_word*)t0)[3];
((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,((C_word*)t0)[2],t7);}}
-/* 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){
+/* k6822 in k6800 in k6791 in quotify-proc in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6824(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_6934(t2,(C_word)C_i_not(t1));}
+f_6814(t2,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){
+/* k6812 in k6800 in k6791 in quotify-proc in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_6814(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6934,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_6814,NULL,2,t0,t1);}
if(C_truep(t1)){
-/* chicken-syntax.scm: 444 syntax-error */
+/* chicken-syntax.scm: 467 syntax-error */
t2=*((C_word*)lf[12]+1);
((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[5],lf[159],lf[160],((C_word*)t0)[4],((C_word*)t0)[3]);}
else{
t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,2,((C_word*)t0)[4],((C_word*)t0)[3]));}}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k6803 in k6800 in k6791 in quotify-proc in k6785 in a6782 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6805(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6925,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_6805,2,t0,t1);}
t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k6779 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6781(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 430 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 453 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[159],C_SCHEME_END_OF_LIST,t1);}
-/* k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2326(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9077,30 +9273,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2326,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2329,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6618,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6620,a[2]=((C_word)li56),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 475 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6620(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_6620,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6624,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 477 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[157],t2,lf[158]);}
-/* 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){
+/* k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6624(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9108,29 +9304,29 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6624,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_cddr(((C_word*)t0)[4]);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6633,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 480 r */
t5=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[118]);}
-/* 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){
+/* k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6633(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6633,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6636,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 481 r */
t3=((C_word*)t0)[4];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-/* 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){
+/* k6634 in k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6636(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9138,15 +9334,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_6636,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6641,a[2]=t1,a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word)li55),tmp=(C_word)a,a+=8,tmp));
t5=((C_word*)t3)[1];
-f_6761(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_6641(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){
+/* fold in k6634 in k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_6641(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9168,50 +9364,50 @@ 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 */
+C_save_and_reclaim((void*)trf_6641,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_nullp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6655,a[2]=((C_word*)t0)[6],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 484 r */
t4=((C_word*)t0)[5];
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[55]);}
else{
-t3=(C_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 */
+t3=C_i_car(t2);
+t4=C_i_cdr(t2);
+if(C_truep(C_i_pairp(t3))){
+t5=C_i_cdr(t3);
+if(C_truep(C_i_nullp(t5))){
+t6=C_i_car(t3);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6715,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 488 fold */
t17=t7;
t18=t4;
t1=t17;
t2=t18;
goto loop;}
else{
-t6=(C_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 */
+t6=C_i_car(t3);
+t7=C_i_cadr(t3);
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,t6,t8);
+t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
+t11=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6753,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t10,a[5]=((C_word*)t0)[4],a[6]=t6,tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 492 fold */
t17=t11;
t18=t4;
t1=t17;
t2=t18;
goto loop;}}
else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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 */
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6686,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 487 fold */
t17=t5;
t18=t4;
t1=t17;
t2=t18;
goto loop;}}}
-/* 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){
+/* k6684 in fold in k6634 in k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6686(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9219,15 +9415,15 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6686,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,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){
+/* k6751 in fold in k6634 in k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6753(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9238,18 +9434,18 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6753,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[4],t6);
t8=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t7));}
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,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){
+/* k6713 in fold in k6634 in k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6715(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9257,47 +9453,47 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6715,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,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){
+/* k6653 in fold in k6634 in k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6655(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6655,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6659,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
/* ##sys#append */
-t3=*((C_word*)lf[29]+1);
+t3=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k6657 in k6653 in fold in k6634 in k6631 in k6622 in a6619 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6659(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6779,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_6659,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k6616 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6618(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 450 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 473 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[157],C_SCHEME_END_OF_LIST,t1);}
-/* k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2329(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9305,30 +9501,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2329,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2332,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6418,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6420,a[2]=((C_word)li54),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 496 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6420(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[6],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_6420,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6424,a[2]=t3,a[3]=t4,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 498 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[151],t2,lf[156]);}
-/* 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){
+/* k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6424(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9336,81 +9532,81 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6424,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[5]);
+t3=C_i_cddr(((C_word*)t0)[5]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6433,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 501 r */
t5=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[131]);}
-/* 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){
+/* k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6433(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6433,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6436,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 502 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
-/* 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){
+/* k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6436(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6436,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6439,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 503 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[43]);}
-/* 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){
+/* k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6439(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6439,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6442,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 504 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[155]);}
-/* 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){
+/* k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6442(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6442,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6445,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+/* chicken-syntax.scm: 505 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[55]);}
-/* 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){
+/* k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6445(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6445,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6452,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
+/* chicken-syntax.scm: 506 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-/* 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){
+/* k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6452(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9422,19 +9618,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6452,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6468,a[2]=t1,a[3]=((C_word*)t0)[8],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6470,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[9],a[5]=t7,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word)li53),tmp=(C_word)a,a+=10,tmp));
t9=((C_word*)t7)[1];
-f_6590(t9,t5,((C_word*)t0)[2]);}
+f_6470(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){
+/* expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_6470(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9442,35 +9638,35 @@ 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_save_and_reclaim((void*)trf_6470,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_slot(t2,C_fix(0));
+t4=C_slot(t2,C_fix(1));
+t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6486,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=t3,a[10]=((C_word*)t0)[8],a[11]=t1,tmp=(C_word)a,a+=12,tmp);
+/* chicken-syntax.scm: 512 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[151],t3,lf[153]);}
else{
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[154]);}}
-/* 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){
+/* k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6486(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6486,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6492,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
+t3=C_i_car(((C_word*)t0)[9]);
+/* chicken-syntax.scm: 513 c */
t4=((C_word*)t0)[3];
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}
-/* 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){
+/* k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6492(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9487,29 +9683,29 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_6492,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6499,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_cdr(((C_word*)t0)[7]);
/* ##sys#append */
-t4=*((C_word*)lf[29]+1);
+t4=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
else{
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6542,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6666,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=(C_word)C_i_car(((C_word*)t0)[7]);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6546,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t8=C_i_car(((C_word*)t0)[7]);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6552,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word*)t0)[2],a[6]=((C_word)li52),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
-f_6672(t12,t7,t8);}}
+f_6552(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){
+/* loop1321 in k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_6552(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9529,17 +9725,17 @@ 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);
+C_save_and_reclaim((void*)trf_6552,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6579,a[2]=((C_word*)t0)[5],a[3]=((C_word)li51),tmp=(C_word)a,a+=4,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=f_6579(C_a_i(&a,9),t3,t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
+t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop12931306 */
+t9=C_slot(t2,C_fix(1));
+/* loop13211334 */
t15=t1;
t16=t9;
t1=t15;
@@ -9548,8 +9744,8 @@ 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 */
+t9=C_slot(t2,C_fix(1));
+/* loop13211334 */
t15=t1;
t16=t9;
t1=t15;
@@ -9560,28 +9756,28 @@ 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){
+/* g1337 in loop1321 in k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static C_word C_fcall f_6579(C_word *a,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_stack_check;
-t2=(C_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));}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[2],t2);
+return(C_a_i_cons(&a,2,lf[152],t3));}
-/* 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){
+/* k6544 in k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6546(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k6540 in k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6542(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9589,31 +9785,31 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_6542,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6534,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+t4=C_i_cdr(((C_word*)t0)[2]);
/* ##sys#append */
-t5=*((C_word*)lf[29]+1);
+t5=*((C_word*)lf[27]+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){
+/* k6532 in k6540 in k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6534(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6534,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[7],t1);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6530,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 518 expand */
t4=((C_word*)((C_word*)t0)[3])[1];
-f_6590(t4,t3,((C_word*)t0)[2]);}
+f_6470(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){
+/* k6528 in k6532 in k6540 in k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6530(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9621,78 +9817,78 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6530,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[5],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,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){
+/* k6497 in k6490 in k6484 in expand in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6499(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6619,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_6499,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k6466 in k6450 in k6443 in k6440 in k6437 in k6434 in k6431 in k6422 in a6419 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6468(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6468,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* k6416 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6418(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 471 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 494 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[151],C_SCHEME_END_OF_LIST,t1);}
-/* k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2332(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2332,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2335,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6414,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 599 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[78]);}
-/* 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){
+/* k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6414(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6414,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[78],t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6410,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 600 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[107]);}
-/* 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){
+/* k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6410(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9702,32 +9898,32 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6410,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[107],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5825,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5827,a[2]=((C_word)li50),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 601 ##sys#er-transformer */
t7=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}
-/* 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){
+/* a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5827(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_5827,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5831,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 603 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[137],t2,lf[150]);}
-/* 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){
+/* k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5831(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9736,43 +9932,43 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5831,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_caddr(((C_word*)t0)[4]);
+t4=C_i_cdddr(((C_word*)t0)[4]);
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5843,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=t2,a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 607 r */
t6=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[118]);}
-/* 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){
+/* k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5843(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5843,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5846,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 608 r */
t3=((C_word*)t0)[6];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-/* 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){
+/* k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5846(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5846,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5849,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 609 r */
t3=((C_word*)t0)[6];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-/* 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){
+/* k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5849(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9784,33 +9980,33 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5849,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t6=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5851,a[2]=t1,a[3]=((C_word)li40),tmp=(C_word)a,a+=4,tmp));
+t7=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5948,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word)li42),tmp=(C_word)a,a+=6,tmp));
+t8=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6149,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t5,a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[3],a[7]=t1,a[8]=((C_word*)t0)[4],a[9]=((C_word*)t0)[5],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 647 ##sys#check-syntax */
+t9=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,lf[137],((C_word*)t0)[2],lf[149]);}
-/* 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){
+/* k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6149(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_6149,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6152,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 648 ##sys#check-syntax */
+t3=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[137],((C_word*)t0)[8],lf[148]);}
-/* 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){
+/* k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6152(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9823,20 +10019,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_6152,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6155,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6481,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li52),tmp=(C_word)a,a+=6,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6361,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li49),tmp=(C_word)a,a+=6,tmp));
t10=((C_word*)t8)[1];
-f_6481(t10,t6,((C_word*)t0)[2]);}
+f_6361(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){
+/* loop1404 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_6361(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9845,12 +10041,12 @@ 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))){
+C_save_and_reclaim((void*)trf_6361,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
t3=*((C_word*)lf[78]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6390,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g14201421 */
t6=t3;
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
else{
@@ -9858,8 +10054,8 @@ 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){
+/* k6388 in loop1404 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6390(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9871,25 +10067,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6390,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop13761389 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop14041417 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6481(t6,((C_word*)t0)[3],t5);}
+f_6361(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop13761389 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop14041417 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6481(t6,((C_word*)t0)[3],t5);}}
+f_6361(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){
+/* k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6155(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9903,21 +10099,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6155,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6156,a[2]=((C_word)li43),tmp=(C_word)a,a+=3,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_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);
+t7=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6171,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=t1,a[11]=((C_word*)t0)[9],tmp=(C_word)a,a+=12,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6317,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=t2,a[6]=((C_word*)t0)[5],a[7]=((C_word)li48),tmp=(C_word)a,a+=8,tmp));
t11=((C_word*)t9)[1];
-f_6437(t11,t7,t1);}
+f_6317(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){
+/* loop1431 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_6317(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9926,21 +10122,21 @@ 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 */
+C_save_and_reclaim((void*)trf_6317,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6344,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li47),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6355,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g14471448 */
t6=t3;
-f_6464(t6,t4,t5);}
+f_6344(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k6353 in loop1431 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6355(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9952,46 +10148,46 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6355,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14031416 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop14311444 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6437(t6,((C_word*)t0)[3],t5);}
+f_6317(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14031416 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop14311444 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6437(t6,((C_word*)t0)[3],t5);}}
+f_6317(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){
+/* g1447 in loop1431 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_6344(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_6344,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6352,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 656 prefix-sym */
+f_6156(t3,lf[147],t2);}
-/* 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){
+/* k6350 in g1447 in loop1431 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6352(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 633 r */
+/* chicken-syntax.scm: 656 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){
+/* k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6171(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10004,20 +10200,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_6171,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6174,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6402,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li49),tmp=(C_word)a,a+=6,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6282,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li46),tmp=(C_word)a,a+=6,tmp));
t10=((C_word*)t8)[1];
-f_6402(t10,t6,((C_word*)t0)[2]);}
+f_6282(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){
+/* loop1456 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_6282(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -10026,12 +10222,12 @@ 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))){
+C_save_and_reclaim((void*)trf_6282,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
t3=*((C_word*)lf[146]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6311,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g14721473 */
t6=t3;
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
else{
@@ -10039,8 +10235,8 @@ 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){
+/* k6309 in loop1456 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6311(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10052,51 +10248,51 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6311,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14281441 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop14561469 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6402(t6,((C_word*)t0)[3],t5);}
+f_6282(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14281441 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop14561469 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6402(t6,((C_word*)t0)[3],t5);}}
+f_6282(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){
+/* k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6174(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[13],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6174,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_6177,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
+/* chicken-syntax.scm: 660 r */
t3=((C_word*)t0)[6];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[145]);}
-/* 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){
+/* k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6177(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6177,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6180,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
+/* chicken-syntax.scm: 663 r */
t3=((C_word*)t0)[7];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[144]);}
-/* 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){
+/* k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6180(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10109,20 +10305,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_6180,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6183,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=t1,a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6238,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[7],a[7]=((C_word)li45),tmp=(C_word)a,a+=8,tmp));
t10=((C_word*)t8)[1];
-f_6358(t10,t6,((C_word*)t0)[12]);}
+f_6238(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){
+/* loop1482 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_6238(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -10131,21 +10327,21 @@ 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 */
+C_save_and_reclaim((void*)trf_6238,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6265,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li44),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6276,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g14981499 */
t6=t3;
-f_6385(t6,t4,t5);}
+f_6265(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k6274 in loop1482 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6276(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10157,85 +10353,85 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6276,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14541467 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop14821495 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6358(t6,((C_word*)t0)[3],t5);}
+f_6238(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop14541467 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop14821495 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6358(t6,((C_word*)t0)[3],t5);}}
+f_6238(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){
+/* g1498 in loop1482 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_6265(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_6265,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6273,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 665 prefix-sym */
+f_6156(t3,lf[143],t2);}
-/* 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){
+/* k6271 in g1498 in loop1482 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6273(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 642 r */
+/* chicken-syntax.scm: 665 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){
+/* k6181 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6183(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[13],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6183,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_6186,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],tmp=(C_word)a,a+=13,tmp);
+/* chicken-syntax.scm: 668 make-default-procs */
t3=((C_word*)((C_word*)t0)[3])[1];
-f_5971(t3,t2,((C_word*)t0)[4],((C_word*)t0)[8],t1,((C_word*)t0)[2]);}
+f_5851(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){
+/* k6184 in k6181 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6186(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6186,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6189,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t1,a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],tmp=(C_word)a,a+=11,tmp);
+/* chicken-syntax.scm: 670 make-if-tree */
t3=((C_word*)((C_word*)t0)[4])[1];
-f_6068(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2],((C_word*)t0)[7],((C_word*)t0)[11]);}
+f_5948(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){
+/* k6187 in k6184 in k6181 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6189(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6189,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6196,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
+/* chicken-syntax.scm: 673 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[142]);}
-/* 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){
+/* k6194 in k6187 in k6184 in k6181 in k6178 in k6175 in k6172 in k6169 in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6196(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10250,55 +10446,55 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6196,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[8],((C_word*)t0)[7]);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[5],t6);
+t8=C_a_i_cons(&a,2,t7,((C_word*)t0)[4]);
+t9=C_a_i_cons(&a,2,t3,t8);
+t10=C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
+t11=C_a_i_cons(&a,2,t9,t10);
t12=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,(C_word)C_a_i_cons(&a,2,t1,t11));}
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,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){
+/* prefix-sym in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_6156(C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_6156,NULL,3,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6164,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6168,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 651 symbol->string */
t6=*((C_word*)lf[141]+1);
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t3);}
-/* 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){
+/* k6166 in prefix-sym in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6168(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 628 string-append */
+/* chicken-syntax.scm: 651 string-append */
t2=*((C_word*)lf[140]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k6162 in prefix-sym in k6153 in k6150 in k6147 in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6164(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 628 string->symbol */
+/* chicken-syntax.scm: 651 string->symbol */
t2=*((C_word*)lf[139]+1);
((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-/* make-if-tree in 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){
+/* make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_5948(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -10306,15 +10502,15 @@ 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);}
+C_save_and_reclaim((void*)trf_5948,NULL,6,t0,t1,t2,t3,t4,t5);}
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5954,a[2]=t7,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t4,a[7]=t5,a[8]=((C_word)li41),tmp=(C_word)a,a+=9,tmp));
t9=((C_word*)t7)[1];
-f_6074(t9,t1,t2,t3,C_SCHEME_END_OF_LIST);}
+f_5954(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){
+/* recur in make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_5954(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -10325,39 +10521,39 @@ 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 */
+C_save_and_reclaim((void*)trf_5954,NULL,5,t0,t1,t2,t3,t4);}
+if(C_truep(C_i_nullp(t2))){
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6028,a[2]=t4,a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 635 r */
t6=((C_word*)t0)[4];
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[125]);}
else{
-t5=(C_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 */
+t5=C_i_car(t2);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,lf[125],t6);
+t8=C_i_car(t3);
+t9=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6142,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[5],a[8]=t1,a[9]=t7,a[10]=((C_word*)t0)[3],a[11]=t5,a[12]=((C_word*)t0)[7],a[13]=t8,tmp=(C_word)a,a+=14,tmp);
+/* chicken-syntax.scm: 640 reverse */
t10=*((C_word*)lf[61]+1);
((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t4);}}
-/* 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){
+/* k6140 in recur in make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6142(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[17],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6142,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[13],t1);
+t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6130,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t2,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
+/* chicken-syntax.scm: 641 r */
t4=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[78]);}
-/* 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){
+/* k6128 in k6140 in recur in make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6130(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10367,18 +10563,18 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6130,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[12],t4);
+t6=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6114,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=t5,a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
+/* chicken-syntax.scm: 642 r */
t7=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[107]);}
-/* 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){
+/* k6112 in k6128 in k6140 in recur in make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6114(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10393,23 +10589,23 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6114,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[13],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[12],t6);
+t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6078,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=t7,tmp=(C_word)a,a+=8,tmp);
+t9=C_i_cdr(((C_word*)t0)[6]);
+t10=C_i_cdr(((C_word*)t0)[5]);
+t11=C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)t0)[3]);
+/* chicken-syntax.scm: 643 recur */
t12=((C_word*)((C_word*)t0)[2])[1];
-f_6074(t12,t8,t9,t10,t11);}
+f_5954(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){
+/* k6076 in k6112 in k6128 in k6140 in recur in make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6078(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10420,18 +10616,18 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6078,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[5],t5);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[4],t6);
t8=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t7));}
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,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){
+/* k6026 in recur in make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6028(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10441,18 +10637,18 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6028,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,lf[74],t4);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6016,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t5,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 636 reverse */
t7=*((C_word*)lf[61]+1);
((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,((C_word*)t0)[2]);}
-/* 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){
+/* k6014 in k6026 in recur in make-if-tree in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_6016(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10468,62 +10664,62 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6016,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
+t3=C_a_i_cons(&a,2,lf[138],C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,lf[41],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,lf[128],t5);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,t6,t7);
+t9=C_a_i_cons(&a,2,lf[129],t8);
+t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
+t11=C_a_i_cons(&a,2,t2,t10);
+t12=C_a_i_cons(&a,2,((C_word*)t0)[4],t11);
t13=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t12));}
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,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){
+/* make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_5851(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_5851,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5859,a[2]=t4,a[3]=t5,a[4]=t3,a[5]=t1,a[6]=((C_word*)t0)[2],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 615 reverse */
t7=*((C_word*)lf[61]+1);
((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,t2);}
-/* 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){
+/* k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5859(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5859,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5863,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 616 reverse */
t3=*((C_word*)lf[61]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k5861 in k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5863(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5863,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5867,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 617 reverse */
t3=*((C_word*)lf[61]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k5865 in k5861 in k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5867(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10531,15 +10727,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5867,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5989,a[2]=t3,a[3]=((C_word*)t0)[6],a[4]=((C_word)li42),tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5869,a[2]=t3,a[3]=((C_word*)t0)[6],a[4]=((C_word)li39),tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_5989(t5,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+f_5869(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){
+/* recur in k5865 in k5861 in k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_5869(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -10547,50 +10743,50 @@ 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))){
+C_save_and_reclaim((void*)trf_5869,NULL,6,t0,t1,t2,t3,t4,t5);}
+if(C_truep(C_i_nullp(t2))){
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_END_OF_LIST);}
else{
-t6=(C_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 */
+t6=C_i_cdr(t2);
+t7=C_i_car(t3);
+t8=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5922,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=t3,a[6]=t1,a[7]=t7,a[8]=((C_word*)t0)[3],a[9]=t5,tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 622 reverse */
t9=*((C_word*)lf[61]+1);
((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,t6);}}
-/* 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){
+/* k5920 in recur in k5865 in k5861 in k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5922(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[15],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5922,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5934,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5938,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 623 reverse */
t4=*((C_word*)lf[61]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-/* 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){
+/* k5936 in k5920 in recur in k5865 in k5861 in k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5938(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_5938,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[3]);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
/* ##sys#append */
-t4=*((C_word*)lf[29]+1);
+t4=*((C_word*)lf[27]+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){
+/* k5932 in k5920 in recur in k5865 in k5861 in k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5934(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10605,87 +10801,87 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5934,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[10],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[9],t3);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[8],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[7],t6);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5890,a[2]=t7,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t9=C_i_cdr(((C_word*)t0)[5]);
+t10=C_i_cdr(((C_word*)t0)[4]);
+t11=C_i_car(((C_word*)t0)[5]);
+/* chicken-syntax.scm: 624 recur */
t12=((C_word*)((C_word*)t0)[3])[1];
-f_5989(t12,t8,((C_word*)t0)[2],t9,t10,t11);}
+f_5869(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){
+/* k5888 in k5932 in k5920 in recur in k5865 in k5861 in k5857 in make-default-procs in k5847 in k5844 in k5841 in k5829 in a5826 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5890(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6010,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_5890,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k5823 in k6408 in k6412 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5825(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 574 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 597 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[137],((C_word*)t0)[2],t1);}
-/* k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2335(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2335,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2338,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5817,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 693 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[125]);}
-/* 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){
+/* k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5817(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5817,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[125],t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5813,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 694 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[78]);}
-/* 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){
+/* k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5813(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5813,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[78],t1);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5809,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 695 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[107]);}
-/* 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){
+/* k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5809(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10696,72 +10892,72 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5809,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[107],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5600,a[2]=t5,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5602,a[2]=((C_word)li38),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 696 ##sys#er-transformer */
t8=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t6,t7);}
-/* 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){
+/* a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5602(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_5602,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5606,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 698 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[133],t2,lf[136]);}
-/* 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){
+/* k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5606(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5606,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5609,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 699 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[131]);}
-/* 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){
+/* k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5609(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5609,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5612,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 700 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
-/* 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){
+/* k5610 in k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5612(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5612,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5619,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 701 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-/* 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){
+/* k5617 in k5610 in k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5619(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10771,18 +10967,18 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5619,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[6]);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[5],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5769,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t5,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[5],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 702 r */
t7=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[125]);}
-/* 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){
+/* k5767 in k5617 in k5610 in k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5769(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10792,52 +10988,52 @@ 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))){
+C_save_and_reclaim((void*)tr2,(void*)f_5769,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=C_i_cddr(((C_word*)t0)[7]);
+t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5654,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t3,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
+if(C_truep(C_i_nullp(t4))){
t6=t5;
-f_5774(2,t6,C_SCHEME_FALSE);}
+f_5654(2,t6,C_SCHEME_FALSE);}
else{
-t6=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t6))){
+t6=C_i_cdr(t4);
+if(C_truep(C_i_nullp(t6))){
t7=t5;
-f_5774(2,t7,(C_word)C_i_car(t4));}
+f_5654(2,t7,C_i_car(t4));}
else{
/* ##sys#error */
t7=*((C_word*)lf[129]+1);
((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[135],t4);}}}
-/* 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){
+/* k5652 in k5767 in k5617 in k5610 in k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5654(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5654,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5730,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 704 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[125]);}
-/* 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){
+/* k5728 in k5652 in k5767 in k5617 in k5610 in k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5730(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5730,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5742,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+/* chicken-syntax.scm: 704 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[107]);}
-/* 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){
+/* k5740 in k5728 in k5652 in k5767 in k5617 in k5610 in k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5742(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10849,20 +11045,20 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5742,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[9],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,lf[74],t6);
+t8=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5714,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t7,a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 705 r */
t9=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,lf[78]);}
-/* 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){
+/* k5712 in k5740 in k5728 in k5652 in k5767 in k5617 in k5610 in k5607 in k5604 in a5601 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5714(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10886,55 +11082,55 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_5714,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=C_a_i_cons(&a,2,lf[134],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,lf[41],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,lf[128],t6);
+t8=C_a_i_cons(&a,2,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,t7,t8);
+t10=C_a_i_cons(&a,2,lf[129],t9);
+t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=C_a_i_cons(&a,2,t3,t11);
+t13=C_a_i_cons(&a,2,((C_word*)t0)[8],t12);
+t14=C_a_i_cons(&a,2,((C_word*)t0)[7],t13);
+t15=C_a_i_cons(&a,2,t14,C_SCHEME_END_OF_LIST);
+t16=C_a_i_cons(&a,2,((C_word*)t0)[6],t15);
+t17=C_a_i_cons(&a,2,((C_word*)t0)[5],t16);
+t18=C_a_i_cons(&a,2,((C_word*)t0)[7],t17);
+t19=C_a_i_cons(&a,2,t18,C_SCHEME_END_OF_LIST);
+t20=C_a_i_cons(&a,2,((C_word*)t0)[4],t19);
t21=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t21+1)))(2,t21,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t20));}
+((C_proc2)(void*)(*((C_word*)t21+1)))(2,t21,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){
+/* k5598 in k5807 in k5811 in k5815 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5600(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 668 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 691 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[133],((C_word*)t0)[2],t1);}
-/* k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2338(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2338,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2341,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5592,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 728 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[125]);}
-/* 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){
+/* k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5592(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10943,31 +11139,31 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5592,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[125],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5286,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5288,a[2]=((C_word)li37),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 729 ##sys#er-transformer */
t6=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-/* 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){
+/* a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5288(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_5288,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5292,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 731 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[126],t2,lf[132]);}
-/* 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){
+/* k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5292(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10976,82 +11172,82 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5292,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_caddr(((C_word*)t0)[4]);
+t4=C_i_cdddr(((C_word*)t0)[4]);
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5304,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=((C_word*)t0)[3],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 735 r */
t6=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[64]);}
-/* 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){
+/* k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5304(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5304,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5307,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 736 r */
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[125]);}
-/* 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){
+/* k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5307(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5307,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5310,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 737 r */
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[78]);}
-/* 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){
+/* k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5310(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5310,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5313,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 738 r */
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[107]);}
-/* 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){
+/* k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5313(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5313,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5316,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+/* chicken-syntax.scm: 739 r */
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
-/* 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){
+/* k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5316(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5316,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_5319,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
+/* chicken-syntax.scm: 740 r */
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[131]);}
-/* 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){
+/* k5317 in k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5319(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11063,19 +11259,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_5319,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5338,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5340,a[2]=((C_word*)t0)[3],a[3]=t7,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[8],a[10]=((C_word)li36),tmp=(C_word)a,a+=11,tmp));
t9=((C_word*)t7)[1];
-f_5460(t9,t5,t1,((C_word*)t0)[2]);}
+f_5340(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){
+/* loop in k5317 in k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_5340(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -11091,46 +11287,46 @@ 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);
+C_save_and_reclaim((void*)trf_5340,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t3))){
+t4=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[9],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,lf[74],t6);
+t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5406,a[2]=((C_word*)t0)[7],a[3]=t1,a[4]=t7,a[5]=t2,a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
/* ##sys#append */
-t9=*((C_word*)lf[29]+1);
+t9=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t8,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);}
else{
-t4=(C_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 */
+t4=C_i_car(t3);
+if(C_truep(C_i_pairp(t4))){
+t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_5430,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[8],a[5]=t1,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[9],a[10]=t2,a[11]=t4,tmp=(C_word)a,a+=12,tmp);
+/* chicken-syntax.scm: 751 r */
t6=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[130]);}
else{
-t5=(C_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);
+t5=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,t4,t5);
+t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5568,a[2]=((C_word*)t0)[8],a[3]=t1,a[4]=t7,tmp=(C_word)a,a+=5,tmp);
/* ##sys#append */
-t9=*((C_word*)lf[29]+1);
+t9=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t8,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);}}}
-/* 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){
+/* k5566 in loop in k5317 in k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5568(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5688,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_5568,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,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){
+/* k5428 in loop in k5317 in k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5430(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11163,55 +11359,55 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5430,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[11]);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[9],t3);
+t5=C_i_cadr(((C_word*)t0)[11]);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[8],t6);
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,t5,t8);
+t10=C_a_i_cons(&a,2,t4,t9);
+t11=C_a_i_cons(&a,2,((C_word*)t0)[7],t10);
+t12=C_a_i_cons(&a,2,t11,C_SCHEME_END_OF_LIST);
+t13=C_a_i_cons(&a,2,t2,t12);
+t14=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
+t15=C_a_i_cons(&a,2,((C_word*)t0)[9],t14);
+t16=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);
+t17=C_a_i_cons(&a,2,lf[41],t16);
+t18=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
+t19=C_a_i_cons(&a,2,((C_word*)t0)[6],t18);
+t20=C_a_i_cons(&a,2,t19,C_SCHEME_END_OF_LIST);
+t21=C_a_i_cons(&a,2,t17,t20);
+t22=C_a_i_cons(&a,2,t15,t21);
+t23=C_a_i_cons(&a,2,((C_word*)t0)[7],t22);
+t24=C_a_i_cons(&a,2,t23,C_SCHEME_END_OF_LIST);
+t25=C_a_i_cons(&a,2,t1,t24);
+t26=C_a_i_cons(&a,2,t25,C_SCHEME_END_OF_LIST);
+t27=C_a_i_cons(&a,2,t13,t26);
+t28=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5449,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t27,tmp=(C_word)a,a+=5,tmp);
+t29=C_i_cdr(((C_word*)t0)[3]);
+/* chicken-syntax.scm: 758 loop */
t30=((C_word*)((C_word*)t0)[2])[1];
-f_5460(t30,t28,t1,t29);}
+f_5340(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){
+/* k5447 in k5428 in loop in k5317 in k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5449(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_5449,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* k5404 in loop in k5317 in k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5406(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11228,107 +11424,107 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_5406,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[6],t2);
+t4=C_a_i_cons(&a,2,lf[127],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,lf[41],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,lf[128],t6);
+t8=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,t7,t8);
+t10=C_a_i_cons(&a,2,lf[129],t9);
+t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=C_a_i_cons(&a,2,t3,t11);
+t13=C_a_i_cons(&a,2,((C_word*)t0)[4],t12);
t14=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t13));}
+((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,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){
+/* k5336 in k5317 in k5314 in k5311 in k5308 in k5305 in k5302 in k5290 in a5287 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5338(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_5338,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* k5284 in k5590 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5286(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 703 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 726 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[126],((C_word*)t0)[2],t1);}
-/* k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2341(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2341,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2344,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5278,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 766 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[106]);}
-/* 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){
+/* k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5278(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5278,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[106],t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5274,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 767 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[78]);}
-/* 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){
+/* k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5274(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5274,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[78],t1);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5270,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 768 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[107]);}
-/* 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){
+/* k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5270(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5270,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[107],t1);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5266,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 769 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[108]);}
-/* 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){
+/* k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5266(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11340,49 +11536,49 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5266,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[108],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[5],t3);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[3],t5);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4738,a[2]=t6,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4740,a[2]=((C_word)li35),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 770 ##sys#er-transformer */
t9=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t7,t8);}
-/* 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){
+/* a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4740(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_4740,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4744,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 772 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[109],t2,lf[124]);}
-/* 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){
+/* k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4744(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4744,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4746,a[2]=((C_word*)t0)[4],a[3]=((C_word)li26),tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4781,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 778 require */
t4=*((C_word*)lf[122]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[123]);}
-/* 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){
+/* k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4781(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11397,22 +11593,22 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4781,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4784,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5303,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-t8=(C_word)C_i_cdr(((C_word*)t0)[3]);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5183,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t8=C_i_cdr(((C_word*)t0)[3]);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5309,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word)li37),tmp=(C_word)a,a+=6,tmp));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5189,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word)li34),tmp=(C_word)a,a+=6,tmp));
t12=((C_word*)t10)[1];
-f_5309(t12,t7,t8);}
+f_5189(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){
+/* loop1589 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_5189(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -11422,13 +11618,13 @@ 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 */
+C_save_and_reclaim((void*)trf_5189,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5230,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=C_i_car(t4);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5226,a[2]=((C_word)li33),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 780 ##sys#decompose-lambda-list */
t7=*((C_word*)lf[115]+1);
((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t3,t5,t6);}
else{
@@ -11436,19 +11632,19 @@ 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){
+/* a5225 in loop1589 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5226(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word *a;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_5346,5,t0,t1,t2,t3,t4);}
+C_save_and_reclaim((void*)tr5,(void*)f_5226,5,t0,t1,t2,t3,t4);}
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
-/* 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){
+/* k5228 in loop1589 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5230(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11460,175 +11656,175 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_5230,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop15611574 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop15891602 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_5309(t6,((C_word*)t0)[3],t5);}
+f_5189(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop15611574 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop15891602 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_5309(t6,((C_word*)t0)[3],t5);}}
+f_5189(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){
+/* k5181 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5183(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_apply(4,0,((C_word*)t0)[2],*((C_word*)lf[121]+1),t1);}
-/* 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){
+/* k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4784(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4784,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4787,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 784 genvars */
t3=((C_word*)t0)[2];
-f_4866(t3,t2,t1);}
+f_4746(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){
+/* k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4787(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4787,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4790,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 785 r */
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[120]);}
-/* 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){
+/* k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4790(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4790,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4793,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 786 r */
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[119]);}
-/* 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){
+/* k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4793(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4793,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4796,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 787 r */
t3=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-/* 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){
+/* k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4796(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4796,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4799,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 788 r */
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-/* 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){
+/* k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4799(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4799,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4802,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+/* chicken-syntax.scm: 789 r */
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[106]);}
-/* 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){
+/* k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4802(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4802,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_4805,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
+/* chicken-syntax.scm: 790 r */
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[108]);}
-/* 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){
+/* k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4805(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[13],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4805,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_4808,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
+/* chicken-syntax.scm: 791 r */
t3=((C_word*)t0)[4];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[78]);}
-/* 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){
+/* k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4808(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4808,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_4811,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
+/* chicken-syntax.scm: 792 r */
t3=((C_word*)t0)[5];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[107]);}
-/* 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){
+/* k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4811(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[15],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4811,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_4814,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],tmp=(C_word)a,a+=15,tmp);
+/* chicken-syntax.scm: 793 r */
t3=((C_word*)t0)[5];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
-/* 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){
+/* k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4814(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[16],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4814,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_4825,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],tmp=(C_word)a,a+=16,tmp);
+/* chicken-syntax.scm: 794 append */
t3=*((C_word*)lf[48]+1);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[8],((C_word*)t0)[14]);}
-/* 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){
+/* k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4825(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11641,21 +11837,21 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4825,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[15],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,lf[110],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[14],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4849,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=t1,a[5]=((C_word*)t0)[13],a[6]=t6,tmp=(C_word)a,a+=7,tmp);
+t8=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_4851,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[14],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[13],a[11]=((C_word*)t0)[9],a[12]=((C_word*)t0)[10],a[13]=((C_word)li32),tmp=(C_word)a,a+=14,tmp);
+t9=C_i_cdr(((C_word*)t0)[2]);
+/* chicken-syntax.scm: 796 fold-right */
t10=*((C_word*)lf[116]+1);
((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t7,t8,lf[117],t9);}
-/* 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){
+/* a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4851(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -11663,15 +11859,15 @@ 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 */
+C_save_and_reclaim((void*)tr4,(void*)f_4851,4,t0,t1,t2,t3);}
+t4=C_i_car(t2);
+t5=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_4861,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t2,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=t3,a[14]=((C_word*)t0)[12],a[15]=((C_word)li31),tmp=(C_word)a,a+=16,tmp);
+/* chicken-syntax.scm: 798 ##sys#decompose-lambda-list */
t6=*((C_word*)lf[115]+1);
((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t1,t4,t5);}
-/* 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){
+/* a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4861(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -11679,15 +11875,15 @@ 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_save_and_reclaim((void*)tr5,(void*)f_4861,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_4865,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t4,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=t2,a[14]=((C_word*)t0)[12],a[15]=t1,a[16]=((C_word*)t0)[13],a[17]=((C_word*)t0)[14],a[18]=t3,tmp=(C_word)a,a+=19,tmp);
+t6=C_i_car(((C_word*)t0)[9]);
+/* chicken-syntax.scm: 801 ##sys#check-syntax */
+t7=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[109],t6,lf[114]);}
-/* 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){
+/* k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4865(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11699,27 +11895,27 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4865,2,t0,t1);}
+t2=C_fixnum_difference(((C_word*)t0)[18],((C_word*)t0)[17]);
+t3=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_4879,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[18],a[11]=((C_word*)t0)[13],a[12]=((C_word*)t0)[17],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],tmp=(C_word)a,a+=16,tmp);
if(C_truep(((C_word*)t0)[10])){
-t4=(C_word)C_eqp(t2,C_fix(0));
+t4=C_eqp(t2,C_fix(0));
if(C_truep(t4)){
t5=t3;
-f_4999(t5,C_SCHEME_TRUE);}
+f_4879(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);
+t5=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[4],t5);
t7=t3;
-f_4999(t7,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t6));}}
+f_4879(t7,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);
+t4=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
t6=t3;
-f_4999(t6,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}}
+f_4879(t6,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){
+/* k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_4879(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11727,15 +11923,15 @@ 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);
+C_save_and_reclaim((void*)trf_4879,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4887,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[14],a[4]=t1,a[5]=((C_word*)t0)[15],tmp=(C_word)a,a+=6,tmp);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4893,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word)li27),tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4903,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word)li30),tmp=(C_word)a,a+=11,tmp);
/* ##sys#call-with-values */
C_call_with_values(4,0,t2,t3,t4);}
-/* 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){
+/* a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4903(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -11745,16 +11941,16 @@ 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);
+C_save_and_reclaim((void*)tr4,(void*)f_4903,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4907,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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));
+t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4979,a[2]=((C_word*)t0)[3],a[3]=t6,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[7],a[9]=((C_word)li29),tmp=(C_word)a,a+=10,tmp));
t8=((C_word*)t6)[1];
-f_5099(t8,t4,t3,((C_word*)t0)[2]);}
+f_4979(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){
+/* build in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_4979(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -11769,46 +11965,46 @@ 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))){
+C_save_and_reclaim((void*)trf_4979,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t2))){
if(C_truep(((C_word*)t0)[8])){
-t4=(C_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]);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[8],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5004,a[2]=((C_word*)t0)[7],a[3]=t1,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+t8=C_i_cdr(((C_word*)t0)[6]);
/* ##sys#append */
-t9=*((C_word*)lf[29]+1);
+t9=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,t8,C_SCHEME_END_OF_LIST);}
else{
-t4=(C_word)C_i_cddr(((C_word*)t0)[6]);
-if(C_truep((C_word)C_i_nullp(t4))){
+t4=C_i_cddr(((C_word*)t0)[6]);
+if(C_truep(C_i_nullp(t4))){
t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_cadr(((C_word*)t0)[6]));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_i_cadr(((C_word*)t0)[6]));}
else{
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5036,a[2]=((C_word*)t0)[7],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t6=C_i_cdr(((C_word*)t0)[6]);
/* ##sys#append */
-t7=*((C_word*)lf[29]+1);
+t7=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}}}
else{
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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 */
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5047,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[7],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t3,a[8]=t2,tmp=(C_word)a,a+=9,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5127,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 816 gensym */
t6=*((C_word*)lf[60]+1);
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-/* 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){
+/* k5125 in build in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5127(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 793 r */
+/* chicken-syntax.scm: 816 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){
+/* k5045 in build in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5047(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11827,70 +12023,70 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5047,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[8]);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,t2,t5);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,((C_word*)t0)[5],t7);
+t9=C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
+t10=C_a_i_cons(&a,2,t1,t9);
+t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=C_a_i_cons(&a,2,t6,t11);
+t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5066,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t12,tmp=(C_word)a,a+=5,tmp);
+t14=C_i_cdr(((C_word*)t0)[8]);
+if(C_truep(C_i_pairp(t14))){
+t15=C_i_cdr(((C_word*)t0)[8]);
+/* chicken-syntax.scm: 820 build */
t16=((C_word*)((C_word*)t0)[2])[1];
-f_5099(t16,t13,t15,t1);}
+f_4979(t16,t13,t15,t1);}
else{
-/* chicken-syntax.scm: 798 build */
+/* chicken-syntax.scm: 821 build */
t15=((C_word*)((C_word*)t0)[2])[1];
-f_5099(t15,t13,C_SCHEME_END_OF_LIST,t1);}}
+f_4979(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){
+/* k5064 in k5045 in build in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5066(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_5066,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* k5034 in build in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5036(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5156,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+C_save_and_reclaim((void*)tr2,(void*)f_5036,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,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){
+/* k5002 in build in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_5004(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5124,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_5004,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,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){
+/* k4905 in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4907(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11904,8 +12100,8 @@ 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]))){
+C_save_and_reclaim((void*)tr2,(void*)f_4907,2,t0,t1);}
+if(C_truep(C_i_nullp(((C_word*)t0)[5]))){
t2=t1;
t3=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
@@ -11914,15 +12110,15 @@ 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);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4924,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5050,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li31),tmp=(C_word)a,a+=6,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4930,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li28),tmp=(C_word)a,a+=6,tmp));
t10=((C_word*)t8)[1];
-f_5050(t10,t6,((C_word*)t0)[5],((C_word*)t0)[2]);}}
+f_4930(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){
+/* loop1680 in k4905 in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_4930(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -11934,15 +12130,15 @@ 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);
+C_save_and_reclaim((void*)trf_4930,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
t6=*((C_word*)lf[113]+1);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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 */
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4963,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+t8=C_slot(t2,C_fix(0));
+t9=C_slot(t3,C_fix(0));
+/* g17001701 */
t10=t6;
((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t7,t8,t9);}
else{
@@ -11950,8 +12146,8 @@ 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){
+/* k4961 in loop1680 in k4905 in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4963(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11959,19 +12155,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4963,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4943,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
t4=t3;
-f_5063(t4,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
+f_4943(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
else{
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=t3;
-f_5063(t5,t4);}}
+f_4943(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){
+/* k4941 in k4961 in loop1680 in k4905 in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_4943(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11979,51 +12175,51 @@ 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 */
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+/* loop16801694 */
t5=((C_word*)((C_word*)t0)[3])[1];
-f_5050(t5,((C_word*)t0)[2],t3,t4);}
+f_4930(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){
+/* k4922 in k4905 in a4902 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4924(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_4924,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* a4892 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4893(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4893,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4901,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 809 take */
t3=*((C_word*)lf[112]+1);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k4899 in a4892 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4901(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 786 split-at! */
+/* chicken-syntax.scm: 809 split-at! */
t2=*((C_word*)lf[111]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k4885 in k4877 in k4863 in a4860 in a4850 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4887(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12031,15 +12227,15 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4887,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,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){
+/* k4847 in k4823 in k4812 in k4809 in k4806 in k4803 in k4800 in k4797 in k4794 in k4791 in k4788 in k4785 in k4782 in k4779 in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4849(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12049,17 +12245,17 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4849,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[6],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[5],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[4],t5);
t7=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t6));}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,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){
+/* genvars in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_4746(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12067,77 +12263,77 @@ 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);}
+C_save_and_reclaim((void*)trf_4746,NULL,3,t0,t1,t2);}
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4752,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t2,a[5]=((C_word)li25),tmp=(C_word)a,a+=6,tmp));
t6=((C_word*)t4)[1];
-f_4872(t6,t1,C_fix(0));}
+f_4752(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){
+/* loop in genvars in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_4752(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_4872,NULL,3,t0,t1,t2);}
-if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[4]))){
+C_save_and_reclaim((void*)trf_4752,NULL,3,t0,t1,t2);}
+if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[4]))){
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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 */
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4766,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4778,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 777 gensym */
t5=*((C_word*)lf[60]+1);
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-/* 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){
+/* k4776 in loop in genvars in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4778(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 754 r */
+/* chicken-syntax.scm: 777 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){
+/* k4764 in loop in genvars in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4766(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4766,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4770,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
+/* chicken-syntax.scm: 777 loop */
t4=((C_word*)((C_word*)t0)[2])[1];
-f_4872(t4,t2,t3);}
+f_4752(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){
+/* k4768 in k4764 in loop in genvars in k4742 in a4739 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4770(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4890,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_4770,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k4736 in k5264 in k5268 in k5272 in k5276 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4738(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 741 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 764 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[109],((C_word*)t0)[2],t1);}
-/* k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2344(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12145,30 +12341,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2344,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2347,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4636,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4638,a[2]=((C_word)li24),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 834 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a4637 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4638(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_4638,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4642,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 836 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[101],t2,lf[105]);}
-/* 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){
+/* k4640 in a4637 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4642(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12179,24 +12375,24 @@ 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_save_and_reclaim((void*)tr2,(void*)f_4642,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_cddr(((C_word*)t0)[4]);
+if(C_truep(C_i_pairp(t2))){
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4657,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t5=C_a_i_cons(&a,2,t2,t3);
+/* chicken-syntax.scm: 840 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t4,lf[101],t5,lf[103]);}
else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4707,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_a_i_cons(&a,2,t2,t3);
+/* chicken-syntax.scm: 847 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t4,lf[101],t5,lf[104]);}}
-/* 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){
+/* k4705 in k4640 in a4637 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4707(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12204,28 +12400,28 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4707,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,lf[41],t2);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4722,a[2]=((C_word*)t0)[3],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* ##sys#append */
-t5=*((C_word*)lf[29]+1);
+t5=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k4720 in k4705 in k4640 in a4637 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4722(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4842,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_4722,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,lf[102],t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,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){
+/* k4655 in k4640 in a4637 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4657(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12234,32 +12430,32 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4657,2,t0,t1);}
+t2=C_slot(((C_word*)t0)[5],C_fix(0));
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,lf[41],t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4680,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t4,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 845 r */
t6=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[21]);}
-/* 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){
+/* k4678 in k4655 in k4640 in a4637 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4680(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_4680,2,t0,t1);}
+t2=C_slot(((C_word*)t0)[5],C_fix(1));
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4692,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
/* ##sys#append */
-t4=*((C_word*)lf[29]+1);
+t4=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k4690 in k4678 in k4655 in k4640 in a4637 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4692(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12268,55 +12464,55 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4692,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
t6=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,lf[102],t5));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,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){
+/* k4634 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4636(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 809 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 832 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[101],C_SCHEME_END_OF_LIST,t1);}
-/* k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2347(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2347,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2350,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4632,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 855 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[93]);}
-/* 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){
+/* k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4632(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4632,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[93],t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4628,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 856 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[94]);}
-/* 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){
+/* k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4628(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12326,99 +12522,99 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4628,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[94],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4422,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4424,a[2]=((C_word)li23),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 857 ##sys#er-transformer */
t7=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}
-/* 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){
+/* a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4424(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_4424,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4428,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 859 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[88],t2,lf[100]);}
-/* 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){
+/* k4426 in a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4428(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4428,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4431,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 860 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[99]);}
-/* 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){
+/* k4429 in k4426 in a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4431(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4431,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4434,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 861 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[98]);}
-/* 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){
+/* k4432 in k4429 in k4426 in a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4434(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4434,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4437,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 862 r */
t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-/* 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){
+/* k4435 in k4432 in k4429 in k4426 in a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4437(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4437,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4448,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 863 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[93]);}
-/* 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){
+/* k4446 in k4435 in k4432 in k4429 in k4426 in a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4448(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4448,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4476,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 865 r */
t4=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[94]);}
-/* 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){
+/* k4474 in k4446 in k4435 in k4432 in k4429 in k4426 in a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4476(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12436,26 +12632,26 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_4476,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[8]);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_i_caddr(((C_word*)t0)[8]);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t5);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[7],t6);
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,((C_word*)t0)[6],t8);
+t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
+t11=C_a_i_cons(&a,2,t3,t10);
+t12=C_a_i_cons(&a,2,((C_word*)t0)[7],t11);
+t13=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4568,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=t12,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
+t14=C_i_cdddr(((C_word*)t0)[8]);
/* ##sys#append */
-t15=*((C_word*)lf[29]+1);
+t15=*((C_word*)lf[27]+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){
+/* k4566 in k4474 in k4446 in k4435 in k4432 in k4429 in k4426 in a4423 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4568(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12487,78 +12683,78 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4568,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,lf[95],t4);
+t6=C_a_i_cons(&a,2,lf[96],t5);
+t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t7);
+t9=C_a_i_cons(&a,2,lf[21],t8);
+t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
+t11=C_a_i_cons(&a,2,((C_word*)t0)[7],t10);
+t12=C_a_i_cons(&a,2,t11,C_SCHEME_END_OF_LIST);
+t13=C_a_i_cons(&a,2,((C_word*)t0)[8],t12);
+t14=C_a_i_cons(&a,2,((C_word*)t0)[9],t13);
+t15=C_a_i_cons(&a,2,t14,C_SCHEME_END_OF_LIST);
+t16=C_a_i_cons(&a,2,t3,t15);
+t17=C_a_i_cons(&a,2,lf[97],t16);
+t18=C_a_i_cons(&a,2,t17,C_SCHEME_END_OF_LIST);
+t19=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t18);
+t20=C_a_i_cons(&a,2,((C_word*)t0)[9],t19);
+t21=C_a_i_cons(&a,2,t20,C_SCHEME_END_OF_LIST);
+t22=C_a_i_cons(&a,2,((C_word*)t0)[6],t21);
+t23=C_a_i_cons(&a,2,((C_word*)t0)[5],t22);
+t24=C_a_i_cons(&a,2,t23,C_SCHEME_END_OF_LIST);
+t25=C_a_i_cons(&a,2,((C_word*)t0)[4],t24);
+t26=C_a_i_cons(&a,2,((C_word*)t0)[9],t25);
+t27=C_a_i_cons(&a,2,t26,C_SCHEME_END_OF_LIST);
+t28=C_a_i_cons(&a,2,((C_word*)t0)[3],t27);
t29=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t29+1)))(2,t29,(C_word)C_a_i_cons(&a,2,t28,C_SCHEME_END_OF_LIST));}
+((C_proc2)(void*)(*((C_word*)t29+1)))(2,t29,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){
+/* k4420 in k4626 in k4630 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4422(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 830 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 853 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[88],((C_word*)t0)[2],t1);}
-/* k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2350(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2350,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2353,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4414,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 876 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[43]);}
-/* 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){
+/* k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4414(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4414,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[43],t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4410,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 877 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[82]);}
-/* 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){
+/* k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4410(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12568,138 +12764,138 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4410,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[82],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3999,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4001,a[2]=((C_word)li22),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 878 ##sys#er-transformer */
t7=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}
-/* 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){
+/* a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4001(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_4001,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4005,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 880 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[83],t2,lf[92]);}
-/* 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){
+/* k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4005(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4005,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4008,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 881 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[91]);}
-/* 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){
+/* k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4008(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4008,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4011,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 882 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[90]);}
-/* 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){
+/* k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4011(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4011,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4014,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 883 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[89]);}
-/* 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){
+/* k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4014(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4014,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4017,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 884 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
-/* 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){
+/* k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4017(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4017,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4020,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 885 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[41]);}
-/* 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){
+/* k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4020(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4020,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4023,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 886 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[82]);}
-/* 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){
+/* k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4023(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4023,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4026,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+/* chicken-syntax.scm: 887 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[43]);}
-/* 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){
+/* k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4026(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[22],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4026,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4028,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=t1,a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word)li20),tmp=(C_word)a,a+=10,tmp);
+t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_4235,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[6],tmp=(C_word)a,a+=12,tmp);
+/* chicken-syntax.scm: 901 r */
t4=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[88]);}
-/* 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){
+/* k4233 in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4235(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12719,28 +12915,28 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4235,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[84],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[11],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[10],t4);
+t6=C_a_i_cons(&a,2,lf[70],t5);
+t7=C_a_i_cons(&a,2,C_fix(1),C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,((C_word*)t0)[10],t7);
+t9=C_a_i_cons(&a,2,lf[85],t8);
+t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
+t11=C_a_i_cons(&a,2,t6,t10);
+t12=C_a_i_cons(&a,2,((C_word*)t0)[9],t11);
+t13=C_a_i_cons(&a,2,t12,C_SCHEME_END_OF_LIST);
+t14=C_a_i_cons(&a,2,((C_word*)t0)[8],t13);
+t15=C_a_i_cons(&a,2,t14,C_SCHEME_END_OF_LIST);
+t16=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4275,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=t15,tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 904 r */
t17=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t17+1)))(3,t17,t16,lf[87]);}
-/* 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){
+/* k4273 in k4233 in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4275(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12755,22 +12951,22 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4275,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4279,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4283,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+t8=C_i_cddr(((C_word*)t0)[7]);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4309,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t10,a[5]=t6,a[6]=((C_word)li21),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
-f_4429(t12,t7,t8);}
+f_4309(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){
+/* loop1826 in k4273 in k4233 in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_4309(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12778,20 +12974,20 @@ 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 */
+C_save_and_reclaim((void*)trf_4309,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4338,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+t4=C_slot(t2,C_fix(0));
+/* g18421843 */
t5=((C_word*)t0)[2];
-f_4148(t5,t3,t4);}
+f_4028(t5,t3,t4);}
else{
t3=((C_word*)((C_word*)t0)[3])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k4336 in loop1826 in k4273 in k4233 in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4338(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12803,25 +12999,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4338,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop17981811 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop18261839 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_4429(t6,((C_word*)t0)[3],t5);}
+f_4309(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop17981811 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop18261839 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_4429(t6,((C_word*)t0)[3],t5);}}
+f_4309(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){
+/* k4281 in k4273 in k4233 in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4283(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12831,18 +13027,18 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4283,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,lf[86],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
/* ##sys#append */
-t7=*((C_word*)lf[29]+1);
+t7=*((C_word*)lf[27]+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){
+/* k4277 in k4273 in k4233 in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4279(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12855,20 +13051,20 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4279,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
+t6=C_i_cadr(((C_word*)t0)[5]);
+t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,t5,t7);
+t9=C_a_i_cons(&a,2,((C_word*)t0)[4],t8);
t10=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t9));}
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,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){
+/* parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_4028(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12892,41 +13088,41 @@ 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))){
+C_save_and_reclaim((void*)trf_4028,NULL,3,t0,t1,t2);}
+t3=C_i_car(t2);
+t4=C_i_symbolp(t3);
+t5=(C_truep(t4)?C_i_car(t2):C_SCHEME_FALSE);
+t6=(C_truep(t5)?C_i_cadr(t2):C_i_car(t2));
+t7=(C_truep(t5)?C_i_cddr(t2):C_i_cdr(t2));
+if(C_truep(C_i_nullp(t6))){
if(C_truep(t5)){
-t8=(C_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);
+t8=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,t5,t8);
+t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
+t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4070,a[2]=((C_word*)t0)[6],a[3]=t1,a[4]=((C_word*)t0)[7],a[5]=t10,tmp=(C_word)a,a+=6,tmp);
/* ##sys#append */
-t12=*((C_word*)lf[29]+1);
+t12=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t11,t7,C_SCHEME_END_OF_LIST);}
else{
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4209,a[2]=((C_word*)t0)[6],a[3]=t1,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4089,a[2]=((C_word*)t0)[6],a[3]=t1,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
/* ##sys#append */
-t9=*((C_word*)lf[29]+1);
+t9=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t8,t7,C_SCHEME_END_OF_LIST);}}
else{
-t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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);
+t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4146,a[2]=t7,a[3]=t1,a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=t5,a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[5],tmp=(C_word)a,a+=9,tmp);
t9=C_SCHEME_END_OF_LIST;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
t11=C_SCHEME_FALSE;
t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4270,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
+t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4150,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
t14=C_SCHEME_UNDEFINED;
t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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));
+t16=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4152,a[2]=t10,a[3]=t15,a[4]=t12,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[3],a[8]=((C_word)li19),tmp=(C_word)a,a+=9,tmp));
t17=((C_word*)t15)[1];
-f_4272(t17,t13,t6);}}
+f_4152(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){
+/* loop1790 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_4152(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12946,17 +13142,17 @@ 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);
+C_save_and_reclaim((void*)trf_4152,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4179,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word)li18),tmp=(C_word)a,a+=6,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=f_4179(C_a_i(&a,15),t3,t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
+t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop17621775 */
+t9=C_slot(t2,C_fix(1));
+/* loop17901803 */
t15=t1;
t16=t9;
t1=t15;
@@ -12965,8 +13161,8 @@ 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 */
+t9=C_slot(t2,C_fix(1));
+/* loop17901803 */
t15=t1;
t16=t9;
t1=t15;
@@ -12977,8 +13173,8 @@ 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){
+/* g1806 in loop1790 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static C_word C_fcall f_4179(C_word *a,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12986,23 +13182,23 @@ 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));}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,t3,t4);
+return(C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
-/* 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){
+/* k4148 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4150(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k4144 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4146(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13014,25 +13210,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4146,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
if(C_truep(((C_word*)t0)[6])){
-t4=(C_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);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4119,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t6,tmp=(C_word)a,a+=6,tmp);
/* ##sys#append */
-t8=*((C_word*)lf[29]+1);
+t8=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t7,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4258,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4138,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
/* ##sys#append */
-t5=*((C_word*)lf[29]+1);
+t5=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}}
-/* 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){
+/* k4136 in k4144 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4138(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13040,15 +13236,15 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4138,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,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){
+/* k4117 in k4144 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4119(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13056,15 +13252,15 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4119,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,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){
+/* k4087 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4089(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13072,15 +13268,15 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4089,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,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){
+/* k4068 in parse-clause in k4024 in k4021 in k4018 in k4015 in k4012 in k4009 in k4006 in k4003 in a4000 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_4070(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13088,24 +13284,24 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4070,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,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){
+/* k3997 in k4408 in k4412 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3999(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 851 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 874 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[83],((C_word*)t0)[2],t1);}
-/* k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2353(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13119,36 +13315,36 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2353,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2356,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=C_a_i_cons(&a,2,lf[67],C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,lf[41],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,lf[65],t5);
+t7=C_a_i_cons(&a,2,lf[67],t6);
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3528,a[2]=t8,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3530,a[2]=((C_word)li17),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 914 ##sys#er-transformer */
t11=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t11+1)))(3,t11,t9,t10);}
-/* 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){
+/* a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3530(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_3530,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3534,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 916 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[68],t2,lf[81]);}
-/* 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){
+/* k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3534(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13158,98 +13354,98 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3534,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_caddr(((C_word*)t0)[4]);
+t4=C_i_cadddr(((C_word*)t0)[4]);
+t5=C_i_cddddr(((C_word*)t0)[4]);
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3549,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=((C_word*)t0)[3],a[5]=t4,a[6]=t2,a[7]=t3,tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 921 r */
t7=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[55]);}
-/* 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){
+/* k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3549(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3549,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3552,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 922 r */
t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-/* 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){
+/* k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3552(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3552,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3555,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 923 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[30]);}
-/* 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){
+/* k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3555(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3555,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3558,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+/* chicken-syntax.scm: 924 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[41]);}
-/* 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){
+/* k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3558(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3558,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_3561,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
+/* chicken-syntax.scm: 925 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[67]);}
-/* 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){
+/* k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3561(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3561,2,t0,t1);}
+t2=C_i_cdr(((C_word*)t0)[11]);
+t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_3567,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[9],a[13]=((C_word*)t0)[10],tmp=(C_word)a,a+=14,tmp);
+/* chicken-syntax.scm: 927 r */
t4=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[80]);}
-/* 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){
+/* k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3567(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3567,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_3570,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t1,a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
+/* chicken-syntax.scm: 928 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[79]);}
-/* 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){
+/* k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3570(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13262,20 +13458,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3570,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3573,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],tmp=(C_word)a,a+=15,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4058,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li19),tmp=(C_word)a,a+=6,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3938,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li16),tmp=(C_word)a,a+=6,tmp));
t10=((C_word*)t8)[1];
-f_4058(t10,t6,((C_word*)t0)[3]);}
+f_3938(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){
+/* loop1872 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_3938(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13284,12 +13480,12 @@ 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))){
+C_save_and_reclaim((void*)trf_3938,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
t3=*((C_word*)lf[78]+1);
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3967,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g18881889 */
t6=t3;
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
else{
@@ -13297,8 +13493,8 @@ 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){
+/* k3965 in loop1872 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3967(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13310,25 +13506,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3967,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop18441857 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop18721885 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_4058(t6,((C_word*)t0)[3],t5);}
+f_3938(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop18441857 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop18721885 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_4058(t6,((C_word*)t0)[3],t5);}}
+f_3938(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){
+/* k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3573(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13344,23 +13540,23 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3573,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[14],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[13],t2);
+t4=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3885,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[13],a[9]=((C_word*)t0)[14],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=t3,tmp=(C_word)a,a+=15,tmp);
t5=C_SCHEME_END_OF_LIST;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_FALSE;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4009,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3889,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
t10=C_SCHEME_UNDEFINED;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3891,a[2]=t6,a[3]=t11,a[4]=t8,a[5]=((C_word*)t0)[2],a[6]=((C_word)li15),tmp=(C_word)a,a+=7,tmp));
t13=((C_word*)t11)[1];
-f_4011(t13,t9,t1);}
+f_3891(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){
+/* loop1899 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_3891(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13380,17 +13576,17 @@ 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);
+C_save_and_reclaim((void*)trf_3891,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3918,a[2]=((C_word*)t0)[5],a[3]=((C_word)li14),tmp=(C_word)a,a+=4,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=f_3918(t3,t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
+t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop18711884 */
+t9=C_slot(t2,C_fix(1));
+/* loop18991912 */
t15=t1;
t16=t9;
t1=t15;
@@ -13399,8 +13595,8 @@ 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 */
+t9=C_slot(t2,C_fix(1));
+/* loop18991912 */
t15=t1;
t16=t9;
t1=t15;
@@ -13411,29 +13607,29 @@ 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){
+/* g1915 in loop1899 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static C_word C_fcall f_3918(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_stack_check;
-if(C_truep((C_word)C_i_memq(t1,((C_word*)t0)[2]))){
+if(C_truep(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){
+/* k3887 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3889(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3885(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13458,32 +13654,32 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3885,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[14],t1);
+t3=C_a_i_cons(&a,2,lf[69],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[13],t4);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[12],t5);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,((C_word*)t0)[10],t7);
+t9=C_a_i_cons(&a,2,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);
+t10=C_a_i_cons(&a,2,((C_word*)t0)[8],t9);
+t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=C_a_i_cons(&a,2,((C_word*)t0)[11],t11);
+t13=C_a_i_cons(&a,2,lf[70],t12);
+t14=C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
+t15=C_a_i_cons(&a,2,t8,t14);
+t16=C_a_i_cons(&a,2,((C_word*)t0)[12],t15);
+t17=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3596,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t6,a[5]=t16,tmp=(C_word)a,a+=6,tmp);
+t18=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3600,a[2]=t17,tmp=(C_word)a,a+=3,tmp);
t19=C_SCHEME_UNDEFINED;
t20=(*a=C_VECTOR_TYPE|1,a[1]=t19,tmp=(C_word)a,a+=2,tmp);
-t21=C_set_block_item(t20,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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));
+t21=C_set_block_item(t20,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3602,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t20,a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[11],a[10]=((C_word)li13),tmp=(C_word)a,a+=11,tmp));
t22=((C_word*)t20)[1];
-f_3722(t22,t18,((C_word*)t0)[2],C_fix(1));}
+f_3602(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){
+/* loop in k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_3602(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -13527,59 +13723,59 @@ 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))){
+C_save_and_reclaim((void*)trf_3602,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t2))){
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
else{
-t4=(C_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);
+t4=C_i_car(t2);
+t5=C_i_memq(lf[71],*((C_word*)lf[72]+1));
+t6=C_i_cddr(t4);
+t7=C_i_pairp(t6);
+t8=C_a_i_cons(&a,2,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
+t10=C_a_i_cons(&a,2,((C_word*)t0)[7],t9);
+t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=C_a_i_cons(&a,2,((C_word*)t0)[9],t11);
+t13=C_a_i_cons(&a,2,lf[73],t12);
+t14=C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
+t15=C_a_i_cons(&a,2,lf[74],t14);
+t16=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t17=C_a_i_cons(&a,2,((C_word*)t0)[9],t16);
+t18=C_a_i_cons(&a,2,lf[75],t17);
+t19=C_a_i_cons(&a,2,t18,C_SCHEME_END_OF_LIST);
+t20=C_a_i_cons(&a,2,t15,t19);
+t21=C_a_i_cons(&a,2,t8,t20);
+t22=C_a_i_cons(&a,2,((C_word*)t0)[6],t21);
+t23=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_3628,a[2]=((C_word*)t0)[3],a[3]=t22,a[4]=t5,a[5]=t7,a[6]=((C_word*)t0)[4],a[7]=t3,a[8]=t2,a[9]=t1,a[10]=((C_word*)t0)[5],a[11]=t4,tmp=(C_word)a,a+=12,tmp);
if(C_truep(t7)){
-t24=(C_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);
+t24=C_i_caddr(t4);
+t25=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
+t26=C_a_i_cons(&a,2,((C_word*)t0)[9],t25);
+t27=C_a_i_cons(&a,2,t24,t26);
+t28=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
+t29=C_a_i_cons(&a,2,((C_word*)t0)[7],t28);
+t30=C_a_i_cons(&a,2,t29,C_SCHEME_END_OF_LIST);
+t31=C_a_i_cons(&a,2,((C_word*)t0)[9],t30);
+t32=C_a_i_cons(&a,2,lf[73],t31);
+t33=C_a_i_cons(&a,2,t32,C_SCHEME_END_OF_LIST);
+t34=C_a_i_cons(&a,2,lf[74],t33);
+t35=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
+t36=C_a_i_cons(&a,2,t3,t35);
+t37=C_a_i_cons(&a,2,((C_word*)t0)[9],t36);
+t38=C_a_i_cons(&a,2,lf[76],t37);
+t39=C_a_i_cons(&a,2,t38,C_SCHEME_END_OF_LIST);
+t40=C_a_i_cons(&a,2,t34,t39);
+t41=C_a_i_cons(&a,2,t27,t40);
+t42=C_a_i_cons(&a,2,((C_word*)t0)[5],t41);
t43=t23;
-f_3748(t43,(C_word)C_a_i_cons(&a,2,t42,C_SCHEME_END_OF_LIST));}
+f_3628(t43,C_a_i_cons(&a,2,t42,C_SCHEME_END_OF_LIST));}
else{
t24=t23;
-f_3748(t24,C_SCHEME_END_OF_LIST);}}}
+f_3628(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){
+/* k3626 in loop in k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_3628(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13591,23 +13787,23 @@ 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);
+C_save_and_reclaim((void*)trf_3628,NULL,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[11]);
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3664,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=t1,a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
t4=(C_truep(((C_word*)t0)[5])?((C_word*)t0)[4]:C_SCHEME_FALSE);
if(C_truep(t4)){
-t5=(C_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);
+t5=C_i_caddr(((C_word*)t0)[11]);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[3],t6);
+t8=C_a_i_cons(&a,2,((C_word*)t0)[2],t7);
t9=t3;
-f_3784(t9,(C_word)C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST));}
+f_3664(t9,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));}}
+f_3664(t5,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){
+/* k3662 in k3626 in loop in k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_3664(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13618,88 +13814,88 @@ 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 */
+C_save_and_reclaim((void*)trf_3664,NULL,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3640,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3644,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=C_i_cdr(((C_word*)t0)[4]);
+t7=C_fixnum_increase(((C_word*)t0)[3]);
+/* chicken-syntax.scm: 958 loop */
t8=((C_word*)((C_word*)t0)[2])[1];
-f_3722(t8,t5,t6,t7);}
+f_3602(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){
+/* k3642 in k3662 in k3626 in loop in k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3644(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k3638 in k3662 in k3626 in loop in k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3640(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3760,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_3640,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
/* ##sys#append */
-t3=*((C_word*)lf[29]+1);
+t3=*((C_word*)lf[27]+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){
+/* k3598 in k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3600(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k3594 in k3883 in k3571 in k3568 in k3565 in k3559 in k3556 in k3553 in k3550 in k3547 in k3532 in a3529 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3596(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_3596,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* k3526 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3528(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 888 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 911 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[68],((C_word*)t0)[2],t1);}
-/* k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2356(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2356,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2359,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3520,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 965 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[58]);}
-/* 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){
+/* k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3520(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13708,83 +13904,83 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3520,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[58],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3328,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3330,a[2]=((C_word)li12),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 966 ##sys#er-transformer */
t6=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-/* 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){
+/* a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3330(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[6],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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 */
+C_save_and_reclaim((void*)tr5,(void*)f_3330,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3334,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 968 r */
t6=t3;
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[63]);}
-/* 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){
+/* k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3334(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3334,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3337,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 969 r */
t3=((C_word*)t0)[4];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[62]);}
-/* 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){
+/* k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3337(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3337,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3340,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 970 r */
t3=((C_word*)t0)[5];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[58]);}
-/* 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){
+/* k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3340(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3340,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3343,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 971 r */
t3=((C_word*)t0)[6];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[55]);}
-/* 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){
+/* k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3343(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3343,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3346,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 972 r */
t3=((C_word*)t0)[6];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-/* 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){
+/* k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3346(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13793,16 +13989,16 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_3346,2,t0,t1);}
+t2=C_i_cdr(((C_word*)t0)[9]);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3355,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t4,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word)li11),tmp=(C_word)a,a+=11,tmp));
t6=((C_word*)t4)[1];
-f_3475(t6,((C_word*)t0)[2],t2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
+f_3355(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){
+/* loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_3355(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -13810,21 +14006,21 @@ 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 */
+C_save_and_reclaim((void*)trf_3355,NULL,6,t0,t1,t2,t3,t4,t5);}
+if(C_truep(C_i_nullp(t2))){
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3365,a[2]=t4,a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=t1,a[7]=((C_word*)t0)[9],a[8]=t5,tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 975 reverse */
t7=*((C_word*)lf[61]+1);
((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,t3);}
else{
-t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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 */
+t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3458,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[7],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t4,a[8]=t3,a[9]=t2,tmp=(C_word)a,a+=10,tmp);
+t7=C_i_car(t2);
+/* chicken-syntax.scm: 982 c */
t8=((C_word*)t0)[4];
((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,((C_word*)t0)[2],t7);}}
-/* 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){
+/* k3456 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3458(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13833,22 +14029,22 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3458,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3461,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3480,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 983 gensym */
t4=*((C_word*)lf[60]+1);
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3486,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=C_i_car(((C_word*)t0)[9]);
+/* chicken-syntax.scm: 985 c */
t4=((C_word*)t0)[3];
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}}
-/* 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){
+/* k3484 in k3456 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3486(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13856,30 +14052,30 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3486,2,t0,t1);}
if(C_truep(t1)){
-/* chicken-syntax.scm: 962 loop */
+/* chicken-syntax.scm: 985 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);}
+f_3355(t2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST,((C_word*)t0)[4],((C_word*)t0)[3],C_SCHEME_TRUE);}
else{
-t2=(C_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 */
+t2=C_i_cdr(((C_word*)t0)[2]);
+t3=C_i_car(((C_word*)t0)[2]);
+t4=C_a_i_cons(&a,2,t3,((C_word*)t0)[3]);
+/* chicken-syntax.scm: 986 loop */
t5=((C_word*)((C_word*)t0)[6])[1];
-f_3475(t5,((C_word*)t0)[5],t2,((C_word*)t0)[4],t4,C_SCHEME_FALSE);}}
+f_3355(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){
+/* k3478 in k3456 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3480(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 960 r */
+/* chicken-syntax.scm: 983 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){
+/* k3459 in k3456 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3461(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13887,29 +14083,29 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3461,2,t0,t1);}
+t2=C_i_cdr(((C_word*)t0)[6]);
+t3=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+t4=C_a_i_cons(&a,2,t1,((C_word*)t0)[4]);
+/* chicken-syntax.scm: 984 loop */
t5=((C_word*)((C_word*)t0)[3])[1];
-f_3475(t5,((C_word*)t0)[2],t2,t3,t4,C_SCHEME_FALSE);}
+f_3355(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){
+/* k3363 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3365(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3365,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3368,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 976 reverse */
t3=*((C_word*)lf[61]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k3366 in k3363 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3368(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13921,25 +14117,25 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3368,2,t0,t1);}
if(C_truep(((C_word*)t0)[8])){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3374,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3417,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 978 gensym */
t4=*((C_word*)lf[60]+1);
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
-t2=(C_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);
+t2=C_i_car(t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[2],t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3440,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[4],a[5]=t4,tmp=(C_word)a,a+=6,tmp);
+t6=C_i_cdr(t1);
/* ##sys#append */
-t7=*((C_word*)lf[29]+1);
+t7=*((C_word*)lf[27]+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){
+/* k3438 in k3366 in k3363 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3440(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13947,37 +14143,37 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3440,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,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){
+/* k3415 in k3366 in k3363 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3417(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 955 r */
+/* chicken-syntax.scm: 978 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){
+/* k3372 in k3366 in k3363 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3374(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_3374,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3385,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
/* ##sys#append */
-t3=*((C_word*)lf[29]+1);
+t3=*((C_word*)lf[27]+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){
+/* k3383 in k3372 in k3366 in k3363 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3385(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13986,17 +14182,17 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3385,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3405,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
+t4=C_i_cdr(((C_word*)t0)[6]);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
/* ##sys#append */
-t6=*((C_word*)lf[29]+1);
+t6=*((C_word*)lf[27]+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){
+/* k3403 in k3383 in k3372 in k3366 in k3363 in loop in k3344 in k3341 in k3338 in k3335 in k3332 in a3329 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3405(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14005,40 +14201,40 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3405,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[5],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
t6=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,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){
+/* k3326 in k3518 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3328(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 940 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 963 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[66],((C_word*)t0)[2],t1);}
-/* k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2359(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2359,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2362,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3320,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 990 ##sys#primitive-alias */
t4=*((C_word*)lf[65]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[58]);}
-/* 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){
+/* k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3320(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14047,83 +14243,83 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3320,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[58],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3097,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3099,a[2]=((C_word)li10),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 991 ##sys#er-transformer */
t6=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-/* 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){
+/* a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3099(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[6],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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 */
+C_save_and_reclaim((void*)tr5,(void*)f_3099,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3103,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 993 r */
t6=t3;
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[64]);}
-/* 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){
+/* k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3103(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3103,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3106,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 994 r */
t3=((C_word*)t0)[4];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-/* 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){
+/* k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3106(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3106,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3109,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 995 r */
t3=((C_word*)t0)[4];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[58]);}
-/* 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){
+/* k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3109(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3109,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3112,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 996 r */
t3=((C_word*)t0)[4];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[63]);}
-/* 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){
+/* k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3112(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3112,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3115,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 997 r */
t3=((C_word*)t0)[4];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[62]);}
-/* 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){
+/* k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3115(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14132,16 +14328,16 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_3115,2,t0,t1);}
+t2=C_i_cdr(((C_word*)t0)[9]);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3124,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word)li9),tmp=(C_word)a,a+=11,tmp));
t6=((C_word*)t4)[1];
-f_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);}
+f_3124(t6,((C_word*)t0)[2],t2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
-/* loop in 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){
+/* loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_3124(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
C_word tmp;
C_word t7;
C_word t8;
@@ -14149,21 +14345,21 @@ 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 */
+C_save_and_reclaim((void*)trf_3124,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
+if(C_truep(C_i_nullp(t2))){
+t7=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3134,a[2]=t5,a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=t1,a[6]=t4,a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t6,tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 1000 reverse */
t8=*((C_word*)lf[61]+1);
((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,t3);}
else{
-t7=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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 */
+t7=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3243,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],a[5]=t4,a[6]=t1,a[7]=((C_word*)t0)[5],a[8]=t5,a[9]=t3,a[10]=t2,tmp=(C_word)a,a+=11,tmp);
+t8=C_i_car(t2);
+/* chicken-syntax.scm: 1010 c */
t9=((C_word*)t0)[4];
((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,((C_word*)t0)[2],t8);}}
-/* 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){
+/* k3241 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3243(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14172,51 +14368,51 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3243,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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 */
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3246,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],tmp=(C_word)a,a+=8,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3265,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 1011 gensym */
t4=*((C_word*)lf[60]+1);
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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 */
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3271,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+t3=C_i_car(((C_word*)t0)[10]);
+/* chicken-syntax.scm: 1013 c */
t4=((C_word*)t0)[3];
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}}
-/* 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){
+/* k3269 in k3241 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3271(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3391,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_3271,2,t0,t1);}
if(C_truep(t1)){
-/* chicken-syntax.scm: 990 loop */
+/* chicken-syntax.scm: 1013 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);}
+f_3124(t2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_TRUE);}
else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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 */
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3277,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3304,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 1015 gensym */
t4=*((C_word*)lf[60]+1);
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k3302 in k3269 in k3241 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3304(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 992 r */
+/* chicken-syntax.scm: 1015 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){
+/* k3275 in k3269 in k3241 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3277(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14226,27 +14422,27 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3277,2,t0,t1);}
+t2=C_i_cdr(((C_word*)t0)[7]);
+t3=C_i_car(((C_word*)t0)[7]);
+t4=C_a_i_list(&a,2,t1,t3);
+t5=C_a_i_cons(&a,2,t4,((C_word*)t0)[6]);
+t6=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+/* chicken-syntax.scm: 1016 loop */
t7=((C_word*)((C_word*)t0)[4])[1];
-f_3244(t7,((C_word*)t0)[3],t2,((C_word*)t0)[2],t5,t6,C_SCHEME_FALSE);}
+f_3124(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){
+/* k3263 in k3241 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3265(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 988 r */
+/* chicken-syntax.scm: 1011 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){
+/* k3244 in k3241 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3246(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14254,29 +14450,29 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3246,2,t0,t1);}
+t2=C_i_cdr(((C_word*)t0)[7]);
+t3=C_a_i_cons(&a,2,t1,((C_word*)t0)[6]);
+t4=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+/* chicken-syntax.scm: 1012 loop */
t5=((C_word*)((C_word*)t0)[4])[1];
-f_3244(t5,((C_word*)t0)[3],t2,t3,((C_word*)t0)[2],t4,C_SCHEME_FALSE);}
+f_3124(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){
+/* k3132 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3134(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3134,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3137,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 1001 reverse */
t3=*((C_word*)lf[61]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k3135 in k3132 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3137(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14286,23 +14482,23 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3137,2,t0,t1);}
if(C_truep(((C_word*)t0)[9])){
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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 */
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3143,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3198,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 1003 gensym */
t4=*((C_word*)lf[60]+1);
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
-t2=(C_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);
+t2=C_i_car(t1);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3233,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[3],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
+t4=C_i_cdr(t1);
/* ##sys#append */
-t5=*((C_word*)lf[29]+1);
+t5=*((C_word*)lf[27]+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){
+/* k3231 in k3135 in k3132 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3233(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14313,40 +14509,40 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3233,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[7],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[4],t6);
t8=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t7));}
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,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){
+/* k3196 in k3135 in k3132 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3198(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 980 r */
+/* chicken-syntax.scm: 1003 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){
+/* k3141 in k3135 in k3132 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3143(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_3143,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3166,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
/* ##sys#append */
-t3=*((C_word*)lf[29]+1);
+t3=*((C_word*)lf[27]+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){
+/* k3164 in k3141 in k3135 in k3132 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3166(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14355,17 +14551,17 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3166,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[8]);
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3186,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
+t4=C_i_cdr(((C_word*)t0)[8]);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
/* ##sys#append */
-t6=*((C_word*)lf[29]+1);
+t6=*((C_word*)lf[27]+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){
+/* k3184 in k3164 in k3141 in k3135 in k3132 in loop in k3113 in k3110 in k3107 in k3104 in k3101 in a3098 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3186(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14377,28 +14573,28 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3186,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[5],t5);
+t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,((C_word*)t0)[4],t7);
t9=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t8));}
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,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){
+/* k3095 in k3318 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3097(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 965 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 988 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[59],((C_word*)t0)[2],t1);}
-/* k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2362(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14406,95 +14602,95 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2362,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2365,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2816,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2818,a[2]=((C_word)li8),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1026 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2818(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[6],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_2818,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2822,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 1028 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[36],t2,lf[57]);}
-/* 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){
+/* k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2822(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2822,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2825,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 1029 r */
t3=((C_word*)t0)[4];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[56]);}
-/* 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){
+/* k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2825(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2825,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2828,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 1030 r */
t3=((C_word*)t0)[4];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[55]);}
-/* 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){
+/* k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2828(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2828,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2831,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 1031 r */
t3=((C_word*)t0)[4];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[54]);}
-/* 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){
+/* k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2831(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2831,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2834,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 1032 r */
t3=((C_word*)t0)[5];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[53]);}
-/* 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){
+/* k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2834(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2834,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2837,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 1033 r */
t3=((C_word*)t0)[6];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[52]);}
-/* 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){
+/* k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2837(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14503,16 +14699,16 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_2837,2,t0,t1);}
+t2=C_i_cddr(((C_word*)t0)[9]);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2846,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t4,a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word)li7),tmp=(C_word)a,a+=11,tmp));
t6=((C_word*)t4)[1];
-f_2966(t6,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,t2,C_SCHEME_FALSE);}
+f_2846(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){
+/* loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_2846(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -14521,62 +14717,62 @@ 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);
+C_save_and_reclaim((void*)trf_2846,NULL,6,t0,t1,t2,t3,t4,t5);}
+if(C_truep(C_i_nullp(t4))){
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2856,a[2]=t3,a[3]=((C_word*)t0)[8],a[4]=t2,a[5]=t1,a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
if(C_truep(t5)){
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3106,a[2]=((C_word*)t0)[9],a[3]=t6,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2986,a[2]=((C_word*)t0)[9],a[3]=t6,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
/* ##sys#append */
-t8=*((C_word*)lf[29]+1);
+t8=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t7,t5,C_SCHEME_END_OF_LIST);}
else{
t7=t6;
-f_2976(t7,lf[46]);}}
+f_2856(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);
+t6=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_2992,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[4],a[6]=t5,a[7]=t3,a[8]=t1,a[9]=((C_word*)t0)[5],a[10]=t2,a[11]=((C_word*)t0)[6],a[12]=t4,tmp=(C_word)a,a+=13,tmp);
+if(C_truep(C_i_pairp(t4))){
+t7=C_i_car(t4);
t8=t6;
-f_3112(t8,(C_word)C_i_pairp(t7));}
+f_2992(t8,C_i_pairp(t7));}
else{
t7=t6;
-f_3112(t7,C_SCHEME_FALSE);}}}
+f_2992(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){
+/* k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_2992(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[13],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3112,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_2992,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_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 */
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_2995,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],tmp=(C_word)a,a+=13,tmp);
+/* chicken-syntax.scm: 1048 caar */
t3=*((C_word*)lf[50]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[12]);}
else{
-/* chicken-syntax.scm: 1036 syntax-error */
+/* chicken-syntax.scm: 1059 syntax-error */
t2=*((C_word*)lf[12]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[8],lf[36],lf[51],((C_word*)t0)[12]);}}
-/* 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){
+/* k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2995(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2995,2,t0,t1);}
+t2=C_i_cdr(((C_word*)t0)[12]);
+t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_3004,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[6],a[8]=t2,a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[9],a[12]=((C_word*)t0)[10],a[13]=((C_word*)t0)[11],tmp=(C_word)a,a+=14,tmp);
+/* chicken-syntax.scm: 1050 c */
t4=((C_word*)t0)[5];
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[2],t1);}
-/* 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){
+/* k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3004(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14584,21 +14780,21 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3004,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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 */
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3019,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[12],a[8]=((C_word*)t0)[13],tmp=(C_word)a,a+=9,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3023,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1051 cdar */
t4=*((C_word*)lf[47]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[6]);}
else{
-t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_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 */
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_3029,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[12],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[9],a[12]=((C_word*)t0)[13],tmp=(C_word)a,a+=13,tmp);
+/* chicken-syntax.scm: 1052 c */
t3=((C_word*)t0)[5];
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],((C_word*)t0)[3]);}}
-/* 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){
+/* k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3029(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14606,21 +14802,21 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3029,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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 */
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3044,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[12],tmp=(C_word)a,a+=9,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3048,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1053 cdar */
t4=*((C_word*)lf[47]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[5]);}
else{
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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 */
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3054,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
+/* chicken-syntax.scm: 1054 c */
t3=((C_word*)t0)[4];
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}}
-/* 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){
+/* k3052 in k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3054(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14630,152 +14826,152 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3054,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3061,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
t3=((C_word*)t0)[3];
if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f11161,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-/* chicken-syntax.scm: 1032 cdar */
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f11146,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 1055 cdar */
t5=*((C_word*)lf[47]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[2]);}
else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11165,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1032 cdar */
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11150,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1055 cdar */
t5=*((C_word*)lf[47]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[2]);}}
else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3196,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1034 caar */
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3076,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1057 caar */
t3=*((C_word*)lf[50]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}}
-/* 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){
+/* k3074 in k3052 in k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3076(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 1034 syntax-error */
+/* chicken-syntax.scm: 1057 syntax-error */
t2=*((C_word*)lf[12]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[36],lf[49],t1);}
-/* 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){
+/* f11150 in k3052 in k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f11150(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 1032 append */
+/* chicken-syntax.scm: 1055 append */
t2=*((C_word*)lf[48]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t1);}
-/* 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){
+/* f11146 in k3052 in k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f11146(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 1032 append */
+/* chicken-syntax.scm: 1055 append */
t2=*((C_word*)lf[48]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k3059 in k3052 in k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3061(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 1032 loop */
+/* chicken-syntax.scm: 1055 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);}
+f_2846(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){
+/* k3046 in k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3048(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k3042 in k3027 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3044(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3044,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[7]);
+/* chicken-syntax.scm: 1053 loop */
t4=((C_word*)((C_word*)t0)[6])[1];
-f_2966(t4,((C_word*)t0)[5],((C_word*)t0)[4],t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_2846(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){
+/* k3021 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3023(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[29]+1);
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k3017 in k3002 in k2993 in k2990 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_3019(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_3019,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[7]);
+/* chicken-syntax.scm: 1051 loop */
t4=((C_word*)((C_word*)t0)[6])[1];
-f_2966(t4,((C_word*)t0)[5],t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_2846(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){
+/* k2984 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2986(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_2986,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
t4=((C_word*)t0)[3];
-f_2976(t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+f_2856(t4,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){
+/* k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_2856(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_2856,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2863,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 1039 r */
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[45]);}
-/* 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){
+/* k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2863(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_2863,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2971,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
/* ##sys#append */
-t3=*((C_word*)lf[29]+1);
+t3=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k2969 in k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2971(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14783,16 +14979,16 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2971,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=C_a_i_cons(&a,2,lf[37],t2);
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2959,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t3,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 1041 r */
t5=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[44]);}
-/* 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){
+/* k2957 in k2969 in k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2959(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14800,31 +14996,31 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_2959,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[38],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2955,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t3,tmp=(C_word)a,a+=10,tmp);
/* ##sys#append */
-t5=*((C_word*)lf[29]+1);
+t5=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k2953 in k2957 in k2969 in k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2955(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[13],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2955,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[9],t1);
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2891,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t2,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+/* chicken-syntax.scm: 1042 r */
t4=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[43]);}
-/* 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){
+/* k2889 in k2953 in k2957 in k2969 in k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2891(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14834,31 +15030,31 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2891,2,t0,t1);}
+t2=C_a_i_cons(&a,2,*((C_word*)lf[39]+1),C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,lf[40],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[9],t4);
+t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2919,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=t5,a[10]=((C_word*)t0)[8],tmp=(C_word)a,a+=11,tmp);
+/* chicken-syntax.scm: 1045 r */
t7=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[42]);}
-/* 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){
+/* k2917 in k2889 in k2953 in k2957 in k2969 in k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2919(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2919,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2931,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=t1,tmp=(C_word)a,a+=11,tmp);
+/* chicken-syntax.scm: 1045 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[41]);}
-/* 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){
+/* k2929 in k2917 in k2889 in k2953 in k2957 in k2969 in k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2931(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14868,18 +15064,18 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_2931,2,t0,t1);}
+t2=C_a_i_cons(&a,2,*((C_word*)lf[39]+1),C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[10],t4);
+t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2915,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t5,tmp=(C_word)a,a+=10,tmp);
/* ##sys#append */
-t7=*((C_word*)lf[29]+1);
+t7=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k2913 in k2929 in k2917 in k2889 in k2953 in k2957 in k2969 in k2861 in k2854 in loop in k2835 in k2832 in k2829 in k2826 in k2823 in k2820 in a2817 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2915(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14891,28 +15087,28 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_2915,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[9],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[8],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[5],t6);
+t8=C_a_i_cons(&a,2,((C_word*)t0)[4],t7);
t9=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t8));}
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,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){
+/* k2814 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2816(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 1001 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 1024 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[36],C_SCHEME_END_OF_LIST,t1);}
-/* k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2365(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14920,45 +15116,45 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2365,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2368,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2712,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2714,a[2]=((C_word)li6),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1068 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a2713 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2714(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_2714,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2718,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 1070 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[33],t2,lf[35]);}
-/* 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){
+/* k2716 in a2713 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2718(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2718,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2724,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 1072 r */
t4=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[34]);}
-/* 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){
+/* k2722 in k2716 in a2713 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2724(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14967,22 +15163,22 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2724,2,t0,t1);}
+if(C_truep(C_i_pairp(((C_word*)t0)[5]))){
+t2=C_i_car(((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2769,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+/* chicken-syntax.scm: 1075 r */
t4=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[21]);}
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]);
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2808,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+t3=C_i_cddr(((C_word*)t0)[3]);
/* ##sys#append */
-t4=*((C_word*)lf[29]+1);
+t4=*((C_word*)lf[27]+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){
+/* k2806 in k2722 in k2716 in a2713 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2808(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14991,16 +15187,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_2808,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,t3,t4);
t6=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,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){
+/* k2767 in k2722 in k2716 in a2713 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2769(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15008,16 +15204,16 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_2769,2,t0,t1);}
+t2=C_i_cdr(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2781,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
+t4=C_i_cddr(((C_word*)t0)[2]);
/* ##sys#append */
-t5=*((C_word*)lf[29]+1);
+t5=*((C_word*)lf[27]+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){
+/* k2779 in k2767 in k2722 in k2716 in a2713 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2781(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15030,29 +15226,29 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_2781,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[7],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[6],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_i_car(((C_word*)t0)[4]);
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,t6,t8);
t10=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t9));}
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,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){
+/* k2710 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2712(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 1043 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 1066 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[33],C_SCHEME_END_OF_LIST,t1);}
-/* k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2368(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15060,94 +15256,159 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2368,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2371,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2675,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2677,a[2]=((C_word)li5),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1085 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a2676 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2677(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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]);}
+C_save_and_reclaim((void*)tr5,(void*)f_2677,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2681,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 1087 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[29],t2,lf[32]);}
-/* 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){
+/* k2679 in a2676 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2681(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2681,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2688,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 1088 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[31]);}
-/* 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){
+/* k2686 in k2679 in a2676 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2688(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2688,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2700,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 1089 r */
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[30]);}
-/* 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){
+/* k2698 in k2686 in k2679 in a2676 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2700(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);
+C_save_and_reclaim((void*)tr2,(void*)f_2700,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2704,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t3=C_i_cdr(((C_word*)t0)[2]);
/* ##sys#append */
-t4=*((C_word*)lf[29]+1);
+t4=*((C_word*)lf[27]+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){
+/* k2702 in k2698 in k2686 in k2679 in a2676 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2704(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_2704,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+
+/* k2673 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2675(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 1083 ##sys#extend-macro-environment */
+t2=*((C_word*)lf[10]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[29],C_SCHEME_END_OF_LIST,t1);}
+
+/* k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2371(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2371,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2374,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2653,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2655,a[2]=((C_word)li4),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1096 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a2654 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2655(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
+C_word tmp;
+C_word t5;
+C_word t6;
+C_word ab[4],*a=ab;
+if(c!=5) C_bad_argc_2(c,5,t0);
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr5,(void*)f_2655,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2663,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 1098 r */
+t6=t3;
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[28]);}
+
+/* k2661 in a2654 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2663(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2663,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2667,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_cdr(((C_word*)t0)[2]);
+/* ##sys#append */
+t4=*((C_word*)lf[27]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k2665 in k2661 in a2654 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2667(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2667,2,t0,t1);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+
+/* k2651 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2653(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 1060 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 1094 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[28],C_SCHEME_END_OF_LIST,t1);}
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[26],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){
+/* k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2374(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15155,30 +15416,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2374,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2377,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2628,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2630,a[2]=((C_word)li3),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1105 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a2629 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2630(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[4],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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]);}
+C_save_and_reclaim((void*)tr5,(void*)f_2630,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2634,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 1107 ##sys#check-syntax */
+t6=*((C_word*)lf[24]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[22],t2,lf[25]);}
-/* 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){
+/* k2632 in a2629 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2634(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15186,24 +15447,24 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_2634,2,t0,t1);}
+t2=C_i_cdr(((C_word*)t0)[3]);
+t3=C_a_i_cons(&a,2,C_SCHEME_TRUE,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,t2,t3);
t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,lf[25],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,lf[23],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){
+/* k2626 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2628(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 1071 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 1103 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[24],C_SCHEME_END_OF_LIST,t1);}
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[22],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){
+/* k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2377(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15211,44 +15472,71 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2377,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2380,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2462,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2464,a[2]=((C_word)li2),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1115 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2464(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
-C_word 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{
+C_save_and_reclaim((void*)tr5,(void*)f_2464,5,t0,t1,t2,t3,t4);}
+t5=C_i_cdr(t2);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2474,a[2]=t2,a[3]=t3,a[4]=t1,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_i_pairp(t5))){
+t7=C_i_cdr(t5);
t8=t6;
-f_2650(2,t8,C_SCHEME_FALSE);}}
+f_2474(t8,C_eqp(t7,C_SCHEME_END_OF_LIST));}
else{
t7=t6;
-f_2650(2,t7,C_SCHEME_FALSE);}}
+f_2474(t7,C_SCHEME_FALSE);}}
+
+/* k2472 in a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_2474(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2474,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=C_i_car(((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2484,a[2]=((C_word*)t0)[4],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* rename21272132 */
+t4=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[20]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2498,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_i_pairp(((C_word*)t0)[5]))){
+t3=C_i_car(((C_word*)t0)[5]);
+if(C_truep(C_i_pairp(t3))){
+t4=C_i_cdr(((C_word*)t0)[5]);
+/* ##sys#list? */
+t5=*((C_word*)lf[18]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t2,t4);}
+else{
+t4=t2;
+f_2498(2,t4,C_SCHEME_FALSE);}}
+else{
+t3=t2;
+f_2498(2,t3,C_SCHEME_FALSE);}}}
-/* 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){
+/* k2496 in k2472 in a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2498(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15262,34 +15550,34 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2498,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 */
+t2=C_i_car(((C_word*)t0)[5]);
+t3=C_i_car(t2);
+t4=C_i_car(((C_word*)t0)[5]);
+t5=C_i_cdr(t4);
+t6=C_i_cdr(((C_word*)t0)[5]);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2514,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=t6,a[6]=t5,tmp=(C_word)a,a+=7,tmp);
+/* rename21272132 */
t8=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,lf[21]);}
+((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,lf[19]);}
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);
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2548,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_i_pairp(((C_word*)t0)[5]))){
+t3=C_i_cdr(((C_word*)t0)[5]);
+if(C_truep(C_i_pairp(t3))){
+t4=C_i_cdr(t3);
t5=t2;
-f_2700(t5,(C_word)C_eqp(t4,C_SCHEME_END_OF_LIST));}
+f_2548(t5,C_eqp(t4,C_SCHEME_END_OF_LIST));}
else{
t4=t2;
-f_2700(t4,C_SCHEME_FALSE);}}
+f_2548(t4,C_SCHEME_FALSE);}}
else{
t3=t2;
-f_2700(t3,C_SCHEME_FALSE);}}}
+f_2548(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){
+/* k2546 in k2496 in k2472 in a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_fcall f_2548(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15298,49 +15586,49 @@ 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);}
+C_save_and_reclaim((void*)trf_2548,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 */
+t2=C_i_car(((C_word*)t0)[5]);
+t3=C_i_cdr(((C_word*)t0)[5]);
+t4=C_i_car(t3);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2561,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+/* rename21272132 */
t6=((C_word*)t0)[3];
-((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[23]);}
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[20]);}
else{
/* ##sys#syntax-rules-mismatch */
-t2=*((C_word*)lf[18]+1);
+t2=*((C_word*)lf[17]+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){
+/* k2559 in k2546 in k2496 in k2472 in a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2561(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_2561,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,t1,t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* k2512 in k2496 in k2472 in a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2514(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2514,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2530,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+/* rename21272132 */
t3=((C_word*)t0)[2];
-((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[21]);}
-/* 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){
+/* k2528 in k2512 in k2496 in k2472 in a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2530(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15349,25 +15637,39 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_2530,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[6],((C_word*)t0)[5]);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
t6=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
+
+/* k2482 in k2472 in a2463 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2484(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2484,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
+t4=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,t1,t3));}
-/* 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){
+/* k2460 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2462(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 1081 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 1113 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
-((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[21],C_SCHEME_END_OF_LIST,t1);}
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[19],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){
+/* k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2380(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15375,341 +15677,98 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2380,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2383,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2406,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2408,a[2]=((C_word)li1),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1126 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a2407 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2408(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
-C_word t10;
-C_word t11;
-C_word t12;
-C_word ab[16],*a=ab;
+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_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);}
+C_save_and_reclaim((void*)tr5,(void*)f_2408,5,t0,t1,t2,t3,t4);}
+t5=C_i_cdr(t2);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2418,a[2]=t2,a[3]=t3,a[4]=t1,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_i_pairp(t5))){
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2447,a[2]=t6,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+t8=C_i_car(t5);
+/* ##sys#list? */
+t9=*((C_word*)lf[18]+1);
+((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t7,t8);}
else{
t7=t6;
-f_2435(2,t7,C_SCHEME_FALSE);}}
+f_2418(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){
+/* k2445 in a2407 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2447(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word 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]);
+t2=C_i_cdr(((C_word*)t0)[3]);
/* ##sys#list? */
-t3=*((C_word*)lf[19]+1);
+t3=*((C_word*)lf[18]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],t2);}
else{
t2=((C_word*)t0)[2];
-f_2435(2,t2,C_SCHEME_FALSE);}}
+f_2418(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){
+/* k2416 in a2407 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2418(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word t6;
-C_word t7;
-C_word t8;
-C_word t9;
-C_word t10;
-C_word t11;
-C_word ab[17],*a=ab;
+C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2435,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_2418,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);}
+t2=C_i_car(((C_word*)t0)[5]);
+t3=C_i_cdr(((C_word*)t0)[5]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2431,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* rename21792184 */
+t5=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[16]);}
else{
/* ##sys#syntax-rules-mismatch */
-t2=*((C_word*)lf[18]+1);
+t2=*((C_word*)lf[17]+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){
+/* k2429 in k2416 in a2407 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2431(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word 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));}
+C_save_and_reclaim((void*)tr2,(void*)f_2431,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)t0)[3]);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,t1,t2));}
-/* 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){
+/* k2404 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2406(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 1090 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 1124 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[15],C_SCHEME_END_OF_LIST,t1);}
-/* k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2383(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15717,65 +15776,65 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2383,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2386,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2396,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2398,a[2]=((C_word)li0),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1136 ##sys#er-transformer */
t5=*((C_word*)lf[14]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
-/* 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){
+/* a2397 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2398(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word *a;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_2415,5,t0,t1,t2,t3,t4);}
-/* chicken-syntax.scm: 1104 syntax-error */
+C_save_and_reclaim((void*)tr5,(void*)f_2398,5,t0,t1,t2,t3,t4);}
+/* chicken-syntax.scm: 1138 syntax-error */
t5=*((C_word*)lf[12]+1);
((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t1,lf[11],lf[13]);}
-/* 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){
+/* k2394 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2396(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* chicken-syntax.scm: 1100 ##sys#extend-macro-environment */
+/* chicken-syntax.scm: 1134 ##sys#extend-macro-environment */
t2=*((C_word*)lf[10]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[11],C_SCHEME_END_OF_LIST,t1);}
-/* k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2386(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2386,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2389,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1141 ##sys#macro-subset */
t3=*((C_word*)lf[8]+1);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],*((C_word*)lf[9]+1));}
-/* k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2389(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2406,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_2389,2,t0,t1);}
t2=C_mutate((C_word*)lf[0]+1 /* (set! chicken-macro-environment ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2409,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* chicken-syntax.scm: 1112 register-feature! */
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2392,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1146 register-feature! */
t4=*((C_word*)lf[1]+1);
((C_proc8)(void*)(*((C_word*)t4+1)))(8,t4,t3,lf[2],lf[3],lf[4],lf[5],lf[6],lf[7]);}
-/* k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in 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){
+/* k2390 in k2387 in k2384 in k2381 in k2378 in k2375 in k2372 in k2369 in k2366 in k2363 in k2360 in k2357 in k2354 in k2351 in k2348 in k2345 in k2342 in k2339 in k2336 in k2333 in k2330 in k2327 in k2324 in k2321 in k2318 in k2315 in k2312 in k2309 in k2306 in k2303 in k2300 in k2297 in k2294 in k2291 in k2288 in k2285 in k2282 in k2279 in k2276 in k2273 in k2270 in k2267 in k2264 in k2261 in k2257 */
+static void C_ccall f_2392(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
@@ -15783,697 +15842,707 @@ 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] = {
+static C_PTABLE_ENTRY ptable[701] = {
{"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_2259:chicken_syntax_scm",(void*)f_2259},
+{"f_2263:chicken_syntax_scm",(void*)f_2263},
+{"f_10755:chicken_syntax_scm",(void*)f_10755},
+{"f_10759:chicken_syntax_scm",(void*)f_10759},
+{"f_10766:chicken_syntax_scm",(void*)f_10766},
{"f_10753:chicken_syntax_scm",(void*)f_10753},
-{"f_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_2266:chicken_syntax_scm",(void*)f_2266},
+{"f_10647:chicken_syntax_scm",(void*)f_10647},
+{"f_10738:chicken_syntax_scm",(void*)f_10738},
+{"f_10745:chicken_syntax_scm",(void*)f_10745},
+{"f_10660:chicken_syntax_scm",(void*)f_10660},
+{"f_10645:chicken_syntax_scm",(void*)f_10645},
+{"f_2269:chicken_syntax_scm",(void*)f_2269},
+{"f_10200:chicken_syntax_scm",(void*)f_10200},
+{"f_10204:chicken_syntax_scm",(void*)f_10204},
+{"f_10213:chicken_syntax_scm",(void*)f_10213},
{"f_10216:chicken_syntax_scm",(void*)f_10216},
-{"f_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_10222:chicken_syntax_scm",(void*)f_10222},
+{"f_10225:chicken_syntax_scm",(void*)f_10225},
+{"f_10228:chicken_syntax_scm",(void*)f_10228},
+{"f_10231:chicken_syntax_scm",(void*)f_10231},
+{"f_10641:chicken_syntax_scm",(void*)f_10641},
+{"f_10601:chicken_syntax_scm",(void*)f_10601},
+{"f_10633:chicken_syntax_scm",(void*)f_10633},
+{"f_10593:chicken_syntax_scm",(void*)f_10593},
+{"f_10549:chicken_syntax_scm",(void*)f_10549},
+{"f_10260:chicken_syntax_scm",(void*)f_10260},
+{"f_10270:chicken_syntax_scm",(void*)f_10270},
+{"f_10537:chicken_syntax_scm",(void*)f_10537},
+{"f_10273:chicken_syntax_scm",(void*)f_10273},
+{"f_10533:chicken_syntax_scm",(void*)f_10533},
+{"f_10276:chicken_syntax_scm",(void*)f_10276},
+{"f_10323:chicken_syntax_scm",(void*)f_10323},
+{"f_10287:chicken_syntax_scm",(void*)f_10287},
+{"f_10258:chicken_syntax_scm",(void*)f_10258},
+{"f_10254:chicken_syntax_scm",(void*)f_10254},
+{"f_10198:chicken_syntax_scm",(void*)f_10198},
+{"f_2272:chicken_syntax_scm",(void*)f_2272},
+{"f_10057:chicken_syntax_scm",(void*)f_10057},
+{"f_10061:chicken_syntax_scm",(void*)f_10061},
+{"f_10064:chicken_syntax_scm",(void*)f_10064},
+{"f_10067:chicken_syntax_scm",(void*)f_10067},
+{"f_10103:chicken_syntax_scm",(void*)f_10103},
+{"f_10118:chicken_syntax_scm",(void*)f_10118},
+{"f_10172:chicken_syntax_scm",(void*)f_10172},
+{"f_10133:chicken_syntax_scm",(void*)f_10133},
+{"f_10096:chicken_syntax_scm",(void*)f_10096},
+{"f_10055:chicken_syntax_scm",(void*)f_10055},
+{"f_2275:chicken_syntax_scm",(void*)f_2275},
+{"f_9958:chicken_syntax_scm",(void*)f_9958},
+{"f_9962:chicken_syntax_scm",(void*)f_9962},
+{"f_9965:chicken_syntax_scm",(void*)f_9965},
+{"f_9968:chicken_syntax_scm",(void*)f_9968},
{"f_10047:chicken_syntax_scm",(void*)f_10047},
-{"f_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_9956:chicken_syntax_scm",(void*)f_9956},
+{"f_2278:chicken_syntax_scm",(void*)f_2278},
+{"f_9940:chicken_syntax_scm",(void*)f_9940},
+{"f_9948:chicken_syntax_scm",(void*)f_9948},
+{"f_9938:chicken_syntax_scm",(void*)f_9938},
+{"f_2281:chicken_syntax_scm",(void*)f_2281},
+{"f_9851:chicken_syntax_scm",(void*)f_9851},
{"f_9855:chicken_syntax_scm",(void*)f_9855},
-{"f_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_9858:chicken_syntax_scm",(void*)f_9858},
+{"f_9861:chicken_syntax_scm",(void*)f_9861},
+{"f_9927:chicken_syntax_scm",(void*)f_9927},
+{"f_9864:chicken_syntax_scm",(void*)f_9864},
+{"f_9877:chicken_syntax_scm",(void*)f_9877},
+{"f_9921:chicken_syntax_scm",(void*)f_9921},
+{"f_9888:chicken_syntax_scm",(void*)f_9888},
+{"f_9896:chicken_syntax_scm",(void*)f_9896},
+{"f_9898:chicken_syntax_scm",(void*)f_9898},
+{"f_9915:chicken_syntax_scm",(void*)f_9915},
+{"f_9883:chicken_syntax_scm",(void*)f_9883},
+{"f_9875:chicken_syntax_scm",(void*)f_9875},
+{"f_9871:chicken_syntax_scm",(void*)f_9871},
+{"f_9849:chicken_syntax_scm",(void*)f_9849},
+{"f_2284:chicken_syntax_scm",(void*)f_2284},
+{"f_9737:chicken_syntax_scm",(void*)f_9737},
+{"f_9741:chicken_syntax_scm",(void*)f_9741},
+{"f_9750:chicken_syntax_scm",(void*)f_9750},
+{"f_9753:chicken_syntax_scm",(void*)f_9753},
+{"f_9756:chicken_syntax_scm",(void*)f_9756},
+{"f_9816:chicken_syntax_scm",(void*)f_9816},
+{"f_9791:chicken_syntax_scm",(void*)f_9791},
+{"f_9735:chicken_syntax_scm",(void*)f_9735},
+{"f_2287:chicken_syntax_scm",(void*)f_2287},
+{"f_9600:chicken_syntax_scm",(void*)f_9600},
+{"f_9604:chicken_syntax_scm",(void*)f_9604},
+{"f_9616:chicken_syntax_scm",(void*)f_9616},
+{"f_9619:chicken_syntax_scm",(void*)f_9619},
+{"f_9622:chicken_syntax_scm",(void*)f_9622},
+{"f_9669:chicken_syntax_scm",(void*)f_9669},
+{"f_9598:chicken_syntax_scm",(void*)f_9598},
+{"f_2290:chicken_syntax_scm",(void*)f_2290},
+{"f_8914:chicken_syntax_scm",(void*)f_8914},
+{"f_8918:chicken_syntax_scm",(void*)f_8918},
+{"f_9561:chicken_syntax_scm",(void*)f_9561},
+{"f_9590:chicken_syntax_scm",(void*)f_9590},
+{"f_8927:chicken_syntax_scm",(void*)f_8927},
+{"f_9517:chicken_syntax_scm",(void*)f_9517},
+{"f_9555:chicken_syntax_scm",(void*)f_9555},
+{"f_9544:chicken_syntax_scm",(void*)f_9544},
+{"f_9552:chicken_syntax_scm",(void*)f_9552},
+{"f_8930:chicken_syntax_scm",(void*)f_8930},
+{"f_9473:chicken_syntax_scm",(void*)f_9473},
+{"f_9511:chicken_syntax_scm",(void*)f_9511},
+{"f_9500:chicken_syntax_scm",(void*)f_9500},
+{"f_9508:chicken_syntax_scm",(void*)f_9508},
+{"f_8933:chicken_syntax_scm",(void*)f_8933},
+{"f_8936:chicken_syntax_scm",(void*)f_8936},
+{"f_8939:chicken_syntax_scm",(void*)f_8939},
+{"f_9438:chicken_syntax_scm",(void*)f_9438},
+{"f_9467:chicken_syntax_scm",(void*)f_9467},
+{"f_9387:chicken_syntax_scm",(void*)f_9387},
+{"f_9389:chicken_syntax_scm",(void*)f_9389},
{"f_9422:chicken_syntax_scm",(void*)f_9422},
-{"f_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_9402:chicken_syntax_scm",(void*)f_9402},
+{"f_9298:chicken_syntax_scm",(void*)f_9298},
+{"f_9365:chicken_syntax_scm",(void*)f_9365},
+{"f_9379:chicken_syntax_scm",(void*)f_9379},
+{"f_9310:chicken_syntax_scm",(void*)f_9310},
+{"f_9312:chicken_syntax_scm",(void*)f_9312},
+{"f_9345:chicken_syntax_scm",(void*)f_9345},
+{"f_9325:chicken_syntax_scm",(void*)f_9325},
+{"f_9306:chicken_syntax_scm",(void*)f_9306},
+{"f_9302:chicken_syntax_scm",(void*)f_9302},
+{"f_8950:chicken_syntax_scm",(void*)f_8950},
+{"f_9234:chicken_syntax_scm",(void*)f_9234},
+{"f_9247:chicken_syntax_scm",(void*)f_9247},
+{"f_9154:chicken_syntax_scm",(void*)f_9154},
+{"f_9172:chicken_syntax_scm",(void*)f_9172},
+{"f_9185:chicken_syntax_scm",(void*)f_9185},
+{"f_9162:chicken_syntax_scm",(void*)f_9162},
+{"f_9158:chicken_syntax_scm",(void*)f_9158},
+{"f_9150:chicken_syntax_scm",(void*)f_9150},
+{"f_9142:chicken_syntax_scm",(void*)f_9142},
+{"f_9074:chicken_syntax_scm",(void*)f_9074},
+{"f_9087:chicken_syntax_scm",(void*)f_9087},
+{"f_8994:chicken_syntax_scm",(void*)f_8994},
{"f_9012:chicken_syntax_scm",(void*)f_9012},
-{"f_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_9025:chicken_syntax_scm",(void*)f_9025},
+{"f_9002:chicken_syntax_scm",(void*)f_9002},
+{"f_8998:chicken_syntax_scm",(void*)f_8998},
+{"f_8990:chicken_syntax_scm",(void*)f_8990},
+{"f_8912:chicken_syntax_scm",(void*)f_8912},
+{"f_2293:chicken_syntax_scm",(void*)f_2293},
+{"f_8793:chicken_syntax_scm",(void*)f_8793},
+{"f_8797:chicken_syntax_scm",(void*)f_8797},
+{"f_8803:chicken_syntax_scm",(void*)f_8803},
+{"f_8904:chicken_syntax_scm",(void*)f_8904},
+{"f_8809:chicken_syntax_scm",(void*)f_8809},
+{"f_8812:chicken_syntax_scm",(void*)f_8812},
+{"f_8815:chicken_syntax_scm",(void*)f_8815},
+{"f_8855:chicken_syntax_scm",(void*)f_8855},
+{"f_8878:chicken_syntax_scm",(void*)f_8878},
+{"f_8885:chicken_syntax_scm",(void*)f_8885},
+{"f_8892:chicken_syntax_scm",(void*)f_8892},
{"f_8868:chicken_syntax_scm",(void*)f_8868},
-{"f_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_8818:chicken_syntax_scm",(void*)f_8818},
+{"f_8791:chicken_syntax_scm",(void*)f_8791},
+{"f_2296:chicken_syntax_scm",(void*)f_2296},
+{"f_8307:chicken_syntax_scm",(void*)f_8307},
+{"f_8311:chicken_syntax_scm",(void*)f_8311},
+{"f_8320:chicken_syntax_scm",(void*)f_8320},
+{"f_8323:chicken_syntax_scm",(void*)f_8323},
+{"f_8326:chicken_syntax_scm",(void*)f_8326},
+{"f_8754:chicken_syntax_scm",(void*)f_8754},
+{"f_8783:chicken_syntax_scm",(void*)f_8783},
+{"f_8329:chicken_syntax_scm",(void*)f_8329},
+{"f_8719:chicken_syntax_scm",(void*)f_8719},
+{"f_8748:chicken_syntax_scm",(void*)f_8748},
+{"f_8332:chicken_syntax_scm",(void*)f_8332},
+{"f_8675:chicken_syntax_scm",(void*)f_8675},
+{"f_8713:chicken_syntax_scm",(void*)f_8713},
{"f_8702:chicken_syntax_scm",(void*)f_8702},
-{"f_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_8710:chicken_syntax_scm",(void*)f_8710},
+{"f_8335:chicken_syntax_scm",(void*)f_8335},
+{"f_8631:chicken_syntax_scm",(void*)f_8631},
+{"f_8669:chicken_syntax_scm",(void*)f_8669},
+{"f_8658:chicken_syntax_scm",(void*)f_8658},
{"f_8666:chicken_syntax_scm",(void*)f_8666},
-{"f_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_8338:chicken_syntax_scm",(void*)f_8338},
+{"f_8582:chicken_syntax_scm",(void*)f_8582},
+{"f_8615:chicken_syntax_scm",(void*)f_8615},
+{"f_8595:chicken_syntax_scm",(void*)f_8595},
+{"f_8527:chicken_syntax_scm",(void*)f_8527},
+{"f_8533:chicken_syntax_scm",(void*)f_8533},
+{"f_8566:chicken_syntax_scm",(void*)f_8566},
+{"f_8546:chicken_syntax_scm",(void*)f_8546},
+{"f_8531:chicken_syntax_scm",(void*)f_8531},
+{"f_8349:chicken_syntax_scm",(void*)f_8349},
+{"f_8423:chicken_syntax_scm",(void*)f_8423},
+{"f_8436:chicken_syntax_scm",(void*)f_8436},
+{"f_8454:chicken_syntax_scm",(void*)f_8454},
+{"f_8421:chicken_syntax_scm",(void*)f_8421},
{"f_8417:chicken_syntax_scm",(void*)f_8417},
-{"f_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_8397:chicken_syntax_scm",(void*)f_8397},
+{"f_8305:chicken_syntax_scm",(void*)f_8305},
+{"f_2299:chicken_syntax_scm",(void*)f_2299},
+{"f_8262:chicken_syntax_scm",(void*)f_8262},
+{"f_8266:chicken_syntax_scm",(void*)f_8266},
+{"f_8273:chicken_syntax_scm",(void*)f_8273},
+{"f_8293:chicken_syntax_scm",(void*)f_8293},
+{"f_8297:chicken_syntax_scm",(void*)f_8297},
+{"f_8260:chicken_syntax_scm",(void*)f_8260},
+{"f_2302:chicken_syntax_scm",(void*)f_2302},
+{"f_8209:chicken_syntax_scm",(void*)f_8209},
+{"f_8213:chicken_syntax_scm",(void*)f_8213},
+{"f_8220:chicken_syntax_scm",(void*)f_8220},
+{"f_8248:chicken_syntax_scm",(void*)f_8248},
+{"f_8252:chicken_syntax_scm",(void*)f_8252},
+{"f_8207:chicken_syntax_scm",(void*)f_8207},
+{"f_2305:chicken_syntax_scm",(void*)f_2305},
+{"f_7981:chicken_syntax_scm",(void*)f_7981},
+{"f_7985:chicken_syntax_scm",(void*)f_7985},
+{"f_7994:chicken_syntax_scm",(void*)f_7994},
+{"f_8166:chicken_syntax_scm",(void*)f_8166},
+{"f_8195:chicken_syntax_scm",(void*)f_8195},
{"f_8063:chicken_syntax_scm",(void*)f_8063},
-{"f_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_8096:chicken_syntax_scm",(void*)f_8096},
+{"f_8109:chicken_syntax_scm",(void*)f_8109},
+{"f_8094:chicken_syntax_scm",(void*)f_8094},
+{"f_8090:chicken_syntax_scm",(void*)f_8090},
+{"f_7979:chicken_syntax_scm",(void*)f_7979},
+{"f_2308:chicken_syntax_scm",(void*)f_2308},
+{"f_7939:chicken_syntax_scm",(void*)f_7939},
+{"f_7943:chicken_syntax_scm",(void*)f_7943},
+{"f_7963:chicken_syntax_scm",(void*)f_7963},
{"f_7971:chicken_syntax_scm",(void*)f_7971},
-{"f_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_7946:chicken_syntax_scm",(void*)f_7946},
+{"f_7953:chicken_syntax_scm",(void*)f_7953},
+{"f_7957:chicken_syntax_scm",(void*)f_7957},
+{"f_7937:chicken_syntax_scm",(void*)f_7937},
+{"f_2311:chicken_syntax_scm",(void*)f_2311},
+{"f_7414:chicken_syntax_scm",(void*)f_7414},
+{"f_7418:chicken_syntax_scm",(void*)f_7418},
+{"f_7427:chicken_syntax_scm",(void*)f_7427},
+{"f_7430:chicken_syntax_scm",(void*)f_7430},
+{"f_7900:chicken_syntax_scm",(void*)f_7900},
+{"f_7929:chicken_syntax_scm",(void*)f_7929},
+{"f_7505:chicken_syntax_scm",(void*)f_7505},
+{"f_7860:chicken_syntax_scm",(void*)f_7860},
+{"f_7873:chicken_syntax_scm",(void*)f_7873},
+{"f_7508:chicken_syntax_scm",(void*)f_7508},
+{"f_7812:chicken_syntax_scm",(void*)f_7812},
+{"f_7854:chicken_syntax_scm",(void*)f_7854},
+{"f_7839:chicken_syntax_scm",(void*)f_7839},
+{"f_7851:chicken_syntax_scm",(void*)f_7851},
+{"f_7847:chicken_syntax_scm",(void*)f_7847},
+{"f_7511:chicken_syntax_scm",(void*)f_7511},
+{"f_7766:chicken_syntax_scm",(void*)f_7766},
+{"f_7799:chicken_syntax_scm",(void*)f_7799},
{"f_7806:chicken_syntax_scm",(void*)f_7806},
-{"f_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_7523:chicken_syntax_scm",(void*)f_7523},
+{"f_7726:chicken_syntax_scm",(void*)f_7726},
+{"f_7530:chicken_syntax_scm",(void*)f_7530},
{"f_7532:chicken_syntax_scm",(void*)f_7532},
-{"f_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_7720:chicken_syntax_scm",(void*)f_7720},
+{"f_7604:chicken_syntax_scm",(void*)f_7604},
+{"f_7686:chicken_syntax_scm",(void*)f_7686},
+{"f_7643:chicken_syntax_scm",(void*)f_7643},
+{"f_7623:chicken_syntax_scm",(void*)f_7623},
+{"f_7556:chicken_syntax_scm",(void*)f_7556},
+{"f_7594:chicken_syntax_scm",(void*)f_7594},
+{"f_7583:chicken_syntax_scm",(void*)f_7583},
+{"f_7591:chicken_syntax_scm",(void*)f_7591},
+{"f_7550:chicken_syntax_scm",(void*)f_7550},
+{"f_7554:chicken_syntax_scm",(void*)f_7554},
+{"f_7512:chicken_syntax_scm",(void*)f_7512},
+{"f_7463:chicken_syntax_scm",(void*)f_7463},
+{"f_7486:chicken_syntax_scm",(void*)f_7486},
+{"f_7490:chicken_syntax_scm",(void*)f_7490},
+{"f_7432:chicken_syntax_scm",(void*)f_7432},
+{"f_7453:chicken_syntax_scm",(void*)f_7453},
+{"f_7412:chicken_syntax_scm",(void*)f_7412},
+{"f_2314:chicken_syntax_scm",(void*)f_2314},
+{"f_7342:chicken_syntax_scm",(void*)f_7342},
+{"f_7346:chicken_syntax_scm",(void*)f_7346},
+{"f_7355:chicken_syntax_scm",(void*)f_7355},
+{"f_7358:chicken_syntax_scm",(void*)f_7358},
+{"f_7363:chicken_syntax_scm",(void*)f_7363},
+{"f_7400:chicken_syntax_scm",(void*)f_7400},
+{"f_7381:chicken_syntax_scm",(void*)f_7381},
+{"f_7340:chicken_syntax_scm",(void*)f_7340},
+{"f_2317:chicken_syntax_scm",(void*)f_2317},
+{"f_6971:chicken_syntax_scm",(void*)f_6971},
+{"f_6975:chicken_syntax_scm",(void*)f_6975},
+{"f_6984:chicken_syntax_scm",(void*)f_6984},
+{"f_6987:chicken_syntax_scm",(void*)f_6987},
+{"f_7298:chicken_syntax_scm",(void*)f_7298},
+{"f_7296:chicken_syntax_scm",(void*)f_7296},
+{"f_6990:chicken_syntax_scm",(void*)f_6990},
+{"f_7246:chicken_syntax_scm",(void*)f_7246},
+{"f_7288:chicken_syntax_scm",(void*)f_7288},
+{"f_7273:chicken_syntax_scm",(void*)f_7273},
+{"f_7285:chicken_syntax_scm",(void*)f_7285},
+{"f_7281:chicken_syntax_scm",(void*)f_7281},
+{"f_6993:chicken_syntax_scm",(void*)f_6993},
{"f_7206:chicken_syntax_scm",(void*)f_7206},
-{"f_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_7013:chicken_syntax_scm",(void*)f_7013},
+{"f_7027:chicken_syntax_scm",(void*)f_7027},
+{"f_7200:chicken_syntax_scm",(void*)f_7200},
+{"f_7054:chicken_syntax_scm",(void*)f_7054},
+{"f_7152:chicken_syntax_scm",(void*)f_7152},
+{"f_7082:chicken_syntax_scm",(void*)f_7082},
+{"f_7096:chicken_syntax_scm",(void*)f_7096},
+{"f_7123:chicken_syntax_scm",(void*)f_7123},
+{"f_7090:chicken_syntax_scm",(void*)f_7090},
+{"f_7086:chicken_syntax_scm",(void*)f_7086},
+{"f_7021:chicken_syntax_scm",(void*)f_7021},
+{"f_7025:chicken_syntax_scm",(void*)f_7025},
+{"f_7017:chicken_syntax_scm",(void*)f_7017},
{"f_6994:chicken_syntax_scm",(void*)f_6994},
-{"f_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_6969:chicken_syntax_scm",(void*)f_6969},
+{"f_2320:chicken_syntax_scm",(void*)f_2320},
+{"f_6965:chicken_syntax_scm",(void*)f_6965},
+{"f_6888:chicken_syntax_scm",(void*)f_6888},
+{"f_6892:chicken_syntax_scm",(void*)f_6892},
+{"f_6895:chicken_syntax_scm",(void*)f_6895},
+{"f_6898:chicken_syntax_scm",(void*)f_6898},
+{"f_6933:chicken_syntax_scm",(void*)f_6933},
+{"f_6886:chicken_syntax_scm",(void*)f_6886},
+{"f_2323:chicken_syntax_scm",(void*)f_2323},
+{"f_6783:chicken_syntax_scm",(void*)f_6783},
+{"f_6787:chicken_syntax_scm",(void*)f_6787},
+{"f_6874:chicken_syntax_scm",(void*)f_6874},
+{"f_6870:chicken_syntax_scm",(void*)f_6870},
+{"f_6789:chicken_syntax_scm",(void*)f_6789},
+{"f_6793:chicken_syntax_scm",(void*)f_6793},
+{"f_6850:chicken_syntax_scm",(void*)f_6850},
+{"f_6802:chicken_syntax_scm",(void*)f_6802},
+{"f_6824:chicken_syntax_scm",(void*)f_6824},
+{"f_6814:chicken_syntax_scm",(void*)f_6814},
+{"f_6805:chicken_syntax_scm",(void*)f_6805},
+{"f_6781:chicken_syntax_scm",(void*)f_6781},
+{"f_2326:chicken_syntax_scm",(void*)f_2326},
+{"f_6620:chicken_syntax_scm",(void*)f_6620},
+{"f_6624:chicken_syntax_scm",(void*)f_6624},
+{"f_6633:chicken_syntax_scm",(void*)f_6633},
+{"f_6636:chicken_syntax_scm",(void*)f_6636},
+{"f_6641:chicken_syntax_scm",(void*)f_6641},
+{"f_6686:chicken_syntax_scm",(void*)f_6686},
{"f_6753:chicken_syntax_scm",(void*)f_6753},
-{"f_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_6715:chicken_syntax_scm",(void*)f_6715},
+{"f_6655:chicken_syntax_scm",(void*)f_6655},
+{"f_6659:chicken_syntax_scm",(void*)f_6659},
+{"f_6618:chicken_syntax_scm",(void*)f_6618},
+{"f_2329:chicken_syntax_scm",(void*)f_2329},
+{"f_6420:chicken_syntax_scm",(void*)f_6420},
+{"f_6424:chicken_syntax_scm",(void*)f_6424},
+{"f_6433:chicken_syntax_scm",(void*)f_6433},
+{"f_6436:chicken_syntax_scm",(void*)f_6436},
+{"f_6439:chicken_syntax_scm",(void*)f_6439},
+{"f_6442:chicken_syntax_scm",(void*)f_6442},
+{"f_6445:chicken_syntax_scm",(void*)f_6445},
+{"f_6452:chicken_syntax_scm",(void*)f_6452},
+{"f_6470:chicken_syntax_scm",(void*)f_6470},
+{"f_6486:chicken_syntax_scm",(void*)f_6486},
+{"f_6492:chicken_syntax_scm",(void*)f_6492},
+{"f_6552:chicken_syntax_scm",(void*)f_6552},
+{"f_6579:chicken_syntax_scm",(void*)f_6579},
+{"f_6546:chicken_syntax_scm",(void*)f_6546},
+{"f_6542:chicken_syntax_scm",(void*)f_6542},
{"f_6534:chicken_syntax_scm",(void*)f_6534},
{"f_6530:chicken_syntax_scm",(void*)f_6530},
-{"f_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_6499:chicken_syntax_scm",(void*)f_6499},
+{"f_6468:chicken_syntax_scm",(void*)f_6468},
+{"f_6418:chicken_syntax_scm",(void*)f_6418},
+{"f_2332:chicken_syntax_scm",(void*)f_2332},
+{"f_6414:chicken_syntax_scm",(void*)f_6414},
+{"f_6410:chicken_syntax_scm",(void*)f_6410},
+{"f_5827:chicken_syntax_scm",(void*)f_5827},
+{"f_5831:chicken_syntax_scm",(void*)f_5831},
+{"f_5843:chicken_syntax_scm",(void*)f_5843},
+{"f_5846:chicken_syntax_scm",(void*)f_5846},
+{"f_5849:chicken_syntax_scm",(void*)f_5849},
+{"f_6149:chicken_syntax_scm",(void*)f_6149},
+{"f_6152:chicken_syntax_scm",(void*)f_6152},
+{"f_6361:chicken_syntax_scm",(void*)f_6361},
+{"f_6390:chicken_syntax_scm",(void*)f_6390},
+{"f_6155:chicken_syntax_scm",(void*)f_6155},
+{"f_6317:chicken_syntax_scm",(void*)f_6317},
+{"f_6355:chicken_syntax_scm",(void*)f_6355},
+{"f_6344:chicken_syntax_scm",(void*)f_6344},
+{"f_6352:chicken_syntax_scm",(void*)f_6352},
+{"f_6171:chicken_syntax_scm",(void*)f_6171},
+{"f_6282:chicken_syntax_scm",(void*)f_6282},
+{"f_6311:chicken_syntax_scm",(void*)f_6311},
+{"f_6174:chicken_syntax_scm",(void*)f_6174},
+{"f_6177:chicken_syntax_scm",(void*)f_6177},
+{"f_6180:chicken_syntax_scm",(void*)f_6180},
+{"f_6238:chicken_syntax_scm",(void*)f_6238},
{"f_6276:chicken_syntax_scm",(void*)f_6276},
-{"f_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_6265:chicken_syntax_scm",(void*)f_6265},
+{"f_6273:chicken_syntax_scm",(void*)f_6273},
+{"f_6183:chicken_syntax_scm",(void*)f_6183},
+{"f_6186:chicken_syntax_scm",(void*)f_6186},
+{"f_6189:chicken_syntax_scm",(void*)f_6189},
+{"f_6196:chicken_syntax_scm",(void*)f_6196},
+{"f_6156:chicken_syntax_scm",(void*)f_6156},
+{"f_6168:chicken_syntax_scm",(void*)f_6168},
+{"f_6164:chicken_syntax_scm",(void*)f_6164},
+{"f_5948:chicken_syntax_scm",(void*)f_5948},
+{"f_5954:chicken_syntax_scm",(void*)f_5954},
+{"f_6142:chicken_syntax_scm",(void*)f_6142},
+{"f_6130:chicken_syntax_scm",(void*)f_6130},
+{"f_6114:chicken_syntax_scm",(void*)f_6114},
+{"f_6078:chicken_syntax_scm",(void*)f_6078},
+{"f_6028:chicken_syntax_scm",(void*)f_6028},
+{"f_6016:chicken_syntax_scm",(void*)f_6016},
+{"f_5851:chicken_syntax_scm",(void*)f_5851},
+{"f_5859:chicken_syntax_scm",(void*)f_5859},
+{"f_5863:chicken_syntax_scm",(void*)f_5863},
+{"f_5867:chicken_syntax_scm",(void*)f_5867},
+{"f_5869:chicken_syntax_scm",(void*)f_5869},
+{"f_5922:chicken_syntax_scm",(void*)f_5922},
+{"f_5938:chicken_syntax_scm",(void*)f_5938},
+{"f_5934:chicken_syntax_scm",(void*)f_5934},
+{"f_5890:chicken_syntax_scm",(void*)f_5890},
+{"f_5825:chicken_syntax_scm",(void*)f_5825},
+{"f_2335:chicken_syntax_scm",(void*)f_2335},
+{"f_5817:chicken_syntax_scm",(void*)f_5817},
+{"f_5813:chicken_syntax_scm",(void*)f_5813},
+{"f_5809:chicken_syntax_scm",(void*)f_5809},
+{"f_5602:chicken_syntax_scm",(void*)f_5602},
+{"f_5606:chicken_syntax_scm",(void*)f_5606},
+{"f_5609:chicken_syntax_scm",(void*)f_5609},
+{"f_5612:chicken_syntax_scm",(void*)f_5612},
+{"f_5619:chicken_syntax_scm",(void*)f_5619},
+{"f_5769:chicken_syntax_scm",(void*)f_5769},
+{"f_5654:chicken_syntax_scm",(void*)f_5654},
+{"f_5730:chicken_syntax_scm",(void*)f_5730},
+{"f_5742:chicken_syntax_scm",(void*)f_5742},
+{"f_5714:chicken_syntax_scm",(void*)f_5714},
+{"f_5600:chicken_syntax_scm",(void*)f_5600},
+{"f_2338:chicken_syntax_scm",(void*)f_2338},
+{"f_5592:chicken_syntax_scm",(void*)f_5592},
+{"f_5288:chicken_syntax_scm",(void*)f_5288},
+{"f_5292:chicken_syntax_scm",(void*)f_5292},
+{"f_5304:chicken_syntax_scm",(void*)f_5304},
+{"f_5307:chicken_syntax_scm",(void*)f_5307},
+{"f_5310:chicken_syntax_scm",(void*)f_5310},
+{"f_5313:chicken_syntax_scm",(void*)f_5313},
+{"f_5316:chicken_syntax_scm",(void*)f_5316},
+{"f_5319:chicken_syntax_scm",(void*)f_5319},
+{"f_5340:chicken_syntax_scm",(void*)f_5340},
+{"f_5568:chicken_syntax_scm",(void*)f_5568},
{"f_5430:chicken_syntax_scm",(void*)f_5430},
-{"f_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_5449:chicken_syntax_scm",(void*)f_5449},
{"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_5338:chicken_syntax_scm",(void*)f_5338},
+{"f_5286:chicken_syntax_scm",(void*)f_5286},
+{"f_2341:chicken_syntax_scm",(void*)f_2341},
+{"f_5278:chicken_syntax_scm",(void*)f_5278},
+{"f_5274:chicken_syntax_scm",(void*)f_5274},
+{"f_5270:chicken_syntax_scm",(void*)f_5270},
+{"f_5266:chicken_syntax_scm",(void*)f_5266},
+{"f_4740:chicken_syntax_scm",(void*)f_4740},
+{"f_4744:chicken_syntax_scm",(void*)f_4744},
+{"f_4781:chicken_syntax_scm",(void*)f_4781},
+{"f_5189:chicken_syntax_scm",(void*)f_5189},
+{"f_5226:chicken_syntax_scm",(void*)f_5226},
+{"f_5230:chicken_syntax_scm",(void*)f_5230},
+{"f_5183:chicken_syntax_scm",(void*)f_5183},
+{"f_4784:chicken_syntax_scm",(void*)f_4784},
+{"f_4787:chicken_syntax_scm",(void*)f_4787},
+{"f_4790:chicken_syntax_scm",(void*)f_4790},
+{"f_4793:chicken_syntax_scm",(void*)f_4793},
+{"f_4796:chicken_syntax_scm",(void*)f_4796},
+{"f_4799:chicken_syntax_scm",(void*)f_4799},
+{"f_4802:chicken_syntax_scm",(void*)f_4802},
+{"f_4805:chicken_syntax_scm",(void*)f_4805},
+{"f_4808:chicken_syntax_scm",(void*)f_4808},
+{"f_4811:chicken_syntax_scm",(void*)f_4811},
+{"f_4814:chicken_syntax_scm",(void*)f_4814},
+{"f_4825:chicken_syntax_scm",(void*)f_4825},
+{"f_4851:chicken_syntax_scm",(void*)f_4851},
+{"f_4861:chicken_syntax_scm",(void*)f_4861},
+{"f_4865:chicken_syntax_scm",(void*)f_4865},
+{"f_4879:chicken_syntax_scm",(void*)f_4879},
+{"f_4903:chicken_syntax_scm",(void*)f_4903},
+{"f_4979:chicken_syntax_scm",(void*)f_4979},
+{"f_5127:chicken_syntax_scm",(void*)f_5127},
+{"f_5047:chicken_syntax_scm",(void*)f_5047},
+{"f_5066:chicken_syntax_scm",(void*)f_5066},
+{"f_5036:chicken_syntax_scm",(void*)f_5036},
+{"f_5004:chicken_syntax_scm",(void*)f_5004},
{"f_4907:chicken_syntax_scm",(void*)f_4907},
-{"f_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_4930:chicken_syntax_scm",(void*)f_4930},
+{"f_4963:chicken_syntax_scm",(void*)f_4963},
+{"f_4943:chicken_syntax_scm",(void*)f_4943},
+{"f_4924:chicken_syntax_scm",(void*)f_4924},
+{"f_4893:chicken_syntax_scm",(void*)f_4893},
+{"f_4901:chicken_syntax_scm",(void*)f_4901},
+{"f_4887:chicken_syntax_scm",(void*)f_4887},
+{"f_4849:chicken_syntax_scm",(void*)f_4849},
+{"f_4746:chicken_syntax_scm",(void*)f_4746},
{"f_4752:chicken_syntax_scm",(void*)f_4752},
-{"f_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_4778:chicken_syntax_scm",(void*)f_4778},
+{"f_4766:chicken_syntax_scm",(void*)f_4766},
+{"f_4770:chicken_syntax_scm",(void*)f_4770},
+{"f_4738:chicken_syntax_scm",(void*)f_4738},
+{"f_2344:chicken_syntax_scm",(void*)f_2344},
+{"f_4638:chicken_syntax_scm",(void*)f_4638},
+{"f_4642:chicken_syntax_scm",(void*)f_4642},
+{"f_4707:chicken_syntax_scm",(void*)f_4707},
+{"f_4722:chicken_syntax_scm",(void*)f_4722},
+{"f_4657:chicken_syntax_scm",(void*)f_4657},
+{"f_4680:chicken_syntax_scm",(void*)f_4680},
+{"f_4692:chicken_syntax_scm",(void*)f_4692},
+{"f_4636:chicken_syntax_scm",(void*)f_4636},
+{"f_2347:chicken_syntax_scm",(void*)f_2347},
+{"f_4632:chicken_syntax_scm",(void*)f_4632},
+{"f_4628:chicken_syntax_scm",(void*)f_4628},
+{"f_4424:chicken_syntax_scm",(void*)f_4424},
+{"f_4428:chicken_syntax_scm",(void*)f_4428},
+{"f_4431:chicken_syntax_scm",(void*)f_4431},
+{"f_4434:chicken_syntax_scm",(void*)f_4434},
+{"f_4437:chicken_syntax_scm",(void*)f_4437},
+{"f_4448:chicken_syntax_scm",(void*)f_4448},
+{"f_4476:chicken_syntax_scm",(void*)f_4476},
{"f_4568:chicken_syntax_scm",(void*)f_4568},
-{"f_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_4422:chicken_syntax_scm",(void*)f_4422},
+{"f_2350:chicken_syntax_scm",(void*)f_2350},
+{"f_4414:chicken_syntax_scm",(void*)f_4414},
+{"f_4410:chicken_syntax_scm",(void*)f_4410},
+{"f_4001:chicken_syntax_scm",(void*)f_4001},
+{"f_4005:chicken_syntax_scm",(void*)f_4005},
+{"f_4008:chicken_syntax_scm",(void*)f_4008},
+{"f_4011:chicken_syntax_scm",(void*)f_4011},
+{"f_4014:chicken_syntax_scm",(void*)f_4014},
+{"f_4017:chicken_syntax_scm",(void*)f_4017},
+{"f_4020:chicken_syntax_scm",(void*)f_4020},
+{"f_4023:chicken_syntax_scm",(void*)f_4023},
+{"f_4026:chicken_syntax_scm",(void*)f_4026},
+{"f_4235:chicken_syntax_scm",(void*)f_4235},
+{"f_4275:chicken_syntax_scm",(void*)f_4275},
+{"f_4309:chicken_syntax_scm",(void*)f_4309},
+{"f_4338:chicken_syntax_scm",(void*)f_4338},
+{"f_4283:chicken_syntax_scm",(void*)f_4283},
+{"f_4279:chicken_syntax_scm",(void*)f_4279},
+{"f_4028:chicken_syntax_scm",(void*)f_4028},
+{"f_4152:chicken_syntax_scm",(void*)f_4152},
+{"f_4179:chicken_syntax_scm",(void*)f_4179},
+{"f_4150:chicken_syntax_scm",(void*)f_4150},
{"f_4146:chicken_syntax_scm",(void*)f_4146},
-{"f_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_4138:chicken_syntax_scm",(void*)f_4138},
{"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_4089:chicken_syntax_scm",(void*)f_4089},
+{"f_4070:chicken_syntax_scm",(void*)f_4070},
+{"f_3999:chicken_syntax_scm",(void*)f_3999},
+{"f_2353:chicken_syntax_scm",(void*)f_2353},
+{"f_3530:chicken_syntax_scm",(void*)f_3530},
+{"f_3534:chicken_syntax_scm",(void*)f_3534},
+{"f_3549:chicken_syntax_scm",(void*)f_3549},
+{"f_3552:chicken_syntax_scm",(void*)f_3552},
+{"f_3555:chicken_syntax_scm",(void*)f_3555},
+{"f_3558:chicken_syntax_scm",(void*)f_3558},
+{"f_3561:chicken_syntax_scm",(void*)f_3561},
+{"f_3567:chicken_syntax_scm",(void*)f_3567},
+{"f_3570:chicken_syntax_scm",(void*)f_3570},
+{"f_3938:chicken_syntax_scm",(void*)f_3938},
+{"f_3967:chicken_syntax_scm",(void*)f_3967},
+{"f_3573:chicken_syntax_scm",(void*)f_3573},
+{"f_3891:chicken_syntax_scm",(void*)f_3891},
+{"f_3918:chicken_syntax_scm",(void*)f_3918},
+{"f_3889:chicken_syntax_scm",(void*)f_3889},
+{"f_3885:chicken_syntax_scm",(void*)f_3885},
+{"f_3602:chicken_syntax_scm",(void*)f_3602},
+{"f_3628:chicken_syntax_scm",(void*)f_3628},
+{"f_3664:chicken_syntax_scm",(void*)f_3664},
+{"f_3644:chicken_syntax_scm",(void*)f_3644},
{"f_3640:chicken_syntax_scm",(void*)f_3640},
-{"f_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_3596:chicken_syntax_scm",(void*)f_3596},
+{"f_3528:chicken_syntax_scm",(void*)f_3528},
+{"f_2356:chicken_syntax_scm",(void*)f_2356},
+{"f_3520:chicken_syntax_scm",(void*)f_3520},
+{"f_3330:chicken_syntax_scm",(void*)f_3330},
+{"f_3334:chicken_syntax_scm",(void*)f_3334},
+{"f_3337:chicken_syntax_scm",(void*)f_3337},
+{"f_3340:chicken_syntax_scm",(void*)f_3340},
+{"f_3343:chicken_syntax_scm",(void*)f_3343},
+{"f_3346:chicken_syntax_scm",(void*)f_3346},
+{"f_3355:chicken_syntax_scm",(void*)f_3355},
+{"f_3458:chicken_syntax_scm",(void*)f_3458},
+{"f_3486:chicken_syntax_scm",(void*)f_3486},
+{"f_3480:chicken_syntax_scm",(void*)f_3480},
+{"f_3461:chicken_syntax_scm",(void*)f_3461},
+{"f_3365:chicken_syntax_scm",(void*)f_3365},
+{"f_3368:chicken_syntax_scm",(void*)f_3368},
{"f_3440:chicken_syntax_scm",(void*)f_3440},
-{"f_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_3417:chicken_syntax_scm",(void*)f_3417},
+{"f_3374:chicken_syntax_scm",(void*)f_3374},
{"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_3405:chicken_syntax_scm",(void*)f_3405},
+{"f_3328:chicken_syntax_scm",(void*)f_3328},
+{"f_2359:chicken_syntax_scm",(void*)f_2359},
+{"f_3320:chicken_syntax_scm",(void*)f_3320},
+{"f_3099:chicken_syntax_scm",(void*)f_3099},
+{"f_3103:chicken_syntax_scm",(void*)f_3103},
+{"f_3106:chicken_syntax_scm",(void*)f_3106},
+{"f_3109:chicken_syntax_scm",(void*)f_3109},
{"f_3112:chicken_syntax_scm",(void*)f_3112},
{"f_3115:chicken_syntax_scm",(void*)f_3115},
{"f_3124:chicken_syntax_scm",(void*)f_3124},
-{"f_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_3243:chicken_syntax_scm",(void*)f_3243},
+{"f_3271:chicken_syntax_scm",(void*)f_3271},
+{"f_3304:chicken_syntax_scm",(void*)f_3304},
+{"f_3277:chicken_syntax_scm",(void*)f_3277},
+{"f_3265:chicken_syntax_scm",(void*)f_3265},
+{"f_3246:chicken_syntax_scm",(void*)f_3246},
+{"f_3134:chicken_syntax_scm",(void*)f_3134},
+{"f_3137:chicken_syntax_scm",(void*)f_3137},
+{"f_3233:chicken_syntax_scm",(void*)f_3233},
+{"f_3198:chicken_syntax_scm",(void*)f_3198},
{"f_3143:chicken_syntax_scm",(void*)f_3143},
-{"f_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_3166:chicken_syntax_scm",(void*)f_3166},
+{"f_3186:chicken_syntax_scm",(void*)f_3186},
+{"f_3097:chicken_syntax_scm",(void*)f_3097},
+{"f_2362:chicken_syntax_scm",(void*)f_2362},
+{"f_2818:chicken_syntax_scm",(void*)f_2818},
+{"f_2822:chicken_syntax_scm",(void*)f_2822},
+{"f_2825:chicken_syntax_scm",(void*)f_2825},
+{"f_2828:chicken_syntax_scm",(void*)f_2828},
+{"f_2831:chicken_syntax_scm",(void*)f_2831},
{"f_2834:chicken_syntax_scm",(void*)f_2834},
-{"f_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_2837:chicken_syntax_scm",(void*)f_2837},
+{"f_2846:chicken_syntax_scm",(void*)f_2846},
+{"f_2992:chicken_syntax_scm",(void*)f_2992},
+{"f_2995:chicken_syntax_scm",(void*)f_2995},
+{"f_3004:chicken_syntax_scm",(void*)f_3004},
+{"f_3029:chicken_syntax_scm",(void*)f_3029},
+{"f_3054:chicken_syntax_scm",(void*)f_3054},
+{"f_3076:chicken_syntax_scm",(void*)f_3076},
+{"f11150:chicken_syntax_scm",(void*)f11150},
+{"f11146:chicken_syntax_scm",(void*)f11146},
+{"f_3061:chicken_syntax_scm",(void*)f_3061},
+{"f_3048:chicken_syntax_scm",(void*)f_3048},
+{"f_3044:chicken_syntax_scm",(void*)f_3044},
+{"f_3023:chicken_syntax_scm",(void*)f_3023},
+{"f_3019:chicken_syntax_scm",(void*)f_3019},
+{"f_2986:chicken_syntax_scm",(void*)f_2986},
+{"f_2856:chicken_syntax_scm",(void*)f_2856},
+{"f_2863:chicken_syntax_scm",(void*)f_2863},
+{"f_2971:chicken_syntax_scm",(void*)f_2971},
+{"f_2959:chicken_syntax_scm",(void*)f_2959},
+{"f_2955:chicken_syntax_scm",(void*)f_2955},
+{"f_2891:chicken_syntax_scm",(void*)f_2891},
+{"f_2919:chicken_syntax_scm",(void*)f_2919},
+{"f_2931:chicken_syntax_scm",(void*)f_2931},
+{"f_2915:chicken_syntax_scm",(void*)f_2915},
+{"f_2816:chicken_syntax_scm",(void*)f_2816},
+{"f_2365:chicken_syntax_scm",(void*)f_2365},
+{"f_2714:chicken_syntax_scm",(void*)f_2714},
+{"f_2718:chicken_syntax_scm",(void*)f_2718},
+{"f_2724:chicken_syntax_scm",(void*)f_2724},
{"f_2808:chicken_syntax_scm",(void*)f_2808},
-{"f_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_2769:chicken_syntax_scm",(void*)f_2769},
+{"f_2781:chicken_syntax_scm",(void*)f_2781},
+{"f_2712:chicken_syntax_scm",(void*)f_2712},
+{"f_2368:chicken_syntax_scm",(void*)f_2368},
+{"f_2677:chicken_syntax_scm",(void*)f_2677},
+{"f_2681:chicken_syntax_scm",(void*)f_2681},
+{"f_2688:chicken_syntax_scm",(void*)f_2688},
{"f_2700:chicken_syntax_scm",(void*)f_2700},
-{"f_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_2704:chicken_syntax_scm",(void*)f_2704},
+{"f_2675:chicken_syntax_scm",(void*)f_2675},
+{"f_2371:chicken_syntax_scm",(void*)f_2371},
+{"f_2655:chicken_syntax_scm",(void*)f_2655},
+{"f_2663:chicken_syntax_scm",(void*)f_2663},
+{"f_2667:chicken_syntax_scm",(void*)f_2667},
+{"f_2653:chicken_syntax_scm",(void*)f_2653},
+{"f_2374:chicken_syntax_scm",(void*)f_2374},
+{"f_2630:chicken_syntax_scm",(void*)f_2630},
+{"f_2634:chicken_syntax_scm",(void*)f_2634},
+{"f_2628:chicken_syntax_scm",(void*)f_2628},
+{"f_2377:chicken_syntax_scm",(void*)f_2377},
+{"f_2464:chicken_syntax_scm",(void*)f_2464},
+{"f_2474:chicken_syntax_scm",(void*)f_2474},
+{"f_2498:chicken_syntax_scm",(void*)f_2498},
+{"f_2548:chicken_syntax_scm",(void*)f_2548},
+{"f_2561:chicken_syntax_scm",(void*)f_2561},
+{"f_2514:chicken_syntax_scm",(void*)f_2514},
+{"f_2530:chicken_syntax_scm",(void*)f_2530},
+{"f_2484:chicken_syntax_scm",(void*)f_2484},
+{"f_2462:chicken_syntax_scm",(void*)f_2462},
+{"f_2380:chicken_syntax_scm",(void*)f_2380},
+{"f_2408:chicken_syntax_scm",(void*)f_2408},
+{"f_2447:chicken_syntax_scm",(void*)f_2447},
+{"f_2418:chicken_syntax_scm",(void*)f_2418},
+{"f_2431:chicken_syntax_scm",(void*)f_2431},
{"f_2406:chicken_syntax_scm",(void*)f_2406},
-{"f_2409:chicken_syntax_scm",(void*)f_2409},
+{"f_2383:chicken_syntax_scm",(void*)f_2383},
+{"f_2398:chicken_syntax_scm",(void*)f_2398},
+{"f_2396:chicken_syntax_scm",(void*)f_2396},
+{"f_2386:chicken_syntax_scm",(void*)f_2386},
+{"f_2389:chicken_syntax_scm",(void*)f_2389},
+{"f_2392:chicken_syntax_scm",(void*)f_2392},
{NULL,NULL}};
#endif
diff --git a/bootstrap/chicken.c b/bootstrap/chicken.c
index 9e57db15..b391097c 100644
--- a/bootstrap/chicken.c
+++ b/bootstrap/chicken.c
@@ -1,11 +1,11 @@
/* 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)
+ 2010-02-22 11:33
+ Version 4.3.5
+ windows-mingw32-x86 [ manyargs dload ptables ]
+ compiled 2010-02-17 on lenovo-1 (MINGW32_NT-6.0)
command line: chicken.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -no-lambda-info -local -extend private-namespace.scm -output-file chicken.c
- used units: library eval chicken_syntax srfi_1 srfi_4 utils files extras data_structures support compiler optimizer compiler_syntax scrutinizer driver platform backend srfi_69
+ used units: library eval chicken_syntax srfi_1 srfi_4 utils files extras data_structures support compiler optimizer unboxing compiler_syntax scrutinizer driver platform backend srfi_69
*/
#include "chicken.h"
@@ -35,6 +35,8 @@ C_noret_decl(C_compiler_toplevel)
C_externimport void C_ccall C_compiler_toplevel(C_word c,C_word d,C_word k) C_noret;
C_noret_decl(C_optimizer_toplevel)
C_externimport void C_ccall C_optimizer_toplevel(C_word c,C_word d,C_word k) C_noret;
+C_noret_decl(C_unboxing_toplevel)
+C_externimport void C_ccall C_unboxing_toplevel(C_word c,C_word d,C_word k) C_noret;
C_noret_decl(C_compiler_syntax_toplevel)
C_externimport void C_ccall C_compiler_syntax_toplevel(C_word c,C_word d,C_word k) C_noret;
C_noret_decl(C_scrutinizer_toplevel)
@@ -48,351 +50,399 @@ C_externimport void C_ccall C_backend_toplevel(C_word c,C_word d,C_word k) C_nor
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 C_TLS C_word lf[105];
static double C_possibly_force_alignment;
C_noret_decl(C_toplevel)
C_externexport void C_ccall C_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_397)
+static void C_ccall f_397(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_400)
+static void C_ccall f_400(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_403)
+static void C_ccall f_403(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_406)
+static void C_ccall f_406(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_409)
+static void C_ccall f_409(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_412)
+static void C_ccall f_412(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_415)
+static void C_ccall f_415(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_418)
+static void C_ccall f_418(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_421)
+static void C_ccall f_421(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_424)
+static void C_ccall f_424(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_427)
+static void C_ccall f_427(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_430)
+static void C_ccall f_430(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_433)
+static void C_ccall f_433(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_436)
+static void C_ccall f_436(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_439)
+static void C_ccall f_439(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_442)
+static void C_ccall f_442(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_445)
+static void C_ccall f_445(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_448)
+static void C_ccall f_448(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_451)
+static void C_ccall f_451(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_455)
+static void C_ccall f_455(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1494)
+static void C_ccall f_1494(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1501)
+static void C_ccall f_1501(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1504)
+static void C_fcall f_1504(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1507)
+static void C_fcall f_1507(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1604)
+static void C_ccall f_1604(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1617)
+static void C_ccall f_1617(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1749)
+static void C_fcall f_1749(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1747)
+static void C_ccall f_1747(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1677)
+static void C_ccall f_1677(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1701)
+static void C_fcall f_1701(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1685)
+static void C_ccall f_1685(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1689)
+static void C_ccall f_1689(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1513)
+static void C_ccall f_1513(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1523)
+static void C_ccall f_1523(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1543)
+static void C_ccall f_1543(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1492)
+static void C_ccall f_1492(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_458)
+static void C_ccall f_458(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1361)
+static void C_ccall f_1361(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1365)
+static void C_ccall f_1365(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1377)
+static void C_ccall f_1377(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1469)
+static void C_ccall f_1469(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1380)
+static void C_ccall f_1380(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1387)
+static void C_ccall f_1387(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1465)
+static void C_ccall f_1465(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1407)
+static void C_ccall f_1407(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1359)
+static void C_ccall f_1359(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_461)
+static void C_ccall f_461(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1177)
+static void C_ccall f_1177(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1181)
+static void C_ccall f_1181(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1190)
+static void C_ccall f_1190(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1313)
+static void C_fcall f_1313(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1351)
+static void C_ccall f_1351(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1340)
+static void C_fcall f_1340(C_word t0,C_word t1) C_noret;
C_noret_decl(f_1348)
static void C_ccall f_1348(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_1193)
+static void C_ccall f_1193(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1289)
+static void C_ccall f_1289(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_1204)
static void C_ccall f_1204(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_1287)
+static void C_ccall f_1287(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1214)
+static void C_ccall f_1214(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1212)
+static void C_ccall f_1212(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1175)
+static void C_ccall f_1175(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_464)
+static void C_ccall f_464(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1091)
+static void C_ccall f_1091(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1095)
+static void C_ccall f_1095(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1098)
+static void C_ccall f_1098(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1105)
+static void C_ccall f_1105(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1129)
+static void C_ccall f_1129(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_1145)
static void C_ccall f_1145(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1148)
+static void C_ccall f_1148(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1151)
+static void C_ccall f_1151(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1154)
+static void C_ccall f_1154(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1167)
+static void C_ccall f_1167(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1157)
+static void C_ccall f_1157(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1160)
+static void C_ccall f_1160(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1163)
+static void C_ccall f_1163(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1089)
+static void C_ccall f_1089(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_467)
+static void C_ccall f_467(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1021)
+static void C_ccall f_1021(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1025)
+static void C_ccall f_1025(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1028)
+static void C_ccall f_1028(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1038)
+static void C_ccall f_1038(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1070)
+static void C_ccall f_1070(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1066)
+static void C_fcall f_1066(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1019)
+static void C_ccall f_1019(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_470)
+static void C_ccall f_470(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_992)
+static void C_ccall f_992(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_996)
+static void C_ccall f_996(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1011)
+static void C_ccall f_1011(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_990)
static void C_ccall f_990(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_473)
+static void C_ccall f_473(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_974)
+static void C_ccall f_974(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_982)
+static void C_ccall f_982(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_972)
static void C_ccall f_972(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_476)
+static void C_ccall f_476(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_956)
+static void C_ccall f_956(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_964)
static void C_ccall f_964(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_954)
static void C_ccall f_954(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_479)
+static void C_ccall f_479(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_938)
+static void C_ccall f_938(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_946)
+static void C_ccall f_946(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_936)
+static void C_ccall f_936(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_482)
+static void C_ccall f_482(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_920)
+static void C_ccall f_920(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_928)
+static void C_ccall f_928(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_918)
+static void C_ccall f_918(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_485)
+static void C_ccall f_485(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_902)
+static void C_ccall f_902(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_910)
+static void C_ccall f_910(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_900)
+static void C_ccall f_900(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_488)
+static void C_ccall f_488(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_884)
+static void C_ccall f_884(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_892)
+static void C_ccall f_892(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_882)
+static void C_ccall f_882(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_491)
+static void C_ccall f_491(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_866)
+static void C_ccall f_866(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_874)
+static void C_ccall f_874(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_864)
+static void C_ccall f_864(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_494)
+static void C_ccall f_494(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_497)
+static void C_ccall f_497(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_857)
+static void C_ccall f_857(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_853)
+static void C_ccall f_853(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_845)
+static void C_ccall f_845(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_835)
+static void C_ccall f_835(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_843)
+static void C_ccall f_843(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_501)
+static void C_ccall f_501(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_630)
+static void C_ccall f_630(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_642)
+static void C_fcall f_642(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_825)
+static void C_ccall f_825(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_818)
static void C_ccall f_818(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_740)
+static void C_ccall f_740(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_757)
+static void C_ccall f_757(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_743)
+static void C_ccall f_743(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_664)
+static void C_ccall f_664(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_727)
+static void C_ccall f_727(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_717)
+static void C_ccall f_717(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_707)
+static void C_ccall f_707(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_697)
+static void C_ccall f_697(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_634)
+static void C_ccall f_634(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_637)
+static void C_ccall f_637(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_618)
+static void C_ccall f_618(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_622)
+static void C_ccall f_622(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_610)
+static void C_ccall f_610(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_616)
static void C_ccall f_616(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_noret_decl(f_613)
+static void C_ccall f_613(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_503)
+static void C_ccall f_503(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_509)
+static void C_fcall f_509(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_544)
+static void C_fcall f_544(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_570)
+static void C_ccall f_570(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_566)
+static void C_ccall f_566(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_523)
+static void C_ccall f_523(C_word c,C_word t0,C_word t1) C_noret;
+
+C_noret_decl(trf_1504)
+static void C_fcall trf_1504(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1504(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_1309(t0,t1);}
+f_1504(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_noret_decl(trf_1507)
+static void C_fcall trf_1507(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1507(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_1312(t0,t1);}
+f_1507(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_noret_decl(trf_1749)
+static void C_fcall trf_1749(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1749(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1562(t0,t1,t2);}
+f_1749(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_noret_decl(trf_1701)
+static void C_fcall trf_1701(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1701(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1514(t0,t1,t2);}
+f_1701(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_noret_decl(trf_1313)
+static void C_fcall trf_1313(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1313(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1110(t0,t1,t2);}
+f_1313(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_noret_decl(trf_1340)
+static void C_fcall trf_1340(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1340(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_1137(t0,t1);}
+f_1340(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_noret_decl(trf_1066)
+static void C_fcall trf_1066(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1066(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_863(t0,t1);}
+f_1066(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_noret_decl(trf_642)
+static void C_fcall trf_642(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_642(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_561(t0,t1,t2);}
+f_642(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_noret_decl(trf_509)
+static void C_fcall trf_509(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_509(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_428(t0,t1,t2,t3,t4);}
+f_509(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_noret_decl(trf_544)
+static void C_fcall trf_544(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_544(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_463(t0,t1);}
+f_544(t0,t1);}
C_noret_decl(tr3)
static void C_fcall tr3(C_proc3 k) C_regparm C_noret;
@@ -453,12 +503,12 @@ if(!C_demand(3)){
C_save(t1);
C_reclaim((void*)toplevel_trampoline,NULL);}
toplevel_initialized=1;
-if(!C_demand_2(1098)){
+if(!C_demand_2(1238)){
C_save(t1);
-C_rereclaim2(1098*sizeof(C_word), 1);
+C_rereclaim2(1238*sizeof(C_word), 1);
t1=C_restore;}
a=C_alloc(3);
-C_initialize_lf(lf,91);
+C_initialize_lf(lf,105);
lf[0]=C_h_intern(&lf[0],33,"\003syschicken-ffi-macro-environment");
lf[1]=C_h_intern(&lf[1],27,"\010compilercompiler-arguments");
lf[2]=C_h_intern(&lf[2],29,"\010compilerprocess-command-line");
@@ -474,290 +524,315 @@ 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"
+lf[15]=C_h_intern(&lf[15],8,"unboxing");
+lf[16]=C_h_intern(&lf[16],6,"unsafe");
+lf[17]=C_h_intern(&lf[17],18,"disable-interrupts");
+lf[18]=C_h_intern(&lf[18],8,"no-trace");
+lf[19]=C_h_intern(&lf[19],5,"block");
+lf[20]=C_h_intern(&lf[20],11,"lambda-lift");
+lf[21]=C_h_intern(&lf[21],14,"no-lambda-info");
+lf[22]=C_h_intern(&lf[22],11,"debug-level");
+lf[23]=C_h_intern(&lf[23],25,"\010compilercompiler-warning");
+lf[24]=C_h_intern(&lf[24],5,"usage");
+lf[25]=C_decode_literal(C_heaptop,"\376B\000\000 invalid debug level ~S - ignored");
+lf[26]=C_h_intern(&lf[26],31,"\010compilervalid-compiler-options");
+lf[27]=C_h_intern(&lf[27],45,"\010compilervalid-compiler-options-with-argument");
+lf[28]=C_h_intern(&lf[28],4,"quit");
+lf[29]=C_decode_literal(C_heaptop,"\376B\000\000 missing argument to `-~s\047 option");
+lf[30]=C_decode_literal(C_heaptop,"\376B\000\000&invalid compiler option `~a\047 - ignored");
+lf[31]=C_h_intern(&lf[31],4,"conc");
+lf[32]=C_decode_literal(C_heaptop,"\376B\000\000\001-");
+lf[33]=C_h_intern(&lf[33],6,"append");
+lf[34]=C_h_intern(&lf[34],4,"argv");
+lf[35]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[36]=C_h_intern(&lf[36],6,"remove");
+lf[37]=C_h_intern(&lf[37],12,"string-split");
+lf[38]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[39]=C_h_intern(&lf[39],24,"get-environment-variable");
+lf[40]=C_decode_literal(C_heaptop,"\376B\000\000\017CHICKEN_OPTIONS");
+lf[41]=C_h_intern(&lf[41],16,"\003sysmacro-subset");
+lf[42]=C_h_intern(&lf[42],28,"\003sysextend-macro-environment");
+lf[43]=C_h_intern(&lf[43],20,"foreign-safe-lambda*");
+lf[44]=C_h_intern(&lf[44],25,"\004coreforeign-safe-lambda*");
+lf[45]=C_h_intern(&lf[45],10,"\003sysappend");
+lf[46]=C_h_intern(&lf[46],18,"\003syser-transformer");
+lf[47]=C_h_intern(&lf[47],19,"foreign-safe-lambda");
+lf[48]=C_h_intern(&lf[48],24,"\004coreforeign-safe-lambda");
+lf[49]=C_h_intern(&lf[49],15,"foreign-lambda*");
+lf[50]=C_h_intern(&lf[50],20,"\004coreforeign-lambda*");
+lf[51]=C_h_intern(&lf[51],14,"foreign-lambda");
+lf[52]=C_h_intern(&lf[52],19,"\004coreforeign-lambda");
+lf[53]=C_h_intern(&lf[53],17,"foreign-primitive");
+lf[54]=C_h_intern(&lf[54],22,"\004coreforeign-primitive");
+lf[55]=C_h_intern(&lf[55],23,"define-foreign-variable");
+lf[56]=C_h_intern(&lf[56],28,"\004coredefine-foreign-variable");
+lf[57]=C_h_intern(&lf[57],19,"define-foreign-type");
+lf[58]=C_h_intern(&lf[58],24,"\004coredefine-foreign-type");
+lf[59]=C_h_intern(&lf[59],15,"foreign-declare");
+lf[60]=C_h_intern(&lf[60],12,"\004coredeclare");
+lf[61]=C_h_intern(&lf[61],16,"\003syscheck-syntax");
+lf[62]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\006string\376\377\001\000\000\000\000");
+lf[63]=C_h_intern(&lf[63],13,"foreign-value");
+lf[64]=C_h_intern(&lf[64],14,"symbol->string");
+lf[65]=C_h_intern(&lf[65],12,"syntax-error");
+lf[66]=C_decode_literal(C_heaptop,"\376B\000\000*bad argument type - not a string or symbol");
+lf[67]=C_h_intern(&lf[67],5,"begin");
+lf[68]=C_h_intern(&lf[68],6,"gensym");
+lf[69]=C_h_intern(&lf[69],5,"code_");
+lf[70]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\377\016");
+lf[71]=C_h_intern(&lf[71],12,"foreign-code");
+lf[72]=C_h_intern(&lf[72],11,"\004coreinline");
+lf[73]=C_h_intern(&lf[73],17,"get-output-string");
+lf[74]=C_h_intern(&lf[74],7,"display");
+lf[75]=C_decode_literal(C_heaptop,"\376B\000\000 \012; return C_SCHEME_UNDEFINED; }\012");
+lf[76]=C_h_intern(&lf[76],18,"string-intersperse");
+lf[77]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
+lf[78]=C_decode_literal(C_heaptop,"\376B\000\000\005() { ");
+lf[79]=C_decode_literal(C_heaptop,"\376B\000\000\016static C_word ");
+lf[80]=C_h_intern(&lf[80],18,"open-output-string");
+lf[81]=C_h_intern(&lf[81],7,"declare");
+lf[82]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\006string\376\377\001\000\000\000\000");
+lf[83]=C_h_intern(&lf[83],12,"let-location");
+lf[84]=C_h_intern(&lf[84],17,"\004corelet-location");
+lf[85]=C_h_intern(&lf[85],10,"fold-right");
+lf[86]=C_h_intern(&lf[86],10,"append-map");
+lf[87]=C_h_intern(&lf[87],3,"let");
+lf[88]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\003\376\001\000\000\001_\376\377\001\000\000\000\000\376\377\001\000\000\000\001\376\377\001\000\000"
"\000\000\376\001\000\000\001_");
-lf[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"
+lf[89]=C_h_intern(&lf[89],15,"define-location");
+lf[90]=C_h_intern(&lf[90],29,"\004coredefine-external-variable");
+lf[91]=C_h_intern(&lf[91],9,"\004coreset!");
+lf[92]=C_h_intern(&lf[92],9,"\003syserror");
+lf[93]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
+lf[94]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\003\376\001\000\000\001_\376\377\001\000\000\000\000\376\377\001\000\000\000\001");
+lf[95]=C_h_intern(&lf[95],15,"define-external");
+lf[96]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\003\376\001\000\000\001_\376\377\001\000\000\000\000\376\377\001\000\000\000\001");
+lf[97]=C_h_intern(&lf[97],5,"quote");
+lf[98]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[99]=C_h_intern(&lf[99],29,"\004coreforeign-callback-wrapper");
+lf[100]=C_h_intern(&lf[100],6,"lambda");
+lf[101]=C_h_intern(&lf[101],6,"define");
+lf[102]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006string\376\003\000\000\002\376\003\000\000\002\376\001\000\000\006symbol\376\000\000\000\002\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\006symbol\376\377\016\376\377\001\000\000\000\000\376"
"\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
-lf[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"
+lf[103]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\006symbol\376\000\000\000\002\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\006symbol\376\377\016\376\377\001\000\000\000\000\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376"
"\001\000\000\001_\376\377\001\000\000\000\001");
-lf[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);
+lf[104]=C_h_intern(&lf[104],21,"\003sysmacro-environment");
+C_register_lf2(lf,105,create_ptable());
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_397,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
C_library_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* k338 */
-static void C_ccall f_340(C_word c,C_word t0,C_word t1){
+/* k395 */
+static void C_ccall f_397(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_397,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_400,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* k341 in k338 */
-static void C_ccall f_343(C_word c,C_word t0,C_word t1){
+/* k398 in k395 */
+static void C_ccall f_400(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_400,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_403,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_chicken_syntax_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* k344 in k341 in k338 */
-static void C_ccall f_346(C_word c,C_word t0,C_word t1){
+/* k401 in k398 in k395 */
+static void C_ccall f_403(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_403,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_406,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_srfi_1_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* k347 in k344 in k341 in k338 */
-static void C_ccall f_349(C_word c,C_word t0,C_word t1){
+/* k404 in k401 in k398 in k395 */
+static void C_ccall f_406(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_406,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_409,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_srfi_4_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* k350 in k347 in k344 in k341 in k338 */
-static void C_ccall f_352(C_word c,C_word t0,C_word t1){
+/* k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_409(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_409,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_412,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_utils_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* 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){
+/* k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_412(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_412,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_415,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_files_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* 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){
+/* k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_415(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_415,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_418,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_extras_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* 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){
+/* k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_418(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_418,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_421,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_data_structures_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* 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){
+/* k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_421(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_421,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_424,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_support_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* 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){
+/* k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_424(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_424,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_427,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_compiler_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* 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){
+/* k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_427(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_427,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_430,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_optimizer_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* 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){
+/* k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_430(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_430,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_433,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_unboxing_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_433(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_433,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_436,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_compiler_syntax_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* 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){
+/* k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_436(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_436,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_439,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_scrutinizer_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* 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){
+/* k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_439(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_439,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_442,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_driver_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* 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){
+/* k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_442(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_442,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_445,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_platform_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* 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){
+/* k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_445(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_445,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_448,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_backend_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* 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){
+/* k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_448(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_448,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_451,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_srfi_69_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* 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){
+/* k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_451(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_451,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_455,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("##sys#macro-environment");
-((C_proc2)C_retrieve_symbol_proc(lf[90]))(2,*((C_word*)lf[90]+1),t2);}
+((C_proc2)C_retrieve_symbol_proc(lf[104]))(2,*((C_word*)lf[104]+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){
+/* k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_455(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -765,15 +840,15 @@ 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_save_and_reclaim((void*)tr2,(void*)f_455,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_458,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1492,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1494,tmp=(C_word)a,a+=2,tmp);
C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[47]))(3,*((C_word*)lf[47]+1),t3,t4);}
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+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){
+/* a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1494(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -781,33 +856,33 @@ 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_save_and_reclaim((void*)tr5,(void*)f_1494,5,t0,t1,t2,t3,t4);}
+t5=C_i_cdr(t2);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1501,a[2]=t3,a[3]=t1,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
C_trace("r37");
t7=t3;
-((C_proc3)C_retrieve_proc(t7))(3,t7,t6,lf[83]);}
+((C_proc3)C_retrieve_proc(t7))(3,t7,t6,lf[97]);}
-/* 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){
+/* k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1501(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);
+C_save_and_reclaim((void*)tr2,(void*)f_1501,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1504,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_i_pairp(((C_word*)t0)[4]))){
+t3=C_i_car(((C_word*)t0)[4]);
t4=t2;
-f_1309(t4,(C_word)C_i_stringp(t3));}
+f_1504(t4,C_i_stringp(t3));}
else{
t3=t2;
-f_1309(t3,C_SCHEME_FALSE);}}
+f_1504(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){
+/* k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_fcall f_1504(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -815,45 +890,45 @@ 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);
+C_save_and_reclaim((void*)trf_1504,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1507,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
t3=t1;
if(C_truep(t3)){
t4=t2;
-f_1312(t4,C_SCHEME_FALSE);}
+f_1507(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]);
+if(C_truep(C_i_pairp(((C_word*)t0)[4]))){
+t4=C_i_car(((C_word*)t0)[4]);
t5=t2;
-f_1312(t5,(C_word)C_i_symbolp(t4));}
+f_1507(t5,C_i_symbolp(t4));}
else{
t4=t2;
-f_1312(t4,C_SCHEME_FALSE);}}}
+f_1507(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){
+/* k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_fcall f_1507(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_1312,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_1507,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1513,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[45]))(5,*((C_word*)lf[45]+1),t2,lf[81],((C_word*)t0)[5],lf[82]);}
+((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t2,lf[95],((C_word*)t0)[5],lf[96]);}
else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1604,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
if(C_truep(((C_word*)t0)[2])){
C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[45]))(5,*((C_word*)lf[45]+1),t2,lf[81],((C_word*)t0)[5],lf[88]);}
+((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t2,lf[95],((C_word*)t0)[5],lf[102]);}
else{
C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[45]))(5,*((C_word*)lf[45]+1),t2,lf[81],((C_word*)t0)[5],lf[89]);}}}
+((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t2,lf[95],((C_word*)t0)[5],lf[103]);}}}
-/* 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){
+/* k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1604(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -861,16 +936,16 @@ 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_save_and_reclaim((void*)tr2,(void*)f_1604,2,t0,t1);}
+t2=(C_truep(((C_word*)t0)[5])?C_i_cadr(((C_word*)t0)[4]):C_i_car(((C_word*)t0)[4]));
+t3=C_i_cdr(t2);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1617,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
C_trace("r37");
t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,lf[87]);}
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,lf[101]);}
-/* 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){
+/* k1615 in k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1617(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -891,28 +966,28 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_1617,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[7]);
+t3=C_i_car(((C_word*)t0)[7]);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,lf[97],t4);
+t6=(C_truep(((C_word*)t0)[6])?C_i_car(((C_word*)t0)[5]):lf[98]);
+t7=(C_truep(((C_word*)t0)[6])?C_i_caddr(((C_word*)t0)[5]):C_i_cadr(((C_word*)t0)[5]));
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,lf[97],t8);
t10=C_SCHEME_END_OF_LIST;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
t12=C_SCHEME_FALSE;
t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_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);
+t14=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_1747,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[4],a[8]=t2,a[9]=t5,a[10]=t6,a[11]=t9,tmp=(C_word)a,a+=12,tmp);
t15=C_SCHEME_UNDEFINED;
t16=(*a=C_VECTOR_TYPE|1,a[1]=t15,tmp=(C_word)a,a+=2,tmp);
-t17=C_set_block_item(t16,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1562,a[2]=t11,a[3]=t16,a[4]=t13,tmp=(C_word)a,a+=5,tmp));
+t17=C_set_block_item(t16,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1749,a[2]=t11,a[3]=t16,a[4]=t13,tmp=(C_word)a,a+=5,tmp));
t18=((C_word*)t16)[1];
-f_1562(t18,t14,((C_word*)t0)[3]);}
+f_1749(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){
+/* loop75 in k1615 in k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_fcall f_1749(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -931,15 +1006,15 @@ 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);
+C_save_and_reclaim((void*)trf_1749,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_slot(t2,C_fix(0));
+t4=C_i_car(t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
+t6=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=(C_word)C_slot(t2,C_fix(1));
+t8=C_slot(t2,C_fix(1));
C_trace("loop7588");
t14=t1;
t15=t8;
@@ -949,7 +1024,7 @@ 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));
+t8=C_slot(t2,C_fix(1));
C_trace("loop7588");
t14=t1;
t15=t8;
@@ -961,8 +1036,8 @@ 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){
+/* k1745 in k1615 in k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1747(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -970,16 +1045,16 @@ 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_save_and_reclaim((void*)tr2,(void*)f_1747,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,lf[97],t2);
+t4=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_1677,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=t3,tmp=(C_word)a,a+=12,tmp);
C_trace("r37");
t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,lf[86]);}
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,lf[100]);}
-/* 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){
+/* k1675 in k1745 in k1615 in k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1677(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -992,20 +1067,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1677,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_1685,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=t1,tmp=(C_word)a,a+=12,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1514,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1701,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
-f_1514(t10,t6,((C_word*)t0)[2]);}
+f_1701(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){
+/* loop99 in k1675 in k1745 in k1615 in k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_fcall f_1701(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -1024,15 +1099,15 @@ 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);
+C_save_and_reclaim((void*)trf_1701,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_slot(t2,C_fix(0));
+t4=C_i_cadr(t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t6=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
+t6=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t5);
t7=C_mutate(((C_word *)((C_word*)t0)[4])+1,t5);
-t8=(C_word)C_slot(t2,C_fix(1));
+t8=C_slot(t2,C_fix(1));
C_trace("loop99112");
t14=t1;
t15=t8;
@@ -1042,7 +1117,7 @@ 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));
+t8=C_slot(t2,C_fix(1));
C_trace("loop99112");
t14=t1;
t15=t8;
@@ -1054,23 +1129,23 @@ 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){
+/* k1683 in k1675 in k1745 in k1615 in k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1685(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1685,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_1689,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=t1,tmp=(C_word)a,a+=11,tmp);
+t3=(C_truep(((C_word*)t0)[3])?C_i_cdddr(((C_word*)t0)[2]):C_i_cddr(((C_word*)t0)[2]));
C_trace("##sys#append");
-t4=*((C_word*)lf[44]+1);
+t4=*((C_word*)lf[45]+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){
+/* k1687 in k1683 in k1675 in k1745 in k1615 in k1602 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1689(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1085,71 +1160,37 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_1689,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[10],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[8],t4);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[7],t5);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[6],t6);
+t8=C_a_i_cons(&a,2,((C_word*)t0)[5],t7);
+t9=C_a_i_cons(&a,2,lf[99],t8);
+t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
+t11=C_a_i_cons(&a,2,((C_word*)t0)[4],t10);
t12=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t11));}
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,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){
+/* k1511 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1513(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[6],*a=ab;
+C_word ab[5],*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_save_and_reclaim((void*)tr2,(void*)f_1513,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1523,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
C_trace("r37");
t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[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]);}
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[67]);}
-/* 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){
+/* k1521 in k1511 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1523(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1164,54 +1205,62 @@ 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_word t15;
+C_word t16;
+C_word t17;
+C_word t18;
+C_word ab[39],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1523,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
+t5=C_a_i_cons(&a,2,lf[56],t4);
+t6=C_i_cadr(((C_word*)t0)[4]);
+t7=C_a_i_cons(&a,2,C_SCHEME_TRUE,C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,t6,t7);
+t9=C_a_i_cons(&a,2,((C_word*)t0)[3],t8);
+t10=C_a_i_cons(&a,2,lf[90],t9);
+t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1543,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=t10,tmp=(C_word)a,a+=6,tmp);
+t12=C_i_cddr(((C_word*)t0)[4]);
+if(C_truep(C_i_pairp(t12))){
+t13=C_i_caddr(((C_word*)t0)[4]);
+t14=C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
+t15=C_a_i_cons(&a,2,((C_word*)t0)[3],t14);
+t16=C_a_i_cons(&a,2,lf[91],t15);
+t17=C_a_i_cons(&a,2,t16,C_SCHEME_END_OF_LIST);
C_trace("##sys#append");
-t14=*((C_word*)lf[44]+1);
-((C_proc4)(void*)(*((C_word*)t14+1)))(4,t14,t7,t13,C_SCHEME_END_OF_LIST);}
+t18=*((C_word*)lf[45]+1);
+((C_proc4)(void*)(*((C_word*)t18+1)))(4,t18,t11,t17,C_SCHEME_END_OF_LIST);}
else{
C_trace("##sys#append");
-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);}}
+t13=*((C_word*)lf[45]+1);
+((C_proc4)(void*)(*((C_word*)t13+1)))(4,t13,t11,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}}
-/* 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){
+/* k1541 in k1521 in k1511 in k1505 in k1502 in k1499 in a1493 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1543(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_1543,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* k1490 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1492(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[41]))(5,*((C_word*)lf[41]+1),((C_word*)t0)[2],lf[81],C_SCHEME_END_OF_LIST,t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[95],C_SCHEME_END_OF_LIST,t1);}
-/* 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){
+/* k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_458(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1219,28 +1268,28 @@ 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_save_and_reclaim((void*)tr2,(void*)f_458,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_461,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1359,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1361,tmp=(C_word)a,a+=2,tmp);
C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[47]))(3,*((C_word*)lf[47]+1),t3,t4);}
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+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){
+/* a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1361(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_1361,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1365,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[45]))(5,*((C_word*)lf[45]+1),t5,lf[75],t2,lf[80]);}
+((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t5,lf[89],t2,lf[94]);}
-/* 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){
+/* k1363 in a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1365(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1250,40 +1299,40 @@ 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))){
+C_save_and_reclaim((void*)tr2,(void*)f_1365,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_caddr(((C_word*)t0)[4]);
+t4=C_i_cdddr(((C_word*)t0)[4]);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1377,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_i_nullp(t4))){
t6=t5;
-f_1174(2,t6,C_SCHEME_FALSE);}
+f_1377(2,t6,C_SCHEME_FALSE);}
else{
-t6=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t6))){
+t6=C_i_cdr(t4);
+if(C_truep(C_i_nullp(t6))){
t7=t5;
-f_1174(2,t7,(C_word)C_i_car(t4));}
+f_1377(2,t7,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);}}}
+t7=*((C_word*)lf[92]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[93],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){
+/* k1375 in k1363 in a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1377(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1377,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1380,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1469,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
C_trace("gensym");
-((C_proc2)C_retrieve_symbol_proc(lf[54]))(2,*((C_word*)lf[54]+1),t3);}
+((C_proc2)C_retrieve_symbol_proc(lf[68]))(2,*((C_word*)lf[68]+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){
+/* k1467 in k1375 in k1363 in a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1469(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
@@ -1291,67 +1340,33 @@ 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){
+/* k1378 in k1375 in k1363 in a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1380(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[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;
+C_word ab[7],*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_save_and_reclaim((void*)tr2,(void*)f_1380,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1387,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
C_trace("r123");
t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[52]);}
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[67]);}
-/* 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){
+/* k1385 in k1378 in k1375 in k1363 in a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1387(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[10],*a=ab;
+C_word ab[8],*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_save_and_reclaim((void*)tr2,(void*)f_1387,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1465,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
C_trace("symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[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]);}
+((C_proc3)C_retrieve_proc(*((C_word*)lf[64]+1)))(3,*((C_word*)lf[64]+1),t2,((C_word*)t0)[4]);}
-/* 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){
+/* k1463 in k1385 in k1378 in k1375 in k1363 in a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1465(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1365,53 +1380,61 @@ 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_word t14;
+C_word t15;
+C_word t16;
+C_word t17;
+C_word ab[45],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1465,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[6],t3);
+t5=C_a_i_cons(&a,2,lf[56],t4);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,C_SCHEME_FALSE,t6);
+t8=C_a_i_cons(&a,2,((C_word*)t0)[7],t7);
+t9=C_a_i_cons(&a,2,((C_word*)t0)[6],t8);
+t10=C_a_i_cons(&a,2,lf[90],t9);
+t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1407,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t5,a[5]=t10,tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_i_pairp(((C_word*)t0)[2]))){
+t12=C_i_car(((C_word*)t0)[2]);
+t13=C_a_i_cons(&a,2,t12,C_SCHEME_END_OF_LIST);
+t14=C_a_i_cons(&a,2,((C_word*)t0)[6],t13);
+t15=C_a_i_cons(&a,2,lf[91],t14);
+t16=C_a_i_cons(&a,2,t15,C_SCHEME_END_OF_LIST);
C_trace("##sys#append");
-t13=*((C_word*)lf[44]+1);
-((C_proc4)(void*)(*((C_word*)t13+1)))(4,t13,t7,t12,C_SCHEME_END_OF_LIST);}
+t17=*((C_word*)lf[45]+1);
+((C_proc4)(void*)(*((C_word*)t17+1)))(4,t17,t11,t16,C_SCHEME_END_OF_LIST);}
else{
C_trace("##sys#append");
-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);}}
+t12=*((C_word*)lf[45]+1);
+((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t11,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}}
-/* 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){
+/* k1405 in k1463 in k1385 in k1378 in k1375 in k1363 in a1360 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1407(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_1407,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* k1357 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1359(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[41]))(5,*((C_word*)lf[41]+1),((C_word*)t0)[2],lf[75],C_SCHEME_END_OF_LIST,t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[89],C_SCHEME_END_OF_LIST,t1);}
-/* 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){
+/* k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_461(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1419,28 +1442,28 @@ 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_save_and_reclaim((void*)tr2,(void*)f_461,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_464,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1175,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1177,tmp=(C_word)a,a+=2,tmp);
C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[47]))(3,*((C_word*)lf[47]+1),t3,t4);}
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+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){
+/* a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1177(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_1177,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1181,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[45]))(5,*((C_word*)lf[45]+1),t5,lf[69],t2,lf[74]);}
+((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t5,lf[83],t2,lf[88]);}
-/* 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){
+/* k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1181(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1448,16 +1471,16 @@ 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_save_and_reclaim((void*)tr2,(void*)f_1181,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_cddr(((C_word*)t0)[4]);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1190,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t2,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
C_trace("r144");
t5=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t5))(3,t5,t4,lf[73]);}
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,lf[87]);}
-/* 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){
+/* k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1190(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1470,20 +1493,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1190,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1193,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1110,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1313,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp));
t10=((C_word*)t8)[1];
-f_1110(t10,t6,((C_word*)t0)[4]);}
+f_1313(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){
+/* loop153 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_fcall f_1313(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -1492,21 +1515,21 @@ 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_save_and_reclaim((void*)trf_1313,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1340,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1351,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
C_trace("g169170");
t6=t3;
-f_1137(t6,t4);}
+f_1340(t6,t4);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k1349 in loop153 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1351(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1518,37 +1541,37 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_1351,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
+t5=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);}
+f_1313(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
+t5=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);}}
+f_1313(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){
+/* g169 in loop153 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_fcall f_1340(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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_save_and_reclaim((void*)trf_1340,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1348,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
C_trace("gensym");
-((C_proc2)C_retrieve_symbol_proc(lf[54]))(2,*((C_word*)lf[54]+1),t2);}
+((C_proc2)C_retrieve_symbol_proc(lf[68]))(2,*((C_word*)lf[68]+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){
+/* k1346 in g169 in loop153 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1348(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
@@ -1556,22 +1579,22 @@ 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){
+/* k1191 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1193(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1193,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1204,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1289,tmp=(C_word)a,a+=2,tmp);
C_trace("append-map");
-((C_proc5)C_retrieve_symbol_proc(lf[72]))(5,*((C_word*)lf[72]+1),t2,t3,((C_word*)t0)[3],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[86]))(5,*((C_word*)lf[86]+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){
+/* a1288 in k1191 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1289(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -1580,19 +1603,19 @@ 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);
+C_save_and_reclaim((void*)tr4,(void*)f_1289,4,t0,t1,t2,t3);}
+t4=C_i_cddr(t2);
+if(C_truep(C_i_pairp(t4))){
+t5=C_i_cddr(t2);
+t6=C_a_i_cons(&a,2,t3,t5);
t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_list(&a,1,t6));}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_list(&a,1,t6));}
else{
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_END_OF_LIST);}}
-/* 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){
+/* k1202 in k1191 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1204(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1600,30 +1623,30 @@ 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_save_and_reclaim((void*)tr2,(void*)f_1204,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1212,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1214,tmp=(C_word)a,a+=2,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1287,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
C_trace("##sys#append");
-t5=*((C_word*)lf[44]+1);
+t5=*((C_word*)lf[45]+1);
((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k1285 in k1202 in k1191 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1287(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1287,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[6],t2);
C_trace("fold-right");
-((C_proc6)C_retrieve_symbol_proc(lf[71]))(6,*((C_word*)lf[71]+1),((C_word*)t0)[5],((C_word*)t0)[4],t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc6)C_retrieve_symbol_proc(lf[85]))(6,*((C_word*)lf[85]+1),((C_word*)t0)[5],((C_word*)t0)[4],t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* a1213 in k1202 in k1191 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1214(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -1642,51 +1665,51 @@ 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);
+C_save_and_reclaim((void*)tr5,(void*)f_1214,5,t0,t1,t2,t3,t4);}
+t5=C_i_length(t2);
+t6=C_eqp(C_fix(3),t5);
if(C_truep(t6)){
-t7=(C_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);
+t7=C_i_car(t2);
+t8=C_i_cadr(t2);
+t9=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t10=C_a_i_cons(&a,2,t3,t9);
+t11=C_a_i_cons(&a,2,t8,t10);
+t12=C_a_i_cons(&a,2,t7,t11);
t13=t1;
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,(C_word)C_a_i_cons(&a,2,lf[70],t12));}
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,C_a_i_cons(&a,2,lf[84],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);
+t7=C_i_car(t2);
+t8=C_i_cadr(t2);
+t9=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t10=C_a_i_cons(&a,2,t8,t9);
+t11=C_a_i_cons(&a,2,t7,t10);
t12=t1;
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,(C_word)C_a_i_cons(&a,2,lf[70],t11));}}
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,C_a_i_cons(&a,2,lf[84],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){
+/* k1210 in k1202 in k1191 in k1188 in k1179 in a1176 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1212(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_1212,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* k1173 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1175(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[41]))(5,*((C_word*)lf[41]+1),((C_word*)t0)[2],lf[69],C_SCHEME_END_OF_LIST,t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[83],C_SCHEME_END_OF_LIST,t1);}
-/* 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){
+/* k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_464(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1694,114 +1717,114 @@ 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_save_and_reclaim((void*)tr2,(void*)f_464,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_467,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1089,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1091,tmp=(C_word)a,a+=2,tmp);
C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[47]))(3,*((C_word*)lf[47]+1),t3,t4);}
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+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){
+/* a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1091(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_1091,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1095,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[45]))(5,*((C_word*)lf[45]+1),t5,lf[57],t2,lf[68]);}
+((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t5,lf[71],t2,lf[82]);}
-/* 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){
+/* k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1095(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1095,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1098,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
C_trace("gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[54]))(3,*((C_word*)lf[54]+1),t2,lf[55]);}
+((C_proc3)C_retrieve_symbol_proc(lf[68]))(3,*((C_word*)lf[68]+1),t2,lf[69]);}
-/* 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){
+/* k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1098(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1098,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1105,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
C_trace("r198");
t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[53]);}
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[67]);}
-/* 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){
+/* k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1105(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1105,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1129,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
C_trace("r198");
t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[67]);}
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[81]);}
-/* 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){
+/* k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1129(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1129,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1145,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[66]))(2,*((C_word*)lf[66]+1),t2);}
+((C_proc2)C_retrieve_symbol_proc(lf[80]))(2,*((C_word*)lf[80]+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){
+/* k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1145(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1145,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1148,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[60]+1)))(4,*((C_word*)lf[60]+1),t2,lf[65],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[74]+1)))(4,*((C_word*)lf[74]+1),t2,lf[79],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){
+/* k1146 in k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1148(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1148,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1151,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[60]+1)))(4,*((C_word*)lf[60]+1),t2,((C_word*)t0)[6],((C_word*)t0)[3]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[74]+1)))(4,*((C_word*)lf[74]+1),t2,((C_word*)t0)[6],((C_word*)t0)[3]);}
-/* 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){
+/* k1149 in k1146 in k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1151(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1151,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1154,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[60]+1)))(4,*((C_word*)lf[60]+1),t2,lf[64],((C_word*)t0)[3]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[74]+1)))(4,*((C_word*)lf[74]+1),t2,lf[78],((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){
+/* k1152 in k1149 in k1146 in k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1154(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1809,47 +1832,47 @@ 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_save_and_reclaim((void*)tr2,(void*)f_1154,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1157,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1167,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=C_i_cdr(((C_word*)t0)[2]);
C_trace("string-intersperse");
-((C_proc4)C_retrieve_symbol_proc(lf[62]))(4,*((C_word*)lf[62]+1),t3,t4,lf[63]);}
+((C_proc4)C_retrieve_symbol_proc(lf[76]))(4,*((C_word*)lf[76]+1),t3,t4,lf[77]);}
-/* 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){
+/* k1165 in k1152 in k1149 in k1146 in k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1167(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[60]+1)))(4,*((C_word*)lf[60]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[74]+1)))(4,*((C_word*)lf[74]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k1155 in k1152 in k1149 in k1146 in k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1157(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1157,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1160,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[60]+1)))(4,*((C_word*)lf[60]+1),t2,lf[61],((C_word*)t0)[2]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[74]+1)))(4,*((C_word*)lf[74]+1),t2,lf[75],((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){
+/* k1158 in k1155 in k1152 in k1149 in k1146 in k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1160(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1160,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1163,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[59]))(3,*((C_word*)lf[59]+1),t2,((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[73]))(3,*((C_word*)lf[73]+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){
+/* k1161 in k1158 in k1155 in k1152 in k1149 in k1146 in k1143 in k1127 in k1103 in k1096 in k1093 in a1090 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1163(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1862,28 +1885,28 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_1163,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,lf[59],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[5],t4);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,lf[72],t6);
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,t5,t8);
t10=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t9));}
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,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){
+/* k1087 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1089(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[41]))(5,*((C_word*)lf[41]+1),((C_word*)t0)[2],lf[57],C_SCHEME_END_OF_LIST,t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[71],C_SCHEME_END_OF_LIST,t1);}
-/* 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){
+/* k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_467(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1891,102 +1914,89 @@ 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_save_and_reclaim((void*)tr2,(void*)f_467,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_470,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1019,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1021,tmp=(C_word)a,a+=2,tmp);
C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[47]))(3,*((C_word*)lf[47]+1),t3,t4);}
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+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){
+/* a1020 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1021(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_1021,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1025,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[45]))(5,*((C_word*)lf[45]+1),t5,lf[48],t2,lf[56]);}
+((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t5,lf[63],t2,lf[70]);}
-/* 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){
+/* k1023 in a1020 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1025(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_1025,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1028,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
C_trace("gensym");
-((C_proc3)C_retrieve_symbol_proc(lf[54]))(3,*((C_word*)lf[54]+1),t2,lf[55]);}
+((C_proc3)C_retrieve_symbol_proc(lf[68]))(3,*((C_word*)lf[68]+1),t2,lf[69]);}
-/* 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){
+/* k1026 in k1023 in a1020 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1028(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[7],*a=ab;
+C_word ab[6],*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_save_and_reclaim((void*)tr2,(void*)f_1028,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1038,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
C_trace("r217");
t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[53]);}
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[67]);}
-/* 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){
+/* k1036 in k1026 in k1023 in a1020 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1038(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[13],*a=ab;
+C_word ab[12],*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]))){
+C_save_and_reclaim((void*)tr2,(void*)f_1038,2,t0,t1);}
+t2=C_i_caddr(((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1066,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1070,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_i_stringp(((C_word*)t0)[2]))){
t5=t3;
-f_863(t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST));}
+f_1066(t5,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]))){
+if(C_truep(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]);}
+((C_proc3)C_retrieve_proc(*((C_word*)lf[64]+1)))(3,*((C_word*)lf[64]+1),t4,((C_word*)t0)[2]);}
else{
C_trace("syntax-error");
-((C_proc5)C_retrieve_symbol_proc(lf[50]))(5,*((C_word*)lf[50]+1),t4,lf[48],lf[51],((C_word*)t0)[2]);}}}
+((C_proc5)C_retrieve_symbol_proc(lf[65]))(5,*((C_word*)lf[65]+1),t4,lf[63],lf[66],((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){
+/* k1068 in k1036 in k1026 in k1023 in a1020 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1070(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_867,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1070,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));}
+f_1066(t2,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){
+/* k1064 in k1036 in k1026 in k1023 in a1020 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_fcall f_1066(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1996,25 +2006,25 @@ 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);
+C_save_and_reclaim((void*)trf_1066,NULL,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
+t4=C_a_i_cons(&a,2,lf[56],t3);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,t4,t5);
t7=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t6));}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,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){
+/* k1017 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1019(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[41]))(5,*((C_word*)lf[41]+1),((C_word*)t0)[2],lf[48],C_SCHEME_END_OF_LIST,t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[63],C_SCHEME_END_OF_LIST,t1);}
-/* 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){
+/* k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_470(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2022,77 +2032,427 @@ 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_save_and_reclaim((void*)tr2,(void*)f_470,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_473,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_990,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_992,tmp=(C_word)a,a+=2,tmp);
C_trace("##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[47]))(3,*((C_word*)lf[47]+1),t3,t4);}
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+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){
+/* a991 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_992(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[4],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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_save_and_reclaim((void*)tr5,(void*)f_992,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_996,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
C_trace("##sys#check-syntax");
-((C_proc5)C_retrieve_symbol_proc(lf[45]))(5,*((C_word*)lf[45]+1),t5,lf[42],t2,lf[46]);}
+((C_proc5)C_retrieve_symbol_proc(lf[61]))(5,*((C_word*)lf[61]+1),t5,lf[59],t2,lf[62]);}
-/* 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){
+/* k994 in a991 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_996(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_996,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1011,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_cdr(((C_word*)t0)[2]);
C_trace("##sys#append");
-t4=*((C_word*)lf[44]+1);
+t4=*((C_word*)lf[45]+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){
+/* k1009 in k994 in a991 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_1011(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_1011,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[59],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[43],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[60],t3));}
+
+/* k988 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_990(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("##sys#extend-macro-environment");
+((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[59],C_SCHEME_END_OF_LIST,t1);}
+
+/* k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_473(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_473,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_476,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_972,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_974,tmp=(C_word)a,a+=2,tmp);
+C_trace("##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
+
+/* a973 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_974(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
+C_word tmp;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word ab[3],*a=ab;
+if(c!=5) C_bad_argc_2(c,5,t0);
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr5,(void*)f_974,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_982,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t6=C_i_cdr(t2);
+C_trace("##sys#append");
+t7=*((C_word*)lf[45]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
+
+/* k980 in a973 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_982(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_982,2,t0,t1);}
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[58],t1));}
+
+/* k970 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_972(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("##sys#extend-macro-environment");
+((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[57],C_SCHEME_END_OF_LIST,t1);}
+
+/* k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_476(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_476,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_479,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_954,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_956,tmp=(C_word)a,a+=2,tmp);
+C_trace("##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
+
+/* a955 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_956(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
+C_word tmp;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word ab[3],*a=ab;
+if(c!=5) C_bad_argc_2(c,5,t0);
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr5,(void*)f_956,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_964,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t6=C_i_cdr(t2);
+C_trace("##sys#append");
+t7=*((C_word*)lf[45]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
+
+/* k962 in a955 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_964(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_964,2,t0,t1);}
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[56],t1));}
+
+/* k952 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_954(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("##sys#extend-macro-environment");
+((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[55],C_SCHEME_END_OF_LIST,t1);}
+
+/* k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_479(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_479,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_482,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_936,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_938,tmp=(C_word)a,a+=2,tmp);
+C_trace("##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
+
+/* a937 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_938(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
+C_word tmp;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word ab[3],*a=ab;
+if(c!=5) C_bad_argc_2(c,5,t0);
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr5,(void*)f_938,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_946,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t6=C_i_cdr(t2);
+C_trace("##sys#append");
+t7=*((C_word*)lf[45]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
+
+/* k944 in a937 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_946(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_946,2,t0,t1);}
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[54],t1));}
+
+/* k934 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_936(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("##sys#extend-macro-environment");
+((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[53],C_SCHEME_END_OF_LIST,t1);}
+
+/* k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_482(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_482,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_485,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_918,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_920,tmp=(C_word)a,a+=2,tmp);
+C_trace("##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
+
+/* a919 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_920(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
+C_word tmp;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word ab[3],*a=ab;
+if(c!=5) C_bad_argc_2(c,5,t0);
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr5,(void*)f_920,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_928,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t6=C_i_cdr(t2);
+C_trace("##sys#append");
+t7=*((C_word*)lf[45]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
+
+/* k926 in a919 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_928(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_928,2,t0,t1);}
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[52],t1));}
+
+/* k916 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_918(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("##sys#extend-macro-environment");
+((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[51],C_SCHEME_END_OF_LIST,t1);}
+
+/* k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_485(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_485,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_488,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_900,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_902,tmp=(C_word)a,a+=2,tmp);
+C_trace("##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
+
+/* a901 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_902(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
+C_word tmp;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word ab[3],*a=ab;
+if(c!=5) C_bad_argc_2(c,5,t0);
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr5,(void*)f_902,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_910,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t6=C_i_cdr(t2);
+C_trace("##sys#append");
+t7=*((C_word*)lf[45]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
+
+/* k908 in a901 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_910(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_910,2,t0,t1);}
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[50],t1));}
+
+/* k898 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_900(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("##sys#extend-macro-environment");
+((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[49],C_SCHEME_END_OF_LIST,t1);}
+
+/* k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_488(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_488,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_491,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_882,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_884,tmp=(C_word)a,a+=2,tmp);
+C_trace("##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
+
+/* a883 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_884(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
+C_word tmp;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word ab[3],*a=ab;
+if(c!=5) C_bad_argc_2(c,5,t0);
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr5,(void*)f_884,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_892,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t6=C_i_cdr(t2);
+C_trace("##sys#append");
+t7=*((C_word*)lf[45]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
+
+/* k890 in a883 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_892(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_892,2,t0,t1);}
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[48],t1));}
+
+/* k880 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_882(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("##sys#extend-macro-environment");
+((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[47],C_SCHEME_END_OF_LIST,t1);}
+
+/* k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_491(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_491,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_494,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_864,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_866,tmp=(C_word)a,a+=2,tmp);
+C_trace("##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
+
+/* a865 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_866(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
+C_word tmp;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word ab[3],*a=ab;
+if(c!=5) C_bad_argc_2(c,5,t0);
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr5,(void*)f_866,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_874,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t6=C_i_cdr(t2);
+C_trace("##sys#append");
+t7=*((C_word*)lf[45]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
+
+/* k872 in a865 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_874(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_874,2,t0,t1);}
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[44],t1));}
-/* 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){
+/* k862 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_864(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#extend-macro-environment");
-((C_proc5)C_retrieve_symbol_proc(lf[41]))(5,*((C_word*)lf[41]+1),((C_word*)t0)[2],lf[42],C_SCHEME_END_OF_LIST,t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[42]))(5,*((C_word*)lf[42]+1),((C_word*)t0)[2],lf[43],C_SCHEME_END_OF_LIST,t1);}
-/* 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){
+/* k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_494(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_494,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_497,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
C_trace("##sys#macro-subset");
-((C_proc3)C_retrieve_symbol_proc(lf[40]))(3,*((C_word*)lf[40]+1),t2,((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[41]))(3,*((C_word*)lf[41]+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){
+/* k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_497(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2103,18 +2463,18 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_497,2,t0,t1);}
t2=C_mutate((C_word*)lf[0]+1 /* (set! chicken-ffi-macro-environment ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_501,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_835,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_845,tmp=(C_word)a,a+=2,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_853,a[2]=t5,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_857,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
C_trace("chicken.scm: 48 get-environment-variable");
-((C_proc3)C_retrieve_symbol_proc(lf[38]))(3,*((C_word*)lf[38]+1),t7,lf[39]);}
+((C_proc3)C_retrieve_symbol_proc(lf[39]))(3,*((C_word*)lf[39]+1),t7,lf[40]);}
-/* 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){
+/* k855 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_857(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2122,54 +2482,54 @@ 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);}
+((C_proc3)C_retrieve_symbol_proc(lf[37]))(3,*((C_word*)lf[37]+1),((C_word*)t0)[2],t2);}
else{
C_trace("chicken.scm: 48 string-split");
-((C_proc3)C_retrieve_symbol_proc(lf[36]))(3,*((C_word*)lf[36]+1),((C_word*)t0)[2],lf[37]);}}
+((C_proc3)C_retrieve_symbol_proc(lf[37]))(3,*((C_word*)lf[37]+1),((C_word*)t0)[2],lf[38]);}}
-/* 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){
+/* k851 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_853(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("chicken.scm: 46 remove");
-((C_proc4)C_retrieve_symbol_proc(lf[35]))(4,*((C_word*)lf[35]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+((C_proc4)C_retrieve_symbol_proc(lf[36]))(4,*((C_word*)lf[36]+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){
+/* a844 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_845(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_764,3,t0,t1,t2);}
+C_save_and_reclaim((void*)tr3,(void*)f_845,3,t0,t1,t2);}
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_string_equal_p(t2,lf[34]));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_string_equal_p(t2,lf[35]));}
-/* 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){
+/* k833 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_835(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_835,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_843,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
C_trace("chicken.scm: 49 argv");
-((C_proc2)C_retrieve_symbol_proc(lf[33]))(2,*((C_word*)lf[33]+1),t2);}
+((C_proc2)C_retrieve_symbol_proc(lf[34]))(2,*((C_word*)lf[34]+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){
+/* k841 in k833 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_843(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_i_cdr(t1);
+t2=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);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[33]+1)))(4,*((C_word*)lf[33]+1),((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-/* 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){
+/* k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_501(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2179,17 +2539,17 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_501,2,t0,t1);}
t2=C_mutate((C_word*)lf[1]+1 /* (set! compiler-arguments ...) */,t1);
-t3=C_mutate((C_word*)lf[2]+1 /* (set! process-command-line ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_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);
+t3=C_mutate((C_word*)lf[2]+1 /* (set! process-command-line ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_503,tmp=(C_word)a,a+=2,tmp));
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_610,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_618,tmp=(C_word)a,a+=2,tmp);
+t6=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_630,tmp=(C_word)a,a+=2,tmp);
C_trace("##sys#call-with-values");
C_call_with_values(4,0,t4,t5,t6);}
-/* 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){
+/* a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_630(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -2200,17 +2560,17 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_630,4,t0,t1,t2,t3);}
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_553,a[2]=t4,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_634,a[2]=t4,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_561,a[2]=t4,a[3]=t7,tmp=(C_word)a,a+=4,tmp));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_642,a[2]=t4,a[3]=t7,tmp=(C_word)a,a+=4,tmp));
t9=((C_word*)t7)[1];
-f_561(t9,t5,((C_word*)t4)[1]);}
+f_642(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){
+/* loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_fcall f_642(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2231,77 +2591,77 @@ 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))){
+C_save_and_reclaim((void*)trf_642,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_nullp(t2))){
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
-t3=(C_word)C_i_car(t2);
-t4=(C_word)C_i_cdr(t2);
-t5=(C_word)C_eqp(lf[10],t3);
+t3=C_i_car(t2);
+t4=C_i_cdr(t2);
+t5=C_eqp(lf[10],t3);
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_664,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t4,tmp=(C_word)a,a+=6,tmp);
+t7=C_i_car(t4);
C_trace("chicken.scm: 82 string->number");
C_string_to_number(3,0,t6,t7);}
else{
-t6=(C_word)C_eqp(lf[21],t3);
+t6=C_eqp(lf[22],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");
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_740,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t4,tmp=(C_word)a,a+=6,tmp);
+t8=C_i_car(t4);
+C_trace("chicken.scm: 107 string->number");
C_string_to_number(3,0,t7,t8);}
else{
-if(C_truep((C_word)C_i_memq(t3,C_retrieve(lf[25])))){
-C_trace("chicken.scm: 112 loop");
+if(C_truep(C_i_memq(t3,C_retrieve(lf[26])))){
+C_trace("chicken.scm: 114 loop");
t16=t1;
t17=t4;
t1=t16;
t2=t17;
goto loop;}
else{
-if(C_truep((C_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");
+if(C_truep(C_i_memq(t3,C_retrieve(lf[27])))){
+if(C_truep(C_i_pairp(t4))){
+t7=C_i_cdr(t4);
+C_trace("chicken.scm: 117 loop");
t16=t1;
t17=t7;
t1=t16;
t2=t17;
goto loop;}
else{
-C_trace("chicken.scm: 116 quit");
-((C_proc4)C_retrieve_symbol_proc(lf[27]))(4,*((C_word*)lf[27]+1),t1,lf[28],t3);}}
+C_trace("chicken.scm: 118 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[28]))(4,*((C_word*)lf[28]+1),t1,lf[29],t3);}}
else{
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);}
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_818,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_825,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_i_stringp(t3))){
+C_trace("chicken.scm: 120 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),t7,lf[24],lf[30],t3);}
else{
-C_trace("chicken.scm: 120 conc");
-((C_proc4)C_retrieve_symbol_proc(lf[30]))(4,*((C_word*)lf[30]+1),t8,lf[31],t3);}}}}}}}
+C_trace("chicken.scm: 122 conc");
+((C_proc4)C_retrieve_symbol_proc(lf[31]))(4,*((C_word*)lf[31]+1),t8,lf[32],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){
+/* k823 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_825(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("chicken.scm: 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);}
+C_trace("chicken.scm: 120 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[24],lf[30],t1);}
-/* 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){
+/* k816 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_818(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("chicken.scm: 121 loop");
+C_trace("chicken.scm: 123 loop");
t2=((C_word*)((C_word*)t0)[4])[1];
-f_561(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_642(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){
+/* k738 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_740(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2313,56 +2673,56 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_740,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_743,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
switch(t1){
case C_fix(0):
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_757,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
+C_trace("chicken.scm: 109 cons*");
+((C_proc5)C_retrieve_symbol_proc(lf[12]))(5,*((C_word*)lf[12]+1),t3,lf[21],lf[18],((C_word*)((C_word*)t0)[2])[1]);
case C_fix(1):
-t3=(C_word)C_a_i_cons(&a,2,lf[17],((C_word*)((C_word*)t0)[2])[1]);
+t3=C_a_i_cons(&a,2,lf[18],((C_word*)((C_word*)t0)[2])[1]);
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
-t5=(C_word)C_i_cdr(((C_word*)t0)[5]);
-C_trace("chicken.scm: 111 loop");
+t5=C_i_cdr(((C_word*)t0)[5]);
+C_trace("chicken.scm: 113 loop");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_561(t6,((C_word*)t0)[3],t5);
+f_642(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");
+t3=C_i_cdr(((C_word*)t0)[5]);
+C_trace("chicken.scm: 113 loop");
t4=((C_word*)((C_word*)t0)[4])[1];
-f_561(t4,((C_word*)t0)[3],t3);
+f_642(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);}}
+t3=C_i_car(((C_word*)t0)[5]);
+C_trace("chicken.scm: 112 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),t2,lf[24],lf[25],t3);}}
-/* 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){
+/* k755 in k738 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_757(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
-C_trace("chicken.scm: 111 loop");
+t3=C_i_cdr(((C_word*)t0)[4]);
+C_trace("chicken.scm: 113 loop");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_561(t4,((C_word*)t0)[2],t3);}
+f_642(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){
+/* k741 in k738 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_743(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
-C_trace("chicken.scm: 111 loop");
+t2=C_i_cdr(((C_word*)t0)[4]);
+C_trace("chicken.scm: 113 loop");
t3=((C_word*)((C_word*)t0)[3])[1];
-f_561(t3,((C_word*)t0)[2],t2);}
+f_642(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){
+/* k662 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_664(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2377,130 +2737,130 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_664,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");
+t2=C_i_cdr(((C_word*)t0)[5]);
+C_trace("chicken.scm: 105 loop");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_561(t3,((C_word*)t0)[3],t2);
+f_642(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]);
+t2=C_a_i_cons(&a,2,lf[11],((C_word*)((C_word*)t0)[2])[1]);
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=(C_word)C_i_cdr(((C_word*)t0)[5]);
-C_trace("chicken.scm: 103 loop");
+t4=C_i_cdr(((C_word*)t0)[5]);
+C_trace("chicken.scm: 105 loop");
t5=((C_word*)((C_word*)t0)[4])[1];
-f_561(t5,((C_word*)t0)[3],t4);
+f_642(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*");
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_697,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
+C_trace("chicken.scm: 90 cons*");
((C_proc5)C_retrieve_symbol_proc(lf[12]))(5,*((C_word*)lf[12]+1),t2,lf[11],lf[13],((C_word*)((C_word*)t0)[2])[1]);
case C_fix(3):
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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*");
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_707,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
+C_trace("chicken.scm: 93 cons*");
((C_proc6)C_retrieve_symbol_proc(lf[12]))(6,*((C_word*)lf[12]+1),t2,lf[11],lf[13],lf[14],((C_word*)((C_word*)t0)[2])[1]);
case C_fix(4):
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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]);
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_717,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
+C_trace("chicken.scm: 96 cons*");
+((C_proc8)C_retrieve_symbol_proc(lf[12]))(8,*((C_word*)lf[12]+1),t2,lf[11],lf[13],lf[14],lf[15],lf[16],((C_word*)((C_word*)t0)[2])[1]);
default:
t2=t1;
-if(C_truep((C_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]);}
+if(C_truep(C_fixnum_greater_or_equal_p(t2,C_fix(5)))){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_727,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
+C_trace("chicken.scm: 101 cons*");
+((C_proc12)C_retrieve_symbol_proc(lf[12]))(12,*((C_word*)lf[12]+1),t3,lf[17],lf[18],lf[16],lf[19],lf[11],lf[20],lf[21],lf[13],lf[15],((C_word*)((C_word*)t0)[2])[1]);}
else{
-t3=(C_word)C_i_cdr(((C_word*)t0)[5]);
-C_trace("chicken.scm: 103 loop");
+t3=C_i_cdr(((C_word*)t0)[5]);
+C_trace("chicken.scm: 105 loop");
t4=((C_word*)((C_word*)t0)[4])[1];
-f_561(t4,((C_word*)t0)[3],t3);}}}
+f_642(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){
+/* k725 in k662 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_727(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
-C_trace("chicken.scm: 103 loop");
+t3=C_i_cdr(((C_word*)t0)[4]);
+C_trace("chicken.scm: 105 loop");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_561(t4,((C_word*)t0)[2],t3);}
+f_642(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){
+/* k715 in k662 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_717(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
-C_trace("chicken.scm: 103 loop");
+t3=C_i_cdr(((C_word*)t0)[4]);
+C_trace("chicken.scm: 105 loop");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_561(t4,((C_word*)t0)[2],t3);}
+f_642(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){
+/* k705 in k662 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_707(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
-C_trace("chicken.scm: 103 loop");
+t3=C_i_cdr(((C_word*)t0)[4]);
+C_trace("chicken.scm: 105 loop");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_561(t4,((C_word*)t0)[2],t3);}
+f_642(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){
+/* k695 in k662 in loop in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_697(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
-C_trace("chicken.scm: 103 loop");
+t3=C_i_cdr(((C_word*)t0)[4]);
+C_trace("chicken.scm: 105 loop");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_561(t4,((C_word*)t0)[2],t3);}
+f_642(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){
+/* k632 in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_634(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_634,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_637,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
C_apply(5,0,t2,C_retrieve(lf[9]),((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}
-/* 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){
+/* k635 in k632 in a629 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_637(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("chicken.scm: 123 exit");
+C_trace("chicken.scm: 125 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){
+/* a617 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_618(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_618,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_622,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
C_trace("chicken.scm: 76 user-options-pass");
((C_proc2)C_retrieve_symbol_proc(lf[7]))(2,*((C_word*)lf[7]+1),t2);}
-/* 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){
+/* k620 in a617 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_622(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2508,47 +2868,47 @@ C_word t4;
C_word *a;
if(C_truep(t1)){
t2=t1;
-C_trace("g269270");
+C_trace("g325326");
t3=t2;
((C_proc3)C_retrieve_proc(t3))(3,t3,((C_word*)t0)[2],C_retrieve(lf[1]));}
else{
t2=C_retrieve(lf[2]);
-C_trace("g269270");
+C_trace("g325326");
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){
+/* k608 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_610(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_610,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_613,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_616,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
C_trace("##sys#implicit-exit-handler");
((C_proc2)C_retrieve_symbol_proc(lf[6]))(2,*((C_word*)lf[6]+1),t3);}
-/* 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){
+/* k614 in k608 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_616(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=t1;
((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k611 in k608 in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_613(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
-/* ##compiler#process-command-line in 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){
+/* ##compiler#process-command-line in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_503(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2557,15 +2917,15 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_503,3,t0,t1,t2);}
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_428,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_509,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
t6=((C_word*)t4)[1];
-f_428(t6,t1,t2,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
+f_509(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){
+/* loop in ##compiler#process-command-line in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_fcall f_509(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -2587,30 +2947,30 @@ 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_save_and_reclaim((void*)trf_509,NULL,5,t0,t1,t2,t3,t4);}
+if(C_truep(C_i_nullp(t2))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_523,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
C_trace("chicken.scm: 61 reverse");
((C_proc3)C_retrieve_proc(*((C_word*)lf[3]+1)))(3,*((C_word*)lf[3]+1),t5,t3);}
else{
-t5=(C_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);
+t5=C_i_car(t2);
+t6=C_i_string_length(t5);
+t7=C_i_string_ref(t5,C_fix(0));
+t8=C_eqp(C_make_character(45),t7);
+t9=(C_truep(t8)?C_fixnum_greaterp(t6,C_fix(1)):C_SCHEME_FALSE);
if(C_truep(t9)){
-t10=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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));
+t10=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_544,a[2]=t6,a[3]=t5,a[4]=t4,a[5]=t3,a[6]=t1,a[7]=((C_word*)t0)[2],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
+if(C_truep(C_fixnum_greaterp(t6,C_fix(1)))){
+t11=C_i_string_ref(t5,C_fix(1));
t12=t10;
-f_463(t12,(C_word)C_eqp(C_make_character(58),t11));}
+f_544(t12,C_eqp(C_make_character(58),t11));}
else{
t11=t10;
-f_463(t11,C_SCHEME_FALSE);}}
+f_544(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);
+t10=C_i_cdr(t2);
+t11=C_a_i_cons(&a,2,t5,t3);
C_trace("chicken.scm: 70 loop");
t17=t1;
t18=t10;
@@ -2622,7 +2982,7 @@ t3=t19;
t4=t20;
goto loop;}
else{
-t10=(C_word)C_i_cdr(t2);
+t10=C_i_cdr(t2);
C_trace("chicken.scm: 71 loop");
t17=t1;
t18=t10;
@@ -2634,8 +2994,8 @@ 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){
+/* k542 in loop in ##compiler#process-command-line in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_fcall f_544(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2644,42 +3004,42 @@ 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);}
+C_save_and_reclaim((void*)trf_544,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(C_word)C_i_cdr(((C_word*)t0)[8]);
+t2=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]);}
+f_509(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);
+t2=C_i_cdr(((C_word*)t0)[8]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_566,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_570,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
C_trace("chicken.scm: 68 substring");
((C_proc5)C_retrieve_proc(*((C_word*)lf[5]+1)))(5,*((C_word*)lf[5]+1),t4,((C_word*)t0)[3],C_fix(1),((C_word*)t0)[2]);}}
-/* 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){
+/* k568 in k542 in loop in ##compiler#process-command-line in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_570(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("chicken.scm: 68 string->symbol");
((C_proc3)C_retrieve_proc(*((C_word*)lf[4]+1)))(3,*((C_word*)lf[4]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k564 in k542 in loop in ##compiler#process-command-line in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_566(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_485,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[6]);
+C_save_and_reclaim((void*)tr2,(void*)f_566,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[6]);
C_trace("chicken.scm: 68 loop");
t3=((C_word*)((C_word*)t0)[5])[1];
-f_428(t3,((C_word*)t0)[4],((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
+f_509(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){
+/* k521 in loop in ##compiler#process-command-line in k499 in k495 in k492 in k489 in k486 in k483 in k480 in k477 in k474 in k471 in k468 in k465 in k462 in k459 in k456 in k453 in k449 in k446 in k443 in k440 in k437 in k434 in k431 in k428 in k425 in k422 in k419 in k416 in k413 in k410 in k407 in k404 in k401 in k398 in k395 */
+static void C_ccall f_523(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
@@ -2687,134 +3047,158 @@ 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] = {
+static C_PTABLE_ENTRY ptable[152] = {
{"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_397:chicken_scm",(void*)f_397},
+{"f_400:chicken_scm",(void*)f_400},
+{"f_403:chicken_scm",(void*)f_403},
+{"f_406:chicken_scm",(void*)f_406},
+{"f_409:chicken_scm",(void*)f_409},
+{"f_412:chicken_scm",(void*)f_412},
+{"f_415:chicken_scm",(void*)f_415},
+{"f_418:chicken_scm",(void*)f_418},
+{"f_421:chicken_scm",(void*)f_421},
+{"f_424:chicken_scm",(void*)f_424},
+{"f_427:chicken_scm",(void*)f_427},
+{"f_430:chicken_scm",(void*)f_430},
+{"f_433:chicken_scm",(void*)f_433},
+{"f_436:chicken_scm",(void*)f_436},
+{"f_439:chicken_scm",(void*)f_439},
+{"f_442:chicken_scm",(void*)f_442},
+{"f_445:chicken_scm",(void*)f_445},
+{"f_448:chicken_scm",(void*)f_448},
+{"f_451:chicken_scm",(void*)f_451},
+{"f_455:chicken_scm",(void*)f_455},
+{"f_1494:chicken_scm",(void*)f_1494},
+{"f_1501:chicken_scm",(void*)f_1501},
+{"f_1504:chicken_scm",(void*)f_1504},
+{"f_1507:chicken_scm",(void*)f_1507},
+{"f_1604:chicken_scm",(void*)f_1604},
+{"f_1617:chicken_scm",(void*)f_1617},
+{"f_1749:chicken_scm",(void*)f_1749},
+{"f_1747:chicken_scm",(void*)f_1747},
+{"f_1677:chicken_scm",(void*)f_1677},
+{"f_1701:chicken_scm",(void*)f_1701},
+{"f_1685:chicken_scm",(void*)f_1685},
+{"f_1689:chicken_scm",(void*)f_1689},
+{"f_1513:chicken_scm",(void*)f_1513},
+{"f_1523:chicken_scm",(void*)f_1523},
+{"f_1543:chicken_scm",(void*)f_1543},
+{"f_1492:chicken_scm",(void*)f_1492},
+{"f_458:chicken_scm",(void*)f_458},
+{"f_1361:chicken_scm",(void*)f_1361},
+{"f_1365:chicken_scm",(void*)f_1365},
+{"f_1377:chicken_scm",(void*)f_1377},
+{"f_1469:chicken_scm",(void*)f_1469},
+{"f_1380:chicken_scm",(void*)f_1380},
+{"f_1387:chicken_scm",(void*)f_1387},
+{"f_1465:chicken_scm",(void*)f_1465},
+{"f_1407:chicken_scm",(void*)f_1407},
+{"f_1359:chicken_scm",(void*)f_1359},
+{"f_461:chicken_scm",(void*)f_461},
{"f_1177:chicken_scm",(void*)f_1177},
-{"f_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_1181:chicken_scm",(void*)f_1181},
+{"f_1190:chicken_scm",(void*)f_1190},
+{"f_1313:chicken_scm",(void*)f_1313},
+{"f_1351:chicken_scm",(void*)f_1351},
+{"f_1340:chicken_scm",(void*)f_1340},
+{"f_1348:chicken_scm",(void*)f_1348},
+{"f_1193:chicken_scm",(void*)f_1193},
+{"f_1289:chicken_scm",(void*)f_1289},
{"f_1204:chicken_scm",(void*)f_1204},
-{"f_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_1287:chicken_scm",(void*)f_1287},
+{"f_1214:chicken_scm",(void*)f_1214},
+{"f_1212:chicken_scm",(void*)f_1212},
+{"f_1175:chicken_scm",(void*)f_1175},
+{"f_464:chicken_scm",(void*)f_464},
+{"f_1091:chicken_scm",(void*)f_1091},
+{"f_1095:chicken_scm",(void*)f_1095},
+{"f_1098:chicken_scm",(void*)f_1098},
+{"f_1105:chicken_scm",(void*)f_1105},
+{"f_1129:chicken_scm",(void*)f_1129},
{"f_1145:chicken_scm",(void*)f_1145},
-{"f_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_1148:chicken_scm",(void*)f_1148},
+{"f_1151:chicken_scm",(void*)f_1151},
+{"f_1154:chicken_scm",(void*)f_1154},
+{"f_1167:chicken_scm",(void*)f_1167},
+{"f_1157:chicken_scm",(void*)f_1157},
+{"f_1160:chicken_scm",(void*)f_1160},
+{"f_1163:chicken_scm",(void*)f_1163},
+{"f_1089:chicken_scm",(void*)f_1089},
+{"f_467:chicken_scm",(void*)f_467},
+{"f_1021:chicken_scm",(void*)f_1021},
+{"f_1025:chicken_scm",(void*)f_1025},
+{"f_1028:chicken_scm",(void*)f_1028},
+{"f_1038:chicken_scm",(void*)f_1038},
+{"f_1070:chicken_scm",(void*)f_1070},
+{"f_1066:chicken_scm",(void*)f_1066},
+{"f_1019:chicken_scm",(void*)f_1019},
+{"f_470:chicken_scm",(void*)f_470},
+{"f_992:chicken_scm",(void*)f_992},
+{"f_996:chicken_scm",(void*)f_996},
{"f_1011:chicken_scm",(void*)f_1011},
-{"f_1009:chicken_scm",(void*)f_1009},
+{"f_990:chicken_scm",(void*)f_990},
+{"f_473:chicken_scm",(void*)f_473},
+{"f_974:chicken_scm",(void*)f_974},
+{"f_982:chicken_scm",(void*)f_982},
{"f_972:chicken_scm",(void*)f_972},
-{"f_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_476:chicken_scm",(void*)f_476},
+{"f_956:chicken_scm",(void*)f_956},
{"f_964:chicken_scm",(void*)f_964},
{"f_954:chicken_scm",(void*)f_954},
-{"f_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_479:chicken_scm",(void*)f_479},
+{"f_938:chicken_scm",(void*)f_938},
+{"f_946:chicken_scm",(void*)f_946},
+{"f_936:chicken_scm",(void*)f_936},
+{"f_482:chicken_scm",(void*)f_482},
+{"f_920:chicken_scm",(void*)f_920},
+{"f_928:chicken_scm",(void*)f_928},
+{"f_918:chicken_scm",(void*)f_918},
+{"f_485:chicken_scm",(void*)f_485},
+{"f_902:chicken_scm",(void*)f_902},
+{"f_910:chicken_scm",(void*)f_910},
+{"f_900:chicken_scm",(void*)f_900},
+{"f_488:chicken_scm",(void*)f_488},
+{"f_884:chicken_scm",(void*)f_884},
+{"f_892:chicken_scm",(void*)f_892},
+{"f_882:chicken_scm",(void*)f_882},
+{"f_491:chicken_scm",(void*)f_491},
+{"f_866:chicken_scm",(void*)f_866},
+{"f_874:chicken_scm",(void*)f_874},
+{"f_864:chicken_scm",(void*)f_864},
+{"f_494:chicken_scm",(void*)f_494},
+{"f_497:chicken_scm",(void*)f_497},
+{"f_857:chicken_scm",(void*)f_857},
+{"f_853:chicken_scm",(void*)f_853},
+{"f_845:chicken_scm",(void*)f_845},
+{"f_835:chicken_scm",(void*)f_835},
+{"f_843:chicken_scm",(void*)f_843},
+{"f_501:chicken_scm",(void*)f_501},
+{"f_630:chicken_scm",(void*)f_630},
+{"f_642:chicken_scm",(void*)f_642},
+{"f_825:chicken_scm",(void*)f_825},
{"f_818:chicken_scm",(void*)f_818},
-{"f_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_740:chicken_scm",(void*)f_740},
+{"f_757:chicken_scm",(void*)f_757},
+{"f_743:chicken_scm",(void*)f_743},
+{"f_664:chicken_scm",(void*)f_664},
+{"f_727:chicken_scm",(void*)f_727},
+{"f_717:chicken_scm",(void*)f_717},
+{"f_707:chicken_scm",(void*)f_707},
+{"f_697:chicken_scm",(void*)f_697},
+{"f_634:chicken_scm",(void*)f_634},
+{"f_637:chicken_scm",(void*)f_637},
+{"f_618:chicken_scm",(void*)f_618},
+{"f_622:chicken_scm",(void*)f_622},
+{"f_610:chicken_scm",(void*)f_610},
{"f_616:chicken_scm",(void*)f_616},
-{"f_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},
+{"f_613:chicken_scm",(void*)f_613},
+{"f_503:chicken_scm",(void*)f_503},
+{"f_509:chicken_scm",(void*)f_509},
+{"f_544:chicken_scm",(void*)f_544},
+{"f_570:chicken_scm",(void*)f_570},
+{"f_566:chicken_scm",(void*)f_566},
+{"f_523:chicken_scm",(void*)f_523},
{NULL,NULL}};
#endif
diff --git a/bootstrap/compiler-syntax.c b/bootstrap/compiler-syntax.c
index 126e728f..2c10ffaa 100644
--- a/bootstrap/compiler-syntax.c
+++ b/bootstrap/compiler-syntax.c
@@ -1,10 +1,10 @@
/* Generated from compiler-syntax.scm by the CHICKEN compiler
http://www.call-with-current-continuation.org
- 2009-12-04 21:30
+ 2010-02-09 21:38
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
+ windows-mingw32-x86 [ manyargs ptables ]
+ compiled 2010-01-08 on lenovo-1 (MINGW32_NT-6.0)
+ command line: compiler-syntax.scm -optimize-level 2 -include-path . -include-path ./ -inline -no-lambda-info -local -no-trace -extend private-namespace.scm -no-trace -output-file compiler-syntax.c
unit: compiler_syntax
*/
@@ -736,7 +736,7 @@ t4=C_mutate((C_word*)lf[5]+1 /* (set! r-c-s ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C
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");
+/* ##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 */
@@ -750,7 +750,7 @@ 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");
+/* ##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 */
@@ -763,7 +763,7 @@ 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");
+/* compiler-syntax.scm: 61 r */
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t5,lf[32]);}
@@ -776,7 +776,7 @@ 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");
+/* compiler-syntax.scm: 62 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[71]);}
@@ -789,7 +789,7 @@ 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");
+/* compiler-syntax.scm: 63 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[70]);}
@@ -802,7 +802,7 @@ 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");
+/* compiler-syntax.scm: 64 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[64]);}
@@ -815,7 +815,7 @@ 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");
+/* compiler-syntax.scm: 65 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[63]);}
@@ -828,7 +828,7 @@ 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");
+/* compiler-syntax.scm: 66 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[62]);}
@@ -841,7 +841,7 @@ 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");
+/* compiler-syntax.scm: 67 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[53]);}
@@ -859,7 +859,7 @@ 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+");
+/* 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;
@@ -881,7 +881,7 @@ t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2802,a[2]=((C_word*)t0)[4],a[3]=((C_word*
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");
+/* 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]);
@@ -896,7 +896,7 @@ 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");
+/* 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);}
@@ -961,7 +961,7 @@ 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");
+/* 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];
@@ -987,14 +987,14 @@ 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");
+/* 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");
+/* loop137150 */
t6=((C_word*)((C_word*)t0)[4])[1];
f_2752(t6,((C_word*)t0)[3],t5);}}
@@ -1045,7 +1045,7 @@ 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");
+/* g185186 */
t10=t6;
((C_proc4)C_retrieve_proc(t10))(4,t10,t7,t8,t9);}
else{
@@ -1084,7 +1084,7 @@ 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");
+/* loop165179 */
t5=((C_word*)((C_word*)t0)[3])[1];
f_2703(t5,((C_word*)t0)[2],t3,t4);}
@@ -1147,7 +1147,7 @@ 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");
+/* loop192205 */
t15=t1;
t16=t9;
t1=t15;
@@ -1157,7 +1157,7 @@ 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");
+/* loop192205 */
t15=t1;
t16=t9;
t1=t15;
@@ -1182,7 +1182,7 @@ 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");
+/* ##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);}
@@ -1255,7 +1255,7 @@ 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");
+/* loop220233 */
t16=t1;
t17=t10;
t1=t16;
@@ -1265,7 +1265,7 @@ 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");
+/* loop220233 */
t16=t1;
t17=t10;
t1=t16;
@@ -1281,7 +1281,7 @@ 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");
+/* ##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);}
@@ -1348,7 +1348,7 @@ 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");
+/* loop248261 */
t16=t1;
t17=t10;
t1=t16;
@@ -1358,7 +1358,7 @@ 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");
+/* loop248261 */
t16=t1;
t17=t10;
t1=t16;
@@ -1374,7 +1374,7 @@ 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");
+/* ##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);}
@@ -1423,7 +1423,7 @@ 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");
+/* ##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 */
@@ -1437,7 +1437,7 @@ 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");
+/* ##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 */
@@ -1450,7 +1450,7 @@ 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");
+/* compiler-syntax.scm: 87 r */
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t5,lf[32]);}
@@ -1463,7 +1463,7 @@ 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");
+/* compiler-syntax.scm: 88 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[71]);}
@@ -1476,7 +1476,7 @@ 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");
+/* compiler-syntax.scm: 89 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[70]);}
@@ -1489,7 +1489,7 @@ 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");
+/* compiler-syntax.scm: 90 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[69]);}
@@ -1502,7 +1502,7 @@ 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");
+/* compiler-syntax.scm: 91 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[68]);}
@@ -1515,7 +1515,7 @@ 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");
+/* compiler-syntax.scm: 92 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[67]);}
@@ -1528,7 +1528,7 @@ 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");
+/* compiler-syntax.scm: 93 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[66]);}
@@ -1541,7 +1541,7 @@ 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");
+/* compiler-syntax.scm: 94 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[65]);}
@@ -1554,7 +1554,7 @@ 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");
+/* compiler-syntax.scm: 95 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[38]);}
@@ -1567,7 +1567,7 @@ 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");
+/* compiler-syntax.scm: 96 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[64]);}
@@ -1580,7 +1580,7 @@ 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");
+/* compiler-syntax.scm: 97 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[53]);}
@@ -1593,7 +1593,7 @@ 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");
+/* compiler-syntax.scm: 98 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[63]);}
@@ -1606,7 +1606,7 @@ 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");
+/* compiler-syntax.scm: 99 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[62]);}
@@ -1624,7 +1624,7 @@ 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+");
+/* 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;
@@ -1646,7 +1646,7 @@ t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2390,a[2]=((C_word*)t0)[4],a[3]=((C_word*
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");
+/* 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]);
@@ -1661,7 +1661,7 @@ 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");
+/* 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);}
@@ -1726,7 +1726,7 @@ 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");
+/* 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];
@@ -1752,14 +1752,14 @@ 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");
+/* 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");
+/* loop314327 */
t6=((C_word*)((C_word*)t0)[4])[1];
f_2340(t6,((C_word*)t0)[3],t5);}}
@@ -1826,7 +1826,7 @@ 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");
+/* g362363 */
t10=t6;
((C_proc4)C_retrieve_proc(t10))(4,t10,t7,t8,t9);}
else{
@@ -1865,7 +1865,7 @@ 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");
+/* loop342356 */
t5=((C_word*)((C_word*)t0)[3])[1];
f_2263(t5,((C_word*)t0)[2],t3,t4);}
@@ -1928,7 +1928,7 @@ 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");
+/* loop369382 */
t15=t1;
t16=t9;
t1=t15;
@@ -1938,7 +1938,7 @@ 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");
+/* loop369382 */
t15=t1;
t16=t9;
t1=t15;
@@ -1963,7 +1963,7 @@ 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");
+/* ##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);}
@@ -2036,7 +2036,7 @@ 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");
+/* loop397410 */
t16=t1;
t17=t10;
t1=t16;
@@ -2046,7 +2046,7 @@ 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");
+/* loop397410 */
t16=t1;
t17=t10;
t1=t16;
@@ -2062,7 +2062,7 @@ 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");
+/* ##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);}
@@ -2173,7 +2173,7 @@ 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");
+/* loop425438 */
t16=t1;
t17=t10;
t1=t16;
@@ -2183,7 +2183,7 @@ 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");
+/* loop425438 */
t16=t1;
t17=t10;
t1=t16;
@@ -2199,7 +2199,7 @@ 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");
+/* ##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);}
@@ -2256,7 +2256,7 @@ 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");
+/* ##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 */
@@ -2277,7 +2277,7 @@ 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");
+/* compiler-syntax.scm: 128 r */
t9=t3;
((C_proc3)C_retrieve_proc(t9))(3,t9,t8,lf[54]);}
else{
@@ -2294,7 +2294,7 @@ 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");
+/* compiler-syntax.scm: 129 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[53]);}
@@ -2311,7 +2311,7 @@ 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");
+/* 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 */
@@ -2341,7 +2341,7 @@ 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");
+/* ##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 */
@@ -2355,7 +2355,7 @@ 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");
+/* ##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 */
@@ -2369,7 +2369,7 @@ 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");
+/* ##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 */
@@ -2383,7 +2383,7 @@ 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");
+/* ##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 */
@@ -2397,7 +2397,7 @@ 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");
+/* ##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 */
@@ -2411,7 +2411,7 @@ 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");
+/* ##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 */
@@ -2425,7 +2425,7 @@ 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");
+/* ##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 */
@@ -2451,7 +2451,7 @@ 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");
+/* ##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 */
@@ -2464,7 +2464,7 @@ 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");
+/* 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 */
@@ -2484,7 +2484,7 @@ 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");
+/* 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 */
@@ -2498,7 +2498,7 @@ 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");
+/* compiler-syntax.scm: 144 r */
t3=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[32]);}
else{
@@ -2515,7 +2515,7 @@ 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");
+/* compiler-syntax.scm: 144 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[19]);}
@@ -2536,7 +2536,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,((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");
+/* compiler-syntax.scm: 146 r */
t7=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t7))(3,t7,t6,lf[16]);}
@@ -2573,7 +2573,7 @@ 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");
+/* ##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 */
@@ -2587,7 +2587,7 @@ 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");
+/* ##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 */
@@ -2601,7 +2601,7 @@ 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");
+/* ##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 */
@@ -2615,7 +2615,7 @@ 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");
+/* ##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 */
@@ -2629,7 +2629,7 @@ 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");
+/* ##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 */
@@ -2643,7 +2643,7 @@ 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");
+/* ##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 */
@@ -2657,7 +2657,7 @@ 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");
+/* ##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 */
@@ -2683,7 +2683,7 @@ 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");
+/* ##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 */
@@ -2704,7 +2704,7 @@ 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");
+/* 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;
@@ -2732,7 +2732,7 @@ 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");
+/* ##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 */
@@ -2746,7 +2746,7 @@ 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");
+/* ##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 */
@@ -2760,7 +2760,7 @@ 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");
+/* ##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 */
@@ -2774,7 +2774,7 @@ 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");
+/* ##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 */
@@ -2788,7 +2788,7 @@ 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");
+/* ##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 */
@@ -2802,7 +2802,7 @@ 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");
+/* ##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 */
@@ -2816,7 +2816,7 @@ 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");
+/* ##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 */
@@ -2842,7 +2842,7 @@ 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");
+/* ##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 */
@@ -2857,7 +2857,7 @@ 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");
+/* 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 */
@@ -2898,7 +2898,7 @@ 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");
+/* 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 */
@@ -2930,7 +2930,7 @@ 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");
+/* compiler-syntax.scm: 174 r */
t10=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t10))(3,t10,t9,lf[38]);}
else{
@@ -2952,7 +2952,7 @@ 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");
+/* 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 */
@@ -2960,7 +2960,7 @@ 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");
+/* 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);}
@@ -2974,7 +2974,7 @@ 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");
+/* 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];
@@ -3004,7 +3004,7 @@ 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");
+/* 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];
@@ -3037,7 +3037,7 @@ 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");
+/* compiler-syntax.scm: 190 r */
t12=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t12))(3,t12,t11,lf[17]);}
@@ -3050,7 +3050,7 @@ 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");
+/* compiler-syntax.scm: 191 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[35]);}
@@ -3063,7 +3063,7 @@ 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");
+/* compiler-syntax.scm: 192 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[29]);}
@@ -3076,7 +3076,7 @@ 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");
+/* compiler-syntax.scm: 193 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[34]);}
@@ -3089,7 +3089,7 @@ 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");
+/* compiler-syntax.scm: 194 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[33]);}
@@ -3102,7 +3102,7 @@ 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");
+/* compiler-syntax.scm: 195 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[32]);}
@@ -3115,7 +3115,7 @@ 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");
+/* compiler-syntax.scm: 196 r */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[31]);}
@@ -3184,7 +3184,7 @@ 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");
+/* 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{
@@ -3193,12 +3193,12 @@ 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");
+/* 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");
+/* compiler-syntax.scm: 249 loop */
t11=t1;
t12=t6;
t1=t11;
@@ -3242,44 +3242,44 @@ t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1060,a[2]=((C_word*)t0)[13],a[3]=((C_word
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");
+/* 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");
+/* 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");
+/* 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");
+/* 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");
+/* 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");
+/* 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");
+/* 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");
+/* compiler-syntax.scm: 236 next */
t5=((C_word*)((C_word*)t0)[9])[1];
f_911(t5,t4);
case C_make_character(126):
@@ -3287,7 +3287,7 @@ 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");
+/* 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:
@@ -3298,7 +3298,7 @@ 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");
+/* 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{
@@ -3306,11 +3306,11 @@ 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");
+/* 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");
+/* 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]));}}}}
@@ -3343,7 +3343,7 @@ 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");
+/* compiler-syntax.scm: 237 next */
t3=((C_word*)((C_word*)t0)[2])[1];
f_911(t3,t2);}
@@ -3366,7 +3366,7 @@ 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");
+/* 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);}
@@ -3391,7 +3391,7 @@ 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");
+/* 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);}
@@ -3416,7 +3416,7 @@ 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");
+/* 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);}
@@ -3441,7 +3441,7 @@ 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");
+/* 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);}
@@ -3460,7 +3460,7 @@ 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");
+/* 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);}
@@ -3479,7 +3479,7 @@ 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");
+/* 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);}
@@ -3498,7 +3498,7 @@ 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");
+/* 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);}
@@ -3507,7 +3507,7 @@ 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");
+/* 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);}
@@ -3520,7 +3520,7 @@ 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");
+/* compiler-syntax.scm: 219 endchunk */
t3=((C_word*)((C_word*)t0)[3])[1];
f_930(t3,t2,((C_word*)t0)[2]);}
@@ -3541,7 +3541,7 @@ 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");
+/* 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 */
@@ -3549,7 +3549,7 @@ 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");
+/* ##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);}
@@ -3599,12 +3599,12 @@ 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");
+/* 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");
+/* 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;
@@ -3624,7 +3624,7 @@ 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");
+/* 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));}
@@ -3639,7 +3639,7 @@ 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");
+/* 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{
@@ -3671,7 +3671,7 @@ 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");
+/* 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 */
@@ -3688,10 +3688,10 @@ t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_853,a[2]=((C_word*)t0)[6],a[3]=((C_word*)
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");
+/* 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");
+/* 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 */
@@ -3703,7 +3703,7 @@ 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");
+/* 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 */
@@ -3715,7 +3715,7 @@ 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");
+/* 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 */
@@ -3723,7 +3723,7 @@ 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");
+/* 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 */
@@ -3731,7 +3731,7 @@ 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");
+/* 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 */
@@ -3741,7 +3741,7 @@ C_word t2;
C_word t3;
C_word *a;
if(C_truep(((C_word*)t0)[4])){
-C_trace("compiler-syntax.scm: 186 return");
+/* 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{
@@ -3780,7 +3780,7 @@ 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");
+/* ##sys#error */
t7=*((C_word*)lf[9]+1);
((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[10],t4);}}}
@@ -3793,7 +3793,7 @@ 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");
+/* 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 */
@@ -3833,7 +3833,7 @@ 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");
+/* g5960 */
t6=t3;
f_743(t6,t4,t5);}
else{
@@ -3858,7 +3858,7 @@ 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!");
+/* 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 */
@@ -3871,7 +3871,7 @@ 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");
+/* 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 */
@@ -3885,7 +3885,7 @@ 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!");
+/* 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 */
diff --git a/bootstrap/compiler.c b/bootstrap/compiler.c
index bacde3c5..a0c3ffc5 100644
--- a/bootstrap/compiler.c
+++ b/bootstrap/compiler.c
@@ -1,9 +1,9 @@
/* 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)
+ 2010-02-22 11:33
+ Version 4.3.5
+ windows-mingw32-x86 [ manyargs dload ptables ]
+ compiled 2010-02-17 on lenovo-1 (MINGW32_NT-6.0)
command line: compiler.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -no-lambda-info -local -extend private-namespace.scm -output-file compiler.c
unit: compiler
*/
@@ -16,2279 +16,2275 @@ C_externimport void C_ccall C_library_toplevel(C_word c,C_word d,C_word k) C_nor
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 C_TLS C_word lf[673];
static double C_possibly_force_alignment;
C_noret_decl(C_compiler_toplevel)
C_externexport void C_ccall C_compiler_toplevel(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_5088)
+static void C_ccall f_5088(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5091)
+static void C_ccall f_5091(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17502)
+static void C_ccall f_17502(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_19009)
+static void C_ccall f_19009(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19012)
+static void C_ccall f_19012(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19015)
+static void C_ccall f_19015(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19018)
+static void C_ccall f_19018(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19021)
+static void C_ccall f_19021(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_18924)
-static void C_fcall f_18924(C_word t0,C_word t1,C_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;
+static void C_fcall f_18924(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18951)
+static void C_ccall f_18951(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18892)
+static void C_fcall f_18892(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18908)
+static void C_ccall f_18908(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18915)
+static void C_ccall f_18915(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18922)
+static void C_ccall f_18922(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18896)
+static void C_ccall f_18896(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18906)
+static void C_ccall f_18906(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18878)
+static void C_fcall f_18878(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18886)
+static void C_ccall f_18886(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18798)
+static void C_fcall f_18798(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18805)
+static void C_ccall f_18805(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18867)
+static void C_ccall f_18867(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18857)
+static void C_ccall f_18857(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18831)
+static void C_ccall f_18831(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18817)
+static void C_ccall f_18817(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_18752)
-static void C_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;
+static void C_fcall f_18752(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_18758)
+static void C_fcall f_18758(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18792)
+static void C_ccall f_18792(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18785)
+static void C_fcall f_18785(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17629)
+static void C_fcall f_17629(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_18741)
+static void C_ccall f_18741(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18632)
+static void C_ccall f_18632(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18658)
+static void C_fcall f_18658(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_18691)
+static void C_ccall f_18691(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18694)
+static void C_ccall f_18694(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18713)
+static void C_ccall f_18713(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18701)
+static void C_ccall f_18701(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18669)
+static void C_ccall f_18669(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18680)
+static void C_ccall f_18680(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18648)
+static void C_ccall f_18648(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18577)
+static void C_ccall f_18577(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18580)
+static void C_ccall f_18580(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18583)
+static void C_ccall f_18583(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18603)
+static void C_ccall f_18603(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18565)
+static void C_ccall f_18565(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18466)
+static void C_fcall f_18466(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18536)
+static void C_ccall f_18536(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_18555)
static void C_ccall f_18555(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_18530)
+static void C_ccall f_18530(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18514)
+static void C_ccall f_18514(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18487)
+static void C_fcall f_18487(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18490)
+static void C_ccall f_18490(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18432)
+static void C_fcall f_18432(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18444)
+static void C_ccall f_18444(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18383)
+static void C_ccall f_18383(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_18401)
-static void C_fcall f_18401(C_word t0,C_word t1,C_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;
+static void C_fcall f_18401(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18386)
+static void C_fcall f_18386(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18398)
+static void C_ccall f_18398(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_18225)
static void C_ccall f_18225(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18359)
+static void C_ccall f_18359(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18348)
+static void C_ccall f_18348(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18264)
+static void C_fcall f_18264(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18344)
+static void C_ccall f_18344(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18270)
+static void C_ccall f_18270(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18276)
+static void C_fcall f_18276(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18308)
+static void C_ccall f_18308(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18300)
+static void C_ccall f_18300(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18229)
+static void C_fcall f_18229(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18250)
+static void C_ccall f_18250(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18182)
+static void C_ccall f_18182(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_18198)
static void C_ccall f_18198(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_18202)
+static void C_ccall f_18202(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18135)
+static void C_ccall f_18135(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18147)
+static void C_ccall f_18147(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18151)
+static void C_ccall f_18151(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18139)
+static void C_ccall f_18139(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_17946)
-static void C_ccall f_17946(C_word c,C_word t0,C_word t1) C_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;
+static void C_ccall f_17946(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_18065)
+static void C_ccall f_18065(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18071)
+static void C_ccall f_18071(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18096)
+static void C_ccall f_18096(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17953)
+static void C_ccall f_17953(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18056)
+static void C_ccall f_18056(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17956)
+static void C_ccall f_17956(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17959)
+static void C_ccall f_17959(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17962)
+static void C_ccall f_17962(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18007)
+static void C_ccall f_18007(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18033)
+static void C_ccall f_18033(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18014)
+static void C_fcall f_18014(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18018)
+static void C_ccall f_18018(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17991)
+static void C_ccall f_17991(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17873)
+static void C_ccall f_17873(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17888)
+static void C_fcall f_17888(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17857)
+static void C_ccall f_17857(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17827)
+static void C_ccall f_17827(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17801)
+static void C_ccall f_17801(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17797)
+static void C_ccall f_17797(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17793)
+static void C_ccall f_17793(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17767)
+static void C_ccall f_17767(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17763)
+static void C_ccall f_17763(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17737)
+static void C_ccall f_17737(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17711)
+static void C_ccall f_17711(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_17556)
-static void C_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;
+static void C_fcall f_17556(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_17616)
+static void C_ccall f_17616(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17560)
+static void C_ccall f_17560(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17595)
+static void C_ccall f_17595(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17602)
+static void C_ccall f_17602(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17563)
+static void C_fcall f_17563(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17566)
+static void C_fcall f_17566(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17582)
+static void C_ccall f_17582(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17505)
+static void C_fcall f_17505(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_17509)
+static void C_ccall f_17509(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17535)
+static void C_ccall f_17535(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17551)
+static void C_ccall f_17551(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17493)
+static void C_ccall f_17493(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17484)
+static void C_ccall f_17484(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17475)
+static void C_ccall f_17475(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17466)
+static void C_ccall f_17466(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17457)
+static void C_ccall f_17457(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17448)
+static void C_ccall f_17448(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17439)
+static void C_ccall f_17439(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17430)
+static void C_ccall f_17430(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17421)
+static void C_ccall f_17421(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17412)
+static void C_ccall f_17412(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17403)
+static void C_ccall f_17403(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17394)
+static void C_ccall f_17394(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17385)
+static void C_ccall f_17385(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17376)
+static void C_ccall f_17376(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17367)
+static void C_ccall f_17367(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17358)
+static void C_ccall f_17358(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17352)
+static void C_ccall f_17352(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17346)
+static void C_ccall f_17346(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9,C_word t10,C_word t11,C_word t12,C_word t13,C_word t14,C_word t15,C_word t16,C_word t17) C_noret;
+C_noret_decl(f_15586)
+static void C_ccall f_15586(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_17313)
+static void C_ccall f_17313(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17316)
+static void C_ccall f_17316(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17319)
+static void C_ccall f_17319(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17322)
+static void C_ccall f_17322(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17325)
+static void C_ccall f_17325(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_17340)
-static void C_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;
+static void C_ccall f_17340(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17338)
+static void C_ccall f_17338(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17328)
+static void C_ccall f_17328(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17122)
+static void C_fcall f_17122(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_17129)
+static void C_ccall f_17129(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17133)
+static void C_fcall f_17133(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17154)
+static void C_ccall f_17154(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17076)
+static void C_fcall f_17076(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_17082)
+static void C_fcall f_17082(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17116)
+static void C_ccall f_17116(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17109)
+static void C_fcall f_17109(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16051)
+static void C_fcall f_16051(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_16085)
+static void C_fcall f_16085(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16124)
+static void C_fcall f_16124(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16962)
+static void C_ccall f_16962(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16958)
+static void C_ccall f_16958(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16747)
+static void C_ccall f_16747(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16753)
+static void C_ccall f_16753(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16850)
+static void C_ccall f_16850(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16894)
+static void C_ccall f_16894(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16870)
+static void C_ccall f_16870(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16874)
+static void C_ccall f_16874(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16757)
+static void C_fcall f_16757(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16764)
+static void C_ccall f_16764(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16833)
+static void C_ccall f_16833(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16837)
+static void C_ccall f_16837(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16805)
+static void C_ccall f_16805(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16793)
+static void C_ccall f_16793(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16258)
+static void C_ccall f_16258(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_16720)
+static void C_ccall f_16720(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16262)
+static void C_ccall f_16262(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16685)
+static void C_fcall f_16685(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16714)
+static void C_ccall f_16714(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16634)
+static void C_ccall f_16634(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16636)
+static void C_fcall f_16636(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_16669)
+static void C_ccall f_16669(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16649)
+static void C_fcall f_16649(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16265)
+static void C_ccall f_16265(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16268)
+static void C_ccall f_16268(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16274)
+static void C_ccall f_16274(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16280)
+static void C_ccall f_16280(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16286)
+static void C_fcall f_16286(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16601)
+static void C_ccall f_16601(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16604)
+static void C_ccall f_16604(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16289)
+static void C_ccall f_16289(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16543)
+static void C_fcall f_16543(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16570)
+static C_word C_fcall f_16570(C_word t0,C_word t1);
+C_noret_decl(f_16528)
+static void C_ccall f_16528(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16524)
+static void C_ccall f_16524(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16411)
+static void C_ccall f_16411(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_16443)
static void C_ccall f_16443(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_16449)
+static void C_fcall f_16449(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16493)
+static void C_ccall f_16493(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16447)
+static void C_ccall f_16447(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16422)
+static void C_ccall f_16422(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_16414)
+static void C_ccall f_16414(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16407)
+static void C_fcall f_16407(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16357)
+static void C_fcall f_16357(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16395)
+static void C_ccall f_16395(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16384)
+static void C_fcall f_16384(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16392)
+static void C_ccall f_16392(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16318)
+static void C_ccall f_16318(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16348)
+static void C_ccall f_16348(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16340)
+static void C_ccall f_16340(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16336)
+static void C_ccall f_16336(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16332)
+static void C_ccall f_16332(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_16321)
static void C_ccall f_16321(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_16157)
+static void C_ccall f_16157(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16160)
+static void C_ccall f_16160(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16241)
+static void C_ccall f_16241(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16183)
+static void C_ccall f_16183(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16225)
+static void C_ccall f_16225(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16213)
+static void C_ccall f_16213(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16145)
+static void C_ccall f_16145(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16097)
+static void C_ccall f_16097(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16103)
+static void C_ccall f_16103(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15616)
+static void C_fcall f_15616(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_15650)
+static void C_fcall f_15650(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15993)
+static void C_fcall f_15993(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_16008)
static void C_ccall f_16008(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_16001)
+static void C_fcall f_16001(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15954)
+static void C_ccall f_15954(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_17178)
+static void C_fcall f_17178(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17231)
+static void C_fcall f_17231(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17262)
+static void C_fcall f_17262(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17272)
+static void C_ccall f_17272(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17257)
+static void C_ccall f_17257(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17222)
+static void C_ccall f_17222(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17176)
+static void C_ccall f_17176(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15967)
+static void C_ccall f_15967(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15970)
+static void C_ccall f_15970(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15981)
+static void C_ccall f_15981(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15908)
+static void C_ccall f_15908(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15790)
+static void C_ccall f_15790(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15796)
+static void C_fcall f_15796(C_word t0,C_word t1) C_noret;
C_noret_decl(f_15813)
-static void C_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;
+static void C_ccall f_15813(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15816)
+static void C_ccall f_15816(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15819)
+static void C_fcall f_15819(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15858)
+static void C_ccall f_15858(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15837)
+static void C_fcall f_15837(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15844)
+static void C_ccall f_15844(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15822)
+static void C_ccall f_15822(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15825)
+static void C_ccall f_15825(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15828)
+static void C_ccall f_15828(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15735)
+static void C_ccall f_15735(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15740)
+static void C_fcall f_15740(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15755)
+static void C_ccall f_15755(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15748)
+static void C_fcall f_15748(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15671)
+static void C_ccall f_15671(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_15688)
+static void C_fcall f_15688(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15703)
+static void C_ccall f_15703(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15696)
+static void C_fcall f_15696(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15675)
+static void C_ccall f_15675(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15686)
+static void C_ccall f_15686(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15661)
+static void C_ccall f_15661(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15605)
+static void C_fcall f_15605(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15614)
+static void C_ccall f_15614(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15595)
+static void C_fcall f_15595(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_15600)
+static void C_ccall f_15600(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15589)
+static void C_fcall f_15589(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_13640)
+static void C_ccall f_13640(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13644)
+static void C_ccall f_13644(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14509)
+static void C_ccall f_14509(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14513)
+static void C_ccall f_14513(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14516)
+static void C_ccall f_14516(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14525)
+static void C_ccall f_14525(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_15451)
+static void C_fcall f_15451(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15459)
+static C_word C_fcall f_15459(C_word t0,C_word t1);
+C_noret_decl(f_14529)
+static void C_ccall f_14529(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_15429)
-static void C_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;
+static void C_fcall f_15429(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15402)
+static void C_fcall f_15402(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14540)
+static void C_ccall f_14540(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15399)
+static void C_ccall f_15399(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15344)
+static void C_fcall f_15344(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15347)
+static void C_ccall f_15347(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15375)
+static void C_ccall f_15375(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15353)
+static void C_ccall f_15353(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14543)
+static void C_ccall f_14543(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14546)
+static void C_ccall f_14546(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15266)
+static void C_ccall f_15266(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_15270)
-static void C_fcall f_15270(C_word t0,C_word t1) C_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;
+static void C_fcall f_15270(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15329)
+static void C_ccall f_15329(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15288)
+static void C_ccall f_15288(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15293)
+static void C_ccall f_15293(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15208)
+static void C_ccall f_15208(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_15246)
+static void C_ccall f_15246(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15212)
+static void C_ccall f_15212(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15229)
+static void C_ccall f_15229(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15221)
+static void C_ccall f_15221(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15202)
+static void C_ccall f_15202(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15163)
+static void C_ccall f_15163(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_15163)
+static void C_ccall f_15163r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_15157)
+static void C_ccall f_15157(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15155)
+static void C_ccall f_15155(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15147)
+static void C_ccall f_15147(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15115)
+static void C_ccall f_15115(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15121)
+static void C_fcall f_15121(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14549)
+static void C_ccall f_14549(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15062)
+static void C_fcall f_15062(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15071)
+static void C_ccall f_15071(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14552)
+static void C_ccall f_14552(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14931)
+static void C_fcall f_14931(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14954)
+static void C_ccall f_14954(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_14997)
+static void C_fcall f_14997(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15033)
+static void C_ccall f_15033(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15005)
+static void C_fcall f_15005(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15030)
+static void C_ccall f_15030(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15026)
+static void C_ccall f_15026(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15012)
+static void C_fcall f_15012(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15015)
+static void C_ccall f_15015(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14958)
+static void C_ccall f_14958(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14964)
+static void C_fcall f_14964(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14555)
+static void C_ccall f_14555(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14899)
+static void C_ccall f_14899(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14885)
+static void C_fcall f_14885(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14892)
+static void C_ccall f_14892(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14873)
+static void C_fcall f_14873(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14558)
+static void C_ccall f_14558(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14753)
+static void C_ccall f_14753(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14834)
+static void C_ccall f_14834(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14759)
+static void C_ccall f_14759(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14824)
+static void C_ccall f_14824(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14816)
+static void C_ccall f_14816(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14812)
+static void C_ccall f_14812(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14808)
+static void C_ccall f_14808(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14762)
+static void C_fcall f_14762(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14765)
+static void C_ccall f_14765(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14561)
+static void C_ccall f_14561(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14567)
+static void C_fcall f_14567(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14593)
+static void C_fcall f_14593(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14619)
+static void C_fcall f_14619(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14625)
+static void C_ccall f_14625(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14519)
+static void C_ccall f_14519(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14484)
+static void C_fcall f_14484(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_14494)
+static void C_ccall f_14494(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14502)
+static void C_ccall f_14502(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14470)
+static void C_fcall f_14470(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_14478)
+static void C_ccall f_14478(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14464)
+static void C_fcall f_14464(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_14286)
-static void C_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;
+static void C_fcall f_14286(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_14299)
+static void C_fcall f_14299(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14415)
+static void C_ccall f_14415(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14425)
+static void C_ccall f_14425(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14311)
+static void C_fcall f_14311(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14392)
+static void C_ccall f_14392(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14399)
+static void C_ccall f_14399(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14356)
+static void C_fcall f_14356(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14359)
+static void C_ccall f_14359(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14365)
+static void C_ccall f_14365(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14314)
+static void C_ccall f_14314(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14317)
+static void C_ccall f_14317(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14252)
+static void C_fcall f_14252(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_14258)
+static void C_fcall f_14258(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14273)
+static void C_ccall f_14273(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14266)
+static void C_fcall f_14266(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13653)
+static void C_fcall f_13653(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_13690)
+static void C_fcall f_13690(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14208)
+static void C_ccall f_14208(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14202)
+static void C_ccall f_14202(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14166)
+static void C_ccall f_14166(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14169)
+static void C_ccall f_14169(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14104)
+static void C_ccall f_14104(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14158)
+static void C_ccall f_14158(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_14107)
-static void C_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;
+static void C_ccall f_14107(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14130)
+static void C_ccall f_14130(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14110)
+static void C_ccall f_14110(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14113)
+static void C_ccall f_14113(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14116)
+static void C_ccall f_14116(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13971)
+static void C_ccall f_13971(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_14083)
+static void C_ccall f_14083(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13978)
+static void C_ccall f_13978(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_14051)
-static void C_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;
+static void C_fcall f_14051(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14069)
+static void C_ccall f_14069(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14059)
+static void C_fcall f_14059(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14063)
+static void C_ccall f_14063(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13981)
+static void C_ccall f_13981(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13984)
+static void C_ccall f_13984(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14043)
+static void C_ccall f_14043(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13987)
+static void C_ccall f_13987(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13990)
+static void C_fcall f_13990(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13993)
+static void C_fcall f_13993(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14025)
+static void C_ccall f_14025(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13996)
+static void C_ccall f_13996(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13905)
+static void C_ccall f_13905(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_13924)
+static void C_fcall f_13924(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13939)
+static void C_ccall f_13939(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13932)
+static void C_fcall f_13932(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13909)
+static void C_ccall f_13909(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13922)
+static void C_ccall f_13922(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13913)
+static void C_ccall f_13913(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13838)
+static void C_ccall f_13838(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13843)
+static void C_fcall f_13843(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_13870)
+static void C_ccall f_13870(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13873)
+static void C_ccall f_13873(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13876)
+static void C_ccall f_13876(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13861)
+static void C_ccall f_13861(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13781)
+static void C_ccall f_13781(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13784)
+static void C_ccall f_13784(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13745)
+static void C_ccall f_13745(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13702)
+static void C_ccall f_13702(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13733)
+static void C_ccall f_13733(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13631)
+static void C_ccall f_13631(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13622)
+static void C_ccall f_13622(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13613)
+static void C_ccall f_13613(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13604)
+static void C_ccall f_13604(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13595)
+static void C_ccall f_13595(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13589)
+static void C_ccall f_13589(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13583)
+static void C_ccall f_13583(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
+C_noret_decl(f_12724)
+static void C_ccall f_12724(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13545)
+static void C_ccall f_13545(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13453)
+static void C_fcall f_13453(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_13459)
+static void C_fcall f_13459(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_13479)
+static void C_ccall f_13479(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13497)
+static void C_ccall f_13497(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13506)
+static void C_ccall f_13506(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13539)
+static void C_ccall f_13539(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13527)
+static void C_ccall f_13527(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13473)
+static void C_ccall f_13473(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13432)
+static void C_fcall f_13432(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_13438)
+static void C_ccall f_13438(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13256)
+static void C_fcall f_13256(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_13260)
+static void C_ccall f_13260(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13263)
+static void C_ccall f_13263(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13342)
+static void C_ccall f_13342(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13333)
+static void C_ccall f_13333(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13329)
+static void C_ccall f_13329(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13294)
+static void C_ccall f_13294(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13300)
+static void C_ccall f_13300(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13317)
+static void C_ccall f_13317(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13313)
+static void C_ccall f_13313(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13292)
+static void C_ccall f_13292(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12784)
+static void C_fcall f_12784(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12826)
+static void C_fcall f_12826(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13167)
+static void C_fcall f_13167(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13352)
+static void C_ccall f_13352(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13355)
+static void C_ccall f_13355(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13426)
+static void C_ccall f_13426(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13417)
+static void C_ccall f_13417(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13413)
+static void C_ccall f_13413(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13401)
+static void C_ccall f_13401(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13122)
+static void C_ccall f_13122(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13158)
+static void C_ccall f_13158(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13053)
+static void C_ccall f_13053(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13062)
+static void C_ccall f_13062(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13096)
+static void C_ccall f_13096(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13092)
+static void C_ccall f_13092(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13040)
+static void C_ccall f_13040(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12963)
+static void C_fcall f_12963(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12986)
+static void C_ccall f_12986(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13007)
+static void C_ccall f_13007(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12838)
+static void C_ccall f_12838(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12841)
+static void C_ccall f_12841(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12948)
+static void C_ccall f_12948(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12939)
+static void C_ccall f_12939(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12935)
+static void C_ccall f_12935(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12894)
+static void C_ccall f_12894(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12911)
+static void C_ccall f_12911(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12915)
+static void C_ccall f_12915(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12888)
+static void C_ccall f_12888(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_12842)
-static void C_ccall f_12842(C_word c,C_word t0,C_word t1) C_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;
+static void C_ccall f_12842(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12859)
+static void C_ccall f_12859(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12727)
+static void C_fcall f_12727(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_12731)
+static void C_ccall f_12731(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12761)
+static void C_ccall f_12761(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_12778)
static void C_ccall f_12778(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_12755)
+static void C_ccall f_12755(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12634)
+static void C_ccall f_12634(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12666)
+static void C_fcall f_12666(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12685)
+static void C_ccall f_12685(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12708)
+static void C_ccall f_12708(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12691)
+static void C_ccall f_12691(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12637)
+static void C_fcall f_12637(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12643)
+static void C_fcall f_12643(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12653)
+static void C_ccall f_12653(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12495)
+static void C_ccall f_12495(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_12499)
-static void C_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;
+static void C_fcall f_12499(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12505)
+static void C_ccall f_12505(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12508)
+static void C_ccall f_12508(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12558)
+static void C_fcall f_12558(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12587)
+static void C_ccall f_12587(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12511)
+static void C_ccall f_12511(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12521)
+static void C_ccall f_12521(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12523)
+static void C_fcall f_12523(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12552)
+static void C_ccall f_12552(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12514)
+static void C_ccall f_12514(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12396)
+static void C_ccall f_12396(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12406)
+static void C_ccall f_12406(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12456)
+static void C_fcall f_12456(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12485)
+static void C_ccall f_12485(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12409)
+static void C_ccall f_12409(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12419)
+static void C_ccall f_12419(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12421)
+static void C_fcall f_12421(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12450)
+static void C_ccall f_12450(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12412)
+static void C_ccall f_12412(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12359)
+static void C_ccall f_12359(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12385)
+static void C_ccall f_12385(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12366)
+static void C_ccall f_12366(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12108)
+static void C_ccall f_12108(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8) C_noret;
+C_noret_decl(f_12112)
+static void C_ccall f_12112(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12115)
+static void C_ccall f_12115(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12353)
+static void C_ccall f_12353(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12118)
+static void C_ccall f_12118(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12121)
+static void C_ccall f_12121(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12124)
+static void C_ccall f_12124(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12127)
+static void C_ccall f_12127(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12347)
+static void C_ccall f_12347(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12130)
+static void C_ccall f_12130(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12140)
+static void C_fcall f_12140(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12259)
+static void C_fcall f_12259(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12298)
+static void C_ccall f_12298(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12301)
+static void C_ccall f_12301(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12272)
+static void C_fcall f_12272(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12143)
+static void C_ccall f_12143(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12183)
+static void C_ccall f_12183(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12186)
+static void C_ccall f_12186(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12213)
+static void C_ccall f_12213(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_12209)
static void C_ccall f_12209(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_12205)
+static void C_ccall f_12205(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12176)
+static void C_ccall f_12176(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_12166)
-static void C_ccall f_12166(C_word c,C_word t0,C_word t1,C_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;
+static void C_ccall f_12166(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12154)
+static void C_ccall f_12154(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12099)
+static void C_ccall f_12099(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12090)
+static void C_ccall f_12090(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12081)
+static void C_ccall f_12081(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12072)
+static void C_ccall f_12072(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12063)
+static void C_ccall f_12063(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12054)
+static void C_ccall f_12054(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12045)
+static void C_ccall f_12045(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12036)
+static void C_ccall f_12036(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12030)
+static void C_ccall f_12030(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12024)
+static void C_ccall f_12024(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9) C_noret;
+C_noret_decl(f_10414)
+static void C_ccall f_10414(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10481)
+static void C_fcall f_10481(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10485)
-static void C_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;
+static void C_ccall f_10485(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10488)
+static void C_ccall f_10488(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11926)
+static void C_fcall f_11926(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11941)
+static void C_fcall f_11941(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11944)
+static void C_ccall f_11944(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11985)
+static void C_ccall f_11985(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11903)
+static void C_ccall f_11903(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11868)
+static void C_ccall f_11868(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11874)
+static void C_ccall f_11874(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11840)
+static void C_ccall f_11840(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11805)
+static void C_ccall f_11805(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11811)
+static void C_ccall f_11811(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11779)
+static void C_ccall f_11779(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11744)
+static void C_ccall f_11744(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_11750)
static void C_ccall f_11750(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_11616)
+static void C_ccall f_11616(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11618)
+static void C_fcall f_11618(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11669)
+static void C_fcall f_11669(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11663)
+static void C_ccall f_11663(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11659)
+static void C_ccall f_11659(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11716)
+static void C_ccall f_11716(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11612)
+static void C_ccall f_11612(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_11608)
static void C_ccall f_11608(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_11591)
+static void C_ccall f_11591(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11595)
+static void C_ccall f_11595(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11563)
+static void C_ccall f_11563(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11546)
+static void C_ccall f_11546(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11511)
+static void C_ccall f_11511(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11517)
+static void C_ccall f_11517(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11449)
+static void C_ccall f_11449(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11454)
+static void C_fcall f_11454(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11464)
+static void C_ccall f_11464(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11402)
+static void C_ccall f_11402(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11414)
+static void C_fcall f_11414(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11424)
+static void C_ccall f_11424(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11135)
+static void C_ccall f_11135(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11138)
+static void C_ccall f_11138(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11355)
+static void C_ccall f_11355(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11358)
+static void C_ccall f_11358(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11344)
+static void C_ccall f_11344(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11309)
+static void C_ccall f_11309(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11315)
+static void C_ccall f_11315(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11274)
+static void C_ccall f_11274(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11278)
+static void C_ccall f_11278(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11282)
+static void C_ccall f_11282(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11249)
+static void C_ccall f_11249(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11214)
+static void C_ccall f_11214(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11220)
+static void C_ccall f_11220(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11188)
+static void C_ccall f_11188(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11184)
+static void C_ccall f_11184(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11159)
+static void C_ccall f_11159(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11155)
+static void C_ccall f_11155(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_11122)
static void C_ccall f_11122(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_11087)
+static void C_ccall f_11087(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11093)
+static void C_ccall f_11093(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11048)
+static void C_ccall f_11048(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_11052)
static void C_ccall f_11052(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_10957)
+static void C_ccall f_10957(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10998)
+static void C_ccall f_10998(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11004)
+static void C_ccall f_11004(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10960)
+static void C_ccall f_10960(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10965)
+static void C_ccall f_10965(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10971)
+static void C_ccall f_10971(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10948)
+static void C_ccall f_10948(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10913)
+static void C_ccall f_10913(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10919)
+static void C_ccall f_10919(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10871)
+static void C_ccall f_10871(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10911)
+static void C_ccall f_10911(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10876)
+static void C_ccall f_10876(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10882)
+static void C_ccall f_10882(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10851)
+static void C_ccall f_10851(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10816)
+static void C_ccall f_10816(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10822)
+static void C_ccall f_10822(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10801)
static void C_ccall f_10801(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10797)
+static void C_ccall f_10797(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10713)
+static void C_ccall f_10713(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10717)
static void C_ccall f_10717(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_10721)
-static void C_ccall f_10721(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10688)
+static void C_ccall f_10688(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10692)
static void C_ccall f_10692(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10696)
static void C_ccall f_10696(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_10659)
+static void C_ccall f_10659(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10634)
static void C_ccall f_10634(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_10630)
+static void C_ccall f_10630(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10582)
+static void C_ccall f_10582(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10585)
+static void C_ccall f_10585(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10609)
+static void C_ccall f_10609(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10588)
+static void C_ccall f_10588(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10595)
-static void C_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;
+static void C_fcall f_10595(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10591)
+static void C_ccall f_10591(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10497)
+static void C_ccall f_10497(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10500)
+static void C_ccall f_10500(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10568)
+static void C_ccall f_10568(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10562)
+static void C_ccall f_10562(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10509)
+static void C_ccall f_10509(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10518)
+static void C_fcall f_10518(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10553)
+static void C_ccall f_10553(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10556)
+static void C_ccall f_10556(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10512)
+static void C_ccall f_10512(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10516)
static void C_ccall f_10516(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_10491)
+static void C_ccall f_10491(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10471)
+static void C_fcall f_10471(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10465)
+static void C_fcall f_10465(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10417)
+static void C_fcall f_10417(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10440)
+static void C_ccall f_10440(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5248)
+static void C_ccall f_5248(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10409)
+static void C_ccall f_10409(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10371)
+static void C_ccall f_10371(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10374)
+static void C_ccall f_10374(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10393)
static void C_ccall f_10393(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10403)
+static void C_ccall f_10403(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10389)
static void C_ccall f_10389(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_10385)
+static void C_ccall f_10385(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10324)
+static void C_fcall f_10324(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10330)
+static void C_fcall f_10330(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10364)
+static void C_ccall f_10364(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10357)
+static void C_fcall f_10357(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5724)
+static void C_fcall f_5724(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_10252)
+static void C_ccall f_10252(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10264)
+static void C_ccall f_10264(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10267)
+static void C_ccall f_10267(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10294)
+static void C_ccall f_10294(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10255)
+static void C_ccall f_10255(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10258)
+static void C_ccall f_10258(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5787)
+static void C_ccall f_5787(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5790)
+static void C_ccall f_5790(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10222)
+static void C_ccall f_10222(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10225)
+static void C_ccall f_10225(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10228)
+static void C_ccall f_10228(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10231)
+static void C_ccall f_10231(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10234)
+static void C_ccall f_10234(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5793)
+static void C_ccall f_5793(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5797)
+static void C_ccall f_5797(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5800)
+static void C_ccall f_5800(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5806)
+static void C_ccall f_5806(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5818)
+static void C_ccall f_5818(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5840)
static void C_ccall f_5840(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_5907)
+static void C_fcall f_5907(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6008)
+static void C_fcall f_6008(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9983)
+static void C_ccall f_9983(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10116)
+static void C_ccall f_10116(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10077)
+static void C_ccall f_10077(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10045)
+static void C_fcall f_10045(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9999)
+static void C_fcall f_9999(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9943)
+static void C_fcall f_9943(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9947)
+static void C_ccall f_9947(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9953)
+static void C_ccall f_9953(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9967)
+static void C_ccall f_9967(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9956)
+static void C_ccall f_9956(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9632)
+static void C_ccall f_9632(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9923)
+static void C_ccall f_9923(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9651)
+static void C_ccall f_9651(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9654)
+static void C_ccall f_9654(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9665)
+static void C_ccall f_9665(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9838)
+static void C_fcall f_9838(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9882)
+static void C_ccall f_9882(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9878)
+static void C_ccall f_9878(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9874)
+static void C_ccall f_9874(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9862)
+static void C_ccall f_9862(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9697)
+static void C_ccall f_9697(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9829)
+static void C_ccall f_9829(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9793)
+static void C_ccall f_9793(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9747)
+static void C_ccall f_9747(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9721)
+static void C_ccall f_9721(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9717)
+static void C_ccall f_9717(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9705)
+static void C_ccall f_9705(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9673)
+static void C_ccall f_9673(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9661)
+static void C_ccall f_9661(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9622)
+static void C_ccall f_9622(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9573)
+static void C_fcall f_9573(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9607)
+static void C_ccall f_9607(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9600)
+static void C_fcall f_9600(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9567)
+static void C_ccall f_9567(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9563)
+static void C_ccall f_9563(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9488)
+static void C_ccall f_9488(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9506)
+static void C_ccall f_9506(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9536)
+static void C_ccall f_9536(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_9536)
+static void C_ccall f_9536r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_9542)
+static void C_ccall f_9542(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9512)
+static void C_ccall f_9512(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9519)
+static void C_ccall f_9519(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9494)
+static void C_ccall f_9494(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9500)
+static void C_ccall f_9500(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9357)
+static void C_ccall f_9357(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9360)
+static void C_ccall f_9360(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9371)
+static void C_ccall f_9371(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9381)
+static void C_ccall f_9381(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9384)
+static void C_ccall f_9384(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9387)
+static void C_ccall f_9387(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9392)
+static void C_ccall f_9392(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9417)
+static void C_ccall f_9417(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9422)
+static void C_ccall f_9422(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9447)
+static void C_ccall f_9447(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9374)
+static void C_ccall f_9374(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9342)
+static void C_ccall f_9342(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9338)
+static void C_ccall f_9338(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9333)
+static void C_ccall f_9333(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9177)
+static void C_ccall f_9177(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9180)
+static void C_ccall f_9180(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9183)
+static void C_ccall f_9183(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9189)
+static void C_ccall f_9189(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9300)
+static void C_ccall f_9300(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9261)
+static void C_ccall f_9261(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9228)
+static void C_fcall f_9228(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9236)
+static void C_ccall f_9236(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9224)
+static void C_ccall f_9224(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9204)
+static void C_ccall f_9204(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9121)
+static void C_ccall f_9121(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9130)
+static void C_ccall f_9130(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9165)
+static void C_ccall f_9165(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9161)
+static void C_ccall f_9161(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9133)
+static void C_fcall f_9133(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9153)
+static void C_ccall f_9153(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9145)
+static void C_ccall f_9145(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8957)
+static void C_ccall f_8957(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9105)
+static void C_ccall f_9105(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8969)
+static void C_ccall f_8969(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8972)
+static void C_ccall f_8972(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8975)
+static void C_ccall f_8975(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8980)
+static void C_ccall f_8980(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9005)
+static void C_ccall f_9005(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9010)
+static void C_ccall f_9010(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9035)
+static void C_ccall f_9035(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9038)
+static void C_ccall f_9038(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9041)
+static void C_ccall f_9041(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9072)
+static void C_fcall f_9072(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8900)
+static void C_ccall f_8900(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8903)
+static void C_ccall f_8903(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8906)
+static void C_ccall f_8906(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8918)
+static void C_ccall f_8918(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8891)
+static void C_ccall f_8891(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8878)
+static void C_ccall f_8878(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8865)
+static void C_ccall f_8865(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8852)
+static void C_ccall f_8852(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8839)
+static void C_ccall f_8839(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8772)
+static void C_ccall f_8772(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8791)
+static void C_fcall f_8791(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8818)
+static void C_ccall f_8818(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8822)
+static void C_ccall f_8822(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8811)
+static void C_ccall f_8811(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8785)
+static void C_ccall f_8785(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8756)
+static void C_ccall f_8756(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8741)
+static void C_ccall f_8741(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8710)
+static void C_ccall f_8710(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8718)
+static void C_ccall f_8718(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8681)
+static void C_ccall f_8681(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8648)
+static void C_ccall f_8648(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8634)
+static void C_ccall f_8634(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8642)
+static void C_ccall f_8642(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8638)
+static void C_ccall f_8638(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8601)
+static void C_ccall f_8601(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8609)
+static void C_ccall f_8609(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8605)
+static void C_ccall f_8605(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8268)
+static void C_ccall f_8268(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8274)
+static void C_ccall f_8274(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8277)
+static void C_ccall f_8277(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8283)
+static void C_ccall f_8283(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8509)
+static void C_ccall f_8509(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8512)
+static void C_ccall f_8512(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8520)
+static void C_ccall f_8520(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8545)
+static void C_ccall f_8545(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8550)
+static void C_ccall f_8550(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8438)
+static void C_ccall f_8438(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8477)
+static void C_ccall f_8477(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8493)
+static void C_ccall f_8493(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8496)
+static void C_ccall f_8496(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8499)
+static void C_ccall f_8499(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8490)
+static void C_ccall f_8490(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8480)
+static void C_ccall f_8480(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8441)
+static void C_ccall f_8441(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8471)
+static void C_ccall f_8471(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8444)
+static void C_ccall f_8444(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8447)
+static void C_ccall f_8447(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8462)
+static void C_ccall f_8462(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8366)
+static void C_fcall f_8366(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8373)
+static void C_ccall f_8373(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8432)
+static void C_ccall f_8432(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8420)
+static void C_ccall f_8420(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8290)
+static void C_fcall f_8290(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8297)
+static void C_ccall f_8297(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8356)
+static void C_ccall f_8356(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8336)
+static void C_ccall f_8336(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8223)
+static void C_fcall f_8223(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8252)
+static void C_ccall f_8252(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8140)
+static void C_ccall f_8140(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8174)
+static void C_fcall f_8174(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8207)
+static void C_ccall f_8207(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8187)
+static void C_fcall f_8187(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8172)
+static void C_ccall f_8172(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8143)
+static void C_ccall f_8143(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8164)
+static void C_ccall f_8164(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8168)
+static void C_ccall f_8168(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8146)
+static void C_ccall f_8146(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8149)
+static void C_ccall f_8149(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8121)
+static void C_ccall f_8121(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7596)
+static void C_ccall f_7596(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8004)
+static void C_ccall f_8004(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8006)
+static void C_fcall f_8006(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8084)
+static void C_ccall f_8084(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8033)
+static void C_fcall f_8033(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8057)
+static C_word C_fcall f_8057(C_word t0);
+C_noret_decl(f_8046)
+static void C_fcall f_8046(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7602)
+static void C_ccall f_7602(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7994)
+static void C_ccall f_7994(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7605)
+static void C_ccall f_7605(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7879)
+static void C_ccall f_7879(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7922)
+static void C_ccall f_7922(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7943)
+static void C_ccall f_7943(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7949)
+static void C_fcall f_7949(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7987)
+static void C_ccall f_7987(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7976)
+static void C_fcall f_7976(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7984)
+static void C_ccall f_7984(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7941)
+static void C_ccall f_7941(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7923)
static void C_ccall f_7923(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7927)
+static void C_ccall f_7927(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7930)
+static void C_ccall f_7930(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7934)
+static void C_ccall f_7934(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7937)
+static void C_ccall f_7937(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7918)
+static void C_ccall f_7918(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7883)
+static void C_ccall f_7883(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7889)
+static void C_fcall f_7889(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7910)
+static void C_ccall f_7910(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7914)
+static void C_ccall f_7914(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7899)
+static void C_ccall f_7899(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7886)
+static void C_ccall f_7886(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7610)
+static void C_ccall f_7610(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7614)
+static void C_ccall f_7614(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7642)
static void C_ccall f_7642(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7652)
+static void C_fcall f_7652(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7873)
+static void C_ccall f_7873(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7869)
+static void C_ccall f_7869(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7816)
+static void C_ccall f_7816(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7819)
+static void C_ccall f_7819(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7763)
+static void C_ccall f_7763(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7786)
+static void C_ccall f_7786(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7778)
+static void C_ccall f_7778(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7709)
+static void C_ccall f_7709(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7734)
+static void C_ccall f_7734(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7750)
+static void C_ccall f_7750(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_7750)
+static void C_ccall f_7750r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_7756)
+static void C_ccall f_7756(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7740)
+static void C_ccall f_7740(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7748)
+static void C_ccall f_7748(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7715)
+static void C_ccall f_7715(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7721)
+static void C_ccall f_7721(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7732)
+static void C_ccall f_7732(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7725)
static void C_ccall f_7725(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7662)
+static void C_ccall f_7662(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7665)
+static void C_ccall f_7665(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7693)
+static void C_ccall f_7693(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7704)
-static void C_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;
+static void C_ccall f_7704(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7697)
+static void C_ccall f_7697(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7672)
+static void C_fcall f_7672(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_5719)
static void C_ccall f_5719(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(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_5636)
+static void C_ccall f_5636(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5712)
+static void C_ccall f_5712(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5639)
+static void C_ccall f_5639(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5705)
+static void C_ccall f_5705(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5642)
+static void C_ccall f_5642(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5657)
+static void C_ccall f_5657(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5662)
+static void C_ccall f_5662(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5699)
+static void C_ccall f_5699(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5666)
+static void C_ccall f_5666(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5674)
+static void C_fcall f_5674(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5684)
+static void C_ccall f_5684(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5669)
+static void C_ccall f_5669(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f20080)
+static void C_ccall f20080(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7676)
+static void C_ccall f_7676(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7683)
+static void C_ccall f_7683(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7615)
static void C_ccall f_7615(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7619)
+static void C_ccall f_7619(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7622)
+static void C_ccall f_7622(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7626)
+static void C_ccall f_7626(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7629)
+static void C_ccall f_7629(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7633)
+static void C_ccall f_7633(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7636)
+static void C_ccall f_7636(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7509)
+static void C_fcall f_7509(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7583)
+static void C_ccall f_7583(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7536)
+static void C_fcall f_7536(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7540)
+static void C_ccall f_7540(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7543)
+static void C_ccall f_7543(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7568)
+static void C_ccall f_7568(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7564)
+static void C_ccall f_7564(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7550)
+static void C_fcall f_7550(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7554)
+static void C_ccall f_7554(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7402)
+static void C_ccall f_7402(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7463)
+static void C_ccall f_7463(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7469)
+static void C_fcall f_7469(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7492)
+static void C_ccall f_7492(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7449)
static void C_ccall f_7449(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7457)
+static void C_ccall f_7457(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7407)
+static void C_ccall f_7407(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7413)
+static void C_fcall f_7413(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7436)
+static void C_ccall f_7436(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7295)
+static void C_ccall f_7295(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7393)
+static void C_ccall f_7393(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7389)
+static void C_ccall f_7389(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7298)
+static void C_fcall f_7298(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7385)
+static void C_ccall f_7385(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7377)
+static void C_ccall f_7377(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7381)
+static void C_ccall f_7381(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7301)
+static void C_ccall f_7301(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7331)
+static void C_fcall f_7331(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7150)
+static void C_ccall f_7150(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7153)
+static void C_ccall f_7153(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7237)
+static void C_ccall f_7237(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7241)
+static void C_ccall f_7241(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7156)
+static void C_fcall f_7156(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7159)
+static void C_ccall f_7159(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7223)
+static void C_ccall f_7223(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7162)
+static void C_ccall f_7162(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7211)
static void C_ccall f_7211(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7219)
+static void C_ccall f_7219(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7215)
+static void C_ccall f_7215(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7165)
+static void C_ccall f_7165(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7029)
+static void C_ccall f_7029(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7087)
+static void C_fcall f_7087(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7137)
+static void C_ccall f_7137(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7114)
+static void C_fcall f_7114(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7130)
+static void C_ccall f_7130(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7126)
+static void C_ccall f_7126(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7032)
+static void C_ccall f_7032(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7035)
+static void C_ccall f_7035(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7051)
-static void C_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;
+static void C_fcall f_7051(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7059)
+static C_word C_fcall f_7059(C_word t0,C_word t1);
+C_noret_decl(f_7038)
+static void C_ccall f_7038(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7045)
+static void C_ccall f_7045(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6942)
+static void C_ccall f_6942(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6966)
+static void C_fcall f_6966(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7016)
+static void C_ccall f_7016(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6993)
+static void C_fcall f_6993(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7009)
+static void C_ccall f_7009(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7005)
+static void C_ccall f_7005(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6960)
+static void C_ccall f_6960(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6945)
+static void C_ccall f_6945(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6952)
+static void C_ccall f_6952(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6613)
+static void C_ccall f_6613(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6919)
+static void C_ccall f_6919(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6930)
+static void C_ccall f_6930(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6924)
+static void C_ccall f_6924(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6622)
+static void C_ccall f_6622(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6627)
+static void C_ccall f_6627(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6883)
+static void C_fcall f_6883(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6912)
+static void C_ccall f_6912(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6631)
+static void C_ccall f_6631(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6834)
+static void C_fcall f_6834(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6867)
+static void C_ccall f_6867(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6847)
+static void C_fcall f_6847(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6832)
+static void C_ccall f_6832(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6634)
+static void C_ccall f_6634(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6637)
+static void C_ccall f_6637(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6828)
+static void C_ccall f_6828(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6640)
+static void C_ccall f_6640(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6824)
+static void C_ccall f_6824(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6643)
+static void C_ccall f_6643(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6649)
+static void C_ccall f_6649(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6799)
+static void C_ccall f_6799(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6772)
+static void C_fcall f_6772(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6664)
+static void C_ccall f_6664(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6751)
+static void C_ccall f_6751(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_6695)
-static void C_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;
+static void C_fcall f_6695(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6729)
+static void C_ccall f_6729(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6673)
+static void C_fcall f_6673(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6456)
+static void C_ccall f_6456(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6559)
+static void C_fcall f_6559(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6477)
+static void C_ccall f_6477(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6503)
+static void C_fcall f_6503(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6485)
+static void C_ccall f_6485(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6501)
+static void C_ccall f_6501(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6481)
+static void C_ccall f_6481(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6244)
+static void C_ccall f_6244(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6250)
+static void C_ccall f_6250(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6411)
+static void C_fcall f_6411(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6440)
+static void C_ccall f_6440(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6253)
+static void C_ccall f_6253(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6362)
+static void C_fcall f_6362(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6395)
+static void C_ccall f_6395(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6375)
+static void C_fcall f_6375(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6360)
+static void C_ccall f_6360(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6256)
+static void C_ccall f_6256(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6259)
+static void C_ccall f_6259(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6292)
+static void C_fcall f_6292(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6342)
+static void C_ccall f_6342(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_6305)
-static void C_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;
+static void C_fcall f_6305(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6323)
+static void C_fcall f_6323(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6331)
+static void C_ccall f_6331(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6270)
+static void C_ccall f_6270(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6282)
+static void C_ccall f_6282(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6286)
+static void C_ccall f_6286(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_6278)
static void C_ccall f_6278(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_6157)
+static void C_ccall f_6157(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6159)
+static void C_fcall f_6159(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6180)
+static void C_ccall f_6180(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6218)
+static void C_ccall f_6218(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6228)
+static void C_ccall f_6228(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6206)
+static void C_ccall f_6206(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6184)
+static void C_ccall f_6184(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6199)
+static void C_ccall f_6199(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6174)
+static void C_ccall f_6174(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6153)
+static void C_ccall f_6153(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6104)
+static void C_fcall f_6104(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_6133)
static void C_ccall f_6133(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_6083)
+static void C_ccall f_6083(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6086)
+static void C_ccall f_6086(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6097)
+static void C_ccall f_6097(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_6091)
-static void C_ccall f_6091(C_word c,C_word t0,C_word t1) C_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;
+static void C_ccall f_6091(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6089)
+static void C_ccall f_6089(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6058)
+static void C_ccall f_6058(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6066)
+static void C_ccall f_6066(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6029)
+static void C_ccall f_6029(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6041)
+static void C_ccall f_6041(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6037)
+static void C_ccall f_6037(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5950)
+static void C_ccall f_5950(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5962)
+static void C_ccall f_5962(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5966)
+static void C_ccall f_5966(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5971)
static void C_ccall f_5971(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_5899)
-static void C_ccall f_5899(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5996)
+static void C_ccall f_5996(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5999)
+static void C_ccall f_5999(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5910)
static void C_ccall f_5910(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_5921)
+static void C_ccall f_5921(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5849)
+static void C_ccall f_5849(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5860)
+static void C_ccall f_5860(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5868)
+static void C_ccall f_5868(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5876)
+static void C_ccall f_5876(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5822)
+static void C_fcall f_5822(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5768)
+static void C_ccall f_5768(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5740)
+static void C_ccall f_5740(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5734)
+static void C_ccall f_5734(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5594)
-static void C_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;
+static void C_fcall f_5594(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5598)
+static void C_ccall f_5598(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5619)
+static void C_ccall f_5619(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5630)
+static void C_ccall f_5630(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5623)
+static void C_ccall f_5623(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5599)
+static void C_ccall f_5599(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5603)
+static void C_ccall f_5603(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5606)
+static void C_ccall f_5606(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5610)
+static void C_ccall f_5610(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5613)
+static void C_ccall f_5613(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5424)
+static void C_fcall f_5424(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
C_noret_decl(f_5428)
-static void C_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;
+static void C_ccall f_5428(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5440)
+static void C_ccall f_5440(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5458)
+static void C_ccall f_5458(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5566)
+static void C_ccall f_5566(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5523)
+static void C_fcall f_5523(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5530)
+static void C_ccall f_5530(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5544)
+static void C_ccall f_5544(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5540)
+static void C_ccall f_5540(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5476)
+static void C_fcall f_5476(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5483)
+static void C_ccall f_5483(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5497)
+static void C_ccall f_5497(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5493)
+static void C_ccall f_5493(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5462)
+static void C_fcall f_5462(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5444)
+static void C_fcall f_5444(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5378)
+static void C_fcall f_5378(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5410)
+static void C_ccall f_5410(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5318)
+static void C_fcall f_5318(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5324)
+static void C_fcall f_5324(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5339)
+static void C_ccall f_5339(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5305)
+static void C_fcall f_5305(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5309)
+static void C_ccall f_5309(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5316)
+static void C_ccall f_5316(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5312)
+static void C_ccall f_5312(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5290)
+static void C_fcall f_5290(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5294)
+static void C_ccall f_5294(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5300)
+static void C_ccall f_5300(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5251)
-static void C_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){
+static void C_fcall f_5251(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5288)
+static void C_ccall f_5288(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5284)
+static void C_ccall f_5284(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5264)
+static void C_fcall f_5264(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5187)
+static void C_ccall f_5187(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5246)
+static void C_ccall f_5246(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5191)
+static void C_ccall f_5191(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5239)
+static void C_ccall f_5239(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5194)
+static void C_ccall f_5194(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5232)
+static void C_ccall f_5232(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5197)
+static void C_ccall f_5197(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5201)
+static void C_ccall f_5201(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5205)
+static void C_ccall f_5205(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5225)
+static void C_ccall f_5225(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5208)
+static void C_ccall f_5208(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5218)
+static void C_ccall f_5218(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5093)
+static void C_ccall f_5093(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_5093)
+static void C_ccall f_5093r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+
+C_noret_decl(trf_18924)
+static void C_fcall trf_18924(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18924(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_19096(t0,t1);}
+f_18924(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_noret_decl(trf_18892)
+static void C_fcall trf_18892(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18892(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_19064(t0,t1,t2);}
+f_18892(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_noret_decl(trf_18878)
+static void C_fcall trf_18878(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18878(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_19050(t0,t1,t2);}
+f_18878(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_noret_decl(trf_18798)
+static void C_fcall trf_18798(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18798(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_18970(t0,t1,t2);}
+f_18798(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_noret_decl(trf_18752)
+static void C_fcall trf_18752(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18752(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -2296,29 +2292,29 @@ 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);}
+f_18752(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_noret_decl(trf_18758)
+static void C_fcall trf_18758(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18758(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_18930(t0,t1,t2);}
+f_18758(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_noret_decl(trf_18785)
+static void C_fcall trf_18785(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18785(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_18957(t0,t1,t2);}
+f_18785(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_noret_decl(trf_17629)
+static void C_fcall trf_17629(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17629(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -2326,641 +2322,633 @@ 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);}
+f_17629(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_noret_decl(trf_18658)
+static void C_fcall trf_18658(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18658(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_18830(t0,t1,t2,t3,t4);}
+f_18658(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_noret_decl(trf_18466)
+static void C_fcall trf_18466(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18466(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_18638(t0,t1);}
+f_18466(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_noret_decl(trf_18487)
+static void C_fcall trf_18487(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18487(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_18659(t0,t1);}
+f_18487(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_noret_decl(trf_18432)
+static void C_fcall trf_18432(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18432(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_18604(t0,t1);}
+f_18432(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_noret_decl(trf_18401)
+static void C_fcall trf_18401(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18401(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_18573(t0,t1);}
+f_18401(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_noret_decl(trf_18386)
+static void C_fcall trf_18386(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18386(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_18558(t0,t1);}
+f_18386(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_noret_decl(trf_18264)
+static void C_fcall trf_18264(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18264(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_18436(t0,t1);}
+f_18264(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_noret_decl(trf_18276)
+static void C_fcall trf_18276(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18276(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_18448(t0,t1);}
+f_18276(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_noret_decl(trf_18229)
+static void C_fcall trf_18229(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18229(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_18401(t0,t1,t2);}
+f_18229(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_noret_decl(trf_18014)
+static void C_fcall trf_18014(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18014(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_18221(t0,t1);}
+f_18014(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_noret_decl(trf_17888)
+static void C_fcall trf_17888(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17888(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_18097(t0,t1);}
+f_17888(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_noret_decl(trf_17556)
+static void C_fcall trf_17556(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17556(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_17765(t0,t1,t2,t3);}
+f_17556(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_noret_decl(trf_17563)
+static void C_fcall trf_17563(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17563(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_17772(t0,t1);}
+f_17563(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_noret_decl(trf_17566)
+static void C_fcall trf_17566(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17566(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_17775(t0,t1);}
+f_17566(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_noret_decl(trf_17505)
+static void C_fcall trf_17505(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17505(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_17714(t0,t1,t2,t3,t4);}
+f_17505(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_noret_decl(trf_17122)
+static void C_fcall trf_17122(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17122(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_17340(t0,t1,t2,t3);}
+f_17122(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_noret_decl(trf_17133)
+static void C_fcall trf_17133(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17133(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_17351(t0,t1,t2);}
+f_17133(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_noret_decl(trf_17076)
+static void C_fcall trf_17076(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17076(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_17294(t0,t1,t2,t3,t4);}
+f_17076(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_noret_decl(trf_17082)
+static void C_fcall trf_17082(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17082(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_17300(t0,t1,t2);}
+f_17082(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_noret_decl(trf_17109)
+static void C_fcall trf_17109(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17109(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_17327(t0,t1,t2);}
+f_17109(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_noret_decl(trf_16051)
+static void C_fcall trf_16051(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16051(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_16269(t0,t1,t2,t3,t4);}
+f_16051(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_noret_decl(trf_16085)
+static void C_fcall trf_16085(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16085(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_16303(t0,t1);}
+f_16085(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_noret_decl(trf_16124)
+static void C_fcall trf_16124(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16124(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_16342(t0,t1);}
+f_16124(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_noret_decl(trf_16757)
+static void C_fcall trf_16757(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16757(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_16975(t0,t1,t2);}
+f_16757(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_noret_decl(trf_16685)
+static void C_fcall trf_16685(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16685(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_16903(t0,t1,t2);}
+f_16685(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_noret_decl(trf_16636)
+static void C_fcall trf_16636(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16636(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_16854(t0,t1,t2,t3);}
+f_16636(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_noret_decl(trf_16649)
+static void C_fcall trf_16649(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16649(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_16867(t0,t1);}
+f_16649(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_noret_decl(trf_16286)
+static void C_fcall trf_16286(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16286(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_16504(t0,t1);}
+f_16286(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_noret_decl(trf_16543)
+static void C_fcall trf_16543(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16543(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_16761(t0,t1,t2);}
+f_16543(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_noret_decl(trf_16449)
+static void C_fcall trf_16449(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16449(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_16667(t0,t1,t2);}
+f_16449(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_noret_decl(trf_16407)
+static void C_fcall trf_16407(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16407(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_16625(t0,t1);}
+f_16407(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_noret_decl(trf_16357)
+static void C_fcall trf_16357(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16357(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_16575(t0,t1,t2);}
+f_16357(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_noret_decl(trf_16384)
+static void C_fcall trf_16384(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16384(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_16602(t0,t1,t2);}
+f_16384(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_noret_decl(trf_15616)
+static void C_fcall trf_15616(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15616(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_15834(t0,t1,t2,t3,t4);}
+f_15616(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_noret_decl(trf_15650)
+static void C_fcall trf_15650(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15650(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_15868(t0,t1);}
+f_15650(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_noret_decl(trf_15993)
+static void C_fcall trf_15993(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15993(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_16211(t0,t1,t2);}
+f_15993(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_noret_decl(trf_16001)
+static void C_fcall trf_16001(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16001(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_16219(t0,t1,t2);}
+f_16001(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_noret_decl(trf_17178)
+static void C_fcall trf_17178(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17178(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_17396(t0,t1,t2);}
+f_17178(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_noret_decl(trf_17231)
+static void C_fcall trf_17231(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17231(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_17449(t0,t1);}
+f_17231(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_noret_decl(trf_17262)
+static void C_fcall trf_17262(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17262(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_17480(t0,t1,t2);}
+f_17262(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_noret_decl(trf_15796)
+static void C_fcall trf_15796(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15796(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_16014(t0,t1);}
+f_15796(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_noret_decl(trf_15819)
+static void C_fcall trf_15819(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15819(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_16037(t0,t1);}
+f_15819(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_noret_decl(trf_15837)
+static void C_fcall trf_15837(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15837(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_16055(t0,t1);}
+f_15837(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_noret_decl(trf_15740)
+static void C_fcall trf_15740(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15740(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_15958(t0,t1,t2);}
+f_15740(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_noret_decl(trf_15748)
+static void C_fcall trf_15748(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15748(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_15966(t0,t1,t2);}
+f_15748(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_noret_decl(trf_15688)
+static void C_fcall trf_15688(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15688(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_15906(t0,t1,t2);}
+f_15688(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_noret_decl(trf_15696)
+static void C_fcall trf_15696(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15696(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_15914(t0,t1,t2);}
+f_15696(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_noret_decl(trf_15605)
+static void C_fcall trf_15605(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15605(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_15823(t0,t1,t2);}
+f_15605(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_noret_decl(trf_15595)
+static void C_fcall trf_15595(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15595(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_15813(t0,t1,t2,t3);}
+f_15595(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_noret_decl(trf_15589)
+static void C_fcall trf_15589(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15589(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_15807(t0,t1,t2,t3);}
+f_15589(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_noret_decl(trf_15451)
+static void C_fcall trf_15451(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15451(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_15659(t0,t1,t2);}
+f_15451(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_noret_decl(trf_15429)
+static void C_fcall trf_15429(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15429(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_15637(t0,t1);}
+f_15429(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_noret_decl(trf_15402)
+static void C_fcall trf_15402(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15402(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_15610(t0,t1);}
+f_15402(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_noret_decl(trf_15344)
+static void C_fcall trf_15344(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15344(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_15552(t0,t1);}
+f_15344(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_noret_decl(trf_15270)
+static void C_fcall trf_15270(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15270(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_15478(t0,t1,t2);}
+f_15270(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_noret_decl(trf_15121)
+static void C_fcall trf_15121(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15121(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_15329(t0,t1);}
+f_15121(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_noret_decl(trf_15062)
+static void C_fcall trf_15062(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15062(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_15270(t0,t1);}
+f_15062(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_noret_decl(trf_14931)
+static void C_fcall trf_14931(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14931(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_15139(t0,t1);}
+f_14931(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_noret_decl(trf_14997)
+static void C_fcall trf_14997(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14997(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_15205(t0,t1,t2);}
+f_14997(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_noret_decl(trf_15005)
+static void C_fcall trf_15005(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15005(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_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);}
+f_15005(t0,t1,t2);}
-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_noret_decl(trf_15012)
+static void C_fcall trf_15012(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15012(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_15172(t0,t1);}
+f_15012(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_noret_decl(trf_14964)
+static void C_fcall trf_14964(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14964(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_15093(t0,t1);}
+f_14964(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_noret_decl(trf_14885)
+static void C_fcall trf_14885(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14885(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_15081(t0,t1);}
+f_14885(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_noret_decl(trf_14873)
+static void C_fcall trf_14873(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14873(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_14970(t0,t1);}
+f_14873(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_noret_decl(trf_14762)
+static void C_fcall trf_14762(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14762(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_14775(t0,t1);}
+f_14762(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_noret_decl(trf_14567)
+static void C_fcall trf_14567(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14567(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_14801(t0,t1);}
+f_14567(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_noret_decl(trf_14593)
+static void C_fcall trf_14593(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14593(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_14827(t0,t1);}
+f_14593(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_noret_decl(trf_14619)
+static void C_fcall trf_14619(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14619(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_14756(t0,t1);}
+f_14619(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_noret_decl(trf_14484)
+static void C_fcall trf_14484(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14484(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_14666(t0,t1,t2,t3);}
+f_14484(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_noret_decl(trf_14470)
+static void C_fcall trf_14470(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14470(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_14652(t0,t1,t2,t3);}
+f_14470(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_noret_decl(trf_14464)
+static void C_fcall trf_14464(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14464(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_14646(t0,t1,t2,t3);}
+f_14464(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_noret_decl(trf_14286)
+static void C_fcall trf_14286(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14286(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -2968,35 +2956,35 @@ 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);}
+f_14286(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_noret_decl(trf_14299)
+static void C_fcall trf_14299(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14299(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_14481(t0,t1);}
+f_14299(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_noret_decl(trf_14311)
+static void C_fcall trf_14311(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14311(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_14493(t0,t1);}
+f_14311(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_noret_decl(trf_14356)
+static void C_fcall trf_14356(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14356(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_14538(t0,t1);}
+f_14356(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_noret_decl(trf_14252)
+static void C_fcall trf_14252(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14252(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -3004,29 +2992,29 @@ 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);}
+f_14252(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_noret_decl(trf_14258)
+static void C_fcall trf_14258(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14258(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_14440(t0,t1,t2);}
+f_14258(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_noret_decl(trf_14266)
+static void C_fcall trf_14266(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14266(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_14448(t0,t1,t2);}
+f_14266(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_noret_decl(trf_13653)
+static void C_fcall trf_13653(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13653(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -3034,119 +3022,101 @@ 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);}
+f_13653(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_noret_decl(trf_13690)
+static void C_fcall trf_13690(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13690(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_13777(t0,t1);}
+f_13690(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_noret_decl(trf_14051)
+static void C_fcall trf_14051(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14051(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_14233(t0,t1,t2);}
+f_14051(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_noret_decl(trf_14059)
+static void C_fcall trf_14059(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14059(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_14241(t0,t1,t2);}
+f_14059(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_noret_decl(trf_13990)
+static void C_fcall trf_13990(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13990(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_14165(t0,t1);}
+f_13990(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_noret_decl(trf_13993)
+static void C_fcall trf_13993(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13993(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_14168(t0,t1);}
+f_13993(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_noret_decl(trf_13924)
+static void C_fcall trf_13924(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13924(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_14099(t0,t1,t2);}
+f_13924(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_noret_decl(trf_13932)
+static void C_fcall trf_13932(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13932(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_14107(t0,t1,t2);}
+f_13932(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_noret_decl(trf_13843)
+static void C_fcall trf_13843(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13843(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_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);}
+f_13843(t0,t1,t2,t3);}
-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_noret_decl(trf_13453)
+static void C_fcall trf_13453(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13453(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_13540(t0,t1,t2,t3);}
+f_13453(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_noret_decl(trf_13459)
+static void C_fcall trf_13459(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13459(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_13546(t0,t1,t2,t3);}
+f_13459(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_noret_decl(trf_13432)
+static void C_fcall trf_13432(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13432(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -3154,11 +3124,11 @@ 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);}
+f_13432(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_noret_decl(trf_13256)
+static void C_fcall trf_13256(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13256(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -3166,47 +3136,47 @@ 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);}
+f_13256(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_noret_decl(trf_12784)
+static void C_fcall trf_12784(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12784(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_12871(t0,t1,t2,t3);}
+f_12784(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_noret_decl(trf_12826)
+static void C_fcall trf_12826(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12826(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_12913(t0,t1);}
+f_12826(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_noret_decl(trf_13167)
+static void C_fcall trf_13167(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13167(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_13254(t0,t1);}
+f_13167(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_noret_decl(trf_12963)
+static void C_fcall trf_12963(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12963(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_13050(t0,t1,t2,t3);}
+f_12963(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_noret_decl(trf_12727)
+static void C_fcall trf_12727(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12727(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -3214,242 +3184,242 @@ 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);}
+f_12727(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_noret_decl(trf_12666)
+static void C_fcall trf_12666(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12666(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_12753(t0,t1,t2);}
+f_12666(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_noret_decl(trf_12637)
+static void C_fcall trf_12637(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12637(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_12724(t0,t1,t2);}
+f_12637(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_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_12730(t0,t1,t2);}
+f_12643(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_noret_decl(trf_12499)
+static void C_fcall trf_12499(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12499(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_12586(t0,t1);}
+f_12499(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_noret_decl(trf_12558)
+static void C_fcall trf_12558(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12558(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_12645(t0,t1,t2);}
+f_12558(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_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_12610(t0,t1,t2);}
+f_12523(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_noret_decl(trf_12456)
+static void C_fcall trf_12456(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12456(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_12543(t0,t1,t2);}
+f_12456(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_noret_decl(trf_12421)
+static void C_fcall trf_12421(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12421(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_12508(t0,t1,t2);}
+f_12421(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_noret_decl(trf_12140)
+static void C_fcall trf_12140(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12140(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_12234(t0,t1);}
+f_12140(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_noret_decl(trf_12259)
+static void C_fcall trf_12259(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12259(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_12353(t0,t1,t2,t3);}
+f_12259(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_noret_decl(trf_12272)
+static void C_fcall trf_12272(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12272(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_12366(t0,t1);}
+f_12272(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_noret_decl(trf_10481)
+static void C_fcall trf_10481(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10481(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_10485(t0,t1);}
+f_10481(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_noret_decl(trf_11926)
+static void C_fcall trf_11926(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11926(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_12017(t0,t1,t2);}
+f_11926(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_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_12032(t0,t1);}
+f_11941(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_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_11709(t0,t1,t2);}
+f_11618(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_noret_decl(trf_11669)
+static void C_fcall trf_11669(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11669(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_11760(t0,t1);}
+f_11669(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_noret_decl(trf_11454)
+static void C_fcall trf_11454(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11454(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_11545(t0,t1,t2);}
+f_11454(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_noret_decl(trf_11414)
+static void C_fcall trf_11414(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11414(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_11505(t0,t1,t2);}
+f_11414(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_noret_decl(trf_10595)
+static void C_fcall trf_10595(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10595(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_10599(t0,t1);}
+f_10595(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_noret_decl(trf_10518)
+static void C_fcall trf_10518(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10518(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_10522(t0,t1,t2);}
+f_10518(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_noret_decl(trf_10471)
+static void C_fcall trf_10471(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10471(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_10475(t0,t1,t2);}
+f_10471(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_noret_decl(trf_10465)
+static void C_fcall trf_10465(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10465(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_10469(t0,t1,t2);}
+f_10465(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_noret_decl(trf_10417)
+static void C_fcall trf_10417(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10417(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_10421(t0,t1,t2,t3);}
+f_10417(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_noret_decl(trf_10324)
+static void C_fcall trf_10324(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10324(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_10328(t0,t1,t2,t3,t4);}
+f_10324(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_noret_decl(trf_10330)
+static void C_fcall trf_10330(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10330(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_10334(t0,t1,t2);}
+f_10330(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_noret_decl(trf_10357)
+static void C_fcall trf_10357(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10357(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_10361(t0,t1,t2);}
+f_10357(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_noret_decl(trf_5724)
+static void C_fcall trf_5724(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5724(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -3457,487 +3427,512 @@ 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);}
+f_5724(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_noret_decl(trf_5907)
+static void C_fcall trf_5907(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5907(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_5957(t0,t1);}
+f_5907(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_noret_decl(trf_6008)
+static void C_fcall trf_6008(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6008(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6058(t0,t1);}
+f_6008(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_noret_decl(trf_10045)
+static void C_fcall trf_10045(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10045(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_10046(t0,t1,t2);}
+f_10045(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_noret_decl(trf_9999)
+static void C_fcall trf_9999(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9999(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_10000(t0,t1,t2);}
+f_9999(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_noret_decl(trf_9943)
+static void C_fcall trf_9943(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9943(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9944(t0,t1);}
+f_9943(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_noret_decl(trf_9838)
+static void C_fcall trf_9838(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9838(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_9839(t0,t1,t2,t3);}
+f_9838(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_noret_decl(trf_9573)
+static void C_fcall trf_9573(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9573(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_9574(t0,t1,t2);}
+f_9573(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_noret_decl(trf_9600)
+static void C_fcall trf_9600(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9600(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_9601(t0,t1,t2);}
+f_9600(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_noret_decl(trf_9228)
+static void C_fcall trf_9228(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9228(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9229(t0,t1);}
+f_9228(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_noret_decl(trf_9133)
+static void C_fcall trf_9133(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9133(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9134(t0,t1);}
+f_9133(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_noret_decl(trf_9072)
+static void C_fcall trf_9072(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9072(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9073(t0,t1);}
+f_9072(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_noret_decl(trf_8791)
+static void C_fcall trf_8791(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8791(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8792(t0,t1,t2);}
+f_8791(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_noret_decl(trf_8366)
+static void C_fcall trf_8366(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8366(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8367(t0,t1,t2);}
+f_8366(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_noret_decl(trf_8290)
+static void C_fcall trf_8290(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8290(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8291(t0,t1,t2);}
+f_8290(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_noret_decl(trf_8223)
+static void C_fcall trf_8223(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8223(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8224(t0,t1,t2);}
+f_8223(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_noret_decl(trf_8174)
+static void C_fcall trf_8174(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8174(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_8175(t0,t1,t2,t3);}
+f_8174(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_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_8188(t0,t1);}
+f_8187(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_noret_decl(trf_8006)
+static void C_fcall trf_8006(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8006(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8007(t0,t1,t2);}
+f_8006(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_noret_decl(trf_8033)
+static void C_fcall trf_8033(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8033(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8034(t0,t1,t2);}
+f_8033(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_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_8047(t0,t1);}
+f_8046(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_noret_decl(trf_7949)
+static void C_fcall trf_7949(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7949(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7950(t0,t1,t2);}
+f_7949(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_noret_decl(trf_7976)
+static void C_fcall trf_7976(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7976(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7977(t0,t1,t2);}
+f_7976(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_noret_decl(trf_7889)
+static void C_fcall trf_7889(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7889(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7889(t0,t1,t2);}
+
+C_noret_decl(trf_7652)
+static void C_fcall trf_7652(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7652(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_7684(t0,t1,t2,t3);}
+f_7652(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_noret_decl(trf_7672)
+static void C_fcall trf_7672(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7672(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7704(t0,t1,t2);}
+f_7672(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_noret_decl(trf_5674)
+static void C_fcall trf_5674(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5674(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5724(t0,t1,t2);}
+f_5674(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_noret_decl(trf_7509)
+static void C_fcall trf_7509(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7509(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7551(t0,t1,t2);}
+f_7509(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_noret_decl(trf_7536)
+static void C_fcall trf_7536(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7536(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7578(t0,t1,t2);}
+f_7536(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_noret_decl(trf_7550)
+static void C_fcall trf_7550(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7550(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7550(t0,t1);}
+
+C_noret_decl(trf_7469)
+static void C_fcall trf_7469(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7469(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7511(t0,t1,t2);}
+f_7469(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_noret_decl(trf_7413)
+static void C_fcall trf_7413(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7413(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7455(t0,t1,t2);}
+f_7413(t0,t1,t2);}
+
+C_noret_decl(trf_7298)
+static void C_fcall trf_7298(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7298(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7298(t0,t1);}
-C_noret_decl(trf_7205)
-static void C_fcall trf_7205(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_7205(void *dummy){
+C_noret_decl(trf_7331)
+static void C_fcall trf_7331(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7331(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7205(t0,t1);}
+f_7331(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_noret_decl(trf_7156)
+static void C_fcall trf_7156(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7156(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7224(t0,t1);}
+f_7156(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_noret_decl(trf_7087)
+static void C_fcall trf_7087(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7087(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7133(t0,t1,t2);}
+f_7087(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_noret_decl(trf_7114)
+static void C_fcall trf_7114(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7114(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7160(t0,t1,t2);}
+f_7114(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_noret_decl(trf_7051)
+static void C_fcall trf_7051(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7051(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7097(t0,t1,t2);}
+f_7051(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_noret_decl(trf_6966)
+static void C_fcall trf_6966(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6966(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7012(t0,t1,t2);}
+f_6966(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_noret_decl(trf_6993)
+static void C_fcall trf_6993(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6993(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7039(t0,t1,t2);}
+f_6993(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_noret_decl(trf_6883)
+static void C_fcall trf_6883(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6883(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6929(t0,t1,t2);}
+f_6883(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_noret_decl(trf_6834)
+static void C_fcall trf_6834(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6834(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_6880(t0,t1,t2,t3);}
+f_6834(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_noret_decl(trf_6847)
+static void C_fcall trf_6847(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6847(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6893(t0,t1);}
+f_6847(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_noret_decl(trf_6772)
+static void C_fcall trf_6772(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6772(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6818(t0,t1);}
+f_6772(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_noret_decl(trf_6695)
+static void C_fcall trf_6695(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6695(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6741(t0,t1);}
+f_6695(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_noret_decl(trf_6673)
+static void C_fcall trf_6673(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6673(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6719(t0,t1);}
+f_6673(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_noret_decl(trf_6559)
+static void C_fcall trf_6559(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6559(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6605(t0,t1,t2);}
+f_6559(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_noret_decl(trf_6503)
+static void C_fcall trf_6503(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6503(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6549(t0,t1,t2);}
+f_6503(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_noret_decl(trf_6411)
+static void C_fcall trf_6411(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6411(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6457(t0,t1,t2);}
+f_6411(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_noret_decl(trf_6362)
+static void C_fcall trf_6362(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6362(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_6408(t0,t1,t2,t3);}
+f_6362(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_noret_decl(trf_6375)
+static void C_fcall trf_6375(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6375(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6421(t0,t1);}
+f_6375(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_noret_decl(trf_6292)
+static void C_fcall trf_6292(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6292(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_6338(t0,t1,t2,t3);}
+f_6292(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_noret_decl(trf_6305)
+static void C_fcall trf_6305(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6305(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6351(t0,t1);}
+f_6305(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_noret_decl(trf_6323)
+static void C_fcall trf_6323(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6323(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_6369(t0,t1,t2,t3);}
+f_6323(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_noret_decl(trf_6159)
+static void C_fcall trf_6159(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6159(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6209(t0,t1,t2);}
+f_6159(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_noret_decl(trf_6104)
+static void C_fcall trf_6104(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6104(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6154(t0,t1,t2);}
+f_6104(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_noret_decl(trf_5822)
+static void C_fcall trf_5822(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5822(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5872(t0,t1,t2);}
+f_5822(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_noret_decl(trf_5594)
+static void C_fcall trf_5594(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5594(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_5644(t0,t1);}
+f_5594(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_noret_decl(trf_5424)
+static void C_fcall trf_5424(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5424(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -3945,110 +3940,110 @@ 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);}
+f_5424(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_noret_decl(trf_5523)
+static void C_fcall trf_5523(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5523(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5573(t0,t1,t2);}
+f_5523(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_noret_decl(trf_5476)
+static void C_fcall trf_5476(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5476(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5526(t0,t1,t2);}
+f_5476(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_noret_decl(trf_5462)
+static void C_fcall trf_5462(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5462(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5512(t0,t1,t2);}
+f_5462(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_noret_decl(trf_5444)
+static void C_fcall trf_5444(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5444(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5494(t0,t1,t2);}
+f_5444(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_noret_decl(trf_5378)
+static void C_fcall trf_5378(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5378(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_5428(t0,t1,t2,t3);}
+f_5378(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_noret_decl(trf_5318)
+static void C_fcall trf_5318(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5318(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5368(t0,t1,t2);}
+f_5318(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_noret_decl(trf_5324)
+static void C_fcall trf_5324(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5324(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_5374(t0,t1,t2,t3);}
+f_5324(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_noret_decl(trf_5305)
+static void C_fcall trf_5305(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5305(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_5355(t0,t1,t2,t3);}
+f_5305(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_noret_decl(trf_5290)
+static void C_fcall trf_5290(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5290(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_5340(t0,t1,t2,t3);}
+f_5290(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_noret_decl(trf_5251)
+static void C_fcall trf_5251(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5251(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_5301(t0,t1,t2,t3);}
+f_5251(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_noret_decl(trf_5264)
+static void C_fcall trf_5264(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5264(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_5314(t0,t1);}
+f_5264(t0,t1);}
C_noret_decl(tr10)
static void C_fcall tr10(C_proc10 k) C_regparm C_noret;
@@ -4094,28 +4089,29 @@ 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(tr18)
+static void C_fcall tr18(C_proc18 k) C_regparm C_noret;
+C_regparm static void C_fcall tr18(C_proc18 k){
+C_word t17=C_pick(0);
+C_word t16=C_pick(1);
+C_word t15=C_pick(2);
+C_word t14=C_pick(3);
+C_word t13=C_pick(4);
+C_word t12=C_pick(5);
+C_word t11=C_pick(6);
+C_word t10=C_pick(7);
+C_word t9=C_pick(8);
+C_word t8=C_pick(9);
+C_word t7=C_pick(10);
+C_word t6=C_pick(11);
+C_word t5=C_pick(12);
+C_word t4=C_pick(13);
+C_word t3=C_pick(14);
+C_word t2=C_pick(15);
+C_word t1=C_pick(16);
+C_word t0=C_pick(17);
+C_adjust_stack(-18);
+(k)(18,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15,t16,t17);}
C_noret_decl(tr5)
static void C_fcall tr5(C_proc5 k) C_regparm C_noret;
@@ -4182,19 +4178,6 @@ 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)
@@ -4215,12 +4198,12 @@ if(!C_demand(3)){
C_save(t1);
C_reclaim((void*)toplevel_trampoline,NULL);}
toplevel_initialized=1;
-if(!C_demand_2(6855)){
+if(!C_demand_2(6766)){
C_save(t1);
-C_rereclaim2(6855*sizeof(C_word), 1);
+C_rereclaim2(6766*sizeof(C_word), 1);
t1=C_restore;}
a=C_alloc(3);
-C_initialize_lf(lf,684);
+C_initialize_lf(lf,673);
lf[1]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
lf[2]=C_h_intern(&lf[2],1,"d");
lf[3]=C_h_intern(&lf[3],2,"pp");
@@ -4275,656 +4258,645 @@ 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_"
+lf[55]=C_h_intern(&lf[55],21,"\010compilerinline-table");
+lf[56]=C_h_intern(&lf[56],26,"\010compilerinline-table-used");
+lf[57]=C_h_intern(&lf[57],23,"\010compilerconstant-table");
+lf[58]=C_h_intern(&lf[58],23,"\010compilerconstants-used");
+lf[59]=C_h_intern(&lf[59],30,"\010compilerbroken-constant-nodes");
+lf[60]=C_h_intern(&lf[60],37,"\010compilerinline-substitutions-enabled");
+lf[61]=C_h_intern(&lf[61],24,"\010compilerdirect-call-ids");
+lf[62]=C_h_intern(&lf[62],23,"\010compilerfirst-analysis");
+lf[63]=C_h_intern(&lf[63],27,"\010compilerforeign-type-table");
+lf[64]=C_h_intern(&lf[64],26,"\010compilerforeign-variables");
+lf[65]=C_h_intern(&lf[65],29,"\010compilerforeign-lambda-stubs");
+lf[66]=C_h_intern(&lf[66],22,"foreign-callback-stubs");
+lf[67]=C_h_intern(&lf[67],27,"\010compilerexternal-variables");
+lf[68]=C_h_intern(&lf[68],26,"\010compilerloop-lambda-names");
+lf[69]=C_h_intern(&lf[69],28,"\010compilerprofile-lambda-list");
+lf[70]=C_h_intern(&lf[70],29,"\010compilerprofile-lambda-index");
+lf[71]=C_h_intern(&lf[71],33,"\010compilerprofile-info-vector-name");
+lf[72]=C_h_intern(&lf[72],28,"\010compilerexternal-to-pointer");
+lf[73]=C_h_intern(&lf[73],34,"\010compilererror-is-extended-binding");
+lf[74]=C_h_intern(&lf[74],24,"\010compilerreal-name-table");
+lf[75]=C_h_intern(&lf[75],29,"\010compilerlocation-pointer-map");
+lf[76]=C_h_intern(&lf[76],34,"\010compilerpending-canonicalizations");
+lf[77]=C_h_intern(&lf[77],29,"\010compilerdefconstant-bindings");
+lf[78]=C_h_intern(&lf[78],23,"\010compilercallback-names");
+lf[79]=C_h_intern(&lf[79],23,"\010compilertoplevel-scope");
+lf[80]=C_h_intern(&lf[80],27,"\010compilertoplevel-lambda-id");
+lf[81]=C_h_intern(&lf[81],25,"\010compilercsc-control-file");
+lf[82]=C_h_intern(&lf[82],26,"\010compilerdata-declarations");
+lf[83]=C_h_intern(&lf[83],26,"\010compilerfile-requirements");
+lf[84]=C_h_intern(&lf[84],28,"\010compilerpostponed-initforms");
+lf[85]=C_h_intern(&lf[85],28,"\010compilerinitialize-compiler");
+lf[86]=C_h_intern(&lf[86],12,"vector-fill!");
+lf[87]=C_h_intern(&lf[87],11,"make-vector");
+lf[88]=C_h_intern(&lf[88],25,"\010compilermake-random-name");
+lf[89]=C_h_intern(&lf[89],12,"profile-info");
+lf[90]=C_h_intern(&lf[90],32,"\010compilercanonicalize-expression");
+lf[91]=C_h_intern(&lf[91],4,"cdar");
+lf[92]=C_h_intern(&lf[92],4,"caar");
+lf[93]=C_h_intern(&lf[93],7,"\003sysget");
+lf[94]=C_h_intern(&lf[94],16,"\004coremacro-alias");
+lf[95]=C_h_intern(&lf[95],8,"\003sysput!");
+lf[96]=C_h_intern(&lf[96],6,"gensym");
+lf[97]=C_h_intern(&lf[97],23,"\010compilerset-real-name!");
+lf[98]=C_h_intern(&lf[98],5,"quote");
+lf[99]=C_h_intern(&lf[99],19,"\003sysundefined-value");
+lf[100]=C_h_intern(&lf[100],15,"\004coreinline_ref");
+lf[101]=C_h_intern(&lf[101],36,"\010compilerforeign-type-convert-result");
+lf[102]=C_h_intern(&lf[102],30,"\010compilerfinish-foreign-result");
+lf[103]=C_h_intern(&lf[103],27,"\010compilerfinal-foreign-type");
+lf[104]=C_h_intern(&lf[104],19,"\004coreinline_loc_ref");
+lf[105]=C_h_intern(&lf[105],21,"\003sysalias-global-hook");
+lf[106]=C_h_intern(&lf[106],14,"\004coreprimitive");
+lf[107]=C_h_intern(&lf[107],18,"\003syshash-table-ref");
+lf[108]=C_h_intern(&lf[108],18,"\003syscurrent-module");
+lf[109]=C_h_intern(&lf[109],21,"\003sysmacro-environment");
+lf[110]=C_h_intern(&lf[110],22,"\003syscompile-to-closure");
+lf[111]=C_h_intern(&lf[111],28,"\003syscurrent-meta-environment");
+lf[112]=C_h_intern(&lf[112],16,"\003sysdynamic-wind");
+lf[113]=C_h_intern(&lf[113],26,"\003sysmeta-macro-environment");
+lf[114]=C_h_intern(&lf[114],27,"\010compilerunlikely-variables");
+lf[115]=C_h_intern(&lf[115],25,"\010compilercompiler-warning");
+lf[116]=C_h_intern(&lf[116],3,"var");
+lf[117]=C_decode_literal(C_heaptop,"\376B\000\000.reference to variable `~s\047 possibly unintended");
+lf[118]=C_h_intern(&lf[118],8,"keyword\077");
+lf[119]=C_h_intern(&lf[119],12,"syntax-error");
+lf[120]=C_decode_literal(C_heaptop,"\376B\000\000\023illegal atomic form");
+lf[121]=C_h_intern(&lf[121],18,"\010compilerconstant\077");
+lf[122]=C_h_intern(&lf[122],24,"\003syssyntax-error-culprit");
+lf[123]=C_h_intern(&lf[123],2,"if");
+lf[124]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[125]=C_h_intern(&lf[125],16,"\003syscheck-syntax");
+lf[126]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\002if\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\001\376\001\000\000\001_");
+lf[127]=C_h_intern(&lf[127],16,"\003sysstrip-syntax");
+lf[128]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\377\016");
+lf[129]=C_h_intern(&lf[129],10,"\004corecheck");
+lf[130]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005quote\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[131]=C_h_intern(&lf[131],14,"\004coreimmutable");
+lf[132]=C_h_intern(&lf[132],22,"\010compilerhide-variable");
+lf[133]=C_h_intern(&lf[133],21,"\010compileralways-bound");
+lf[134]=C_h_intern(&lf[134],9,"\003syserror");
+lf[135]=C_h_intern(&lf[135],10,"alist-cons");
+lf[136]=C_h_intern(&lf[136],1,"c");
+lf[137]=C_h_intern(&lf[137],6,"cadadr");
+lf[138]=C_h_intern(&lf[138],14,"\004coreundefined");
+lf[139]=C_h_intern(&lf[139],5,"caadr");
+lf[140]=C_h_intern(&lf[140],23,"\004corerequire-for-syntax");
+lf[141]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[142]=C_h_intern(&lf[142],10,"lset-union");
+lf[143]=C_h_intern(&lf[143],3,"eq\077");
+lf[144]=C_h_intern(&lf[144],22,"\003syshash-table-update!");
+lf[145]=C_h_intern(&lf[145],14,"dynamic/syntax");
+lf[146]=C_h_intern(&lf[146],11,"\003sysrequire");
+lf[147]=C_h_intern(&lf[147],4,"eval");
+lf[148]=C_h_intern(&lf[148],22,"\004corerequire-extension");
+lf[149]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[150]=C_h_intern(&lf[150],22,"\003sysdo-the-right-thing");
+lf[151]=C_h_intern(&lf[151],10,"\004corebegin");
+lf[152]=C_h_intern(&lf[152],3,"ext");
+lf[153]=C_decode_literal(C_heaptop,"\376B\000\000)extension `~A\047 is currently not installed");
+lf[154]=C_h_intern(&lf[154],18,"\003sysfind-extension");
+lf[155]=C_h_intern(&lf[155],31,"\003syscanonicalize-extension-path");
+lf[156]=C_h_intern(&lf[156],17,"require-extension");
+lf[157]=C_h_intern(&lf[157],8,"feature\077");
+lf[158]=C_h_intern(&lf[158],3,"let");
+lf[159]=C_h_intern(&lf[159],8,"\004corelet");
+lf[160]=C_h_intern(&lf[160],6,"append");
+lf[161]=C_h_intern(&lf[161],21,"\003syscanonicalize-body");
+lf[162]=C_h_intern(&lf[162],4,"cons");
+lf[163]=C_h_intern(&lf[163],6,"unzip1");
+lf[164]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
+lf[165]=C_h_intern(&lf[165],6,"letrec");
+lf[166]=C_h_intern(&lf[166],11,"\004coreletrec");
+lf[167]=C_h_intern(&lf[167],10,"\003sysappend");
+lf[168]=C_h_intern(&lf[168],9,"\004coreset!");
+lf[169]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[170]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
+lf[171]=C_h_intern(&lf[171],6,"lambda");
+lf[172]=C_h_intern(&lf[172],11,"\004corelambda");
+lf[173]=C_h_intern(&lf[173],30,"\010compilerexpand-profile-lambda");
+lf[174]=C_h_intern(&lf[174],37,"\010compilerprocess-lambda-documentation");
+lf[175]=C_h_intern(&lf[175],5,"begin");
+lf[176]=C_h_intern(&lf[176],3,"all");
+lf[177]=C_h_intern(&lf[177],4,"some");
+lf[178]=C_h_intern(&lf[178],16,"\010compilerprofile");
+lf[179]=C_h_intern(&lf[179],26,"\010compilerbuild-lambda-list");
+lf[180]=C_h_intern(&lf[180],13,"\010compilerposq");
+lf[181]=C_h_intern(&lf[181],30,"\010compilerdecompose-lambda-list");
+lf[182]=C_h_intern(&lf[182],31,"\003sysexpand-extended-lambda-list");
+lf[183]=C_h_intern(&lf[183],25,"\003sysextended-lambda-list\077");
+lf[184]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\013lambda-list\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
+lf[185]=C_h_intern(&lf[185],10,"let-syntax");
+lf[186]=C_h_intern(&lf[186],18,"\003syser-transformer");
+lf[187]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\012let-syntax\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000\000\001_"
"\376\377\001\000\000\000\001");
-lf[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"
+lf[188]=C_h_intern(&lf[188],13,"letrec-syntax");
+lf[189]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\015letrec-syntax\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000"
"\000\001_\376\377\001\000\000\000\001");
-lf[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[190]=C_h_intern(&lf[190],18,"\004coredefine-syntax");
+lf[191]=C_h_intern(&lf[191],25,"\003sysenable-runtime-macros");
+lf[192]=C_h_intern(&lf[192],23,"\003syscurrent-environment");
+lf[193]=C_h_intern(&lf[193],28,"\003sysextend-macro-environment");
+lf[194]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[195]=C_h_intern(&lf[195],26,"\003sysregister-syntax-export");
+lf[196]=C_h_intern(&lf[196],5,"cdadr");
+lf[197]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\001\000\000\013lambda-list\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
+lf[198]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016");
+lf[199]=C_h_intern(&lf[199],27,"\004coredefine-compiler-syntax");
+lf[200]=C_h_intern(&lf[200],11,"\004coresyntax");
+lf[201]=C_h_intern(&lf[201],24,"\010compilercompiler-syntax");
+lf[202]=C_h_intern(&lf[202],8,"\003syscons");
+lf[203]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[204]=C_h_intern(&lf[204],24,"\004corelet-compiler-syntax");
+lf[205]=C_h_intern(&lf[205],12,"dynamic-wind");
+lf[206]=C_h_intern(&lf[206],19,"let-compiler-syntax");
+lf[207]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006symbol\376\000\000\000\003\376\001\000\000\001_\376\377\001\000\000\000\000\376\377\001\000\000\000\001");
+lf[208]=C_h_intern(&lf[208],11,"\004coremodule");
+lf[209]=C_h_intern(&lf[209],29,"\003sysinitial-macro-environment");
+lf[210]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016\376\377\016");
+lf[211]=C_h_intern(&lf[211],7,"reverse");
+lf[212]=C_decode_literal(C_heaptop,"\376B\000\000\037not generating import library `");
+lf[213]=C_decode_literal(C_heaptop,"\376B\000\000\016\047 for module `");
+lf[214]=C_decode_literal(C_heaptop,"\376B\000\000 \047 because imports did not change");
+lf[215]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016\376\377\016");
+lf[216]=C_decode_literal(C_heaptop,"\376B\000\000\017\012;; END OF FILE");
+lf[217]=C_h_intern(&lf[217],12,"pretty-print");
+lf[218]=C_decode_literal(C_heaptop,"\376B\000\000\005;;;; ");
+lf[219]=C_decode_literal(C_heaptop,"\376B\000\000\030 - GENERATED BY CHICKEN ");
+lf[220]=C_decode_literal(C_heaptop,"\376B\000\000\020 -*- Scheme -*-\012");
+lf[221]=C_h_intern(&lf[221],15,"chicken-version");
+lf[222]=C_h_intern(&lf[222],19,"with-output-to-file");
+lf[223]=C_decode_literal(C_heaptop,"\376B\000\000\033generating import library `");
+lf[224]=C_decode_literal(C_heaptop,"\376B\000\000\016\047 for module `");
+lf[225]=C_decode_literal(C_heaptop,"\376B\000\000\005\047 ...");
+lf[226]=C_h_intern(&lf[226],9,"read-file");
+lf[227]=C_h_intern(&lf[227],12,"file-exists\077");
+lf[228]=C_h_intern(&lf[228],32,"\003syscompiled-module-registration");
+lf[229]=C_h_intern(&lf[229],13,"string-append");
+lf[230]=C_decode_literal(C_heaptop,"\376B\000\000\013.import.scm");
+lf[231]=C_h_intern(&lf[231],14,"symbol->string");
+lf[232]=C_h_intern(&lf[232],4,"exit");
+lf[233]=C_h_intern(&lf[233],19,"print-error-message");
+lf[234]=C_h_intern(&lf[234],18,"current-error-port");
+lf[235]=C_h_intern(&lf[235],19,"\003sysfinalize-module");
+lf[236]=C_h_intern(&lf[236],22,"with-exception-handler");
+lf[237]=C_h_intern(&lf[237],30,"call-with-current-continuation");
+lf[238]=C_h_intern(&lf[238],6,"import");
+lf[239]=C_h_intern(&lf[239],17,"import-for-syntax");
+lf[240]=C_h_intern(&lf[240],6,"syntax");
+lf[241]=C_decode_literal(C_heaptop,"\376B\000\000Imodule body of `~s\047 does not begin with `import\047 form - maybe unintended\077");
+lf[242]=C_h_intern(&lf[242],19,"\003sysregister-module");
+lf[243]=C_h_intern(&lf[243],32,"\010compilercanonicalize-begin-body");
+lf[244]=C_h_intern(&lf[244],21,"\003syssyntax-error-hook");
+lf[245]=C_h_intern(&lf[245],6,"module");
+lf[246]=C_decode_literal(C_heaptop,"\376B\000\000\031modules may not be nested");
+lf[247]=C_decode_literal(C_heaptop,"\376B\000\000\025invalid export syntax");
+lf[248]=C_h_intern(&lf[248],17,"\004corenamed-lambda");
+lf[249]=C_h_intern(&lf[249],16,"\004coreloop-lambda");
+lf[250]=C_h_intern(&lf[250],4,"set!");
+lf[251]=C_h_intern(&lf[251],18,"\004coreinline_update");
+lf[252]=C_h_intern(&lf[252],27,"\010compilerforeign-type-check");
+lf[253]=C_h_intern(&lf[253],38,"\010compilerforeign-type-convert-argument");
+lf[254]=C_h_intern(&lf[254],22,"\004coreinline_loc_update");
+lf[255]=C_decode_literal(C_heaptop,"\376B\000\000\042assignment to syntactic identifier");
+lf[256]=C_decode_literal(C_heaptop,"\376B\000\000\032assignment to keyword `~S\047");
+lf[257]=C_h_intern(&lf[257],19,"\003sysundefine-macro!");
+lf[258]=C_decode_literal(C_heaptop,"\376B\000\000+assigned global variable `~S\047 is a macro ~A");
+lf[259]=C_h_intern(&lf[259],17,"get-output-string");
+lf[260]=C_h_intern(&lf[260],5,"write");
+lf[261]=C_h_intern(&lf[261],7,"display");
+lf[262]=C_decode_literal(C_heaptop,"\376B\000\000\010in line ");
+lf[263]=C_h_intern(&lf[263],18,"open-output-string");
+lf[264]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[265]=C_h_intern(&lf[265],10,"\003sysmacro\077");
+lf[266]=C_h_intern(&lf[266],34,"\010compileralways-bound-to-procedure");
+lf[267]=C_decode_literal(C_heaptop,"\376B\000\000/assignment to variable `~s\047 possibly unintended");
+lf[268]=C_h_intern(&lf[268],17,"\010compilerget-line");
+lf[269]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016");
+lf[270]=C_h_intern(&lf[270],11,"\004coreinline");
+lf[271]=C_h_intern(&lf[271],20,"\004coreinline_allocate");
+lf[272]=C_h_intern(&lf[272],7,"\003sysmap");
+lf[273]=C_h_intern(&lf[273],19,"\004corecompiletimetoo");
+lf[274]=C_h_intern(&lf[274],23,"\004coreelaborationtimetoo");
+lf[275]=C_h_intern(&lf[275],20,"\004corecompiletimeonly");
+lf[276]=C_h_intern(&lf[276],24,"\004coreelaborationtimeonly");
+lf[277]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[278]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[279]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000");
+lf[280]=C_h_intern(&lf[280],19,"\004coreforeign-lambda");
+lf[281]=C_h_intern(&lf[281],30,"\010compilerexpand-foreign-lambda");
+lf[282]=C_h_intern(&lf[282],24,"\004coreforeign-safe-lambda");
+lf[283]=C_h_intern(&lf[283],20,"\004coreforeign-lambda*");
+lf[284]=C_h_intern(&lf[284],31,"\010compilerexpand-foreign-lambda*");
+lf[285]=C_h_intern(&lf[285],25,"\004coreforeign-safe-lambda*");
+lf[286]=C_h_intern(&lf[286],22,"\004coreforeign-primitive");
+lf[287]=C_h_intern(&lf[287],33,"\010compilerexpand-foreign-primitive");
+lf[288]=C_h_intern(&lf[288],28,"\004coredefine-foreign-variable");
+lf[289]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[290]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[291]=C_h_intern(&lf[291],24,"\004coredefine-foreign-type");
+lf[292]=C_h_intern(&lf[292],6,"define");
+lf[293]=C_h_intern(&lf[293],10,"\003sysvalues");
+lf[294]=C_h_intern(&lf[294],19,"\003syshash-table-set!");
+lf[295]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[296]=C_h_intern(&lf[296],29,"\004coredefine-external-variable");
+lf[297]=C_h_intern(&lf[297],9,"c-pointer");
+lf[298]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[299]=C_decode_literal(C_heaptop,"\376B\000\000\001&");
+lf[300]=C_h_intern(&lf[300],5,"fifth");
+lf[301]=C_h_intern(&lf[301],17,"\004corelet-location");
+lf[302]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_bytevector");
+lf[303]=C_h_intern(&lf[303],14,"\010compilerwords");
+lf[304]=C_h_intern(&lf[304],46,"\010compilerestimate-foreign-result-location-size");
+lf[305]=C_h_intern(&lf[305],18,"\004coredefine-inline");
+lf[306]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[307]=C_h_intern(&lf[307],6,"cdaddr");
+lf[308]=C_h_intern(&lf[308],20,"\004coredefine-constant");
+lf[309]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[310]=C_h_intern(&lf[310],17,"\010compilerconstant");
+lf[311]=C_decode_literal(C_heaptop,"\376B\000\000\010constant");
+lf[312]=C_h_intern(&lf[312],29,"\010compilercollapsable-literal\077");
+lf[313]=C_h_intern(&lf[313],4,"quit");
+lf[314]=C_decode_literal(C_heaptop,"\376B\000\0008error in constant evaluation of ~S for named constant ~S");
+lf[315]=C_h_intern(&lf[315],12,"\004coredeclare");
+lf[316]=C_h_intern(&lf[316],28,"\010compilerprocess-declaration");
+lf[317]=C_h_intern(&lf[317],29,"\004coreforeign-callback-wrapper");
+lf[318]=C_h_intern(&lf[318],8,"split-at");
+lf[319]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005const\376\003\000\000\002\376\001\000\000\020nonnull-c-string\376\377\016");
+lf[320]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005const\376\003\000\000\002\376\001\000\000\031nonnull-unsigned-c-string\376\377\016");
+lf[321]=C_h_intern(&lf[321],25,"nonnull-unsigned-c-string");
+lf[322]=C_h_intern(&lf[322],16,"nonnull-c-string");
+lf[323]=C_h_intern(&lf[323],17,"\003sysmake-c-string");
+lf[324]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005const\376\003\000\000\002\376\001\000\000\011c-string*\376\377\016");
+lf[325]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005const\376\003\000\000\002\376\001\000\000\022unsigned-c-string*\376\377\016");
+lf[326]=C_h_intern(&lf[326],18,"unsigned-c-string*");
+lf[327]=C_h_intern(&lf[327],9,"c-string*");
+lf[328]=C_h_intern(&lf[328],13,"c-string-list");
+lf[329]=C_h_intern(&lf[329],14,"c-string-list*");
+lf[330]=C_decode_literal(C_heaptop,"\376B\000\000/not a valid result type for callback procedures");
+lf[331]=C_h_intern(&lf[331],8,"c-string");
+lf[332]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005const\376\003\000\000\002\376\001\000\000\021unsigned-c-string\376\377\016");
+lf[333]=C_h_intern(&lf[333],17,"unsigned-c-string");
+lf[334]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005const\376\003\000\000\002\376\001\000\000\010c-string\376\377\016");
+lf[335]=C_h_intern(&lf[335],1,"r");
+lf[336]=C_h_intern(&lf[336],3,"and");
+lf[337]=C_decode_literal(C_heaptop,"\376B\000\000Anon-matching or invalid argument list to foreign callback-wrapper");
+lf[338]=C_decode_literal(C_heaptop,"\376B\000\000<name `~S\047 of external definition is not a valid C identifier");
+lf[339]=C_h_intern(&lf[339],28,"\010compilervalid-c-identifier\077");
+lf[340]=C_h_intern(&lf[340],8,"location");
+lf[341]=C_h_intern(&lf[341],17,"\003sysmake-locative");
+lf[342]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\010location\376\003\000\000\002\376\001\000\000\001_\376\377\016");
+lf[343]=C_h_intern(&lf[343],13,"\004corecallunit");
+lf[344]=C_h_intern(&lf[344],37,"\010compilerupdate-line-number-database!");
+lf[345]=C_h_intern(&lf[345],10,"\003sysexpand");
+lf[346]=C_decode_literal(C_heaptop,"\376B\000\000\030) - malformed expression");
+lf[347]=C_decode_literal(C_heaptop,"\376B\000\000\011(in line ");
+lf[348]=C_decode_literal(C_heaptop,"\376B\000\000\024malformed expression");
+lf[349]=C_h_intern(&lf[349],31,"\010compileremit-syntax-trace-info");
+lf[350]=C_decode_literal(C_heaptop,"\376B\000\000 literal in operator position: ~S");
+lf[351]=C_decode_literal(C_heaptop,"\376B\000\000\024malformed expression");
+lf[352]=C_h_intern(&lf[352],26,"\010compilerinternal-bindings");
+lf[353]=C_h_intern(&lf[353],22,"\003sysclear-trace-buffer");
+lf[354]=C_h_intern(&lf[354],26,"\010compilerdebugging-chicken");
+lf[355]=C_h_intern(&lf[355],7,"newline");
+lf[356]=C_decode_literal(C_heaptop,"\376B\000\000\023invalid declaration");
+lf[357]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[358]=C_h_intern(&lf[358],4,"uses");
lf[359]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[360]=C_h_intern(&lf[360],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[360]=C_h_intern(&lf[360],29,"\010compilerstring->c-identifier");
+lf[361]=C_h_intern(&lf[361],18,"\010compilerstringify");
+lf[362]=C_h_intern(&lf[362],6,"static");
+lf[363]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[364]=C_h_intern(&lf[364],17,"register-feature!");
+lf[365]=C_h_intern(&lf[365],4,"unit");
+lf[366]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[367]=C_h_intern(&lf[367],5,"usage");
+lf[368]=C_decode_literal(C_heaptop,"\376B\000\0003unit was already given a name (new name is ignored)");
+lf[369]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[370]=C_h_intern(&lf[370],34,"\010compilerdefault-standard-bindings");
lf[371]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[372]=C_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[372]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[373]=C_h_intern(&lf[373],34,"\010compilerdefault-extended-bindings");
lf[374]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[375]=C_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[375]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[376]=C_h_intern(&lf[376],18,"usual-integrations");
lf[377]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[378]=C_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[378]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[379]=C_h_intern(&lf[379],17,"lset-intersection");
lf[380]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[381]=C_h_intern(&lf[381],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[381]=C_h_intern(&lf[381],6,"fixnum");
+lf[382]=C_h_intern(&lf[382],17,"fixnum-arithmetic");
+lf[383]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[384]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
lf[385]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[386]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[386]=C_h_intern(&lf[386],4,"safe");
lf[387]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[388]=C_h_intern(&lf[388],4,"safe");
+lf[388]=C_h_intern(&lf[388],15,"no-bound-checks");
lf[389]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[390]=C_h_intern(&lf[390],15,"no-bound-checks");
+lf[390]=C_h_intern(&lf[390],14,"no-argc-checks");
lf[391]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[392]=C_h_intern(&lf[392],14,"no-argc-checks");
+lf[392]=C_h_intern(&lf[392],19,"no-procedure-checks");
lf[393]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[394]=C_h_intern(&lf[394],19,"no-procedure-checks");
+lf[394]=C_h_intern(&lf[394],18,"interrupts-enabled");
lf[395]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[396]=C_h_intern(&lf[396],18,"interrupts-enabled");
+lf[396]=C_h_intern(&lf[396],18,"disable-interrupts");
lf[397]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[398]=C_h_intern(&lf[398],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[398]=C_h_intern(&lf[398],15,"disable-warning");
+lf[399]=C_h_intern(&lf[399],26,"\010compilerdisabled-warnings");
+lf[400]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[401]=C_h_intern(&lf[401],12,"always-bound");
+lf[402]=C_h_intern(&lf[402],12,"\003sysfor-each");
+lf[403]=C_h_intern(&lf[403],12,"safe-globals");
+lf[404]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[405]=C_h_intern(&lf[405],38,"no-procedure-checks-for-usual-bindings");
+lf[406]=C_h_intern(&lf[406],18,"bound-to-procedure");
+lf[407]=C_h_intern(&lf[407],15,"foreign-declare");
+lf[408]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[409]=C_h_intern(&lf[409],7,"declare");
+lf[410]=C_decode_literal(C_heaptop,"\376B\000\000\023invalid declaration");
+lf[411]=C_h_intern(&lf[411],5,"every");
+lf[412]=C_h_intern(&lf[412],7,"string\077");
+lf[413]=C_h_intern(&lf[413],5,"block");
+lf[414]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[415]=C_h_intern(&lf[415],8,"separate");
+lf[416]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[417]=C_h_intern(&lf[417],20,"keep-shadowed-macros");
+lf[418]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[419]=C_h_intern(&lf[419],6,"unused");
+lf[420]=C_h_intern(&lf[420],15,"\010compilerunused");
+lf[421]=C_h_intern(&lf[421],3,"not");
lf[422]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[423]=C_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[423]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[424]=C_h_intern(&lf[424],15,"lset-difference");
+lf[425]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
lf[426]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[427]=C_h_intern(&lf[427],6,"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[427]=C_h_intern(&lf[427],6,"inline");
+lf[428]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[429]=C_h_intern(&lf[429],2,"no");
+lf[430]=C_h_intern(&lf[430],15,"\010compilerinline");
lf[431]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[432]=C_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[432]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[433]=C_h_intern(&lf[433],13,"inline-global");
lf[434]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[435]=C_h_intern(&lf[435],6,"inline");
+lf[435]=C_h_intern(&lf[435],22,"\010compilerinline-global");
lf[436]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[437]=C_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[437]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[438]=C_decode_literal(C_heaptop,"\376B\000\000\042illegal declaration specifier `~s\047");
+lf[439]=C_h_intern(&lf[439],14,"compile-syntax");
lf[440]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[441]=C_h_intern(&lf[441],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[441]=C_h_intern(&lf[441],12,"block-global");
+lf[442]=C_h_intern(&lf[442],4,"hide");
+lf[443]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[444]=C_h_intern(&lf[444],6,"export");
+lf[445]=C_h_intern(&lf[445],24,"\010compilerexport-variable");
+lf[446]=C_h_intern(&lf[446],30,"emit-external-prototypes-first");
+lf[447]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[448]=C_h_intern(&lf[448],11,"lambda-lift");
lf[449]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[450]=C_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[450]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[451]=C_h_intern(&lf[451],3,"yes");
+lf[452]=C_h_intern(&lf[452],12,"inline-limit");
+lf[453]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[454]=C_decode_literal(C_heaptop,"\376B\000\0002invalid argument to `inline-limit\047 declaration: ~s");
+lf[455]=C_h_intern(&lf[455],8,"constant");
lf[456]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[457]=C_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[457]=C_decode_literal(C_heaptop,"\376B\000\000/invalid arguments to `constant\047 declaration: ~S");
+lf[458]=C_h_intern(&lf[458],7,"symbol\077");
+lf[459]=C_h_intern(&lf[459],19,"emit-import-library");
+lf[460]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[461]=C_decode_literal(C_heaptop,"\376B\000\000\013.import.scm");
+lf[462]=C_decode_literal(C_heaptop,"\376B\000\000(invalid import-library specification: ~s");
+lf[463]=C_h_intern(&lf[463],7,"profile");
+lf[464]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[465]=C_h_intern(&lf[465],20,"profiled-propcedures");
+lf[466]=C_h_intern(&lf[466],5,"local");
+lf[467]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[468]=C_h_intern(&lf[468],14,"\010compilerlocal");
lf[469]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[470]=C_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"
+lf[470]=C_h_intern(&lf[470],4,"type");
+lf[471]=C_h_intern(&lf[471],18,"\004coredeclared-type");
+lf[472]=C_h_intern(&lf[472],9,"\004coretype");
+lf[473]=C_decode_literal(C_heaptop,"\376B\000\000$illegal `type\047 declaration item `~s\047");
+lf[474]=C_h_intern(&lf[474],10,"scrutinize");
+lf[475]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[476]=C_decode_literal(C_heaptop,"\376B\000\000\042illegal declaration specifier `~s\047");
+lf[477]=C_decode_literal(C_heaptop,"\376B\000\000!invalid declaration specification");
+lf[478]=C_h_intern(&lf[478],17,"make-foreign-stub");
+lf[479]=C_h_intern(&lf[479],12,"foreign-stub");
+lf[480]=C_h_intern(&lf[480],13,"foreign-stub\077");
+lf[481]=C_h_intern(&lf[481],15,"foreign-stub-id");
+lf[482]=C_h_intern(&lf[482],24,"foreign-stub-return-type");
+lf[483]=C_h_intern(&lf[483],17,"foreign-stub-name");
+lf[484]=C_h_intern(&lf[484],27,"foreign-stub-argument-types");
+lf[485]=C_h_intern(&lf[485],27,"foreign-stub-argument-names");
+lf[486]=C_h_intern(&lf[486],17,"foreign-stub-body");
+lf[487]=C_h_intern(&lf[487],16,"foreign-stub-cps");
+lf[488]=C_h_intern(&lf[488],21,"foreign-stub-callback");
+lf[489]=C_h_intern(&lf[489],28,"\010compilercreate-foreign-stub");
+lf[490]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\003\000\000\002\376\001\000\000\006\003sysgc\376\003\000\000\002\376\377\006\000\376\377\016\376\377\016");
+lf[491]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[492]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_bytevector");
+lf[493]=C_h_intern(&lf[493],14,"string->symbol");
+lf[494]=C_h_intern(&lf[494],37,"\010compilerestimate-foreign-result-size");
+lf[495]=C_h_intern(&lf[495],4,"stub");
+lf[496]=C_h_intern(&lf[496],1,"a");
+lf[497]=C_h_intern(&lf[497],13,"list-tabulate");
+lf[498]=C_decode_literal(C_heaptop,"\376B\000\000-name `~s\047 of foreign procedure has wrong type");
+lf[499]=C_h_intern(&lf[499],4,"cadr");
+lf[500]=C_h_intern(&lf[500],3,"car");
+lf[501]=C_h_intern(&lf[501],4,"void");
+lf[502]=C_h_intern(&lf[502],24,"\003sysline-number-database");
+lf[503]=C_h_intern(&lf[503],31,"\010compilerperform-cps-conversion");
+lf[504]=C_h_intern(&lf[504],4,"node");
+lf[505]=C_h_intern(&lf[505],9,"\004corecall");
+lf[506]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[507]=C_h_intern(&lf[507],16,"\010compilervarnode");
+lf[508]=C_h_intern(&lf[508],1,"k");
+lf[509]=C_h_intern(&lf[509],13,"\004corevariable");
+lf[510]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[511]=C_h_intern(&lf[511],2,"f_");
+lf[512]=C_h_intern(&lf[512],1,"t");
+lf[513]=C_h_intern(&lf[513],26,"make-foreign-callback-stub");
+lf[514]=C_h_intern(&lf[514],13,"\010compilerbomb");
+lf[515]=C_decode_literal(C_heaptop,"\376B\000\000\016bad node (cps)");
+lf[516]=C_h_intern(&lf[516],15,"\004coreglobal-ref");
+lf[517]=C_h_intern(&lf[517],5,"cons*");
+lf[518]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005quote\376\003\000\000\002\376\001\000\000\015\004corevariable\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\003\000\000\002\376\001\000\000\017\004coreglo"
"bal-ref\376\377\016");
-lf[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);
+lf[519]=C_h_intern(&lf[519],6,"values");
+lf[520]=C_h_intern(&lf[520],21,"foreign-callback-stub");
+lf[521]=C_h_intern(&lf[521],22,"foreign-callback-stub\077");
+lf[522]=C_h_intern(&lf[522],24,"foreign-callback-stub-id");
+lf[523]=C_h_intern(&lf[523],26,"foreign-callback-stub-name");
+lf[524]=C_h_intern(&lf[524],32,"foreign-callback-stub-qualifiers");
+lf[525]=C_h_intern(&lf[525],33,"foreign-callback-stub-return-type");
+lf[526]=C_h_intern(&lf[526],36,"foreign-callback-stub-argument-types");
+lf[527]=C_h_intern(&lf[527],27,"\010compileranalyze-expression");
+lf[528]=C_h_intern(&lf[528],13,"\010compilerput!");
+lf[529]=C_h_intern(&lf[529],8,"captured");
+lf[530]=C_h_intern(&lf[530],6,"global");
+lf[531]=C_h_intern(&lf[531],12,"\010compilerget");
+lf[532]=C_h_intern(&lf[532],12,"\004corerecurse");
+lf[533]=C_h_intern(&lf[533],17,"\010compilercollect!");
+lf[534]=C_h_intern(&lf[534],10,"call-sites");
+lf[535]=C_h_intern(&lf[535],4,"home");
+lf[536]=C_h_intern(&lf[536],7,"unknown");
+lf[537]=C_h_intern(&lf[537],18,"\004coredirect_lambda");
+lf[538]=C_h_intern(&lf[538],6,"simple");
+lf[539]=C_h_intern(&lf[539],28,"\010compilersimple-lambda-node\077");
+lf[540]=C_h_intern(&lf[540],14,"rest-parameter");
+lf[541]=C_h_intern(&lf[541],4,"list");
+lf[542]=C_h_intern(&lf[542],12,"contained-in");
+lf[543]=C_h_intern(&lf[543],8,"contains");
+lf[544]=C_h_intern(&lf[544],8,"assigned");
+lf[545]=C_h_intern(&lf[545],16,"assigned-locally");
+lf[546]=C_h_intern(&lf[546],15,"potential-value");
+lf[547]=C_h_intern(&lf[547],8,"standard");
+lf[548]=C_h_intern(&lf[548],5,"redef");
+lf[549]=C_decode_literal(C_heaptop,"\376B\000\000%redefinition of standard binding `~S\047");
+lf[550]=C_h_intern(&lf[550],8,"extended");
+lf[551]=C_decode_literal(C_heaptop,"\376B\000\000%redefinition of extended binding `~S\047");
+lf[552]=C_h_intern(&lf[552],18,"\010compilerintrinsic");
+lf[553]=C_h_intern(&lf[553],9,"\004coreproc");
+lf[554]=C_h_intern(&lf[554],9,"undefined");
+lf[555]=C_h_intern(&lf[555],5,"value");
+lf[556]=C_h_intern(&lf[556],16,"\010compilerget-all");
+lf[557]=C_h_intern(&lf[557],11,"local-value");
+lf[558]=C_h_intern(&lf[558],26,"\010compilervariable-visible\077");
+lf[559]=C_h_intern(&lf[559],10,"references");
+lf[560]=C_h_intern(&lf[560],3,"any");
+lf[561]=C_h_intern(&lf[561],9,"replacing");
+lf[562]=C_h_intern(&lf[562],10,"replacable");
+lf[563]=C_h_intern(&lf[563],9,"removable");
+lf[564]=C_h_intern(&lf[564],37,"\010compilerexpression-has-side-effects\077");
+lf[565]=C_h_intern(&lf[565],21,"has-unused-parameters");
+lf[566]=C_h_intern(&lf[566],13,"explicit-rest");
+lf[567]=C_h_intern(&lf[567],11,"collapsable");
+lf[568]=C_h_intern(&lf[568],12,"contractable");
+lf[569]=C_h_intern(&lf[569],9,"inlinable");
+lf[570]=C_h_intern(&lf[570],28,"\010compilerscan-free-variables");
+lf[571]=C_h_intern(&lf[571],11,"hidden-refs");
+lf[572]=C_h_intern(&lf[572],18,"\010compilerdebugging");
+lf[573]=C_h_intern(&lf[573],1,"i");
+lf[574]=C_decode_literal(C_heaptop,"\376B\000\000>global inlining candidate was assigned and will not be inlined");
+lf[575]=C_h_intern(&lf[575],5,"boxed");
+lf[576]=C_decode_literal(C_heaptop,"\376B\000\000\042global variable `~S\047 is never used");
+lf[577]=C_decode_literal(C_heaptop,"\376B\000\000:local assignment to unused variable `~S\047 may be unintended");
+lf[578]=C_h_intern(&lf[578],23,"\003syshash-table-for-each");
+lf[579]=C_h_intern(&lf[579],1,"p");
+lf[580]=C_decode_literal(C_heaptop,"\376B\000\000\033analysis gathering phase...");
+lf[581]=C_decode_literal(C_heaptop,"\376B\000\000\033analysis traversal phase...");
+lf[582]=C_h_intern(&lf[582],35,"\010compilerperform-closure-conversion");
+lf[583]=C_h_intern(&lf[583],12,"customizable");
+lf[584]=C_h_intern(&lf[584],11,"lset-adjoin");
+lf[585]=C_h_intern(&lf[585],20,"node-parameters-set!");
+lf[586]=C_decode_literal(C_heaptop,"\376B\000\0009known procedure called with wrong number of arguments: ~A");
+lf[587]=C_h_intern(&lf[587],28,"\010compilersource-info->string");
+lf[588]=C_h_intern(&lf[588],21,"\010compilerllist-length");
+lf[589]=C_h_intern(&lf[589],8,"toplevel");
+lf[590]=C_h_intern(&lf[590],18,"captured-variables");
+lf[591]=C_h_intern(&lf[591],12,"closure-size");
+lf[592]=C_h_intern(&lf[592],10,"\004coreunbox");
+lf[593]=C_h_intern(&lf[593],8,"\004corebox");
+lf[594]=C_h_intern(&lf[594],12,"\004coreclosure");
+lf[595]=C_h_intern(&lf[595],14,"\010compilerqnode");
+lf[596]=C_h_intern(&lf[596],20,"\003sysmake-lambda-info");
+lf[597]=C_h_intern(&lf[597],8,"->string");
+lf[598]=C_h_intern(&lf[598],1,"\077");
+lf[599]=C_h_intern(&lf[599],18,"\010compilerreal-name");
+lf[600]=C_h_intern(&lf[600],10,"fold-right");
+lf[601]=C_h_intern(&lf[601],10,"boxed-rest");
+lf[602]=C_h_intern(&lf[602],6,"filter");
+lf[603]=C_h_intern(&lf[603],16,"\004coreupdatebox_i");
+lf[604]=C_h_intern(&lf[604],14,"\004coreupdatebox");
+lf[605]=C_h_intern(&lf[605],8,"\004coreref");
+lf[606]=C_h_intern(&lf[606],13,"\004coreupdate_i");
+lf[607]=C_h_intern(&lf[607],11,"\004coreupdate");
+lf[608]=C_h_intern(&lf[608],19,"\010compilerimmediate\077");
+lf[609]=C_decode_literal(C_heaptop,"\376B\000\000\023bad node (closure2)");
+lf[610]=C_h_intern(&lf[610],11,"\004coreswitch");
+lf[611]=C_h_intern(&lf[611],9,"\004corecond");
+lf[612]=C_h_intern(&lf[612],16,"\004coredirect_call");
+lf[613]=C_h_intern(&lf[613],11,"\004corereturn");
+lf[614]=C_h_intern(&lf[614],1,"o");
+lf[615]=C_decode_literal(C_heaptop,"\376B\000\000\026calls to known targets");
+lf[616]=C_h_intern(&lf[616],16,"\003sysmake-promise");
+lf[617]=C_decode_literal(C_heaptop,"\376B\000\000*closure conversion transformation phase...");
+lf[618]=C_decode_literal(C_heaptop,"\376B\000\000\027customizable procedures");
+lf[619]=C_decode_literal(C_heaptop,"\376B\000\000%closure conversion gathering phase...");
+lf[620]=C_h_intern(&lf[620],19,"make-lambda-literal");
+lf[621]=C_h_intern(&lf[621],14,"lambda-literal");
+lf[622]=C_h_intern(&lf[622],15,"lambda-literal\077");
+lf[623]=C_h_intern(&lf[623],17,"lambda-literal-id");
+lf[624]=C_h_intern(&lf[624],23,"lambda-literal-external");
+lf[625]=C_h_intern(&lf[625],24,"lambda-literal-arguments");
+lf[626]=C_h_intern(&lf[626],29,"lambda-literal-argument-count");
+lf[627]=C_h_intern(&lf[627],28,"lambda-literal-rest-argument");
+lf[628]=C_h_intern(&lf[628],26,"lambda-literal-temporaries");
+lf[629]=C_h_intern(&lf[629],34,"lambda-literal-unboxed-temporaries");
+lf[630]=C_h_intern(&lf[630],32,"lambda-literal-callee-signatures");
+lf[631]=C_h_intern(&lf[631],24,"lambda-literal-allocated");
+lf[632]=C_h_intern(&lf[632],30,"lambda-literal-directly-called");
+lf[633]=C_h_intern(&lf[633],27,"lambda-literal-closure-size");
+lf[634]=C_h_intern(&lf[634],22,"lambda-literal-looping");
+lf[635]=C_h_intern(&lf[635],27,"lambda-literal-customizable");
+lf[636]=C_h_intern(&lf[636],33,"lambda-literal-rest-argument-mode");
+lf[637]=C_h_intern(&lf[637],19,"lambda-literal-body");
+lf[638]=C_h_intern(&lf[638],21,"lambda-literal-direct");
+lf[639]=C_h_intern(&lf[639],36,"\010compilerprepare-for-code-generation");
+lf[640]=C_h_intern(&lf[640],10,"\004corelocal");
+lf[641]=C_h_intern(&lf[641],12,"\004coreliteral");
+lf[642]=C_h_intern(&lf[642],11,"\004coreglobal");
+lf[643]=C_decode_literal(C_heaptop,"\376B\000\000!identified direct recursive calls");
+lf[644]=C_decode_literal(C_heaptop,"\376B\000\000\021bad direct lambda");
+lf[645]=C_h_intern(&lf[645],4,"none");
+lf[646]=C_decode_literal(C_heaptop,"\376B\000\000\024unused rest argument");
+lf[647]=C_h_intern(&lf[647],7,"butlast");
+lf[648]=C_h_intern(&lf[648],9,"\004corebind");
+lf[649]=C_h_intern(&lf[649],16,"\004corelet_unboxed");
+lf[650]=C_h_intern(&lf[650],13,"\004coresetlocal");
+lf[651]=C_h_intern(&lf[651],16,"\004coresetglobal_i");
+lf[652]=C_h_intern(&lf[652],14,"\004coresetglobal");
+lf[653]=C_h_intern(&lf[653],1,"=");
+lf[654]=C_decode_literal(C_heaptop,"\376B\000\0000coerced inexact literal number `~S\047 to fixnum ~S");
+lf[655]=C_decode_literal(C_heaptop,"\376B\000\000,cannot coerce inexact literal `~S\047 to fixnum");
+lf[656]=C_h_intern(&lf[656],20,"\010compilerbig-fixnum\077");
+lf[657]=C_h_intern(&lf[657],3,"max");
+lf[658]=C_h_intern(&lf[658],10,"list-index");
+lf[659]=C_h_intern(&lf[659],36,"\010compilermake-block-variable-literal");
+lf[660]=C_h_intern(&lf[660],36,"\010compilerblock-variable-literal-name");
+lf[661]=C_h_intern(&lf[661],32,"\010compilerblock-variable-literal\077");
+lf[662]=C_h_intern(&lf[662],14,"\004coreimmediate");
+lf[663]=C_h_intern(&lf[663],3,"fix");
+lf[664]=C_h_intern(&lf[664],4,"bool");
+lf[665]=C_h_intern(&lf[665],4,"char");
+lf[666]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003nil\376\377\016");
+lf[667]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003eof\376\377\016");
+lf[668]=C_decode_literal(C_heaptop,"\376B\000\000\027bad immediate (prepare)");
+lf[669]=C_decode_literal(C_heaptop,"\376B\000\000\027fast global assignments");
+lf[670]=C_decode_literal(C_heaptop,"\376B\000\000\026fast global references");
+lf[671]=C_decode_literal(C_heaptop,"\376B\000\000\030fast box initializations");
+lf[672]=C_decode_literal(C_heaptop,"\376B\000\000\024preparation phase...");
+C_register_lf2(lf,673,create_ptable());
+t2=C_mutate(&lf[0] /* (set! c385 ...) */,lf[1]);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5088,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
C_library_toplevel(2,C_SCHEME_UNDEFINED,t3);}
-/* k5135 */
-static void C_ccall f_5137(C_word c,C_word t0,C_word t1){
+/* k5086 */
+static void C_ccall f_5088(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_5088,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5091,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
-/* k5138 in k5135 */
-static void C_ccall f_5140(C_word c,C_word t0,C_word t1){
+/* k5089 in k5086 */
+static void C_ccall f_5091(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5054,10 +5026,10 @@ C_word t126;
C_word t127;
C_word t128;
C_word t129;
-C_word ab[94],*a=ab;
+C_word ab[96],*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));
+C_save_and_reclaim((void*)tr2,(void*)f_5091,2,t0,t1);}
+t2=C_mutate((C_word*)lf[2]+1 /* (set! d ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5093,tmp=(C_word)a,a+=2,tmp));
t3=C_set_block_item(lf[5] /* unit-name */,0,C_SCHEME_FALSE);
t4=C_mutate((C_word*)lf[6]+1 /* (set! number-type ...) */,lf[7]);
t5=C_set_block_item(lf[8] /* standard-bindings */,0,C_SCHEME_END_OF_LIST);
@@ -5107,88 +5079,88 @@ 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));
+t52=C_set_block_item(lf[55] /* inline-table */,0,C_SCHEME_FALSE);
+t53=C_set_block_item(lf[56] /* inline-table-used */,0,C_SCHEME_FALSE);
+t54=C_set_block_item(lf[57] /* constant-table */,0,C_SCHEME_FALSE);
+t55=C_set_block_item(lf[58] /* constants-used */,0,C_SCHEME_FALSE);
+t56=C_set_block_item(lf[59] /* broken-constant-nodes */,0,C_SCHEME_END_OF_LIST);
+t57=C_set_block_item(lf[60] /* inline-substitutions-enabled */,0,C_SCHEME_FALSE);
+t58=C_set_block_item(lf[61] /* direct-call-ids */,0,C_SCHEME_END_OF_LIST);
+t59=C_set_block_item(lf[62] /* first-analysis */,0,C_SCHEME_TRUE);
+t60=C_set_block_item(lf[63] /* foreign-type-table */,0,C_SCHEME_FALSE);
+t61=C_set_block_item(lf[64] /* foreign-variables */,0,C_SCHEME_END_OF_LIST);
+t62=C_set_block_item(lf[65] /* foreign-lambda-stubs */,0,C_SCHEME_END_OF_LIST);
+t63=C_set_block_item(lf[66] /* foreign-callback-stubs */,0,C_SCHEME_END_OF_LIST);
+t64=C_set_block_item(lf[67] /* external-variables */,0,C_SCHEME_END_OF_LIST);
+t65=C_set_block_item(lf[68] /* loop-lambda-names */,0,C_SCHEME_END_OF_LIST);
+t66=C_set_block_item(lf[69] /* profile-lambda-list */,0,C_SCHEME_END_OF_LIST);
+t67=C_set_block_item(lf[70] /* profile-lambda-index */,0,C_fix(0));
+t68=C_set_block_item(lf[71] /* profile-info-vector-name */,0,C_SCHEME_FALSE);
+t69=C_set_block_item(lf[72] /* external-to-pointer */,0,C_SCHEME_END_OF_LIST);
+t70=C_set_block_item(lf[73] /* error-is-extended-binding */,0,C_SCHEME_FALSE);
+t71=C_set_block_item(lf[74] /* real-name-table */,0,C_SCHEME_FALSE);
+t72=C_set_block_item(lf[75] /* location-pointer-map */,0,C_SCHEME_END_OF_LIST);
+t73=C_set_block_item(lf[76] /* pending-canonicalizations */,0,C_SCHEME_END_OF_LIST);
+t74=C_set_block_item(lf[77] /* defconstant-bindings */,0,C_SCHEME_END_OF_LIST);
+t75=C_set_block_item(lf[78] /* callback-names */,0,C_SCHEME_END_OF_LIST);
+t76=C_set_block_item(lf[79] /* toplevel-scope */,0,C_SCHEME_TRUE);
+t77=C_set_block_item(lf[80] /* toplevel-lambda-id */,0,C_SCHEME_FALSE);
+t78=C_set_block_item(lf[81] /* csc-control-file */,0,C_SCHEME_FALSE);
+t79=C_set_block_item(lf[82] /* data-declarations */,0,C_SCHEME_END_OF_LIST);
+t80=C_set_block_item(lf[83] /* file-requirements */,0,C_SCHEME_FALSE);
+t81=C_set_block_item(lf[84] /* postponed-initforms */,0,C_SCHEME_END_OF_LIST);
+t82=C_mutate((C_word*)lf[85]+1 /* (set! initialize-compiler ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5187,tmp=(C_word)a,a+=2,tmp));
+t83=C_mutate((C_word*)lf[90]+1 /* (set! canonicalize-expression ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5248,tmp=(C_word)a,a+=2,tmp));
+t84=C_mutate((C_word*)lf[316]+1 /* (set! process-declaration ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10414,tmp=(C_word)a,a+=2,tmp));
+t85=C_mutate((C_word*)lf[478]+1 /* (set! make-foreign-stub ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12024,tmp=(C_word)a,a+=2,tmp));
+t86=C_mutate((C_word*)lf[480]+1 /* (set! foreign-stub? ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12030,tmp=(C_word)a,a+=2,tmp));
+t87=C_mutate((C_word*)lf[481]+1 /* (set! foreign-stub-id ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12036,tmp=(C_word)a,a+=2,tmp));
+t88=C_mutate((C_word*)lf[482]+1 /* (set! foreign-stub-return-type ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12045,tmp=(C_word)a,a+=2,tmp));
+t89=C_mutate((C_word*)lf[483]+1 /* (set! foreign-stub-name ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12054,tmp=(C_word)a,a+=2,tmp));
+t90=C_mutate((C_word*)lf[484]+1 /* (set! foreign-stub-argument-types ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12063,tmp=(C_word)a,a+=2,tmp));
+t91=C_mutate((C_word*)lf[485]+1 /* (set! foreign-stub-argument-names ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12072,tmp=(C_word)a,a+=2,tmp));
+t92=C_mutate((C_word*)lf[486]+1 /* (set! foreign-stub-body ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12081,tmp=(C_word)a,a+=2,tmp));
+t93=C_mutate((C_word*)lf[487]+1 /* (set! foreign-stub-cps ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12090,tmp=(C_word)a,a+=2,tmp));
+t94=C_mutate((C_word*)lf[488]+1 /* (set! foreign-stub-callback ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12099,tmp=(C_word)a,a+=2,tmp));
+t95=C_mutate((C_word*)lf[489]+1 /* (set! create-foreign-stub ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12108,tmp=(C_word)a,a+=2,tmp));
+t96=C_mutate((C_word*)lf[281]+1 /* (set! expand-foreign-lambda ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12359,tmp=(C_word)a,a+=2,tmp));
+t97=C_mutate((C_word*)lf[284]+1 /* (set! expand-foreign-lambda* ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12396,tmp=(C_word)a,a+=2,tmp));
+t98=C_mutate((C_word*)lf[287]+1 /* (set! expand-foreign-primitive ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12495,tmp=(C_word)a,a+=2,tmp));
+t99=C_mutate((C_word*)lf[344]+1 /* (set! update-line-number-database! ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12634,tmp=(C_word)a,a+=2,tmp));
+t100=C_mutate((C_word*)lf[503]+1 /* (set! perform-cps-conversion ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12724,tmp=(C_word)a,a+=2,tmp));
+t101=C_mutate((C_word*)lf[513]+1 /* (set! make-foreign-callback-stub ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13583,tmp=(C_word)a,a+=2,tmp));
+t102=C_mutate((C_word*)lf[521]+1 /* (set! foreign-callback-stub? ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13589,tmp=(C_word)a,a+=2,tmp));
+t103=C_mutate((C_word*)lf[522]+1 /* (set! foreign-callback-stub-id ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13595,tmp=(C_word)a,a+=2,tmp));
+t104=C_mutate((C_word*)lf[523]+1 /* (set! foreign-callback-stub-name ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13604,tmp=(C_word)a,a+=2,tmp));
+t105=C_mutate((C_word*)lf[524]+1 /* (set! foreign-callback-stub-qualifiers ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13613,tmp=(C_word)a,a+=2,tmp));
+t106=C_mutate((C_word*)lf[525]+1 /* (set! foreign-callback-stub-return-type ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13622,tmp=(C_word)a,a+=2,tmp));
+t107=C_mutate((C_word*)lf[526]+1 /* (set! foreign-callback-stub-argument-types ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13631,tmp=(C_word)a,a+=2,tmp));
+t108=C_mutate((C_word*)lf[527]+1 /* (set! analyze-expression ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13640,tmp=(C_word)a,a+=2,tmp));
+t109=C_mutate((C_word*)lf[582]+1 /* (set! perform-closure-conversion ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_15586,tmp=(C_word)a,a+=2,tmp));
+t110=C_mutate((C_word*)lf[620]+1 /* (set! make-lambda-literal ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17346,tmp=(C_word)a,a+=2,tmp));
+t111=C_mutate((C_word*)lf[622]+1 /* (set! lambda-literal? ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17352,tmp=(C_word)a,a+=2,tmp));
+t112=C_mutate((C_word*)lf[623]+1 /* (set! lambda-literal-id ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17358,tmp=(C_word)a,a+=2,tmp));
+t113=C_mutate((C_word*)lf[624]+1 /* (set! lambda-literal-external ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17367,tmp=(C_word)a,a+=2,tmp));
+t114=C_mutate((C_word*)lf[625]+1 /* (set! lambda-literal-arguments ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17376,tmp=(C_word)a,a+=2,tmp));
+t115=C_mutate((C_word*)lf[626]+1 /* (set! lambda-literal-argument-count ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17385,tmp=(C_word)a,a+=2,tmp));
+t116=C_mutate((C_word*)lf[627]+1 /* (set! lambda-literal-rest-argument ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17394,tmp=(C_word)a,a+=2,tmp));
+t117=C_mutate((C_word*)lf[628]+1 /* (set! lambda-literal-temporaries ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17403,tmp=(C_word)a,a+=2,tmp));
+t118=C_mutate((C_word*)lf[629]+1 /* (set! lambda-literal-unboxed-temporaries ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17412,tmp=(C_word)a,a+=2,tmp));
+t119=C_mutate((C_word*)lf[630]+1 /* (set! lambda-literal-callee-signatures ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17421,tmp=(C_word)a,a+=2,tmp));
+t120=C_mutate((C_word*)lf[631]+1 /* (set! lambda-literal-allocated ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17430,tmp=(C_word)a,a+=2,tmp));
+t121=C_mutate((C_word*)lf[632]+1 /* (set! lambda-literal-directly-called ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17439,tmp=(C_word)a,a+=2,tmp));
+t122=C_mutate((C_word*)lf[633]+1 /* (set! lambda-literal-closure-size ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17448,tmp=(C_word)a,a+=2,tmp));
+t123=C_mutate((C_word*)lf[634]+1 /* (set! lambda-literal-looping ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17457,tmp=(C_word)a,a+=2,tmp));
+t124=C_mutate((C_word*)lf[635]+1 /* (set! lambda-literal-customizable ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17466,tmp=(C_word)a,a+=2,tmp));
+t125=C_mutate((C_word*)lf[636]+1 /* (set! lambda-literal-rest-argument-mode ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17475,tmp=(C_word)a,a+=2,tmp));
+t126=C_mutate((C_word*)lf[637]+1 /* (set! lambda-literal-body ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17484,tmp=(C_word)a,a+=2,tmp));
+t127=C_mutate((C_word*)lf[638]+1 /* (set! lambda-literal-direct ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17493,tmp=(C_word)a,a+=2,tmp));
+t128=C_mutate((C_word*)lf[639]+1 /* (set! prepare-for-code-generation ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17502,tmp=(C_word)a,a+=2,tmp));
t129=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t129+1)))(2,t129,C_SCHEME_UNDEFINED);}
-/* ##compiler#prepare-for-code-generation in k5138 in k5135 */
-static void C_ccall f_17711(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
+/* ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17502(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5236,10 +5208,12 @@ C_word t46;
C_word t47;
C_word t48;
C_word t49;
-C_word ab[92],*a=ab;
+C_word t50;
+C_word t51;
+C_word ab[95],*a=ab;
if(c!=4) C_bad_argc_2(c,4,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_17711,4,t0,t1,t2,t3);}
+C_save_and_reclaim((void*)tr4,(void*)f_17502,4,t0,t1,t2,t3);}
t4=C_SCHEME_END_OF_LIST;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_END_OF_LIST;
@@ -5248,19 +5222,19 @@ 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);
+t12=C_SCHEME_END_OF_LIST;
t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
t14=C_fix(0);
t15=(*a=C_VECTOR_TYPE|1,a[1]=t14,tmp=(C_word)a,a+=2,tmp);
-t16=C_SCHEME_END_OF_LIST;
+t16=C_fix(0);
t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_fix(0);
+t18=C_SCHEME_END_OF_LIST;
t19=(*a=C_VECTOR_TYPE|1,a[1]=t18,tmp=(C_word)a,a+=2,tmp);
t20=C_fix(0);
t21=(*a=C_VECTOR_TYPE|1,a[1]=t20,tmp=(C_word)a,a+=2,tmp);
t22=C_fix(0);
t23=(*a=C_VECTOR_TYPE|1,a[1]=t22,tmp=(C_word)a,a+=2,tmp);
-t24=C_SCHEME_UNDEFINED;
+t24=C_fix(0);
t25=(*a=C_VECTOR_TYPE|1,a[1]=t24,tmp=(C_word)a,a+=2,tmp);
t26=C_SCHEME_UNDEFINED;
t27=(*a=C_VECTOR_TYPE|1,a[1]=t26,tmp=(C_word)a,a+=2,tmp);
@@ -5276,77 +5250,79 @@ 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]);}
+t40=C_SCHEME_UNDEFINED;
+t41=(*a=C_VECTOR_TYPE|1,a[1]=t40,tmp=(C_word)a,a+=2,tmp);
+t42=C_set_block_item(t27,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17505,a[2]=t29,a[3]=t35,tmp=(C_word)a,a+=4,tmp));
+t43=C_set_block_item(t29,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17556,a[2]=t3,a[3]=t23,a[4]=t35,a[5]=t39,tmp=(C_word)a,a+=6,tmp));
+t44=C_set_block_item(t31,0,(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_17629,a[2]=t41,a[3]=t25,a[4]=t35,a[5]=t39,a[6]=t3,a[7]=t9,a[8]=t17,a[9]=t19,a[10]=t13,a[11]=t11,a[12]=t21,a[13]=t31,a[14]=t33,a[15]=t15,a[16]=t29,a[17]=t27,tmp=(C_word)a,a+=18,tmp));
+t45=C_set_block_item(t33,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18752,a[2]=t31,tmp=(C_word)a,a+=3,tmp));
+t46=C_set_block_item(t35,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18798,a[2]=t7,a[3]=t5,a[4]=t37,a[5]=t41,tmp=(C_word)a,a+=6,tmp));
+t47=C_set_block_item(t37,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18878,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
+t48=C_set_block_item(t39,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18892,a[2]=t5,a[3]=t37,tmp=(C_word)a,a+=4,tmp));
+t49=C_set_block_item(t41,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_18924,tmp=(C_word)a,a+=2,tmp));
+t50=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_19009,a[2]=t2,a[3]=t31,a[4]=t21,a[5]=t23,a[6]=t25,a[7]=t9,a[8]=t7,a[9]=t5,a[10]=t1,tmp=(C_word)a,a+=11,tmp);
+C_trace("compiler.scm: 2668 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[572]))(4,*((C_word*)lf[572]+1),t50,lf[579],lf[672]);}
-/* 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){
+/* k19007 in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_19009(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_19009,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19012,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 2669 walk");
t3=((C_word*)((C_word*)t0)[3])[1];
-f_17838(t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);}
+f_17629(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){
+/* k19010 in k19007 in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_19012(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_19012,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19015,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 2670 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[572]))(5,*((C_word*)lf[572]+1),t2,lf[614],lf[671],((C_word*)((C_word*)t0)[2])[1]);}
-/* 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){
+/* k19013 in k19010 in k19007 in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_19015(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_19015,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19018,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 2671 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[572]))(5,*((C_word*)lf[572]+1),t2,lf[614],lf[670],((C_word*)((C_word*)t0)[2])[1]);}
-/* 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){
+/* k19016 in k19013 in k19010 in k19007 in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_19018(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_19018,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19021,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 2672 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[572]))(5,*((C_word*)lf[572]+1),t2,lf[614],lf[669],((C_word*)((C_word*)t0)[2])[1]);}
-/* 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){
+/* k19019 in k19016 in k19013 in k19010 in k19007 in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_19021(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 2677 values");
+C_trace("compiler.scm: 2673 values");
C_values(6,0,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)((C_word*)t0)[4])[1],((C_word*)((C_word*)t0)[3])[1],((C_word*)((C_word*)t0)[2])[1]);}
-/* immediate-literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
-static void C_fcall f_19096(C_word t1,C_word t2){
+/* immediate-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18924(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5366,141 +5342,141 @@ 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);
+C_save_and_reclaim((void*)trf_18924,NULL,2,t1,t2);}
+t3=C_retrieve(lf[99]);
+t4=C_eqp(t3,t2);
if(C_truep(t4)){
t5=t1;
t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[512],lf[139],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[504],lf[138],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST));}
else{
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18951,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_fixnump(t2))){
+t6=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,lf[663],t6);
t8=t1;
t9=t8;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_record(&a,4,lf[512],lf[673],t7,C_SCHEME_END_OF_LIST));}
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_a_i_record(&a,4,lf[504],lf[662],t7,C_SCHEME_END_OF_LIST));}
else{
-if(C_truep((C_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);
+if(C_truep(C_booleanp(t2))){
+t6=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,lf[664],t6);
t8=t1;
t9=t8;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_record(&a,4,lf[512],lf[673],t7,C_SCHEME_END_OF_LIST));}
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_a_i_record(&a,4,lf[504],lf[662],t7,C_SCHEME_END_OF_LIST));}
else{
-if(C_truep((C_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);
+if(C_truep(C_charp(t2))){
+t6=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,lf[665],t6);
t8=t1;
t9=t8;
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_record(&a,4,lf[512],lf[673],t7,C_SCHEME_END_OF_LIST));}
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_a_i_record(&a,4,lf[504],lf[662],t7,C_SCHEME_END_OF_LIST));}
else{
-if(C_truep((C_word)C_i_nullp(t2))){
+if(C_truep(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));}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_record(&a,4,lf[504],lf[662],lf[666],C_SCHEME_END_OF_LIST));}
else{
-if(C_truep((C_word)C_eofp(t2))){
+if(C_truep(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));}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_record(&a,4,lf[504],lf[662],lf[667],C_SCHEME_END_OF_LIST));}
else{
-C_trace("compiler.scm: 2669 bomb");
-((C_proc3)C_retrieve_symbol_proc(lf[522]))(3,*((C_word*)lf[522]+1),t5,lf[679]);}}}}}}}
+C_trace("compiler.scm: 2665 bomb");
+((C_proc3)C_retrieve_symbol_proc(lf[514]))(3,*((C_word*)lf[514]+1),t5,lf[668]);}}}}}}}
-/* 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){
+/* k18949 in immediate-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18951(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19123,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_18951,2,t0,t1);}
t2=((C_word*)t0)[2];
t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],lf[673],t1,C_SCHEME_END_OF_LIST));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],lf[662],t1,C_SCHEME_END_OF_LIST));}
-/* blockvar-literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
-static void C_fcall f_19064(C_word t0,C_word t1,C_word t2){
+/* blockvar-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18892(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_18892,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18896,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18908,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2649 list-index");
+((C_proc4)C_retrieve_symbol_proc(lf[658]))(4,*((C_word*)lf[658]+1),t3,t4,((C_word*)((C_word*)t0)[2])[1]);}
-/* 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){
+/* a18907 in blockvar-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18908(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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);}
+C_save_and_reclaim((void*)tr3,(void*)f_18908,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18915,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2651 block-variable-literal?");
+((C_proc3)C_retrieve_symbol_proc(lf[661]))(3,*((C_word*)lf[661]+1),t3,t2);}
-/* 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){
+/* k18913 in a18907 in blockvar-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18915(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19087,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_18915,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18922,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2652 block-variable-literal-name");
+((C_proc3)C_retrieve_symbol_proc(lf[660]))(3,*((C_word*)lf[660]+1),t2,((C_word*)t0)[2]);}
else{
t2=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-/* 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){
+/* k18920 in k18913 in a18907 in blockvar-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18922(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_eqp(((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k18894 in blockvar-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18896(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19068,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_18896,2,t0,t1);}
if(C_truep(t1)){
t2=t1;
t3=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18906,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2654 make-block-variable-literal");
+((C_proc3)C_retrieve_symbol_proc(lf[659]))(3,*((C_word*)lf[659]+1),t2,((C_word*)t0)[2]);}}
-/* 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){
+/* k18904 in k18894 in blockvar-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18906(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 2658 new-literal");
+C_trace("compiler.scm: 2654 new-literal");
t2=((C_word*)((C_word*)t0)[3])[1];
-f_19050(t2,((C_word*)t0)[2],t1);}
+f_18878(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){
+/* new-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18878(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5508,15 +5484,15 @@ 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);}
+C_save_and_reclaim((void*)trf_18878,NULL,3,t0,t1,t2);}
+t3=C_i_length(((C_word*)((C_word*)t0)[2])[1]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18886,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+t5=C_a_i_list(&a,1,t2);
+C_trace("compiler.scm: 2645 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t4,((C_word*)((C_word*)t0)[2])[1],t5);}
-/* 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){
+/* k18884 in new-literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18886(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5525,20 +5501,20 @@ 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){
+/* literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18798(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_18798,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_18805,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=t1,a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 2629 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[608]))(3,*((C_word*)lf[608]+1),t3,t2);}
-/* 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){
+/* k18803 in literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18805(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5549,35 +5525,35 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_18805,2,t0,t1);}
if(C_truep(t1)){
-C_trace("compiler.scm: 2633 immediate-literal");
-f_19096(((C_word*)t0)[6],((C_word*)t0)[5]);}
+C_trace("compiler.scm: 2629 immediate-literal");
+f_18924(((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]);}
+if(C_truep(C_i_numberp(((C_word*)t0)[5]))){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18817,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_i_inexactp(((C_word*)t0)[5]))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18831,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2632 list-index");
+((C_proc4)C_retrieve_symbol_proc(lf[658]))(4,*((C_word*)lf[658]+1),t2,t3,((C_word*)((C_word*)t0)[3])[1]);}
else{
-C_trace("compiler.scm: 2638 new-literal");
+C_trace("compiler.scm: 2634 new-literal");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_19050(t3,((C_word*)t0)[6],((C_word*)t0)[5]);}}
+f_18878(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);}
+if(C_truep(C_lambdainfop(((C_word*)t0)[5]))){
+t2=C_i_length(((C_word*)((C_word*)t0)[2])[1]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18857,a[2]=t2,a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+t4=C_a_i_list(&a,1,((C_word*)t0)[5]);
+C_trace("compiler.scm: 2638 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t3,((C_word*)((C_word*)t0)[2])[1],t4);}
else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}}}}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18867,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2640 posq");
+((C_proc4)C_retrieve_symbol_proc(lf[180]))(4,*((C_word*)lf[180]+1),t2,((C_word*)t0)[5],((C_word*)((C_word*)t0)[3])[1]);}}}}
-/* 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){
+/* k18865 in k18803 in literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18867(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
@@ -5585,24 +5561,24 @@ 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");
+C_trace("compiler.scm: 2641 new-literal");
t2=((C_word*)((C_word*)t0)[3])[1];
-f_19050(t2,((C_word*)t0)[4],((C_word*)t0)[2]);}}
+f_18878(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){
+/* k18855 in k18803 in literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18857(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[2],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_19029,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_18857,2,t0,t1);}
t2=C_mutate(((C_word *)((C_word*)t0)[4])+1,t1);
t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_vector(&a,1,((C_word*)t0)[2]));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,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){
+/* a18830 in k18803 in literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18831(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5610,13 +5586,13 @@ 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))){
+C_save_and_reclaim((void*)tr3,(void*)f_18831,3,t0,t1,t2);}
+if(C_truep(C_i_numberp(t2))){
+if(C_truep(C_i_inexactp(t2))){
t3=((C_word*)t0)[2];
t4=t2;
t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_eqp(t3,t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_eqp(t3,t4));}
else{
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
@@ -5624,8 +5600,8 @@ 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){
+/* k18815 in k18803 in literal in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18817(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5635,12 +5611,12 @@ 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");
+C_trace("compiler.scm: 2634 new-literal");
t2=((C_word*)((C_word*)t0)[3])[1];
-f_19050(t2,((C_word*)t0)[4],((C_word*)t0)[2]);}}
+f_18878(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){
+/* mapwalk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18752(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -5652,19 +5628,19 @@ 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);}
+C_save_and_reclaim((void*)trf_18752,NULL,6,t0,t1,t2,t3,t4,t5);}
t6=C_SCHEME_END_OF_LIST;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=C_SCHEME_FALSE;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
t10=C_SCHEME_UNDEFINED;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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));
+t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_18758,a[2]=t7,a[3]=t11,a[4]=t9,a[5]=t5,a[6]=t4,a[7]=t3,a[8]=((C_word*)t0)[2],tmp=(C_word)a,a+=9,tmp));
t13=((C_word*)t11)[1];
-f_18930(t13,t1,t2);}
+f_18758(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){
+/* loop4885 in mapwalk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18758(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5673,21 +5649,21 @@ 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");
+C_save_and_reclaim((void*)trf_18758,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18785,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18792,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g49014902");
t6=t3;
-f_18957(t6,t4,t5);}
+f_18785(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k18790 in loop4885 in mapwalk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18792(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5699,36 +5675,36 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_18792,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop49334946");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop48854898");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_18930(t6,((C_word*)t0)[3],t5);}
+f_18758(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop49334946");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop48854898");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_18930(t6,((C_word*)t0)[3],t5);}}
+f_18758(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){
+/* g4901 in loop4885 in mapwalk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18785(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18957,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 2630 walk");
+C_save_and_reclaim((void*)trf_18785,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 2626 walk");
t3=((C_word*)((C_word*)t0)[5])[1];
-f_17838(t3,t1,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_17629(t3,t1,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* walk in ##compiler#prepare-for-code-generation in 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){
+/* walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_17629(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -5827,246 +5803,264 @@ C_word t99;
C_word t100;
C_word t101;
C_word t102;
+C_word t103;
+C_word t104;
+C_word t105;
+C_word t106;
+C_word t107;
+C_word t108;
+C_word t109;
C_word *a;
loop:
-a=C_alloc(17);
+a=C_alloc(18);
if(!C_stack_probe(a)){
-C_save_and_reclaim((void*)trf_17838,NULL,6,t0,t1,t2,t3,t4,t5);}
+C_save_and_reclaim((void*)trf_17629,NULL,6,t0,t1,t2,t3,t4,t5);}
t6=t2;
-t7=(C_word)C_slot(t6,C_fix(3));
+t7=C_slot(t6,C_fix(3));
t8=t2;
-t9=(C_word)C_slot(t8,C_fix(2));
+t9=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]));
+t11=C_slot(t10,C_fix(1));
+t12=C_eqp(t11,lf[138]);
+t13=(C_truep(t12)?t12:C_eqp(t11,lf[553]));
if(C_truep(t13)){
t14=t2;
t15=t1;
((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,t14);}
else{
-t14=(C_word)C_eqp(t11,lf[517]);
+t14=C_eqp(t11,lf[509]);
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);}
+t15=C_i_car(t9);
+C_trace("compiler.scm: 2419 walk-var");
+t16=((C_word*)((C_word*)t0)[17])[1];
+f_17505(t16,t1,t15,t3,C_SCHEME_FALSE);}
else{
-t15=(C_word)C_eqp(t11,lf[524]);
+t15=C_eqp(t11,lf[516]);
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);}
+t16=C_i_car(t9);
+C_trace("compiler.scm: 2422 walk-global");
+t17=((C_word*)((C_word*)t0)[16])[1];
+f_17556(t17,t1,t16,C_SCHEME_TRUE);}
else{
-t16=(C_word)C_eqp(t11,lf[624]);
+t16=C_eqp(t11,lf[612]);
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]);
+t17=C_i_cadddr(t9);
+t18=C_fixnum_plus(((C_word*)((C_word*)t0)[15])[1],t17);
+t19=C_mutate(((C_word *)((C_word*)t0)[15])+1,t18);
+t20=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17711,a[2]=t9,a[3]=t11,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2426 mapwalk");
+t21=((C_word*)((C_word*)t0)[14])[1];
+f_18752(t21,t20,t7,t3,t4,t5);}
+else{
+t17=C_eqp(t11,lf[271]);
if(C_truep(t17)){
-t18=(C_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]);
+t18=C_i_cadr(t9);
+t19=C_fixnum_plus(((C_word*)((C_word*)t0)[15])[1],t18);
+t20=C_mutate(((C_word *)((C_word*)t0)[15])+1,t19);
+t21=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17737,a[2]=t9,a[3]=t11,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2430 mapwalk");
+t22=((C_word*)((C_word*)t0)[14])[1];
+f_18752(t22,t21,t7,t3,t4,t5);}
+else{
+t18=C_eqp(t11,lf[100]);
if(C_truep(t18)){
-t19=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);}
+t19=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17763,a[2]=t9,a[3]=t11,a[4]=t1,a[5]=((C_word*)t0)[15],tmp=(C_word)a,a+=6,tmp);
+t20=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17767,a[2]=t19,tmp=(C_word)a,a+=3,tmp);
+t21=C_i_cadr(t9);
+C_trace("compiler.scm: 2433 estimate-foreign-result-size");
+((C_proc3)C_retrieve_symbol_proc(lf[494]))(3,*((C_word*)lf[494]+1),t20,t21);}
else{
-t19=(C_word)C_eqp(t11,lf[105]);
+t19=C_eqp(t11,lf[104]);
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);}
+t20=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_17797,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t7,a[6]=((C_word*)t0)[14],a[7]=t9,a[8]=t11,a[9]=t1,a[10]=((C_word*)t0)[15],tmp=(C_word)a,a+=11,tmp);
+t21=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17801,a[2]=t20,tmp=(C_word)a,a+=3,tmp);
+t22=C_i_car(t9);
+C_trace("compiler.scm: 2437 estimate-foreign-result-size");
+((C_proc3)C_retrieve_symbol_proc(lf[494]))(3,*((C_word*)lf[494]+1),t21,t22);}
else{
-t20=(C_word)C_eqp(t11,lf[606]);
+t20=C_eqp(t11,lf[594]);
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]);
+t21=C_i_car(t9);
+t22=C_fixnum_plus(C_fixnum_plus(((C_word*)((C_word*)t0)[15])[1],t21),C_fix(1));
+t23=C_mutate(((C_word *)((C_word*)t0)[15])+1,t22);
+t24=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17827,a[2]=t9,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2442 mapwalk");
+t25=((C_word*)((C_word*)t0)[14])[1];
+f_18752(t25,t24,t7,t3,t4,t5);}
+else{
+t21=C_eqp(t11,lf[593]);
if(C_truep(t21)){
-t22=(C_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;
+t22=C_fixnum_plus(((C_word*)((C_word*)t0)[15])[1],C_fix(2));
+t23=C_mutate(((C_word *)((C_word*)t0)[15])+1,t22);
+t24=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17857,a[2]=t9,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t25=C_i_car(t7);
+C_trace("compiler.scm: 2446 walk");
+t105=t24;
+t106=t25;
+t107=t3;
+t108=t4;
+t109=t5;
+t1=t105;
+t2=t106;
+t3=t107;
+t4=t108;
+t5=t109;
goto loop;}
else{
-t22=(C_word)C_eqp(t11,lf[616]);
+t22=C_eqp(t11,lf[604]);
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]));
+t23=C_i_car(t7);
+t24=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17873,a[2]=t5,a[3]=t23,a[4]=t11,a[5]=t1,a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 2450 mapwalk");
+t25=((C_word*)((C_word*)t0)[14])[1];
+f_18752(t25,t24,t7,t3,t4,t5);}
+else{
+t23=C_eqp(t11,lf[172]);
+t24=(C_truep(t23)?t23:C_eqp(t11,lf[537]));
if(C_truep(t24)){
-t25=((C_word*)((C_word*)t0)[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]);
+t25=((C_word*)((C_word*)t0)[11])[1];
+t26=((C_word*)((C_word*)t0)[10])[1];
+t27=((C_word*)((C_word*)t0)[9])[1];
+t28=((C_word*)((C_word*)t0)[8])[1];
+t29=((C_word*)((C_word*)t0)[15])[1];
+t30=C_eqp(t11,lf[537]);
+t31=C_set_block_item(((C_word*)t0)[11],0,C_fix(0));
+t32=C_set_block_item(((C_word*)t0)[10],0,C_SCHEME_END_OF_LIST);
+t33=C_set_block_item(((C_word*)t0)[15],0,C_fix(0));
+t34=C_set_block_item(((C_word*)t0)[9],0,C_SCHEME_END_OF_LIST);
+t35=C_set_block_item(((C_word*)t0)[8],0,C_fix(0));
+t36=C_i_caddr(t9);
+t37=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_17946,a[2]=((C_word*)t0)[13],a[3]=t7,a[4]=((C_word*)t0)[6],a[5]=t30,a[6]=t27,a[7]=((C_word*)t0)[9],a[8]=t29,a[9]=((C_word*)t0)[15],a[10]=t26,a[11]=((C_word*)t0)[10],a[12]=t25,a[13]=((C_word*)t0)[11],a[14]=t28,a[15]=((C_word*)t0)[8],a[16]=((C_word*)t0)[7],a[17]=t9,tmp=(C_word)a,a+=18,tmp);
+C_trace("compiler.scm: 2472 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),t1,t36,t37);}
+else{
+t25=C_eqp(t11,lf[158]);
if(C_truep(t25)){
-t26=(C_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;
+t26=C_i_car(t9);
+t27=C_i_car(t7);
+t28=C_slot(t27,C_fix(1));
+t29=C_eqp(lf[593],t28);
+t30=(C_truep(t29)?C_a_i_list(&a,1,t26):C_SCHEME_END_OF_LIST);
+t31=C_fixnum_increase(((C_word*)((C_word*)t0)[11])[1]);
+t32=C_mutate(((C_word *)((C_word*)t0)[11])+1,t31);
+t33=C_a_i_list(&a,1,C_fix(1));
+t34=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_18135,a[2]=t9,a[3]=t3,a[4]=t5,a[5]=t30,a[6]=t4,a[7]=((C_word*)t0)[13],a[8]=t7,a[9]=t33,a[10]=t1,tmp=(C_word)a,a+=11,tmp);
+C_trace("compiler.scm: 2530 walk");
+t105=t34;
+t106=t27;
+t107=t3;
+t108=t4;
+t109=t5;
+t1=t105;
+t2=t106;
+t3=t107;
+t4=t108;
+t5=t109;
goto loop;}
else{
-t26=(C_word)C_eqp(t11,lf[252]);
+t26=C_eqp(t11,lf[649]);
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]);
+t27=C_i_car(t9);
+t28=C_i_car(t7);
+t29=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_18182,a[2]=t28,a[3]=t5,a[4]=t4,a[5]=t3,a[6]=((C_word*)t0)[13],a[7]=t7,a[8]=t9,a[9]=t1,a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
+t30=C_i_cadr(t9);
+C_trace("compiler.scm: 2536 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t29,t27,t30,((C_word*)((C_word*)t0)[10])[1]);}
+else{
+t27=C_eqp(t11,lf[250]);
if(C_truep(t27)){
-t28=(C_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);}
+t28=C_i_car(t9);
+t29=C_i_car(t7);
+t30=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_18225,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t7,a[6]=t28,a[7]=t1,a[8]=t5,a[9]=t4,a[10]=t3,a[11]=t29,a[12]=((C_word*)t0)[13],tmp=(C_word)a,a+=13,tmp);
+C_trace("compiler.scm: 2545 posq");
+((C_proc4)C_retrieve_symbol_proc(lf[180]))(4,*((C_word*)lf[180]+1),t30,t28,t3);}
else{
-t28=(C_word)C_eqp(t11,lf[540]);
+t28=C_eqp(t11,lf[505]);
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);}}
+t29=C_i_cdr(t7);
+t30=C_i_length(t29);
+t31=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_18383,a[2]=((C_word*)t0)[8],a[3]=t5,a[4]=t4,a[5]=t3,a[6]=t7,a[7]=((C_word*)t0)[14],a[8]=t9,a[9]=t11,a[10]=t1,a[11]=((C_word*)t0)[9],tmp=(C_word)a,a+=12,tmp);
+C_trace("compiler.scm: 2569 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[584]))(5,*((C_word*)lf[584]+1),t31,*((C_word*)lf[653]+1),((C_word*)((C_word*)t0)[9])[1],t30);}
else{
-t29=(C_word)C_eqp(t11,lf[99]);
+t29=C_eqp(t11,lf[532]);
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);}
+t30=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18432,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t7,a[6]=((C_word*)t0)[14],a[7]=t9,a[8]=t11,a[9]=t1,tmp=(C_word)a,a+=10,tmp);
+if(C_truep(C_i_car(t9))){
+t31=C_fixnum_increase(((C_word*)((C_word*)t0)[8])[1]);
+t32=C_mutate(((C_word *)((C_word*)t0)[8])+1,t31);
+t33=t30;
+f_18432(t33,t32);}
else{
-t32=t31;
-f_18638(t32,C_SCHEME_FALSE);}}
+t31=t30;
+f_18432(t31,C_SCHEME_UNDEFINED);}}
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;
+t30=C_eqp(t11,lf[98]);
+if(C_truep(t30)){
+t31=C_i_car(t9);
+t32=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18466,a[2]=((C_word*)t0)[4],a[3]=t31,a[4]=t1,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_fixnump(t31))){
+t33=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18565,a[2]=t32,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2580 big-fixnum?");
+((C_proc3)C_retrieve_symbol_proc(lf[656]))(3,*((C_word*)lf[656]+1),t33,t31);}
+else{
+t33=t32;
+f_18466(t33,C_SCHEME_FALSE);}}
+else{
+t31=C_eqp(t11,lf[123]);
+t32=(C_truep(t31)?t31:C_eqp(t11,lf[611]));
+if(C_truep(t32)){
+t33=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_18577,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=((C_word*)t0)[13],a[6]=t7,a[7]=t9,a[8]=t11,a[9]=t1,a[10]=((C_word*)t0)[15],tmp=(C_word)a,a+=11,tmp);
+t34=C_i_car(t7);
+C_trace("compiler.scm: 2595 walk");
+t105=t33;
+t106=t34;
+t107=t3;
+t108=t4;
+t109=t5;
+t1=t105;
+t2=t106;
+t3=t107;
+t4=t108;
+t5=t109;
goto loop;}
else{
-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;
+t33=C_eqp(t11,lf[610]);
+if(C_truep(t33)){
+t34=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_18632,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=((C_word*)t0)[13],a[6]=t7,a[7]=t9,a[8]=t11,a[9]=t1,a[10]=((C_word*)t0)[15],tmp=(C_word)a,a+=11,tmp);
+t35=C_i_car(t7);
+C_trace("compiler.scm: 2604 walk");
+t105=t34;
+t106=t35;
+t107=t3;
+t108=t4;
+t109=t5;
+t1=t105;
+t2=t106;
+t3=t107;
+t4=t108;
+t5=t109;
goto loop;}
else{
-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);}}}}}}}}}}}}}}}}}}}
+t34=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18741,a[2]=t9,a[3]=t11,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2623 mapwalk");
+t35=((C_word*)((C_word*)t0)[14])[1];
+f_18752(t35,t34,t7,t3,t4,t5);}}}}}}}}}}}}}}}}}}}}
-/* 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){
+/* k18739 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18741(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18913,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_18741,2,t0,t1);}
t2=((C_word*)t0)[4];
t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-/* 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){
+/* k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18632(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6078,19 +6072,19 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_18632,2,t0,t1);}
t2=((C_word*)((C_word*)t0)[10])[1];
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18648,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t4=C_i_car(((C_word*)t0)[7]);
+t5=C_i_cdr(((C_word*)t0)[6]);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_18658,a[2]=t7,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t2,a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp));
t9=((C_word*)t7)[1];
-f_18830(t9,t3,t4,t5,C_fix(0));}
+f_18658(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){
+/* loop in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18658(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -6101,39 +6095,39 @@ 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);}
+C_save_and_reclaim((void*)trf_18658,NULL,5,t0,t1,t2,t3,t4);}
t5=C_mutate(((C_word *)((C_word*)t0)[8])+1,((C_word*)t0)[7]);
-t6=(C_word)C_eqp(t2,C_fix(0));
+t6=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");
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18669,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+t8=C_i_car(t3);
+C_trace("compiler.scm: 2614 walk");
t9=((C_word*)((C_word*)t0)[6])[1];
-f_17838(t9,t7,t8,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
+f_17629(t9,t7,t8,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
else{
-t7=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_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");
+t7=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_18691,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t4,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[2],a[10]=t3,a[11]=t2,a[12]=t1,tmp=(C_word)a,a+=13,tmp);
+t8=C_i_car(t3);
+C_trace("compiler.scm: 2617 walk");
t9=((C_word*)((C_word*)t0)[6])[1];
-f_17838(t9,t7,t8,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}}
+f_17629(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){
+/* k18689 in loop in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18691(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_18691,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18694,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=t1,a[9]=((C_word*)t0)[12],tmp=(C_word)a,a+=10,tmp);
+t3=C_i_cadr(((C_word*)t0)[10]);
+C_trace("compiler.scm: 2618 walk");
t4=((C_word*)((C_word*)t0)[5])[1];
-f_17838(t4,t2,t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_17629(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){
+/* k18692 in k18689 in loop in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18694(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6143,76 +6137,76 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_18694,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18701,a[2]=t1,a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
+t3=C_fixnum_decrease(((C_word*)t0)[7]);
+t4=C_i_cddr(((C_word*)t0)[6]);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18713,a[2]=t4,a[3]=t3,a[4]=t2,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t6=C_fixnum_difference(((C_word*)((C_word*)t0)[4])[1],((C_word*)t0)[3]);
+C_trace("compiler.scm: 2621 max");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[657]+1)))(4,*((C_word*)lf[657]+1),t5,t6,((C_word*)t0)[2]);}
-/* 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){
+/* k18711 in k18692 in k18689 in loop in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18713(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 2625 loop");
+C_trace("compiler.scm: 2621 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);}
+f_18658(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){
+/* k18699 in k18692 in k18689 in loop in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18701(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 2619 cons*");
+((C_proc5)C_retrieve_symbol_proc(lf[517]))(5,*((C_word*)lf[517]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k18667 in loop in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18669(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_18669,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18680,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=C_fixnum_difference(((C_word*)((C_word*)t0)[4])[1],((C_word*)t0)[5]);
+C_trace("compiler.scm: 2615 max");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[657]+1)))(4,*((C_word*)lf[657]+1),t2,((C_word*)t0)[2],t3);}
-/* 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){
+/* k18678 in k18667 in loop in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18680(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18852,2,t0,t1);}
-t2=(C_word)C_fixnum_plus(((C_word*)t0)[5],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_18680,2,t0,t1);}
+t2=C_fixnum_plus(((C_word*)t0)[5],t1);
t3=C_mutate(((C_word *)((C_word*)t0)[4])+1,t2);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_list(&a,1,((C_word*)t0)[2]));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* k18646 in k18630 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18648(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18820,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_18648,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],t1);
t3=((C_word*)t0)[4];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t2));}
-/* 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){
+/* k18575 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18577(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6220,16 +6214,16 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_18577,2,t0,t1);}
t2=((C_word*)((C_word*)t0)[10])[1];
-t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_18580,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,a[11]=t2,a[12]=((C_word*)t0)[10],tmp=(C_word)a,a+=13,tmp);
+t4=C_i_cadr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 2597 walk");
t5=((C_word*)((C_word*)t0)[5])[1];
-f_17838(t5,t3,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_17629(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){
+/* k18578 in k18575 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18580(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6237,16 +6231,16 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_18580,2,t0,t1);}
t2=((C_word*)((C_word*)t0)[12])[1];
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18583,a[2]=t2,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=t1,a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[12],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
+t4=C_i_caddr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 2599 walk");
t5=((C_word*)((C_word*)t0)[5])[1];
-f_17838(t5,t3,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_17629(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){
+/* k18581 in k18578 in k18575 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18583(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6254,15 +6248,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_18583,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18603,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
+t3=C_fixnum_difference(((C_word*)((C_word*)t0)[8])[1],((C_word*)t0)[2]);
+t4=C_fixnum_difference(((C_word*)t0)[2],((C_word*)t0)[9]);
+C_trace("compiler.scm: 2600 max");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[657]+1)))(4,*((C_word*)lf[657]+1),t2,t3,t4);}
-/* 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){
+/* k18601 in k18581 in k18578 in k18575 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18603(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6271,24 +6265,24 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_18603,2,t0,t1);}
+t2=C_fixnum_plus(((C_word*)t0)[9],t1);
t3=C_mutate(((C_word *)((C_word*)t0)[8])+1,t2);
-t4=(C_word)C_a_i_list(&a,3,((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5]);
+t4=C_a_i_list(&a,3,((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5]);
t5=((C_word*)t0)[4];
t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t4));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t4));}
-/* 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){
+/* k18563 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18565(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_18638(t2,(C_word)C_i_not(t1));}
+f_18466(t2,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){
+/* k18464 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18466(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6298,140 +6292,140 @@ 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);}
+C_save_and_reclaim((void*)trf_18466,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]);}
+C_trace("compiler.scm: 2581 immediate-literal");
+f_18924(((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(C_i_numberp(((C_word*)t0)[3]))){
+t2=C_eqp(lf[381],*((C_word*)lf[6]+1));
if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18487,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_i_integerp(((C_word*)t0)[3]))){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18514,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2584 big-fixnum?");
+((C_proc3)C_retrieve_symbol_proc(lf[656]))(3,*((C_word*)lf[656]+1),t4,((C_word*)t0)[3]);}
else{
t4=t3;
-f_18659(t4,C_SCHEME_FALSE);}}
+f_18487(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");
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18530,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2590 literal");
t4=((C_word*)((C_word*)t0)[2])[1];
-f_18970(t4,t3,((C_word*)t0)[3]);}}
+f_18798(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]);}}}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18536,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 2591 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[608]))(3,*((C_word*)lf[608]+1),t2,((C_word*)t0)[3]);}}}
-/* 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){
+/* k18534 in k18464 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18536(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18708,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_18536,2,t0,t1);}
if(C_truep(t1)){
-C_trace("compiler.scm: 2595 immediate-literal");
-f_19096(((C_word*)t0)[4],((C_word*)t0)[3]);}
+C_trace("compiler.scm: 2591 immediate-literal");
+f_18924(((C_word*)t0)[4],((C_word*)t0)[3]);}
else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18727,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2596 literal");
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18555,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2592 literal");
t3=((C_word*)((C_word*)t0)[2])[1];
-f_18970(t3,t2,((C_word*)t0)[3]);}}
+f_18798(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){
+/* k18553 in k18534 in k18464 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18555(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18727,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,1,t1);
+C_save_and_reclaim((void*)tr2,(void*)f_18555,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[652],t2,C_SCHEME_END_OF_LIST));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[641],t2,C_SCHEME_END_OF_LIST));}
-/* 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){
+/* k18528 in k18464 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18530(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18702,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,1,t1);
+C_save_and_reclaim((void*)tr2,(void*)f_18530,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[652],t2,C_SCHEME_END_OF_LIST));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[641],t2,C_SCHEME_END_OF_LIST));}
-/* 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){
+/* k18512 in k18464 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18514(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_18659(t2,(C_word)C_i_not(t1));}
+f_18487(t2,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){
+/* k18485 in k18464 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18487(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_18659,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_18487,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18490,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+t3=C_i_inexact_to_exact(((C_word*)t0)[4]);
+C_trace("compiler.scm: 2585 compiler-warning");
+((C_proc6)C_retrieve_symbol_proc(lf[115]))(6,*((C_word*)lf[115]+1),t2,lf[470],lf[654],((C_word*)t0)[4],t3);}
else{
-C_trace("compiler.scm: 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]);}}
+C_trace("compiler.scm: 2589 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[313]))(4,*((C_word*)lf[313]+1),((C_word*)t0)[2],lf[655],((C_word*)t0)[4]);}}
-/* 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){
+/* k18488 in k18485 in k18464 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18490(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_i_inexact_to_exact(((C_word*)t0)[4]);
-C_trace("compiler.scm: 2592 immediate-literal");
-f_19096(((C_word*)t0)[2],t2);}
+t2=C_i_inexact_to_exact(((C_word*)t0)[4]);
+C_trace("compiler.scm: 2588 immediate-literal");
+f_18924(((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){
+/* k18430 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18432(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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");
+C_save_and_reclaim((void*)trf_18432,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18444,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2576 mapwalk");
t3=((C_word*)((C_word*)t0)[6])[1];
-f_18924(t3,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_18752(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){
+/* k18442 in k18430 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18444(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18616,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_18444,2,t0,t1);}
t2=((C_word*)t0)[4];
t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-/* 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){
+/* k18381 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18383(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6441,62 +6435,62 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_18383,2,t0,t1);}
t2=C_mutate(((C_word *)((C_word*)t0)[11])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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]);
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18386,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18401,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t5=C_i_length(((C_word*)t0)[8]);
+if(C_truep(C_fixnum_greater_or_equal_p(t5,C_fix(3)))){
+t6=C_i_caddr(((C_word*)t0)[8]);
t7=t4;
-f_18573(t7,(C_word)C_eqp(((C_word*)t0)[4],t6));}
+f_18401(t7,C_eqp(((C_word*)t0)[4],t6));}
else{
t6=t4;
-f_18573(t6,C_SCHEME_FALSE);}}
+f_18401(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){
+/* k18399 in k18381 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18401(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
if(C_truep(t1)){
-t2=(C_word)C_fixnum_increase(((C_word*)((C_word*)t0)[3])[1]);
+t2=C_fixnum_increase(((C_word*)((C_word*)t0)[3])[1]);
t3=C_mutate(((C_word *)((C_word*)t0)[3])+1,t2);
t4=((C_word*)t0)[2];
-f_18558(t4,t3);}
+f_18386(t4,t3);}
else{
t2=((C_word*)t0)[2];
-f_18558(t2,C_SCHEME_UNDEFINED);}}
+f_18386(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){
+/* k18384 in k18381 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18386(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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");
+C_save_and_reclaim((void*)trf_18386,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18398,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2572 mapwalk");
t3=((C_word*)((C_word*)t0)[6])[1];
-f_18924(t3,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_18752(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){
+/* k18396 in k18384 in k18381 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18398(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18570,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_18398,2,t0,t1);}
t2=((C_word*)t0)[4];
t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-/* 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){
+/* k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18225(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6508,32 +6502,32 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_18225,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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");
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18229,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
+C_trace("g47284729");
t3=t2;
-f_18401(t3,((C_word*)t0)[7],t1);}
+f_18229(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);
+t2=C_slot(((C_word*)t0)[11],C_fix(1));
+t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_18264,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[5],a[11]=((C_word*)t0)[7],a[12]=((C_word*)t0)[6],a[13]=t2,tmp=(C_word)a,a+=14,tmp);
t4=*((C_word*)lf[22]+1);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18520,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18348,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
if(C_truep(t4)){
t6=t3;
-f_18436(t6,(C_word)C_i_not(t4));}
+f_18264(t6,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));}
+f_18264(t7,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);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18359,a[2]=((C_word*)t0)[6],a[3]=t5,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),t7,((C_word*)t0)[6],lf[134]);}}}}
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t7,((C_word*)t0)[6],lf[133]);}}}}
-/* 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){
+/* k18357 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18359(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6541,33 +6535,33 @@ C_word *a;
if(C_truep(t1)){
t2=t1;
t3=((C_word*)t0)[4];
-f_18436(t3,(C_word)C_i_not(t2));}
+f_18264(t3,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]);}}
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[552]);}}
-/* 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){
+/* k18346 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18348(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_18436(t2,(C_word)C_i_not(t1));}
+f_18264(t2,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){
+/* k18262 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18264(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_18264,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_18344,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
+C_trace("compiler.scm: 2554 variable-visible?");
+((C_proc3)C_retrieve_symbol_proc(lf[558]))(3,*((C_word*)lf[558]+1),t2,((C_word*)t0)[12]);}
-/* 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){
+/* k18342 in k18262 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18344(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6577,21 +6571,21 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_18344,2,t0,t1);}
+t2=C_i_not(t1);
+t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_18270,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=t2,a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
+t4=C_eqp(((C_word*)t0)[13],lf[98]);
if(C_truep(t4)){
-t5=(C_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);}
+t5=C_slot(((C_word*)t0)[2],C_fix(2));
+t6=C_i_car(t5);
+C_trace("compiler.scm: 2555 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[608]))(3,*((C_word*)lf[608]+1),t3,t6);}
else{
t5=t3;
-f_18442(2,t5,C_SCHEME_FALSE);}}
+f_18270(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){
+/* k18268 in k18342 in k18262 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18270(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6600,40 +6594,40 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_18270,2,t0,t1);}
+t2=(C_truep(t1)?t1:C_eqp(lf[138],((C_word*)t0)[13]));
+t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_18276,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=t2,tmp=(C_word)a,a+=13,tmp);
if(C_truep(((C_word*)t0)[12])){
-t4=(C_word)C_fixnum_increase(((C_word*)((C_word*)t0)[2])[1]);
+t4=C_fixnum_increase(((C_word*)((C_word*)t0)[2])[1]);
t5=C_mutate(((C_word *)((C_word*)t0)[2])+1,t4);
t6=t3;
-f_18448(t6,t5);}
+f_18276(t6,t5);}
else{
t4=t3;
-f_18448(t4,C_SCHEME_UNDEFINED);}}
+f_18276(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){
+/* k18274 in k18268 in k18342 in k18262 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18276(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);
+C_save_and_reclaim((void*)trf_18276,NULL,2,t0,t1);}
+t2=(C_truep(((C_word*)t0)[12])?lf[651]:lf[652]);
+t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_18308,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=t2,a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
if(C_truep(((C_word*)t0)[11])){
-C_trace("compiler.scm: 2565 blockvar-literal");
+C_trace("compiler.scm: 2561 blockvar-literal");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_19064(t4,t3,((C_word*)t0)[10]);}
+f_18892(t4,t3,((C_word*)t0)[10]);}
else{
-C_trace("compiler.scm: 2566 literal");
+C_trace("compiler.scm: 2562 literal");
t4=((C_word*)((C_word*)t0)[2])[1];
-f_18970(t4,t3,((C_word*)t0)[10]);}}
+f_18798(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){
+/* k18306 in k18274 in k18268 in k18342 in k18262 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18308(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6641,59 +6635,103 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_18308,2,t0,t1);}
+t2=C_a_i_list(&a,3,t1,((C_word*)t0)[10],((C_word*)t0)[9]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18300,a[2]=t2,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
+t4=C_i_car(((C_word*)t0)[6]);
+C_trace("compiler.scm: 2565 walk");
t5=((C_word*)((C_word*)t0)[5])[1];
-f_17838(t5,t3,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_17629(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){
+/* k18298 in k18306 in k18274 in k18268 in k18342 in k18262 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18300(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18472,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,1,t1);
+C_save_and_reclaim((void*)tr2,(void*)f_18300,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
t3=((C_word*)t0)[4];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t2));}
-/* 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){
+/* g4728 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18229(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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");
+C_save_and_reclaim((void*)trf_18229,NULL,3,t0,t1,t2);}
+t3=C_a_i_list(&a,1,t2);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18250,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2547 walk");
t5=((C_word*)((C_word*)t0)[6])[1];
-f_17838(t5,t4,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_17629(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){
+/* k18248 in g4728 in k18223 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18250(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18422,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,1,t1);
+C_save_and_reclaim((void*)tr2,(void*)f_18250,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
+t3=((C_word*)t0)[3];
+t4=t3;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[650],((C_word*)t0)[2],t2));}
+
+/* k18180 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18182(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_18182,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[10])+1,t1);
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_18198,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 2539 walk");
+t4=((C_word*)((C_word*)t0)[6])[1];
+f_17629(t4,t3,((C_word*)t0)[2],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
+
+/* k18196 in k18180 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18198(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_18198,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18202,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t3=C_i_cadr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 2540 walk");
+t4=((C_word*)((C_word*)t0)[5])[1];
+f_17629(t4,t2,t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k18200 in k18196 in k18180 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18202(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_18202,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[661],((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[649],((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){
+/* k18133 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18135(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6701,125 +6739,125 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_18135,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18139,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t3=C_i_cadr(((C_word*)t0)[8]);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_18147,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 2531 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k18145 in k18133 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18147(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_18147,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18151,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 2531 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k18149 in k18145 in k18133 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18151(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 2544 walk");
+C_trace("compiler.scm: 2531 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);}
+f_17629(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){
+/* k18137 in k18133 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18139(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18355,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_18139,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[660],((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[648],((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){
+/* a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17946(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
-C_word ab[26],*a=ab;
+C_word ab[28],*a=ab;
if(c!=5) C_bad_argc_2(c,5,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr5,(void*)f_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);
+C_save_and_reclaim((void*)tr5,(void*)f_17946,5,t0,t1,t2,t3,t4);}
+t5=C_i_car(((C_word*)t0)[17]);
+t6=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_17953,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=t3,a[7]=t2,a[8]=t5,a[9]=((C_word*)t0)[5],a[10]=t1,a[11]=((C_word*)t0)[17],a[12]=((C_word*)t0)[6],a[13]=((C_word*)t0)[7],a[14]=((C_word*)t0)[8],a[15]=((C_word*)t0)[9],a[16]=((C_word*)t0)[10],a[17]=((C_word*)t0)[11],a[18]=((C_word*)t0)[12],a[19]=((C_word*)t0)[13],a[20]=((C_word*)t0)[14],a[21]=((C_word*)t0)[15],a[22]=((C_word*)t0)[16],tmp=(C_word)a,a+=23,tmp);
if(C_truep(t4)){
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18065,a[2]=t4,a[3]=((C_word*)t0)[4],a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2478 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t7,((C_word*)t0)[4],t4,lf[559]);}
else{
t7=t6;
-f_18161(2,t7,C_SCHEME_FALSE);}}
+f_17953(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){
+/* k18063 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18065(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_18065,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18071,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 2479 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[544]);}
-/* 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){
+/* k18069 in k18063 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18071(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18287,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_18071,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[5];
-f_18161(2,t2,lf[554]);}
+f_17953(2,t2,lf[541]);}
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]);}}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18096,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 2480 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[601]);}}
-/* 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){
+/* k18094 in k18069 in k18063 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18096(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(C_truep(t1)){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 2481 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[540]);}
else{
-t2=(C_word)C_i_not(((C_word*)t0)[2]);
+t2=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]);}
+f_17953(2,t3,lf[645]);}
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]);}}
+C_trace("compiler.scm: 2481 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[540]);}}
else{
-if(C_truep((C_word)C_i_nullp(((C_word*)t0)[2]))){
+if(C_truep(C_i_nullp(((C_word*)t0)[2]))){
t3=((C_word*)t0)[5];
-f_18161(2,t3,lf[656]);}
+f_17953(2,t3,lf[645]);}
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]);}}}}
+C_trace("compiler.scm: 2481 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[540]);}}}}
-/* 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){
+/* k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17953(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6827,77 +6865,69 @@ C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[26],*a=ab;
+C_word ab[28],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_17953,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|21,a[1]=(C_word)f_17956,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[19],a[19]=((C_word*)t0)[20],a[20]=((C_word*)t0)[21],a[21]=((C_word*)t0)[22],tmp=(C_word)a,a+=22,tmp);
+t3=C_i_car(((C_word*)t0)[3]);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18056,a[2]=((C_word*)t0)[8],a[3]=t3,a[4]=t2,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
+t5=C_eqp(lf[645],t1);
if(C_truep(t5)){
-C_trace("compiler.scm: 2499 butlast");
-((C_proc3)C_retrieve_symbol_proc(lf[659]))(3,*((C_word*)lf[659]+1),t4,((C_word*)t0)[7]);}
+C_trace("compiler.scm: 2485 butlast");
+((C_proc3)C_retrieve_symbol_proc(lf[647]))(3,*((C_word*)lf[647]+1),t4,((C_word*)t0)[7]);}
else{
t6=((C_word*)t0)[7];
-C_trace("compiler.scm: 2496 walk");
+C_trace("compiler.scm: 2482 walk");
t7=((C_word*)((C_word*)t0)[2])[1];
-f_17838(t7,t2,t3,t6,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);}}
+f_17629(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){
+/* k18054 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18056(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 2496 walk");
+C_trace("compiler.scm: 2482 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);}
+f_17629(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){
+/* k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17956(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word t5;
-C_word t6;
-C_word ab[21],*a=ab;
+C_word ab[23],*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]);
+C_save_and_reclaim((void*)tr2,(void*)f_17956,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_17959,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],a[21]=((C_word*)t0)[20],a[22]=((C_word*)t0)[21],tmp=(C_word)a,a+=23,tmp);
+t3=C_eqp(((C_word*)t0)[3],lf[645]);
if(C_truep(t3)){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 2490 debugging");
+((C_proc6)C_retrieve_symbol_proc(lf[572]))(6,*((C_word*)lf[572]+1),t2,lf[614],lf[646],((C_word*)t0)[4],((C_word*)t0)[7]);}
else{
-t5=C_SCHEME_UNDEFINED;
-t6=t2;
-f_18167(2,t6,t5);}}}
+t4=t2;
+f_17959(2,t4,C_SCHEME_UNDEFINED);}}
-/* 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){
+/* k17957 in k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17959(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[21],*a=ab;
+C_word ab[23],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_17959,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_17962,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=((C_word*)t0)[21],a[22]=((C_word*)t0)[22],tmp=(C_word)a,a+=23,tmp);
t3=(C_truep(((C_word*)t0)[9])?((C_word*)t0)[5]:C_SCHEME_FALSE);
if(C_truep(t3)){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 2492 bomb");
+((C_proc6)C_retrieve_symbol_proc(lf[514]))(6,*((C_word*)lf[514]+1),t2,lf[644],((C_word*)t0)[8],((C_word*)((C_word*)t0)[15])[1],((C_word*)t0)[5]);}
else{
t4=t2;
-f_18170(2,t4,C_SCHEME_UNDEFINED);}}
+f_17962(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){
+/* k17960 in k17957 in k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17962(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6905,19 +6935,19 @@ C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[30],*a=ab;
+C_word ab[33],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_17962,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_17991,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[13],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[15],a[8]=((C_word*)t0)[16],a[9]=((C_word*)t0)[17],a[10]=((C_word*)t0)[18],a[11]=((C_word*)t0)[19],a[12]=((C_word*)t0)[20],a[13]=((C_word*)t0)[21],a[14]=((C_word*)t0)[22],tmp=(C_word)a,a+=15,tmp);
+t3=C_i_cadr(((C_word*)t0)[11]);
+t4=C_fixnum_increase(((C_word*)((C_word*)t0)[19])[1]);
+t5=(C_truep(((C_word*)t0)[9])?((C_word*)t0)[9]:C_i_memq(((C_word*)t0)[8],*((C_word*)lf[61]+1)));
+t6=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_18007,a[2]=((C_word*)t0)[21],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=t5,a[8]=((C_word*)t0)[15],a[9]=((C_word*)t0)[13],a[10]=((C_word*)t0)[17],a[11]=t4,a[12]=((C_word*)t0)[5],a[13]=((C_word*)t0)[6],a[14]=((C_word*)t0)[7],a[15]=t3,a[16]=((C_word*)t0)[8],a[17]=t2,tmp=(C_word)a,a+=18,tmp);
+C_trace("compiler.scm: 2505 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t6,((C_word*)t0)[2],((C_word*)t0)[8],lf[591]);}
-/* 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){
+/* k18005 in k17960 in k17957 in k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18007(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6925,59 +6955,59 @@ C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[20],*a=ab;
+C_word ab[21],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18214,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_18007,2,t0,t1);}
t2=(C_truep(t1)?t1:C_fix(0));
-t3=(*a=C_CLOSURE_TYPE|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];
+t3=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_18014,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],tmp=(C_word)a,a+=18,tmp);
+t4=((C_word*)t0)[12];
if(C_truep(t4)){
t5=t3;
-f_18221(t5,C_SCHEME_FALSE);}
+f_18014(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]);}
+if(C_truep(C_fixnum_greaterp(t5,C_fix(0)))){
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18033,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2509 debugging");
+((C_proc6)C_retrieve_symbol_proc(lf[572]))(6,*((C_word*)lf[572]+1),t6,lf[614],lf[643],((C_word*)t0)[16],((C_word*)((C_word*)t0)[2])[1]);}
else{
t6=t3;
-f_18221(t6,C_SCHEME_FALSE);}}}
+f_18014(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){
+/* k18031 in k18005 in k17960 in k17957 in k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18033(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_18221(t2,C_SCHEME_TRUE);}
+f_18014(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){
+/* k18012 in k18005 in k17960 in k17957 in k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_18014(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[17],*a=ab;
+C_word ab[18],*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);
+C_save_and_reclaim((void*)trf_18014,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_18018,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],tmp=(C_word)a,a+=18,tmp);
if(C_truep(((C_word*)t0)[3])){
t3=t2;
-f_18225(2,t3,((C_word*)t0)[3]);}
+f_18018(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]);}}
+C_trace("compiler.scm: 2511 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[2],((C_word*)t0)[16],lf[583]);}}
-/* 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){
+/* k18016 in k18012 in k18005 in k17960 in k17957 in k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_18018(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 2494 make-lambda-literal");
+((C_proc18)C_retrieve_proc(*((C_word*)lf[620]+1)))(18,*((C_word*)lf[620]+1),((C_word*)t0)[17],((C_word*)t0)[16],((C_word*)t0)[15],((C_word*)t0)[14],((C_word*)t0)[13],((C_word*)t0)[12],((C_word*)t0)[11],((C_word*)((C_word*)t0)[10])[1],((C_word*)((C_word*)t0)[9])[1],((C_word*)((C_word*)t0)[8])[1],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k17989 in k17960 in k17957 in k17954 in k17951 in a17945 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17991(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6989,23 +7019,25 @@ C_word t8;
C_word t9;
C_word t10;
C_word t11;
+C_word t12;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_17991,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,((C_word*)((C_word*)t0)[14])[1]);
+t3=C_mutate(((C_word *)((C_word*)t0)[14])+1,t2);
+t4=C_mutate(((C_word *)((C_word*)t0)[13])+1,((C_word*)t0)[12]);
+t5=C_mutate(((C_word *)((C_word*)t0)[11])+1,((C_word*)t0)[10]);
+t6=C_mutate(((C_word *)((C_word*)t0)[9])+1,((C_word*)t0)[8]);
+t7=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
+t8=C_mutate(((C_word *)((C_word*)t0)[5])+1,((C_word*)t0)[4]);
+t9=C_i_car(((C_word*)t0)[3]);
+t10=C_a_i_list(&a,1,t9);
+t11=((C_word*)t0)[2];
+t12=t11;
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,C_a_i_record(&a,4,lf[504],lf[553],t10,C_SCHEME_END_OF_LIST));}
-/* 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){
+/* k17871 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17873(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7015,21 +7047,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_17873,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17888,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+t3=C_slot(((C_word*)t0)[3],C_fix(1));
+t4=C_eqp(lf[509],t3);
if(C_truep(t4)){
-t5=(C_word)C_slot(((C_word*)t0)[3],C_fix(2));
-t6=(C_word)C_i_car(t5);
+t5=C_slot(((C_word*)t0)[3],C_fix(2));
+t6=C_i_car(t5);
t7=t2;
-f_18097(t7,(C_word)C_i_memq(t6,((C_word*)t0)[2]));}
+f_17888(t7,C_i_memq(t6,((C_word*)t0)[2]));}
else{
t5=t2;
-f_18097(t5,C_SCHEME_FALSE);}}
+f_17888(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){
+/* k17886 in k17871 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_17888(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7040,56 +7072,56 @@ 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);}
+C_save_and_reclaim((void*)trf_17888,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(C_word)C_fixnum_increase(((C_word*)((C_word*)t0)[5])[1]);
+t2=C_fixnum_increase(((C_word*)((C_word*)t0)[5])[1]);
t3=C_mutate(((C_word *)((C_word*)t0)[5])+1,t2);
t4=((C_word*)t0)[4];
t5=((C_word*)t0)[3];
t6=t4;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[512],lf[615],C_SCHEME_END_OF_LIST,t5));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[504],lf[603],C_SCHEME_END_OF_LIST,t5));}
else{
t2=((C_word*)t0)[4];
t3=((C_word*)t0)[3];
t4=t2;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t3));}}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,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){
+/* k17855 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17857(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18066,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,1,t1);
+C_save_and_reclaim((void*)tr2,(void*)f_17857,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
t3=((C_word*)t0)[3];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[605],((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[593],((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){
+/* k17825 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17827(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18036,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_17827,2,t0,t1);}
t2=((C_word*)t0)[3];
t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],lf[606],((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],lf[594],((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){
+/* k17799 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17801(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 2453 words");
-((C_proc3)C_retrieve_symbol_proc(lf[305]))(3,*((C_word*)lf[305]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 2437 words");
+((C_proc3)C_retrieve_symbol_proc(lf[303]))(3,*((C_word*)lf[303]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k17795 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17797(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7097,36 +7129,36 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_17797,2,t0,t1);}
+t2=C_fixnum_plus(((C_word*)((C_word*)t0)[10])[1],t1);
t3=C_mutate(((C_word *)((C_word*)t0)[10])+1,t2);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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");
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17793,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2438 mapwalk");
t5=((C_word*)((C_word*)t0)[6])[1];
-f_18924(t5,t4,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_18752(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){
+/* k17791 in k17795 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17793(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_18002,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_17793,2,t0,t1);}
t2=((C_word*)t0)[4];
t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-/* 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){
+/* k17765 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17767(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 2449 words");
-((C_proc3)C_retrieve_symbol_proc(lf[305]))(3,*((C_word*)lf[305]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 2433 words");
+((C_proc3)C_retrieve_symbol_proc(lf[303]))(3,*((C_word*)lf[303]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k17761 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17763(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7134,39 +7166,39 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_17763,2,t0,t1);}
+t2=C_fixnum_plus(((C_word*)((C_word*)t0)[5])[1],t1);
t3=C_mutate(((C_word *)((C_word*)t0)[5])+1,t2);
t4=((C_word*)t0)[4];
t5=t4;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST));}
-/* 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){
+/* k17735 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17737(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17946,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_17737,2,t0,t1);}
t2=((C_word*)t0)[4];
t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-/* 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){
+/* k17709 in walk in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17711(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17920,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_17711,2,t0,t1);}
t2=((C_word*)t0)[4];
t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-/* walk-global in ##compiler#prepare-for-code-generation in k5138 in k5135 */
-static void C_fcall f_17765(C_word t0,C_word t1,C_word t2,C_word t3){
+/* walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_17556(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -7176,29 +7208,29 @@ 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);
+C_save_and_reclaim((void*)trf_17556,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17560,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
if(C_truep(t3)){
t5=t4;
-f_17769(2,t5,t3);}
+f_17560(2,t5,t3);}
else{
t5=*((C_word*)lf[22]+1);
if(C_truep(t5)){
t6=t4;
-f_17769(2,t6,t5);}
+f_17560(2,t6,t5);}
else{
t6=*((C_word*)lf[12]+1);
if(C_truep(t6)){
t7=t4;
-f_17769(2,t7,t6);}
+f_17560(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);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17616,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
t8=t2;
C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),t7,t8,lf[134]);}}}}
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t7,t8,lf[133]);}}}}
-/* 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){
+/* k17614 in walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17616(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7207,52 +7239,52 @@ C_word *a;
if(C_truep(t1)){
t2=t1;
t3=((C_word*)t0)[3];
-f_17769(2,t3,t2);}
+f_17560(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]);}}
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),((C_word*)t0)[3],t2,lf[552]);}}
-/* 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){
+/* k17558 in walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17560(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_17560,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17563,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17595,a[2]=((C_word*)t0)[7],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2397 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t3,((C_word*)t0)[2],((C_word*)t0)[7],lf[544]);}
-/* 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){
+/* k17593 in k17558 in walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17595(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17804,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_17595,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17602,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2398 variable-visible?");
+((C_proc3)C_retrieve_symbol_proc(lf[558]))(3,*((C_word*)lf[558]+1),t2,((C_word*)t0)[2]);}
else{
t2=((C_word*)t0)[3];
-f_17772(t2,C_SCHEME_FALSE);}}
+f_17563(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){
+/* k17600 in k17593 in k17558 in walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17602(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_17772(t2,(C_word)C_i_not(t1));}
+f_17563(t2,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){
+/* k17561 in k17558 in walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_17563(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7260,63 +7292,63 @@ 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);
+C_save_and_reclaim((void*)trf_17563,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17566,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(t1)){
-t3=(C_word)C_fixnum_increase(((C_word*)((C_word*)t0)[2])[1]);
+t3=C_fixnum_increase(((C_word*)((C_word*)t0)[2])[1]);
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
t5=t2;
-f_17775(t5,t4);}
+f_17566(t5,t4);}
else{
t3=t2;
-f_17775(t3,C_SCHEME_UNDEFINED);}}
+f_17566(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){
+/* k17564 in k17561 in k17558 in walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_17566(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);
+C_save_and_reclaim((void*)trf_17566,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17582,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
if(C_truep(((C_word*)t0)[6])){
-C_trace("compiler.scm: 2419 blockvar-literal");
+C_trace("compiler.scm: 2403 blockvar-literal");
t3=((C_word*)((C_word*)t0)[3])[1];
-f_19064(t3,t2,((C_word*)t0)[5]);}
+f_18892(t3,t2,((C_word*)t0)[5]);}
else{
-C_trace("compiler.scm: 2420 literal");
+C_trace("compiler.scm: 2404 literal");
t3=((C_word*)((C_word*)t0)[2])[1];
-f_18970(t3,t2,((C_word*)t0)[5]);}}
+f_18798(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){
+/* k17580 in k17564 in k17561 in k17558 in walk-global in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17582(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[17],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);
+C_save_and_reclaim((void*)tr2,(void*)f_17582,2,t0,t1);}
+t2=C_a_i_list(&a,4,t1,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[653],t2,C_SCHEME_END_OF_LIST));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[642],t2,C_SCHEME_END_OF_LIST));}
-/* walk-var in ##compiler#prepare-for-code-generation in k5138 in k5135 */
-static void C_fcall f_17714(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
+/* walk-var in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_fcall f_17505(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_17505,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17509,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=((C_word*)t0)[3],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 2387 posq");
+((C_proc4)C_retrieve_symbol_proc(lf[180]))(4,*((C_word*)lf[180]+1),t5,t2,t3);}
-/* 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){
+/* k17507 in walk-var in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17509(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7325,269 +7357,282 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_17509,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[6];
t3=t1;
-t4=(C_word)C_a_i_list(&a,1,t3);
+t4=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));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_record(&a,4,lf[504],lf[640],t4,C_SCHEME_END_OF_LIST));}
else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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]);}}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17535,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 2388 keyword?");
+((C_proc3)C_retrieve_symbol_proc(lf[118]))(3,*((C_word*)lf[118]+1),t2,((C_word*)t0)[4]);}}
-/* 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){
+/* k17533 in k17507 in walk-var in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17535(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17744,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_17535,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17760,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
-C_trace("compiler.scm: 2404 literal");
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17551,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2388 literal");
t3=((C_word*)((C_word*)t0)[5])[1];
-f_18970(t3,t2,((C_word*)t0)[4]);}
+f_18798(t3,t2,((C_word*)t0)[4]);}
else{
-C_trace("compiler.scm: 2405 walk-global");
+C_trace("compiler.scm: 2389 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]);}}
+f_17556(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){
+/* k17549 in k17533 in k17507 in walk-var in ##compiler#prepare-for-code-generation in k5089 in k5086 */
+static void C_ccall f_17551(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17760,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,1,t1);
+C_save_and_reclaim((void*)tr2,(void*)f_17551,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[652],t2,C_SCHEME_END_OF_LIST));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[641],t2,C_SCHEME_END_OF_LIST));}
+
+/* lambda-literal-direct in k5089 in k5086 */
+static void C_ccall f_17493(C_word c,C_word t0,C_word t1,C_word t2){
+C_word tmp;
+C_word t3;
+C_word t4;
+C_word *a;
+if(c!=3) C_bad_argc_2(c,3,t0);
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr3,(void*)f_17493,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_block_ref(t2,C_fix(16)));}
-/* lambda-literal-direct in k5138 in k5135 */
-static void C_ccall f_17702(C_word c,C_word t0,C_word t1,C_word t2){
+/* lambda-literal-body in k5089 in k5086 */
+static void C_ccall f_17484(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17702,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[633]);
+C_save_and_reclaim((void*)tr3,(void*)f_17484,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(15)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* lambda-literal-rest-argument-mode in k5089 in k5086 */
+static void C_ccall f_17475(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17693,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[633]);
+C_save_and_reclaim((void*)tr3,(void*)f_17475,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(14)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* lambda-literal-customizable in k5089 in k5086 */
+static void C_ccall f_17466(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17684,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[633]);
+C_save_and_reclaim((void*)tr3,(void*)f_17466,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(13)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* lambda-literal-looping in k5089 in k5086 */
+static void C_ccall f_17457(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17675,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[633]);
+C_save_and_reclaim((void*)tr3,(void*)f_17457,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(12)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* lambda-literal-closure-size in k5089 in k5086 */
+static void C_ccall f_17448(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17666,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[633]);
+C_save_and_reclaim((void*)tr3,(void*)f_17448,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(11)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* lambda-literal-directly-called in k5089 in k5086 */
+static void C_ccall f_17439(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17657,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[633]);
+C_save_and_reclaim((void*)tr3,(void*)f_17439,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(10)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* lambda-literal-allocated in k5089 in k5086 */
+static void C_ccall f_17430(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17648,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[633]);
+C_save_and_reclaim((void*)tr3,(void*)f_17430,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(9)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* lambda-literal-callee-signatures in k5089 in k5086 */
+static void C_ccall f_17421(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17639,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[633]);
+C_save_and_reclaim((void*)tr3,(void*)f_17421,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(8)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* lambda-literal-unboxed-temporaries in k5089 in k5086 */
+static void C_ccall f_17412(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17630,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[633]);
+C_save_and_reclaim((void*)tr3,(void*)f_17412,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(7)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* lambda-literal-temporaries in k5089 in k5086 */
+static void C_ccall f_17403(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17621,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[633]);
+C_save_and_reclaim((void*)tr3,(void*)f_17403,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(6)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* lambda-literal-rest-argument in k5089 in k5086 */
+static void C_ccall f_17394(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17612,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[633]);
+C_save_and_reclaim((void*)tr3,(void*)f_17394,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(5)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* lambda-literal-argument-count in k5089 in k5086 */
+static void C_ccall f_17385(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17603,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[633]);
+C_save_and_reclaim((void*)tr3,(void*)f_17385,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(4)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* lambda-literal-arguments in k5089 in k5086 */
+static void C_ccall f_17376(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17594,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[633]);
+C_save_and_reclaim((void*)tr3,(void*)f_17376,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(3)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* lambda-literal-external in k5089 in k5086 */
+static void C_ccall f_17367(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17585,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[633]);
+C_save_and_reclaim((void*)tr3,(void*)f_17367,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(2)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* lambda-literal-id in k5089 in k5086 */
+static void C_ccall f_17358(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17576,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[633]);
+C_save_and_reclaim((void*)tr3,(void*)f_17358,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[621]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(1)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* lambda-literal? in k5089 in k5086 */
+static void C_ccall f_17352(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_17570,3,t0,t1,t2);}
+C_save_and_reclaim((void*)tr3,(void*)f_17352,3,t0,t1,t2);}
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_structurep(t2,lf[633]));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_structurep(t2,lf[621]));}
-/* 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){
+/* make-lambda-literal in k5089 in k5086 */
+static void C_ccall f_17346(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9,C_word t10,C_word t11,C_word t12,C_word t13,C_word t14,C_word t15,C_word t16,C_word t17){
C_word tmp;
-C_word t17;
-C_word ab[17],*a=ab;
-if(c!=17) C_bad_argc_2(c,17,t0);
+C_word t18;
+C_word ab[18],*a=ab;
+if(c!=18) C_bad_argc_2(c,18,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)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));}
+C_save_and_reclaim((void*)tr18,(void*)f_17346,18,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15,t16,t17);}
+t18=t1;
+((C_proc2)(void*)(*((C_word*)t18+1)))(2,t18,C_a_i_record(&a,17,lf[621],t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15,t16,t17));}
-/* ##compiler#perform-closure-conversion in k5138 in k5135 */
-static void C_ccall f_15804(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
+/* ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15586(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -7619,7 +7664,7 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_15586,4,t0,t1,t2,t3);}
t4=C_fix(0);
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_END_OF_LIST;
@@ -7638,69 +7683,69 @@ 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]);}
+t22=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15589,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t23=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15595,a[2]=t3,a[3]=t7,tmp=(C_word)a,a+=4,tmp));
+t24=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15605,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
+t25=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15616,a[2]=t3,a[3]=t9,a[4]=t13,a[5]=t11,a[6]=t15,tmp=(C_word)a,a+=7,tmp));
+t26=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16051,a[2]=t3,a[3]=t17,a[4]=t19,a[5]=t21,a[6]=t9,tmp=(C_word)a,a+=7,tmp));
+t27=C_set_block_item(t19,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17076,a[2]=t17,tmp=(C_word)a,a+=3,tmp));
+t28=C_set_block_item(t21,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17122,tmp=(C_word)a,a+=2,tmp));
+t29=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17313,a[2]=t15,a[3]=t7,a[4]=t2,a[5]=t17,a[6]=t5,a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 2339 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[572]))(4,*((C_word*)lf[572]+1),t29,lf[579],lf[619]);}
-/* 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){
+/* k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_17313(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_17313,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17316,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 2340 gather");
t3=((C_word*)((C_word*)t0)[2])[1];
-f_15834(t3,t2,((C_word*)t0)[4],C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);}
+f_15616(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){
+/* k17314 in k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_17316(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_17316,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17319,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 2341 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[572]))(5,*((C_word*)lf[572]+1),t2,lf[614],lf[618],((C_word*)((C_word*)t0)[2])[1]);}
-/* 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){
+/* k17317 in k17314 in k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_17319(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_17319,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17322,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 2342 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[572]))(4,*((C_word*)lf[572]+1),t2,lf[579],lf[617]);}
-/* 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){
+/* k17320 in k17317 in k17314 in k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_17322(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_17322,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17325,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2343 transform");
t3=((C_word*)((C_word*)t0)[3])[1];
-f_16269(t3,t2,((C_word*)t0)[2],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+f_16051(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){
+/* k17323 in k17320 in k17317 in k17314 in k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_17325(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7709,48 +7754,48 @@ 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));
+C_save_and_reclaim((void*)tr2,(void*)f_17325,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17328,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=C_eqp(((C_word*)((C_word*)t0)[2])[1],C_fix(0));
if(C_truep(t3)){
t4=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t1);}
else{
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17338,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17340,tmp=(C_word)a,a+=2,tmp);
C_trace("##sys#make-promise");
-t6=*((C_word*)lf[628]+1);
+t6=*((C_word*)lf[616]+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){
+/* a17339 in k17323 in k17320 in k17317 in k17314 in k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_17340(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17558,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_17340,2,t0,t1);}
t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_i_length(*((C_word*)lf[62]+1)));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_i_length(*((C_word*)lf[61]+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){
+/* k17336 in k17323 in k17320 in k17317 in k17314 in k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_17338(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 2345 debugging");
+((C_proc6)C_retrieve_symbol_proc(lf[572]))(6,*((C_word*)lf[572]+1),((C_word*)t0)[3],lf[614],lf[615],((C_word*)((C_word*)t0)[2])[1],t1);}
-/* 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){
+/* k17326 in k17323 in k17320 in k17317 in k17314 in k17311 in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_17328(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-/* ref-var in ##compiler#perform-closure-conversion in k5138 in k5135 */
-static void C_fcall f_17340(C_word t1,C_word t2,C_word t3,C_word t4){
+/* ref-var in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_17122(C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -7759,35 +7804,35 @@ 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);}
+C_save_and_reclaim((void*)trf_17122,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);}
+t6=C_slot(t5,C_fix(2));
+t7=C_i_car(t6);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17129,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2315 posq");
+((C_proc4)C_retrieve_symbol_proc(lf[180]))(4,*((C_word*)lf[180]+1),t8,t7,t4);}
-/* 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){
+/* k17127 in ref-var in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_17129(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17347,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_17129,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17351,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
-C_trace("g43404341");
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17133,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("g42784279");
t3=t2;
-f_17351(t3,((C_word*)t0)[3],t1);}
+f_17133(t3,((C_word*)t0)[3],t1);}
else{
t2=((C_word*)t0)[2];
t3=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-/* 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){
+/* g4278 in k17127 in ref-var in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_17133(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7795,29 +7840,29 @@ 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]);}
+C_save_and_reclaim((void*)trf_17133,NULL,3,t0,t1,t2);}
+t3=C_fixnum_plus(t2,C_fix(1));
+t4=C_a_i_list(&a,1,t3);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17154,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2318 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t5,((C_word*)t0)[2]);}
-/* 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){
+/* k17152 in g4278 in k17127 in ref-var in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_17154(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17372,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,1,t1);
+C_save_and_reclaim((void*)tr2,(void*)f_17154,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
t3=((C_word*)t0)[3];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[617],((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[605],((C_word*)t0)[2],t2));}
-/* maptransform in ##compiler#perform-closure-conversion in k5138 in k5135 */
-static void C_fcall f_17294(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
+/* maptransform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_17076(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -7829,19 +7874,19 @@ 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);}
+C_save_and_reclaim((void*)trf_17076,NULL,5,t0,t1,t2,t3,t4);}
t5=C_SCHEME_END_OF_LIST;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_FALSE;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17082,a[2]=t6,a[3]=t10,a[4]=t8,a[5]=t4,a[6]=t3,a[7]=((C_word*)t0)[2],tmp=(C_word)a,a+=8,tmp));
t12=((C_word*)t10)[1];
-f_17300(t12,t1,t2);}
+f_17082(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){
+/* loop4241 in maptransform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_17082(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7850,21 +7895,21 @@ 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");
+C_save_and_reclaim((void*)trf_17082,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17109,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17116,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g42574258");
t6=t3;
-f_17327(t6,t4,t5);}
+f_17109(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k17114 in loop4241 in maptransform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_17116(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7876,36 +7921,36 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_17116,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop43034316");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop42414254");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_17300(t6,((C_word*)t0)[3],t5);}
+f_17082(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop43034316");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop42414254");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_17300(t6,((C_word*)t0)[3],t5);}}
+f_17082(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){
+/* g4257 in loop4241 in maptransform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_17109(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_17327,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 2329 transform");
+C_save_and_reclaim((void*)trf_17109,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 2311 transform");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_16269(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_16051(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){
+/* transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_16051(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -7920,30 +7965,30 @@ 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);}
+C_save_and_reclaim((void*)trf_16051,NULL,5,t0,t1,t2,t3,t4);}
t5=t2;
-t6=(C_word)C_slot(t5,C_fix(3));
+t6=C_slot(t5,C_fix(3));
t7=t2;
-t8=(C_word)C_slot(t7,C_fix(2));
+t8=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);
+t10=C_slot(t9,C_fix(1));
+t11=C_eqp(t10,lf[98]);
+t12=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_16085,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t6,a[5]=((C_word*)t0)[4],a[6]=t4,a[7]=t3,a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=t8,a[11]=t10,a[12]=t1,a[13]=t2,tmp=(C_word)a,a+=14,tmp);
if(C_truep(t11)){
t13=t12;
-f_16303(t13,t11);}
+f_16085(t13,t11);}
else{
-t13=(C_word)C_eqp(t10,lf[139]);
+t13=C_eqp(t10,lf[138]);
if(C_truep(t13)){
t14=t12;
-f_16303(t14,t13);}
+f_16085(t14,t13);}
else{
-t14=(C_word)C_eqp(t10,lf[565]);
+t14=C_eqp(t10,lf[553]);
t15=t12;
-f_16303(t15,(C_truep(t14)?t14:(C_word)C_eqp(t10,lf[524])));}}}
+f_16085(t15,(C_truep(t14)?t14:C_eqp(t10,lf[516])));}}}
-/* k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
-static void C_fcall f_16303(C_word t0,C_word t1){
+/* k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_16085(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7966,86 +8011,86 @@ 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);}
+C_save_and_reclaim((void*)trf_16085,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[13];
t3=((C_word*)t0)[12];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-t2=(C_word)C_eqp(((C_word*)t0)[11],lf[517]);
+t2=C_eqp(((C_word*)t0)[11],lf[509]);
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]);}
+t3=C_i_car(((C_word*)t0)[10]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16097,a[2]=t3,a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[12],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2186 ref-var");
+f_17122(t4,((C_word*)t0)[13],((C_word*)t0)[7],((C_word*)t0)[6]);}
else{
-t3=(C_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);
+t3=C_eqp(((C_word*)t0)[11],lf[123]);
+t4=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_16124,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[4],a[10]=((C_word*)t0)[5],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
if(C_truep(t3)){
t5=t4;
-f_16342(t5,t3);}
+f_16124(t5,t3);}
else{
-t5=(C_word)C_eqp(((C_word*)t0)[11],lf[513]);
+t5=C_eqp(((C_word*)t0)[11],lf[505]);
if(C_truep(t5)){
t6=t4;
-f_16342(t6,t5);}
+f_16124(t6,t5);}
else{
-t6=(C_word)C_eqp(((C_word*)t0)[11],lf[272]);
+t6=C_eqp(((C_word*)t0)[11],lf[270]);
if(C_truep(t6)){
t7=t4;
-f_16342(t7,t6);}
+f_16124(t7,t6);}
else{
-t7=(C_word)C_eqp(((C_word*)t0)[11],lf[273]);
+t7=C_eqp(((C_word*)t0)[11],lf[271]);
if(C_truep(t7)){
t8=t4;
-f_16342(t8,t7);}
+f_16124(t8,t7);}
else{
-t8=(C_word)C_eqp(((C_word*)t0)[11],lf[345]);
+t8=C_eqp(((C_word*)t0)[11],lf[343]);
if(C_truep(t8)){
t9=t4;
-f_16342(t9,t8);}
+f_16124(t9,t8);}
else{
-t9=(C_word)C_eqp(((C_word*)t0)[11],lf[101]);
+t9=C_eqp(((C_word*)t0)[11],lf[100]);
if(C_truep(t9)){
t10=t4;
-f_16342(t10,t9);}
+f_16124(t10,t9);}
else{
-t10=(C_word)C_eqp(((C_word*)t0)[11],lf[253]);
+t10=C_eqp(((C_word*)t0)[11],lf[251]);
if(C_truep(t10)){
t11=t4;
-f_16342(t11,t10);}
+f_16124(t11,t10);}
else{
-t11=(C_word)C_eqp(((C_word*)t0)[11],lf[622]);
+t11=C_eqp(((C_word*)t0)[11],lf[610]);
if(C_truep(t11)){
t12=t4;
-f_16342(t12,t11);}
+f_16124(t12,t11);}
else{
-t12=(C_word)C_eqp(((C_word*)t0)[11],lf[623]);
+t12=C_eqp(((C_word*)t0)[11],lf[611]);
if(C_truep(t12)){
t13=t4;
-f_16342(t13,t12);}
+f_16124(t13,t12);}
else{
-t13=(C_word)C_eqp(((C_word*)t0)[11],lf[624]);
+t13=C_eqp(((C_word*)t0)[11],lf[612]);
if(C_truep(t13)){
t14=t4;
-f_16342(t14,t13);}
+f_16124(t14,t13);}
else{
-t14=(C_word)C_eqp(((C_word*)t0)[11],lf[540]);
+t14=C_eqp(((C_word*)t0)[11],lf[532]);
if(C_truep(t14)){
t15=t4;
-f_16342(t15,t14);}
+f_16124(t15,t14);}
else{
-t15=(C_word)C_eqp(((C_word*)t0)[11],lf[625]);
+t15=C_eqp(((C_word*)t0)[11],lf[613]);
if(C_truep(t15)){
t16=t4;
-f_16342(t16,t15);}
+f_16124(t16,t15);}
else{
-t16=(C_word)C_eqp(((C_word*)t0)[11],lf[105]);
+t16=C_eqp(((C_word*)t0)[11],lf[104]);
t17=t4;
-f_16342(t17,(C_truep(t16)?t16:(C_word)C_eqp(((C_word*)t0)[11],lf[256])));}}}}}}}}}}}}}}}
+f_16124(t17,(C_truep(t16)?t16:C_eqp(((C_word*)t0)[11],lf[254])));}}}}}}}}}}}}}}}
-/* 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){
+/* k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_16124(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8078,78 +8123,78 @@ 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);}
+C_save_and_reclaim((void*)trf_16124,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");
+t3=C_slot(t2,C_fix(1));
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16145,a[2]=((C_word*)t0)[11],a[3]=t3,a[4]=((C_word*)t0)[12],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2194 maptransform");
t5=((C_word*)((C_word*)t0)[10])[1];
-f_17294(t5,t4,((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[7]);}
+f_17076(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]);
+t2=C_eqp(((C_word*)t0)[6],lf[158]);
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");
+t3=C_i_car(((C_word*)t0)[11]);
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16157,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[12],a[9]=t3,tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 2198 test");
t5=((C_word*)((C_word*)t0)[4])[1];
-f_15807(t5,t4,t3,lf[588]);}
+f_15589(t5,t4,t3,lf[575]);}
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]));
+t3=C_eqp(((C_word*)t0)[6],lf[172]);
+t4=(C_truep(t3)?t3:C_eqp(((C_word*)t0)[6],lf[537]));
if(C_truep(t4)){
-t5=(C_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);}
+t5=C_i_caddr(((C_word*)t0)[11]);
+t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_16258,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[3],a[8]=t5,a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[8],tmp=(C_word)a,a+=12,tmp);
+C_trace("compiler.scm: 2214 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[12],t5,t6);}
else{
-t5=(C_word)C_eqp(((C_word*)t0)[6],lf[252]);
+t5=C_eqp(((C_word*)t0)[6],lf[250]);
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);
+t6=C_i_car(((C_word*)t0)[11]);
+t7=C_i_car(((C_word*)t0)[9]);
+t8=C_slot(t7,C_fix(1));
+t9=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16747,a[2]=((C_word*)t0)[12],a[3]=t6,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=t7,a[8]=((C_word*)t0)[5],a[9]=t8,tmp=(C_word)a,a+=10,tmp);
+t10=C_eqp(lf[98],t8);
if(C_truep(t10)){
-t11=(C_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);}
+t11=C_slot(t7,C_fix(2));
+t12=C_i_car(t11);
+C_trace("compiler.scm: 2274 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[608]))(3,*((C_word*)lf[608]+1),t9,t12);}
else{
t11=t9;
-f_16965(2,t11,C_SCHEME_FALSE);}}
+f_16747(2,t11,C_SCHEME_FALSE);}}
else{
-t6=(C_word)C_eqp(((C_word*)t0)[6],lf[107]);
+t6=C_eqp(((C_word*)t0)[6],lf[106]);
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);
+t7=(C_truep(*((C_word*)lf[34]+1))?C_a_i_list(&a,1,C_fix(2)):C_a_i_list(&a,1,C_fix(1)));
+t8=C_i_car(((C_word*)t0)[11]);
+t9=C_a_i_list(&a,2,t8,C_SCHEME_TRUE);
+t10=C_a_i_record(&a,4,lf[504],lf[553],t9,C_SCHEME_END_OF_LIST);
if(C_truep(*((C_word*)lf[34]+1))){
-t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);}
+t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16958,a[2]=t7,a[3]=((C_word*)t0)[12],a[4]=t10,tmp=(C_word)a,a+=5,tmp);
+t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16962,a[2]=t11,tmp=(C_word)a,a+=3,tmp);
+t13=C_i_car(((C_word*)t0)[11]);
+C_trace("compiler.scm: 2305 ##sys#make-lambda-info");
+((C_proc3)C_retrieve_symbol_proc(lf[596]))(3,*((C_word*)lf[596]+1),t12,t13);}
else{
-t11=(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
t12=((C_word*)t0)[12];
t13=t12;
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,(C_word)C_a_i_record(&a,4,lf[512],lf[606],t7,t11));}}
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,C_a_i_record(&a,4,lf[504],lf[594],t7,t11));}}
else{
-C_trace("compiler.scm: 2326 bomb");
-((C_proc3)C_retrieve_symbol_proc(lf[522]))(3,*((C_word*)lf[522]+1),((C_word*)t0)[12],lf[621]);}}}}}}
+C_trace("compiler.scm: 2308 bomb");
+((C_proc3)C_retrieve_symbol_proc(lf[514]))(3,*((C_word*)lf[514]+1),((C_word*)t0)[12],lf[609]);}}}}}}
-/* 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){
+/* k16960 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16962(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 2323 qnode");
-((C_proc3)C_retrieve_symbol_proc(lf[607]))(3,*((C_word*)lf[607]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 2305 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[595]))(3,*((C_word*)lf[595]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k16956 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16958(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8157,49 +8202,49 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_16958,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
t4=((C_word*)t0)[3];
t5=t4;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_record(&a,4,lf[512],lf[606],((C_word*)t0)[2],t3));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_record(&a,4,lf[504],lf[594],((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){
+/* k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16747(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_16747,2,t0,t1);}
+t2=(C_truep(t1)?t1:C_eqp(lf[138],((C_word*)t0)[9]));
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16753,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t2,tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 2276 posq");
+((C_proc4)C_retrieve_symbol_proc(lf[180]))(4,*((C_word*)lf[180]+1),t3,((C_word*)t0)[3],((C_word*)t0)[5]);}
-/* 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){
+/* k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16753(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16971,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_16753,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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");
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16757,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
+C_trace("g41984199");
t3=t2;
-f_16975(t3,((C_word*)t0)[2],t1);}
+f_16757(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");
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16850,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[2],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 2290 test");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_15807(t3,t2,((C_word*)t0)[3],lf[588]);}}
+f_15589(t3,t2,((C_word*)t0)[3],lf[575]);}}
-/* 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){
+/* k16848 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16850(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8208,75 +8253,75 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_16850,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");
+t2=(C_truep(((C_word*)t0)[8])?lf[603]:lf[604]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16870,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 2294 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t3,((C_word*)t0)[2]);}
+else{
+t2=C_a_i_list(&a,1,((C_word*)t0)[2]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16894,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2298 transform");
t4=((C_word*)((C_word*)t0)[6])[1];
-f_16269(t4,t3,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}}
+f_16051(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){
+/* k16892 in k16848 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16894(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17112,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,1,t1);
+C_save_and_reclaim((void*)tr2,(void*)f_16894,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
t3=((C_word*)t0)[3];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[252],((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[250],((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){
+/* k16868 in k16848 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16870(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_16870,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16874,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2295 transform");
t3=((C_word*)((C_word*)t0)[5])[1];
-f_16269(t3,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_16051(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){
+/* k16872 in k16868 in k16848 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16874(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17092,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_16874,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,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){
+/* g4198 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_16757(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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");
+C_save_and_reclaim((void*)trf_16757,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16764,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=t1,a[7]=t2,a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 2278 test");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_15807(t4,t3,((C_word*)t0)[2],lf[588]);}
+f_15589(t4,t3,((C_word*)t0)[2],lf[575]);}
-/* 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){
+/* k16762 in g4198 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16764(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8289,51 +8334,51 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_16764,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]);}
+t2=(C_truep(((C_word*)t0)[8])?lf[603]:lf[604]);
+t3=C_fixnum_increase(((C_word*)t0)[7]);
+t4=C_a_i_list(&a,1,t3);
+t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16805,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=((C_word*)t0)[6],a[8]=t4,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 2282 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t5,((C_word*)t0)[3]);}
else{
-t2=(C_truep(((C_word*)t0)[8])?lf[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]);}}
+t2=(C_truep(((C_word*)t0)[8])?lf[606]:lf[607]);
+t3=C_fixnum_increase(((C_word*)t0)[7]);
+t4=C_a_i_list(&a,1,t3);
+t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16833,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t4,a[7]=t2,a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 2288 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t5,((C_word*)t0)[3]);}}
-/* 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){
+/* k16831 in k16762 in g4198 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16833(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_16833,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16837,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 2289 transform");
t3=((C_word*)((C_word*)t0)[5])[1];
-f_16269(t3,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_16051(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){
+/* k16835 in k16831 in k16762 in g4198 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16837(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17055,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[5],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_16837,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[5],t1);
t3=((C_word*)t0)[4];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t2));}
-/* 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){
+/* k16803 in k16762 in g4198 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16805(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8341,30 +8386,30 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_16805,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
+t3=C_a_i_record(&a,4,lf[504],lf[605],((C_word*)t0)[8],t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16793,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2283 transform");
t5=((C_word*)((C_word*)t0)[5])[1];
-f_16269(t5,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_16051(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){
+/* k16791 in k16803 in k16762 in g4198 in k16751 in k16745 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16793(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_17011,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_16793,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,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){
+/* a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16258(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -8372,26 +8417,26 @@ 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);}
+C_save_and_reclaim((void*)tr5,(void*)f_16258,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_16262,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t3,a[6]=t4,a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[7],a[11]=((C_word*)t0)[8],a[12]=t1,a[13]=((C_word*)t0)[9],a[14]=((C_word*)t0)[10],a[15]=((C_word*)t0)[11],tmp=(C_word)a,a+=16,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16720,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2217 filter");
+((C_proc4)C_retrieve_symbol_proc(lf[602]))(4,*((C_word*)lf[602]+1),t5,t6,t2);}
-/* 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){
+/* a16719 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16720(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_16938,3,t0,t1,t2);}
-C_trace("compiler.scm: 2235 test");
+C_save_and_reclaim((void*)tr3,(void*)f_16720,3,t0,t1,t2);}
+C_trace("compiler.scm: 2217 test");
t3=((C_word*)((C_word*)t0)[2])[1];
-f_15807(t3,t1,t2,lf[588]);}
+f_15589(t3,t1,t2,lf[575]);}
-/* 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){
+/* k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16262(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8409,25 +8454,25 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_16262,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_16265,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],tmp=(C_word)a,a+=17,tmp);
t7=C_SCHEME_END_OF_LIST;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
t9=C_SCHEME_FALSE;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16852,a[2]=t1,a[3]=t6,a[4]=t3,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
+t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16634,a[2]=t1,a[3]=t6,a[4]=t3,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
t12=C_SCHEME_UNDEFINED;
t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16903,a[2]=t8,a[3]=t13,a[4]=t10,tmp=(C_word)a,a+=5,tmp));
+t14=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16685,a[2]=t8,a[3]=t13,a[4]=t10,tmp=(C_word)a,a+=5,tmp));
t15=((C_word*)t13)[1];
-f_16903(t15,t11,t1);}
+f_16685(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){
+/* loop4007 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_16685(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8436,12 +8481,12 @@ 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");
+C_save_and_reclaim((void*)trf_16685,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_retrieve(lf[96]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16714,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g40234024");
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -8449,8 +8494,8 @@ 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){
+/* k16712 in loop4007 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16714(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8462,25 +8507,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_16714,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop40694082");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop40074020");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_16903(t6,((C_word*)t0)[3],t5);}
+f_16685(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop40694082");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop40074020");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_16903(t6,((C_word*)t0)[3],t5);}}
+f_16685(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){
+/* k16632 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16634(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8488,15 +8533,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_16634,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16854,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16636,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_16854(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+f_16636(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){
+/* loop3980 in k16632 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_16636(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -8508,15 +8553,15 @@ 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);
+C_save_and_reclaim((void*)trf_16636,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=*((C_word*)lf[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");
+t6=*((C_word*)lf[162]+1);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16669,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+t8=C_slot(t2,C_fix(0));
+t9=C_slot(t3,C_fix(0));
+C_trace("g40004001");
t10=t6;
((C_proc4)C_retrieve_proc(t10))(4,t10,t7,t8,t9);}
else{
@@ -8524,8 +8569,8 @@ 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){
+/* k16667 in loop3980 in k16632 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16669(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8533,19 +8578,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_16669,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16649,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
t4=t3;
-f_16867(t4,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
+f_16649(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
else{
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=t3;
-f_16867(t5,t4);}}
+f_16649(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){
+/* k16647 in k16667 in loop3980 in k16632 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_16649(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8553,56 +8598,56 @@ 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");
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+C_trace("loop39803994");
t5=((C_word*)((C_word*)t0)[3])[1];
-f_16854(t5,((C_word*)t0)[2],t3,t4);}
+f_16636(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){
+/* k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16265(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[18],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_16265,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_16268,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],tmp=(C_word)a,a+=18,tmp);
+C_trace("compiler.scm: 2219 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,lf[136]);}
-/* 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){
+/* k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16268(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[20],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_16268,2,t0,t1);}
+t2=(C_truep(((C_word*)t0)[17])?C_i_car(((C_word*)t0)[16]):lf[589]);
+t3=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_16274,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[17],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=t2,a[18]=t1,a[19]=((C_word*)t0)[16],tmp=(C_word)a,a+=20,tmp);
+C_trace("compiler.scm: 2221 test");
t4=((C_word*)((C_word*)t0)[2])[1];
-f_15807(t4,t3,t2,lf[602]);}
+f_15589(t4,t3,t2,lf[590]);}
-/* 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){
+/* k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16274(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[21],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16492,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_16274,2,t0,t1);}
t2=(C_truep(t1)?t1:C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_16280,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=t2,a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],a[18]=((C_word*)t0)[17],a[19]=((C_word*)t0)[18],a[20]=((C_word*)t0)[19],tmp=(C_word)a,a+=21,tmp);
+C_trace("compiler.scm: 2222 test");
t4=((C_word*)((C_word*)t0)[2])[1];
-f_15807(t4,t3,((C_word*)t0)[17],lf[603]);}
+f_15589(t4,t3,((C_word*)t0)[17],lf[591]);}
-/* 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){
+/* k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16280(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8610,71 +8655,71 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_16280,2,t0,t1);}
t2=(C_truep(t1)?t1:C_fix(0));
-t3=(*a=C_CLOSURE_TYPE|21,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|21,a[1]=(C_word)f_16286,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],a[19]=((C_word*)t0)[19],a[20]=((C_word*)t0)[20],a[21]=t2,tmp=(C_word)a,a+=22,tmp);
if(C_truep(*((C_word*)lf[34]+1))){
-t4=(C_word)C_i_cadr(((C_word*)t0)[20]);
+t4=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));}
+f_16286(t5,(C_truep(t4)?C_i_pairp(((C_word*)t0)[15]):C_SCHEME_FALSE));}
else{
t4=t3;
-f_16504(t4,C_SCHEME_FALSE);}}
+f_16286(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){
+/* k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_16286(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[28],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);
+C_save_and_reclaim((void*)trf_16286,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_16289,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[13],a[12]=((C_word*)t0)[14],a[13]=((C_word*)t0)[15],a[14]=((C_word*)t0)[16],a[15]=((C_word*)t0)[17],a[16]=((C_word*)t0)[18],a[17]=((C_word*)t0)[19],a[18]=((C_word*)t0)[20],a[19]=((C_word*)t0)[21],a[20]=t1,tmp=(C_word)a,a+=21,tmp);
if(C_truep(((C_word*)t0)[6])){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16601,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 2228 test");
t4=((C_word*)((C_word*)t0)[2])[1];
-f_15807(t4,t3,((C_word*)t0)[6],lf[588]);}
+f_15589(t4,t3,((C_word*)t0)[6],lf[575]);}
else{
t3=t2;
-f_16507(2,t3,C_SCHEME_FALSE);}}
+f_16289(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){
+/* k16599 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16601(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16819,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_16601,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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");
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16604,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 2229 test");
t3=((C_word*)((C_word*)t0)[2])[1];
-f_15807(t3,t2,((C_word*)t0)[6],lf[544]);}
+f_15589(t3,t2,((C_word*)t0)[6],lf[540]);}
else{
t2=((C_word*)t0)[4];
-f_16507(2,t2,C_SCHEME_FALSE);}}
+f_16289(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){
+/* k16602 in k16599 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16604(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
if(C_truep(t1)){
-t2=(C_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);}
+t2=C_i_assq(((C_word*)t0)[5],((C_word*)t0)[4]);
+t3=C_i_cdr(t2);
+C_trace("compiler.scm: 2230 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[3],((C_word*)t0)[2],t3,lf[601],C_SCHEME_TRUE);}
else{
t2=((C_word*)t0)[3];
-f_16507(2,t2,C_SCHEME_FALSE);}}
+f_16289(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){
+/* k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16289(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8691,24 +8736,24 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_16289,2,t0,t1);}
+t2=(C_truep(((C_word*)t0)[20])?C_fixnum_plus(((C_word*)t0)[19],C_fix(2)):C_fixnum_plus(((C_word*)t0)[19],C_fix(1)));
+t3=C_a_i_list(&a,1,t2);
+t4=C_i_cadr(((C_word*)t0)[18]);
+t5=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_16524,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[13],a[11]=((C_word*)t0)[20],a[12]=t3,a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=t4,a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[18],a[18]=((C_word*)t0)[17],tmp=(C_word)a,a+=19,tmp);
t6=C_SCHEME_END_OF_LIST;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=C_SCHEME_FALSE;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16528,a[2]=((C_word*)t0)[3],a[3]=t5,a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
t11=C_SCHEME_UNDEFINED;
t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16761,a[2]=t7,a[3]=t12,a[4]=t9,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp));
+t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16543,a[2]=t7,a[3]=t12,a[4]=t9,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp));
t14=((C_word*)t12)[1];
-f_16761(t14,t10,((C_word*)t0)[2]);}
+f_16543(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){
+/* loop4063 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_16543(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8728,17 +8773,17 @@ 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);
+C_save_and_reclaim((void*)trf_16543,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16570,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=f_16570(t3,t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
+t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-C_trace("loop41254138");
+t9=C_slot(t2,C_fix(1));
+C_trace("loop40634076");
t15=t1;
t16=t9;
t1=t15;
@@ -8747,8 +8792,8 @@ 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");
+t9=C_slot(t2,C_fix(1));
+C_trace("loop40634076");
t15=t1;
t16=t9;
t1=t15;
@@ -8759,40 +8804,40 @@ 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){
+/* g4079 in loop4063 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static C_word C_fcall f_16570(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_stack_check;
-t2=(C_word)C_i_assq(t1,((C_word*)t0)[2]);
+t2=C_i_assq(t1,((C_word*)t0)[2]);
if(C_truep(t2)){
-return((C_word)C_i_cdr(t2));}
+return(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){
+/* k16526 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16528(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
-t2=(C_truep(((C_word*)t0)[5])?(C_word)C_i_assq(((C_word*)t0)[5],((C_word*)t0)[4]):C_SCHEME_FALSE);
+t2=(C_truep(((C_word*)t0)[5])?C_i_assq(((C_word*)t0)[5],((C_word*)t0)[4]):C_SCHEME_FALSE);
if(C_truep(t2)){
-t3=(C_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);}
+t3=C_i_cdr(t2);
+C_trace("compiler.scm: 2240 build-lambda-list");
+((C_proc5)C_retrieve_symbol_proc(lf[179]))(5,*((C_word*)lf[179]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2],t3);}
else{
t3=((C_word*)t0)[5];
-C_trace("compiler.scm: 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);}}
+C_trace("compiler.scm: 2240 build-lambda-list");
+((C_proc5)C_retrieve_symbol_proc(lf[179]))(5,*((C_word*)lf[179]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2],t3);}}
-/* 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){
+/* k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16524(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8803,19 +8848,19 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_16524,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[18],t1);
+t3=C_i_cadddr(((C_word*)t0)[17]);
+t4=C_a_i_list(&a,4,((C_word*)t0)[16],((C_word*)t0)[15],t2,t3);
+t5=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_16407,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[16],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[13],a[11]=t4,a[12]=((C_word*)t0)[14],tmp=(C_word)a,a+=13,tmp);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16411,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+t7=C_i_car(((C_word*)t0)[3]);
+C_trace("compiler.scm: 2249 transform");
t8=((C_word*)((C_word*)t0)[2])[1];
-f_16269(t8,t6,t7,((C_word*)t0)[18],((C_word*)t0)[6]);}
+f_16051(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){
+/* k16409 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16411(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8824,20 +8869,20 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_16411,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16414,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_16422,tmp=(C_word)a,a+=2,tmp);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16443,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 2254 unzip1");
+((C_proc3)C_retrieve_symbol_proc(lf[163]))(3,*((C_word*)lf[163]+1),t4,((C_word*)t0)[2]);}
else{
t3=t1;
t4=((C_word*)t0)[4];
-f_16625(t4,(C_word)C_a_i_list(&a,1,t3));}}
+f_16407(t4,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){
+/* k16441 in k16409 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16443(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8850,20 +8895,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_16443,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16447,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16667,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16449,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
-f_16667(t10,t6,((C_word*)t0)[2]);}
+f_16449(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){
+/* loop4114 in k16441 in k16409 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_16449(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8872,20 +8917,20 @@ 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);}
+C_save_and_reclaim((void*)trf_16449,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_slot(t2,C_fix(0));
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16493,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_i_cdr(t3);
+C_trace("compiler.scm: 2255 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k16491 in loop4114 in k16441 in k16409 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16493(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8899,35 +8944,35 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_16493,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
+t3=C_a_i_record(&a,4,lf[504],lf[593],C_SCHEME_END_OF_LIST,t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t5=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t4);
+t5=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t4);
t6=C_mutate(((C_word *)((C_word*)t0)[6])+1,t4);
-t7=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop41764189");
+t7=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop41144127");
t8=((C_word*)((C_word*)t0)[4])[1];
-f_16667(t8,((C_word*)t0)[3],t7);}
+f_16449(t8,((C_word*)t0)[3],t7);}
else{
t5=C_mutate(((C_word *)((C_word*)t0)[2])+1,t4);
t6=C_mutate(((C_word *)((C_word*)t0)[6])+1,t4);
-t7=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop41764189");
+t7=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop41144127");
t8=((C_word*)((C_word*)t0)[4])[1];
-f_16667(t8,((C_word*)t0)[3],t7);}}
+f_16449(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){
+/* k16445 in k16441 in k16409 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16447(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 2251 fold-right");
+((C_proc6)C_retrieve_symbol_proc(lf[600]))(6,*((C_word*)lf[600]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* a16421 in k16409 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16422(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -8935,24 +8980,24 @@ 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);
+C_save_and_reclaim((void*)tr5,(void*)f_16422,5,t0,t1,t2,t3,t4);}
+t5=C_a_i_list(&a,1,t2);
+t6=C_a_i_list(&a,2,t3,t4);
t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_record(&a,4,lf[512],lf[159],t5,t6));}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_record(&a,4,lf[504],lf[158],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){
+/* k16412 in k16409 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16414(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16632,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_16414,2,t0,t1);}
t2=((C_word*)t0)[2];
-f_16625(t2,(C_word)C_a_i_list(&a,1,t1));}
+f_16407(t2,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){
+/* k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_16407(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8966,21 +9011,21 @@ 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);
+C_save_and_reclaim((void*)trf_16407,NULL,2,t0,t1);}
+t2=C_a_i_record(&a,4,lf[504],((C_word*)t0)[12],((C_word*)t0)[11],t1);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16318,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16357,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp));
t11=((C_word*)t9)[1];
-f_16575(t11,t7,((C_word*)t0)[2]);}
+f_16357(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){
+/* loop4144 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_16357(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8989,21 +9034,21 @@ 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");
+C_save_and_reclaim((void*)trf_16357,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16384,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16395,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g41604161");
t6=t3;
-f_16602(t6,t4,t5);}
+f_16384(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k16393 in loop4144 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16395(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9015,45 +9060,45 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_16395,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop42064219");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop41444157");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_16575(t6,((C_word*)t0)[3],t5);}
+f_16357(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop42064219");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop41444157");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_16575(t6,((C_word*)t0)[3],t5);}}
+f_16357(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){
+/* g4160 in loop4144 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_16384(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_16384,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16392,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 2258 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t3,t2);}
-/* 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){
+/* k16390 in g4160 in loop4144 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16392(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 2276 ref-var");
-f_17340(((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
+C_trace("compiler.scm: 2258 ref-var");
+f_17122(((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){
+/* k16316 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16318(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9066,24 +9111,24 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_16318,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16321,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
if(C_truep(((C_word*)t0)[4])){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16332,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16336,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16340,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16348,a[2]=t5,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2266 real-name");
+((C_proc3)C_retrieve_symbol_proc(lf[599]))(3,*((C_word*)lf[599]+1),t6,((C_word*)t0)[2]);}
else{
t3=t1;
-t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
t5=((C_word*)t0)[6];
t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[512],lf[606],((C_word*)t0)[5],t4));}}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[504],lf[594],((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){
+/* k16346 in k16316 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16348(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9093,75 +9138,75 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_16348,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);}
+t3=C_i_cdr(((C_word*)t0)[3]);
+t4=C_a_i_cons(&a,2,t2,t3);
+C_trace("compiler.scm: 2266 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[597]))(3,*((C_word*)lf[597]+1),((C_word*)t0)[2],t4);}
else{
-t2=(C_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);}}
+t2=C_i_cdr(((C_word*)t0)[3]);
+t3=C_a_i_cons(&a,2,lf[598],t2);
+C_trace("compiler.scm: 2266 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[597]))(3,*((C_word*)lf[597]+1),((C_word*)t0)[2],t3);}}
-/* 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){
+/* k16338 in k16316 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16340(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 2283 ##sys#make-lambda-info");
-((C_proc3)C_retrieve_symbol_proc(lf[608]))(3,*((C_word*)lf[608]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 2265 ##sys#make-lambda-info");
+((C_proc3)C_retrieve_symbol_proc(lf[596]))(3,*((C_word*)lf[596]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k16334 in k16316 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16336(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 2282 qnode");
-((C_proc3)C_retrieve_symbol_proc(lf[607]))(3,*((C_word*)lf[607]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 2264 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[595]))(3,*((C_word*)lf[595]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k16330 in k16316 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16332(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_16332,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
+C_trace("compiler.scm: 2261 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[3],((C_word*)t0)[2],t2);}
-/* 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){
+/* k16319 in k16316 in k16405 in k16522 in k16287 in k16284 in k16278 in k16272 in k16266 in k16263 in k16260 in a16257 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16321(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16539,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_16321,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[606],((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[594],((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){
+/* k16155 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16157(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_16157,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_16160,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,tmp=(C_word)a,a+=11,tmp);
+C_trace("compiler.scm: 2199 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,((C_word*)t0)[9]);}
-/* 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){
+/* k16158 in k16155 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16160(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9170,48 +9215,48 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_16160,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");
+t2=C_a_i_list(&a,1,t1);
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16183,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t2,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
+t4=C_i_car(((C_word*)t0)[7]);
+C_trace("compiler.scm: 2203 transform");
t5=((C_word*)((C_word*)t0)[6])[1];
-f_16269(t5,t3,t4,((C_word*)t0)[5],((C_word*)t0)[4]);}
+f_16051(t5,t3,t4,((C_word*)t0)[5],((C_word*)t0)[4]);}
else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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");
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16241,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[8],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2210 maptransform");
t3=((C_word*)((C_word*)t0)[2])[1];
-f_17294(t3,t2,((C_word*)t0)[7],((C_word*)t0)[5],((C_word*)t0)[4]);}}
+f_17076(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){
+/* k16239 in k16158 in k16155 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16241(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16459,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_16241,2,t0,t1);}
t2=((C_word*)t0)[3];
t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],lf[158],((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){
+/* k16181 in k16158 in k16155 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16183(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[13],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_16183,2,t0,t1);}
+t2=C_a_i_list(&a,1,((C_word*)t0)[9]);
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16225,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,a[9]=t2,tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 2206 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t3,((C_word*)t0)[2]);}
-/* 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){
+/* k16223 in k16181 in k16158 in k16155 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16225(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9220,17 +9265,17 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_16225,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
+t3=C_a_i_record(&a,4,lf[504],lf[593],C_SCHEME_END_OF_LIST,t2);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16213,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
+t5=C_i_cadr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 2207 transform");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_16269(t6,t4,t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_16051(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){
+/* k16211 in k16223 in k16181 in k16158 in k16155 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16213(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9239,41 +9284,41 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_16213,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[6],t1);
+t3=C_a_i_record(&a,4,lf[504],lf[158],((C_word*)t0)[5],t2);
+t4=C_a_i_list(&a,2,((C_word*)t0)[4],t3);
t5=((C_word*)t0)[3];
t6=t5;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[2],t4));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_a_i_record(&a,4,lf[504],lf[158],((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){
+/* k16143 in k16122 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16145(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_16363,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_16145,2,t0,t1);}
t2=((C_word*)t0)[4];
t3=t2;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,4,lf[504],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
-/* 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){
+/* k16095 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16097(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_16097,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16103,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2187 test");
t3=((C_word*)((C_word*)t0)[3])[1];
-f_15807(t3,t2,((C_word*)t0)[2],lf[588]);}
+f_15589(t3,t2,((C_word*)t0)[2],lf[575]);}
-/* 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){
+/* k16101 in k16095 in k16083 in transform in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16103(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9281,19 +9326,19 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_16103,2,t0,t1);}
if(C_truep(t1)){
-t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[3]);
+t2=C_a_i_list(&a,1,((C_word*)t0)[3]);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[604],C_SCHEME_END_OF_LIST,t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[592],C_SCHEME_END_OF_LIST,t2));}
else{
t2=((C_word*)t0)[3];
t3=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-/* gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
-static void C_fcall f_15834(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
+/* gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_15616(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -9310,40 +9355,40 @@ 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);}
+C_save_and_reclaim((void*)trf_15616,NULL,5,t0,t1,t2,t3,t4);}
t5=t2;
-t6=(C_word)C_slot(t5,C_fix(3));
+t6=C_slot(t5,C_fix(3));
t7=t2;
-t8=(C_word)C_slot(t7,C_fix(2));
+t8=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);
+t10=C_slot(t9,C_fix(1));
+t11=C_eqp(t10,lf[98]);
+t12=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_15650,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=t4,a[8]=t3,a[9]=((C_word*)t0)[6],a[10]=t6,a[11]=t8,a[12]=t10,a[13]=t1,tmp=(C_word)a,a+=14,tmp);
if(C_truep(t11)){
t13=t12;
-f_15868(t13,t11);}
+f_15650(t13,t11);}
else{
-t13=(C_word)C_eqp(t10,lf[517]);
+t13=C_eqp(t10,lf[509]);
if(C_truep(t13)){
t14=t12;
-f_15868(t14,t13);}
+f_15650(t14,t13);}
else{
-t14=(C_word)C_eqp(t10,lf[139]);
+t14=C_eqp(t10,lf[138]);
if(C_truep(t14)){
t15=t12;
-f_15868(t15,t14);}
+f_15650(t15,t14);}
else{
-t15=(C_word)C_eqp(t10,lf[565]);
+t15=C_eqp(t10,lf[553]);
if(C_truep(t15)){
t16=t12;
-f_15868(t16,t15);}
+f_15650(t16,t15);}
else{
-t16=(C_word)C_eqp(t10,lf[107]);
+t16=C_eqp(t10,lf[106]);
t17=t12;
-f_15868(t17,(C_truep(t16)?t16:(C_word)C_eqp(t10,lf[524])));}}}}}
+f_15650(t17,(C_truep(t16)?t16:C_eqp(t10,lf[516])));}}}}}
-/* k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
-static void C_fcall f_15868(C_word t0,C_word t1){
+/* k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_15650(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9375,64 +9420,64 @@ 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);}
+C_save_and_reclaim((void*)trf_15650,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[13];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
else{
-t2=(C_word)C_eqp(((C_word*)t0)[12],lf[159]);
+t2=C_eqp(((C_word*)t0)[12],lf[158]);
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);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15661,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15671,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],tmp=(C_word)a,a+=6,tmp);
C_trace("##sys#call-with-values");
C_call_with_values(4,0,((C_word*)t0)[13],t3,t4);}
else{
-t3=(C_word)C_eqp(((C_word*)t0)[12],lf[513]);
+t3=C_eqp(((C_word*)t0)[12],lf[505]);
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);
+t4=C_i_car(((C_word*)t0)[10]);
+t5=C_i_car(((C_word*)t0)[11]);
+t6=C_i_cdr(((C_word*)t0)[11]);
+t7=C_i_pairp(t6);
+t8=(C_truep(t7)?C_i_cadr(((C_word*)t0)[11]):C_SCHEME_FALSE);
+t9=C_slot(t4,C_fix(1));
+t10=C_eqp(lf[509],t9);
+t11=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15735,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[13],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
t12=(C_truep(t8)?t8:t10);
if(C_truep(t12)){
if(C_truep(t10)){
-t13=(C_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");
+t13=C_slot(t4,C_fix(2));
+t14=C_i_car(t13);
+t15=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_15790,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[4],a[5]=t14,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=t11,a[9]=t5,a[10]=t8,tmp=(C_word)a,a+=11,tmp);
+t16=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15908,a[2]=t14,a[3]=((C_word*)t0)[3],a[4]=t15,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2137 test");
t17=((C_word*)((C_word*)t0)[3])[1];
-f_15807(t17,t16,t14,lf[549]);}
+f_15589(t17,t16,t14,lf[536]);}
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);}}
+t13=C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
+t14=C_a_i_cons(&a,2,t5,t13);
+C_trace("compiler.scm: 2130 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[585]))(4,*((C_word*)lf[585]+1),t11,((C_word*)t0)[6],t14);}}
else{
-t13=(C_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);}}
+t13=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+C_trace("compiler.scm: 2130 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[585]))(4,*((C_word*)lf[585]+1),t11,((C_word*)t0)[6],t13);}}
else{
-t4=(C_word)C_eqp(((C_word*)t0)[12],lf[173]);
-t5=(C_truep(t4)?t4:(C_word)C_eqp(((C_word*)t0)[12],lf[550]));
+t4=C_eqp(((C_word*)t0)[12],lf[172]);
+t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[12],lf[537]));
if(C_truep(t5)){
-t6=(C_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);}
+t6=C_i_caddr(((C_word*)t0)[11]);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15954,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 2163 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[13],t6,t7);}
else{
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15993,a[2]=t7,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],tmp=(C_word)a,a+=6,tmp));
t9=((C_word*)t7)[1];
-f_16211(t9,((C_word*)t0)[13],((C_word*)t0)[10]);}}}}}
+f_15993(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){
+/* loop3813 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_15993(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9441,42 +9486,42 @@ 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");
+C_save_and_reclaim((void*)trf_15993,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16001,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16008,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g38203821");
t6=t3;
-f_16219(t6,t4,t5);}
+f_16001(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){
+/* k16006 in loop3813 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_16008(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_15993(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){
+/* g3820 in loop3813 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_16001(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16219,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 2191 gather");
+C_save_and_reclaim((void*)trf_16001,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 2173 gather");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_15834(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_15616(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){
+/* a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15954(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -9491,21 +9536,21 @@ 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]);
+C_save_and_reclaim((void*)tr5,(void*)f_15954,5,t0,t1,t2,t3,t4);}
+t5=(C_truep(((C_word*)t0)[7])?C_i_car(((C_word*)t0)[6]):lf[589]);
+t6=C_i_car(((C_word*)t0)[5]);
t7=((C_word*)t0)[4];
t8=C_SCHEME_END_OF_LIST;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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);
+t10=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_17176,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=t5,a[6]=t1,a[7]=((C_word*)t0)[3],a[8]=((C_word*)t0)[5],a[9]=t9,tmp=(C_word)a,a+=10,tmp);
t11=C_SCHEME_UNDEFINED;
t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17396,a[2]=t12,a[3]=t9,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
+t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17178,a[2]=t12,a[3]=t9,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
t14=((C_word*)t12)[1];
-f_17396(t14,t10,t6);}
+f_17178(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){
+/* walk in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_17178(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9525,51 +9570,51 @@ 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);}
+C_save_and_reclaim((void*)trf_17178,NULL,3,t0,t1,t2);}
t3=t2;
-t4=(C_word)C_slot(t3,C_fix(3));
+t4=C_slot(t3,C_fix(3));
t5=t2;
-t6=(C_word)C_slot(t5,C_fix(2));
+t6=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]);
+t8=C_slot(t7,C_fix(1));
+t9=C_eqp(t8,lf[509]);
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);}
+t10=C_i_car(t6);
+if(C_truep(C_i_memq(t10,((C_word*)t0)[4]))){
+t11=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17222,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2330 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[584]))(5,*((C_word*)lf[584]+1),t11,*((C_word*)lf[143]+1),((C_word*)((C_word*)t0)[3])[1],t10);}
else{
t11=t1;
((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,C_SCHEME_UNDEFINED);}}
else{
-t10=(C_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);
+t10=C_eqp(t8,lf[98]);
+t11=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17231,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t6,a[7]=t8,a[8]=t1,tmp=(C_word)a,a+=9,tmp);
if(C_truep(t10)){
t12=t11;
-f_17449(t12,t10);}
+f_17231(t12,t10);}
else{
-t12=(C_word)C_eqp(t8,lf[139]);
+t12=C_eqp(t8,lf[138]);
if(C_truep(t12)){
t13=t11;
-f_17449(t13,t12);}
+f_17231(t13,t12);}
else{
-t13=(C_word)C_eqp(t8,lf[107]);
+t13=C_eqp(t8,lf[106]);
if(C_truep(t13)){
t14=t11;
-f_17449(t14,t13);}
+f_17231(t14,t13);}
else{
-t14=(C_word)C_eqp(t8,lf[565]);
+t14=C_eqp(t8,lf[553]);
if(C_truep(t14)){
t15=t11;
-f_17449(t15,t14);}
+f_17231(t15,t14);}
else{
-t15=(C_word)C_eqp(t8,lf[101]);
+t15=C_eqp(t8,lf[100]);
t16=t11;
-f_17449(t16,(C_truep(t15)?t15:(C_word)C_eqp(t8,lf[524])));}}}}}}
+f_17231(t16,(C_truep(t15)?t15:C_eqp(t8,lf[516])));}}}}}}
-/* 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){
+/* k17229 in walk in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_17231(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9581,32 +9626,32 @@ 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);}
+C_save_and_reclaim((void*)trf_17231,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[8];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
else{
-t2=(C_word)C_eqp(((C_word*)t0)[7],lf[252]);
+t2=C_eqp(((C_word*)t0)[7],lf[250]);
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");
+t3=C_i_car(((C_word*)t0)[6]);
+if(C_truep(C_i_memq(t3,((C_word*)t0)[5]))){
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17257,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 2334 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[584]))(5,*((C_word*)lf[584]+1),t4,*((C_word*)lf[143]+1),((C_word*)((C_word*)t0)[4])[1],t3);}
+else{
+t4=C_i_car(((C_word*)t0)[3]);
+C_trace("compiler.scm: 2335 walk");
t5=((C_word*)((C_word*)t0)[2])[1];
-f_17396(t5,((C_word*)t0)[8],t4);}}
+f_17178(t5,((C_word*)t0)[8],t4);}}
else{
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17480,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17262,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
-f_17480(t6,((C_word*)t0)[8],((C_word*)t0)[3]);}}}
+f_17262(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){
+/* loop4341 in k17229 in walk in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_17262(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9614,43 +9659,43 @@ 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");
+C_save_and_reclaim((void*)trf_17262,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17272,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=C_slot(t2,C_fix(0));
+C_trace("g43484349");
t5=((C_word*)((C_word*)t0)[2])[1];
-f_17396(t5,t3,t4);}
+f_17178(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){
+/* k17270 in loop4341 in k17229 in walk in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_17272(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_17262(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){
+/* k17255 in k17229 in walk in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_17257(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-t3=(C_word)C_i_car(((C_word*)t0)[4]);
-C_trace("compiler.scm: 2353 walk");
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("compiler.scm: 2335 walk");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_17396(t4,((C_word*)t0)[2],t3);}
+f_17178(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){
+/* k17220 in walk in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_17222(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9659,8 +9704,8 @@ 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){
+/* k17174 in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_17176(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9668,63 +9713,63 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_17176,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);}
+t3=C_i_length(t2);
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_15967,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 2169 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t4,((C_word*)t0)[2],((C_word*)t0)[5],lf[591],t3);}
-/* 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){
+/* k15965 in k17174 in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15967(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_15967,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15970,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 2170 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t2,((C_word*)t0)[3],((C_word*)t0)[6],lf[590],((C_word*)t0)[2]);}
-/* 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){
+/* k15968 in k15965 in k17174 in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15970(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_15970,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15981,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 2171 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k15979 in k15968 in k15965 in k17174 in a15953 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15981(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 2189 gather");
+C_trace("compiler.scm: 2171 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);}
+f_15616(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){
+/* k15906 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15908(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
t2=((C_word*)t0)[4];
-f_16008(2,t2,C_SCHEME_FALSE);}
+f_15790(2,t2,C_SCHEME_FALSE);}
else{
-C_trace("compiler.scm: 2155 test");
+C_trace("compiler.scm: 2137 test");
t2=((C_word*)((C_word*)t0)[3])[1];
-f_15807(t2,((C_word*)t0)[4],((C_word*)t0)[2],lf[567]);}}
+f_15589(t2,((C_word*)t0)[4],((C_word*)t0)[2],lf[555]);}}
-/* 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){
+/* k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15790(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9732,19 +9777,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_15790,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_15796,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=t1,tmp=(C_word)a,a+=12,tmp);
if(C_truep(t1)){
t3=t1;
-t4=(C_word)C_slot(t3,C_fix(1));
+t4=C_slot(t3,C_fix(1));
t5=t2;
-f_16014(t5,(C_word)C_eqp(lf[173],t4));}
+f_15796(t5,C_eqp(lf[172],t4));}
else{
t3=t2;
-f_16014(t3,C_SCHEME_FALSE);}}
+f_15796(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){
+/* k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_15796(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9756,37 +9801,37 @@ 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);}
+C_save_and_reclaim((void*)trf_15796,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");
+t3=C_slot(t2,C_fix(2));
+t4=C_i_caddr(t3);
+t5=C_i_car(t3);
+t6=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_15813,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=t5,tmp=(C_word)a,a+=13,tmp);
+C_trace("compiler.scm: 2142 test");
t7=((C_word*)((C_word*)t0)[2])[1];
-f_15807(t7,t6,((C_word*)t0)[5],lf[571]);}
+f_15589(t7,t6,((C_word*)t0)[5],lf[559]);}
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);}}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
+C_trace("compiler.scm: 2130 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[585]))(4,*((C_word*)lf[585]+1),((C_word*)t0)[8],((C_word*)t0)[7],t3);}}
-/* 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){
+/* k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15813(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[13],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_15813,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_15816,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],tmp=(C_word)a,a+=13,tmp);
+C_trace("compiler.scm: 2143 test");
t3=((C_word*)((C_word*)t0)[2])[1];
-f_15807(t3,t2,((C_word*)t0)[6],lf[547]);}
+f_15589(t3,t2,((C_word*)t0)[6],lf[534]);}
-/* 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){
+/* k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15816(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9795,24 +9840,24 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_15816,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_15819,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],tmp=(C_word)a,a+=12,tmp);
if(C_truep(((C_word*)t0)[2])){
if(C_truep(t1)){
-t3=(C_word)C_i_length(((C_word*)t0)[2]);
-t4=(C_word)C_i_length(t1);
-t5=(C_word)C_eqp(t3,t4);
+t3=C_i_length(((C_word*)t0)[2]);
+t4=C_i_length(t1);
+t5=C_eqp(t3,t4);
t6=t2;
-f_16037(t6,(C_truep(t5)?(C_word)C_i_listp(((C_word*)t0)[3]):C_SCHEME_FALSE));}
+f_15819(t6,(C_truep(t5)?C_i_listp(((C_word*)t0)[3]):C_SCHEME_FALSE));}
else{
t3=t2;
-f_16037(t3,C_SCHEME_FALSE);}}
+f_15819(t3,C_SCHEME_FALSE);}}
else{
t3=t2;
-f_16037(t3,C_SCHEME_FALSE);}}
+f_15819(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){
+/* k15817 in k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_15819(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9820,74 +9865,74 @@ 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);
+C_save_and_reclaim((void*)trf_15819,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_15822,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=t1,a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15837,a[2]=((C_word*)t0)[10],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
if(C_truep(((C_word*)t0)[10])){
if(C_truep(t1)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15858,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2150 llist-length");
+((C_proc3)C_retrieve_symbol_proc(lf[588]))(3,*((C_word*)lf[588]+1),t4,((C_word*)t0)[2]);}
else{
t4=t3;
-f_16055(t4,C_SCHEME_FALSE);}}
+f_15837(t4,C_SCHEME_FALSE);}}
else{
t4=t3;
-f_16055(t4,C_SCHEME_FALSE);}}
+f_15837(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){
+/* k15856 in k15817 in k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15858(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[3]);
-t3=(C_word)C_i_length(t2);
-t4=(C_word)C_eqp(t1,t3);
+t2=C_i_cdr(((C_word*)t0)[3]);
+t3=C_i_length(t2);
+t4=C_eqp(t1,t3);
t5=((C_word*)t0)[2];
-f_16055(t5,(C_word)C_i_not(t4));}
+f_15837(t5,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){
+/* k15835 in k15817 in k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_15837(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_16055,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_15837,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15844,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2153 source-info->string");
+((C_proc3)C_retrieve_symbol_proc(lf[587]))(3,*((C_word*)lf[587]+1),t2,((C_word*)t0)[2]);}
else{
t2=((C_word*)t0)[3];
-f_16040(2,t2,C_SCHEME_UNDEFINED);}}
+f_15822(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){
+/* k15842 in k15835 in k15817 in k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15844(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 2169 quit");
-((C_proc4)C_retrieve_symbol_proc(lf[315]))(4,*((C_word*)lf[315]+1),((C_word*)t0)[2],lf[598],t1);}
+C_trace("compiler.scm: 2151 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[313]))(4,*((C_word*)lf[313]+1),((C_word*)t0)[2],lf[586],t1);}
-/* 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){
+/* k15820 in k15817 in k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15822(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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!");
+C_save_and_reclaim((void*)tr2,(void*)f_15822,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_15825,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 2154 register-direct-call!");
t3=((C_word*)((C_word*)t0)[2])[1];
-f_15823(t3,t2,((C_word*)t0)[10]);}
+f_15605(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){
+/* k15823 in k15820 in k15817 in k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15825(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9896,21 +9941,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_15825,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15828,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)t0)[8])){
-C_trace("compiler.scm: 2173 register-customizable!");
+C_trace("compiler.scm: 2155 register-customizable!");
t3=((C_word*)((C_word*)t0)[3])[1];
-f_15813(t3,t2,((C_word*)t0)[2],((C_word*)t0)[9]);}
+f_15595(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);}}
+t3=C_a_i_list(&a,2,((C_word*)t0)[9],((C_word*)t0)[8]);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
+C_trace("compiler.scm: 2130 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[585]))(4,*((C_word*)lf[585]+1),((C_word*)t0)[5],((C_word*)t0)[4],t5);}}
-/* 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){
+/* k15826 in k15823 in k15820 in k15817 in k15814 in k15811 in k15794 in k15788 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15828(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9918,15 +9963,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_15828,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[7],((C_word*)t0)[6]);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[5],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
+C_trace("compiler.scm: 2130 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[585]))(4,*((C_word*)lf[585]+1),((C_word*)t0)[3],((C_word*)t0)[2],t4);}
-/* 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){
+/* k15733 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15735(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9934,15 +9979,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_15735,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15740,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp));
t5=((C_word*)t3)[1];
-f_15958(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_15740(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){
+/* loop3784 in k15733 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_15740(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9951,42 +9996,42 @@ 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");
+C_save_and_reclaim((void*)trf_15740,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15748,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15755,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g37913792");
t6=t3;
-f_15966(t6,t4,t5);}
+f_15748(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){
+/* k15753 in loop3784 in k15733 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15755(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_15740(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){
+/* g3791 in loop3784 in k15733 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_15748(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15966,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 2178 gather");
+C_save_and_reclaim((void*)trf_15748,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 2160 gather");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_15834(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_15616(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){
+/* a15670 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15671(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -9996,16 +10041,16 @@ 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);
+C_save_and_reclaim((void*)tr4,(void*)f_15671,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15675,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t3,tmp=(C_word)a,a+=8,tmp);
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15688,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp));
t8=((C_word*)t6)[1];
-f_15906(t8,t4,t2);}
+f_15688(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){
+/* loop3714 in a15670 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_15688(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -10014,78 +10059,78 @@ 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");
+C_save_and_reclaim((void*)trf_15688,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15696,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15703,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g37213722");
t6=t3;
-f_15914(t6,t4,t5);}
+f_15696(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){
+/* k15701 in loop3714 in a15670 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15703(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_15688(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){
+/* g3721 in loop3714 in a15670 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_15696(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15914,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 2140 gather");
+C_save_and_reclaim((void*)trf_15696,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 2122 gather");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_15834(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_15616(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){
+/* k15673 in a15670 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15675(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_15675,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15686,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 2123 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k15684 in k15673 in a15670 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15686(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 2141 gather");
+C_trace("compiler.scm: 2123 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);}
+f_15616(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){
+/* a15660 in k15648 in gather in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15661(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_15661,2,t0,t1);}
+t2=C_i_length(((C_word*)t0)[3]);
+C_trace("compiler.scm: 2121 split-at");
+((C_proc4)C_retrieve_symbol_proc(lf[318]))(4,*((C_word*)lf[318]+1),t1,((C_word*)t0)[2],t2);}
-/* register-direct-call! in ##compiler#perform-closure-conversion in k5138 in k5135 */
-static void C_fcall f_15823(C_word t0,C_word t1,C_word t2){
+/* register-direct-call! in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_15605(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -10093,70 +10138,70 @@ 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]);
+C_save_and_reclaim((void*)trf_15605,NULL,3,t0,t1,t2);}
+t3=C_fixnum_increase(((C_word*)((C_word*)t0)[2])[1]);
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);}
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15614,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2108 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[584]))(5,*((C_word*)lf[584]+1),t5,*((C_word*)lf[143]+1),*((C_word*)lf[61]+1),t2);}
-/* 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){
+/* k15612 in register-direct-call! in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15614(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_mutate((C_word*)lf[62]+1 /* (set! direct-call-ids ...) */,t1);
+t2=C_mutate((C_word*)lf[61]+1 /* (set! direct-call-ids ...) */,t1);
t3=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* register-customizable! in ##compiler#perform-closure-conversion in k5138 in k5135 */
-static void C_fcall f_15813(C_word t0,C_word t1,C_word t2,C_word t3){
+/* register-customizable! in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_15595(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_15595,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15600,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 2103 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[584]))(5,*((C_word*)lf[584]+1),t4,*((C_word*)lf[143]+1),((C_word*)((C_word*)t0)[3])[1],t2);}
-/* 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){
+/* k15598 in register-customizable! in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_ccall f_15600(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 2104 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[583],C_SCHEME_TRUE);}
-/* test in ##compiler#perform-closure-conversion in k5138 in k5135 */
-static void C_fcall f_15807(C_word t0,C_word t1,C_word t2,C_word t3){
+/* test in ##compiler#perform-closure-conversion in k5089 in k5086 */
+static void C_fcall f_15589(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_15589,NULL,4,t0,t1,t2,t3);}
+C_trace("compiler.scm: 2100 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t1,((C_word*)t0)[2],t2,t3);}
-/* ##compiler#analyze-expression in k5138 in k5135 */
-static void C_ccall f_13727(C_word c,C_word t0,C_word t1,C_word t2){
+/* ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13640(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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);}
+C_save_and_reclaim((void*)tr3,(void*)f_13640,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13644,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1713 make-vector");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t3,C_fix(3001),C_SCHEME_END_OF_LIST);}
-/* k13729 in ##compiler#analyze-expression in k5138 in k5135 */
-static void C_ccall f_13731(C_word c,C_word t0,C_word t1){
+/* k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13644(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10182,7 +10227,7 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_13644,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_UNDEFINED;
@@ -10197,59 +10242,59 @@ 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]);}
+t16=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13653,a[2]=t9,a[3]=t5,a[4]=t7,a[5]=t11,a[6]=t1,tmp=(C_word)a,a+=7,tmp));
+t17=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14252,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
+t18=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14286,a[2]=t1,tmp=(C_word)a,a+=3,tmp));
+t19=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14464,a[2]=t1,tmp=(C_word)a,a+=3,tmp));
+t20=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_14470,tmp=(C_word)a,a+=2,tmp));
+t21=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14484,a[2]=t1,a[3]=t15,tmp=(C_word)a,a+=4,tmp));
+t22=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14509,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=t3,a[5]=t13,a[6]=t1,a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 1881 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[572]))(4,*((C_word*)lf[572]+1),t22,lf[579],lf[581]);}
-/* 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){
+/* k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14509(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14691,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_14509,2,t0,t1);}
t2=C_set_block_item(lf[52] /* current-program-size */,0,C_fix(0));
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14513,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1883 walk");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_13740(t4,t3,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
+f_13653(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){
+/* k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14513(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_14513,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14516,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1886 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[572]))(4,*((C_word*)lf[572]+1),t2,lf[579],lf[580]);}
-/* 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){
+/* k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14516(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[10],*a=ab;
+C_word ab[9],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_14516,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14519,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14525,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1887 ##sys#hash-table-for-each");
+((C_proc4)C_retrieve_symbol_proc(lf[578]))(4,*((C_word*)lf[578]+1),t2,t3,((C_word*)t0)[4]);}
-/* 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){
+/* a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14525(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -10282,14 +10327,10 @@ 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;
+C_word ab[64],*a=ab;
if(c!=4) C_bad_argc_2(c,4,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_14711,4,t0,t1,t2,t3);}
+C_save_and_reclaim((void*)tr4,(void*)f_14525,4,t0,t1,t2,t3);}
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_FALSE;
@@ -10314,21 +10355,17 @@ 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;
+t28=C_fix(0);
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);}
+t30=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_14529,a[2]=t11,a[3]=t21,a[4]=t15,a[5]=t29,a[6]=t27,a[7]=t2,a[8]=((C_word*)t0)[2],a[9]=t23,a[10]=t13,a[11]=t19,a[12]=t25,a[13]=t3,a[14]=((C_word*)t0)[3],a[15]=((C_word*)t0)[4],a[16]=t1,a[17]=t9,a[18]=t7,a[19]=t5,tmp=(C_word)a,a+=20,tmp);
+t31=C_SCHEME_UNDEFINED;
+t32=(*a=C_VECTOR_TYPE|1,a[1]=t31,tmp=(C_word)a,a+=2,tmp);
+t33=C_set_block_item(t32,0,(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_15451,a[2]=t32,a[3]=t9,a[4]=t7,a[5]=t25,a[6]=t23,a[7]=t21,a[8]=t19,a[9]=t29,a[10]=t17,a[11]=t11,a[12]=t15,a[13]=t27,a[14]=t13,a[15]=t5,tmp=(C_word)a,a+=16,tmp));
+t34=((C_word*)t32)[1];
+f_15451(t34,t30,t3);}
-/* 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){
+/* loop3246 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_15451(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -10340,14 +10377,14 @@ C_word t9;
C_word t10;
C_word *a;
loop:
-a=C_alloc(17);
+a=C_alloc(15);
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));
+C_save_and_reclaim((void*)trf_15451,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_15459,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],tmp=(C_word)a,a+=15,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=f_15459(t3,t4);
+t6=C_slot(t2,C_fix(1));
t9=t1;
t10=t6;
t1=t9;
@@ -10358,8 +10395,8 @@ 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){
+/* g3253 in loop3246 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static C_word C_fcall f_15459(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10396,92 +10433,81 @@ 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]);
+t2=C_i_car(t1);
+t3=C_eqp(t2,lf[536]);
if(C_truep(t3)){
-t4=C_set_block_item(((C_word*)t0)[16],0,C_SCHEME_TRUE);
+t4=C_set_block_item(((C_word*)t0)[14],0,C_SCHEME_TRUE);
return(t4);}
else{
-t4=(C_word)C_eqp(t2,lf[571]);
+t4=C_eqp(t2,lf[559]);
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);
+t5=C_i_cdr(t1);
+t6=C_mutate(((C_word *)((C_word*)t0)[13])+1,t5);
+t7=C_i_length(((C_word*)((C_word*)t0)[13])[1]);
+t8=C_mutate(((C_word *)((C_word*)t0)[12])+1,t7);
return(t8);}
else{
-t5=(C_word)C_eqp(t2,lf[537]);
+t5=C_eqp(t2,lf[529]);
if(C_truep(t5)){
-t6=C_set_block_item(((C_word*)t0)[13],0,C_SCHEME_TRUE);
+t6=C_set_block_item(((C_word*)t0)[11],0,C_SCHEME_TRUE);
return(t6);}
else{
-t6=(C_word)C_eqp(t2,lf[559]);
+t6=C_eqp(t2,lf[546]);
if(C_truep(t6)){
-t7=(C_word)C_i_cdr(t1);
-t8=C_mutate(((C_word *)((C_word*)t0)[12])+1,t7);
+t7=C_i_cdr(t1);
+t8=C_mutate(((C_word *)((C_word*)t0)[10])+1,t7);
return(t8);}
else{
-t7=(C_word)C_eqp(t2,lf[547]);
+t7=C_eqp(t2,lf[534]);
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);
+t8=C_i_cdr(t1);
+t9=C_mutate(((C_word *)((C_word*)t0)[9])+1,t8);
+t10=C_i_length(((C_word*)((C_word*)t0)[9])[1]);
+t11=C_mutate(((C_word *)((C_word*)t0)[8])+1,t10);
return(t11);}
else{
-t8=(C_word)C_eqp(t2,lf[557]);
+t8=C_eqp(t2,lf[544]);
if(C_truep(t8)){
-t9=C_set_block_item(((C_word*)t0)[9],0,C_SCHEME_TRUE);
+t9=C_set_block_item(((C_word*)t0)[7],0,C_SCHEME_TRUE);
return(t9);}
else{
-t9=(C_word)C_eqp(t2,lf[558]);
+t9=C_eqp(t2,lf[545]);
if(C_truep(t9)){
-t10=C_set_block_item(((C_word*)t0)[8],0,C_SCHEME_TRUE);
+t10=C_set_block_item(((C_word*)t0)[6],0,C_SCHEME_TRUE);
return(t10);}
else{
-t10=(C_word)C_eqp(t2,lf[566]);
+t10=C_eqp(t2,lf[554]);
if(C_truep(t10)){
-t11=C_set_block_item(((C_word*)t0)[7],0,C_SCHEME_TRUE);
+t11=C_set_block_item(((C_word*)t0)[5],0,C_SCHEME_TRUE);
return(t11);}
else{
-t11=(C_word)C_eqp(t2,lf[538]);
+t11=C_eqp(t2,lf[530]);
if(C_truep(t11)){
-t12=C_set_block_item(((C_word*)t0)[6],0,C_SCHEME_TRUE);
+t12=C_set_block_item(((C_word*)t0)[4],0,C_SCHEME_TRUE);
return(t12);}
else{
-t12=(C_word)C_eqp(t2,lf[567]);
+t12=C_eqp(t2,lf[555]);
if(C_truep(t12)){
-t13=(C_word)C_i_cdr(t1);
-t14=C_mutate(((C_word *)((C_word*)t0)[5])+1,t13);
+t13=C_i_cdr(t1);
+t14=C_mutate(((C_word *)((C_word*)t0)[3])+1,t13);
return(t14);}
else{
-t13=(C_word)C_eqp(t2,lf[569]);
+t13=C_eqp(t2,lf[557]);
if(C_truep(t13)){
-t14=(C_word)C_i_cdr(t1);
-t15=C_mutate(((C_word *)((C_word*)t0)[4])+1,t14);
+t14=C_i_cdr(t1);
+t15=C_mutate(((C_word *)((C_word*)t0)[2])+1,t14);
return(t15);}
else{
-t14=(C_word)C_eqp(t2,lf[543]);
+t14=C_eqp(t2,lf[540]);
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);}
+t15=C_SCHEME_UNDEFINED;
+return(t15);}
else{
-t16=C_SCHEME_UNDEFINED;
-return(t16);}}}}}}}}}}}}}}
+return(C_SCHEME_UNDEFINED);}}}}}}}}}}}}}
-/* 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){
+/* k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14529(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10495,37 +10521,37 @@ 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);
+C_word ab[27],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_14529,2,t0,t1);}
+t2=((C_word*)((C_word*)t0)[19])[1];
+t3=(C_truep(t2)?C_SCHEME_FALSE:((C_word*)((C_word*)t0)[18])[1]);
+t4=C_mutate(((C_word *)((C_word*)t0)[18])+1,t3);
+t5=((C_word*)((C_word*)t0)[19])[1];
+t6=(C_truep(t5)?C_SCHEME_FALSE:((C_word*)((C_word*)t0)[17])[1]);
+t7=C_mutate(((C_word *)((C_word*)t0)[17])+1,t6);
+t8=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_14540,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[17],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[18],tmp=(C_word)a,a+=18,tmp);
+t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15402,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[7],a[4]=t8,a[5]=((C_word*)t0)[18],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(*((C_word*)lf[62]+1))){
+t10=((C_word*)((C_word*)t0)[18])[1];
+t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15429,a[2]=t9,tmp=(C_word)a,a+=3,tmp);
if(C_truep(t10)){
t12=t11;
-f_15637(t12,t10);}
+f_15429(t12,t10);}
else{
-if(C_truep(((C_word*)((C_word*)t0)[9])[1])){
+if(C_truep(((C_word*)((C_word*)t0)[12])[1])){
t12=((C_word*)((C_word*)t0)[2])[1];
t13=t11;
-f_15637(t13,t12);}
+f_15429(t13,t12);}
else{
t12=t11;
-f_15637(t12,C_SCHEME_FALSE);}}}
+f_15429(t12,C_SCHEME_FALSE);}}}
else{
t10=t9;
-f_15610(t10,C_SCHEME_FALSE);}}
+f_15402(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){
+/* k15427 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_15429(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10533,15 +10559,15 @@ C_word t4;
C_word *a;
if(C_truep(t1)){
t2=t1;
-t3=(C_word)C_slot(t2,C_fix(1));
+t3=C_slot(t2,C_fix(1));
t4=((C_word*)t0)[2];
-f_15610(t4,(C_word)C_eqp(lf[173],t3));}
+f_15402(t4,C_eqp(lf[172],t3));}
else{
t2=((C_word*)t0)[2];
-f_15610(t2,C_SCHEME_FALSE);}}
+f_15402(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){
+/* k15400 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_15402(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10554,94 +10580,94 @@ 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]);}
+t3=C_slot(t2,C_fix(2));
+t4=C_i_car(t3);
+C_trace("compiler.scm: 1934 set-real-name!");
+((C_proc4)C_retrieve_symbol_proc(lf[97]))(4,*((C_word*)lf[97]+1),((C_word*)t0)[4],t4,((C_word*)t0)[3]);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
-t4=(C_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]);}}
+t4=C_slot(t3,C_fix(2));
+t5=C_i_car(t4);
+C_trace("compiler.scm: 1934 set-real-name!");
+((C_proc4)C_retrieve_symbol_proc(lf[97]))(4,*((C_word*)lf[97]+1),((C_word*)t0)[4],t5,((C_word*)t0)[3]);}}
else{
t2=((C_word*)t0)[4];
-f_14726(2,t2,C_SCHEME_UNDEFINED);}}
+f_14540(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){
+/* k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14540(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
-C_word ab[27],*a=ab;
+C_word ab[25],*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_save_and_reclaim((void*)tr2,(void*)f_14540,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_14543,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],a[16]=((C_word*)t0)[17],tmp=(C_word)a,a+=17,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15344,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[7],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+if(C_truep(*((C_word*)lf[62]+1))){
+if(C_truep(((C_word*)((C_word*)t0)[12])[1])){
+if(C_truep(C_i_nullp(((C_word*)((C_word*)t0)[10])[1]))){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15399,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=((C_word*)t0)[7];
C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),t4,t5,lf[428]);}
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t4,t5,lf[420]);}
else{
t4=t3;
-f_15552(t4,C_SCHEME_FALSE);}}
+f_15344(t4,C_SCHEME_FALSE);}}
else{
t4=t3;
-f_15552(t4,C_SCHEME_FALSE);}}
+f_15344(t4,C_SCHEME_FALSE);}}
else{
t4=t3;
-f_15552(t4,C_SCHEME_FALSE);}}
+f_15344(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){
+/* k15397 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15399(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_15552(t2,(C_word)C_i_not(t1));}
+f_15344(t2,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){
+/* k15342 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_15344(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15552,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_15344,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15555,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15347,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
if(C_truep(((C_word*)((C_word*)t0)[2])[1])){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1943 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t2,lf[116],lf[577],((C_word*)t0)[3]);}
else{
t3=t2;
-f_15555(2,t3,C_SCHEME_UNDEFINED);}}
+f_15347(2,t3,C_SCHEME_UNDEFINED);}}
else{
t2=((C_word*)t0)[4];
-f_14729(2,t2,C_SCHEME_UNDEFINED);}}
+f_14543(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){
+/* k15345 in k15342 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15347(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_15347,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15353,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15375,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1944 variable-visible?");
+((C_proc3)C_retrieve_symbol_proc(lf[558]))(3,*((C_word*)lf[558]+1),t3,((C_word*)t0)[2]);}
-/* 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){
+/* k15373 in k15345 in k15342 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15375(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10650,14 +10676,14 @@ C_word *a;
if(C_truep(t1)){
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[4];
-f_14729(2,t3,t2);}
+f_14543(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]);}}
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),((C_word*)t0)[2],t2,lf[310]);}}
-/* 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){
+/* k15351 in k15345 in k15342 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15353(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10665,35 +10691,35 @@ C_word *a;
if(C_truep(t1)){
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[3];
-f_14729(2,t3,t2);}
+f_14543(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]);}}
+C_trace("compiler.scm: 1946 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[116],lf[576],((C_word*)t0)[2]);}}
-/* 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){
+/* k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14543(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[18],*a=ab;
+C_word ab[16],*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])){
+C_save_and_reclaim((void*)tr2,(void*)f_14543,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_14546,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[16],tmp=(C_word)a,a+=16,tmp);
+if(C_truep(((C_word*)((C_word*)t0)[10])[1])){
t3=((C_word*)((C_word*)t0)[2])[1];
if(C_truep(t3)){
-C_trace("compiler.scm: 1953 quick-put!");
-f_14652(t2,((C_word*)t0)[9],lf[588],C_SCHEME_TRUE);}
+C_trace("compiler.scm: 1950 quick-put!");
+f_14470(t2,((C_word*)t0)[12],lf[575],C_SCHEME_TRUE);}
else{
t4=t2;
-f_14732(2,t4,C_SCHEME_UNDEFINED);}}
+f_14546(2,t4,C_SCHEME_UNDEFINED);}}
else{
t3=t2;
-f_14732(2,t3,C_SCHEME_UNDEFINED);}}
+f_14546(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){
+/* k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14546(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10718,73 +10744,73 @@ 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);
+C_word ab[34],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_14546,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_14549,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],tmp=(C_word)a,a+=15,tmp);
+if(C_truep(((C_word*)((C_word*)t0)[15])[1])){
+t3=((C_word*)((C_word*)t0)[15])[1];
+t4=C_slot(t3,C_fix(2));
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15115,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[11],a[5]=t2,a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
+t6=((C_word*)((C_word*)t0)[15])[1];
+t7=C_slot(t6,C_fix(1));
+t8=C_eqp(lf[172],t7);
if(C_truep(t8)){
-t9=(C_word)C_i_cadr(t4);
-t10=(C_word)C_i_not(t9);
+t9=C_i_cadr(t4);
+t10=C_i_not(t9);
if(C_truep(t10)){
t11=t5;
-f_15323(2,t11,t10);}
+f_15115(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);
+t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15147,a[2]=((C_word*)t0)[13],tmp=(C_word)a,a+=3,tmp);
+t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15155,a[2]=t11,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15157,a[2]=((C_word*)t0)[15],tmp=(C_word)a,a+=3,tmp);
+t14=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_15163,tmp=(C_word)a,a+=2,tmp);
C_trace("##sys#call-with-values");
C_call_with_values(4,0,t12,t13,t14);}}
else{
t9=t5;
-f_15323(2,t9,C_SCHEME_FALSE);}}
+f_15115(2,t9,C_SCHEME_FALSE);}}
else{
if(C_truep(((C_word*)((C_word*)t0)[2])[1])){
t3=((C_word*)((C_word*)t0)[2])[1];
-t4=(C_word)C_slot(t3,C_fix(2));
+t4=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);
+t6=C_slot(t5,C_fix(1));
+t7=C_eqp(lf[172],t6);
if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15202,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15208,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[13],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=t4,tmp=(C_word)a,a+=7,tmp);
C_trace("##sys#call-with-values");
C_call_with_values(4,0,t2,t8,t9);}
else{
t8=t2;
-f_14735(2,t8,C_SCHEME_UNDEFINED);}}
+f_14549(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];
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15266,a[2]=t2,a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
+t4=((C_word*)t0)[5];
C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),t3,t4,lf[443]);}}}
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t3,t4,lf[435]);}}}
-/* 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){
+/* k15264 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15266(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15474,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_15266,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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");
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15270,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+C_trace("g33883389");
t3=t2;
-f_15478(t3,((C_word*)t0)[2],t1);}
+f_15270(t3,((C_word*)t0)[2],t1);}
else{
t2=((C_word*)t0)[2];
-f_14735(2,t2,C_SCHEME_UNDEFINED);}}
+f_14549(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){
+/* g3388 in k15264 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_15270(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -10795,34 +10821,34 @@ 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);}
+C_save_and_reclaim((void*)trf_15270,NULL,3,t0,t1,t2);}
t3=t2;
-if(C_truep((C_word)C_i_structurep(t3,lf[512]))){
+if(C_truep(C_i_structurep(t3,lf[504]))){
if(C_truep(((C_word*)((C_word*)t0)[5])[1])){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15288,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1982 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[572]))(5,*((C_word*)lf[572]+1),t4,lf[573],lf[574],((C_word*)t0)[4]);}
else{
t4=t2;
-t5=(C_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);}}
+t5=C_slot(t4,C_fix(2));
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15329,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1988 quick-put!");
+f_14470(t6,((C_word*)t0)[2],lf[569],C_SCHEME_TRUE);}}
else{
t4=C_SCHEME_UNDEFINED;
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-/* 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){
+/* k15327 in g3388 in k15264 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15329(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1992 quick-put!");
-f_14652(((C_word*)t0)[4],((C_word*)t0)[3],lf[569],((C_word*)t0)[2]);}
+C_trace("compiler.scm: 1989 quick-put!");
+f_14470(((C_word*)t0)[4],((C_word*)t0)[3],lf[557],((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){
+/* k15286 in g3388 in k15264 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15288(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10833,35 +10859,35 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_15288,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))){
+t4=C_a_i_list(&a,1,lf[429]);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15293,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t4))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[443],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[435],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);
+t6=C_i_cdr(t4);
+if(C_truep(C_i_nullp(t6))){
+t7=C_i_car(t4);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[443],t7);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[435],t7);}
else{
C_trace("##sys#error");
-t7=*((C_word*)lf[135]+1);
+t7=*((C_word*)lf[134]+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){
+/* k15291 in k15286 in g3388 in k15264 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15293(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[443],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[435],t1);}
-/* 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){
+/* a15207 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15208(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -10869,30 +10895,30 @@ 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]);}
+C_save_and_reclaim((void*)tr4,(void*)f_15208,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15212,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15246,a[2]=((C_word*)t0)[4],a[3]=t4,a[4]=((C_word*)t0)[5],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1970 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t5,((C_word*)t0)[3],((C_word*)t0)[2],lf[530]);}
-/* 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){
+/* k15244 in a15207 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15246(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
-if(C_truep((C_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);}
+if(C_truep(C_i_pairp(((C_word*)t0)[5]))){
+C_trace("compiler.scm: 1972 quick-put!");
+f_14470(((C_word*)t0)[3],((C_word*)t0)[2],lf[571],C_SCHEME_TRUE);}
else{
t2=((C_word*)t0)[3];
-f_15420(2,t2,C_SCHEME_UNDEFINED);}}
+f_15212(2,t2,C_SCHEME_UNDEFINED);}}
else{
t2=((C_word*)t0)[3];
-f_15420(2,t2,C_SCHEME_UNDEFINED);}}
+f_15212(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){
+/* k15210 in a15207 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15212(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10902,111 +10928,111 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_15212,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[7]);
+t3=C_i_not(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15221,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
if(C_truep(t3)){
if(C_truep(t3)){
-C_trace("compiler.scm: 1980 quick-put!");
-f_14652(((C_word*)t0)[5],((C_word*)t0)[4],lf[582],C_SCHEME_TRUE);}
+C_trace("compiler.scm: 1977 quick-put!");
+f_14470(((C_word*)t0)[5],((C_word*)t0)[4],lf[569],C_SCHEME_TRUE);}
else{
t5=C_SCHEME_UNDEFINED;
t6=((C_word*)t0)[5];
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
else{
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}}
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15229,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1974 every");
+((C_proc4)C_retrieve_symbol_proc(lf[411]))(4,*((C_word*)lf[411]+1),t4,t5,((C_word*)t0)[2]);}}
-/* 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){
+/* a15228 in k15210 in a15207 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15229(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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]);}
+C_save_and_reclaim((void*)tr3,(void*)f_15229,3,t0,t1,t2);}
+C_trace("compiler.scm: 1975 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t1,((C_word*)t0)[2],t2,lf[530]);}
-/* 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){
+/* k15219 in k15210 in a15207 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15221(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(C_truep(t1)){
-C_trace("compiler.scm: 1980 quick-put!");
-f_14652(((C_word*)t0)[3],((C_word*)t0)[2],lf[582],C_SCHEME_TRUE);}
+C_trace("compiler.scm: 1977 quick-put!");
+f_14470(((C_word*)t0)[3],((C_word*)t0)[2],lf[569],C_SCHEME_TRUE);}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-/* 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){
+/* a15201 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15202(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_15202,2,t0,t1);}
+C_trace("compiler.scm: 1969 scan-free-variables");
+((C_proc3)C_retrieve_symbol_proc(lf[570]))(3,*((C_word*)lf[570]+1),t1,((C_word*)((C_word*)t0)[2])[1]);}
-/* 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,...){
+/* a15162 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15163(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
C_word *a,c2=c;
C_save_rest(t1,c2,2);
if(!C_demand(c*C_SIZEOF_PAIR+0)){
-C_save_and_reclaim((void*)tr2rv,(void*)f_15371r,2,t0,t1);}
+C_save_and_reclaim((void*)tr2r,(void*)f_15163r,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);}}
+t2=C_restore_rest(a,C_rest_count(0));
+f_15163r(t0,t1,t2);}}
-static void C_ccall f_15371r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_15163r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_vector_ref(t2,C_fix(0)));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_list_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){
+/* a15156 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15157(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_15157,2,t0,t1);}
+C_trace("compiler.scm: 1961 scan-free-variables");
+((C_proc3)C_retrieve_symbol_proc(lf[570]))(3,*((C_word*)lf[570]+1),t1,((C_word*)((C_word*)t0)[2])[1]);}
-/* 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){
+/* k15153 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15155(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 1959 every");
+((C_proc4)C_retrieve_symbol_proc(lf[411]))(4,*((C_word*)lf[411]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* a15146 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15147(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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]);}
+C_save_and_reclaim((void*)tr3,(void*)f_15147,3,t0,t1,t2);}
+C_trace("compiler.scm: 1960 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t1,((C_word*)t0)[2],t2,lf[530]);}
-/* 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){
+/* k15113 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15115(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11016,59 +11042,59 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_15115,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15121,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
t3=((C_word*)((C_word*)t0)[3])[1];
-t4=(C_word)C_eqp(C_fix(1),t3);
+t4=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));}
+f_15121(t6,C_eqp(C_fix(1),t5));}
else{
t5=t2;
-f_15329(t5,C_SCHEME_FALSE);}}
+f_15121(t5,C_SCHEME_FALSE);}}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[5];
-f_14735(2,t3,t2);}}
+f_14549(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){
+/* k15119 in k15113 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_15121(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
-C_trace("compiler.scm: 1966 quick-put!");
-f_14652(((C_word*)t0)[3],((C_word*)t0)[2],lf[581],C_SCHEME_TRUE);}
+C_trace("compiler.scm: 1963 quick-put!");
+f_14470(((C_word*)t0)[3],((C_word*)t0)[2],lf[568],C_SCHEME_TRUE);}
else{
-C_trace("compiler.scm: 1967 quick-put!");
-f_14652(((C_word*)t0)[3],((C_word*)t0)[2],lf[582],C_SCHEME_TRUE);}}
+C_trace("compiler.scm: 1964 quick-put!");
+f_14470(((C_word*)t0)[3],((C_word*)t0)[2],lf[569],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){
+/* k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14549(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
-C_word ab[24],*a=ab;
+C_word ab[22],*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));
+C_save_and_reclaim((void*)tr2,(void*)f_14549,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_14552,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],tmp=(C_word)a,a+=15,tmp);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15062,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[10],a[4]=t2,a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[14],tmp=(C_word)a,a+=7,tmp);
+if(C_truep(((C_word*)((C_word*)t0)[14])[1])){
+t4=((C_word*)((C_word*)t0)[14])[1];
+t5=C_slot(t4,C_fix(1));
t6=t3;
-f_15270(t6,(C_word)C_eqp(lf[99],t5));}
+f_15062(t6,C_eqp(lf[98],t5));}
else{
t4=t3;
-f_15270(t4,C_SCHEME_FALSE);}}
+f_15062(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){
+/* k15060 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_15062(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11077,20 +11103,20 @@ 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);}
+C_save_and_reclaim((void*)trf_15062,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)((C_word*)t0)[6])[1];
-t3=(C_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);}
+t3=C_slot(t2,C_fix(2));
+t4=C_i_car(t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15071,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1997 collapsable-literal?");
+((C_proc3)C_retrieve_symbol_proc(lf[312]))(3,*((C_word*)lf[312]+1),t5,t4);}
else{
t2=((C_word*)t0)[4];
-f_14738(2,t2,C_SCHEME_UNDEFINED);}}
+f_14552(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){
+/* k15069 in k15060 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15071(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11102,25 +11128,25 @@ 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);}
+C_trace("compiler.scm: 1999 quick-put!");
+f_14470(((C_word*)t0)[4],((C_word*)t0)[3],lf[567],C_SCHEME_TRUE);}
else{
t3=C_SCHEME_UNDEFINED;
t4=((C_word*)t0)[4];
-f_14738(2,t4,t3);}}
+f_14552(2,t4,t3);}}
else{
t2=((C_word*)((C_word*)t0)[2])[1];
-t3=(C_word)C_eqp(C_fix(1),t2);
+t3=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);}
+C_trace("compiler.scm: 1999 quick-put!");
+f_14470(((C_word*)t0)[4],((C_word*)t0)[3],lf[567],C_SCHEME_TRUE);}
else{
t4=C_SCHEME_UNDEFINED;
t5=((C_word*)t0)[4];
-f_14738(2,t5,t4);}}}
+f_14552(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){
+/* k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14552(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11132,31 +11158,31 @@ C_word t8;
C_word t9;
C_word t10;
C_word t11;
-C_word ab[25],*a=ab;
+C_word ab[21],*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])){
+C_save_and_reclaim((void*)tr2,(void*)f_14552,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_14555,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[12],a[9]=((C_word*)t0)[13],a[10]=((C_word*)t0)[14],tmp=(C_word)a,a+=11,tmp);
+if(C_truep(((C_word*)((C_word*)t0)[14])[1])){
t3=C_SCHEME_FALSE;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14931,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=t4,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[14],tmp=(C_word)a,a+=8,tmp);
+t6=((C_word*)((C_word*)t0)[14])[1];
+t7=C_slot(t6,C_fix(1));
+t8=C_eqp(lf[172],t7);
if(C_truep(t8)){
-t9=((C_word*)((C_word*)t0)[11])[1];
+t9=((C_word*)((C_word*)t0)[3])[1];
t10=((C_word*)((C_word*)t0)[2])[1];
t11=t5;
-f_15139(t11,(C_word)C_eqp(t9,t10));}
+f_14931(t11,C_eqp(t9,t10));}
else{
t9=t5;
-f_15139(t9,C_SCHEME_FALSE);}}
+f_14931(t9,C_SCHEME_FALSE);}}
else{
t3=t2;
-f_14741(2,t3,C_SCHEME_UNDEFINED);}}
+f_14555(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){
+/* k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14931(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11166,25 +11192,25 @@ 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);}
+C_save_and_reclaim((void*)trf_14931,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)((C_word*)t0)[7])[1];
-t3=(C_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);}
+t3=C_slot(t2,C_fix(2));
+if(C_truep(C_i_cadr(t3))){
+t4=C_i_caddr(t3);
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14954,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 2013 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[2],t4,t5);}
else{
t4=((C_word*)t0)[2];
-f_14741(2,t4,C_SCHEME_UNDEFINED);}}
+f_14555(2,t4,C_SCHEME_UNDEFINED);}}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[2];
-f_14741(2,t3,t2);}}
+f_14555(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){
+/* a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14954(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -11194,20 +11220,20 @@ 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);
+C_save_and_reclaim((void*)tr5,(void*)f_14954,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14958,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=((C_word*)t0)[5],a[7]=t1,a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
if(C_truep(t4)){
t6=t5;
-f_15166(2,t6,C_SCHEME_UNDEFINED);}
+f_14958(2,t6,C_SCHEME_UNDEFINED);}
else{
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15205,a[2]=t7,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14997,a[2]=t7,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
-f_15205(t9,t5,t2);}}
+f_14997(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){
+/* loop3465 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14997(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -11216,85 +11242,85 @@ 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");
+C_save_and_reclaim((void*)trf_14997,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15005,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15033,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g34723473");
t6=t3;
-f_15213(t6,t4,t5);}
+f_15005(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){
+/* k15031 in loop3465 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15033(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_14997(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){
+/* g3472 in loop3465 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_15005(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_15005,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15012,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15030,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2019 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t4,((C_word*)t0)[2],t2,lf[559]);}
-/* 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){
+/* k15028 in g3472 in loop3465 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15030(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15238,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_15030,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[4];
-f_15220(t2,C_SCHEME_FALSE);}
+f_15012(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]);}}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15026,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2020 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[544]);}}
-/* 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){
+/* k15024 in k15028 in g3472 in loop3465 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15026(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_15220(t2,(C_word)C_i_not(t1));}
+f_15012(t2,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){
+/* k15010 in g3472 in loop3465 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_15012(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15220,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_15012,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15015,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2021 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[419],C_SCHEME_TRUE);}
else{
t2=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-/* 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){
+/* k15013 in k15010 in g3472 in loop3465 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_15015(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11303,26 +11329,26 @@ 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){
+/* k14956 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14958(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_14958,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14964,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
if(C_truep(((C_word*)((C_word*)t0)[3])[1])){
-t3=(C_word)C_i_memq(((C_word*)t0)[2],*((C_word*)lf[79]+1));
+t3=C_i_memq(((C_word*)t0)[2],*((C_word*)lf[78]+1));
t4=t2;
-f_15172(t4,(C_word)C_i_not(t3));}
+f_14964(t4,C_i_not(t3));}
else{
t3=t2;
-f_15172(t3,C_SCHEME_FALSE);}}
+f_14964(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){
+/* k14962 in k14956 in a14953 in k14929 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14964(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11331,24 +11357,24 @@ 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);}
+C_save_and_reclaim((void*)trf_14964,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);}
+t2=C_i_car(((C_word*)t0)[6]);
+C_trace("compiler.scm: 2027 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[5],((C_word*)t0)[4],t2,lf[565],C_SCHEME_TRUE);}
else{
if(C_truep(((C_word*)t0)[3])){
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);
+t2=C_a_i_cons(&a,2,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
-t4=(C_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);}
+t4=C_i_car(((C_word*)t0)[6]);
+C_trace("compiler.scm: 2030 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[5],((C_word*)t0)[4],t4,lf[566],C_SCHEME_TRUE);}
else{
t2=((C_word*)t0)[5];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}}}
-/* 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){
+/* k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14555(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11363,74 +11389,74 @@ C_word t11;
C_word t12;
C_word t13;
C_word t14;
-C_word ab[27],*a=ab;
+C_word ab[23],*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];
+C_save_and_reclaim((void*)tr2,(void*)f_14555,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14558,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
+t3=((C_word*)((C_word*)t0)[4])[1];
if(C_truep(t3)){
t4=t2;
-f_14744(2,t4,C_SCHEME_UNDEFINED);}
+f_14558(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(C_i_nullp(((C_word*)((C_word*)t0)[3])[1]))){
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14873,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],a[4]=t2,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(((C_word*)((C_word*)t0)[10])[1])){
+t5=((C_word*)((C_word*)t0)[10])[1];
+t6=C_slot(t5,C_fix(1));
+t7=C_eqp(lf[509],t6);
+t8=C_i_not(t7);
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14885,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[10],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
if(C_truep(t8)){
t10=t9;
-f_15093(t10,t8);}
+f_14885(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]);}}
+t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14899,a[2]=t9,tmp=(C_word)a,a+=3,tmp);
+t11=((C_word*)((C_word*)t0)[10])[1];
+t12=C_slot(t11,C_fix(2));
+t13=C_i_car(t12);
+C_trace("compiler.scm: 2038 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t10,((C_word*)t0)[8],t13,lf[530]);}}
else{
t5=t4;
-f_15081(t5,C_SCHEME_FALSE);}}
+f_14873(t5,C_SCHEME_FALSE);}}
else{
t4=t2;
-f_14744(2,t4,C_SCHEME_UNDEFINED);}}}
+f_14558(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){
+/* k14897 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14899(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_15093(t2,(C_word)C_i_not(t1));}
+f_14885(t2,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){
+/* k14883 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14885(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_15093,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_14885,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14892,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2039 expression-has-side-effects?");
+((C_proc4)C_retrieve_symbol_proc(lf[564]))(4,*((C_word*)lf[564]+1),t2,((C_word*)((C_word*)t0)[3])[1],((C_word*)t0)[2]);}
else{
t2=((C_word*)t0)[4];
-f_15081(t2,C_SCHEME_FALSE);}}
+f_14873(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){
+/* k14890 in k14883 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14892(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_15081(t2,(C_word)C_i_not(t1));}
+f_14873(t2,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){
+/* k14871 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14873(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11439,22 +11465,22 @@ 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);}
+C_trace("compiler.scm: 2041 quick-put!");
+f_14470(((C_word*)t0)[4],((C_word*)t0)[3],lf[563],C_SCHEME_TRUE);}
else{
t3=((C_word*)t0)[4];
-f_14744(2,t3,C_SCHEME_UNDEFINED);}}
+f_14558(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);}
+C_trace("compiler.scm: 2041 quick-put!");
+f_14470(((C_word*)t0)[4],((C_word*)t0)[3],lf[563],C_SCHEME_TRUE);}
else{
t3=((C_word*)t0)[4];
-f_14744(2,t3,C_SCHEME_UNDEFINED);}}}
+f_14558(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){
+/* k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14558(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11467,76 +11493,76 @@ C_word t9;
C_word t10;
C_word t11;
C_word t12;
-C_word ab[20],*a=ab;
+C_word ab[15],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_14558,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14561,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
+t3=(C_truep(((C_word*)((C_word*)t0)[8])[1])?C_i_not(((C_word*)((C_word*)t0)[3])[1]):C_SCHEME_FALSE);
if(C_truep(t3)){
-t4=((C_word*)((C_word*)t0)[5])[1];
-t5=(C_word)C_slot(t4,C_fix(1));
-t6=(C_word)C_eqp(lf[517],t5);
+t4=((C_word*)((C_word*)t0)[8])[1];
+t5=C_slot(t4,C_fix(1));
+t6=C_eqp(lf[509],t5);
if(C_truep(t6)){
-t7=((C_word*)((C_word*)t0)[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]);}
+t7=((C_word*)((C_word*)t0)[8])[1];
+t8=C_slot(t7,C_fix(2));
+t9=C_i_car(t8);
+t10=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14753,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t9,a[6]=((C_word*)t0)[6],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 2053 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t10,((C_word*)t0)[6],t9,lf[559]);}
else{
t7=C_SCHEME_UNDEFINED;
t8=t2;
-f_14747(2,t8,t7);}}
+f_14561(2,t8,t7);}}
else{
t4=t2;
-f_14747(2,t4,C_SCHEME_UNDEFINED);}}
+f_14561(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){
+/* k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14753(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_14753,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14759,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14834,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2054 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t3,((C_word*)t0)[6],((C_word*)t0)[5],lf[536]);}
-/* 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){
+/* k14832 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14834(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
t2=((C_word*)t0)[4];
-f_14967(2,t2,C_SCHEME_FALSE);}
+f_14759(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]);}}
+C_trace("compiler.scm: 2054 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[555]);}}
-/* 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){
+/* k14757 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14759(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_14759,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14762,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
if(C_truep(t1)){
t3=t2;
-f_14970(t3,t1);}
+f_14762(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]);}}
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14824,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 2055 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t3,((C_word*)t0)[7],((C_word*)t0)[6],lf[529]);}}
-/* 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){
+/* k14822 in k14757 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14824(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11545,120 +11571,118 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_14824,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[6];
-f_14970(t2,C_SCHEME_FALSE);}
+f_14762(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);
+t2=C_i_length(((C_word*)t0)[5]);
+t3=C_eqp(C_fix(1),t2);
if(C_truep(t3)){
t4=((C_word*)((C_word*)t0)[4])[1];
if(C_truep(t4)){
t5=((C_word*)t0)[6];
-f_14970(t5,C_SCHEME_FALSE);}
+f_14762(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]);}}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14816,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2059 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t5,((C_word*)t0)[3],((C_word*)t0)[2],lf[544]);}}
else{
t4=((C_word*)t0)[6];
-f_14970(t4,C_SCHEME_FALSE);}}
+f_14762(t4,C_SCHEME_FALSE);}}
else{
t2=((C_word*)t0)[6];
-f_14970(t2,C_SCHEME_FALSE);}}}
+f_14762(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){
+/* k14814 in k14822 in k14757 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14816(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15024,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_14816,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[4];
-f_14970(t2,C_SCHEME_FALSE);}
+f_14762(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]);}}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14812,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2060 variable-visible?");
+((C_proc3)C_retrieve_symbol_proc(lf[558]))(3,*((C_word*)lf[558]+1),t2,((C_word*)t0)[2]);}}
-/* 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){
+/* k14810 in k14814 in k14822 in k14757 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14812(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_15020,2,t0,t1);}
-t2=(C_word)C_i_not(t1);
+C_save_and_reclaim((void*)tr2,(void*)f_14812,2,t0,t1);}
+t2=C_i_not(t1);
if(C_truep(t2)){
t3=((C_word*)t0)[4];
-f_14970(t3,t2);}
+f_14762(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]);}}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14808,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2061 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t3,((C_word*)t0)[3],((C_word*)t0)[2],lf[530]);}}
-/* 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){
+/* k14806 in k14810 in k14814 in k14822 in k14757 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14808(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_14970(t2,(C_word)C_i_not(t1));}
+f_14762(t2,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){
+/* k14760 in k14757 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14762(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14970,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_14762,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14765,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2062 quick-put!");
+f_14470(t2,((C_word*)t0)[2],lf[562],((C_word*)t0)[4]);}
else{
t2=((C_word*)t0)[6];
-f_14747(2,t2,C_SCHEME_UNDEFINED);}}
+f_14561(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){
+/* k14763 in k14760 in k14757 in k14751 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14765(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 2063 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[561],C_SCHEME_TRUE);}
-/* 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){
+/* k14559 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14561(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word t6;
-C_word ab[16],*a=ab;
+C_word ab[7],*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));}
+C_save_and_reclaim((void*)tr2,(void*)f_14561,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14567,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
+t3=((C_word*)((C_word*)t0)[6])[1];
+t4=C_slot(t3,C_fix(1));
+t5=t2;
+f_14567(t5,C_eqp(lf[172],t4));}
else{
-t4=t3;
-f_14775(t4,C_SCHEME_FALSE);}}
+t3=t2;
+f_14567(t3,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){
+/* k14565 in k14559 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14567(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11673,38 +11697,38 @@ 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);}
+C_save_and_reclaim((void*)trf_14567,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)((C_word*)t0)[6])[1];
-t3=(C_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);}
+t3=C_slot(t2,C_fix(2));
+if(C_truep(C_i_cadr(t3))){
+t4=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_UNDEFINED);}
else{
-t4=(C_word)C_i_caddr(t3);
+t4=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));
+t6=C_slot(t5,C_fix(3));
+t7=C_i_car(t6);
+t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14593,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t7,tmp=(C_word)a,a+=8,tmp);
+if(C_truep(C_i_pairp(t4))){
+t9=C_i_cdr(t4);
+if(C_truep(C_i_nullp(t9))){
+t10=C_slot(t7,C_fix(1));
t11=t8;
-f_14801(t11,(C_word)C_eqp(lf[513],t10));}
+f_14593(t11,C_eqp(lf[505],t10));}
else{
t10=t8;
-f_14801(t10,C_SCHEME_FALSE);}}
+f_14593(t10,C_SCHEME_FALSE);}}
else{
t9=t8;
-f_14801(t9,C_SCHEME_FALSE);}}}
+f_14593(t9,C_SCHEME_FALSE);}}}
else{
-t2=((C_word*)t0)[5];
-f_14750(2,t2,C_SCHEME_UNDEFINED);}}
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-/* 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){
+/* k14591 in k14565 in k14559 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14593(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11723,70 +11747,42 @@ 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);}
+C_save_and_reclaim((void*)trf_14593,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);
+t2=C_slot(((C_word*)t0)[7],C_fix(3));
+t3=C_i_length(t2);
+t4=C_eqp(C_fix(2),t3);
if(C_truep(t4)){
-t5=(C_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);
+t5=C_i_car(t2);
+t6=C_i_cadr(t2);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14619,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t5,tmp=(C_word)a,a+=7,tmp);
+t8=C_slot(t5,C_fix(1));
+t9=C_eqp(lf[509],t8);
if(C_truep(t9)){
-t10=(C_word)C_slot(t6,C_fix(1));
-t11=(C_word)C_eqp(lf[517],t10);
+t10=C_slot(t6,C_fix(1));
+t11=C_eqp(lf[509],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);
+t12=C_i_car(((C_word*)t0)[2]);
+t13=C_slot(t6,C_fix(2));
+t14=C_i_car(t13);
t15=t7;
-f_14827(t15,(C_word)C_eqp(t12,t14));}
+f_14619(t15,C_eqp(t12,t14));}
else{
t12=t7;
-f_14827(t12,C_SCHEME_FALSE);}}
+f_14619(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);}}
+f_14619(t10,C_SCHEME_FALSE);}}
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);}
+t5=((C_word*)t0)[6];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_UNDEFINED);}}
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);}
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[6];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-/* 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){
+/* k14617 in k14591 in k14565 in k14559 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14619(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11795,158 +11791,120 @@ 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);}
+C_save_and_reclaim((void*)trf_14619,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]);}
+t2=C_slot(((C_word*)t0)[6],C_fix(2));
+t3=C_i_car(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14625,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2083 quick-put!");
+f_14470(t4,((C_word*)t0)[2],lf[562],t3);}
else{
t2=C_SCHEME_UNDEFINED;
-t3=((C_word*)t0)[4];
+t3=((C_word*)t0)[5];
((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){
+/* k14623 in k14617 in k14591 in k14565 in k14559 in k14556 in k14553 in k14550 in k14547 in k14544 in k14541 in k14538 in k14527 in a14524 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14625(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
-C_word 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]);}
+C_trace("compiler.scm: 2084 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[561],C_SCHEME_TRUE);}
-/* 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){
+/* k14517 in k14514 in k14511 in k14507 in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14519(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word 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]);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((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]);}}
+t2=C_mutate((C_word*)lf[51]+1 /* (set! original-program-size ...) */,*((C_word*)lf[52]+1));
+t3=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}}
-/* contains? in 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){
+/* contains? in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14484(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14666,NULL,4,t0,t1,t2,t3);}
-t4=(C_word)C_i_memq(t2,t3);
+C_save_and_reclaim((void*)trf_14484,NULL,4,t0,t1,t2,t3);}
+t4=C_i_memq(t2,t3);
if(C_truep(t4)){
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14494,a[2]=t1,a[3]=t3,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1876 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t5,((C_word*)t0)[2],t2,lf[543]);}}
-/* 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){
+/* k14492 in contains? in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14494(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14676,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_14494,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14502,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1878 any");
+((C_proc4)C_retrieve_symbol_proc(lf[560]))(4,*((C_word*)lf[560]+1),((C_word*)t0)[2],t2,t1);}
else{
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-/* 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){
+/* a14501 in k14492 in contains? in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14502(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_14684,3,t0,t1,t2);}
-C_trace("compiler.scm: 1879 contains?");
+C_save_and_reclaim((void*)tr3,(void*)f_14502,3,t0,t1,t2);}
+C_trace("compiler.scm: 1878 contains?");
t3=((C_word*)((C_word*)t0)[3])[1];
-f_14666(t3,t1,t2,((C_word*)t0)[2]);}
+f_14484(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){
+/* quick-put! in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14470(C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_14470,NULL,4,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14478,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t6=C_i_cdr(t2);
+C_trace("compiler.scm: 1871 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t5,t3,t4,t6);}
-/* 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){
+/* k14476 in quick-put! in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14478(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_i_set_cdr(((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* ref in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14464(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_14464,NULL,4,t0,t1,t2,t3);}
+C_trace("compiler.scm: 1868 collect!");
+((C_proc6)C_retrieve_symbol_proc(lf[533]))(6,*((C_word*)lf[533]+1),t1,((C_word*)t0)[2],t2,lf[559],t3);}
-/* assign in 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){
+/* assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14286(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -11961,30 +11919,30 @@ 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);}
+C_save_and_reclaim((void*)trf_14286,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);
+t7=C_slot(t6,C_fix(1));
+t8=C_eqp(lf[138],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);}
+C_trace("compiler.scm: 1842 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t1,((C_word*)t0)[2],t2,lf[554],C_SCHEME_TRUE);}
else{
-t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);
+t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14299,a[2]=t3,a[3]=t5,a[4]=((C_word*)t0)[2],a[5]=t4,a[6]=t2,a[7]=t1,tmp=(C_word)a,a+=8,tmp);
t10=t3;
-t11=(C_word)C_slot(t10,C_fix(1));
-t12=(C_word)C_eqp(lf[517],t11);
+t11=C_slot(t10,C_fix(1));
+t12=C_eqp(lf[509],t11);
if(C_truep(t12)){
t13=t3;
-t14=(C_word)C_slot(t13,C_fix(2));
-t15=(C_word)C_i_car(t14);
+t14=C_slot(t13,C_fix(2));
+t15=C_i_car(t14);
t16=t9;
-f_14481(t16,(C_word)C_eqp(t2,t15));}
+f_14299(t16,C_eqp(t2,t15));}
else{
t13=t9;
-f_14481(t13,C_SCHEME_FALSE);}}}
+f_14299(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){
+/* k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14299(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11993,50 +11951,50 @@ 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);}
+C_save_and_reclaim((void*)trf_14299,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[7];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
else{
-t2=(C_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);
+t2=C_i_memq(((C_word*)t0)[6],((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14311,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
if(C_truep(t2)){
t4=t3;
-f_14493(t4,t2);}
+f_14311(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);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14415,a[2]=((C_word*)t0)[6],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
t5=((C_word*)t0)[6];
C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),t4,t5,lf[312]);}}}
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t4,t5,lf[310]);}}}
-/* 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){
+/* k14413 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14415(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14597,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_14415,2,t0,t1);}
if(C_truep(t1)){
t2=t1;
t3=((C_word*)t0)[3];
-f_14493(t3,t2);}
+f_14311(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]);}}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14425,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1847 variable-visible?");
+((C_proc3)C_retrieve_symbol_proc(lf[558]))(3,*((C_word*)lf[558]+1),t2,((C_word*)t0)[2]);}}
-/* 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){
+/* k14423 in k14413 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14425(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_14493(t2,(C_word)C_i_not(t1));}
+f_14311(t2,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){
+/* k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14311(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12046,133 +12004,133 @@ 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);}
+C_save_and_reclaim((void*)trf_14311,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14314,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1848 get-all");
+((C_proc6)C_retrieve_symbol_proc(lf[556]))(6,*((C_word*)lf[556]+1),t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[536],lf[555]);}
else{
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14356,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
t3=*((C_word*)lf[41]+1);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14574,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14392,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
if(C_truep(t3)){
t5=t4;
-f_14574(2,t5,t3);}
+f_14392(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]);}}}
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t4,t5,lf[468]);}}}
-/* 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){
+/* k14390 in k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14392(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_14574,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_14392,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14399,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1858 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[536]);}
else{
t2=((C_word*)t0)[4];
-f_14538(t2,C_SCHEME_FALSE);}}
+f_14356(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){
+/* k14397 in k14390 in k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14399(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_14538(t2,(C_word)C_i_not(t1));}
+f_14356(t2,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){
+/* k14354 in k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14356(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14538,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_14356,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14359,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1859 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[535]);}
else{
-C_trace("compiler.scm: 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);}}
+C_trace("compiler.scm: 1865 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],lf[536],C_SCHEME_TRUE);}}
-/* 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){
+/* k14357 in k14354 in k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14359(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_14359,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14365,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 1860 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[557]);}
-/* 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){
+/* k14363 in k14357 in k14354 in k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14365(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
if(C_truep(t1)){
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 1861 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],lf[536],C_SCHEME_TRUE);}
else{
-t2=(C_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]));
+t2=C_i_not(((C_word*)t0)[4]);
+t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[3],((C_word*)t0)[4]));
if(C_truep(t3)){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1863 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],lf[557],((C_word*)t0)[2]);}
else{
-C_trace("compiler.scm: 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);}}}
+C_trace("compiler.scm: 1864 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],lf[536],C_SCHEME_TRUE);}}}
-/* 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){
+/* k14312 in k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14314(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_14314,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14317,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 1849 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[535]);}
-/* 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){
+/* k14315 in k14312 in k14309 in k14297 in assign in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14317(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-if(C_truep((C_word)C_i_assq(lf[549],((C_word*)t0)[7]))){
+if(C_truep(C_i_assq(lf[536],((C_word*)t0)[7]))){
t2=((C_word*)t0)[6];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
else{
-if(C_truep((C_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);}
+if(C_truep(C_i_assq(lf[555],((C_word*)t0)[7]))){
+C_trace("compiler.scm: 1852 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],lf[536],C_SCHEME_TRUE);}
else{
-t2=(C_word)C_i_not(t1);
-t3=(C_truep(t2)?t2:(C_word)C_eqp(((C_word*)t0)[3],t1));
+t2=C_i_not(t1);
+t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[3],t1));
if(C_truep(t3)){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1854 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],lf[555],((C_word*)t0)[2]);}
else{
-C_trace("compiler.scm: 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);}}}}
+C_trace("compiler.scm: 1855 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],lf[536],C_SCHEME_TRUE);}}}}
-/* walkeach in 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){
+/* walkeach in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14252(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -12180,15 +12138,15 @@ 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);}
+C_save_and_reclaim((void*)trf_14252,NULL,6,t0,t1,t2,t3,t4,t5);}
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14258,a[2]=t7,a[3]=t5,a[4]=t4,a[5]=t3,a[6]=((C_word*)t0)[2],tmp=(C_word)a,a+=7,tmp));
t9=((C_word*)t7)[1];
-f_14440(t9,t1,t2);}
+f_14258(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){
+/* loop3128 in walkeach in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14258(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12197,42 +12155,42 @@ 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");
+C_save_and_reclaim((void*)trf_14258,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14266,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14273,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g31353136");
t6=t3;
-f_14448(t6,t4,t5);}
+f_14266(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){
+/* k14271 in loop3128 in walkeach in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14273(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_14258(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){
+/* g3135 in loop3128 in walkeach in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14266(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_14448,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 1839 walk");
+C_save_and_reclaim((void*)trf_14266,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 1838 walk");
t3=((C_word*)((C_word*)t0)[5])[1];
-f_13740(t3,t1,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_13653(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){
+/* walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_13653(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -12248,27 +12206,27 @@ 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);}
+C_save_and_reclaim((void*)trf_13653,NULL,6,t0,t1,t2,t3,t4,t5);}
t6=t2;
-t7=(C_word)C_slot(t6,C_fix(3));
+t7=C_slot(t6,C_fix(3));
t8=t2;
-t9=(C_word)C_slot(t8,C_fix(2));
+t9=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));
+t11=C_slot(t10,C_fix(1));
+t12=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
t13=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t12);
-t14=(C_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);
+t14=C_eqp(t11,lf[98]);
+t15=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_13690,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t5,a[5]=t7,a[6]=((C_word*)t0)[4],a[7]=t2,a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=t3,a[11]=t4,a[12]=t9,a[13]=t11,a[14]=t1,tmp=(C_word)a,a+=15,tmp);
if(C_truep(t14)){
t16=t15;
-f_13777(t16,t14);}
+f_13690(t16,t14);}
else{
-t16=(C_word)C_eqp(t11,lf[139]);
+t16=C_eqp(t11,lf[138]);
t17=t15;
-f_13777(t17,(C_truep(t16)?t16:(C_word)C_eqp(t11,lf[565])));}}
+f_13690(t17,(C_truep(t16)?t16:C_eqp(t11,lf[553])));}}
-/* 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){
+/* k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_13690(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12316,147 +12274,145 @@ 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);}
+C_save_and_reclaim((void*)trf_13690,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[14];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
else{
-t2=(C_word)C_eqp(((C_word*)t0)[13],lf[517]);
+t2=C_eqp(((C_word*)t0)[13],lf[509]);
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");
+t3=C_i_car(((C_word*)t0)[12]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13702,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[14],a[5]=((C_word*)t0)[11],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1729 ref");
t5=((C_word*)((C_word*)t0)[8])[1];
-f_14646(t5,t4,t3,((C_word*)t0)[7]);}
+f_14464(t5,t4,t3,((C_word*)t0)[7]);}
else{
-t3=(C_word)C_eqp(((C_word*)t0)[13],lf[524]);
+t3=C_eqp(((C_word*)t0)[13],lf[516]);
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");
+t4=C_i_car(((C_word*)t0)[12]);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13745,a[2]=t4,a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[14],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1739 ref");
t6=((C_word*)((C_word*)t0)[8])[1];
-f_14646(t6,t5,t4,((C_word*)t0)[7]);}
+f_14464(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]));
+t4=C_eqp(((C_word*)t0)[13],lf[343]);
+t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[13],lf[532]));
if(C_truep(t5)){
-t6=(C_word)C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
+t6=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
t7=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t6);
-C_trace("compiler.scm: 1734 walkeach");
+C_trace("compiler.scm: 1745 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]);}
+f_14252(t8,((C_word*)t0)[14],((C_word*)t0)[5],((C_word*)t0)[10],((C_word*)t0)[11],((C_word*)t0)[4]);}
else{
-t6=(C_word)C_eqp(((C_word*)t0)[13],lf[513]);
+t6=C_eqp(((C_word*)t0)[13],lf[505]);
if(C_truep(t6)){
-t7=(C_word)C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
+t7=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
t8=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t7);
-t9=(C_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);
+t9=C_i_car(((C_word*)t0)[5]);
+t10=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13781,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[5],tmp=(C_word)a,a+=9,tmp);
+t11=C_slot(t9,C_fix(1));
+t12=C_eqp(lf[509],t11);
if(C_truep(t12)){
-t13=(C_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);}
+t13=C_slot(t9,C_fix(2));
+t14=C_i_car(t13);
+t15=C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)t0)[7]);
+C_trace("compiler.scm: 1752 collect!");
+((C_proc6)C_retrieve_symbol_proc(lf[533]))(6,*((C_word*)lf[533]+1),t10,((C_word*)t0)[9],t14,lf[534],t15);}
else{
t13=t10;
-f_13868(2,t13,C_SCHEME_UNDEFINED);}}
+f_13781(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]));
+t7=C_eqp(((C_word*)t0)[13],lf[158]);
+t8=(C_truep(t7)?t7:C_eqp(((C_word*)t0)[13],lf[159]));
if(C_truep(t8)){
-t9=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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]);}
+t9=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_13838,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[12],a[8]=((C_word*)t0)[4],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[3],tmp=(C_word)a,a+=11,tmp);
+C_trace("compiler.scm: 1757 append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[160]+1)))(5,*((C_word*)lf[160]+1),t9,((C_word*)t0)[12],((C_word*)t0)[11],((C_word*)t0)[10]);}
else{
-t9=(C_word)C_eqp(((C_word*)t0)[13],lf[172]);
+t9=C_eqp(((C_word*)t0)[13],lf[171]);
if(C_truep(t9)){
-t10=(C_word)C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
+t10=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
t11=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t10);
-t12=(C_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);}
+t12=C_i_car(((C_word*)t0)[12]);
+t13=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13905,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1770 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[14],t12,t13);}
else{
-t10=(C_word)C_eqp(((C_word*)t0)[13],lf[173]);
-t11=(C_truep(t10)?t10:(C_word)C_eqp(((C_word*)t0)[13],lf[550]));
+t10=C_eqp(((C_word*)t0)[13],lf[172]);
+t11=(C_truep(t10)?t10:C_eqp(((C_word*)t0)[13],lf[537]));
if(C_truep(t11)){
-t12=(C_word)C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
+t12=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
t13=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t12);
-t14=(C_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);}
+t14=C_i_caddr(((C_word*)t0)[12]);
+t15=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_13971,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[12],tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 1783 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[14],t14,t15);}
else{
-t12=(C_word)C_eqp(((C_word*)t0)[13],lf[252]);
-t13=(C_truep(t12)?t12:(C_word)C_eqp(((C_word*)t0)[13],lf[169]));
+t12=C_eqp(((C_word*)t0)[13],lf[250]);
+t13=(C_truep(t12)?t12:C_eqp(((C_word*)t0)[13],lf[168]));
if(C_truep(t13)){
-t14=(C_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);
+t14=C_i_car(((C_word*)t0)[12]);
+t15=C_i_car(((C_word*)t0)[5]);
+t16=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_14104,a[2]=t15,a[3]=((C_word*)t0)[2],a[4]=t14,a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[14],a[10]=((C_word*)t0)[3],a[11]=((C_word*)t0)[5],tmp=(C_word)a,a+=12,tmp);
+if(C_truep(*((C_word*)lf[62]+1))){
+t17=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14166,a[2]=t15,a[3]=t14,a[4]=((C_word*)t0)[9],a[5]=t16,tmp=(C_word)a,a+=6,tmp);
C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),t17,t14,lf[545]);}
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t17,t14,lf[552]);}
else{
t17=t16;
-f_14286(2,t17,C_SCHEME_UNDEFINED);}}
+f_14104(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]));
+t14=C_eqp(((C_word*)t0)[13],lf[106]);
+t15=(C_truep(t14)?t14:C_eqp(((C_word*)t0)[13],lf[270]));
if(C_truep(t15)){
-t16=(C_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))){
+t16=C_i_car(((C_word*)t0)[12]);
+t17=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14202,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+t18=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14208,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[14],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[4],a[8]=t16,a[9]=t17,tmp=(C_word)a,a+=10,tmp);
+if(C_truep(*((C_word*)lf[62]+1))){
if(C_truep(((C_word*)t0)[4])){
-if(C_truep((C_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);}
+if(C_truep(C_i_symbolp(t16))){
+C_trace("compiler.scm: 1831 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[107]))(4,*((C_word*)lf[107]+1),t18,*((C_word*)lf[74]+1),t16);}
else{
t19=t18;
-f_14390(2,t19,C_SCHEME_FALSE);}}
+f_14208(2,t19,C_SCHEME_FALSE);}}
else{
t19=t18;
-f_14390(2,t19,C_SCHEME_FALSE);}}
+f_14208(2,t19,C_SCHEME_FALSE);}}
else{
t19=t18;
-f_14390(2,t19,C_SCHEME_FALSE);}}
+f_14208(2,t19,C_SCHEME_FALSE);}}
else{
-C_trace("compiler.scm: 1836 walkeach");
+C_trace("compiler.scm: 1835 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]);}}}}}}}}}}}
+f_14252(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){
+/* k14206 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14208(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1832 set-real-name!");
+((C_proc4)C_retrieve_symbol_proc(lf[97]))(4,*((C_word*)lf[97]+1),((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[7]);}
else{
-C_trace("compiler.scm: 1834 walkeach");
+C_trace("compiler.scm: 1833 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]);}}
+f_14252(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){
+/* k14200 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14202(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1834 walkeach");
+C_trace("compiler.scm: 1833 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]);}
+f_14252(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){
+/* k14164 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14166(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12464,31 +12420,31 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_14166,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14169,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=C_eqp(t1,lf[547]);
if(C_truep(t3)){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1814 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t2,lf[548],lf[549],((C_word*)t0)[3]);}
else{
-t4=(C_word)C_eqp(t1,lf[563]);
+t4=C_eqp(t1,lf[550]);
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]);}
+C_trace("compiler.scm: 1816 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t2,lf[548],lf[551],((C_word*)t0)[3]);}
else{
-C_trace("compiler.scm: 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]);}}}
+C_trace("compiler.scm: 1817 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[546],((C_word*)t0)[2]);}}}
-/* 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){
+/* k14167 in k14164 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14169(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1817 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[546],((C_word*)t0)[2]);}
-/* 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){
+/* k14102 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14104(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12497,98 +12453,98 @@ 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]))){
+C_save_and_reclaim((void*)tr2,(void*)f_14104,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_14107,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
+if(C_truep(C_i_memq(((C_word*)t0)[4],((C_word*)t0)[7]))){
t3=t2;
-f_14289(2,t3,C_SCHEME_UNDEFINED);}
+f_14107(2,t3,C_SCHEME_UNDEFINED);}
else{
-t3=(C_word)C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
+t3=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
t4=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t3);
-if(C_truep((C_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);}
+if(C_truep(C_i_memq(((C_word*)t0)[4],((C_word*)t0)[8]))){
+C_trace("compiler.scm: 1821 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[529],C_SCHEME_TRUE);}
else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}}}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14158,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1822 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t5,((C_word*)t0)[5],((C_word*)t0)[4],lf[530]);}}}
-/* 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){
+/* k14156 in k14102 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14158(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
t2=((C_word*)t0)[4];
-f_14289(2,t2,C_SCHEME_UNDEFINED);}
+f_14107(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);}}
+C_trace("compiler.scm: 1823 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[530],C_SCHEME_TRUE);}}
-/* 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){
+/* k14105 in k14102 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14107(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[17],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_14107,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14110,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14130,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1824 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t3,((C_word*)t0)[7],((C_word*)t0)[8]);}
-/* 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){
+/* k14128 in k14105 in k14102 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14130(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1825 assign");
+C_trace("compiler.scm: 1824 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]);}
+f_14286(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){
+/* k14108 in k14105 in k14102 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14110(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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))){
+C_save_and_reclaim((void*)tr2,(void*)f_14110,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14113,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
+if(C_truep(*((C_word*)lf[79]+1))){
t3=t2;
-f_14295(2,t3,C_SCHEME_UNDEFINED);}
+f_14113(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);}}
+C_trace("compiler.scm: 1825 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[545],C_SCHEME_TRUE);}}
-/* 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){
+/* k14111 in k14108 in k14105 in k14102 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14113(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_14113,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14116,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 1826 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[544],C_SCHEME_TRUE);}
-/* 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){
+/* k14114 in k14111 in k14108 in k14105 in k14102 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14116(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_i_car(((C_word*)t0)[7]);
-C_trace("compiler.scm: 1828 walk");
+t2=C_i_car(((C_word*)t0)[7]);
+C_trace("compiler.scm: 1827 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]);}
+f_13653(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){
+/* a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13971(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -12598,28 +12554,28 @@ 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]);
+C_save_and_reclaim((void*)tr5,(void*)f_13971,5,t0,t1,t2,t3,t4);}
+t5=C_i_car(((C_word*)t0)[9]);
t6=*((C_word*)lf[52]+1);
-t7=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_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);
+t7=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_13978,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=t5,a[9]=t2,a[10]=((C_word*)t0)[6],a[11]=((C_word*)t0)[7],a[12]=t1,a[13]=t6,a[14]=((C_word*)t0)[8],tmp=(C_word)a,a+=15,tmp);
if(C_truep(((C_word*)t0)[2])){
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);}
+t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14083,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=((C_word*)t0)[3],a[5]=t7,tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1789 collect!");
+((C_proc6)C_retrieve_symbol_proc(lf[533]))(6,*((C_word*)lf[533]+1),t8,((C_word*)t0)[3],((C_word*)t0)[2],lf[543],t5);}
else{
t8=t7;
-f_14153(2,t8,C_SCHEME_UNDEFINED);}}
+f_13978(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){
+/* k14081 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14083(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1790 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[542],((C_word*)t0)[2]);}
-/* 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){
+/* k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13978(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12628,16 +12584,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_13978,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_13981,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],tmp=(C_word)a,a+=14,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14233,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14051,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t6=((C_word*)t4)[1];
-f_14233(t6,t2,((C_word*)t0)[9]);}
+f_14051(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){
+/* loop3033 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14051(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12646,97 +12602,93 @@ 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");
+C_save_and_reclaim((void*)trf_14051,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14059,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14069,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g30403041");
t6=t3;
-f_14241(t6,t4,t5);}
+f_14059(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){
+/* k14067 in loop3033 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14069(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_14051(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){
+/* g3040 in loop3033 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_14059(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_14059,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14063,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1793 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t3,((C_word*)t0)[3],t2,lf[535],((C_word*)t0)[2]);}
-/* 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){
+/* k14061 in g3040 in loop3033 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14063(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 1794 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[536],C_SCHEME_TRUE);}
-/* 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){
+/* k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13981(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[13],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_13981,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_13984,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],tmp=(C_word)a,a+=13,tmp);
if(C_truep(((C_word*)t0)[2])){
-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]);}}
+C_trace("compiler.scm: 1797 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[540],lf[541]);}
else{
t3=t2;
-f_14159(2,t3,C_SCHEME_UNDEFINED);}}
+f_13984(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){
+/* k13982 in k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13984(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[17],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_13984,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_13987,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],tmp=(C_word)a,a+=12,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14043,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1798 simple-lambda-node?");
+((C_proc3)C_retrieve_symbol_proc(lf[539]))(3,*((C_word*)lf[539]+1),t3,((C_word*)t0)[12]);}
-/* 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){
+/* k14041 in k13982 in k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14043(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 1798 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[538],C_SCHEME_TRUE);}
else{
t2=((C_word*)t0)[4];
-f_14162(2,t2,C_SCHEME_UNDEFINED);}}
+f_13987(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){
+/* k13985 in k13982 in k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13987(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12744,19 +12696,19 @@ 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))){
+C_save_and_reclaim((void*)tr2,(void*)f_13987,2,t0,t1);}
+t2=*((C_word*)lf[79]+1);
+t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_13990,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=t2,tmp=(C_word)a,a+=13,tmp);
+if(C_truep(*((C_word*)lf[80]+1))){
t4=t3;
-f_14165(t4,C_SCHEME_UNDEFINED);}
+f_13990(t4,C_SCHEME_UNDEFINED);}
else{
-t4=C_mutate((C_word*)lf[81]+1 /* (set! toplevel-lambda-id ...) */,((C_word*)t0)[5]);
+t4=C_mutate((C_word*)lf[80]+1 /* (set! toplevel-lambda-id ...) */,((C_word*)t0)[5]);
t5=t3;
-f_14165(t5,t4);}}
+f_13990(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){
+/* k13988 in k13985 in k13982 in k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_13990(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12764,23 +12716,23 @@ 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]);
+C_save_and_reclaim((void*)trf_13990,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_13993,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],tmp=(C_word)a,a+=12,tmp);
+if(C_truep(C_i_cadr(((C_word*)t0)[2]))){
+t3=C_eqp(*((C_word*)lf[80]+1),((C_word*)t0)[5]);
if(C_truep(t3)){
t4=t2;
-f_14168(t4,C_SCHEME_UNDEFINED);}
+f_13993(t4,C_SCHEME_UNDEFINED);}
else{
-t4=C_set_block_item(lf[80] /* toplevel-scope */,0,C_SCHEME_FALSE);
+t4=C_set_block_item(lf[79] /* toplevel-scope */,0,C_SCHEME_FALSE);
t5=t2;
-f_14168(t5,t4);}}
+f_13993(t5,t4);}}
else{
t3=t2;
-f_14168(t3,C_SCHEME_UNDEFINED);}}
+f_13993(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){
+/* k13991 in k13988 in k13985 in k13982 in k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_13993(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12788,24 +12740,24 @@ 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]);}
+C_save_and_reclaim((void*)trf_13993,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13996,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],tmp=(C_word)a,a+=6,tmp);
+t3=C_i_car(((C_word*)t0)[7]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14025,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t3,a[5]=t2,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1803 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k14023 in k13991 in k13988 in k13985 in k13982 in k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_14025(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1804 walk");
+C_trace("compiler.scm: 1803 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]);}
+f_13653(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){
+/* k13994 in k13991 in k13988 in k13985 in k13982 in k13979 in k13976 in a13970 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13996(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12814,16 +12766,16 @@ 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]);
+t2=C_mutate((C_word*)lf[79]+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]);
+t4=C_slot(t3,C_fix(2));
+t5=C_i_cdddr(t4);
+t6=C_fixnum_difference(*((C_word*)lf[52]+1),((C_word*)t0)[3]);
t7=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_i_set_car(t5,t6));}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,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){
+/* a13904 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13905(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -12833,16 +12785,16 @@ 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);
+C_save_and_reclaim((void*)tr5,(void*)f_13905,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13909,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14099,a[2]=t7,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13924,a[2]=t7,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp));
t9=((C_word*)t7)[1];
-f_14099(t9,t5,t2);}
+f_13924(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){
+/* loop3001 in a13904 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_13924(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12851,41 +12803,41 @@ 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");
+C_save_and_reclaim((void*)trf_13924,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13932,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13939,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g30083009");
t6=t3;
-f_14107(t6,t4,t5);}
+f_13932(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){
+/* k13937 in loop3001 in a13904 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13939(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_13924(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){
+/* g3008 in loop3001 in a13904 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_13932(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_13932,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 1774 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t1,((C_word*)t0)[2],t2,lf[536],C_SCHEME_TRUE);}
-/* 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){
+/* k13907 in a13904 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13909(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12895,36 +12847,36 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_13909,2,t0,t1);}
+t2=*((C_word*)lf[79]+1);
+t3=C_set_block_item(lf[79] /* toplevel-scope */,0,C_SCHEME_FALSE);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13913,a[2]=((C_word*)t0)[7],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t5=C_i_car(((C_word*)t0)[6]);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13922,a[2]=((C_word*)t0)[4],a[3]=t5,a[4]=t4,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1778 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t6,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k13920 in k13907 in a13904 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13922(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1776 walk");
+C_trace("compiler.scm: 1778 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);}
+f_13653(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){
+/* k13911 in k13907 in a13904 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13913(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_mutate((C_word*)lf[80]+1 /* (set! toplevel-scope ...) */,((C_word*)t0)[3]);
+t2=C_mutate((C_word*)lf[79]+1 /* (set! toplevel-scope ...) */,((C_word*)t0)[3]);
t3=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* 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){
+/* k13836 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13838(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12932,15 +12884,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_13838,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_13843,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=t3,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp));
t5=((C_word*)t3)[1];
-f_14018(t5,((C_word*)t0)[3],((C_word*)t0)[7],((C_word*)t0)[2]);}
+f_13843(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){
+/* loop in k13836 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_fcall f_13843(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -12950,224 +12902,107 @@ 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]);}
+C_save_and_reclaim((void*)trf_13843,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t2))){
+t4=C_i_car(t3);
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13861,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=t4,a[5]=t1,a[6]=((C_word*)t0)[10],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1760 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t5,((C_word*)t0)[7],((C_word*)t0)[6]);}
else{
-t4=(C_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]);}}
+t4=C_i_car(t2);
+t5=C_i_car(t3);
+t6=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_13870,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[9],a[8]=t5,a[9]=((C_word*)t0)[10],a[10]=t1,a[11]=((C_word*)t0)[5],a[12]=t3,a[13]=t2,tmp=(C_word)a,a+=14,tmp);
+C_trace("compiler.scm: 1763 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),t6,((C_word*)t0)[2],t4,lf[535],((C_word*)t0)[8]);}}
-/* 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){
+/* k13868 in loop in k13836 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13870(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_13870,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_13873,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[13],tmp=(C_word)a,a+=11,tmp);
+C_trace("compiler.scm: 1764 assign");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_14468(t3,t2,((C_word*)t0)[3],((C_word*)t0)[8],((C_word*)t0)[2],((C_word*)t0)[5]);}
+f_14286(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){
+/* k13871 in k13868 in loop in k13836 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13873(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_13873,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13876,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1765 walk");
t3=((C_word*)((C_word*)t0)[6])[1];
-f_13740(t3,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_13653(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){
+/* k13874 in k13871 in k13868 in loop in k13836 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13876(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
-t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
-C_trace("compiler.scm: 1764 loop");
+t2=C_i_cdr(((C_word*)t0)[5]);
+t3=C_i_cdr(((C_word*)t0)[4]);
+C_trace("compiler.scm: 1766 loop");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_14018(t4,((C_word*)t0)[2],t2,t3);}
+f_13843(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){
+/* k13859 in loop in k13836 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13861(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1758 walk");
+C_trace("compiler.scm: 1760 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);}}
+f_13653(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k13779 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13781(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_13781,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13784,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
+t3=C_i_car(((C_word*)t0)[8]);
+C_trace("compiler.scm: 1753 walk");
t4=((C_word*)((C_word*)t0)[2])[1];
-f_13740(t4,t2,t3,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
+f_13653(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){
+/* k13782 in k13779 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13784(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[7]);
-C_trace("compiler.scm: 1752 walkeach");
+t2=C_i_cdr(((C_word*)t0)[7]);
+C_trace("compiler.scm: 1754 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]);}
+f_14252(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){
+/* k13743 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13745(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
+t2=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
t3=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t2);
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 1741 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[530],C_SCHEME_TRUE);}
-/* 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){
+/* k13700 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13702(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13176,24 +13011,24 @@ 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]))){
+C_save_and_reclaim((void*)tr2,(void*)f_13702,2,t0,t1);}
+if(C_truep(C_i_memq(((C_word*)t0)[6],((C_word*)t0)[5]))){
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-t2=(C_word)C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
+t2=C_fixnum_plus(*((C_word*)lf[52]+1),C_fix(1));
t3=C_mutate((C_word*)lf[52]+1 /* (set! current-program-size ...) */,t2);
-if(C_truep((C_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);}
+if(C_truep(C_i_memq(((C_word*)t0)[6],((C_word*)t0)[3]))){
+C_trace("compiler.scm: 1733 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[2],((C_word*)t0)[6],lf[529],C_SCHEME_TRUE);}
else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}}}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13733,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1734 get");
+((C_proc5)C_retrieve_symbol_proc(lf[531]))(5,*((C_word*)lf[531]+1),t4,((C_word*)t0)[2],((C_word*)t0)[6],lf[530]);}}}
-/* 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){
+/* k13731 in k13700 in k13688 in walk in k13642 in ##compiler#analyze-expression in k5089 in k5086 */
+static void C_ccall f_13733(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13203,98 +13038,98 @@ 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);}}
+C_trace("compiler.scm: 1735 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[528]))(6,*((C_word*)lf[528]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[530],C_SCHEME_TRUE);}}
-/* foreign-callback-stub-argument-types in k5138 in k5135 */
-static void C_ccall f_13718(C_word c,C_word t0,C_word t1,C_word t2){
+/* foreign-callback-stub-argument-types in k5089 in k5086 */
+static void C_ccall f_13631(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13718,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[528]);
+C_save_and_reclaim((void*)tr3,(void*)f_13631,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[520]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(5)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* foreign-callback-stub-return-type in k5089 in k5086 */
+static void C_ccall f_13622(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13709,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[528]);
+C_save_and_reclaim((void*)tr3,(void*)f_13622,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[520]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(4)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* foreign-callback-stub-qualifiers in k5089 in k5086 */
+static void C_ccall f_13613(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13700,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[528]);
+C_save_and_reclaim((void*)tr3,(void*)f_13613,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[520]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(3)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* foreign-callback-stub-name in k5089 in k5086 */
+static void C_ccall f_13604(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13691,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[528]);
+C_save_and_reclaim((void*)tr3,(void*)f_13604,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[520]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(2)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* foreign-callback-stub-id in k5089 in k5086 */
+static void C_ccall f_13595(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13682,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[528]);
+C_save_and_reclaim((void*)tr3,(void*)f_13595,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[520]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(1)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* foreign-callback-stub? in k5089 in k5086 */
+static void C_ccall f_13589(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_13676,3,t0,t1,t2);}
+C_save_and_reclaim((void*)tr3,(void*)f_13589,3,t0,t1,t2);}
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_structurep(t2,lf[528]));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_structurep(t2,lf[520]));}
-/* 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){
+/* make-foreign-callback-stub in k5089 in k5086 */
+static void C_ccall f_13583(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
C_word tmp;
C_word t7;
C_word ab[7],*a=ab;
if(c!=7) C_bad_argc_2(c,7,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr7,(void*)f_13670,7,t0,t1,t2,t3,t4,t5,t6);}
+C_save_and_reclaim((void*)tr7,(void*)f_13583,7,t0,t1,t2,t3,t4,t5,t6);}
t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_record(&a,6,lf[528],t2,t3,t4,t5,t6));}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_record(&a,6,lf[520],t2,t3,t4,t5,t6));}
-/* ##compiler#perform-cps-conversion in k5138 in k5135 */
-static void C_ccall f_12811(C_word c,C_word t0,C_word t1,C_word t2){
+/* ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12724(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13318,7 +13153,7 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_12724,3,t0,t1,t2);}
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_UNDEFINED;
@@ -13331,18 +13166,18 @@ 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");
+t15=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12727,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
+t16=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12784,a[2]=t8,a[3]=t10,a[4]=t4,a[5]=t6,tmp=(C_word)a,a+=6,tmp));
+t17=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13256,a[2]=t12,a[3]=t6,tmp=(C_word)a,a+=4,tmp));
+t18=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13432,a[2]=t12,tmp=(C_word)a,a+=3,tmp));
+t19=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13453,a[2]=t14,a[3]=t6,tmp=(C_word)a,a+=4,tmp));
+t20=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13545,a[2]=t14,tmp=(C_word)a,a+=3,tmp));
+C_trace("compiler.scm: 1695 walk");
t21=((C_word*)t6)[1];
-f_12871(t21,t1,t2,*((C_word*)lf[527]+1));}
+f_12784(t21,t1,t2,*((C_word*)lf[519]+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){
+/* atomic? in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13545(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13353,25 +13188,25 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_13545,3,t0,t1,t2);}
t3=t2;
-t4=(C_word)C_slot(t3,C_fix(1));
-t5=(C_word)C_i_memq(t4,lf[526]);
+t4=C_slot(t3,C_fix(1));
+t5=C_i_memq(t4,lf[518]);
if(C_truep(t5)){
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
else{
-if(C_truep((C_truep((C_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)))))))){
+if(C_truep((C_truep(C_eqp(t4,lf[270]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[271]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[100]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[251]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[104]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[254]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))))){
t6=t2;
-t7=(C_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);}
+t7=C_slot(t6,C_fix(3));
+C_trace("compiler.scm: 1693 every");
+((C_proc4)C_retrieve_symbol_proc(lf[411]))(4,*((C_word*)lf[411]+1),t1,((C_word*)((C_word*)t0)[2])[1],t7);}
else{
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}}
-/* walk-arguments in ##compiler#perform-cps-conversion in k5138 in k5135 */
-static void C_fcall f_13540(C_word t0,C_word t1,C_word t2,C_word t3){
+/* walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_fcall f_13453(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -13379,15 +13214,15 @@ 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);}
+C_save_and_reclaim((void*)trf_13453,NULL,4,t0,t1,t2,t3);}
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13459,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t5,a[5]=t3,tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
-f_13546(t7,t1,t2,C_SCHEME_END_OF_LIST);}
+f_13459(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){
+/* loop in walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_fcall f_13459(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -13395,20 +13230,20 @@ 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);}
+C_save_and_reclaim((void*)trf_13459,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t2))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13473,a[2]=t1,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1676 reverse");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[211]+1)))(3,*((C_word*)lf[211]+1),t4,t3);}
else{
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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?");
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13479,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t3,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
+t5=C_i_car(t2);
+C_trace("compiler.scm: 1677 atomic?");
t6=((C_word*)((C_word*)t0)[2])[1];
-f_13632(3,t6,t4,t5);}}
+f_13545(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){
+/* k13477 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13479(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13417,36 +13252,36 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_13479,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");
+t2=C_i_cdr(((C_word*)t0)[6]);
+t3=C_i_car(((C_word*)t0)[6]);
+t4=C_a_i_cons(&a,2,t3,((C_word*)t0)[5]);
+C_trace("compiler.scm: 1678 loop");
t5=((C_word*)((C_word*)t0)[4])[1];
-f_13546(t5,((C_word*)t0)[3],t2,t4);}
+f_13459(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]);}}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13497,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1680 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,lf[496]);}}
-/* 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){
+/* k13495 in k13477 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13497(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_13497,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13506,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1681 walk");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_12871(t4,((C_word*)t0)[2],t2,t3);}
+f_12784(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){
+/* a13505 in k13495 in k13477 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13506(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13456,65 +13291,65 @@ 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]);}
+C_save_and_reclaim((void*)tr3,(void*)f_13506,3,t0,t1,t2);}
+t3=C_a_i_list(&a,1,((C_word*)t0)[5]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13527,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_i_cdr(((C_word*)t0)[4]);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13539,a[2]=t5,a[3]=t4,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1686 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t6,((C_word*)t0)[5]);}
-/* 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){
+/* k13537 in a13505 in k13495 in k13477 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13539(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13626,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
-C_trace("compiler.scm: 1674 loop");
+C_save_and_reclaim((void*)tr2,(void*)f_13539,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+C_trace("compiler.scm: 1685 loop");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_13546(t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+f_13459(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){
+/* k13525 in a13505 in k13495 in k13477 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13527(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13614,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_13527,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[158],((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){
+/* k13471 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13473(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1665 wk");
+C_trace("compiler.scm: 1676 wk");
t2=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
-/* walk-inline-call in ##compiler#perform-cps-conversion in 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){
+/* walk-inline-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_fcall f_13432(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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");
+C_save_and_reclaim((void*)trf_13432,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13438,a[2]=t5,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1669 walk-arguments");
t7=((C_word*)((C_word*)t0)[2])[1];
-f_13540(t7,t1,t4,t6);}
+f_13453(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){
+/* a13437 in walk-inline-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13438(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13523,54 +13358,54 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_13438,3,t0,t1,t2);}
t3=((C_word*)t0)[4];
t4=((C_word*)t0)[3];
-t5=(C_word)C_a_i_record(&a,4,lf[512],t3,t4,t2);
-C_trace("compiler.scm: 1661 k");
+t5=C_a_i_record(&a,4,lf[504],t3,t4,t2);
+C_trace("compiler.scm: 1672 k");
t6=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t6))(3,t6,t1,t5);}
-/* walk-call in ##compiler#perform-cps-conversion in 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){
+/* walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_fcall f_13256(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_13256,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13260,a[2]=t5,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=t2,a[6]=((C_word*)t0)[3],a[7]=t4,a[8]=t1,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 1645 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t6,lf[508]);}
-/* 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){
+/* k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13260(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_13260,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_13263,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 1646 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,lf[335]);}
-/* 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){
+/* k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13263(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[15],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_13263,2,t0,t1);}
+t2=C_a_i_list(&a,1,((C_word*)t0)[9]);
+t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_13342,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[7],a[9]=t2,a[10]=((C_word*)t0)[8],a[11]=t1,tmp=(C_word)a,a+=12,tmp);
+C_trace("compiler.scm: 277 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t3,lf[511]);}
-/* 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){
+/* k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13342(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13579,25 +13414,25 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_13342,2,t0,t1);}
+t2=C_a_i_list(&a,1,((C_word*)t0)[11]);
+t3=C_a_i_list(&a,4,t1,C_SCHEME_FALSE,t2,C_fix(0));
+t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_13329,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=t3,tmp=(C_word)a,a+=11,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13333,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1650 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t5,((C_word*)t0)[11]);}
-/* 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){
+/* k13331 in k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13333(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1639 k");
+C_trace("compiler.scm: 1650 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){
+/* k13327 in k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13329(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13606,31 +13441,31 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_13329,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
+t3=C_a_i_record(&a,4,lf[504],lf[172],((C_word*)t0)[10],t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13292,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13294,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1651 walk-arguments");
t6=((C_word*)((C_word*)t0)[3])[1];
-f_13540(t6,t4,((C_word*)t0)[2],t5);}
+f_13453(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){
+/* a13293 in k13327 in k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13294(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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");
+C_save_and_reclaim((void*)tr3,(void*)f_13294,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13300,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1654 walk");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_12871(t4,t1,((C_word*)t0)[2],t3);}
+f_12784(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){
+/* a13299 in a13293 in k13327 in k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13300(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13638,50 +13473,50 @@ 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]);}
+C_save_and_reclaim((void*)tr3,(void*)f_13300,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13313,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13317,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1656 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t4,((C_word*)t0)[2]);}
-/* 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){
+/* k13315 in a13299 in a13293 in k13327 in k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13317(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1656 cons*");
+((C_proc5)C_retrieve_symbol_proc(lf[517]))(5,*((C_word*)lf[517]+1),((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k13311 in a13299 in a13293 in k13327 in k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13313(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13400,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_13313,2,t0,t1);}
t2=((C_word*)t0)[3];
t3=((C_word*)t0)[2];
t4=t2;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[513],t3,t1));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[505],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){
+/* k13290 in k13327 in k13340 in k13261 in k13258 in walk-call in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13292(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13379,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_13292,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[158],((C_word*)t0)[2],t2));}
-/* walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
-static void C_fcall f_12871(C_word t0,C_word t1,C_word t2,C_word t3){
+/* walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_fcall f_12784(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -13699,37 +13534,37 @@ 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);}
+C_save_and_reclaim((void*)trf_12784,NULL,4,t0,t1,t2,t3);}
t4=t2;
-t5=(C_word)C_slot(t4,C_fix(3));
+t5=C_slot(t4,C_fix(3));
t6=t2;
-t7=(C_word)C_slot(t6,C_fix(2));
+t7=C_slot(t6,C_fix(2));
t8=t2;
-t9=(C_word)C_slot(t8,C_fix(1));
+t9=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);
+t11=C_slot(t10,C_fix(1));
+t12=C_eqp(t11,lf[509]);
+t13=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_12826,a[2]=((C_word*)t0)[2],a[3]=t9,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t7,a[7]=((C_word*)t0)[5],a[8]=t5,a[9]=t11,a[10]=t2,a[11]=t1,a[12]=t3,tmp=(C_word)a,a+=13,tmp);
if(C_truep(t12)){
t14=t13;
-f_12913(t14,t12);}
+f_12826(t14,t12);}
else{
-t14=(C_word)C_eqp(t11,lf[99]);
+t14=C_eqp(t11,lf[98]);
if(C_truep(t14)){
t15=t13;
-f_12913(t15,t14);}
+f_12826(t15,t14);}
else{
-t15=(C_word)C_eqp(t11,lf[139]);
+t15=C_eqp(t11,lf[138]);
if(C_truep(t15)){
t16=t13;
-f_12913(t16,t15);}
+f_12826(t16,t15);}
else{
-t16=(C_word)C_eqp(t11,lf[107]);
+t16=C_eqp(t11,lf[106]);
t17=t13;
-f_12913(t17,(C_truep(t16)?t16:(C_word)C_eqp(t11,lf[524])));}}}}
+f_12826(t17,(C_truep(t16)?t16:C_eqp(t11,lf[516])));}}}}
-/* k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
-static void C_fcall f_12913(C_word t0,C_word t1){
+/* k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_fcall f_12826(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13753,72 +13588,72 @@ 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);}
+C_save_and_reclaim((void*)trf_12826,NULL,2,t0,t1);}
if(C_truep(t1)){
-C_trace("compiler.scm: 1590 k");
+C_trace("compiler.scm: 1601 k");
t2=((C_word*)t0)[12];
((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[11],((C_word*)t0)[10]);}
else{
-t2=(C_word)C_eqp(((C_word*)t0)[9],lf[124]);
+t2=C_eqp(((C_word*)t0)[9],lf[123]);
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]);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12838,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[11],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1602 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t3,lf[508]);}
else{
-t3=(C_word)C_eqp(((C_word*)t0)[9],lf[159]);
+t3=C_eqp(((C_word*)t0)[9],lf[158]);
if(C_truep(t3)){
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13050,a[2]=t5,a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12963,a[2]=t5,a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp));
t7=((C_word*)t5)[1];
-f_13050(t7,((C_word*)t0)[11],((C_word*)t0)[6],((C_word*)t0)[8]);}
+f_12963(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]));
+t4=C_eqp(((C_word*)t0)[9],lf[171]);
+t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[9],lf[172]));
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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]);}
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13040,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 277 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t6,lf[511]);}
else{
-t6=(C_word)C_eqp(((C_word*)t0)[9],lf[252]);
+t6=C_eqp(((C_word*)t0)[9],lf[250]);
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]);}
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13053,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1625 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t7,lf[512]);}
else{
-t7=(C_word)C_eqp(((C_word*)t0)[9],lf[319]);
+t7=C_eqp(((C_word*)t0)[9],lf[317]);
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]);}
+t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13122,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 277 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t8,lf[511]);}
else{
-t8=(C_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);
+t8=C_eqp(((C_word*)t0)[9],lf[270]);
+t9=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_13167,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[3],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[4],tmp=(C_word)a,a+=10,tmp);
if(C_truep(t8)){
t10=t9;
-f_13254(t10,t8);}
+f_13167(t10,t8);}
else{
-t10=(C_word)C_eqp(((C_word*)t0)[9],lf[273]);
+t10=C_eqp(((C_word*)t0)[9],lf[271]);
if(C_truep(t10)){
t11=t9;
-f_13254(t11,t10);}
+f_13167(t11,t10);}
else{
-t11=(C_word)C_eqp(((C_word*)t0)[9],lf[101]);
+t11=C_eqp(((C_word*)t0)[9],lf[100]);
if(C_truep(t11)){
t12=t9;
-f_13254(t12,t11);}
+f_13167(t12,t11);}
else{
-t12=(C_word)C_eqp(((C_word*)t0)[9],lf[253]);
+t12=C_eqp(((C_word*)t0)[9],lf[251]);
if(C_truep(t12)){
t13=t9;
-f_13254(t13,t12);}
+f_13167(t13,t12);}
else{
-t13=(C_word)C_eqp(((C_word*)t0)[9],lf[105]);
+t13=C_eqp(((C_word*)t0)[9],lf[104]);
t14=t9;
-f_13254(t14,(C_truep(t13)?t13:(C_word)C_eqp(((C_word*)t0)[9],lf[256])));}}}}}}}}}}}
+f_13167(t14,(C_truep(t13)?t13:C_eqp(((C_word*)t0)[9],lf[254])));}}}}}}}}}}}
-/* 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){
+/* k13165 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_fcall f_13167(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13831,60 +13666,60 @@ 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);}
+C_save_and_reclaim((void*)trf_13167,NULL,2,t0,t1);}
if(C_truep(t1)){
-C_trace("compiler.scm: 1628 walk-inline-call");
+C_trace("compiler.scm: 1639 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]);}
+f_13432(t2,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4]);}
else{
-t2=(C_word)C_eqp(((C_word*)t0)[3],lf[513]);
+t2=C_eqp(((C_word*)t0)[3],lf[505]);
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");
+t3=C_i_car(((C_word*)t0)[5]);
+t4=C_i_cdr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 1640 walk-call");
t5=((C_word*)((C_word*)t0)[2])[1];
-f_13343(t5,((C_word*)t0)[8],t3,t4,((C_word*)t0)[6],((C_word*)t0)[4]);}
+f_13256(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]);
+t3=C_eqp(((C_word*)t0)[3],lf[343]);
if(C_truep(t3)){
-t4=(C_word)C_i_car(((C_word*)t0)[6]);
+t4=C_i_car(((C_word*)t0)[6]);
t5=((C_word*)t0)[8];
t6=((C_word*)t0)[4];
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13352,a[2]=t6,a[3]=t5,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1659 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t7,lf[508]);}
else{
-C_trace("compiler.scm: 1631 bomb");
-((C_proc3)C_retrieve_symbol_proc(lf[522]))(3,*((C_word*)lf[522]+1),((C_word*)t0)[8],lf[523]);}}}}
+C_trace("compiler.scm: 1642 bomb");
+((C_proc3)C_retrieve_symbol_proc(lf[514]))(3,*((C_word*)lf[514]+1),((C_word*)t0)[8],lf[515]);}}}}
-/* 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){
+/* k13350 in k13165 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13352(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_13352,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13355,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1660 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,lf[335]);}
-/* 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){
+/* k13353 in k13350 in k13165 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13355(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_13355,2,t0,t1);}
+t2=C_a_i_list(&a,1,((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13426,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=t2,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 277 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t3,lf[511]);}
-/* 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){
+/* k13424 in k13353 in k13350 in k13165 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13426(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13893,25 +13728,25 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_13426,2,t0,t1);}
+t2=C_a_i_list(&a,1,((C_word*)t0)[7]);
+t3=C_a_i_list(&a,4,t1,C_SCHEME_FALSE,t2,C_fix(0));
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13413,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13417,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1664 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t5,((C_word*)t0)[7]);}
-/* 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){
+/* k13415 in k13424 in k13353 in k13350 in k13165 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13417(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1653 k");
+C_trace("compiler.scm: 1664 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){
+/* k13411 in k13424 in k13353 in k13350 in k13165 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13413(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13920,16 +13755,16 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_13413,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
+t3=C_a_i_record(&a,4,lf[504],lf[172],((C_word*)t0)[6],t2);
+t4=C_a_i_list(&a,1,((C_word*)t0)[5]);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13401,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1666 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t5,((C_word*)t0)[2]);}
-/* 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){
+/* k13399 in k13411 in k13424 in k13353 in k13350 in k13165 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13401(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13937,28 +13772,28 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_13401,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
+t3=C_a_i_record(&a,4,lf[504],lf[343],((C_word*)t0)[5],t2);
+t4=C_a_i_list(&a,2,((C_word*)t0)[4],t3);
t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[2],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_record(&a,4,lf[504],lf[158],((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){
+/* k13120 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13122(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_13122,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13158,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
+C_apply(5,0,t3,*((C_word*)lf[513]+1),t1,((C_word*)t0)[2]);}
-/* 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){
+/* k13156 in k13120 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13158(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13968,33 +13803,33 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_13158,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,*((C_word*)lf[66]+1));
+t3=C_mutate((C_word*)lf[66]+1 /* (set! foreign-callback-stubs ...) */,t2);
+t4=C_slot(((C_word*)t0)[6],C_fix(2));
+t5=C_i_car(t4);
+t6=C_slot(((C_word*)t0)[6],C_fix(3));
+C_trace("compiler.scm: 1636 cps-lambda");
t7=((C_word*)((C_word*)t0)[5])[1];
-f_12814(t7,((C_word*)t0)[4],((C_word*)t0)[3],t5,t6,((C_word*)t0)[2]);}
+f_12727(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){
+/* k13051 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13053(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_13053,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13062,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1626 walk");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_12871(t4,((C_word*)t0)[2],t2,t3);}
+f_12784(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){
+/* a13061 in k13051 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13062(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -14007,53 +13842,53 @@ 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]);}
+C_save_and_reclaim((void*)tr3,(void*)f_13062,3,t0,t1,t2);}
+t3=C_a_i_list(&a,1,((C_word*)t0)[4]);
+t4=C_i_car(((C_word*)t0)[3]);
+t5=C_a_i_list(&a,1,t4);
+t6=C_a_i_list(&a,1,t2);
+t7=C_a_i_record(&a,4,lf[504],lf[250],t5,t6);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13092,a[2]=t3,a[3]=t1,a[4]=t7,tmp=(C_word)a,a+=5,tmp);
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13096,a[2]=t8,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1630 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t9,((C_word*)t0)[4]);}
-/* 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){
+/* k13094 in a13061 in k13051 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13096(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1619 k");
+C_trace("compiler.scm: 1630 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){
+/* k13090 in a13061 in k13051 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13092(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13179,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_13092,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[158],((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){
+/* k13038 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13040(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_i_car(((C_word*)t0)[6]);
-C_trace("compiler.scm: 1613 cps-lambda");
+t2=C_i_car(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1624 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]);}
+f_12727(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){
+/* loop in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_fcall f_12963(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -14061,21 +13896,21 @@ 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");
+C_save_and_reclaim((void*)trf_12963,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t2))){
+t4=C_i_car(t3);
+C_trace("compiler.scm: 1618 walk");
t5=((C_word*)((C_word*)t0)[4])[1];
-f_12871(t5,t1,t4,((C_word*)t0)[3]);}
+f_12784(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");
+t4=C_i_car(t3);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12986,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1619 walk");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_12871(t6,t1,t4,t5);}}
+f_12784(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){
+/* a12985 in loop in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12986(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -14086,44 +13921,44 @@ 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");
+C_save_and_reclaim((void*)tr3,(void*)f_12986,3,t0,t1,t2);}
+t3=C_i_car(((C_word*)t0)[4]);
+t4=C_a_i_list(&a,1,t3);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13007,a[2]=t4,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t6=C_i_cdr(((C_word*)t0)[4]);
+t7=C_i_cdr(((C_word*)t0)[3]);
+C_trace("compiler.scm: 1623 loop");
t8=((C_word*)((C_word*)t0)[2])[1];
-f_13050(t8,t5,t6,t7);}
+f_12963(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){
+/* k13005 in a12985 in loop in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_13007(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13094,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_13007,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[158],((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){
+/* k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12838(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_12838,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12841,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1603 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,lf[335]);}
-/* 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){
+/* k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12841(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14131,15 +13966,15 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_12841,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12842,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t3=C_a_i_list(&a,1,((C_word*)t0)[6]);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12948,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t3,a[7]=((C_word*)t0)[5],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 277 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t4,lf[511]);}
-/* 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){
+/* k12946 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12948(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14148,25 +13983,25 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_12948,2,t0,t1);}
+t2=C_a_i_list(&a,1,((C_word*)t0)[8]);
+t3=C_a_i_list(&a,4,t1,C_SCHEME_FALSE,t2,C_fix(0));
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12935,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t3,tmp=(C_word)a,a+=8,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12939,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1608 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t5,((C_word*)t0)[8]);}
-/* 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){
+/* k12937 in k12946 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12939(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1597 k");
+C_trace("compiler.scm: 1608 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){
+/* k12933 in k12946 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12935(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14176,18 +14011,18 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_12935,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
+t3=C_a_i_record(&a,4,lf[504],lf[172],((C_word*)t0)[7],t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12888,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+t5=C_i_car(((C_word*)t0)[4]);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12894,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1609 walk");
t7=((C_word*)((C_word*)t0)[3])[1];
-f_12871(t7,t4,t5,t6);}
+f_12784(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){
+/* a12893 in k12933 in k12946 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12894(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -14195,97 +14030,97 @@ 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");
+C_save_and_reclaim((void*)tr3,(void*)f_12894,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12911,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
+t4=C_i_cadr(((C_word*)t0)[4]);
+C_trace("compiler.scm: 1613 walk");
t5=((C_word*)((C_word*)t0)[3])[1];
-f_12871(t5,t3,t4,((C_word*)t0)[2]);}
+f_12784(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){
+/* k12909 in a12893 in k12933 in k12946 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12911(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_12911,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12915,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+t3=C_i_caddr(((C_word*)t0)[4]);
+C_trace("compiler.scm: 1614 walk");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_12871(t4,t2,t3,((C_word*)t0)[2]);}
+f_12784(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){
+/* k12913 in k12909 in a12893 in k12933 in k12946 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12915(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_13002,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,3,((C_word*)t0)[4],((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_12915,2,t0,t1);}
+t2=C_a_i_list(&a,3,((C_word*)t0)[4],((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[124],C_SCHEME_END_OF_LIST,t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[123],C_SCHEME_END_OF_LIST,t2));}
-/* 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){
+/* k12886 in k12933 in k12946 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12888(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12975,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_12888,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[2],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[158],((C_word*)t0)[2],t2));}
-/* k1 in 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){
+/* k1 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12842(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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]);}
+C_save_and_reclaim((void*)tr3,(void*)f_12842,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12859,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1604 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t3,((C_word*)t0)[2]);}
-/* 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){
+/* k12857 in k1 in k12839 in k12836 in k12824 in walk in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12859(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12946,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,t1,((C_word*)t0)[3]);
+C_save_and_reclaim((void*)tr2,(void*)f_12859,2,t0,t1);}
+t2=C_a_i_list(&a,2,t1,((C_word*)t0)[3]);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[513],lf[518],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[505],lf[510],t2));}
-/* cps-lambda in ##compiler#perform-cps-conversion in 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){
+/* cps-lambda in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_fcall f_12727(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_12727,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12731,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t1,a[5]=t5,a[6]=t2,a[7]=t3,tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 1589 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t6,lf[508]);}
-/* 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){
+/* k12729 in cps-lambda in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12731(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14295,60 +14130,60 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_12731,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[7]);
+t3=C_a_i_list(&a,4,((C_word*)t0)[6],C_SCHEME_TRUE,t2,C_fix(0));
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12755,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+t5=C_i_car(((C_word*)t0)[3]);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12761,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1592 walk");
t7=((C_word*)((C_word*)t0)[2])[1];
-f_12871(t7,t4,t5,t6);}
+f_12784(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){
+/* a12760 in k12729 in cps-lambda in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12761(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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]);}
+C_save_and_reclaim((void*)tr3,(void*)f_12761,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12778,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1594 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[507]))(3,*((C_word*)lf[507]+1),t3,((C_word*)t0)[2]);}
-/* 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){
+/* k12776 in a12760 in k12729 in cps-lambda in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12778(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12865,2,t0,t1);}
-t2=(C_word)C_a_i_list(&a,2,t1,((C_word*)t0)[3]);
+C_save_and_reclaim((void*)tr2,(void*)f_12778,2,t0,t1);}
+t2=C_a_i_list(&a,2,t1,((C_word*)t0)[3]);
t3=((C_word*)t0)[2];
t4=t3;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[513],lf[514],t2));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_record(&a,4,lf[504],lf[505],lf[506],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){
+/* k12753 in k12729 in cps-lambda in ##compiler#perform-cps-conversion in k5089 in k5086 */
+static void C_ccall f_12755(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_12755,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
+t3=C_a_i_record(&a,4,lf[504],lf[172],((C_word*)t0)[4],t2);
+C_trace("compiler.scm: 1590 k");
t4=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t4))(3,t4,((C_word*)t0)[2],t3);}
-/* ##compiler#update-line-number-database! in k5138 in k5135 */
-static void C_ccall f_12721(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
+/* ##compiler#update-line-number-database! in k5089 in k5086 */
+static void C_ccall f_12634(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -14360,19 +14195,19 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_12634,4,t0,t1,t2,t3);}
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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");
+t8=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12637,a[2]=t7,tmp=(C_word)a,a+=3,tmp));
+t9=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12666,a[2]=t3,a[3]=t5,tmp=(C_word)a,a+=4,tmp));
+C_trace("compiler.scm: 1581 walk");
t10=((C_word*)t7)[1];
-f_12753(t10,t1,t2);}
+f_12666(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){
+/* walk in ##compiler#update-line-number-database! in k5089 in k5086 */
+static void C_fcall f_12666(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -14381,25 +14216,25 @@ 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);
+C_save_and_reclaim((void*)trf_12666,NULL,3,t0,t1,t2);}
+t3=C_i_not_pair_p(t2);
if(C_truep(t3)){
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
-t4=(C_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);}
+t4=C_i_car(t2);
+if(C_truep(C_i_symbolp(t4))){
+t5=C_i_car(t2);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12685,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=t2,tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1576 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[107]))(4,*((C_word*)lf[107]+1),t6,C_retrieve(lf[502]),t5);}
else{
-C_trace("compiler.scm: 1569 mapupdate");
+C_trace("compiler.scm: 1580 mapupdate");
t5=((C_word*)((C_word*)t0)[3])[1];
-f_12724(t5,t1,t2);}}}
+f_12637(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){
+/* k12683 in walk in ##compiler#update-line-number-database! in k5089 in k5086 */
+static void C_ccall f_12685(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14408,40 +14243,40 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_12685,2,t0,t1);}
t2=(C_truep(t1)?t1:C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12691,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_i_assq(((C_word*)t0)[6],t2))){
+t4=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1579 mapupdate");
t5=((C_word*)((C_word*)t0)[5])[1];
-f_12724(t5,((C_word*)t0)[4],t4);}
+f_12637(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);}}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12708,a[2]=((C_word*)t0)[3],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1578 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t4,((C_word*)t0)[6],((C_word*)t0)[2],t2);}}
-/* 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){
+/* k12706 in k12683 in walk in ##compiler#update-line-number-database! in k5089 in k5086 */
+static void C_ccall f_12708(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 1578 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[294]))(5,*((C_word*)lf[294]+1),((C_word*)t0)[3],C_retrieve(lf[502]),((C_word*)t0)[2],t1);}
-/* 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){
+/* k12689 in k12683 in walk in ##compiler#update-line-number-database! in k5089 in k5086 */
+static void C_ccall f_12691(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
-C_trace("compiler.scm: 1568 mapupdate");
+t2=C_i_cdr(((C_word*)t0)[4]);
+C_trace("compiler.scm: 1579 mapupdate");
t3=((C_word*)((C_word*)t0)[3])[1];
-f_12724(t3,((C_word*)t0)[2],t2);}
+f_12637(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){
+/* mapupdate in ##compiler#update-line-number-database! in k5089 in k5086 */
+static void C_fcall f_12637(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -14449,15 +14284,15 @@ 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);}
+C_save_and_reclaim((void*)trf_12637,NULL,3,t0,t1,t2);}
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12730,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12643,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
-f_12730(t6,t1,t2);}
+f_12643(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){
+/* loop in mapupdate in ##compiler#update-line-number-database! in k5089 in k5086 */
+static void C_fcall f_12643(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -14465,31 +14300,31 @@ 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");
+C_save_and_reclaim((void*)trf_12643,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12653,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=C_i_car(t2);
+C_trace("compiler.scm: 1570 walk");
t5=((C_word*)((C_word*)t0)[2])[1];
-f_12753(t5,t3,t4);}
+f_12666(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){
+/* k12651 in loop in mapupdate in ##compiler#update-line-number-database! in k5089 in k5086 */
+static void C_ccall f_12653(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
-C_trace("compiler.scm: 1560 loop");
+t2=C_i_cdr(((C_word*)t0)[4]);
+C_trace("compiler.scm: 1571 loop");
t3=((C_word*)((C_word*)t0)[3])[1];
-f_12730(t3,((C_word*)t0)[2],t2);}
+f_12643(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){
+/* ##compiler#expand-foreign-primitive in k5089 in k5086 */
+static void C_ccall f_12495(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -14499,20 +14334,20 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_12495,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12499,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=C_i_cddr(t2);
+if(C_truep(C_i_pairp(t4))){
+t5=C_i_caddr(t2);
+t6=C_i_stringp(t5);
t7=t3;
-f_12586(t7,(C_word)C_i_not(t6));}
+f_12499(t7,C_i_not(t6));}
else{
t5=t3;
-f_12586(t5,C_SCHEME_FALSE);}}
+f_12499(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){
+/* k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
+static void C_fcall f_12499(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14520,28 +14355,28 @@ 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);}
+C_save_and_reclaim((void*)trf_12499,NULL,2,t0,t1);}
+t2=(C_truep(t1)?C_i_cadr(((C_word*)t0)[3]):lf[501]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12505,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t2,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
+t4=(C_truep(t1)?C_i_caddr(((C_word*)t0)[3]):C_i_cadr(((C_word*)t0)[3]));
+C_trace("compiler.scm: 1555 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t3,t4);}
-/* 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){
+/* k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
+static void C_ccall f_12505(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_12505,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12508,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+t3=(C_truep(((C_word*)t0)[3])?C_i_cdddr(((C_word*)t0)[2]):C_i_cddr(((C_word*)t0)[2]));
+C_apply(4,0,t2,*((C_word*)lf[229]+1),t3);}
-/* 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){
+/* k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
+static void C_ccall f_12508(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14554,20 +14389,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_12508,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12511,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12645,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12558,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
-f_12645(t10,t6,((C_word*)t0)[2]);}
+f_12558(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){
+/* loop2538 in k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
+static void C_fcall f_12558(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -14576,12 +14411,12 @@ 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");
+C_save_and_reclaim((void*)trf_12558,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=*((C_word*)lf[500]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12587,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g25542555");
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -14589,8 +14424,8 @@ 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){
+/* k12585 in loop2538 in k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
+static void C_ccall f_12587(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14602,25 +14437,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_12587,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop25602573");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop25382551");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_12645(t6,((C_word*)t0)[3],t5);}
+f_12558(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop25602573");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop25382551");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_12645(t6,((C_word*)t0)[3],t5);}}
+f_12558(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){
+/* k12509 in k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
+static void C_ccall f_12511(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14631,18 +14466,18 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_12511,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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]);}
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12514,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12521,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1559 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t7,((C_word*)t0)[2]);}
-/* 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){
+/* k12519 in k12509 in k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
+static void C_ccall f_12521(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14650,15 +14485,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_12521,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12610,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12523,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_12610(t5,((C_word*)t0)[2],t1);}
+f_12523(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){
+/* loop2562 in k12519 in k12509 in k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
+static void C_fcall f_12523(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -14667,12 +14502,12 @@ 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");
+C_save_and_reclaim((void*)trf_12523,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=*((C_word*)lf[499]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12552,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g25782579");
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -14680,8 +14515,8 @@ 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){
+/* k12550 in loop2562 in k12519 in k12509 in k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
+static void C_ccall f_12552(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14693,33 +14528,33 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_12552,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop25842597");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop25622575");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_12610(t6,((C_word*)t0)[3],t5);}
+f_12523(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop25842597");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop25622575");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_12610(t6,((C_word*)t0)[3],t5);}}
+f_12523(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){
+/* k12512 in k12509 in k12506 in k12503 in k12497 in ##compiler#expand-foreign-primitive in k5089 in k5086 */
+static void C_ccall f_12514(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 1560 create-foreign-stub");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[489]+1)))(9,*((C_word*)lf[489]+1),((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_FALSE,((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_FALSE,C_SCHEME_TRUE);}
-/* ##compiler#expand-foreign-lambda* in k5138 in k5135 */
-static void C_ccall f_12483(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
+/* ##compiler#expand-foreign-lambda* in k5089 in k5086 */
+static void C_ccall f_12396(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -14729,15 +14564,15 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_12396,4,t0,t1,t2,t3);}
+t4=C_i_cadr(t2);
+t5=C_i_caddr(t2);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12406,a[2]=t5,a[3]=t3,a[4]=t4,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t7=C_i_cdddr(t2);
+C_apply(4,0,t6,*((C_word*)lf[229]+1),t7);}
-/* 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){
+/* k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
+static void C_ccall f_12406(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14750,20 +14585,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_12406,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12409,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12543,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12456,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
-f_12543(t10,t6,((C_word*)t0)[2]);}
+f_12456(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){
+/* loop2481 in k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
+static void C_fcall f_12456(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -14772,12 +14607,12 @@ 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");
+C_save_and_reclaim((void*)trf_12456,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=*((C_word*)lf[500]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12485,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g24972498");
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -14785,8 +14620,8 @@ 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){
+/* k12483 in loop2481 in k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
+static void C_ccall f_12485(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14798,25 +14633,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_12485,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop25032516");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop24812494");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_12543(t6,((C_word*)t0)[3],t5);}
+f_12456(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop25032516");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop24812494");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_12543(t6,((C_word*)t0)[3],t5);}}
+f_12456(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){
+/* k12407 in k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
+static void C_ccall f_12409(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14827,18 +14662,18 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_12409,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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]);}
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12412,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12419,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1548 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t7,((C_word*)t0)[2]);}
-/* 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){
+/* k12417 in k12407 in k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
+static void C_ccall f_12419(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14846,15 +14681,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_12419,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12508,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12421,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_12508(t5,((C_word*)t0)[2],t1);}
+f_12421(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){
+/* loop2505 in k12417 in k12407 in k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
+static void C_fcall f_12421(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -14863,12 +14698,12 @@ 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");
+C_save_and_reclaim((void*)trf_12421,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=*((C_word*)lf[499]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12450,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g25212522");
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -14876,8 +14711,8 @@ 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){
+/* k12448 in loop2505 in k12417 in k12407 in k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
+static void C_ccall f_12450(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14889,33 +14724,33 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_12450,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop25272540");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop25052518");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_12508(t6,((C_word*)t0)[3],t5);}
+f_12421(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop25272540");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop25052518");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_12508(t6,((C_word*)t0)[3],t5);}}
+f_12421(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){
+/* k12410 in k12407 in k12404 in ##compiler#expand-foreign-lambda* in k5089 in k5086 */
+static void C_ccall f_12412(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1549 create-foreign-stub");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[489]+1)))(9,*((C_word*)lf[489]+1),((C_word*)t0)[6],((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2],((C_word*)t0)[2]);}
-/* ##compiler#expand-foreign-lambda in k5138 in k5135 */
-static void C_ccall f_12446(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
+/* ##compiler#expand-foreign-lambda in k5089 in k5086 */
+static void C_ccall f_12359(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -14924,68 +14759,68 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_12359,4,t0,t1,t2,t3);}
+t4=C_i_caddr(t2);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12366,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_i_symbolp(t4))){
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12385,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1535 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t6,t4);}
else{
-if(C_truep((C_word)C_i_stringp(t4))){
+if(C_truep(C_i_stringp(t4))){
t6=t5;
-f_12453(2,t6,t4);}
+f_12366(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);}}}
+C_trace("compiler.scm: 1537 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[313]))(4,*((C_word*)lf[313]+1),t5,lf[498],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){
+/* k12383 in ##compiler#expand-foreign-lambda in k5089 in k5086 */
+static void C_ccall f_12385(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1524 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[233]+1)))(3,*((C_word*)lf[233]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 1535 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k12364 in ##compiler#expand-foreign-lambda in k5089 in k5086 */
+static void C_ccall f_12366(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_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]);}
+t2=C_i_cadr(((C_word*)t0)[4]);
+t3=C_i_cdddr(((C_word*)t0)[4]);
+C_trace("compiler.scm: 1540 create-foreign-stub");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[489]+1)))(9,*((C_word*)lf[489]+1),((C_word*)t0)[3],t2,t1,t3,C_SCHEME_FALSE,C_SCHEME_FALSE,((C_word*)t0)[2],((C_word*)t0)[2]);}
-/* ##compiler#create-foreign-stub in 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){
+/* ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12108(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8){
C_word tmp;
C_word t9;
C_word t10;
C_word ab[9],*a=ab;
if(c!=9) C_bad_argc_2(c,9,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr9,(void*)f_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);}
+C_save_and_reclaim((void*)tr9,(void*)f_12108,9,t0,t1,t2,t3,t4,t5,t6,t7,t8);}
+t9=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12112,a[2]=t4,a[3]=t1,a[4]=t7,a[5]=t8,a[6]=t6,a[7]=t5,a[8]=t3,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 1506 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t9,t2);}
-/* 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){
+/* k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12112(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_12112,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12115,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 1507 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12115(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14993,74 +14828,88 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_12115,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_12118,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+t3=C_i_length(t1);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12353,tmp=(C_word)a,a+=2,tmp);
+C_trace("compiler.scm: 1508 list-tabulate");
+((C_proc4)C_retrieve_symbol_proc(lf[497]))(4,*((C_word*)lf[497]+1),t2,t3,t4);}
-/* 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){
+/* a12352 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12353(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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]);}
+C_save_and_reclaim((void*)tr3,(void*)f_12353,3,t0,t1,t2);}
+C_trace("compiler.scm: 1508 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t1,lf[496]);}
-/* 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){
+/* k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12118(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_12118,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_12121,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+C_trace("compiler.scm: 1509 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,lf[495]);}
-/* 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){
+/* k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12121(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_12121,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12124,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=t1,tmp=(C_word)a,a+=12,tmp);
+C_trace("compiler.scm: 1510 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t2);}
-/* 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){
+/* k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12124(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[13],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_12124,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_12127,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
+C_trace("compiler.scm: 1511 estimate-foreign-result-size");
+((C_proc3)C_retrieve_symbol_proc(lf[494]))(3,*((C_word*)lf[494]+1),t2,((C_word*)t0)[10]);}
-/* 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){
+/* k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12127(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[14],*a=ab;
+C_word t4;
+C_word ab[18],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_12127,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_12130,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
+if(C_truep(((C_word*)t0)[10])){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12347,a[2]=((C_word*)t0)[12],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1512 string->symbol");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[493]+1)))(3,*((C_word*)lf[493]+1),t3,((C_word*)t0)[10]);}
+else{
+t3=t2;
+f_12130(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k12345 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12347(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1512 set-real-name!");
+((C_proc4)C_retrieve_symbol_proc(lf[97]))(4,*((C_word*)lf[97]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12130(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15081,7 +14930,7 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_12130,2,t0,t1);}
t2=((C_word*)t0)[13];
t3=((C_word*)t0)[12];
t4=((C_word*)t0)[11];
@@ -15090,23 +14939,23 @@ 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);
+t10=C_a_i_record(&a,9,lf[479],t2,t3,t4,t5,t6,t7,t8,t9);
+t11=C_a_i_cons(&a,2,t10,*((C_word*)lf[65]+1));
+t12=C_mutate((C_word*)lf[65]+1 /* (set! foreign-lambda-stubs ...) */,t11);
+t13=(C_truep(((C_word*)t0)[6])?C_fixnum_plus(((C_word*)t0)[5],C_fix(24)):((C_word*)t0)[5]);
+t14=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12140,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[12],a[5]=t13,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[3],a[8]=((C_word*)t0)[4],tmp=(C_word)a,a+=9,tmp);
if(C_truep(((C_word*)t0)[7])){
-t15=(C_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);
+t15=C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
+t16=C_a_i_cons(&a,2,lf[106],t15);
t17=t14;
-f_12234(t17,(C_word)C_a_i_cons(&a,2,t16,C_SCHEME_END_OF_LIST));}
+f_12140(t17,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);
+t15=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));}}
+f_12140(t16,C_a_i_cons(&a,2,lf[270],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){
+/* k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_fcall f_12140(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15119,20 +14968,20 @@ 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);}
+C_save_and_reclaim((void*)trf_12140,NULL,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12143,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12353,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12259,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
-f_12353(t10,t6,((C_word*)t0)[8],((C_word*)t0)[2]);}
+f_12259(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){
+/* loop2418 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_fcall f_12259(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -15144,31 +14993,31 @@ 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);
+C_save_and_reclaim((void*)trf_12259,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);}
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12301,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+t7=C_slot(t2,C_fix(0));
+t8=C_slot(t3,C_fix(0));
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12298,a[2]=t8,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1520 foreign-type-convert-argument");
+((C_proc4)C_retrieve_symbol_proc(lf[253]))(4,*((C_word*)lf[253]+1),t9,t7,t8);}
else{
t6=((C_word*)((C_word*)t0)[2])[1];
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-/* 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){
+/* k12296 in loop2418 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12298(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1520 foreign-type-check");
+((C_proc4)C_retrieve_symbol_proc(lf[252]))(4,*((C_word*)lf[252]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k12299 in loop2418 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12301(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15176,19 +15025,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_12301,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12272,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
t4=t3;
-f_12366(t4,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
+f_12272(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
else{
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=t3;
-f_12366(t5,t4);}}
+f_12272(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){
+/* k12270 in k12299 in loop2418 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_fcall f_12272(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15196,14 +15045,14 @@ 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");
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+C_trace("loop24182432");
t5=((C_word*)((C_word*)t0)[3])[1];
-f_12353(t5,((C_word*)t0)[2],t3,t4);}
+f_12259(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){
+/* k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12143(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15215,35 +15064,35 @@ 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));
+C_save_and_reclaim((void*)tr2,(void*)f_12143,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12154,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],tmp=(C_word)a,a+=4,tmp);
+t3=(C_truep(((C_word*)t0)[6])?lf[490]:C_SCHEME_END_OF_LIST);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12166,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t5=C_eqp(((C_word*)t0)[5],C_fix(0));
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);}
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12176,a[2]=((C_word*)t0)[4],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+t7=C_a_i_cons(&a,2,lf[491],t1);
+C_trace("compiler.scm: 1525 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t6,((C_word*)t0)[3],t7);}
else{
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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]);}}
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12183,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=t3,a[7]=t2,a[8]=((C_word*)t0)[2],tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 1526 final-foreign-type");
+((C_proc3)C_retrieve_symbol_proc(lf[103]))(3,*((C_word*)lf[103]+1),t6,((C_word*)t0)[4]);}}
-/* 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){
+/* k12181 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12183(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_12183,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12186,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 1527 words");
+((C_proc3)C_retrieve_symbol_proc(lf[303]))(3,*((C_word*)lf[303]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k12184 in k12181 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12186(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15263,43 +15112,43 @@ 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_save_and_reclaim((void*)tr2,(void*)f_12186,2,t0,t1);}
+t2=C_fixnum_plus(C_fix(2),t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,lf[492],t3);
+t5=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,lf[98],t5);
+t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,t4,t7);
+t9=C_a_i_cons(&a,2,lf[271],t8);
+t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
+t11=C_a_i_cons(&a,2,((C_word*)t0)[8],t10);
+t12=C_a_i_cons(&a,2,t11,C_SCHEME_END_OF_LIST);
+t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12205,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t12,tmp=(C_word)a,a+=5,tmp);
+t14=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12209,a[2]=((C_word*)t0)[5],a[3]=t13,tmp=(C_word)a,a+=4,tmp);
+t15=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12213,a[2]=((C_word*)t0)[4],a[3]=t14,tmp=(C_word)a,a+=4,tmp);
+t16=C_a_i_cons(&a,2,((C_word*)t0)[8],((C_word*)t0)[3]);
+C_trace("compiler.scm: 1530 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t15,((C_word*)t0)[2],t16);}
+
+/* k12211 in k12184 in k12181 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12213(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1530 finish-foreign-result");
+((C_proc4)C_retrieve_symbol_proc(lf[102]))(4,*((C_word*)lf[102]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k12207 in k12184 in k12181 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12209(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1529 foreign-type-convert-result");
+((C_proc4)C_retrieve_symbol_proc(lf[101]))(4,*((C_word*)lf[101]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k12203 in k12184 in k12181 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12205(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15308,176 +15157,176 @@ 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_save_and_reclaim((void*)tr2,(void*)f_12205,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
+t4=C_a_i_cons(&a,2,lf[158],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
C_trace("##sys#append");
-t6=*((C_word*)lf[168]+1);
+t6=*((C_word*)lf[167]+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){
+/* k12174 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12176(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1525 foreign-type-convert-result");
+((C_proc4)C_retrieve_symbol_proc(lf[101]))(4,*((C_word*)lf[101]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k12164 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12166(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12260,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+C_save_and_reclaim((void*)tr2,(void*)f_12166,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
C_trace("##sys#append");
-t3=*((C_word*)lf[168]+1);
+t3=*((C_word*)lf[167]+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){
+/* k12152 in k12141 in k12138 in k12128 in k12125 in k12122 in k12119 in k12116 in k12113 in k12110 in ##compiler#create-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12154(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_12248,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_12154,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,lf[172],t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,lf[171],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){
+/* foreign-stub-callback in k5089 in k5086 */
+static void C_ccall f_12099(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12193,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[488]);
+C_save_and_reclaim((void*)tr3,(void*)f_12099,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[479]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(8)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* foreign-stub-cps in k5089 in k5086 */
+static void C_ccall f_12090(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12184,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[488]);
+C_save_and_reclaim((void*)tr3,(void*)f_12090,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[479]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(7)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* foreign-stub-body in k5089 in k5086 */
+static void C_ccall f_12081(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12175,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[488]);
+C_save_and_reclaim((void*)tr3,(void*)f_12081,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[479]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(6)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* foreign-stub-argument-names in k5089 in k5086 */
+static void C_ccall f_12072(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12166,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[488]);
+C_save_and_reclaim((void*)tr3,(void*)f_12072,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[479]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(5)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* foreign-stub-argument-types in k5089 in k5086 */
+static void C_ccall f_12063(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12157,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[488]);
+C_save_and_reclaim((void*)tr3,(void*)f_12063,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[479]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(4)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* foreign-stub-name in k5089 in k5086 */
+static void C_ccall f_12054(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12148,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[488]);
+C_save_and_reclaim((void*)tr3,(void*)f_12054,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[479]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(3)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* foreign-stub-return-type in k5089 in k5086 */
+static void C_ccall f_12045(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12139,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[488]);
+C_save_and_reclaim((void*)tr3,(void*)f_12045,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[479]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(2)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* foreign-stub-id in k5089 in k5086 */
+static void C_ccall f_12036(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12130,3,t0,t1,t2);}
-t3=(C_word)C_i_check_structure(t2,lf[488]);
+C_save_and_reclaim((void*)tr3,(void*)f_12036,3,t0,t1,t2);}
+t3=C_i_check_structure(t2,lf[479]);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(1)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,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){
+/* foreign-stub? in k5089 in k5086 */
+static void C_ccall f_12030(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_12124,3,t0,t1,t2);}
+C_save_and_reclaim((void*)tr3,(void*)f_12030,3,t0,t1,t2);}
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_structurep(t2,lf[488]));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_structurep(t2,lf[479]));}
-/* 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){
+/* make-foreign-stub in k5089 in k5086 */
+static void C_ccall f_12024(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9){
C_word tmp;
C_word t10;
C_word ab[10],*a=ab;
if(c!=10) C_bad_argc_2(c,10,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr10,(void*)f_12118,10,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9);}
+C_save_and_reclaim((void*)tr10,(void*)f_12024,10,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9);}
t10=t1;
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_record(&a,9,lf[488],t2,t3,t4,t5,t6,t7,t8,t9));}
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_a_i_record(&a,9,lf[479],t2,t3,t4,t5,t6,t7,t8,t9));}
-/* ##compiler#process-declaration in k5138 in k5135 */
-static void C_ccall f_10418(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
+/* ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10414(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -15496,7 +15345,7 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_10414,4,t0,t1,t2,t3);}
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_UNDEFINED;
@@ -15505,46 +15354,46 @@ 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);
+t12=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10417,tmp=(C_word)a,a+=2,tmp));
+t13=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10465,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t14=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10471,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t15=C_set_block_item(t11,0,C_retrieve(lf[127]));
+t16=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10481,a[2]=t9,a[3]=t7,a[4]=t5,a[5]=t11,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
t17=t16;
-f_10485(t17,t1);}
+f_10481(t17,t1);}
-/* a10484 in ##compiler#process-declaration in k5138 in k5135 */
-static void C_fcall f_10485(C_word t0,C_word t1){
+/* a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_fcall f_10481(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]))){
+C_save_and_reclaim((void*)trf_10481,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10485,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+if(C_truep(C_i_pairp(((C_word*)t0)[6]))){
t3=t2;
-f_10489(2,t3,C_SCHEME_UNDEFINED);}
+f_10485(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]);}}
+C_trace("compiler.scm: 1286 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),t2,lf[477],((C_word*)t0)[6]);}}
-/* 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){
+/* k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10485(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10485,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10488,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+t3=C_i_car(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1288 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t2,t3);}
-/* 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){
+/* k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10488(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -15687,393 +15536,357 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_10488,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10491,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t3=C_eqp(t1,lf[358]);
if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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");
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10497,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t5=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1290 stripu");
t6=((C_word*)((C_word*)t0)[5])[1];
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
-t4=(C_word)C_eqp(t1,lf[367]);
+t4=C_eqp(t1,lf[365]);
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)));}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10582,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1300 check-decl");
+f_10417(t5,((C_word*)t0)[6],C_fix(1),C_a_i_list(&a,1,C_fix(1)));}
else{
-t5=(C_word)C_eqp(t1,lf[8]);
+t5=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]));
+t6=C_i_cdr(((C_word*)t0)[6]);
+if(C_truep(C_i_nullp(t6))){
+t7=C_mutate((C_word*)lf[8]+1 /* (set! standard-bindings ...) */,C_retrieve(lf[370]));
t8=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[373]);}
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[371]);}
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");
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10630,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10634,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
+t9=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1309 stripa");
t10=((C_word*)((C_word*)t0)[3])[1];
-f_10469(t10,t8,t9);}}
+f_10465(t10,t8,t9);}}
else{
-t6=(C_word)C_eqp(t1,lf[9]);
+t6=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]));
+t7=C_i_cdr(((C_word*)t0)[6]);
+if(C_truep(C_i_nullp(t7))){
+t8=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,C_retrieve(lf[373]));
t9=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,lf[376]);}
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,lf[374]);}
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");
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10659,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10663,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
+t10=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1313 stripa");
t11=((C_word*)((C_word*)t0)[3])[1];
-f_10469(t11,t9,t10);}}
+f_10465(t11,t9,t10);}}
else{
-t7=(C_word)C_eqp(t1,lf[378]);
+t7=C_eqp(t1,lf[376]);
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]));
+t8=C_i_cdr(((C_word*)t0)[6]);
+if(C_truep(C_i_nullp(t8))){
+t9=C_mutate((C_word*)lf[8]+1 /* (set! standard-bindings ...) */,C_retrieve(lf[370]));
+t10=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,C_retrieve(lf[373]));
t11=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,lf[379]);}
+((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,lf[377]);}
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");
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10688,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t10=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1319 stripa");
t11=((C_word*)((C_word*)t0)[3])[1];
-f_10469(t11,t9,t10);}}
+f_10465(t11,t9,t10);}}
else{
-t8=(C_word)C_eqp(t1,lf[6]);
+t8=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)));}
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10713,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1323 check-decl");
+f_10417(t9,((C_word*)t0)[6],C_fix(1),C_a_i_list(&a,1,C_fix(1)));}
else{
-t9=(C_word)C_eqp(t1,lf[383]);
-t10=(C_truep(t9)?t9:(C_word)C_eqp(t1,lf[384]));
+t9=C_eqp(t1,lf[381]);
+t10=(C_truep(t9)?t9:C_eqp(t1,lf[382]));
if(C_truep(t10)){
-t11=C_mutate((C_word*)lf[6]+1 /* (set! number-type ...) */,lf[383]);
+t11=C_mutate((C_word*)lf[6]+1 /* (set! number-type ...) */,lf[381]);
t12=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[385]);}
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[383]);}
else{
-t11=(C_word)C_eqp(t1,lf[7]);
+t11=C_eqp(t1,lf[7]);
if(C_truep(t11)){
t12=C_mutate((C_word*)lf[6]+1 /* (set! number-type ...) */,lf[7]);
t13=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,lf[386]);}
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,lf[384]);}
else{
-t12=(C_word)C_eqp(t1,lf[12]);
+t12=C_eqp(t1,lf[12]);
if(C_truep(t12)){
t13=C_set_block_item(lf[12] /* unsafe */,0,C_SCHEME_TRUE);
t14=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,lf[387]);}
+((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,lf[385]);}
else{
-t13=(C_word)C_eqp(t1,lf[388]);
+t13=C_eqp(t1,lf[386]);
if(C_truep(t13)){
t14=C_set_block_item(lf[12] /* unsafe */,0,C_SCHEME_FALSE);
t15=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,lf[389]);}
+((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,lf[387]);}
else{
-t14=(C_word)C_eqp(t1,lf[390]);
+t14=C_eqp(t1,lf[388]);
if(C_truep(t14)){
t15=C_set_block_item(lf[22] /* no-bound-checks */,0,C_SCHEME_TRUE);
t16=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,lf[391]);}
+((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,lf[389]);}
else{
-t15=(C_word)C_eqp(t1,lf[392]);
+t15=C_eqp(t1,lf[390]);
if(C_truep(t15)){
t16=C_set_block_item(lf[23] /* no-argc-checks */,0,C_SCHEME_TRUE);
t17=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t17+1)))(2,t17,lf[393]);}
+((C_proc2)(void*)(*((C_word*)t17+1)))(2,t17,lf[391]);}
else{
-t16=(C_word)C_eqp(t1,lf[394]);
+t16=C_eqp(t1,lf[392]);
if(C_truep(t16)){
t17=C_set_block_item(lf[24] /* no-procedure-checks */,0,C_SCHEME_TRUE);
t18=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t18+1)))(2,t18,lf[395]);}
+((C_proc2)(void*)(*((C_word*)t18+1)))(2,t18,lf[393]);}
else{
-t17=(C_word)C_eqp(t1,lf[396]);
+t17=C_eqp(t1,lf[394]);
if(C_truep(t17)){
t18=C_set_block_item(lf[10] /* insert-timer-checks */,0,C_SCHEME_TRUE);
t19=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t19+1)))(2,t19,lf[397]);}
+((C_proc2)(void*)(*((C_word*)t19+1)))(2,t19,lf[395]);}
else{
-t18=(C_word)C_eqp(t1,lf[398]);
+t18=C_eqp(t1,lf[396]);
if(C_truep(t18)){
t19=C_set_block_item(lf[10] /* insert-timer-checks */,0,C_SCHEME_FALSE);
t20=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t20+1)))(2,t20,lf[399]);}
+((C_proc2)(void*)(*((C_word*)t20+1)))(2,t20,lf[397]);}
else{
-t19=(C_word)C_eqp(t1,lf[400]);
+t19=C_eqp(t1,lf[398]);
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");
+t20=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10797,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t21=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10801,a[2]=t20,tmp=(C_word)a,a+=3,tmp);
+t22=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1336 strip");
t23=((C_word*)((C_word*)t0)[2])[1];
-f_10475(t23,t21,t22);}
+f_10471(t23,t21,t22);}
else{
-t20=(C_word)C_eqp(t1,lf[403]);
+t20=C_eqp(t1,lf[401]);
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");
+t21=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10816,tmp=(C_word)a,a+=2,tmp);
+t22=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10851,a[2]=t21,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t23=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1338 stripa");
t24=((C_word*)((C_word*)t0)[3])[1];
-f_10469(t24,t22,t23);}
+f_10465(t24,t22,t23);}
else{
-t21=(C_word)C_eqp(t1,lf[405]);
+t21=C_eqp(t1,lf[403]);
if(C_truep(t21)){
t22=C_set_block_item(lf[26] /* safe-globals-flag */,0,C_SCHEME_TRUE);
t23=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t23+1)))(2,t23,lf[406]);}
+((C_proc2)(void*)(*((C_word*)t23+1)))(2,t23,lf[404]);}
else{
-t22=(C_word)C_eqp(t1,lf[407]);
+t22=C_eqp(t1,lf[405]);
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]));}
+t23=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10871,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t24=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10913,tmp=(C_word)a,a+=2,tmp);
+t25=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10948,a[2]=t24,a[3]=t23,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1343 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t25,C_retrieve(lf[370]),C_retrieve(lf[373]));}
else{
-t23=(C_word)C_eqp(t1,lf[408]);
+t23=C_eqp(t1,lf[406]);
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");
+t24=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10957,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t25=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1348 stripa");
t26=((C_word*)((C_word*)t0)[3])[1];
-f_10469(t26,t24,t25);}
+f_10465(t26,t24,t25);}
else{
-t24=(C_word)C_eqp(t1,lf[409]);
+t24=C_eqp(t1,lf[407]);
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);}
+t25=C_i_cdr(((C_word*)t0)[6]);
+t26=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11048,a[2]=((C_word*)t0)[6],a[3]=t2,a[4]=t25,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1353 every");
+((C_proc4)C_retrieve_symbol_proc(lf[411]))(4,*((C_word*)lf[411]+1),t26,*((C_word*)lf[412]+1),t25);}
else{
-t25=(C_word)C_eqp(t1,lf[414]);
+t25=C_eqp(t1,lf[413]);
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]);
+t26=C_set_block_item(lf[15] /* block-compilation */,0,C_SCHEME_TRUE);
+t27=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t27+1)))(2,t27,lf[414]);}
+else{
+t26=C_eqp(t1,lf[415]);
if(C_truep(t26)){
-t27=(*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]);
+t27=C_set_block_item(lf[15] /* block-compilation */,0,C_SCHEME_FALSE);
+t28=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t28+1)))(2,t28,lf[416]);}
+else{
+t27=C_eqp(t1,lf[417]);
if(C_truep(t27)){
-t28=(*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));}
+t28=C_set_block_item(lf[35] /* undefine-shadowed-macros */,0,C_SCHEME_FALSE);
+t29=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t29+1)))(2,t29,lf[418]);}
else{
-t28=(C_word)C_eqp(t1,lf[421]);
+t28=C_eqp(t1,lf[419]);
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]);
+t29=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11087,tmp=(C_word)a,a+=2,tmp);
+t30=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11122,a[2]=t29,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t31=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1360 stripa");
+t32=((C_word*)((C_word*)t0)[3])[1];
+f_10465(t32,t30,t31);}
+else{
+t29=C_eqp(t1,lf[421]);
if(C_truep(t29)){
-t30=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]);}
+t30=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11135,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 1362 check-decl");
+f_10417(t30,((C_word*)t0)[6],C_fix(1),C_SCHEME_END_OF_LIST);}
else{
-t30=(C_word)C_eqp(t1,lf[425]);
+t30=C_eqp(t1,lf[439]);
if(C_truep(t30)){
-t31=C_set_block_item(lf[35] /* undefine-shadowed-macros */,0,C_SCHEME_FALSE);
+t31=C_set_block_item(lf[191] /* enable-runtime-macros */,0,C_SCHEME_TRUE);
t32=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t32+1)))(2,t32,lf[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);}
+((C_proc2)(void*)(*((C_word*)t32+1)))(2,t32,lf[440]);}
else{
-t32=(C_word)C_eqp(t1,lf[429]);
+t31=C_eqp(t1,lf[441]);
+t32=(C_truep(t31)?t31:C_eqp(t1,lf[442]));
if(C_truep(t32)){
-t33=(*a=C_CLOSURE_TYPE|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);}
+t33=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11402,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+t34=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1407 stripa");
+t35=((C_word*)((C_word*)t0)[3])[1];
+f_10465(t35,t33,t34);}
else{
-t33=(C_word)C_eqp(t1,lf[447]);
-t34=(C_truep(t33)?t33:(C_word)C_eqp(t1,lf[448]));
+t33=C_eqp(t1,lf[444]);
+if(C_truep(t33)){
+t34=C_set_block_item(lf[15] /* block-compilation */,0,C_SCHEME_TRUE);
+t35=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11449,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t36=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1413 stripa");
+t37=((C_word*)((C_word*)t0)[3])[1];
+f_10465(t37,t35,t36);}
+else{
+t34=C_eqp(t1,lf[446]);
if(C_truep(t34)){
-t35=C_set_block_item(lf[193] /* enable-runtime-macros */,0,C_SCHEME_TRUE);
+t35=C_set_block_item(lf[31] /* external-protos-first */,0,C_SCHEME_TRUE);
t36=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t36+1)))(2,t36,lf[449]);}
+((C_proc2)(void*)(*((C_word*)t36+1)))(2,t36,lf[447]);}
+else{
+t35=C_eqp(t1,lf[448]);
+if(C_truep(t35)){
+t36=C_set_block_item(lf[32] /* do-lambda-lifting */,0,C_SCHEME_TRUE);
+t37=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t37+1)))(2,t37,lf[449]);}
else{
-t35=(C_word)C_eqp(t1,lf[450]);
-t36=(C_truep(t35)?t35:(C_word)C_eqp(t1,lf[451]));
+t36=C_eqp(t1,lf[427]);
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);}
+t37=C_i_cdr(((C_word*)t0)[6]);
+if(C_truep(C_i_nullp(t37))){
+t38=C_set_block_item(lf[43] /* inline-locally */,0,C_SCHEME_TRUE);
+t39=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t39+1)))(2,t39,lf[450]);}
+else{
+t38=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11511,tmp=(C_word)a,a+=2,tmp);
+t39=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11546,a[2]=t38,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t40=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1423 stripa");
+t41=((C_word*)((C_word*)t0)[3])[1];
+f_10465(t41,t39,t40);}}
else{
-t37=(C_word)C_eqp(t1,lf[453]);
+t37=C_eqp(t1,lf[452]);
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);}
+t38=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11563,a[2]=t2,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1425 check-decl");
+f_10417(t38,((C_word*)t0)[6],C_fix(1),C_a_i_list(&a,1,C_fix(1)));}
else{
-t38=(C_word)C_eqp(t1,lf[455]);
+t38=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]);}
+t39=C_i_cdr(((C_word*)t0)[6]);
+t40=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11591,a[2]=((C_word*)t0)[6],a[3]=t2,a[4]=t39,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1434 every");
+((C_proc4)C_retrieve_symbol_proc(lf[411]))(4,*((C_word*)lf[411]+1),t40,*((C_word*)lf[458]+1),t39);}
else{
-t39=(C_word)C_eqp(t1,lf[457]);
+t39=C_eqp(t1,lf[459]);
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]);
+t40=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11608,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t41=C_SCHEME_END_OF_LIST;
+t42=(*a=C_VECTOR_TYPE|1,a[1]=t41,tmp=(C_word)a,a+=2,tmp);
+t43=C_SCHEME_FALSE;
+t44=(*a=C_VECTOR_TYPE|1,a[1]=t43,tmp=(C_word)a,a+=2,tmp);
+t45=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11612,a[2]=t40,tmp=(C_word)a,a+=3,tmp);
+t46=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11616,a[2]=t45,a[3]=t42,a[4]=t44,tmp=(C_word)a,a+=5,tmp);
+t47=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1451 strip");
+t48=((C_word*)((C_word*)t0)[2])[1];
+f_10471(t48,t46,t47);}
+else{
+t40=C_eqp(t1,lf[463]);
if(C_truep(t40)){
-t41=(C_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]);
+t41=C_set_block_item(lf[21] /* emit-profile */,0,C_SCHEME_TRUE);
+t42=C_i_cdr(((C_word*)t0)[6]);
+if(C_truep(C_i_nullp(t42))){
+t43=C_mutate((C_word*)lf[37]+1 /* (set! profiled-procedures ...) */,lf[176]);
+t44=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t44+1)))(2,t44,lf[464]);}
+else{
+t43=C_mutate((C_word*)lf[465]+1 /* (set! profiled-propcedures ...) */,lf[177]);
+t44=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11744,tmp=(C_word)a,a+=2,tmp);
+t45=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11779,a[2]=t44,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t46=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1460 stripa");
+t47=((C_word*)((C_word*)t0)[3])[1];
+f_10465(t47,t45,t46);}}
+else{
+t41=C_eqp(t1,lf[466]);
if(C_truep(t41)){
-t42=(*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]);
+t42=C_i_cdr(((C_word*)t0)[6]);
+if(C_truep(C_i_nullp(t42))){
+t43=C_set_block_item(lf[41] /* local-definitions */,0,C_SCHEME_TRUE);
+t44=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t44+1)))(2,t44,lf[467]);}
+else{
+t43=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11805,tmp=(C_word)a,a+=2,tmp);
+t44=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11840,a[2]=t43,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t45=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1467 stripa");
+t46=((C_word*)((C_word*)t0)[3])[1];
+f_10465(t46,t44,t45);}}
+else{
+t42=C_eqp(t1,lf[433]);
if(C_truep(t42)){
-t43=(C_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]);
+t43=C_set_block_item(lf[46] /* enable-inline-files */,0,C_SCHEME_TRUE);
+t44=C_set_block_item(lf[43] /* inline-locally */,0,C_SCHEME_TRUE);
+t45=C_i_cdr(((C_word*)t0)[6]);
+if(C_truep(C_i_nullp(t45))){
+t46=C_set_block_item(lf[42] /* inline-globally */,0,C_SCHEME_TRUE);
+t47=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t47+1)))(2,t47,lf[469]);}
+else{
+t46=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11868,tmp=(C_word)a,a+=2,tmp);
+t47=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11903,a[2]=t46,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t48=C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1475 stripa");
+t49=((C_word*)((C_word*)t0)[3])[1];
+f_10465(t49,t47,t48);}}
+else{
+t43=C_eqp(t1,lf[470]);
if(C_truep(t43)){
-t44=(*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;
+t44=C_i_cdr(((C_word*)t0)[6]);
+t45=C_SCHEME_UNDEFINED;
t46=(*a=C_VECTOR_TYPE|1,a[1]=t45,tmp=(C_word)a,a+=2,tmp);
-t47=C_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]);}
+t47=C_set_block_item(t46,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11926,a[2]=t46,tmp=(C_word)a,a+=3,tmp));
+t48=((C_word*)t46)[1];
+f_11926(t48,t2,t44);}
else{
-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]);}
+t44=C_eqp(t1,lf[474]);
+if(C_truep(t44)){
+t45=C_set_block_item(lf[45] /* do-scrutinize */,0,C_SCHEME_TRUE);
+t46=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t46+1)))(2,t46,lf[475]);}
else{
-C_trace("compiler.scm: 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]);}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+C_trace("compiler.scm: 1487 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t2,lf[240],lf[476],((C_word*)t0)[6]);}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
-/* 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){
+/* loop2315 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_fcall f_11926(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -16084,30 +15897,30 @@ 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);
+C_save_and_reclaim((void*)trf_11926,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11985,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11941,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_listp(t4))){
+t6=C_i_car(t4);
+if(C_truep(C_i_symbolp(t6))){
+t7=C_i_length(t4);
t8=t5;
-f_12032(t8,(C_word)C_eqp(C_fix(2),t7));}
+f_11941(t8,C_eqp(C_fix(2),t7));}
else{
t7=t5;
-f_12032(t7,C_SCHEME_FALSE);}}
+f_11941(t7,C_SCHEME_FALSE);}}
else{
t6=t5;
-f_12032(t6,C_SCHEME_FALSE);}}
+f_11941(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){
+/* k11939 in loop2315 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_fcall f_11941(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -16115,48 +15928,48 @@ 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);}
+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_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);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11944,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_car(((C_word*)t0)[3]);
+t4=C_i_cadr(((C_word*)t0)[3]);
+C_trace("compiler.scm: 1480 ##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[472],t4);}
else{
-C_trace("compiler.scm: 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]);}}
+C_trace("compiler.scm: 1483 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[240],lf[473],((C_word*)t0)[3]);}}
-/* 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){
+/* k11942 in k11939 in loop2315 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11944(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_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);}
+t2=C_i_car(((C_word*)t0)[3]);
+C_trace("compiler.scm: 1481 ##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[2],t2,lf[471],C_SCHEME_TRUE);}
-/* 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){
+/* k11983 in loop2315 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11985(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_11926(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){
+/* k11901 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11903(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("for-each");
-t2=*((C_word*)lf[404]+1);
+t2=*((C_word*)lf[402]+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){
+/* a11867 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11868(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -16166,42 +15979,42 @@ 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_save_and_reclaim((void*)tr3,(void*)f_11868,3,t0,t1,t2);}
+t3=C_a_i_list(&a,1,lf[451]);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11874,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t3))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[443],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[435],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);
+t5=C_i_cdr(t3);
+if(C_truep(C_i_nullp(t5))){
+t6=C_i_car(t3);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[443],t6);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[435],t6);}
else{
C_trace("##sys#error");
-t6=*((C_word*)lf[135]+1);
+t6=*((C_word*)lf[134]+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){
+/* k11872 in a11867 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11874(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[443],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[435],t1);}
-/* 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){
+/* k11838 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11840(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("for-each");
-t2=*((C_word*)lf[404]+1);
+t2=*((C_word*)lf[402]+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){
+/* a11804 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11805(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -16211,42 +16024,42 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_11805,3,t0,t1,t2);}
t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11902,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11811,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t3))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[477],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[468],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);
+t5=C_i_cdr(t3);
+if(C_truep(C_i_nullp(t5))){
+t6=C_i_car(t3);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[477],t6);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[468],t6);}
else{
C_trace("##sys#error");
-t6=*((C_word*)lf[135]+1);
+t6=*((C_word*)lf[134]+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){
+/* k11809 in a11804 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11811(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[477],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[468],t1);}
-/* 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){
+/* k11777 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11779(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("for-each");
-t2=*((C_word*)lf[404]+1);
+t2=*((C_word*)lf[402]+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){
+/* a11743 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11744(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -16256,33 +16069,33 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_11744,3,t0,t1,t2);}
t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11841,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11750,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t3))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[179],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[178],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);
+t5=C_i_cdr(t3);
+if(C_truep(C_i_nullp(t5))){
+t6=C_i_car(t3);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[179],t6);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[178],t6);}
else{
C_trace("##sys#error");
-t6=*((C_word*)lf[135]+1);
+t6=*((C_word*)lf[134]+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){
+/* k11748 in a11743 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11750(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[179],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[178],t1);}
-/* 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){
+/* k11614 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11616(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -16290,15 +16103,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_11616,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11709,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11618,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_11709(t5,((C_word*)t0)[2],t1);}
+f_11618(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){
+/* loop2176 in k11614 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_fcall f_11618(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -16313,78 +16126,78 @@ 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);
+C_save_and_reclaim((void*)trf_11618,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11716,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t4=C_slot(t2,C_fix(0));
+if(C_truep(C_i_symbolp(t4))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11659,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11663,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1443 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),t6,t4);}
+else{
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11669,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_listp(t4))){
+t6=C_i_length(t4);
+t7=C_eqp(C_fix(2),t6);
if(C_truep(t7)){
-t8=(C_word)C_i_car(t4);
-if(C_truep((C_word)C_i_symbolp(t8))){
-t9=(C_word)C_i_cadr(t4);
+t8=C_i_car(t4);
+if(C_truep(C_i_symbolp(t8))){
+t9=C_i_cadr(t4);
t10=t5;
-f_11760(t10,(C_word)C_a_i_string(&a,1,t9));}
+f_11669(t10,C_a_i_string(&a,1,t9));}
else{
t9=t5;
-f_11760(t9,C_SCHEME_FALSE);}}
+f_11669(t9,C_SCHEME_FALSE);}}
else{
t8=t5;
-f_11760(t8,C_SCHEME_FALSE);}}
+f_11669(t8,C_SCHEME_FALSE);}}
else{
t6=t5;
-f_11760(t6,C_SCHEME_FALSE);}}}
+f_11669(t6,C_SCHEME_FALSE);}}}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k11667 in loop2176 in k11614 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_fcall f_11669(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_11760,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_11669,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]);
+t2=C_i_car(((C_word*)t0)[3]);
+t3=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));}
+f_11716(2,t4,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]);}}
+C_trace("compiler.scm: 1448 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[240],lf[462],((C_word*)t0)[3]);}}
-/* 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){
+/* k11661 in loop2176 in k11614 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11663(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1443 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[229]+1)))(4,*((C_word*)lf[229]+1),((C_word*)t0)[2],t1,lf[461]);}
-/* 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){
+/* k11657 in loop2176 in k11614 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11659(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11750,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_11659,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));}
+f_11716(2,t2,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){
+/* k11714 in loop2176 in k11614 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11716(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -16396,94 +16209,94 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_11716,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop22002213");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop21762189");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_11709(t6,((C_word*)t0)[3],t5);}
+f_11618(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop22002213");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop21762189");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_11709(t6,((C_word*)t0)[3],t5);}}
+f_11618(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){
+/* k11610 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11612(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 1439 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[2],*((C_word*)lf[38]+1),t1);}
-/* 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){
+/* k11606 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11608(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate((C_word*)lf[38]+1 /* (set! import-libraries ...) */,t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[469]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[460]);}
-/* 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){
+/* k11589 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11591(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11682,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_11591,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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));}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11595,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1435 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t2,((C_word*)t0)[4],*((C_word*)lf[36]+1));}
else{
-C_trace("compiler.scm: 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]);}}
+C_trace("compiler.scm: 1436 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[313]))(4,*((C_word*)lf[313]+1),((C_word*)t0)[3],lf[457],((C_word*)t0)[2]);}}
-/* 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){
+/* k11593 in k11589 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11595(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate((C_word*)lf[36]+1 /* (set! constant-declarations ...) */,t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[465]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[456]);}
-/* 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){
+/* k11561 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11563(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_i_cadr(((C_word*)t0)[4]);
-if(C_truep((C_word)C_i_numberp(t2))){
+t2=C_i_cadr(((C_word*)t0)[4]);
+if(C_truep(C_i_numberp(t2))){
t3=C_mutate((C_word*)lf[33]+1 /* (set! inline-max-size ...) */,t2);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[462]);}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[453]);}
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]);}}
+C_trace("compiler.scm: 1429 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[240],lf[454],((C_word*)t0)[4]);}}
-/* 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){
+/* k11544 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11546(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("for-each");
-t2=*((C_word*)lf[404]+1);
+t2=*((C_word*)lf[402]+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){
+/* a11510 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11511(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -16493,33 +16306,33 @@ 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_save_and_reclaim((void*)tr3,(void*)f_11511,3,t0,t1,t2);}
+t3=C_a_i_list(&a,1,lf[451]);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11517,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t3))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[438],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[430],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);
+t5=C_i_cdr(t3);
+if(C_truep(C_i_nullp(t5))){
+t6=C_i_car(t3);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[438],t6);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[430],t6);}
else{
C_trace("##sys#error");
-t6=*((C_word*)lf[135]+1);
+t6=*((C_word*)lf[134]+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){
+/* k11515 in a11510 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11517(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[438],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[430],t1);}
-/* 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){
+/* k11447 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11449(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -16527,15 +16340,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_11449,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11545,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11454,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_11545(t5,((C_word*)t0)[2],t1);}
+f_11454(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){
+/* loop2130 in k11447 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_fcall f_11454(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -16544,12 +16357,12 @@ 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");
+C_save_and_reclaim((void*)trf_11454,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_retrieve(lf[445]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11464,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g21372138");
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -16557,18 +16370,18 @@ 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){
+/* k11462 in loop2130 in k11447 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11464(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_11454(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){
+/* k11400 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11402(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -16577,20 +16390,20 @@ 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))){
+C_save_and_reclaim((void*)tr2,(void*)f_11402,2,t0,t1);}
+if(C_truep(C_i_nullp(t1))){
t2=C_set_block_item(lf[15] /* block-compilation */,0,C_SCHEME_TRUE);
t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[452]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[443]);}
else{
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11505,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11414,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_11505(t5,((C_word*)t0)[2],t1);}}
+f_11414(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){
+/* loop2116 in k11400 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_fcall f_11414(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -16599,12 +16412,12 @@ 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");
+C_save_and_reclaim((void*)trf_11414,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_retrieve(lf[132]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11424,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g21232124");
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -16612,32 +16425,32 @@ 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){
+/* k11422 in loop2116 in k11400 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11424(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_11414(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){
+/* k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11135(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_11135,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11138,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+t3=C_i_cadr(((C_word*)t0)[7]);
+C_trace("compiler.scm: 1363 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t2,t3);}
-/* 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){
+/* k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11138(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -16674,104 +16487,104 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_11138,2,t0,t1);}
+t2=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))){
+t3=C_i_cddr(((C_word*)t0)[7]);
+if(C_truep(C_i_nullp(t3))){
t4=C_set_block_item(lf[8] /* standard-bindings */,0,C_SCHEME_END_OF_LIST);
t5=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[430]);}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[422]);}
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");
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11155,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11159,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=C_i_cddr(((C_word*)t0)[7]);
+C_trace("compiler.scm: 1369 stripa");
t7=((C_word*)((C_word*)t0)[5])[1];
-f_10469(t7,t5,t6);}}
+f_10465(t7,t5,t6);}}
else{
-t3=(C_word)C_eqp(t1,lf[9]);
+t3=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))){
+t4=C_i_cddr(((C_word*)t0)[7]);
+if(C_truep(C_i_nullp(t4))){
t5=C_set_block_item(lf[9] /* extended-bindings */,0,C_SCHEME_END_OF_LIST);
t6=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[433]);}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[425]);}
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");
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11184,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11188,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t7=C_i_cddr(((C_word*)t0)[7]);
+C_trace("compiler.scm: 1375 stripa");
t8=((C_word*)((C_word*)t0)[5])[1];
-f_10469(t8,t6,t7);}}
+f_10465(t8,t6,t7);}}
else{
-t4=(C_word)C_eqp(t1,lf[435]);
+t4=C_eqp(t1,lf[427]);
if(C_truep(t4)){
-t5=(C_word)C_i_cddr(((C_word*)t0)[7]);
-if(C_truep((C_word)C_i_nullp(t5))){
+t5=C_i_cddr(((C_word*)t0)[7]);
+if(C_truep(C_i_nullp(t5))){
t6=C_set_block_item(lf[43] /* inline-locally */,0,C_SCHEME_FALSE);
t7=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,lf[436]);}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,lf[428]);}
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");
+t6=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11214,tmp=(C_word)a,a+=2,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11249,a[2]=t6,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t8=C_i_cddr(((C_word*)t0)[7]);
+C_trace("compiler.scm: 1381 stripa");
t9=((C_word*)((C_word*)t0)[5])[1];
-f_10469(t9,t7,t8);}}
+f_10465(t9,t7,t8);}}
else{
-t5=(C_word)C_eqp(t1,lf[378]);
+t5=C_eqp(t1,lf[376]);
if(C_truep(t5)){
-t6=(C_word)C_i_cddr(((C_word*)t0)[7]);
-if(C_truep((C_word)C_i_nullp(t6))){
+t6=C_i_cddr(((C_word*)t0)[7]);
+if(C_truep(C_i_nullp(t6))){
t7=C_set_block_item(lf[8] /* standard-bindings */,0,C_SCHEME_END_OF_LIST);
t8=C_set_block_item(lf[9] /* extended-bindings */,0,C_SCHEME_END_OF_LIST);
t9=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,lf[439]);}
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,lf[431]);}
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");
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11274,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t8=C_i_cddr(((C_word*)t0)[7]);
+C_trace("compiler.scm: 1387 stripa");
t9=((C_word*)((C_word*)t0)[5])[1];
-f_10469(t9,t7,t8);}}
+f_10465(t9,t7,t8);}}
else{
-t6=(C_word)C_eqp(t1,lf[441]);
+t6=C_eqp(t1,lf[433]);
if(C_truep(t6)){
t7=C_set_block_item(lf[46] /* enable-inline-files */,0,C_SCHEME_TRUE);
-t8=(C_word)C_i_cddr(((C_word*)t0)[7]);
-if(C_truep((C_word)C_i_nullp(t8))){
+t8=C_i_cddr(((C_word*)t0)[7]);
+if(C_truep(C_i_nullp(t8))){
t9=C_set_block_item(lf[42] /* inline-globally */,0,C_SCHEME_FALSE);
t10=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,lf[442]);}
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,lf[434]);}
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");
+t9=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11309,tmp=(C_word)a,a+=2,tmp);
+t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11344,a[2]=t9,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t11=C_i_cddr(((C_word*)t0)[7]);
+C_trace("compiler.scm: 1396 stripa");
t12=((C_word*)((C_word*)t0)[5])[1];
-f_10469(t12,t10,t11);}}
+f_10465(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)));}}}}}}
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11355,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1398 check-decl");
+f_10417(t7,((C_word*)t0)[7],C_fix(1),C_a_i_list(&a,1,C_fix(1)));}}}}}}
-/* 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){
+/* k11353 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11355(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_11355,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11358,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_cadr(((C_word*)t0)[3]);
+C_trace("compiler.scm: 1399 strip");
t4=((C_word*)((C_word*)t0)[2])[1];
-f_10475(t4,t2,t3);}
+f_10471(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){
+/* k11356 in k11353 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11358(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -16779,32 +16592,32 @@ C_word t4;
C_word t5;
C_word t6;
C_word *a;
-t2=(C_word)C_eqp(t1,lf[396]);
+t2=C_eqp(t1,lf[394]);
if(C_truep(t2)){
t3=C_set_block_item(lf[10] /* insert-timer-checks */,0,C_SCHEME_FALSE);
t4=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[444]);}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[436]);}
else{
-t3=(C_word)C_eqp(t1,lf[388]);
+t3=C_eqp(t1,lf[386]);
if(C_truep(t3)){
t4=C_set_block_item(lf[12] /* unsafe */,0,C_SCHEME_TRUE);
t5=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[445]);}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[437]);}
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);}}}
+C_trace("compiler.scm: 1403 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[240],lf[438],t1);}}}
-/* 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){
+/* k11342 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11344(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("for-each");
-t2=*((C_word*)lf[404]+1);
+t2=*((C_word*)lf[402]+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){
+/* a11308 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11309(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -16814,78 +16627,78 @@ 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_save_and_reclaim((void*)tr3,(void*)f_11309,3,t0,t1,t2);}
+t3=C_a_i_list(&a,1,lf[429]);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11315,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t3))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[443],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[435],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);
+t5=C_i_cdr(t3);
+if(C_truep(C_i_nullp(t5))){
+t6=C_i_car(t3);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[443],t6);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[435],t6);}
else{
C_trace("##sys#error");
-t6=*((C_word*)lf[135]+1);
+t6=*((C_word*)lf[134]+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){
+/* k11313 in a11308 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11315(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[443],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[435],t1);}
-/* 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){
+/* k11272 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11274(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_11274,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11278,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1388 lset-difference");
+((C_proc5)C_retrieve_symbol_proc(lf[424]))(5,*((C_word*)lf[424]+1),t2,*((C_word*)lf[143]+1),C_retrieve(lf[370]),t1);}
-/* 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){
+/* k11276 in k11272 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11278(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_11366,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_11278,2,t0,t1);}
t2=C_mutate((C_word*)lf[8]+1 /* (set! standard-bindings ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11282,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1389 lset-difference");
+((C_proc5)C_retrieve_symbol_proc(lf[424]))(5,*((C_word*)lf[424]+1),t3,*((C_word*)lf[143]+1),C_retrieve(lf[373]),((C_word*)t0)[2]);}
-/* 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){
+/* k11280 in k11276 in k11272 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11282(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[440]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[432]);}
-/* 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){
+/* k11247 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11249(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("for-each");
-t2=*((C_word*)lf[404]+1);
+t2=*((C_word*)lf[402]+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){
+/* a11213 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11214(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -16895,78 +16708,78 @@ 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_save_and_reclaim((void*)tr3,(void*)f_11214,3,t0,t1,t2);}
+t3=C_a_i_list(&a,1,lf[429]);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11220,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t3))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[438],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[430],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);
+t5=C_i_cdr(t3);
+if(C_truep(C_i_nullp(t5))){
+t6=C_i_car(t3);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[438],t6);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[430],t6);}
else{
C_trace("##sys#error");
-t6=*((C_word*)lf[135]+1);
+t6=*((C_word*)lf[134]+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){
+/* k11218 in a11213 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11220(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[438],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[430],t1);}
-/* 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){
+/* k11186 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11188(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 1374 lset-difference");
+((C_proc5)C_retrieve_symbol_proc(lf[424]))(5,*((C_word*)lf[424]+1),((C_word*)t0)[2],*((C_word*)lf[143]+1),C_retrieve(lf[373]),t1);}
-/* 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){
+/* k11182 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11184(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[434]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[426]);}
-/* 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){
+/* k11157 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11159(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 1368 lset-difference");
+((C_proc5)C_retrieve_symbol_proc(lf[424]))(5,*((C_word*)lf[424]+1),((C_word*)t0)[2],*((C_word*)lf[143]+1),C_retrieve(lf[370]),t1);}
-/* 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){
+/* k11153 in k11136 in k11133 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11155(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate((C_word*)lf[8]+1 /* (set! standard-bindings ...) */,t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[431]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[423]);}
-/* 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){
+/* k11120 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11122(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("for-each");
-t2=*((C_word*)lf[404]+1);
+t2=*((C_word*)lf[402]+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){
+/* a11086 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11087(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -16976,170 +16789,74 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_11087,3,t0,t1,t2);}
t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11181,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11093,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t3))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[428],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[420],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);
+t5=C_i_cdr(t3);
+if(C_truep(C_i_nullp(t5))){
+t6=C_i_car(t3);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[428],t6);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[420],t6);}
else{
C_trace("##sys#error");
-t6=*((C_word*)lf[135]+1);
+t6=*((C_word*)lf[134]+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){
+/* k11091 in a11086 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11093(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[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);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[420],t1);}
-/* 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){
+/* k11046 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11048(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_11048,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11052,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1354 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t2,*((C_word*)lf[13]+1),((C_word*)t0)[4]);}
else{
-C_trace("compiler.scm: 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]);}}
+C_trace("compiler.scm: 1355 syntax-error");
+((C_proc5)C_retrieve_symbol_proc(lf[119]))(5,*((C_word*)lf[119]+1),((C_word*)t0)[3],lf[409],lf[410],((C_word*)t0)[2]);}}
-/* 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){
+/* k11050 in k11046 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11052(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate((C_word*)lf[13]+1 /* (set! foreign-declarations ...) */,t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[410]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[408]);}
-/* 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){
+/* k10955 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10957(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10957,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10960,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10998,tmp=(C_word)a,a+=2,tmp);
C_trace("for-each");
-t4=*((C_word*)lf[404]+1);
+t4=*((C_word*)lf[402]+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){
+/* a10997 in k10955 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10998(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -17149,46 +16866,46 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_10998,3,t0,t1,t2);}
t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11008,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11004,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t3))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[268],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[266],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);
+t5=C_i_cdr(t3);
+if(C_truep(C_i_nullp(t5))){
+t6=C_i_car(t3);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[268],t6);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[266],t6);}
else{
C_trace("##sys#error");
-t6=*((C_word*)lf[135]+1);
+t6=*((C_word*)lf[134]+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){
+/* k11002 in a10997 in k10955 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_11004(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[268],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[266],t1);}
-/* 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){
+/* k10958 in k10955 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10960(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[2],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10964,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10969,tmp=(C_word)a,a+=2,tmp);
+C_save_and_reclaim((void*)tr2,(void*)f_10960,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10965,tmp=(C_word)a,a+=2,tmp);
C_trace("for-each");
-t3=*((C_word*)lf[404]+1);
+t3=*((C_word*)lf[402]+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){
+/* a10964 in k10958 in k10955 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10965(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -17198,42 +16915,42 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_10965,3,t0,t1,t2);}
t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10975,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10971,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t3))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[134],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[133],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);
+t5=C_i_cdr(t3);
+if(C_truep(C_i_nullp(t5))){
+t6=C_i_car(t3);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[134],t6);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[133],t6);}
else{
C_trace("##sys#error");
-t6=*((C_word*)lf[135]+1);
+t6=*((C_word*)lf[134]+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){
+/* k10969 in a10964 in k10958 in k10955 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10971(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-/* 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){
+/* k10946 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10948(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("for-each");
-t2=*((C_word*)lf[404]+1);
+t2=*((C_word*)lf[402]+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){
+/* a10912 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10913(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -17243,56 +16960,56 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_10913,3,t0,t1,t2);}
t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10923,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10919,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t3))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[268],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[266],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);
+t5=C_i_cdr(t3);
+if(C_truep(C_i_nullp(t5))){
+t6=C_i_car(t3);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[268],t6);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[266],t6);}
else{
C_trace("##sys#error");
-t6=*((C_word*)lf[135]+1);
+t6=*((C_word*)lf[134]+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){
+/* k10917 in a10912 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10919(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[268],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[266],t1);}
-/* 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){
+/* k10869 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10871(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]));}
+C_save_and_reclaim((void*)tr2,(void*)f_10871,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10876,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10911,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1346 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t3,C_retrieve(lf[370]),C_retrieve(lf[373]));}
-/* 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){
+/* k10909 in k10869 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10911(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("for-each");
-t2=*((C_word*)lf[404]+1);
+t2=*((C_word*)lf[402]+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){
+/* a10875 in k10869 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10876(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -17302,42 +17019,42 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_10876,3,t0,t1,t2);}
t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10886,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10882,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t3))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[134],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[133],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);
+t5=C_i_cdr(t3);
+if(C_truep(C_i_nullp(t5))){
+t6=C_i_car(t3);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[134],t6);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[133],t6);}
else{
C_trace("##sys#error");
-t6=*((C_word*)lf[135]+1);
+t6=*((C_word*)lf[134]+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){
+/* k10880 in a10875 in k10869 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10882(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-/* 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){
+/* k10849 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10851(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("for-each");
-t2=*((C_word*)lf[404]+1);
+t2=*((C_word*)lf[402]+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){
+/* a10815 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10816(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -17347,185 +17064,185 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_10816,3,t0,t1,t2);}
t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10826,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t3))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10822,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t3))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[134],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[133],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);
+t5=C_i_cdr(t3);
+if(C_truep(C_i_nullp(t5))){
+t6=C_i_car(t3);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[134],t6);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t1,t2,lf[133],t6);}
else{
C_trace("##sys#error");
-t6=*((C_word*)lf[135]+1);
+t6=*((C_word*)lf[134]+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){
+/* k10820 in a10815 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10822(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-/* 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){
+/* k10799 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10801(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]));}
+C_trace("compiler.scm: 1336 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[2],t1,C_retrieve(lf[399]));}
-/* 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){
+/* k10795 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10797(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_mutate((C_word*)lf[401]+1 /* (set! disabled-warnings ...) */,t1);
+t2=C_mutate((C_word*)lf[399]+1 /* (set! disabled-warnings ...) */,t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[402]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[400]);}
-/* 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){
+/* k10711 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10713(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_10713,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10717,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_cadr(((C_word*)t0)[3]);
+C_trace("compiler.scm: 1324 strip");
t4=((C_word*)((C_word*)t0)[2])[1];
-f_10475(t4,t2,t3);}
+f_10471(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){
+/* k10715 in k10711 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10717(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate((C_word*)lf[6]+1 /* (set! number-type ...) */,t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[382]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[380]);}
-/* 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){
+/* k10686 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10688(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]));}
+C_save_and_reclaim((void*)tr2,(void*)f_10688,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10692,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1320 lset-intersection");
+((C_proc5)C_retrieve_symbol_proc(lf[379]))(5,*((C_word*)lf[379]+1),t2,*((C_word*)lf[143]+1),t1,C_retrieve(lf[370]));}
-/* 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){
+/* k10690 in k10686 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10692(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10696,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_10692,2,t0,t1);}
t2=C_mutate((C_word*)lf[8]+1 /* (set! standard-bindings ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]));}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10696,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1321 lset-intersection");
+((C_proc5)C_retrieve_symbol_proc(lf[379]))(5,*((C_word*)lf[379]+1),t3,*((C_word*)lf[143]+1),((C_word*)t0)[2],C_retrieve(lf[373]));}
-/* 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){
+/* k10694 in k10690 in k10686 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10696(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[380]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[378]);}
-/* 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){
+/* k10661 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10663(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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));}
+C_trace("compiler.scm: 1313 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[2],t1,*((C_word*)lf[9]+1));}
-/* 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){
+/* k10657 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10659(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[377]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[375]);}
-/* 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){
+/* k10632 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10634(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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));}
+C_trace("compiler.scm: 1309 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[2],t1,*((C_word*)lf[8]+1));}
-/* 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){
+/* k10628 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10630(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate((C_word*)lf[8]+1 /* (set! standard-bindings ...) */,t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[374]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[372]);}
-/* 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){
+/* k10580 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10582(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_10582,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10585,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_cadr(((C_word*)t0)[3]);
+C_trace("compiler.scm: 1301 stripu");
t4=((C_word*)((C_word*)t0)[2])[1];
((C_proc3)C_retrieve_proc(t4))(3,t4,t2,t3);}
-/* 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){
+/* k10583 in k10580 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10585(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10585,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10588,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10609,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1302 stringify");
+((C_proc3)C_retrieve_symbol_proc(lf[361]))(3,*((C_word*)lf[361]+1),t3,t1);}
-/* 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){
+/* k10607 in k10583 in k10580 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10609(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1282 string->c-identifier");
-((C_proc3)C_retrieve_symbol_proc(lf[362]))(3,*((C_word*)lf[362]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 1302 string->c-identifier");
+((C_proc3)C_retrieve_symbol_proc(lf[360]))(3,*((C_word*)lf[360]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k10586 in k10583 in k10580 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10588(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -17533,54 +17250,54 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_10588,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10591,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10595,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
if(C_truep(*((C_word*)lf[5]+1))){
-t4=(C_word)C_i_string_equal_p(*((C_word*)lf[5]+1),t1);
+t4=C_i_string_equal_p(*((C_word*)lf[5]+1),t1);
t5=t3;
-f_10599(t5,(C_word)C_i_not(t4));}
+f_10595(t5,C_i_not(t4));}
else{
t4=t3;
-f_10599(t4,C_SCHEME_FALSE);}}
+f_10595(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){
+/* k10593 in k10586 in k10583 in k10580 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_fcall f_10595(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(C_truep(t1)){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1304 compiler-warning");
+((C_proc4)C_retrieve_symbol_proc(lf[115]))(4,*((C_word*)lf[115]+1),((C_word*)t0)[4],lf[367],lf[368]);}
else{
t2=C_mutate((C_word*)lf[5]+1 /* (set! unit-name ...) */,((C_word*)t0)[3]);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[371]);}}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[369]);}}
-/* 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){
+/* k10589 in k10586 in k10583 in k10580 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10591(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate((C_word*)lf[5]+1 /* (set! unit-name ...) */,((C_word*)t0)[3]);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[368]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[366]);}
-/* 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){
+/* k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10497(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10497,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10500,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_apply(4,0,t2,C_retrieve(lf[364]),t1);}
-/* 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){
+/* k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10500(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -17588,44 +17305,44 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10500,2,t0,t1);}
+if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10509,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10562,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10568,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1293 ##sys#hash-table-update!");
+((C_proc6)C_retrieve_symbol_proc(lf[144]))(6,*((C_word*)lf[144]+1),t2,*((C_word*)lf[83]+1),lf[362],t3,t4);}
else{
t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[365]);}}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[363]);}}
-/* 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){
+/* a10567 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10568(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10572,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_10568,2,t0,t1);}
t2=t1;
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-/* 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){
+/* a10561 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10562(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_10566,3,t0,t1,t2);}
-t3=C_retrieve(lf[143]);
-C_trace("g17751776");
+C_save_and_reclaim((void*)tr3,(void*)f_10562,3,t0,t1,t2);}
+t3=C_retrieve(lf[142]);
+C_trace("g17901791");
t4=t3;
-((C_proc5)C_retrieve_proc(t4))(5,t4,t1,*((C_word*)lf[144]+1),((C_word*)t0)[2],t2);}
+((C_proc5)C_retrieve_proc(t4))(5,t4,t1,*((C_word*)lf[143]+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){
+/* k10507 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10509(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -17638,20 +17355,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10509,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10516,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10512,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10522,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10518,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
-f_10522(t10,t6,((C_word*)t0)[2]);}
+f_10518(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){
+/* loop1795 in k10507 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_fcall f_10518(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -17660,28 +17377,28 @@ 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);}
+C_save_and_reclaim((void*)trf_10518,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10556,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10553,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1297 stringify");
+((C_proc3)C_retrieve_symbol_proc(lf[361]))(3,*((C_word*)lf[361]+1),t5,t4);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k10551 in loop1795 in k10507 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10553(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1277 string->c-identifier");
-((C_proc3)C_retrieve_symbol_proc(lf[362]))(3,*((C_word*)lf[362]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 1297 string->c-identifier");
+((C_proc3)C_retrieve_symbol_proc(lf[360]))(3,*((C_word*)lf[360]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k10554 in loop1795 in k10507 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10556(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -17693,75 +17410,75 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_10556,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop17801793");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop17951808");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_10522(t6,((C_word*)t0)[3],t5);}
+f_10518(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop17801793");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop17951808");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_10522(t6,((C_word*)t0)[3],t5);}}
+f_10518(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){
+/* k10510 in k10507 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10512(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10512,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10516,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1298 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t2,*((C_word*)lf[11]+1),t1);}
-/* 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){
+/* k10514 in k10510 in k10507 in k10498 in k10495 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10516(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate((C_word*)lf[11]+1 /* (set! used-units ...) */,t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[361]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[359]);}
-/* 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){
+/* k10489 in k10486 in k10483 in a10480 in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10491(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[359]);}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[357]);}
-/* strip in ##compiler#process-declaration in k5138 in k5135 */
-static void C_fcall f_10475(C_word t0,C_word t1,C_word t2){
+/* strip in ##compiler#process-declaration in k5089 in k5086 */
+static void C_fcall f_10471(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_10471,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 1281 ##sys#strip-syntax");
+((C_proc4)C_retrieve_symbol_proc(lf[127]))(4,*((C_word*)lf[127]+1),t1,t2,((C_word*)t0)[2]);}
-/* stripa in ##compiler#process-declaration in k5138 in k5135 */
-static void C_fcall f_10469(C_word t0,C_word t1,C_word t2){
+/* stripa in ##compiler#process-declaration in k5089 in k5086 */
+static void C_fcall f_10465(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_10465,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 1279 ##sys#strip-syntax");
+((C_proc5)C_retrieve_symbol_proc(lf[127]))(5,*((C_word*)lf[127]+1),t1,t2,((C_word*)t0)[2],C_SCHEME_TRUE);}
-/* check-decl in ##compiler#process-declaration in k5138 in k5135 */
-static void C_fcall f_10421(C_word t1,C_word t2,C_word t3,C_word t4){
+/* check-decl in ##compiler#process-declaration in k5089 in k5086 */
+static void C_fcall f_10417(C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -17773,54 +17490,54 @@ 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);
+C_save_and_reclaim((void*)trf_10417,NULL,4,t1,t2,t3,t4);}
+t5=C_i_cdr(t2);
+t6=C_i_length(t5);
+t7=C_fixnum_lessp(t6,t3);
if(C_truep(t7)){
if(C_truep(t7)){
-C_trace("compiler.scm: 1257 syntax-error");
-((C_proc4)C_retrieve_symbol_proc(lf[120]))(4,*((C_word*)lf[120]+1),t1,lf[358],t2);}
+C_trace("compiler.scm: 1277 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),t1,lf[356],t2);}
else{
t8=C_SCHEME_UNDEFINED;
t9=t1;
((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t8);}}
else{
-t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);}
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10440,a[2]=t2,a[3]=t1,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_i_nullp(t4))){
+if(C_truep(C_fixnum_greaterp(t6,C_fix(99999)))){
+C_trace("compiler.scm: 1277 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),t1,lf[356],t2);}
else{
t9=C_SCHEME_UNDEFINED;
t10=t1;
((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,t9);}}
else{
-t9=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t9))){
+t9=C_i_cdr(t4);
+if(C_truep(C_i_nullp(t9))){
t10=t8;
-f_10444(2,t10,(C_word)C_i_car(t4));}
+f_10440(2,t10,C_i_car(t4));}
else{
C_trace("##sys#error");
-t10=*((C_word*)lf[135]+1);
+t10=*((C_word*)lf[134]+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){
+/* k10438 in check-decl in ##compiler#process-declaration in k5089 in k5086 */
+static void C_ccall f_10440(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-if(C_truep((C_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]);}
+if(C_truep(C_fixnum_greaterp(((C_word*)t0)[4],t1))){
+C_trace("compiler.scm: 1277 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),((C_word*)t0)[3],lf[356],((C_word*)t0)[2]);}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-/* ##compiler#canonicalize-expression in k5138 in k5135 */
-static void C_ccall f_5298(C_word c,C_word t0,C_word t1,C_word t2){
+/* ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5248(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -17852,11 +17569,13 @@ C_word t29;
C_word t30;
C_word t31;
C_word t32;
-C_word ab[60],*a=ab;
+C_word t33;
+C_word t34;
+C_word ab[63],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_5298,3,t0,t1,t2);}
-t3=C_SCHEME_UNDEFINED;
+C_save_and_reclaim((void*)tr3,(void*)f_5248,3,t0,t1,t2);}
+t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
@@ -17874,74 +17593,76 @@ 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);}
+t21=C_SCHEME_UNDEFINED;
+t22=(*a=C_VECTOR_TYPE|1,a[1]=t21,tmp=(C_word)a,a+=2,tmp);
+t23=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5251,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
+t24=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5290,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
+t25=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5305,a[2]=t8,tmp=(C_word)a,a+=3,tmp));
+t26=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5318,tmp=(C_word)a,a+=2,tmp));
+t27=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5378,a[2]=t8,tmp=(C_word)a,a+=3,tmp));
+t28=C_set_block_item(t16,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5424,a[2]=t8,a[3]=t20,tmp=(C_word)a,a+=4,tmp));
+t29=C_set_block_item(t18,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5594,tmp=(C_word)a,a+=2,tmp));
+t30=C_set_block_item(t20,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5724,a[2]=t10,a[3]=t14,a[4]=t22,a[5]=t4,a[6]=t18,a[7]=t8,a[8]=t12,a[9]=t20,a[10]=t16,tmp=(C_word)a,a+=11,tmp));
+t31=C_set_block_item(t22,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10324,a[2]=t20,tmp=(C_word)a,a+=3,tmp));
+t32=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10371,a[2]=t2,a[3]=t1,a[4]=t20,tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_i_memq(lf[136],C_retrieve(lf[354])))){
+t33=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10409,a[2]=t2,a[3]=t32,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1258 newline");
+((C_proc2)C_retrieve_proc(*((C_word*)lf[355]+1)))(2,*((C_word*)lf[355]+1),t33);}
else{
-t31=t30;
-f_10375(2,t31,C_SCHEME_UNDEFINED);}}
+t33=t32;
+f_10371(2,t33,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){
+/* k10407 in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10409(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1258 pretty-print");
+((C_proc3)C_retrieve_symbol_proc(lf[217]))(3,*((C_word*)lf[217]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* k10373 in ##compiler#canonicalize-expression in k5138 in k5135 */
-static void C_ccall f_10375(C_word c,C_word t0,C_word t1){
+/* k10369 in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10371(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10371,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10374,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1259 ##sys#clear-trace-buffer");
+((C_proc2)C_retrieve_symbol_proc(lf[353]))(2,*((C_word*)lf[353]+1),t2);}
-/* 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){
+/* k10372 in k10369 in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10374(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_10374,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10389,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10393,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1263 reverse");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[211]+1)))(3,*((C_word*)lf[211]+1),t3,*((C_word*)lf[76]+1));}
-/* 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){
+/* k10391 in k10372 in k10369 in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10393(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_10393,2,t0,t1);}
+t2=C_set_block_item(lf[76] /* pending-canonicalizations */,0,C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10403,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1267 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t3,C_retrieve(lf[352]),*((C_word*)lf[9]+1));}
-/* 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){
+/* k10401 in k10391 in k10372 in k10369 in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10403(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -17949,39 +17670,39 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10403,2,t0,t1);}
t2=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,t1);
t3=((C_word*)t0)[4];
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
C_trace("##sys#append");
-t5=*((C_word*)lf[168]+1);
+t5=*((C_word*)lf[167]+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){
+/* k10387 in k10372 in k10369 in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10389(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10389,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[151],t1);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10385,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1269 ##sys#current-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[192]))(2,*((C_word*)lf[192]+1),t3);}
-/* 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){
+/* k10383 in k10387 in k10372 in k10369 in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10385(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1241 walk");
+C_trace("compiler.scm: 1261 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);}
+f_5724(t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t1,C_SCHEME_FALSE);}
-/* mapwalk in ##compiler#canonicalize-expression in k5138 in k5135 */
-static void C_fcall f_10328(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
+/* mapwalk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_10324(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -17993,19 +17714,19 @@ 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);}
+C_save_and_reclaim((void*)trf_10324,NULL,5,t0,t1,t2,t3,t4);}
t5=C_SCHEME_END_OF_LIST;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_FALSE;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10330,a[2]=t6,a[3]=t10,a[4]=t8,a[5]=t4,a[6]=t3,a[7]=((C_word*)t0)[2],tmp=(C_word)a,a+=8,tmp));
t12=((C_word*)t10)[1];
-f_10334(t12,t1,t2);}
+f_10330(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){
+/* loop1707 in mapwalk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_10330(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -18014,21 +17735,21 @@ 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");
+C_save_and_reclaim((void*)trf_10330,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10357,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10364,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g17231724");
t6=t3;
-f_10361(t6,t4,t5);}
+f_10357(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k10362 in loop1707 in mapwalk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10364(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -18040,36 +17761,36 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_10364,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop16921705");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop17071720");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_10334(t6,((C_word*)t0)[3],t5);}
+f_10330(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop16921705");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop17071720");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_10334(t6,((C_word*)t0)[3],t5);}}
+f_10330(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){
+/* g1723 in loop1707 in mapwalk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_10357(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10361,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 1236 walk");
+C_save_and_reclaim((void*)trf_10357,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 1256 walk");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_5774(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+f_5724(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){
+/* walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5724(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -18081,65 +17802,65 @@ 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);}
+C_save_and_reclaim((void*)trf_5724,NULL,6,t0,t1,t2,t3,t4,t5);}
+if(C_truep(C_i_symbolp(t2))){
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5734,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t2,a[6]=t1,a[7]=((C_word*)t0)[10],tmp=(C_word)a,a+=8,tmp);
+t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5740,a[2]=t6,a[3]=t5,a[4]=t4,a[5]=t3,a[6]=t1,a[7]=((C_word*)t0)[10],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 514 keyword?");
+((C_proc3)C_retrieve_symbol_proc(lf[118]))(3,*((C_word*)lf[118]+1),t7,t2);}
else{
-if(C_truep((C_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);}
+if(C_truep(C_i_not_pair_p(t2))){
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5768,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 521 constant?");
+((C_proc3)C_retrieve_symbol_proc(lf[121]))(3,*((C_word*)lf[121]+1),t6,t2);}
else{
-t6=(C_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);}
+t6=C_i_car(t2);
+if(C_truep(C_i_symbolp(t6))){
+t7=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_5787,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=t5,a[11]=t4,a[12]=t3,a[13]=((C_word*)t0)[9],a[14]=t2,tmp=(C_word)a,a+=15,tmp);
+C_trace("compiler.scm: 525 get-line");
+((C_proc3)C_retrieve_symbol_proc(lf[268]))(3,*((C_word*)lf[268]+1),t7,t2);}
else{
-if(C_truep((C_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);}
+if(C_truep(C_i_listp(t2))){
+t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10252,a[2]=t5,a[3]=((C_word*)t0)[9],a[4]=t4,a[5]=t3,a[6]=t2,a[7]=t1,a[8]=((C_word*)t0)[4],tmp=(C_word)a,a+=9,tmp);
+t8=C_i_car(t2);
+C_trace("compiler.scm: 1241 constant?");
+((C_proc3)C_retrieve_symbol_proc(lf[121]))(3,*((C_word*)lf[121]+1),t7,t8);}
else{
-C_trace("compiler.scm: 1219 syntax-error");
-((C_proc4)C_retrieve_symbol_proc(lf[120]))(4,*((C_word*)lf[120]+1),t1,lf[353],t2);}}}}}
+C_trace("compiler.scm: 1239 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),t1,lf[351],t2);}}}}}
-/* 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){
+/* k10250 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10252(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10256,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_10252,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10255,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1242 emit-syntax-trace-info");
+((C_proc4)C_retrieve_symbol_proc(lf[349]))(4,*((C_word*)lf[349]+1),t2,((C_word*)t0)[6],C_SCHEME_FALSE);}
else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);}}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10264,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 1247 emit-syntax-trace-info");
+((C_proc4)C_retrieve_symbol_proc(lf[349]))(4,*((C_word*)lf[349]+1),t2,((C_word*)t0)[6],C_SCHEME_FALSE);}}
-/* 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){
+/* k10262 in k10250 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10264(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10264,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10267,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 1248 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t2);}
-/* 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){
+/* k10265 in k10262 in k10250 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10267(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -18150,19 +17871,19 @@ 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_save_and_reclaim((void*)tr2,(void*)f_10267,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[7]);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,t1,t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10294,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t5,a[8]=t1,tmp=(C_word)a,a+=9,tmp);
+t7=C_i_cdr(((C_word*)t0)[7]);
C_trace("##sys#append");
-t8=*((C_word*)lf[168]+1);
+t8=*((C_word*)lf[167]+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){
+/* k10292 in k10265 in k10262 in k10250 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10294(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -18171,221 +17892,221 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_10294,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
+t5=C_a_i_cons(&a,2,lf[159],t4);
+C_trace("compiler.scm: 1249 walk");
t6=((C_word*)((C_word*)t0)[6])[1];
-f_5774(t6,((C_word*)t0)[5],t5,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_5724(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){
+/* k10253 in k10250 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10255(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_10255,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10258,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1243 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t2,lf[240],lf[350],((C_word*)t0)[4]);}
-/* 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){
+/* k10256 in k10253 in k10250 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10258(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1224 mapwalk");
+C_trace("compiler.scm: 1244 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]);}
+f_10324(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){
+/* k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5787(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[15],*a=ab;
+C_word ab[16],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5787,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_5790,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],tmp=(C_word)a,a+=16,tmp);
+C_trace("compiler.scm: 526 emit-syntax-trace-info");
+((C_proc4)C_retrieve_symbol_proc(lf[349]))(4,*((C_word*)lf[349]+1),t2,((C_word*)t0)[14],C_SCHEME_FALSE);}
-/* 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){
+/* k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5790(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[20],*a=ab;
+C_word ab[21],*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]))){
+C_save_and_reclaim((void*)tr2,(void*)f_5790,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_5793,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],tmp=(C_word)a,a+=16,tmp);
+if(C_truep(C_i_listp(((C_word*)t0)[15]))){
t3=t2;
-f_5843(2,t3,C_SCHEME_UNDEFINED);}
+f_5793(2,t3,C_SCHEME_UNDEFINED);}
else{
if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10226,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[14],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10222,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[15],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[265]))(2,*((C_word*)lf[265]+1),t3);}
+((C_proc2)C_retrieve_symbol_proc(lf[263]))(2,*((C_word*)lf[263]+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]);}}}
+C_trace("compiler.scm: 530 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),t2,lf[348],((C_word*)t0)[15]);}}}
-/* 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){
+/* k10220 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10222(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10222,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10225,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[263]+1)))(4,*((C_word*)lf[263]+1),t2,lf[349],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[261]+1)))(4,*((C_word*)lf[261]+1),t2,lf[347],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){
+/* k10223 in k10220 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10225(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10225,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10228,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
C_trace("write");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[262]+1)))(4,*((C_word*)lf[262]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[260]+1)))(4,*((C_word*)lf[260]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k10226 in k10223 in k10220 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10228(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10228,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10231,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[263]+1)))(4,*((C_word*)lf[263]+1),t2,lf[348],((C_word*)t0)[2]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[261]+1)))(4,*((C_word*)lf[261]+1),t2,lf[346],((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){
+/* k10229 in k10226 in k10223 in k10220 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10231(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10231,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10234,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[261]))(3,*((C_word*)lf[261]+1),t2,((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[259]))(3,*((C_word*)lf[259]+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){
+/* k10232 in k10229 in k10226 in k10223 in k10220 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10234(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 529 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5793(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[15],*a=ab;
+C_word ab[16],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5793,2,t0,t1);}
+t2=C_mutate((C_word*)lf[122]+1 /* (set! syntax-error-culprit ...) */,((C_word*)t0)[15]);
+t3=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_5797,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],tmp=(C_word)a,a+=16,tmp);
+t4=C_i_car(((C_word*)t0)[15]);
+C_trace("compiler.scm: 532 lookup");
+t5=((C_word*)((C_word*)t0)[8])[1];
+f_5290(t5,t3,t4,((C_word*)t0)[12]);}
-/* 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){
+/* k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5797(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[16],*a=ab;
+C_word ab[17],*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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5797,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_5800,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=t1,tmp=(C_word)a,a+=17,tmp);
+if(C_truep(C_i_symbolp(t1))){
+C_trace("compiler.scm: 533 ##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t2,t1,lf[106]);}
else{
t3=t2;
-f_5850(2,t3,C_SCHEME_FALSE);}}
+f_5800(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){
+/* k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5800(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[16],*a=ab;
+C_word ab[17],*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));}
+C_save_and_reclaim((void*)tr2,(void*)f_5800,2,t0,t1);}
+t2=(C_truep(t1)?t1:((C_word*)t0)[16]);
+t3=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_5806,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t2,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],tmp=(C_word)a,a+=17,tmp);
+C_trace("compiler.scm: 534 ##sys#expand");
+((C_proc5)C_retrieve_symbol_proc(lf[345]))(5,*((C_word*)lf[345]+1),t3,((C_word*)t0)[15],((C_word*)t0)[12],*((C_word*)lf[47]+1));}
-/* k5854 in 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){
+/* k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5806(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[17],*a=ab;
+C_word ab[18],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_5806,2,t0,t1);}
+t2=C_eqp(((C_word*)t0)[16],t1);
if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|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]);}
+t3=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_5818,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],a[17]=((C_word*)t0)[16],tmp=(C_word)a,a+=18,tmp);
+if(C_truep(*((C_word*)lf[56]+1))){
+C_trace("compiler.scm: 538 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[107]))(4,*((C_word*)lf[107]+1),t3,*((C_word*)lf[55]+1),((C_word*)t0)[10]);}
else{
t4=t3;
-f_5868(2,t4,C_SCHEME_FALSE);}}
+f_5818(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]);}}
+C_trace("compiler.scm: 536 walk");
+t3=((C_word*)((C_word*)t0)[15])[1];
+f_5724(t3,((C_word*)t0)[11],t1,((C_word*)t0)[14],((C_word*)t0)[13],((C_word*)t0)[12]);}}
-/* k5866 in k5854 in 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){
+/* k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5818(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[16],*a=ab;
+C_word ab[17],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5868,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_5818,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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");
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5822,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[17],tmp=(C_word)a,a+=7,tmp);
+C_trace("g329330");
t3=t2;
-f_5872(t3,((C_word*)t0)[11],t1);}
+f_5822(t3,((C_word*)t0)[12],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);
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_5840,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[13],a[11]=((C_word*)t0)[14],a[12]=((C_word*)t0)[15],a[13]=((C_word*)t0)[16],a[14]=((C_word*)t0)[17],a[15]=((C_word*)t0)[12],a[16]=((C_word*)t0)[11],tmp=(C_word)a,a+=17,tmp);
if(C_truep(((C_word*)t0)[3])){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 543 update-line-number-database!");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[344]+1)))(4,*((C_word*)lf[344]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
else{
t3=t2;
-f_5890(2,t3,C_SCHEME_UNDEFINED);}}}
+f_5840(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){
+/* k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5840(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -18393,27 +18114,27 @@ C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[16],*a=ab;
+C_word ab[17],*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]);
+C_save_and_reclaim((void*)tr2,(void*)f_5840,2,t0,t1);}
+t2=C_eqp(((C_word*)t0)[16],lf[123]);
if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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]);}
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5849,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[14],a[6]=((C_word*)t0)[15],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 547 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t3,lf[123],((C_word*)t0)[14],lf[126],C_SCHEME_FALSE,((C_word*)t0)[11]);}
else{
-t3=(C_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);
+t3=C_eqp(((C_word*)t0)[16],lf[98]);
+t4=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_5907,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[11],a[14]=((C_word*)t0)[16],a[15]=((C_word*)t0)[14],a[16]=((C_word*)t0)[15],tmp=(C_word)a,a+=17,tmp);
if(C_truep(t3)){
t5=t4;
-f_5957(t5,t3);}
+f_5907(t5,t3);}
else{
-t5=(C_word)C_eqp(((C_word*)t0)[15],lf[242]);
+t5=C_eqp(((C_word*)t0)[16],lf[240]);
t6=t4;
-f_5957(t6,(C_truep(t5)?t5:(C_word)C_eqp(((C_word*)t0)[15],lf[202])));}}}
+f_5907(t6,(C_truep(t5)?t5:C_eqp(((C_word*)t0)[16],lf[200])));}}}
-/* k5955 in k5888 in k5866 in 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){
+/* k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5907(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -18424,43 +18145,43 @@ C_word t7;
C_word t8;
C_word t9;
C_word t10;
-C_word ab[16],*a=ab;
+C_word ab[17],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5957,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_5907,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5910,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[16],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 556 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t2,((C_word*)t0)[14],((C_word*)t0)[15],lf[128],C_SCHEME_FALSE,((C_word*)t0)[13]);}
else{
-t2=(C_word)C_eqp(((C_word*)t0)[13],lf[130]);
+t2=C_eqp(((C_word*)t0)[14],lf[129]);
if(C_truep(t2)){
if(C_truep(*((C_word*)lf[12]+1))){
-t3=((C_word*)t0)[15];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[131]);}
+t3=((C_word*)t0)[16];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[130]);}
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]);}}
+t3=C_i_cadr(((C_word*)t0)[15]);
+C_trace("compiler.scm: 562 walk");
+t4=((C_word*)((C_word*)t0)[12])[1];
+f_5724(t4,((C_word*)t0)[16],t3,((C_word*)t0)[11],((C_word*)t0)[13],((C_word*)t0)[10]);}}
else{
-t3=(C_word)C_eqp(((C_word*)t0)[13],lf[132]);
+t3=C_eqp(((C_word*)t0)[14],lf[131]);
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]);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5950,a[2]=((C_word*)t0)[16],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 565 cadadr");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[137]+1)))(3,*((C_word*)lf[137]+1),t4,((C_word*)t0)[15]);}
else{
-t4=(C_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);
+t4=C_eqp(((C_word*)t0)[14],lf[138]);
+t5=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_6008,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[13],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],tmp=(C_word)a,a+=17,tmp);
if(C_truep(t4)){
t6=t5;
-f_6058(t6,t4);}
+f_6008(t6,t4);}
else{
-t6=(C_word)C_eqp(((C_word*)t0)[13],lf[345]);
+t6=C_eqp(((C_word*)t0)[14],lf[343]);
t7=t5;
-f_6058(t7,(C_truep(t6)?t6:(C_word)C_eqp(((C_word*)t0)[13],lf[107])));}}}}}
+f_6008(t7,(C_truep(t6)?t6:C_eqp(((C_word*)t0)[14],lf[106])));}}}}}
-/* k6056 in k5955 in k5888 in k5866 in 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){
+/* k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6008(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -18610,329 +18331,323 @@ 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);}
+C_save_and_reclaim((void*)trf_6008,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]);}
+t2=((C_word*)t0)[16];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[15]);}
else{
-t2=(C_word)C_eqp(((C_word*)t0)[13],lf[101]);
+t2=C_eqp(((C_word*)t0)[14],lf[100]);
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]);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6029,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[16],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 578 caadr");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[139]+1)))(3,*((C_word*)lf[139]+1),t3,((C_word*)t0)[15]);}
else{
-t3=(C_word)C_eqp(((C_word*)t0)[13],lf[105]);
+t3=C_eqp(((C_word*)t0)[14],lf[104]);
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);}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6058,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[13],a[6]=((C_word*)t0)[15],a[7]=((C_word*)t0)[16],tmp=(C_word)a,a+=8,tmp);
+t5=C_i_cadr(((C_word*)t0)[15]);
+C_trace("compiler.scm: 582 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t4,t5);}
else{
-t4=(C_word)C_eqp(((C_word*)t0)[13],lf[141]);
+t4=C_eqp(((C_word*)t0)[14],lf[140]);
if(C_truep(t4)){
t5=C_SCHEME_END_OF_LIST;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_FALSE;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6133,a[2]=((C_word*)t0)[15],tmp=(C_word)a,a+=3,tmp);
-t10=(C_word)C_i_cdr(((C_word*)t0)[14]);
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6083,a[2]=((C_word*)t0)[16],tmp=(C_word)a,a+=3,tmp);
+t10=C_i_cdr(((C_word*)t0)[15]);
t11=C_SCHEME_UNDEFINED;
t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6154,a[2]=t6,a[3]=t12,a[4]=t8,tmp=(C_word)a,a+=5,tmp));
+t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6104,a[2]=t6,a[3]=t12,a[4]=t8,tmp=(C_word)a,a+=5,tmp));
t14=((C_word*)t12)[1];
-f_6154(t14,t9,t10);}
+f_6104(t14,t9,t10);}
else{
-t5=(C_word)C_eqp(((C_word*)t0)[13],lf[149]);
+t5=C_eqp(((C_word*)t0)[14],lf[148]);
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]));
+t6=C_i_caddr(((C_word*)t0)[15]);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6153,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6157,a[2]=t7,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+t9=C_i_cadr(((C_word*)t0)[15]);
+C_trace("compiler.scm: 597 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t8,t9);}
+else{
+t6=C_eqp(((C_word*)t0)[14],lf[158]);
+t7=(C_truep(t6)?t6:C_eqp(((C_word*)t0)[14],lf[159]));
if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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]);}
+t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6244,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[16],a[8]=((C_word*)t0)[15],tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 617 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t8,lf[158],((C_word*)t0)[15],lf[164],C_SCHEME_FALSE,((C_word*)t0)[11]);}
else{
-t8=(C_word)C_eqp(((C_word*)t0)[13],lf[166]);
-t9=(C_truep(t8)?t8:(C_word)C_eqp(((C_word*)t0)[13],lf[167]));
+t8=C_eqp(((C_word*)t0)[14],lf[165]);
+t9=(C_truep(t8)?t8:C_eqp(((C_word*)t0)[14],lf[166]));
if(C_truep(t9)){
-t10=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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]);}
+t10=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6456,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[15],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 632 ##sys#check-syntax");
+((C_proc5)C_retrieve_symbol_proc(lf[125]))(5,*((C_word*)lf[125]+1),t10,lf[165],((C_word*)t0)[15],lf[170]);}
else{
-t10=(C_word)C_eqp(((C_word*)t0)[13],lf[172]);
-t11=(C_truep(t10)?t10:(C_word)C_eqp(((C_word*)t0)[13],lf[173]));
+t10=C_eqp(((C_word*)t0)[14],lf[171]);
+t11=(C_truep(t10)?t10:C_eqp(((C_word*)t0)[14],lf[172]));
if(C_truep(t11)){
-t12=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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]);}
+t12=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6613,a[2]=((C_word*)t0)[16],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[15],tmp=(C_word)a,a+=11,tmp);
+C_trace("compiler.scm: 647 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t12,lf[171],((C_word*)t0)[15],lf[184],C_SCHEME_FALSE,((C_word*)t0)[11]);}
else{
-t12=(C_word)C_eqp(((C_word*)t0)[13],lf[186]);
+t12=C_eqp(((C_word*)t0)[14],lf[185]);
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]);}
+t13=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6942,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[16],a[8]=((C_word*)t0)[13],tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 693 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t13,lf[185],((C_word*)t0)[15],lf[187],C_SCHEME_FALSE,((C_word*)t0)[11]);}
else{
-t13=(C_word)C_eqp(((C_word*)t0)[13],lf[189]);
+t13=C_eqp(((C_word*)t0)[14],lf[188]);
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]);}
+t14=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7029,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[16],a[8]=((C_word*)t0)[13],tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 709 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t14,lf[188],((C_word*)t0)[15],lf[189],C_SCHEME_FALSE,((C_word*)t0)[11]);}
else{
-t14=(C_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]);}
+t14=C_eqp(((C_word*)t0)[14],lf[190]);
+if(C_truep(t14)){
+t15=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7150,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[12],a[8]=((C_word*)t0)[16],a[9]=((C_word*)t0)[13],tmp=(C_word)a,a+=10,tmp);
+t16=C_i_car(((C_word*)t0)[15]);
+t17=C_i_cadr(((C_word*)t0)[15]);
+if(C_truep(C_i_pairp(t17))){
+C_trace("compiler.scm: 727 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t15,t16,((C_word*)t0)[15],lf[197],C_SCHEME_FALSE,((C_word*)t0)[11]);}
else{
-C_trace("compiler.scm: 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]);}}
+C_trace("compiler.scm: 727 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t15,t16,((C_word*)t0)[15],lf[198],C_SCHEME_FALSE,((C_word*)t0)[11]);}}
+else{
+t15=C_eqp(((C_word*)t0)[14],lf[199]);
+if(C_truep(t15)){
+t16=C_i_cadr(((C_word*)t0)[15]);
+t17=C_i_caddr(((C_word*)t0)[15]);
+t18=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7295,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t17,a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[12],a[8]=((C_word*)t0)[16],a[9]=((C_word*)t0)[13],tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 755 ##sys#strip-syntax");
+((C_proc5)C_retrieve_symbol_proc(lf[127]))(5,*((C_word*)lf[127]+1),t18,t16,((C_word*)t0)[11],C_SCHEME_FALSE);}
else{
-t16=(C_word)C_eqp(((C_word*)t0)[13],lf[201]);
+t16=C_eqp(((C_word*)t0)[14],lf[204]);
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);}
+t17=C_SCHEME_END_OF_LIST;
+t18=(*a=C_VECTOR_TYPE|1,a[1]=t17,tmp=(C_word)a,a+=2,tmp);
+t19=C_SCHEME_FALSE;
+t20=(*a=C_VECTOR_TYPE|1,a[1]=t19,tmp=(C_word)a,a+=2,tmp);
+t21=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7402,a[2]=((C_word*)t0)[16],a[3]=((C_word*)t0)[15],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[13],tmp=(C_word)a,a+=8,tmp);
+t22=C_i_cadr(((C_word*)t0)[15]);
+t23=C_SCHEME_UNDEFINED;
+t24=(*a=C_VECTOR_TYPE|1,a[1]=t23,tmp=(C_word)a,a+=2,tmp);
+t25=C_set_block_item(t24,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7509,a[2]=t18,a[3]=t24,a[4]=t20,a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[11],tmp=(C_word)a,a+=7,tmp));
+t26=((C_word*)t24)[1];
+f_7509(t26,t21,t22);}
else{
-t17=(C_word)C_eqp(((C_word*)t0)[13],lf[206]);
+t17=C_eqp(((C_word*)t0)[14],lf[208]);
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);}
+t18=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7596,a[2]=((C_word*)t0)[16],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[15],tmp=(C_word)a,a+=9,tmp);
+t19=C_i_cadr(((C_word*)t0)[15]);
+C_trace("compiler.scm: 807 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t18,t19);}
else{
-t18=(C_word)C_eqp(((C_word*)t0)[13],lf[210]);
+t18=C_eqp(((C_word*)t0)[14],lf[248]);
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]);
+t19=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8121,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[16],a[5]=((C_word*)t0)[13],a[6]=((C_word*)t0)[15],tmp=(C_word)a,a+=7,tmp);
+t20=C_i_cddr(((C_word*)t0)[15]);
C_trace("##sys#append");
-t22=*((C_word*)lf[168]+1);
-((C_proc4)(void*)(*((C_word*)t22+1)))(4,t22,t20,t21,C_SCHEME_END_OF_LIST);}
+t21=*((C_word*)lf[167]+1);
+((C_proc4)(void*)(*((C_word*)t21+1)))(4,t21,t19,t20,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);}
+t19=C_eqp(((C_word*)t0)[14],lf[249]);
+if(C_truep(t19)){
+t20=C_i_cadr(((C_word*)t0)[15]);
+t21=C_i_cddr(((C_word*)t0)[15]);
+t22=C_SCHEME_END_OF_LIST;
+t23=(*a=C_VECTOR_TYPE|1,a[1]=t22,tmp=(C_word)a,a+=2,tmp);
+t24=C_SCHEME_FALSE;
+t25=(*a=C_VECTOR_TYPE|1,a[1]=t24,tmp=(C_word)a,a+=2,tmp);
+t26=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8140,a[2]=((C_word*)t0)[11],a[3]=t21,a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[13],a[6]=t20,a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[16],tmp=(C_word)a,a+=9,tmp);
+t27=C_SCHEME_UNDEFINED;
+t28=(*a=C_VECTOR_TYPE|1,a[1]=t27,tmp=(C_word)a,a+=2,tmp);
+t29=C_set_block_item(t28,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8223,a[2]=t23,a[3]=t28,a[4]=t25,tmp=(C_word)a,a+=5,tmp));
+t30=((C_word*)t28)[1];
+f_8223(t30,t26,t20);}
+else{
+t20=C_eqp(((C_word*)t0)[14],lf[250]);
+t21=(C_truep(t20)?t20:C_eqp(((C_word*)t0)[14],lf[168]));
+if(C_truep(t21)){
+t22=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8268,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[16],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[15],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 911 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t22,lf[250],((C_word*)t0)[15],lf[269],C_SCHEME_FALSE,((C_word*)t0)[11]);}
else{
-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]));
+t22=C_eqp(((C_word*)t0)[14],lf[270]);
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]);}
+t23=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8601,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[16],tmp=(C_word)a,a+=7,tmp);
+t24=C_i_cadr(((C_word*)t0)[15]);
+C_trace("compiler.scm: 963 unquotify");
+t25=((C_word*)((C_word*)t0)[4])[1];
+f_5378(t25,t23,t24,((C_word*)t0)[11]);}
else{
-t23=(C_word)C_eqp(((C_word*)t0)[13],lf[272]);
+t23=C_eqp(((C_word*)t0)[14],lf[271]);
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]);
+t24=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8634,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[16],tmp=(C_word)a,a+=7,tmp);
+t25=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8648,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t26=C_i_cadr(((C_word*)t0)[15]);
C_trace("map");
-t28=*((C_word*)lf[274]+1);
-((C_proc4)(void*)(*((C_word*)t28+1)))(4,t28,t25,t26,t27);}
+t27=*((C_word*)lf[272]+1);
+((C_proc4)(void*)(*((C_word*)t27+1)))(4,t27,t24,t25,t26);}
else{
-t25=(C_word)C_eqp(((C_word*)t0)[13],lf[253]);
+t24=C_eqp(((C_word*)t0)[14],lf[251]);
+if(C_truep(t24)){
+t25=C_i_cadr(((C_word*)t0)[15]);
+t26=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8681,a[2]=((C_word*)t0)[16],a[3]=t25,tmp=(C_word)a,a+=4,tmp);
+t27=C_i_caddr(((C_word*)t0)[15]);
+C_trace("compiler.scm: 971 walk");
+t28=((C_word*)((C_word*)t0)[13])[1];
+f_5724(t28,t26,t27,((C_word*)t0)[12],((C_word*)t0)[11],C_SCHEME_FALSE);}
+else{
+t25=C_eqp(((C_word*)t0)[14],lf[254]);
if(C_truep(t25)){
-t26=(C_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);}
+t26=C_i_cadr(((C_word*)t0)[15]);
+t27=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8710,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[16],a[7]=t26,tmp=(C_word)a,a+=8,tmp);
+t28=C_i_caddr(((C_word*)t0)[15]);
+C_trace("compiler.scm: 976 walk");
+t29=((C_word*)((C_word*)t0)[13])[1];
+f_5724(t29,t27,t28,((C_word*)t0)[12],((C_word*)t0)[11],C_SCHEME_FALSE);}
else{
-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);}
+t26=C_eqp(((C_word*)t0)[14],lf[273]);
+t27=(C_truep(t26)?t26:C_eqp(((C_word*)t0)[14],lf[274]));
+if(C_truep(t27)){
+t28=C_i_cadr(((C_word*)t0)[15]);
+t29=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8741,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=t28,a[6]=((C_word*)t0)[16],a[7]=((C_word*)t0)[13],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 981 eval/meta");
+f_5594(t29,t28);}
+else{
+t28=C_eqp(((C_word*)t0)[14],lf[275]);
+t29=(C_truep(t28)?t28:C_eqp(((C_word*)t0)[14],lf[276]));
+if(C_truep(t29)){
+t30=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8756,a[2]=((C_word*)t0)[16],tmp=(C_word)a,a+=3,tmp);
+t31=C_i_cadr(((C_word*)t0)[15]);
+C_trace("compiler.scm: 985 eval/meta");
+f_5594(t30,t31);}
+else{
+t30=C_eqp(((C_word*)t0)[14],lf[175]);
+t31=(C_truep(t30)?t30:C_eqp(((C_word*)t0)[14],lf[151]));
+if(C_truep(t31)){
+t32=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8772,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[13],a[6]=((C_word*)t0)[16],a[7]=((C_word*)t0)[15],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 989 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t32,lf[175],((C_word*)t0)[15],lf[279],C_SCHEME_FALSE,((C_word*)t0)[11]);}
else{
-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]));
+t32=C_eqp(((C_word*)t0)[14],lf[280]);
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]);}
+t33=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8839,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1001 expand-foreign-lambda");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[281]+1)))(4,*((C_word*)lf[281]+1),t33,((C_word*)t0)[15],C_SCHEME_FALSE);}
else{
-t33=(C_word)C_eqp(((C_word*)t0)[13],lf[282]);
+t33=C_eqp(((C_word*)t0)[14],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);}
+t34=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8852,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1004 expand-foreign-lambda");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[281]+1)))(4,*((C_word*)lf[281]+1),t34,((C_word*)t0)[15],C_SCHEME_TRUE);}
else{
-t34=(C_word)C_eqp(((C_word*)t0)[13],lf[284]);
+t34=C_eqp(((C_word*)t0)[14],lf[283]);
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);}
+t35=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8865,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1007 expand-foreign-lambda*");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[284]+1)))(4,*((C_word*)lf[284]+1),t35,((C_word*)t0)[15],C_SCHEME_FALSE);}
else{
-t35=(C_word)C_eqp(((C_word*)t0)[13],lf[285]);
+t35=C_eqp(((C_word*)t0)[14],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);}
+t36=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8878,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1010 expand-foreign-lambda*");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[284]+1)))(4,*((C_word*)lf[284]+1),t36,((C_word*)t0)[15],C_SCHEME_TRUE);}
else{
-t36=(C_word)C_eqp(((C_word*)t0)[13],lf[287]);
+t36=C_eqp(((C_word*)t0)[14],lf[286]);
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);}
+t37=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8891,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[16],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1013 expand-foreign-primitive");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[287]+1)))(3,*((C_word*)lf[287]+1),t37,((C_word*)t0)[15]);}
else{
-t37=(C_word)C_eqp(((C_word*)t0)[13],lf[288]);
+t37=C_eqp(((C_word*)t0)[14],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]);}
+t38=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8900,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[16],tmp=(C_word)a,a+=4,tmp);
+t39=C_i_cadr(((C_word*)t0)[15]);
+C_trace("compiler.scm: 1016 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t38,t39);}
else{
-t38=(C_word)C_eqp(((C_word*)t0)[13],lf[290]);
+t38=C_eqp(((C_word*)t0)[14],lf[291]);
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);}
+t39=C_i_cadr(((C_word*)t0)[15]);
+t40=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8957,a[2]=t39,a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[16],a[7]=((C_word*)t0)[13],a[8]=((C_word*)t0)[15],tmp=(C_word)a,a+=9,tmp);
+t41=C_i_caddr(((C_word*)t0)[15]);
+C_trace("compiler.scm: 1031 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t40,t41);}
else{
-t39=(C_word)C_eqp(((C_word*)t0)[13],lf[293]);
+t39=C_eqp(((C_word*)t0)[14],lf[296]);
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);}
+t40=C_i_cadr(((C_word*)t0)[15]);
+t41=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9121,a[2]=t40,a[3]=((C_word*)t0)[16],a[4]=((C_word*)t0)[15],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1054 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),t41,t40);}
else{
-t40=(C_word)C_eqp(((C_word*)t0)[13],lf[298]);
+t40=C_eqp(((C_word*)t0)[14],lf[301]);
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);}
+t41=C_i_cadr(((C_word*)t0)[15]);
+t42=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9177,a[2]=((C_word*)t0)[11],a[3]=t41,a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[16],a[7]=((C_word*)t0)[13],a[8]=((C_word*)t0)[15],tmp=(C_word)a,a+=9,tmp);
+t43=C_i_caddr(((C_word*)t0)[15]);
+C_trace("compiler.scm: 1068 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t42,t43);}
else{
-t41=(C_word)C_eqp(((C_word*)t0)[13],lf[303]);
+t41=C_eqp(((C_word*)t0)[14],lf[305]);
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);}
+t42=C_i_cadr(((C_word*)t0)[15]);
+t43=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9338,a[2]=t42,a[3]=((C_word*)t0)[16],tmp=(C_word)a,a+=4,tmp);
+t44=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9342,a[2]=t43,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1094 cdaddr");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[307]+1)))(3,*((C_word*)lf[307]+1),t44,((C_word*)t0)[15]);}
else{
-t42=(C_word)C_eqp(((C_word*)t0)[13],lf[307]);
+t42=C_eqp(((C_word*)t0)[14],lf[308]);
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);
+t43=C_i_cadr(((C_word*)t0)[15]);
+t44=C_i_caddr(((C_word*)t0)[15]);
+t45=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9357,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[16],a[6]=t43,tmp=(C_word)a,a+=7,tmp);
+t46=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9488,a[2]=t43,a[3]=t44,tmp=(C_word)a,a+=4,tmp);
C_trace("call-with-current-continuation");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[239]+1)))(3,*((C_word*)lf[239]+1),t46,t47);}
+((C_proc3)C_retrieve_proc(*((C_word*)lf[237]+1)))(3,*((C_word*)lf[237]+1),t45,t46);}
else{
-t44=(C_word)C_eqp(((C_word*)t0)[13],lf[317]);
+t43=C_eqp(((C_word*)t0)[14],lf[315]);
+if(C_truep(t43)){
+t44=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9563,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[16],a[4]=((C_word*)t0)[13],tmp=(C_word)a,a+=5,tmp);
+t45=C_SCHEME_END_OF_LIST;
+t46=(*a=C_VECTOR_TYPE|1,a[1]=t45,tmp=(C_word)a,a+=2,tmp);
+t47=C_SCHEME_FALSE;
+t48=(*a=C_VECTOR_TYPE|1,a[1]=t47,tmp=(C_word)a,a+=2,tmp);
+t49=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9567,a[2]=t44,tmp=(C_word)a,a+=3,tmp);
+t50=C_i_cdr(((C_word*)t0)[15]);
+t51=C_SCHEME_UNDEFINED;
+t52=(*a=C_VECTOR_TYPE|1,a[1]=t51,tmp=(C_word)a,a+=2,tmp);
+t53=C_set_block_item(t52,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9573,a[2]=t46,a[3]=t52,a[4]=t48,a[5]=((C_word*)t0)[11],tmp=(C_word)a,a+=6,tmp));
+t54=((C_word*)t52)[1];
+f_9573(t54,t49,t50);}
+else{
+t44=C_eqp(((C_word*)t0)[14],lf[317]);
if(C_truep(t44)){
-t45=(*a=C_CLOSURE_TYPE|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);
+t45=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9622,a[2]=((C_word*)t0)[15],tmp=(C_word)a,a+=3,tmp);
+t46=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9632,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
C_trace("##sys#call-with-values");
-C_call_with_values(4,0,((C_word*)t0)[15],t46,t47);}
+C_call_with_values(4,0,((C_word*)t0)[16],t45,t46);}
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]);}
+t45=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9943,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[2],tmp=(C_word)a,a+=8,tmp);
+t46=C_eqp(lf[340],((C_word*)t0)[14]);
+if(C_truep(t46)){
+t47=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9983,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[16],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[15],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 1220 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[125]))(7,*((C_word*)lf[125]+1),t47,lf[340],((C_word*)t0)[15],lf[342],C_SCHEME_FALSE,((C_word*)t0)[11]);}
else{
-C_trace("compiler.scm: 1216 handle-call");
-t48=t46;
-f_9944(t48,((C_word*)t0)[15]);}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+C_trace("compiler.scm: 1236 handle-call");
+t47=t45;
+f_9943(t47,((C_word*)t0)[16]);}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
-/* 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){
+/* k9981 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9983(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -18946,27 +18661,27 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_9983,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[7]);
+if(C_truep(C_i_symbolp(t2))){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10116,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1223 lookup");
t4=((C_word*)((C_word*)t0)[2])[1];
-f_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");
+f_5290(t4,t3,t2,((C_word*)t0)[4]);}
+else{
+t3=C_a_i_cons(&a,2,lf[340],C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,lf[98],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,C_SCHEME_FALSE,t5);
+t7=C_a_i_cons(&a,2,C_fix(0),t6);
+t8=C_a_i_cons(&a,2,t2,t7);
+t9=C_a_i_cons(&a,2,lf[341],t8);
+C_trace("compiler.scm: 1234 walk");
t10=((C_word*)((C_word*)t0)[6])[1];
-f_5774(t10,((C_word*)t0)[3],t9,((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_FALSE);}}
+f_5724(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){
+/* k10114 in k9981 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10116(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -18983,39 +18698,39 @@ 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));
+C_save_and_reclaim((void*)tr2,(void*)f_10116,2,t0,t1);}
+t2=C_i_assq(t1,*((C_word*)lf[75]+1));
if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9999,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+C_trace("g16661667");
t4=t3;
-f_10000(t4,((C_word*)t0)[3],t2);}
+f_9999(t4,((C_word*)t0)[3],t2);}
else{
-t3=(C_word)C_i_assq(((C_word*)t0)[2],*((C_word*)lf[73]+1));
+t3=C_i_assq(((C_word*)t0)[2],*((C_word*)lf[72]+1));
if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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");
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10045,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+C_trace("g16741675");
t5=t4;
-f_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");
+f_10045(t5,((C_word*)t0)[3],t3);}
+else{
+if(C_truep(C_i_memq(((C_word*)t0)[2],*((C_word*)lf[78]+1)))){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10077,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1231 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),t4,((C_word*)t0)[2]);}
+else{
+t4=C_a_i_cons(&a,2,lf[340],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,lf[98],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,C_SCHEME_FALSE,t6);
+t8=C_a_i_cons(&a,2,C_fix(0),t7);
+t9=C_a_i_cons(&a,2,((C_word*)t0)[2],t8);
+t10=C_a_i_cons(&a,2,lf[341],t9);
+C_trace("compiler.scm: 1233 walk");
t11=((C_word*)((C_word*)t0)[6])[1];
-f_5774(t11,((C_word*)t0)[3],t10,((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_FALSE);}}}}
+f_5724(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){
+/* k10075 in k10114 in k9981 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_10077(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19023,28 +18738,28 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_10077,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[297],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,lf[101],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,lf[100],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){
+/* g1674 in k10114 in k9981 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_10045(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10046,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_cdr(t2);
-C_trace("compiler.scm: 1209 walk");
+C_save_and_reclaim((void*)trf_10045,NULL,3,t0,t1,t2);}
+t3=C_i_cdr(t2);
+C_trace("compiler.scm: 1229 walk");
t4=((C_word*)((C_word*)t0)[4])[1];
-f_5774(t4,t1,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+f_5724(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){
+/* g1666 in k10114 in k9981 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_9999(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -19057,48 +18772,48 @@ 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");
+C_save_and_reclaim((void*)trf_9999,NULL,3,t0,t1,t2);}
+t3=C_i_cadr(t2);
+t4=C_a_i_cons(&a,2,lf[340],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,lf[98],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,C_SCHEME_FALSE,t6);
+t8=C_a_i_cons(&a,2,C_fix(0),t7);
+t9=C_a_i_cons(&a,2,t3,t8);
+t10=C_a_i_cons(&a,2,lf[341],t9);
+C_trace("compiler.scm: 1225 walk");
t11=((C_word*)((C_word*)t0)[4])[1];
-f_5774(t11,t1,t10,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+f_5724(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){
+/* handle-call in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_9943(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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");
+C_save_and_reclaim((void*)trf_9943,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9947,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1209 mapwalk");
t3=((C_word*)((C_word*)t0)[5])[1];
-f_10328(t3,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_10324(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){
+/* k9945 in handle-call in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9947(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9947,2,t0,t1);}
+t2=C_i_car(t1);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9953,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1211 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[107]))(4,*((C_word*)lf[107]+1),t3,*((C_word*)lf[53]+1),t2);}
-/* 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){
+/* k9951 in k9945 in handle-call in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9953(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19106,43 +18821,43 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9953,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9956,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
if(C_truep(((C_word*)t0)[4])){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9968,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9967,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
if(C_truep(t1)){
-t4=(C_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);}
+t4=C_i_cdr(t1);
+C_trace("compiler.scm: 1216 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t3,((C_word*)t0)[5],((C_word*)t0)[4],t4);}
else{
-C_trace("compiler.scm: 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);}}
+C_trace("compiler.scm: 1216 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t3,((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}}
else{
t3=((C_word*)t0)[6];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[5]);}}
-/* 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){
+/* k9965 in k9951 in k9945 in handle-call in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9967(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9967,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+C_trace("compiler.scm: 1213 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[294]))(5,*((C_word*)lf[294]+1),((C_word*)t0)[3],*((C_word*)lf[53]+1),((C_word*)t0)[2],t2);}
-/* 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){
+/* k9954 in k9951 in k9945 in handle-call in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9956(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-/* 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){
+/* a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9632(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -19158,40 +18873,40 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_9632,4,t0,t1,t2,t3);}
+t4=C_i_car(t3);
+t5=C_i_car(t2);
+t6=C_i_cadr(t5);
+t7=C_i_caddr(t2);
+t8=C_i_cadr(t7);
+t9=C_i_cadddr(t2);
+t10=C_i_cadr(t9);
+t11=C_i_cadr(t4);
+t12=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_9651,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t10,a[5]=((C_word*)t0)[3],a[6]=t6,a[7]=t4,a[8]=t8,a[9]=((C_word*)t0)[4],a[10]=((C_word*)t0)[5],a[11]=((C_word*)t0)[6],a[12]=t11,a[13]=t1,tmp=(C_word)a,a+=14,tmp);
+t13=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9923,a[2]=t12,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1139 valid-c-identifier?");
+((C_proc3)C_retrieve_symbol_proc(lf[339]))(3,*((C_word*)lf[339]+1),t13,t6);}
-/* 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){
+/* k9921 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9923(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9924,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_9923,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);
+t2=C_a_i_cons(&a,2,((C_word*)t0)[3],*((C_word*)lf[78]+1));
+t3=C_mutate((C_word*)lf[78]+1 /* (set! callback-names ...) */,t2);
t4=((C_word*)t0)[2];
-f_9652(2,t4,t3);}
+f_9651(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]);}}
+C_trace("compiler.scm: 1141 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[313]))(4,*((C_word*)lf[313]+1),((C_word*)t0)[2],lf[338],((C_word*)t0)[3]);}}
-/* 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){
+/* k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9651(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19204,55 +18919,55 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9651,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_9654,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
+t3=C_i_listp(((C_word*)t0)[12]);
+t4=C_i_not(t3);
if(C_truep(t4)){
if(C_truep(t4)){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1146 syntax-error");
+((C_proc5)C_retrieve_symbol_proc(lf[119]))(5,*((C_word*)lf[119]+1),t2,lf[337],((C_word*)t0)[12],((C_word*)t0)[4]);}
else{
t5=t2;
-f_9655(2,t5,C_SCHEME_UNDEFINED);}}
+f_9654(2,t5,C_SCHEME_UNDEFINED);}}
else{
-t5=(C_word)C_i_listp(((C_word*)t0)[4]);
-t6=(C_word)C_i_not(t5);
+t5=C_i_listp(((C_word*)t0)[4]);
+t6=C_i_not(t5);
if(C_truep(t6)){
if(C_truep(t6)){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1146 syntax-error");
+((C_proc5)C_retrieve_symbol_proc(lf[119]))(5,*((C_word*)lf[119]+1),t2,lf[337],((C_word*)t0)[12],((C_word*)t0)[4]);}
else{
t7=t2;
-f_9655(2,t7,C_SCHEME_UNDEFINED);}}
+f_9654(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);
+t7=C_i_length(((C_word*)t0)[12]);
+t8=C_i_length(((C_word*)t0)[4]);
+t9=C_eqp(t7,t8);
if(C_truep(t9)){
t10=t2;
-f_9655(2,t10,C_SCHEME_UNDEFINED);}
+f_9654(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]);}}}}
+C_trace("compiler.scm: 1146 syntax-error");
+((C_proc5)C_retrieve_symbol_proc(lf[119]))(5,*((C_word*)lf[119]+1),t2,lf[337],((C_word*)t0)[12],((C_word*)t0)[4]);}}}}
-/* 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){
+/* k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9654(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[15],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_9654,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9661,a[2]=((C_word*)t0)[13],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_9665,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=t2,tmp=(C_word)a,a+=12,tmp);
+C_trace("compiler.scm: 1150 mapwalk");
t4=((C_word*)((C_word*)t0)[3])[1];
-f_10328(t4,t3,((C_word*)t0)[2],((C_word*)t0)[10],((C_word*)t0)[9]);}
+f_10324(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){
+/* k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9665(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19262,17 +18977,17 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9665,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9673,a[2]=t1,a[3]=((C_word*)t0)[11],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9697,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t2,a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9839,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9838,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
t7=((C_word*)t5)[1];
-f_9839(t7,t3,((C_word*)t0)[10],((C_word*)t0)[2]);}
+f_9838(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){
+/* loop in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_9838(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -19282,37 +18997,37 @@ 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))){
+C_save_and_reclaim((void*)trf_9838,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t2))){
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
else{
-t4=(C_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);}}
+t4=C_i_car(t2);
+t5=C_i_car(t3);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9874,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t2,a[5]=t1,a[6]=t4,tmp=(C_word)a,a+=7,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9878,a[2]=t5,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9882,a[2]=t4,a[3]=t7,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1163 final-foreign-type");
+((C_proc3)C_retrieve_symbol_proc(lf[103]))(3,*((C_word*)lf[103]+1),t8,t5);}}
-/* 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){
+/* k9880 in loop in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9882(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1163 finish-foreign-result");
+((C_proc4)C_retrieve_symbol_proc(lf[102]))(4,*((C_word*)lf[102]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k9876 in loop in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9878(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 1162 foreign-type-convert-result");
+((C_proc4)C_retrieve_symbol_proc(lf[101]))(4,*((C_word*)lf[101]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k9872 in loop in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9874(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19321,27 +19036,27 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_9874,2,t0,t1);}
+t2=C_a_i_list(&a,2,((C_word*)t0)[6],t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9862,a[2]=t2,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t4=C_i_cdr(((C_word*)t0)[4]);
+t5=C_i_cdr(((C_word*)t0)[3]);
+C_trace("compiler.scm: 1165 loop");
t6=((C_word*)((C_word*)t0)[2])[1];
-f_9839(t6,t3,t4,t5);}
+f_9838(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){
+/* k9860 in k9872 in loop in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9862(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9863,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_9862,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k9695 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9697(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19354,35 +19069,35 @@ 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_save_and_reclaim((void*)tr2,(void*)f_9697,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9705,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9717,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9721,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_truep(C_i_equalp(((C_word*)t0)[5],lf[319]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[320]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[321]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[322]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))){
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9747,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t6=C_i_cddr(((C_word*)t0)[4]);
C_trace("##sys#append");
-t7=*((C_word*)lf[168]+1);
+t7=*((C_word*)lf[167]+1);
((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
else{
-if(C_truep((C_truep((C_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]);}
+if(C_truep((C_truep(C_i_equalp(((C_word*)t0)[5],lf[324]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[325]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[326]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[327]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[328]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[329]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))))){
+C_trace("compiler.scm: 1187 syntax-error");
+((C_proc5)C_retrieve_symbol_proc(lf[119]))(5,*((C_word*)lf[119]+1),t4,lf[330],((C_word*)t0)[5],((C_word*)t0)[3]);}
else{
-if(C_truep((C_truep((C_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]);
+if(C_truep((C_truep(C_i_equalp(((C_word*)t0)[5],lf[331]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[332]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[333]))?C_SCHEME_TRUE:(C_truep(C_i_equalp(((C_word*)t0)[5],lf[334]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))){
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9829,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+t6=C_i_cddr(((C_word*)t0)[4]);
C_trace("##sys#append");
-t7=*((C_word*)lf[168]+1);
+t7=*((C_word*)lf[167]+1);
((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
else{
-t5=(C_word)C_i_cddr(((C_word*)t0)[4]);
+t5=C_i_cddr(((C_word*)t0)[4]);
C_trace("##sys#append");
-t6=*((C_word*)lf[168]+1);
+t6=*((C_word*)lf[167]+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){
+/* k9827 in k9695 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9829(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19393,19 +19108,19 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_9829,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,lf[159],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,lf[335],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9793,a[2]=((C_word*)t0)[4],a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1199 macro-alias");
t8=((C_word*)((C_word*)t0)[3])[1];
-f_5355(t8,t7,lf[338],((C_word*)t0)[2]);}
+f_5305(t8,t7,lf[336],((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){
+/* k9791 in k9827 in k9695 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9793(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19419,22 +19134,22 @@ 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_save_and_reclaim((void*)tr2,(void*)f_9793,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[335],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,lf[323],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,lf[335],t4);
+t6=C_a_i_cons(&a,2,t1,t5);
+t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,((C_word*)t0)[3],t7);
+t9=C_a_i_cons(&a,2,lf[159],t8);
+t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
C_trace("##sys#append");
-t11=*((C_word*)lf[168]+1);
+t11=*((C_word*)lf[167]+1);
((C_proc4)(void*)(*((C_word*)t11+1)))(4,t11,((C_word*)t0)[2],t10,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k9745 in k9695 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9747(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19444,41 +19159,41 @@ 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_save_and_reclaim((void*)tr2,(void*)f_9747,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,lf[159],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,lf[323],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
C_trace("##sys#append");
-t7=*((C_word*)lf[168]+1);
+t7=*((C_word*)lf[167]+1);
((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,((C_word*)t0)[2],t6,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k9719 in k9695 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9721(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#append");
-t2=*((C_word*)lf[168]+1);
+t2=*((C_word*)lf[167]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k9715 in k9695 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9717(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_9717,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,lf[159],t2);
+C_trace("compiler.scm: 1166 foreign-type-convert-argument");
+((C_proc4)C_retrieve_symbol_proc(lf[253]))(4,*((C_word*)lf[253]+1),((C_word*)t0)[3],t3,((C_word*)t0)[2]);}
-/* 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){
+/* k9703 in k9695 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9705(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19489,55 +19204,55 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_9705,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
+t4=C_a_i_cons(&a,2,lf[159],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[6],t5);
+t7=C_a_i_cons(&a,2,lf[172],t6);
+C_trace("compiler.scm: 1151 walk");
t8=((C_word*)((C_word*)t0)[5])[1];
-f_5774(t8,((C_word*)t0)[4],t7,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+f_5724(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){
+/* k9671 in k9663 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9673(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9674,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+C_save_and_reclaim((void*)tr2,(void*)f_9673,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
C_trace("##sys#append");
-t3=*((C_word*)lf[168]+1);
+t3=*((C_word*)lf[167]+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){
+/* k9659 in k9652 in k9649 in a9631 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9661(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9662,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_9661,2,t0,t1);}
t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,lf[319],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_cons(&a,2,lf[317],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){
+/* a9621 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9622(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_9622,2,t0,t1);}
+t2=C_i_cdr(((C_word*)t0)[2]);
+C_trace("compiler.scm: 1133 split-at");
+((C_proc4)C_retrieve_symbol_proc(lf[318]))(4,*((C_word*)lf[318]+1),t1,t2,C_fix(4));}
-/* 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){
+/* loop1559 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_9573(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -19546,21 +19261,21 @@ 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");
+C_save_and_reclaim((void*)trf_9573,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9600,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9607,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g15751576");
t6=t3;
-f_9601(t6,t4,t5);}
+f_9600(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k9605 in loop1559 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9607(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19572,57 +19287,57 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9607,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop15441557");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop15591572");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_9574(t6,((C_word*)t0)[3],t5);}
+f_9573(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop15441557");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop15591572");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_9574(t6,((C_word*)t0)[3],t5);}}
+f_9573(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){
+/* g1575 in loop1559 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_9600(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_9600,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 1128 process-declaration");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[316]+1)))(4,*((C_word*)lf[316]+1),t1,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k9565 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9567(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#append");
-t2=*((C_word*)lf[168]+1);
+t2=*((C_word*)lf[167]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k9561 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9563(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9564,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[152],t1);
-C_trace("compiler.scm: 1105 walk");
+C_save_and_reclaim((void*)tr2,(void*)f_9563,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[151],t1);
+C_trace("compiler.scm: 1125 walk");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_5774(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
+f_5724(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){
+/* a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9488(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -19630,14 +19345,14 @@ 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_save_and_reclaim((void*)tr3,(void*)f_9488,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9494,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9506,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("with-exception-handler");
-((C_proc4)C_retrieve_symbol_proc(lf[238]))(4,*((C_word*)lf[238]+1),t1,t3,t4);}
+((C_proc4)C_retrieve_symbol_proc(lf[236]))(4,*((C_word*)lf[236]+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){
+/* a9505 in a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9506(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19645,61 +19360,61 @@ 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_save_and_reclaim((void*)tr2,(void*)f_9506,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9512,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9536,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("##sys#call-with-values");
C_call_with_values(4,0,t1,t2,t3);}
-/* 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,...){
+/* a9535 in a9505 in a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9536(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
C_word *a,c2=c;
C_save_rest(t1,c2,2);
if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_9537r,2,t0,t1);}
+C_save_and_reclaim((void*)tr2r,(void*)f_9536r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_9537r(t0,t1,t2);}}
+f_9536r(t0,t1,t2);}}
-static void C_ccall f_9537r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_9536r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9543,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("k14721477");
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9542,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("k14871492");
t4=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-/* 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){
+/* a9541 in a9535 in a9505 in a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9542(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9543,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_9542,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){
+/* a9511 in a9505 in a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9512(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_9512,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9519,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1106 collapsable-literal?");
+((C_proc3)C_retrieve_symbol_proc(lf[312]))(3,*((C_word*)lf[312]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k9517 in a9511 in a9505 in a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9519(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19707,57 +19422,57 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9519,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
else{
-t2=(C_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);}}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,*((C_word*)lf[77]+1),t2);
+t4=C_a_i_cons(&a,2,lf[159],t3);
+C_trace("compiler.scm: 1108 eval");
+((C_proc3)C_retrieve_symbol_proc(lf[147]))(3,*((C_word*)lf[147]+1),((C_word*)t0)[3],t4);}}
-/* 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){
+/* a9493 in a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9494(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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");
+C_save_and_reclaim((void*)tr3,(void*)f_9494,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9500,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("k14871492");
t4=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-/* 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){
+/* a9499 in a9493 in a9487 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9500(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_9500,2,t0,t1);}
+C_trace("compiler.scm: 1104 quit");
+((C_proc5)C_retrieve_symbol_proc(lf[313]))(5,*((C_word*)lf[313]+1),t1,lf[314],((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9357(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_9357,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9360,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("g14901491");
t3=t1;
((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-/* 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){
+/* k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9360(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19769,19 +19484,19 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9360,2,t0,t1);}
+t2=C_set_block_item(lf[58] /* constants-used */,0,C_SCHEME_TRUE);
+t3=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,lf[98],t3);
+t5=C_a_i_list(&a,2,((C_word*)t0)[6],t4);
+t6=C_a_i_cons(&a,2,t5,*((C_word*)lf[77]+1));
+t7=C_mutate((C_word*)lf[77]+1 /* (set! defconstant-bindings ...) */,t6);
+t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9371,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 1113 collapsable-literal?");
+((C_proc3)C_retrieve_symbol_proc(lf[312]))(3,*((C_word*)lf[312]+1),t8,t1);}
-/* 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){
+/* k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9371(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19789,45 +19504,45 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9371,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9374,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t3=C_a_i_list(&a,1,((C_word*)t0)[6]);
+C_trace("compiler.scm: 1114 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[294]))(5,*((C_word*)lf[294]+1),t2,*((C_word*)lf[57]+1),((C_word*)t0)[5],t3);}
else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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]);}}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9381,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 1117 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t2,lf[311]);}}
-/* 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){
+/* k9379 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9381(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9381,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9384,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+t3=C_a_i_list(&a,1,t1);
+C_trace("compiler.scm: 1118 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[294]))(5,*((C_word*)lf[294]+1),t2,*((C_word*)lf[57]+1),((C_word*)t0)[2],t3);}
-/* 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){
+/* k9382 in k9379 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9384(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_9384,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9387,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 1119 hide-variable");
+((C_proc3)C_retrieve_symbol_proc(lf[132]))(3,*((C_word*)lf[132]+1),t2,((C_word*)t0)[6]);}
-/* 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){
+/* k9385 in k9382 in k9379 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9387(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19838,35 +19553,35 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9387,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9417,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
t3=((C_word*)t0)[6];
t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9393,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t4))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9392,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t4))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[312],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[310],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);
+t6=C_i_cdr(t4);
+if(C_truep(C_i_nullp(t6))){
+t7=C_i_car(t4);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[312],t7);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[310],t7);}
else{
C_trace("##sys#error");
-t7=*((C_word*)lf[135]+1);
+t7=*((C_word*)lf[134]+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){
+/* k9390 in k9385 in k9382 in k9379 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9392(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[312],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[310],t1);}
-/* 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){
+/* k9415 in k9385 in k9382 in k9379 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9417(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19877,35 +19592,35 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9417,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9447,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
t3=((C_word*)t0)[6];
t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9423,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t4))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9422,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t4))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[134],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[133],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);
+t6=C_i_cdr(t4);
+if(C_truep(C_i_nullp(t6))){
+t7=C_i_car(t4);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[134],t7);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[133],t7);}
else{
C_trace("##sys#error");
-t7=*((C_word*)lf[135]+1);
+t7=*((C_word*)lf[134]+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){
+/* k9420 in k9415 in k9385 in k9382 in k9379 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9422(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-/* 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){
+/* k9445 in k9415 in k9385 in k9382 in k9379 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9447(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -19915,83 +19630,83 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_9447,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,lf[98],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
+t6=C_a_i_cons(&a,2,lf[292],t5);
+C_trace("compiler.scm: 1122 walk");
t7=((C_word*)((C_word*)t0)[5])[1];
-f_5774(t7,((C_word*)t0)[4],t6,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+f_5724(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){
+/* k9372 in k9369 in k9358 in k9355 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9374(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[311]);}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[309]);}
-/* 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){
+/* k9340 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9342(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#append");
-t2=*((C_word*)lf[168]+1);
+t2=*((C_word*)lf[167]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k9336 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9338(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9338,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[172],t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9333,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1095 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[294]))(5,*((C_word*)lf[294]+1),t3,*((C_word*)lf[55]+1),((C_word*)t0)[2],t2);}
-/* 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){
+/* k9331 in k9336 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9333(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_set_block_item(lf[57] /* inline-table-used */,0,C_SCHEME_TRUE);
+t2=C_set_block_item(lf[56] /* inline-table-used */,0,C_SCHEME_TRUE);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[308]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[306]);}
-/* 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){
+/* k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9177(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9177,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9180,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 1069 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t2);}
-/* 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){
+/* k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9180(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9180,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9183,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+C_trace("compiler.scm: 1070 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t2);}
-/* 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){
+/* k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9183(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20000,16 +19715,16 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_9183,2,t0,t1);}
+t2=C_i_cddddr(((C_word*)t0)[10]);
+t3=C_i_pairp(t2);
+t4=(C_truep(t3)?C_i_cadddr(((C_word*)t0)[10]):C_SCHEME_FALSE);
+t5=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_9189,a[2]=((C_word*)t0)[10],a[3]=t4,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=t1,a[12]=((C_word*)t0)[9],tmp=(C_word)a,a+=13,tmp);
+C_trace("compiler.scm: 1072 set-real-name!");
+((C_proc4)C_retrieve_symbol_proc(lf[97]))(4,*((C_word*)lf[97]+1),t5,((C_word*)t0)[9],((C_word*)t0)[3]);}
-/* 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){
+/* k9187 in k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9189(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20019,25 +19734,25 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_9189,2,t0,t1);}
+t2=C_a_i_list(&a,3,((C_word*)t0)[12],((C_word*)t0)[11],((C_word*)t0)[10]);
+t3=C_a_i_cons(&a,2,t2,*((C_word*)lf[75]+1));
+t4=C_mutate((C_word*)lf[75]+1 /* (set! location-pointer-map ...) */,t3);
+t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_9261,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9300,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1076 estimate-foreign-result-location-size");
+((C_proc3)C_retrieve_symbol_proc(lf[304]))(3,*((C_word*)lf[304]+1),t6,((C_word*)t0)[10]);}
-/* 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){
+/* k9298 in k9187 in k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9300(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1056 words");
-((C_proc3)C_retrieve_symbol_proc(lf[305]))(3,*((C_word*)lf[305]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 1076 words");
+((C_proc3)C_retrieve_symbol_proc(lf[303]))(3,*((C_word*)lf[303]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k9259 in k9187 in k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9261(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20057,31 +19772,31 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9261,2,t0,t1);}
+t2=C_fixnum_plus(C_fix(2),t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,lf[302],t3);
+t5=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,lf[98],t5);
+t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,t4,t7);
+t9=C_a_i_cons(&a,2,lf[271],t8);
+t10=C_a_i_list(&a,2,((C_word*)t0)[11],t9);
+t11=C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9224,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=t11,tmp=(C_word)a,a+=10,tmp);
+t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9228,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t12,tmp=(C_word)a,a+=5,tmp);
if(C_truep(((C_word*)t0)[3])){
-t14=(C_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);
+t14=C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
+t15=C_a_i_cons(&a,2,((C_word*)t0)[5],t14);
+t16=C_a_i_cons(&a,2,lf[168],t15);
t17=t13;
-f_9229(t17,(C_word)C_a_i_cons(&a,2,t16,C_SCHEME_END_OF_LIST));}
+f_9228(t17,C_a_i_cons(&a,2,t16,C_SCHEME_END_OF_LIST));}
else{
t14=t13;
-f_9229(t14,C_SCHEME_END_OF_LIST);}}
+f_9228(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){
+/* k9226 in k9259 in k9187 in k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_9228(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20089,33 +19804,33 @@ 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);
+C_save_and_reclaim((void*)trf_9228,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9236,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
if(C_truep(((C_word*)t0)[3])){
-C_trace("compiler.scm: 1068 fifth");
-((C_proc3)C_retrieve_symbol_proc(lf[302]))(3,*((C_word*)lf[302]+1),t2,((C_word*)t0)[2]);}
+C_trace("compiler.scm: 1088 fifth");
+((C_proc3)C_retrieve_symbol_proc(lf[300]))(3,*((C_word*)lf[300]+1),t2,((C_word*)t0)[2]);}
else{
-t3=(C_word)C_i_cadddr(((C_word*)t0)[2]);
-t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t3=C_i_cadddr(((C_word*)t0)[2]);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
C_trace("##sys#append");
-t5=*((C_word*)lf[168]+1);
+t5=*((C_word*)lf[167]+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){
+/* k9234 in k9226 in k9259 in k9187 in k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9236(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9237,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+C_save_and_reclaim((void*)tr2,(void*)f_9236,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
C_trace("##sys#append");
-t3=*((C_word*)lf[168]+1);
+t3=*((C_word*)lf[167]+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){
+/* k9222 in k9259 in k9187 in k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9224(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20125,26 +19840,26 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_9224,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[151],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[9],t3);
+t5=C_a_i_cons(&a,2,lf[158],t4);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9204,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t5,a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 1089 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t6,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k9202 in k9222 in k9259 in k9187 in k9181 in k9178 in k9175 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9204(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1055 walk");
+C_trace("compiler.scm: 1075 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]);}
+f_5724(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){
+/* k9119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9121(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20154,17 +19869,17 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9121,2,t0,t1);}
t2=t1;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(C_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);}
+t4=C_i_caddr(((C_word*)t0)[4]);
+t5=C_i_cadddr(((C_word*)t0)[4]);
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9130,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t5,a[6]=t4,a[7]=t3,tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 1057 make-random-name");
+((C_proc2)C_retrieve_symbol_proc(lf[88]))(2,*((C_word*)lf[88]+1),t6);}
-/* 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){
+/* k9128 in k9119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9130(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20172,37 +19887,37 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9130,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9133,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)t0)[5])){
t3=t2;
-f_9134(t3,C_SCHEME_UNDEFINED);}
+f_9133(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]);}}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9161,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9165,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1058 fifth");
+((C_proc3)C_retrieve_symbol_proc(lf[300]))(3,*((C_word*)lf[300]+1),t4,((C_word*)t0)[2]);}}
-/* 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){
+/* k9163 in k9128 in k9119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9165(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 1038 symbol->string");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[233]+1)))(3,*((C_word*)lf[233]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 1058 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k9159 in k9128 in k9119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9161(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
t3=((C_word*)t0)[2];
-f_9134(t3,t2);}
+f_9133(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){
+/* k9131 in k9128 in k9119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_9133(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20211,16 +19926,16 @@ 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]);}
+C_save_and_reclaim((void*)trf_9133,NULL,2,t0,t1);}
+t2=C_a_i_vector(&a,3,((C_word*)((C_word*)t0)[7])[1],((C_word*)t0)[6],((C_word*)t0)[5]);
+t3=C_a_i_cons(&a,2,t2,*((C_word*)lf[67]+1));
+t4=C_mutate((C_word*)lf[67]+1 /* (set! external-variables ...) */,t3);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9153,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1061 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[229]+1)))(4,*((C_word*)lf[229]+1),t5,lf[299],((C_word*)((C_word*)t0)[7])[1]);}
-/* 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){
+/* k9151 in k9131 in k9128 in k9119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9153(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20229,26 +19944,26 @@ 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));}
+C_save_and_reclaim((void*)tr2,(void*)f_9153,2,t0,t1);}
+t2=C_a_i_list(&a,3,((C_word*)t0)[4],lf[297],t1);
+t3=C_a_i_cons(&a,2,t2,*((C_word*)lf[64]+1));
+t4=C_mutate((C_word*)lf[64]+1 /* (set! foreign-variables ...) */,t3);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9145,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1063 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t5,((C_word*)t0)[2],((C_word*)t0)[4],*((C_word*)lf[72]+1));}
-/* 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){
+/* k9143 in k9151 in k9131 in k9128 in k9119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9145(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_mutate((C_word*)lf[73]+1 /* (set! external-to-pointer ...) */,t1);
+t2=C_mutate((C_word*)lf[72]+1 /* (set! external-to-pointer ...) */,t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[300]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[298]);}
-/* 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){
+/* k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8957(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20256,53 +19971,53 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8957,2,t0,t1);}
+t2=C_i_cdddr(((C_word*)t0)[8]);
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8969,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=t2,tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 1034 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t3);}
else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);}}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9105,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1049 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[294]))(5,*((C_word*)lf[294]+1),t3,*((C_word*)lf[63]+1),((C_word*)t0)[2],t1);}}
-/* 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){
+/* k9103 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9105(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[297]);}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[295]);}
-/* 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){
+/* k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8969(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8969,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8972,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+C_trace("compiler.scm: 1035 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t2);}
-/* 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){
+/* k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8972(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8972,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8975,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=t1,a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
+t3=C_a_i_vector(&a,3,((C_word*)t0)[3],((C_word*)t0)[9],t1);
+C_trace("compiler.scm: 1036 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[294]))(5,*((C_word*)lf[294]+1),t2,*((C_word*)lf[63]+1),((C_word*)t0)[2],t3);}
-/* 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){
+/* k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8975(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20313,35 +20028,35 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8975,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9005,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
t3=((C_word*)t0)[8];
t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8981,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t4))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8980,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t4))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[134],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[133],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);
+t6=C_i_cdr(t4);
+if(C_truep(C_i_nullp(t6))){
+t7=C_i_car(t4);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[134],t7);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[133],t7);}
else{
C_trace("##sys#error");
-t7=*((C_word*)lf[135]+1);
+t7=*((C_word*)lf[134]+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){
+/* k8978 in k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8980(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-/* 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){
+/* k9003 in k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9005(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20352,59 +20067,59 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9005,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9035,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
t3=((C_word*)t0)[7];
t4=C_SCHEME_END_OF_LIST;
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9011,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t4))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9010,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t4))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[134],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[133],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);
+t6=C_i_cdr(t4);
+if(C_truep(C_i_nullp(t6))){
+t7=C_i_car(t4);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[134],t7);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,t3,lf[133],t7);}
else{
C_trace("##sys#error");
-t7=*((C_word*)lf[135]+1);
+t7=*((C_word*)lf[134]+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){
+/* k9008 in k9003 in k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9010(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-/* 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){
+/* k9033 in k9003 in k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9035(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_9035,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9038,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 1039 hide-variable");
+((C_proc3)C_retrieve_symbol_proc(lf[132]))(3,*((C_word*)lf[132]+1),t2,((C_word*)t0)[8]);}
-/* 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){
+/* k9036 in k9033 in k9003 in k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9038(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_9038,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9041,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 1040 hide-variable");
+((C_proc3)C_retrieve_symbol_proc(lf[132]))(3,*((C_word*)lf[132]+1),t2,((C_word*)t0)[7]);}
-/* 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){
+/* k9039 in k9036 in k9033 in k9003 in k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_9041(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20416,23 +20131,23 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_9041,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[9]);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[8],t3);
+t5=C_a_i_cons(&a,2,lf[292],t4);
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9072,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t5,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+t7=C_i_cdr(((C_word*)t0)[9]);
+if(C_truep(C_i_pairp(t7))){
+t8=C_i_cadr(((C_word*)t0)[9]);
t9=t6;
-f_9073(t9,(C_word)C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST));}
+f_9072(t9,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));}}
+f_9072(t8,C_a_i_cons(&a,2,lf[293],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){
+/* k9070 in k9039 in k9036 in k9033 in k9003 in k8973 in k8970 in k8967 in k8955 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_9072(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20442,50 +20157,50 @@ 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");
+C_save_and_reclaim((void*)trf_9072,NULL,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=C_a_i_cons(&a,2,lf[292],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[7],t4);
+t6=C_a_i_cons(&a,2,lf[151],t5);
+C_trace("compiler.scm: 1041 walk");
t7=((C_word*)((C_word*)t0)[6])[1];
-f_5774(t7,((C_word*)t0)[5],t6,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_5724(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){
+/* k8898 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8900(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8900,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8903,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t3=C_i_caddr(((C_word*)t0)[2]);
+C_trace("compiler.scm: 1017 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t2,t3);}
-/* 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){
+/* k8901 in k8898 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8903(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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))){
+C_save_and_reclaim((void*)tr2,(void*)f_8903,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8906,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+t3=C_i_cdddr(((C_word*)t0)[2]);
+if(C_truep(C_i_pairp(t3))){
t4=t2;
-f_8907(2,t4,(C_word)C_i_cadddr(((C_word*)t0)[2]));}
+f_8906(2,t4,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]);}}
+C_trace("compiler.scm: 1020 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),t2,((C_word*)t0)[4]);}}
-/* 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){
+/* k8904 in k8901 in k8898 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8906(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20495,21 +20210,21 @@ 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))){
+C_save_and_reclaim((void*)tr2,(void*)f_8906,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8918,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_i_stringp(t1))){
t3=t1;
-t4=(C_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);
+t4=C_a_i_list(&a,3,((C_word*)t0)[4],((C_word*)t0)[3],t3);
+t5=C_a_i_cons(&a,2,t4,*((C_word*)lf[64]+1));
+t6=C_mutate((C_word*)lf[64]+1 /* (set! foreign-variables ...) */,t5);
t7=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,lf[292]);}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,lf[290]);}
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);}}
+C_trace("compiler.scm: 1025 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),t2,t1);}}
-/* 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){
+/* k8916 in k8904 in k8901 in k8898 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8918(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20517,60 +20232,60 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8918,2,t0,t1);}
+t2=C_a_i_list(&a,3,((C_word*)t0)[4],((C_word*)t0)[3],t1);
+t3=C_a_i_cons(&a,2,t2,*((C_word*)lf[64]+1));
+t4=C_mutate((C_word*)lf[64]+1 /* (set! foreign-variables ...) */,t3);
t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[291]);}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[289]);}
-/* 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){
+/* k8889 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8891(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 993 walk");
+C_trace("compiler.scm: 1013 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]);}
+f_5724(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){
+/* k8876 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8878(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 990 walk");
+C_trace("compiler.scm: 1010 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]);}
+f_5724(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){
+/* k8863 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8865(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 987 walk");
+C_trace("compiler.scm: 1007 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]);}
+f_5724(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){
+/* k8850 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8852(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 984 walk");
+C_trace("compiler.scm: 1004 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]);}
+f_5724(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){
+/* k8837 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8839(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 981 walk");
+C_trace("compiler.scm: 1001 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]);}
+f_5724(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){
+/* k8770 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8772(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20581,22 +20296,22 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_8772,2,t0,t1);}
+t2=C_i_cdr(((C_word*)t0)[7]);
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8785,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t4=C_i_cdr(((C_word*)t0)[7]);
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8791,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp));
t8=((C_word*)t6)[1];
-f_8792(t8,t3,t4);}
+f_8791(t8,t3,t4);}
else{
t3=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[280]);}}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[278]);}}
-/* 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){
+/* fold in k8770 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_8791(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -20605,95 +20320,95 @@ 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");
+C_save_and_reclaim((void*)trf_8791,NULL,3,t0,t1,t2);}
+t3=C_i_car(t2);
+t4=C_i_cdr(t2);
+if(C_truep(C_i_nullp(t4))){
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8811,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 996 walk");
t6=((C_word*)((C_word*)t0)[6])[1];
-f_5774(t6,t5,t3,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
+f_5724(t6,t5,t3,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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");
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8818,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 997 walk");
t6=((C_word*)((C_word*)t0)[6])[1];
-f_5774(t6,t5,t3,((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_FALSE);}}
+f_5724(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){
+/* k8816 in fold in k8770 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8818(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_8818,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8822,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 997 fold");
t3=((C_word*)((C_word*)t0)[3])[1];
-f_8792(t3,t2,((C_word*)t0)[2]);}
+f_8791(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){
+/* k8820 in k8816 in fold in k8770 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8822(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8823,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_8822,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k8809 in fold in k8770 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8811(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8812,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_8811,2,t0,t1);}
t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,1,t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k8783 in k8770 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8785(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 971 canonicalize-begin-body");
-((C_proc3)C_retrieve_symbol_proc(lf[245]))(3,*((C_word*)lf[245]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 991 canonicalize-begin-body");
+((C_proc3)C_retrieve_symbol_proc(lf[243]))(3,*((C_word*)lf[243]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k8754 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8756(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[279]);}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[277]);}
-/* 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){
+/* k8739 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8741(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 962 walk");
+C_trace("compiler.scm: 982 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]);}
+f_5724(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){
+/* k8708 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8710(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_8710,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8718,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t3=C_i_cadddr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 977 walk");
t4=((C_word*)((C_word*)t0)[4])[1];
-f_5774(t4,t2,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+f_5724(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){
+/* k8716 in k8708 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8718(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20701,41 +20416,41 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8718,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,lf[256],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,lf[254],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){
+/* k8679 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8681(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_8681,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[253],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[251],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){
+/* a8647 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8648(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_8649,3,t0,t1,t2);}
-C_trace("g13321333");
+C_save_and_reclaim((void*)tr3,(void*)f_8648,3,t0,t1,t2);}
+C_trace("g13471348");
t3=((C_word*)((C_word*)t0)[3])[1];
-f_5428(t3,t1,t2,((C_word*)t0)[2]);}
+f_5378(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){
+/* k8632 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8634(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20743,37 +20458,37 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_8634,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8638,a[2]=((C_word*)t0)[6],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8642,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=C_i_cddr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 968 mapwalk");
t5=((C_word*)((C_word*)t0)[4])[1];
-f_10328(t5,t3,t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_10324(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){
+/* k8640 in k8632 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8642(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#append");
-t2=*((C_word*)lf[168]+1);
+t2=*((C_word*)lf[167]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k8636 in k8632 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8638(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8639,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_8638,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,lf[273],t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,lf[271],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){
+/* k8599 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8601(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20781,52 +20496,52 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_8601,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8605,a[2]=((C_word*)t0)[6],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8609,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=C_i_cddr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 963 mapwalk");
t5=((C_word*)((C_word*)t0)[4])[1];
-f_10328(t5,t3,t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_10324(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){
+/* k8607 in k8599 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8609(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#append");
-t2=*((C_word*)lf[168]+1);
+t2=*((C_word*)lf[167]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k8603 in k8599 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8605(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8606,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_8605,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,lf[272],t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,lf[270],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){
+/* k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8268(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_8268,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8274,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 913 lookup");
t4=((C_word*)((C_word*)t0)[2])[1];
-f_5340(t4,t3,t2,((C_word*)t0)[4]);}
+f_5290(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){
+/* k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8274(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20834,33 +20549,33 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8274,2,t0,t1);}
t2=t1;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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]);}
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8277,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t3,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 914 get-line");
+((C_proc3)C_retrieve_symbol_proc(lf[268]))(3,*((C_word*)lf[268]+1),t4,((C_word*)t0)[7]);}
-/* 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){
+/* k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8277(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_8277,2,t0,t1);}
+t2=C_i_caddr(((C_word*)t0)[8]);
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8283,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
+if(C_truep(C_i_memq(((C_word*)((C_word*)t0)[7])[1],C_retrieve(lf[114])))){
+C_trace("compiler.scm: 917 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t3,lf[116],lf[267],((C_word*)((C_word*)t0)[7])[1]);}
else{
t4=t3;
-f_8284(2,t4,C_SCHEME_UNDEFINED);}}
+f_8283(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){
+/* k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8283(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20871,48 +20586,48 @@ 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));
+C_save_and_reclaim((void*)tr2,(void*)f_8283,2,t0,t1);}
+t2=C_i_assq(((C_word*)((C_word*)t0)[9])[1],*((C_word*)lf[64]+1));
if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8290,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
+C_trace("g12311232");
t4=t3;
-f_8291(t4,((C_word*)t0)[4],t2);}
+f_8290(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));
+t3=C_i_assq(((C_word*)((C_word*)t0)[9])[1],*((C_word*)lf[75]+1));
if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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");
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8366,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
+C_trace("g12411242");
t5=t4;
-f_8367(t5,((C_word*)t0)[4],t3);}
+f_8366(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]))){
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8438,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[4],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
+if(C_truep(C_i_memq(((C_word*)((C_word*)t0)[9])[1],((C_word*)t0)[7]))){
t5=t4;
-f_8439(2,t5,C_SCHEME_UNDEFINED);}
+f_8438(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]);}}}}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8509,a[2]=t4,a[3]=((C_word*)t0)[9],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 944 ##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t5,((C_word*)((C_word*)t0)[9])[1],lf[106]);}}}}
-/* 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){
+/* k8507 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8509(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_8509,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8512,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
if(C_truep(t1)){
t3=t2;
-f_8513(2,t3,t1);}
+f_8512(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);}}
+C_trace("compiler.scm: 945 ##sys#alias-global-hook");
+((C_proc4)C_retrieve_symbol_proc(lf[105]))(4,*((C_word*)lf[105]+1),t2,((C_word*)((C_word*)t0)[3])[1],C_SCHEME_TRUE);}}
-/* 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){
+/* k8510 in k8507 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8512(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20925,41 +20640,41 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8512,2,t0,t1);}
t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
if(C_truep(*((C_word*)lf[26]+1))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8546,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_8545,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t4=((C_word*)((C_word*)t0)[3])[1];
t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8521,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t5))){
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8520,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t5))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t3,t4,lf[268],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t3,t4,lf[266],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);
+t7=C_i_cdr(t5);
+if(C_truep(C_i_nullp(t7))){
+t8=C_i_car(t5);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t3,t4,lf[268],t8);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t3,t4,lf[266],t8);}
else{
C_trace("##sys#error");
-t8=*((C_word*)lf[135]+1);
+t8=*((C_word*)lf[134]+1);
((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,lf[0],t5);}}}
else{
t3=C_SCHEME_UNDEFINED;
t4=((C_word*)t0)[2];
-f_8439(2,t4,t3);}}
+f_8438(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){
+/* k8518 in k8510 in k8507 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8520(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[268],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[266],t1);}
-/* 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){
+/* k8543 in k8510 in k8507 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8545(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -20969,48 +20684,48 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8545,2,t0,t1);}
t2=((C_word*)((C_word*)t0)[3])[1];
t3=C_SCHEME_END_OF_LIST;
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8550,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t3))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[2],t2,lf[134],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[2],t2,lf[133],C_SCHEME_TRUE);}
else{
-t5=(C_word)C_i_cdr(t3);
-if(C_truep((C_word)C_i_nullp(t5))){
-t6=(C_word)C_i_car(t3);
+t5=C_i_cdr(t3);
+if(C_truep(C_i_nullp(t5))){
+t6=C_i_car(t3);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[2],t2,lf[134],t6);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[2],t2,lf[133],t6);}
else{
C_trace("##sys#error");
-t6=*((C_word*)lf[135]+1);
+t6=*((C_word*)lf[134]+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){
+/* k8548 in k8543 in k8510 in k8507 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8550(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-/* 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){
+/* k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8438(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_8438,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8441,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8477,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[9],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 949 ##sys#macro?");
+((C_proc3)C_retrieve_symbol_proc(lf[265]))(3,*((C_word*)lf[265]+1),t3,((C_word*)((C_word*)t0)[9])[1]);}
-/* 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){
+/* k8475 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8477(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21018,172 +20733,172 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8477,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8480,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8490,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
if(C_truep(((C_word*)t0)[2])){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8494,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8493,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
C_trace("open-output-string");
-((C_proc2)C_retrieve_symbol_proc(lf[265]))(2,*((C_word*)lf[265]+1),t4);}
+((C_proc2)C_retrieve_symbol_proc(lf[263]))(2,*((C_word*)lf[263]+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]);}}
+C_trace("compiler.scm: 950 compiler-warning");
+((C_proc6)C_retrieve_symbol_proc(lf[115]))(6,*((C_word*)lf[115]+1),t2,lf[116],lf[258],((C_word*)((C_word*)t0)[3])[1],lf[264]);}}
else{
t2=((C_word*)t0)[4];
-f_8442(2,t2,C_SCHEME_UNDEFINED);}}
+f_8441(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){
+/* k8491 in k8475 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8493(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_8493,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8496,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
C_trace("display");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[263]+1)))(4,*((C_word*)lf[263]+1),t2,lf[264],t1);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[261]+1)))(4,*((C_word*)lf[261]+1),t2,lf[262],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){
+/* k8494 in k8491 in k8475 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8496(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_8496,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8499,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
C_trace("write");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[262]+1)))(4,*((C_word*)lf[262]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[260]+1)))(4,*((C_word*)lf[260]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
-/* 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){
+/* k8497 in k8494 in k8491 in k8475 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8499(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("get-output-string");
-((C_proc3)C_retrieve_symbol_proc(lf[261]))(3,*((C_word*)lf[261]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+((C_proc3)C_retrieve_symbol_proc(lf[259]))(3,*((C_word*)lf[259]+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){
+/* k8488 in k8475 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8490(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 950 compiler-warning");
+((C_proc6)C_retrieve_symbol_proc(lf[115]))(6,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[116],lf[258],((C_word*)((C_word*)t0)[2])[1],t1);}
-/* 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){
+/* k8478 in k8475 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8480(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(C_truep(*((C_word*)lf[35]+1))){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 954 ##sys#undefine-macro!");
+((C_proc3)C_retrieve_symbol_proc(lf[257]))(3,*((C_word*)lf[257]+1),((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}
else{
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[3];
-f_8442(2,t3,t2);}}
+f_8441(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){
+/* k8439 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8441(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[13],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_8441,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8444,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8471,a[2]=((C_word*)t0)[8],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 955 keyword?");
+((C_proc3)C_retrieve_symbol_proc(lf[118]))(3,*((C_word*)lf[118]+1),t3,((C_word*)((C_word*)t0)[8])[1]);}
-/* 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){
+/* k8469 in k8439 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8471(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 956 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[240],lf[256],((C_word*)((C_word*)t0)[2])[1]);}
else{
t2=((C_word*)t0)[3];
-f_8445(2,t2,C_SCHEME_UNDEFINED);}}
+f_8444(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){
+/* k8442 in k8439 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8444(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_8444,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8447,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
+if(C_truep(C_i_pairp(((C_word*)((C_word*)t0)[8])[1]))){
+C_trace("compiler.scm: 958 syntax-error");
+((C_proc5)C_retrieve_symbol_proc(lf[119]))(5,*((C_word*)lf[119]+1),t2,lf[250],lf[255],((C_word*)((C_word*)t0)[8])[1]);}
else{
t3=t2;
-f_8448(2,t3,C_SCHEME_UNDEFINED);}}
+f_8447(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){
+/* k8445 in k8442 in k8439 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8447(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_8447,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8462,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 960 walk");
t3=((C_word*)((C_word*)t0)[6])[1];
-f_5774(t3,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_5724(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){
+/* k8460 in k8445 in k8442 in k8439 in k8436 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8462(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_8462,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[3])[1],t2);
t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[252],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[250],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){
+/* g1241 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_8366(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_8366,NULL,3,t0,t1,t2);}
+t3=C_i_caddr(t2);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8373,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t2,a[8]=t3,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 934 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t4);}
-/* 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){
+/* k8371 in g1241 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8373(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_8373,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8432,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 936 foreign-type-convert-argument");
+((C_proc4)C_retrieve_symbol_proc(lf[253]))(4,*((C_word*)lf[253]+1),t2,((C_word*)t0)[2],((C_word*)t0)[8]);}
-/* 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){
+/* k8430 in k8371 in g1241 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8432(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21194,18 +20909,18 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_8432,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[8],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
+t6=C_i_cadr(((C_word*)t0)[6]);
+t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8420,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t4,a[7]=t5,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 940 foreign-type-check");
+((C_proc4)C_retrieve_symbol_proc(lf[252]))(4,*((C_word*)lf[252]+1),t7,((C_word*)t0)[8],((C_word*)t0)[7]);}
-/* 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){
+/* k8418 in k8430 in k8371 in g1241 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8420(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21217,46 +20932,46 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_8420,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[8],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
+t5=C_a_i_cons(&a,2,lf[254],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,((C_word*)t0)[6],t6);
+t8=C_a_i_cons(&a,2,lf[158],t7);
+C_trace("compiler.scm: 935 walk");
t9=((C_word*)((C_word*)t0)[5])[1];
-f_5774(t9,((C_word*)t0)[4],t8,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+f_5724(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){
+/* g1231 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_8290(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_8290,NULL,3,t0,t1,t2);}
+t3=C_i_cadr(t2);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8297,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t3,a[8]=t2,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 924 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[96]))(2,*((C_word*)lf[96]+1),t4);}
-/* 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){
+/* k8295 in g1231 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8297(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_8297,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8356,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 926 foreign-type-convert-argument");
+((C_proc4)C_retrieve_symbol_proc(lf[253]))(4,*((C_word*)lf[253]+1),t2,((C_word*)t0)[2],((C_word*)t0)[7]);}
-/* 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){
+/* k8354 in k8295 in g1231 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8356(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21268,19 +20983,19 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_8356,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[8],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_i_caddr(((C_word*)t0)[7]);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,t5,t6);
+t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8336,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t4,a[7]=t7,tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 929 foreign-type-check");
+((C_proc4)C_retrieve_symbol_proc(lf[252]))(4,*((C_word*)lf[252]+1),t8,((C_word*)t0)[8],((C_word*)t0)[6]);}
-/* 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){
+/* k8334 in k8354 in k8295 in g1231 in k8281 in k8275 in k8272 in k8266 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8336(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21291,19 +21006,19 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_8336,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
+t4=C_a_i_cons(&a,2,lf[251],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[6],t5);
+t7=C_a_i_cons(&a,2,lf[158],t6);
+C_trace("compiler.scm: 925 walk");
t8=((C_word*)((C_word*)t0)[5])[1];
-f_5774(t8,((C_word*)t0)[4],t7,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+f_5724(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){
+/* loop1156 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_8223(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -21312,12 +21027,12 @@ 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");
+C_save_and_reclaim((void*)trf_8223,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_retrieve(lf[96]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8252,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g11721173");
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -21325,8 +21040,8 @@ 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){
+/* k8250 in loop1156 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8252(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21338,25 +21053,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8252,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop11411154");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop11561169");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8224(t6,((C_word*)t0)[3],t5);}
+f_8223(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop11411154");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop11561169");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8224(t6,((C_word*)t0)[3],t5);}}
+f_8223(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){
+/* k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8140(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21370,21 +21085,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8140,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8143,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8173,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8172,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8175,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8174,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
t11=((C_word*)t9)[1];
-f_8175(t11,t7,((C_word*)t0)[6],t1);}
+f_8174(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){
+/* loop1180 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_8174(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -21396,15 +21111,15 @@ 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);
+C_save_and_reclaim((void*)trf_8174,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=*((C_word*)lf[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");
+t6=*((C_word*)lf[162]+1);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8207,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+t8=C_slot(t2,C_fix(0));
+t9=C_slot(t3,C_fix(0));
+C_trace("g12001201");
t10=t6;
((C_proc4)C_retrieve_proc(t10))(4,t10,t7,t8,t9);}
else{
@@ -21412,8 +21127,8 @@ 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){
+/* k8205 in loop1180 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8207(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21421,19 +21136,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8207,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8187,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
t4=t3;
-f_8188(t4,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
+f_8187(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
else{
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=t3;
-f_8188(t5,t4);}}
+f_8187(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){
+/* k8185 in k8205 in loop1180 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_8187(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21441,98 +21156,98 @@ 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");
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+C_trace("loop11801194");
t5=((C_word*)((C_word*)t0)[3])[1];
-f_8175(t5,((C_word*)t0)[2],t3,t4);}
+f_8174(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){
+/* k8170 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8172(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 901 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k8141 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8143(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[13],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_8143,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8146,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],tmp=(C_word)a,a+=6,tmp);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8164,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[8],a[4]=t1,a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 904 ##sys#canonicalize-body");
+((C_proc5)C_retrieve_symbol_proc(lf[161]))(5,*((C_word*)lf[161]+1),t3,((C_word*)t0)[2],t1,*((C_word*)lf[47]+1));}
-/* 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){
+/* k8162 in k8141 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8164(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_8164,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8168,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 905 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k8166 in k8162 in k8141 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8168(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 883 walk");
+C_trace("compiler.scm: 903 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);}
+f_5724(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){
+/* k8144 in k8141 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8146(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_8146,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8149,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 907 set-real-names!");
+f_5318(t2,((C_word*)t0)[5],((C_word*)t0)[2]);}
-/* 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){
+/* k8147 in k8144 in k8141 in k8138 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8149(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_8149,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[173],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[172],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){
+/* k8119 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8121(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_8121,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[172],t1);
+t3=C_i_cadr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 895 walk");
t4=((C_word*)((C_word*)t0)[5])[1];
-f_5774(t4,((C_word*)t0)[4],t2,((C_word*)t0)[3],((C_word*)t0)[2],t3);}
+f_5724(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){
+/* k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7596(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21544,27 +21259,27 @@ C_word t8;
C_word t9;
C_word t10;
C_word t11;
-C_word ab[19],*a=ab;
+C_word ab[20],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_7596,2,t0,t1);}
+t2=C_i_caddr(((C_word*)t0)[8]);
+t3=C_eqp(C_SCHEME_TRUE,t2);
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7602,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
if(C_truep(t3)){
t5=t4;
-f_7634(2,t5,t3);}
+f_7602(2,t5,t3);}
else{
t5=C_SCHEME_END_OF_LIST;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_FALSE;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);}}
+t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8004,a[2]=t4,a[3]=t6,a[4]=t8,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t10=C_i_caddr(((C_word*)t0)[8]);
+C_trace("compiler.scm: 822 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t9,t10);}}
-/* 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){
+/* k8002 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8004(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21572,15 +21287,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8004,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8006,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp));
t5=((C_word*)t3)[1];
-f_8007(t5,((C_word*)t0)[2],t1);}
+f_8006(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){
+/* loop949 in k8002 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_8006(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -21589,21 +21304,21 @@ 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");
+C_save_and_reclaim((void*)trf_8006,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8033,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8084,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g965966");
t6=t3;
-f_8034(t6,t4,t5);}
+f_8033(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k8082 in loop949 in k8002 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_8084(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21615,25 +21330,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8084,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop945958");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop949962");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8007(t6,((C_word*)t0)[3],t5);}
+f_8006(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop945958");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop949962");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_8007(t6,((C_word*)t0)[3],t5);}}
+f_8006(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){
+/* g965 in loop949 in k8002 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_8033(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -21641,23 +21356,23 @@ 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))){
+C_save_and_reclaim((void*)trf_8033,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_symbolp(t2))){
t3=t2;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8046,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_i_pairp(t2))){
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_8057,tmp=(C_word)a,a+=2,tmp);
t5=t3;
-f_8047(t5,f_8058(t2));}
+f_8046(t5,f_8057(t2));}
else{
t4=t3;
-f_8047(t4,C_SCHEME_FALSE);}}}
+f_8046(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){
+/* loop in g965 in loop949 in k8002 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static C_word C_fcall f_8057(C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21666,21 +21381,21 @@ C_word t5;
C_word t6;
loop:
C_stack_check;
-t2=(C_word)C_i_nullp(t1);
+t2=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);
+t3=C_i_car(t1);
+if(C_truep(C_i_symbolp(t3))){
+t4=C_i_cdr(t1);
t6=t4;
t1=t6;
goto loop;}
else{
return(C_SCHEME_FALSE);}}}
-/* 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){
+/* k8044 in g965 in loop949 in k8002 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_8046(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
@@ -21688,51 +21403,53 @@ 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]);}}
+C_trace("compiler.scm: 819 ##sys#syntax-error-hook");
+((C_proc6)C_retrieve_symbol_proc(lf[244]))(6,*((C_word*)lf[244]+1),((C_word*)t0)[4],lf[245],lf[247],((C_word*)t0)[3],((C_word*)t0)[2]);}}
-/* 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){
+/* k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7602(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[14],*a=ab;
+C_word t5;
+C_word ab[16],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7602,2,t0,t1);}
+t2=((C_word*)((C_word*)t0)[9])[1];
+t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7605,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[9],a[5]=t1,a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[7],a[11]=((C_word*)t0)[8],tmp=(C_word)a,a+=12,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7994,a[2]=((C_word*)t0)[7],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 824 ##sys#current-module");
+((C_proc2)C_retrieve_symbol_proc(lf[108]))(2,*((C_word*)lf[108]+1),t4);}
-/* 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){
+/* k7992 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7994(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 825 ##sys#syntax-error-hook");
+((C_proc5)C_retrieve_symbol_proc(lf[244]))(5,*((C_word*)lf[244]+1),((C_word*)t0)[3],lf[245],lf[246],((C_word*)t0)[2]);}
else{
t2=((C_word*)t0)[3];
-f_7637(2,t2,C_SCHEME_UNDEFINED);}}
+f_7605(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){
+/* k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7605(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[13],*a=ab;
+C_word ab[15],*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_save_and_reclaim((void*)tr2,(void*)f_7605,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7610,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],tmp=(C_word)a,a+=9,tmp);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7879,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
C_trace("##sys#call-with-values");
C_call_with_values(4,0,((C_word*)t0)[2],t2,t3);}
-/* 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){
+/* a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7879(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -21741,21 +21458,23 @@ C_word t7;
C_word t8;
C_word t9;
C_word t10;
-C_word ab[15],*a=ab;
+C_word t11;
+C_word ab[20],*a=ab;
if(c!=4) C_bad_argc_2(c,4,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_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);}
+C_save_and_reclaim((void*)tr4,(void*)f_7879,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7883,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7918,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=C_retrieve(lf[108]);
+t7=C_retrieve(lf[109]);
+t8=C_SCHEME_FALSE;
+t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
+t10=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7922,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=t5,a[7]=t6,a[8]=t7,a[9]=t9,tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 879 ##sys#meta-macro-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[113]))(2,*((C_word*)lf[113]+1),t10);}
-/* 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){
+/* k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7922(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21765,18 +21484,18 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7922,2,t0,t1);}
t2=t1;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7923,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=t3,a[5]=((C_word*)t0)[9],tmp=(C_word)a,a+=6,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7941,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7943,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
C_trace("##sys#dynamic-wind");
-t7=*((C_word*)lf[113]+1);
+t7=*((C_word*)lf[112]+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){
+/* a7942 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7943(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21789,19 +21508,19 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7943,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7949,a[2]=t3,a[3]=t7,a[4]=t5,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp));
t9=((C_word*)t7)[1];
-f_7950(t9,t1,((C_word*)t0)[2]);}
+f_7949(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){
+/* loop1114 in a7942 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7949(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -21810,21 +21529,21 @@ 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");
+C_save_and_reclaim((void*)trf_7949,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7976,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7987,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g11301131");
t6=t3;
-f_7977(t6,t4,t5);}
+f_7976(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k7985 in loop1114 in a7942 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7987(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21836,109 +21555,109 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7987,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop11081121");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop11141127");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7950(t6,((C_word*)t0)[3],t5);}
+f_7949(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop11081121");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop11141127");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7950(t6,((C_word*)t0)[3],t5);}}
+f_7949(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){
+/* g1130 in loop1114 in a7942 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7976(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_7976,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7984,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 885 ##sys#current-meta-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[111]))(2,*((C_word*)lf[111]+1),t3);}
-/* 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){
+/* k7982 in g1130 in loop1114 in a7942 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7984(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 867 walk");
+C_trace("compiler.scm: 882 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);}
+f_5724(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){
+/* k7939 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7941(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 877 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* swap1091 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7923(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_7923,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7927,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+C_trace("g109410951102");
t3=((C_word*)t0)[2];
((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-/* 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){
+/* k7925 in swap1091 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7927(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_7927,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7930,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("g109410951102");
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[6])[1]);}
-/* 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){
+/* k7928 in k7925 in swap1091 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7930(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7931,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7930,2,t0,t1);}
t2=C_mutate(((C_word *)((C_word*)t0)[6])+1,((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7934,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("g109610971103");
t4=((C_word*)t0)[2];
((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-/* 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){
+/* k7932 in k7928 in k7925 in swap1091 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7934(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_7934,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7937,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("g109610971103");
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
-/* 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){
+/* k7935 in k7932 in k7928 in k7925 in swap1091 in k7920 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7937(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21947,16 +21666,96 @@ 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){
+/* k7916 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7918(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 861 canonicalize-begin-body");
-((C_proc3)C_retrieve_symbol_proc(lf[245]))(3,*((C_word*)lf[245]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 876 canonicalize-begin-body");
+((C_proc3)C_retrieve_symbol_proc(lf[243]))(3,*((C_word*)lf[243]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k7881 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7883(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7883,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7886,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+t3=C_SCHEME_UNDEFINED;
+t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7889,a[2]=t4,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_7889(t6,t2,((C_word*)((C_word*)t0)[4])[1]);}
+
+/* doloop1136 in k7881 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7889(C_word t0,C_word t1,C_word t2){
+C_word tmp;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_7889,NULL,3,t0,t1,t2);}
+t3=C_eqp(t2,((C_word*)t0)[3]);
+if(C_truep(t3)){
+t4=C_SCHEME_UNDEFINED;
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+else{
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7899,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7910,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 890 caar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[92]+1)))(3,*((C_word*)lf[92]+1),t5,t2);}}
+
+/* k7908 in doloop1136 in k7881 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7910(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7910,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7914,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 890 cdar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[91]+1)))(3,*((C_word*)lf[91]+1),t2,((C_word*)t0)[2]);}
+
+/* k7912 in k7908 in doloop1136 in k7881 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7914(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 890 ##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[201],t1);}
+
+/* k7897 in doloop1136 in k7881 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7899(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word *a;
+t2=C_i_cdr(((C_word*)t0)[4]);
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_7889(t3,((C_word*)t0)[2],t2);}
+
+/* k7884 in k7881 in a7878 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7886(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word *a;
+t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,((C_word*)t0)[4]);
+t3=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}
+
+/* a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7610(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21966,16 +21765,16 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7610,2,t0,t1);}
+t2=C_retrieve(lf[108]);
+t3=C_retrieve(lf[192]);
+t4=C_retrieve(lf[109]);
+t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7614,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t2,a[10]=t3,a[11]=t4,tmp=(C_word)a,a+=12,tmp);
+C_trace("compiler.scm: 828 ##sys#register-module");
+((C_proc4)C_retrieve_symbol_proc(lf[242]))(4,*((C_word*)lf[242]+1),t5,((C_word*)t0)[7],((C_word*)t0)[2]);}
-/* 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){
+/* k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7614(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -21988,21 +21787,21 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7614,2,t0,t1);}
t2=t1;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_END_OF_LIST;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_retrieve(lf[211]);
+t6=C_retrieve(lf[209]);
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);
+t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7615,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=t7,a[6]=t5,a[7]=t3,tmp=(C_word)a,a+=8,tmp);
+t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7642,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
C_trace("##sys#dynamic-wind");
-t10=*((C_word*)lf[113]+1);
+t10=*((C_word*)lf[112]+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){
+/* a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7642(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -22012,16 +21811,16 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_7642,2,t0,t1);}
+t2=C_i_cdddr(((C_word*)t0)[7]);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7652,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t4,a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp));
t6=((C_word*)t4)[1];
-f_7684(t6,t1,t2,C_SCHEME_END_OF_LIST);}
+f_7652(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){
+/* loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7652(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -22031,76 +21830,76 @@ 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_save_and_reclaim((void*)trf_7652,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t2))){
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7662,a[2]=t1,a[3]=t3,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7709,tmp=(C_word)a,a+=2,tmp);
C_trace("call-with-current-continuation");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[239]+1)))(3,*((C_word*)lf[239]+1),t4,t5);}
+((C_proc3)C_retrieve_proc(*((C_word*)lf[237]+1)))(3,*((C_word*)lf[237]+1),t4,t5);}
else{
-t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7763,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],a[6]=t3,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
+if(C_truep(C_i_pairp(t2))){
+if(C_truep(C_i_nullp(t3))){
+t5=C_i_car(t2);
+if(C_truep(C_i_pairp(t5))){
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7873,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[7],a[6]=t4,tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 857 caar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[92]+1)))(3,*((C_word*)lf[92]+1),t6,t2);}
else{
t6=t4;
-f_7795(2,t6,C_SCHEME_UNDEFINED);}}
+f_7763(2,t6,C_SCHEME_UNDEFINED);}}
else{
t5=t4;
-f_7795(2,t5,C_SCHEME_UNDEFINED);}}
+f_7763(2,t5,C_SCHEME_UNDEFINED);}}
else{
t5=t4;
-f_7795(2,t5,C_SCHEME_UNDEFINED);}}}
+f_7763(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){
+/* k7871 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7873(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7873,2,t0,t1);}
+if(C_truep(C_i_symbolp(t1))){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7816,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7869,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 858 caar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[92]+1)))(3,*((C_word*)lf[92]+1),t3,((C_word*)t0)[4]);}
else{
t2=((C_word*)t0)[6];
-f_7795(2,t2,C_SCHEME_UNDEFINED);}}
+f_7763(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){
+/* k7867 in k7871 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7869(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 844 lookup");
+C_trace("compiler.scm: 858 lookup");
t2=((C_word*)((C_word*)t0)[4])[1];
-f_5340(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+f_5290(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){
+/* k7814 in k7871 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7816(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_7816,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7819,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
if(C_truep(t1)){
t3=t2;
-f_7851(2,t3,t1);}
+f_7819(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]);}}
+C_trace("compiler.scm: 858 caar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[92]+1)))(3,*((C_word*)lf[92]+1),t2,((C_word*)t0)[2]);}}
-/* 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){
+/* k7817 in k7814 in k7871 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7819(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -22112,29 +21911,29 @@ 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)))){
+if(C_truep((C_truep(C_eqp(t2,lf[238]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[239]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
t3=((C_word*)t0)[3];
-f_7795(2,t3,C_SCHEME_UNDEFINED);}
+f_7763(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);
+t3=C_i_assq(lf[238],C_retrieve(lf[209]));
+t4=C_i_cdr(t3);
+t5=C_eqp(t1,t4);
if(C_truep(t5)){
t6=((C_word*)t0)[3];
-f_7795(2,t6,C_SCHEME_UNDEFINED);}
+f_7763(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);
+t6=C_i_assq(lf[239],C_retrieve(lf[209]));
+t7=C_i_cdr(t6);
+t8=C_eqp(t1,t7);
if(C_truep(t8)){
t9=((C_word*)t0)[3];
-f_7795(2,t9,C_SCHEME_UNDEFINED);}
+f_7763(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]);}}}}
+C_trace("compiler.scm: 863 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[240],lf[241],((C_word*)t0)[2]);}}}}
-/* 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){
+/* k7761 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7763(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -22143,38 +21942,38 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7763,2,t0,t1);}
+t2=C_i_cdr(((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7778,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+t4=C_i_car(((C_word*)t0)[7]);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7786,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t3,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 872 ##sys#current-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[192]))(2,*((C_word*)lf[192]+1),t5);}
-/* 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){
+/* k7784 in k7761 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7786(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 855 walk");
+C_trace("compiler.scm: 869 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);}
+f_5724(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){
+/* k7776 in k7761 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7778(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7810,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
-C_trace("compiler.scm: 853 loop");
+C_save_and_reclaim((void*)tr2,(void*)f_7778,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+C_trace("compiler.scm: 867 loop");
t3=((C_word*)((C_word*)t0)[4])[1];
-f_7684(t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+f_7652(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){
+/* a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7709(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -22182,14 +21981,14 @@ 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_save_and_reclaim((void*)tr3,(void*)f_7709,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7715,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7734,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
C_trace("with-exception-handler");
-((C_proc4)C_retrieve_symbol_proc(lf[238]))(4,*((C_word*)lf[238]+1),t1,t3,t4);}
+((C_proc4)C_retrieve_symbol_proc(lf[236]))(4,*((C_word*)lf[236]+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){
+/* a7733 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7734(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -22197,83 +21996,83 @@ 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_save_and_reclaim((void*)tr2,(void*)f_7734,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7740,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7750,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("##sys#call-with-values");
C_call_with_values(4,0,t1,t2,t3);}
-/* 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,...){
+/* a7749 in a7733 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7750(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
C_word *a,c2=c;
C_save_rest(t1,c2,2);
if(!C_demand(c*C_SIZEOF_PAIR+3)){
-C_save_and_reclaim((void*)tr2r,(void*)f_7782r,2,t0,t1);}
+C_save_and_reclaim((void*)tr2r,(void*)f_7750r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_7782r(t0,t1,t2);}}
+f_7750r(t0,t1,t2);}}
-static void C_ccall f_7782r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_7750r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7788,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-C_trace("k10321037");
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7756,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("k10371042");
t4=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-/* 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){
+/* a7755 in a7749 in a7733 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7756(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7788,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7756,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){
+/* a7739 in a7733 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7740(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7740,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7748,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 839 ##sys#current-module");
+((C_proc2)C_retrieve_symbol_proc(lf[108]))(2,*((C_word*)lf[108]+1),t2);}
-/* 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){
+/* k7746 in a7739 in a7733 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7748(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 825 ##sys#finalize-module");
-((C_proc3)C_retrieve_symbol_proc(lf[237]))(3,*((C_word*)lf[237]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 839 ##sys#finalize-module");
+((C_proc3)C_retrieve_symbol_proc(lf[235]))(3,*((C_word*)lf[235]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* a7714 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7715(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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");
+C_save_and_reclaim((void*)tr3,(void*)f_7715,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7721,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("k10371042");
t4=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-/* 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){
+/* a7720 in a7714 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7721(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -22281,43 +22080,43 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7721,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7725,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7732,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 837 current-error-port");
+((C_proc2)C_retrieve_symbol_proc(lf[234]))(2,*((C_word*)lf[234]+1),t3);}
-/* 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){
+/* k7730 in a7720 in a7714 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7732(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 837 print-error-message");
+((C_proc4)C_retrieve_symbol_proc(lf[233]))(4,*((C_word*)lf[233]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k7723 in a7720 in a7714 in a7708 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7725(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 824 exit");
-((C_proc3)C_retrieve_symbol_proc(lf[234]))(3,*((C_word*)lf[234]+1),((C_word*)t0)[2],C_fix(1));}
+C_trace("compiler.scm: 838 exit");
+((C_proc3)C_retrieve_symbol_proc(lf[232]))(3,*((C_word*)lf[232]+1),((C_word*)t0)[2],C_fix(1));}
-/* 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){
+/* k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7662(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_7662,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7665,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("g10401041");
t3=t1;
((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-/* 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){
+/* k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7665(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -22326,55 +22125,55 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7665,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)));
+t3=(C_truep(t2)?t2:C_i_assq(((C_word*)t0)[4],*((C_word*)lf[38]+1)));
if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7704,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
-C_trace("g10541055");
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7672,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("g10591060");
t5=t4;
-f_7704(t5,((C_word*)t0)[2],t3);}
+f_7672(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]);}}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7693,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 849 reverse");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[211]+1)))(3,*((C_word*)lf[211]+1),t4,((C_word*)t0)[3]);}}
-/* 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){
+/* k7691 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7693(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_7693,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7697,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
if(C_truep(*((C_word*)lf[40]+1))){
-C_trace("compiler.scm: 834 values");
+C_trace("compiler.scm: 848 values");
C_values(4,0,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);}}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7704,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 852 ##sys#current-module");
+((C_proc2)C_retrieve_symbol_proc(lf[108]))(2,*((C_word*)lf[108]+1),t3);}}
-/* 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){
+/* k7702 in k7691 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7704(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 838 ##sys#compiled-module-registration");
-((C_proc3)C_retrieve_symbol_proc(lf[230]))(3,*((C_word*)lf[230]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 852 ##sys#compiled-module-registration");
+((C_proc3)C_retrieve_symbol_proc(lf[228]))(3,*((C_word*)lf[228]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k7695 in k7691 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7697(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 834 values");
+C_trace("compiler.scm: 848 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){
+/* g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7672(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -22383,114 +22182,114 @@ 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);
+C_save_and_reclaim((void*)trf_7672,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7676,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t4=((C_word*)t0)[2];
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5686,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5636,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
if(C_truep(*((C_word*)lf[39]+1))){
-t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);}
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5719,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 491 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[231]+1)))(3,*((C_word*)lf[231]+1),t6,t4);}
else{
t6=t5;
-f_5686(2,t6,(C_word)C_i_cdr(t2));}}
+f_5636(2,t6,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){
+/* k5717 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5719(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 491 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[229]+1)))(4,*((C_word*)lf[229]+1),((C_word*)t0)[2],t1,lf[230]);}
-/* 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){
+/* k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5636(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5636,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5639,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5712,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 493 ##sys#current-module");
+((C_proc2)C_retrieve_symbol_proc(lf[108]))(2,*((C_word*)lf[108]+1),t3);}
-/* 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){
+/* k5710 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5712(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 492 ##sys#compiled-module-registration");
-((C_proc3)C_retrieve_symbol_proc(lf[230]))(3,*((C_word*)lf[230]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 493 ##sys#compiled-module-registration");
+((C_proc3)C_retrieve_symbol_proc(lf[228]))(3,*((C_word*)lf[228]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5639(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[12],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5639,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5642,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5705,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 495 file-exists?");
+((C_proc3)C_retrieve_symbol_proc(lf[227]))(3,*((C_word*)lf[227]+1),t3,((C_word*)t0)[5]);}
-/* 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){
+/* k5703 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5705(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 496 read-file");
+((C_proc3)C_retrieve_symbol_proc(lf[226]))(3,*((C_word*)lf[226]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
else{
t2=((C_word*)t0)[3];
-f_5692(2,t2,C_SCHEME_FALSE);}}
+f_5642(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){
+/* k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5642(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5692,2,t0,t1);}
-if(C_truep((C_word)C_i_equalp(((C_word*)t0)[7],t1))){
+C_save_and_reclaim((void*)tr2,(void*)f_5642,2,t0,t1);}
+if(C_truep(C_i_equalp(((C_word*)t0)[7],t1))){
if(C_truep(*((C_word*)lf[50]+1))){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 499 print");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[4]+1)))(7,*((C_word*)lf[4]+1),((C_word*)t0)[6],lf[212],((C_word*)t0)[5],lf[213],((C_word*)t0)[4],lf[214]);}
else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)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]);}}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f20080,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 845 reverse");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[211]+1)))(3,*((C_word*)lf[211]+1),t2,((C_word*)t0)[2]);}}
else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5657,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
if(C_truep(*((C_word*)lf[50]+1))){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 503 print");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[4]+1)))(7,*((C_word*)lf[4]+1),t2,lf[223],((C_word*)t0)[5],lf[224],((C_word*)t0)[4],lf[225]);}
else{
t3=t2;
-f_5707(2,t3,C_SCHEME_UNDEFINED);}}}
+f_5657(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){
+/* k5655 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5657(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5657,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5662,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 505 with-output-to-file");
+((C_proc4)C_retrieve_symbol_proc(lf[222]))(4,*((C_word*)lf[222]+1),((C_word*)t0)[2],((C_word*)t0)[3],t2);}
-/* 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){
+/* a5661 in k5655 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5662(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -22498,22 +22297,22 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5662,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5666,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5699,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 508 chicken-version");
+((C_proc2)C_retrieve_symbol_proc(lf[221]))(2,*((C_word*)lf[221]+1),t3);}
-/* 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){
+/* k5697 in a5661 in k5655 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5699(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 507 print");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[4]+1)))(7,*((C_word*)lf[4]+1),((C_word*)t0)[3],lf[218],((C_word*)t0)[2],lf[219],t1,lf[220]);}
-/* 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){
+/* k5664 in a5661 in k5655 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5666(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -22522,16 +22321,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_5666,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5669,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5724,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5674,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
t6=((C_word*)t4)[1];
-f_5724(t6,t2,((C_word*)t0)[2]);}
+f_5674(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){
+/* loop258 in k5664 in a5661 in k5655 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5674(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -22540,12 +22339,12 @@ 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");
+C_save_and_reclaim((void*)trf_5674,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_retrieve(lf[217]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5684,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g265266");
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -22553,137 +22352,137 @@ 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){
+/* k5682 in loop258 in k5664 in a5661 in k5655 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5684(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_5674(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){
+/* k5667 in k5664 in a5661 in k5655 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5669(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 509 print");
-((C_proc3)C_retrieve_proc(*((C_word*)lf[4]+1)))(3,*((C_word*)lf[4]+1),((C_word*)t0)[2],lf[218]);}
+C_trace("compiler.scm: 510 print");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[4]+1)))(3,*((C_word*)lf[4]+1),((C_word*)t0)[2],lf[216]);}
-/* 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){
+/* f20080 in k5640 in k5637 in k5634 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f20080(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 830 values");
-C_values(4,0,((C_word*)t0)[2],t1,lf[217]);}
+C_trace("compiler.scm: 844 values");
+C_values(4,0,((C_word*)t0)[2],t1,lf[215]);}
-/* 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){
+/* k7674 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7676(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7676,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7683,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 845 reverse");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[211]+1)))(3,*((C_word*)lf[211]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7681 in k7674 in g1059 in k7663 in k7660 in loop in a7641 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7683(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 830 values");
-C_values(4,0,((C_word*)t0)[2],t1,lf[212]);}
+C_trace("compiler.scm: 844 values");
+C_values(4,0,((C_word*)t0)[2],t1,lf[210]);}
-/* 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){
+/* swap998 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7615(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_7615,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7619,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+C_trace("g100110021013");
t3=((C_word*)t0)[2];
((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-/* 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){
+/* k7617 in swap998 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7619(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_7619,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7622,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
+C_trace("g100110021013");
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[8])[1]);}
-/* 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){
+/* k7620 in k7617 in swap998 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7622(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7654,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7622,2,t0,t1);}
t2=C_mutate(((C_word *)((C_word*)t0)[8])+1,((C_word*)t0)[7]);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7626,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("g100310041014");
t4=((C_word*)t0)[2];
((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-/* 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){
+/* k7624 in k7620 in k7617 in swap998 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7626(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_7626,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7629,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("g100310041014");
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[6])[1]);}
-/* 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){
+/* k7627 in k7624 in k7620 in k7617 in swap998 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7629(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7661,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7629,2,t0,t1);}
t2=C_mutate(((C_word *)((C_word*)t0)[6])+1,((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7633,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("g100510061015");
t4=((C_word*)t0)[2];
((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-/* 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){
+/* k7631 in k7627 in k7624 in k7620 in k7617 in swap998 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7633(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_7633,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7636,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("g100510061015");
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
-/* 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){
+/* k7634 in k7631 in k7627 in k7624 in k7620 in k7617 in swap998 in k7612 in a7609 in k7603 in k7600 in k7594 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7636(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -22692,8 +22491,8 @@ 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){
+/* loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7509(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -22702,21 +22501,21 @@ 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");
+C_save_and_reclaim((void*)trf_7509,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7536,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7583,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g901902");
t6=t3;
-f_7578(t6,t4,t5);}
+f_7536(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k7581 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7583(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -22728,99 +22527,115 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7583,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop883896");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop885898");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7551(t6,((C_word*)t0)[3],t5);}
+f_7509(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop883896");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop885898");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7551(t6,((C_word*)t0)[3],t5);}}
+f_7509(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){
+/* g901 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7536(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_7536,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7540,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 782 ##sys#check-syntax");
+((C_proc5)C_retrieve_symbol_proc(lf[125]))(5,*((C_word*)lf[125]+1),t3,lf[206],t2,lf[207]);}
-/* 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){
+/* k7538 in g901 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7540(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7540,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7543,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=C_i_car(((C_word*)t0)[4]);
+C_trace("compiler.scm: 783 ##sys#strip-syntax");
+((C_proc5)C_retrieve_symbol_proc(lf[127]))(5,*((C_word*)lf[127]+1),t2,t3,((C_word*)t0)[3],C_SCHEME_FALSE);}
-/* 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){
+/* k7541 in k7538 in g901 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7543(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[8],*a=ab;
+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_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7543,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7550,a[2]=t1,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_cdr(((C_word*)t0)[4]);
+if(C_truep(C_i_pairp(t3))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7564,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7568,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=C_i_cadr(((C_word*)t0)[4]);
+C_trace("compiler.scm: 787 eval/meta");
+f_5594(t5,t6);}
+else{
+t4=t2;
+f_7550(t4,C_SCHEME_FALSE);}}
-/* 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){
+/* k7566 in k7541 in k7538 in g901 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7568(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 776 ##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[187]))(3,*((C_word*)lf[187]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 787 ##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[186]))(3,*((C_word*)lf[186]+1),((C_word*)t0)[2],t1);}
+
+/* k7562 in k7541 in k7538 in g901 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7564(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7564,2,t0,t1);}
+t2=((C_word*)t0)[3];
+f_7550(t2,C_a_i_cons(&a,2,t1,((C_word*)t0)[2]));}
-/* 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){
+/* k7548 in k7541 in k7538 in g901 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7550(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word t4;
-C_word ab[8],*a=ab;
+C_word ab[5],*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]);}
+C_save_and_reclaim((void*)trf_7550,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7554,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 788 ##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t2,((C_word*)t0)[2],lf[201]);}
-/* 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){
+/* k7552 in k7548 in k7541 in k7538 in g901 in loop885 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7554(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7596,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7554,2,t0,t1);}
t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,3,((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7402(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -22828,15 +22643,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7402,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7407,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7449,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7463,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 790 dynamic-wind");
+((C_proc5)C_retrieve_symbol_proc(lf[205]))(5,*((C_word*)lf[205]+1),((C_word*)t0)[2],t2,t3,t4);}
-/* 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){
+/* a7462 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7463(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -22845,15 +22660,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7463,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7511,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7469,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_7511(t5,t1,((C_word*)t0)[2]);}
+f_7469(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){
+/* loop927 in a7462 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7469(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -22863,31 +22678,31 @@ 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);}
+C_save_and_reclaim((void*)trf_7469,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7492,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=C_i_car(t4);
+t6=C_i_caddr(t4);
+C_trace("compiler.scm: 803 ##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t3,t5,lf[201],t6);}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k7490 in loop927 in a7462 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7492(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_7469(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){
+/* a7448 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7449(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -22895,23 +22710,23 @@ 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));}
+C_save_and_reclaim((void*)tr2,(void*)f_7449,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7457,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=C_i_cddr(((C_word*)t0)[2]);
+C_trace("compiler.scm: 798 ##sys#canonicalize-body");
+((C_proc5)C_retrieve_symbol_proc(lf[161]))(5,*((C_word*)lf[161]+1),t2,t3,((C_word*)t0)[4],*((C_word*)lf[47]+1));}
-/* 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){
+/* k7455 in a7448 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7457(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 785 walk");
+C_trace("compiler.scm: 797 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]);}
+f_5724(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){
+/* a7406 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7407(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -22920,15 +22735,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7407,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7455,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7413,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
t5=((C_word*)t3)[1];
-f_7455(t5,t1,((C_word*)t0)[2]);}
+f_7413(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){
+/* loop913 in a7406 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7413(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -22938,31 +22753,69 @@ 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);}
+C_save_and_reclaim((void*)trf_7413,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7436,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=C_i_car(t4);
+t6=C_i_cadr(t4);
+C_trace("compiler.scm: 794 ##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t3,t5,lf[201],t6);}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k7434 in loop913 in a7406 in k7400 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7436(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_7413(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){
+/* k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7295(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[19],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7295,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7298,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
+if(C_truep(((C_word*)t0)[4])){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7389,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7393,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 760 ##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t4,t1,lf[201]);}
+else{
+t3=t2;
+f_7298(t3,C_SCHEME_UNDEFINED);}}
+
+/* k7391 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7393(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 758 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k7387 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7389(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word *a;
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
+t3=((C_word*)t0)[2];
+f_7298(t3,t2);}
+
+/* k7296 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7298(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -22970,47 +22823,51 @@ 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]);}
+C_save_and_reclaim((void*)trf_7298,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7301,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
+if(C_truep(((C_word*)t0)[3])){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7377,a[2]=((C_word*)t0)[9],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7385,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 765 eval/meta");
+f_5594(t4,((C_word*)t0)[3]);}
+else{
+C_trace("compiler.scm: 761 ##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t2,((C_word*)t0)[9],lf[201],C_SCHEME_FALSE);}}
-/* 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){
+/* k7383 in k7296 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7385(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 757 ##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[187]))(3,*((C_word*)lf[187]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 765 ##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[186]))(3,*((C_word*)lf[186]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k7375 in k7296 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7377(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7377,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7381,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 766 ##sys#current-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[192]))(2,*((C_word*)lf[192]+1),t2);}
-/* 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){
+/* k7379 in k7375 in k7296 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7381(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7381,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+C_trace("compiler.scm: 761 ##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[201],t2);}
-/* 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){
+/* k7299 in k7296 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7301(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -23024,201 +22881,195 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7301,2,t0,t1);}
+if(C_truep(C_retrieve(lf[191]))){
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,lf[200],t2);
+t4=C_a_i_cons(&a,2,lf[201],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,lf[98],t4);
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7331,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t3,a[8]=t5,tmp=(C_word)a,a+=9,tmp);
+if(C_truep(((C_word*)t0)[2])){
+t7=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,lf[186],t7);
+t9=C_a_i_cons(&a,2,lf[192],C_SCHEME_END_OF_LIST);
+t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
+t11=C_a_i_cons(&a,2,t8,t10);
+t12=C_a_i_cons(&a,2,lf[202],t11);
+t13=t6;
+f_7331(t13,C_a_i_cons(&a,2,t12,C_SCHEME_END_OF_LIST));}
else{
-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]);}}
+t7=t6;
+f_7331(t7,C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST));}}
+else{
+C_trace("compiler.scm: 767 walk");
+t2=((C_word*)((C_word*)t0)[7])[1];
+f_5724(t2,((C_word*)t0)[6],lf[203],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}}
-/* 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){
+/* k7329 in k7299 in k7296 in k7293 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7331(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_7331,NULL,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
+t4=C_a_i_cons(&a,2,lf[95],t3);
+C_trace("compiler.scm: 767 walk");
+t5=((C_word*)((C_word*)t0)[6])[1];
+f_5724(t5,((C_word*)t0)[5],t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7150(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7150,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7153,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
+t3=C_i_cadr(((C_word*)t0)[2]);
+if(C_truep(C_i_pairp(t3))){
+C_trace("compiler.scm: 733 caadr");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[139]+1)))(3,*((C_word*)lf[139]+1),t2,((C_word*)t0)[2]);}
else{
t4=t2;
-f_7202(2,t4,(C_word)C_i_cadr(((C_word*)t0)[4]));}}
+f_7153(2,t4,C_i_cadr(((C_word*)t0)[2]));}}
-/* 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){
+/* k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7153(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[15],*a=ab;
+C_word ab[14],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7202,2,t0,t1);}
-t2=(*a=C_CLOSURE_TYPE|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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7153,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7156,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
+t3=C_i_cadr(((C_word*)t0)[2]);
+if(C_truep(C_i_pairp(t3))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7237,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 735 cdadr");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[196]+1)))(3,*((C_word*)lf[196]+1),t4,((C_word*)t0)[2]);}
else{
t4=t2;
-f_7205(t4,(C_word)C_i_caddr(((C_word*)t0)[4]));}}
+f_7156(t4,C_i_caddr(((C_word*)t0)[2]));}}
-/* 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){
+/* k7235 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7237(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_7237,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7241,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t3=C_i_cddr(((C_word*)t0)[2]);
C_trace("##sys#append");
-t4=*((C_word*)lf[168]+1);
+t4=*((C_word*)lf[167]+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){
+/* k7239 in k7235 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7241(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7300,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_7241,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
-f_7205(t3,(C_word)C_a_i_cons(&a,2,lf[173],t2));}
+f_7156(t3,C_a_i_cons(&a,2,lf[172],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){
+/* k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7156(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word ab[11],*a=ab;
+C_word ab[10],*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");
+C_save_and_reclaim((void*)trf_7156,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7159,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 737 lookup");
t3=((C_word*)((C_word*)t0)[2])[1];
-f_5340(t3,t2,((C_word*)t0)[10],((C_word*)t0)[6]);}
+f_5290(t3,t2,((C_word*)t0)[9],((C_word*)t0)[5]);}
-/* 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){
+/* k7157 in k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7159(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[17],*a=ab;
+C_word ab[16],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7159,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7162,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7223,a[2]=((C_word*)t0)[8],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 738 ##sys#current-module");
+((C_proc2)C_retrieve_symbol_proc(lf[108]))(2,*((C_word*)lf[108]+1),t3);}
-/* 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){
+/* k7221 in k7157 in k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7223(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 738 ##sys#register-syntax-export");
+((C_proc5)C_retrieve_symbol_proc(lf[195]))(5,*((C_word*)lf[195]+1),((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k7160 in k7157 in k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7162(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
-C_word ab[16],*a=ab;
+C_word ab[15],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7162,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7165,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7211,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 741 ##sys#current-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[192]))(2,*((C_word*)lf[192]+1),t3);}
-/* 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){
+/* k7209 in k7160 in k7157 in k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7211(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7211,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7215,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7219,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 742 eval/meta");
+f_5594(t3,((C_word*)t0)[2]);}
-/* 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){
+/* k7217 in k7209 in k7160 in k7157 in k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7219(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 739 ##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[187]))(3,*((C_word*)lf[187]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 742 ##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[186]))(3,*((C_word*)lf[186]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k7213 in k7209 in k7160 in k7157 in k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7215(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 739 ##sys#extend-macro-environment");
+((C_proc5)C_retrieve_symbol_proc(lf[193]))(5,*((C_word*)lf[193]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k7163 in k7160 in k7157 in k7154 in k7151 in k7148 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7165(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -23232,27 +23083,27 @@ 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");
+C_save_and_reclaim((void*)tr2,(void*)f_7165,2,t0,t1);}
+if(C_truep(C_retrieve(lf[191]))){
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,lf[98],t2);
+t4=C_a_i_cons(&a,2,lf[192],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,lf[186],t5);
+t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,t4,t7);
+t9=C_a_i_cons(&a,2,t3,t8);
+t10=C_a_i_cons(&a,2,lf[193],t9);
+C_trace("compiler.scm: 743 walk");
t11=((C_word*)((C_word*)t0)[6])[1];
-f_5774(t11,((C_word*)t0)[5],t10,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_5724(t11,((C_word*)t0)[5],t10,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
else{
-C_trace("compiler.scm: 740 walk");
+C_trace("compiler.scm: 743 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]);}}
+f_5724(t2,((C_word*)t0)[5],lf[194],((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){
+/* k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7029(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -23266,21 +23117,21 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7029,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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]);
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7032,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
+t7=C_i_cadr(((C_word*)t0)[4]);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7133,a[2]=t3,a[3]=t9,a[4]=t5,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7087,a[2]=t3,a[3]=t9,a[4]=t5,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp));
t11=((C_word*)t9)[1];
-f_7133(t11,t6,t7);}
+f_7087(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){
+/* loop808 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7087(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -23289,21 +23140,21 @@ 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");
+C_save_and_reclaim((void*)trf_7087,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7114,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7137,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g824825");
t6=t3;
-f_7160(t6,t4,t5);}
+f_7114(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k7135 in loop808 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7137(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -23315,25 +23166,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7137,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop807820");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop808821");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7133(t6,((C_word*)t0)[3],t5);}
+f_7087(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop807820");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop808821");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7133(t6,((C_word*)t0)[3],t5);}}
+f_7087(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){
+/* g824 in loop808 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7114(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -23342,46 +23193,46 @@ 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);}
+C_save_and_reclaim((void*)trf_7114,NULL,3,t0,t1,t2);}
+t3=C_i_car(t2);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7126,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7130,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=C_i_cadr(t2);
+C_trace("compiler.scm: 715 eval/meta");
+f_5594(t5,t6);}
-/* 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){
+/* k7128 in g824 in loop808 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7130(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 711 ##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[187]))(3,*((C_word*)lf[187]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 714 ##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[186]))(3,*((C_word*)lf[186]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k7124 in g824 in loop808 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7126(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7172,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7126,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,3,((C_word*)t0)[2],C_SCHEME_FALSE,t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k7030 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7032(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7032,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7035,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 717 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t2,t1,((C_word*)t0)[2]);}
-/* 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){
+/* k7033 in k7030 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7035(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -23390,16 +23241,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7035,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7038,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7097,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7051,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
-f_7097(t6,t2,((C_word*)t0)[2]);}
+f_7051(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){
+/* loop833 in k7033 in k7030 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_7051(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -23413,12 +23264,12 @@ 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));
+C_save_and_reclaim((void*)trf_7051,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7059,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=f_7059(t3,t4);
+t6=C_slot(t2,C_fix(1));
t9=t1;
t10=t6;
t1=t9;
@@ -23429,40 +23280,40 @@ 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){
+/* g840 in loop833 in k7033 in k7030 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static C_word C_fcall f_7059(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_stack_check;
-t2=(C_word)C_i_cdr(t1);
-return((C_word)C_i_set_car(t2,((C_word*)t0)[2]));}
+t2=C_i_cdr(t1);
+return(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){
+/* k7036 in k7033 in k7030 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7038(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_7038,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7045,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+t3=C_i_cddr(((C_word*)t0)[2]);
+C_trace("compiler.scm: 723 ##sys#canonicalize-body");
+((C_proc5)C_retrieve_symbol_proc(lf[161]))(5,*((C_word*)lf[161]+1),t2,t3,((C_word*)t0)[4],*((C_word*)lf[47]+1));}
-/* 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){
+/* k7043 in k7036 in k7033 in k7030 in k7027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7045(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 719 walk");
+C_trace("compiler.scm: 722 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]);}
+f_5724(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){
+/* k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6942(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -23477,22 +23328,22 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6942,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6945,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6960,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t8=C_i_cadr(((C_word*)t0)[4]);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6966,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
-f_7012(t12,t7,t8);}
+f_6966(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){
+/* loop781 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6966(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -23501,21 +23352,21 @@ 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");
+C_save_and_reclaim((void*)trf_6966,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6993,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7016,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g797798");
t6=t3;
-f_7039(t6,t4,t5);}
+f_6993(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k7014 in loop781 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7016(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -23527,25 +23378,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7016,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop780793");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop781794");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7012(t6,((C_word*)t0)[3],t5);}
+f_6966(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop780793");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop781794");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_7012(t6,((C_word*)t0)[3],t5);}}
+f_6966(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){
+/* g797 in loop781 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6993(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -23554,65 +23405,65 @@ 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);}
+C_save_and_reclaim((void*)trf_6993,NULL,3,t0,t1,t2);}
+t3=C_i_car(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7005,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7009,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=C_i_cadr(t2);
+C_trace("compiler.scm: 700 eval/meta");
+f_5594(t5,t6);}
-/* 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){
+/* k7007 in g797 in loop781 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7009(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 696 ##sys#er-transformer");
-((C_proc3)C_retrieve_symbol_proc(lf[187]))(3,*((C_word*)lf[187]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 699 ##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[186]))(3,*((C_word*)lf[186]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k7003 in g797 in loop781 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_7005(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7051,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7005,2,t0,t1);}
t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,3,((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k6958 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6960(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 694 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k6943 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6945(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_6945,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6952,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=C_i_cddr(((C_word*)t0)[2]);
+C_trace("compiler.scm: 704 ##sys#canonicalize-body");
+((C_proc5)C_retrieve_symbol_proc(lf[161]))(5,*((C_word*)lf[161]+1),t2,t3,t1,*((C_word*)lf[47]+1));}
-/* 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){
+/* k6950 in k6943 in k6940 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6952(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 700 walk");
+C_trace("compiler.scm: 703 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]);}
+f_5724(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){
+/* k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6613(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -23625,38 +23476,38 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_6613,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[10]);
t3=t2;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=(C_word)C_i_cddr(((C_word*)t0)[10]);
+t5=C_i_cddr(((C_word*)t0)[10]);
t6=t5;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_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]);}
+t8=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6622,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t7,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word*)t0)[9],tmp=(C_word)a,a+=12,tmp);
+t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6919,a[2]=t8,a[3]=((C_word*)t0)[8],a[4]=t7,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 650 ##sys#extended-lambda-list?");
+((C_proc3)C_retrieve_symbol_proc(lf[183]))(3,*((C_word*)lf[183]+1),t9,((C_word*)t4)[1]);}
-/* 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){
+/* k6917 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6919(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6965,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_6919,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6924,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6930,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
C_trace("##sys#call-with-values");
C_call_with_values(4,0,((C_word*)t0)[2],t2,t3);}
else{
t2=((C_word*)t0)[2];
-f_6668(2,t2,C_SCHEME_UNDEFINED);}}
+f_6622(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){
+/* a6929 in k6917 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6930(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -23664,37 +23515,37 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_6930,4,t0,t1,t2,t3);}
t4=C_mutate(((C_word *)((C_word*)t0)[3])+1,t2);
t5=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
-/* 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){
+/* a6923 in k6917 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6924(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6924,2,t0,t1);}
+C_trace("compiler.scm: 653 ##sys#expand-extended-lambda-list");
+((C_proc6)C_retrieve_symbol_proc(lf[182]))(6,*((C_word*)lf[182]+1),t1,((C_word*)((C_word*)t0)[4])[1],((C_word*)((C_word*)t0)[3])[1],*((C_word*)lf[134]+1),((C_word*)t0)[2]);}
-/* 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){
+/* k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6622(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_6622,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6627,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 655 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1],t2);}
-/* 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){
+/* a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6627(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -23708,20 +23559,20 @@ 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);}
+C_save_and_reclaim((void*)tr5,(void*)f_6627,5,t0,t1,t2,t3,t4);}
t5=C_SCHEME_END_OF_LIST;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_FALSE;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_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);
+t9=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6631,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t3,a[6]=t4,a[7]=t2,a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[7],a[11]=t1,a[12]=((C_word*)t0)[8],a[13]=((C_word*)t0)[9],tmp=(C_word)a,a+=14,tmp);
t10=C_SCHEME_UNDEFINED;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6929,a[2]=t6,a[3]=t11,a[4]=t8,tmp=(C_word)a,a+=5,tmp));
+t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6883,a[2]=t6,a[3]=t11,a[4]=t8,tmp=(C_word)a,a+=5,tmp));
t13=((C_word*)t11)[1];
-f_6929(t13,t9,t2);}
+f_6883(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){
+/* loop657 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6883(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -23730,12 +23581,12 @@ 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");
+C_save_and_reclaim((void*)trf_6883,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_retrieve(lf[96]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6912,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g673674");
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -23743,8 +23594,8 @@ 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){
+/* k6910 in loop657 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6912(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -23756,25 +23607,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6912,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop656669");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop657670");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6929(t6,((C_word*)t0)[3],t5);}
+f_6883(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop656669");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop657670");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6929(t6,((C_word*)t0)[3],t5);}}
+f_6883(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){
+/* k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6631(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -23788,21 +23639,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6631,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_6634,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=((C_word*)t0)[13],tmp=(C_word)a,a+=15,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6878,a[2]=((C_word*)t0)[12],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6832,a[2]=((C_word*)t0)[12],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6880,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6834,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
t11=((C_word*)t9)[1];
-f_6880(t11,t7,((C_word*)t0)[7],t1);}
+f_6834(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){
+/* loop681 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6834(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -23814,15 +23665,15 @@ 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);
+C_save_and_reclaim((void*)trf_6834,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=*((C_word*)lf[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");
+t6=*((C_word*)lf[162]+1);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6867,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+t8=C_slot(t2,C_fix(0));
+t9=C_slot(t3,C_fix(0));
+C_trace("g701702");
t10=t6;
((C_proc4)C_retrieve_proc(t10))(4,t10,t7,t8,t9);}
else{
@@ -23830,8 +23681,8 @@ 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){
+/* k6865 in loop681 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6867(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -23839,19 +23690,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6867,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6847,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
t4=t3;
-f_6893(t4,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
+f_6847(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
else{
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=t3;
-f_6893(t5,t4);}}
+f_6847(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){
+/* k6845 in k6865 in loop681 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6847(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -23859,85 +23710,85 @@ 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");
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+C_trace("loop681695");
t5=((C_word*)((C_word*)t0)[3])[1];
-f_6880(t5,((C_word*)t0)[2],t3,t4);}
+f_6834(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){
+/* k6830 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6832(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 659 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6634(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[15],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_6634,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_6637,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],tmp=(C_word)a,a+=15,tmp);
+C_trace("compiler.scm: 660 ##sys#canonicalize-body");
+((C_proc5)C_retrieve_symbol_proc(lf[161]))(5,*((C_word*)lf[161]+1),t2,((C_word*)((C_word*)t0)[2])[1],t1,*((C_word*)lf[47]+1));}
-/* 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){
+/* k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6637(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[19],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6637,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_6640,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=t1,a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[13],a[12]=((C_word*)t0)[14],tmp=(C_word)a,a+=13,tmp);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6828,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t2,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 661 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t3,((C_word*)t0)[8],((C_word*)t0)[2]);}
-/* 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){
+/* k6826 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6828(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 658 walk");
+C_trace("compiler.scm: 661 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);}
+f_5724(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){
+/* k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6640(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[17],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6640,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6643,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[11],a[10]=((C_word*)t0)[12],a[11]=t1,tmp=(C_word)a,a+=12,tmp);
if(C_truep(((C_word*)t0)[3])){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6824,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 665 posq");
+((C_proc4)C_retrieve_symbol_proc(lf[180]))(4,*((C_word*)lf[180]+1),t3,((C_word*)t0)[3],((C_word*)t0)[4]);}
else{
-C_trace("compiler.scm: 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);}}
+C_trace("compiler.scm: 663 build-lambda-list");
+((C_proc5)C_retrieve_symbol_proc(lf[179]))(5,*((C_word*)lf[179]+1),t2,((C_word*)t0)[5],((C_word*)t0)[2],C_SCHEME_FALSE);}}
-/* 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){
+/* k6822 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6824(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_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);}
+t2=C_i_list_ref(((C_word*)t0)[4],t1);
+C_trace("compiler.scm: 663 build-lambda-list");
+((C_proc5)C_retrieve_symbol_proc(lf[179]))(5,*((C_word*)lf[179]+1),((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[2],t2);}
-/* 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){
+/* k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6643(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -23946,16 +23797,16 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6643,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,t1,t2);
+t4=C_a_i_cons(&a,2,lf[171],t3);
+t5=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6649,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[11],a[6]=t1,a[7]=t4,a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
+C_trace("compiler.scm: 667 set-real-names!");
+f_5318(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6649(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -23965,22 +23816,22 @@ 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]));
+C_save_and_reclaim((void*)tr2,(void*)f_6649,2,t0,t1);}
+t2=C_i_not(((C_word*)t0)[10]);
+t3=(C_truep(t2)?t2:C_i_assq(((C_word*)t0)[10],((C_word*)t0)[9]));
if(C_truep(t3)){
t4=((C_word*)t0)[8];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,((C_word*)t0)[7]);}
else{
-t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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");
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6664,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6772,a[2]=((C_word*)t0)[10],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6799,a[2]=((C_word*)t0)[2],a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 671 lookup");
t7=((C_word*)((C_word*)t0)[3])[1];
-f_5340(t7,t6,((C_word*)t0)[2],((C_word*)t0)[9]);}}
+f_5290(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){
+/* k6797 in k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6799(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -23988,13 +23839,13 @@ C_word *a;
if(C_truep(t1)){
t2=t1;
t3=((C_word*)t0)[3];
-f_6818(t3,(C_word)C_eqp(lf[172],t2));}
+f_6772(t3,C_eqp(lf[171],t2));}
else{
t2=((C_word*)t0)[3];
-f_6818(t2,(C_word)C_eqp(lf[172],((C_word*)t0)[2]));}}
+f_6772(t2,C_eqp(lf[171],((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){
+/* k6770 in k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6772(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24003,28 +23854,28 @@ 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]);
+t2=C_eqp(*((C_word*)lf[37]+1),lf[176]);
if(C_truep(t2)){
t3=((C_word*)t0)[3];
-f_6710(2,t3,t2);}
+f_6664(2,t3,t2);}
else{
-t3=(C_word)C_eqp(*((C_word*)lf[37]+1),lf[178]);
+t3=C_eqp(*((C_word*)lf[37]+1),lf[177]);
if(C_truep(t3)){
t4=((C_word*)t0)[2];
C_trace("##sys#get");
-((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),((C_word*)t0)[3],t4,lf[179]);}
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),((C_word*)t0)[3],t4,lf[178]);}
else{
t4=((C_word*)t0)[3];
-f_6710(2,t4,C_SCHEME_FALSE);}}}
+f_6664(2,t4,C_SCHEME_FALSE);}}}
else{
t2=((C_word*)t0)[3];
-f_6710(2,t2,C_SCHEME_FALSE);}}
+f_6664(2,t2,C_SCHEME_FALSE);}}
else{
t2=((C_word*)t0)[3];
-f_6710(2,t2,C_SCHEME_FALSE);}}
+f_6664(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){
+/* k6662 in k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6664(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24035,31 +23886,31 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_6664,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");
+C_trace("compiler.scm: 677 expand-profile-lambda");
+((C_proc5)C_retrieve_symbol_proc(lf[173]))(5,*((C_word*)lf[173]+1),((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6673,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+t3=C_i_length(((C_word*)t0)[4]);
+if(C_truep(C_fixnum_greaterp(t3,C_fix(1)))){
+t4=C_i_car(((C_word*)t0)[4]);
+if(C_truep(C_i_symbolp(t4))){
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6695,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6751,a[2]=((C_word*)t0)[4],a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+t7=C_i_car(((C_word*)t0)[4]);
+C_trace("compiler.scm: 681 lookup");
t8=((C_word*)((C_word*)t0)[3])[1];
-f_5340(t8,t6,t7,((C_word*)t0)[2]);}
+f_5290(t8,t6,t7,((C_word*)t0)[2]);}
else{
t5=t2;
-f_6719(t5,C_SCHEME_FALSE);}}
+f_6673(t5,C_SCHEME_FALSE);}}
else{
t4=t2;
-f_6719(t4,C_SCHEME_FALSE);}}}
+f_6673(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){
+/* k6749 in k6662 in k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6751(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24068,14 +23919,14 @@ C_word *a;
if(C_truep(t1)){
t2=t1;
t3=((C_word*)t0)[3];
-f_6741(t3,(C_word)C_eqp(lf[176],t2));}
+f_6695(t3,C_eqp(lf[175],t2));}
else{
-t2=(C_word)C_i_car(((C_word*)t0)[2]);
+t2=C_i_car(((C_word*)t0)[2]);
t3=((C_word*)t0)[3];
-f_6741(t3,(C_word)C_eqp(lf[176],t2));}}
+f_6695(t3,C_eqp(lf[175],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){
+/* k6693 in k6662 in k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6695(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24087,40 +23938,40 @@ 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);}
+C_save_and_reclaim((void*)trf_6695,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);
+t2=C_i_cadr(((C_word*)t0)[5]);
+t3=C_i_stringp(t2);
if(C_truep(t3)){
t4=((C_word*)t0)[4];
-f_6719(t4,t3);}
+f_6673(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(C_i_listp(t2))){
+t4=C_i_length(t2);
+t5=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");
+t6=C_i_car(t2);
+if(C_truep(C_i_symbolp(t6))){
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6729,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t8=C_i_car(t2);
+C_trace("compiler.scm: 687 lookup");
t9=((C_word*)((C_word*)t0)[3])[1];
-f_5340(t9,t7,t8,((C_word*)t0)[2]);}
+f_5290(t9,t7,t8,((C_word*)t0)[2]);}
else{
t7=((C_word*)t0)[4];
-f_6719(t7,C_SCHEME_FALSE);}}
+f_6673(t7,C_SCHEME_FALSE);}}
else{
t6=((C_word*)t0)[4];
-f_6719(t6,C_SCHEME_FALSE);}}
+f_6673(t6,C_SCHEME_FALSE);}}
else{
t4=((C_word*)t0)[4];
-f_6719(t4,C_SCHEME_FALSE);}}}
+f_6673(t4,C_SCHEME_FALSE);}}}
else{
t2=((C_word*)t0)[4];
-f_6719(t2,C_SCHEME_FALSE);}}
+f_6673(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){
+/* k6727 in k6693 in k6662 in k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6729(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24129,28 +23980,28 @@ C_word *a;
if(C_truep(t1)){
t2=t1;
t3=((C_word*)t0)[3];
-f_6719(t3,(C_word)C_eqp(lf[99],t2));}
+f_6673(t3,C_eqp(lf[98],t2));}
else{
-t2=(C_word)C_i_car(((C_word*)t0)[2]);
+t2=C_i_car(((C_word*)t0)[2]);
t3=((C_word*)t0)[3];
-f_6719(t3,(C_word)C_eqp(lf[99],t2));}}
+f_6673(t3,C_eqp(lf[98],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){
+/* k6671 in k6662 in k6647 in k6641 in k6638 in k6635 in k6632 in k6629 in a6626 in k6620 in k6611 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6673(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(C_truep(t1)){
-t2=(C_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]);}
+t2=C_i_cadr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 688 process-lambda-documentation");
+((C_proc5)C_retrieve_symbol_proc(lf[174]))(5,*((C_word*)lf[174]+1),((C_word*)t0)[4],((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
else{
t2=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}}
-/* 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){
+/* k6454 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6456(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24165,22 +24016,22 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_6456,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[7]);
+t3=C_i_cddr(((C_word*)t0)[7]);
t4=C_SCHEME_END_OF_LIST;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_FALSE;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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);
+t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6477,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6605,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6559,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
t12=((C_word*)t10)[1];
-f_6605(t12,t8,t2);}
+f_6559(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){
+/* loop584 in k6454 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6559(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -24200,17 +24051,17 @@ 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);
+C_save_and_reclaim((void*)trf_6559,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_slot(t2,C_fix(0));
+t4=C_i_car(t3);
+t5=C_a_i_list(&a,2,t4,lf[169]);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
+t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-C_trace("loop583596");
+t9=C_slot(t2,C_fix(1));
+C_trace("loop584597");
t15=t1;
t16=t9;
t1=t15;
@@ -24219,8 +24070,8 @@ 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");
+t9=C_slot(t2,C_fix(1));
+C_trace("loop584597");
t15=t1;
t16=t9;
t1=t15;
@@ -24231,8 +24082,8 @@ 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){
+/* k6475 in k6454 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6477(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24246,21 +24097,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6477,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6481,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6531,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6485,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6549,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6503,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
t11=((C_word*)t9)[1];
-f_6549(t11,t7,((C_word*)t0)[2]);}
+f_6503(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){
+/* loop608 in k6475 in k6454 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6503(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -24283,20 +24134,20 @@ 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);
+C_save_and_reclaim((void*)trf_6503,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_slot(t2,C_fix(0));
+t4=C_i_car(t3);
+t5=C_i_cadr(t3);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,t4,t6);
+t8=C_a_i_cons(&a,2,lf[168],t7);
+t9=C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t10=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t9);
+t10=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t9);
t11=C_mutate(((C_word *)((C_word*)t0)[4])+1,t9);
-t12=(C_word)C_slot(t2,C_fix(1));
-C_trace("loop607620");
+t12=C_slot(t2,C_fix(1));
+C_trace("loop608621");
t18=t1;
t19=t12;
t1=t18;
@@ -24305,8 +24156,8 @@ 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");
+t12=C_slot(t2,C_fix(1));
+C_trace("loop608621");
t18=t1;
t19=t12;
t1=t18;
@@ -24317,21 +24168,21 @@ 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){
+/* k6483 in k6475 in k6454 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6485(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_6485,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6501,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
C_trace("##sys#append");
-t3=*((C_word*)lf[168]+1);
+t3=*((C_word*)lf[167]+1);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k6499 in k6483 in k6475 in k6454 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6501(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24339,45 +24190,45 @@ 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_save_and_reclaim((void*)tr2,(void*)f_6501,2,t0,t1);}
+t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=C_a_i_cons(&a,2,lf[159],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
C_trace("##sys#append");
-t5=*((C_word*)lf[168]+1);
+t5=*((C_word*)lf[167]+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){
+/* k6479 in k6475 in k6454 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6481(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_6481,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[7],t1);
+t3=C_a_i_cons(&a,2,lf[159],t2);
+C_trace("compiler.scm: 635 walk");
t4=((C_word*)((C_word*)t0)[6])[1];
-f_5774(t4,((C_word*)t0)[5],t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_5724(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){
+/* k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6244(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[10],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_6244,2,t0,t1);}
+t2=C_i_cadr(((C_word*)t0)[8]);
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6250,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 619 unzip1");
+((C_proc3)C_retrieve_symbol_proc(lf[163]))(3,*((C_word*)lf[163]+1),t3,t2);}
-/* 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){
+/* k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6250(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24390,20 +24241,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_6250,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6253,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6457,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6411,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
-f_6457(t10,t6,t1);}
+f_6411(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){
+/* loop487 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6411(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -24412,12 +24263,12 @@ 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");
+C_save_and_reclaim((void*)trf_6411,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_retrieve(lf[96]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6440,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g503504");
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -24425,8 +24276,8 @@ 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){
+/* k6438 in loop487 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6440(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24438,25 +24289,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6440,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop486499");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop487500");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6457(t6,((C_word*)t0)[3],t5);}
+f_6411(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop486499");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop487500");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6457(t6,((C_word*)t0)[3],t5);}}
+f_6411(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){
+/* k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6253(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24470,21 +24321,21 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6253,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6256,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t1,a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6406,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6360,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6408,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6362,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
t11=((C_word*)t9)[1];
-f_6408(t11,t7,((C_word*)t0)[2],t1);}
+f_6362(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){
+/* loop511 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6362(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -24496,15 +24347,15 @@ 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);
+C_save_and_reclaim((void*)trf_6362,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=*((C_word*)lf[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");
+t6=*((C_word*)lf[162]+1);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6395,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+t8=C_slot(t2,C_fix(0));
+t9=C_slot(t3,C_fix(0));
+C_trace("g531532");
t10=t6;
((C_proc4)C_retrieve_proc(t10))(4,t10,t7,t8,t9);}
else{
@@ -24512,8 +24363,8 @@ 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){
+/* k6393 in loop511 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6395(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24521,19 +24372,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6395,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6375,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
t4=t3;
-f_6421(t4,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
+f_6375(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
else{
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=t3;
-f_6421(t5,t4);}}
+f_6375(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){
+/* k6373 in k6393 in loop511 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6375(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24541,34 +24392,34 @@ 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");
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+C_trace("loop511525");
t5=((C_word*)((C_word*)t0)[3])[1];
-f_6408(t5,((C_word*)t0)[2],t3,t4);}
+f_6362(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){
+/* k6358 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6360(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 621 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6256(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6256,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6259,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=t1,a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
+C_trace("compiler.scm: 622 set-real-names!");
+f_5318(t2,((C_word*)t0)[8],((C_word*)t0)[2]);}
-/* 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){
+/* k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6259(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24581,20 +24432,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_6259,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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);
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6270,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6292,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp));
t10=((C_word*)t8)[1];
-f_6338(t10,t6,((C_word*)t0)[6],((C_word*)t0)[2]);}
+f_6292(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){
+/* loop542 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6292(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -24606,24 +24457,24 @@ 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);
+C_save_and_reclaim((void*)trf_6292,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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");
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6323,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6342,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+t8=C_slot(t2,C_fix(0));
+t9=C_slot(t3,C_fix(0));
+C_trace("g562563");
t10=t6;
-f_6369(t10,t7,t8,t9);}
+f_6323(t10,t7,t8,t9);}
else{
t6=((C_word*)((C_word*)t0)[2])[1];
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-/* 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){
+/* k6340 in loop542 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6342(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24631,19 +24482,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6342,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6305,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
t4=t3;
-f_6351(t4,(C_word)C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
+f_6305(t4,C_i_setslot(((C_word*)((C_word*)t0)[7])[1],C_fix(1),t2));}
else{
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=t3;
-f_6351(t5,t4);}}
+f_6305(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){
+/* k6303 in k6340 in loop542 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6305(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24651,14 +24502,14 @@ 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");
+t3=C_slot(((C_word*)t0)[5],C_fix(1));
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
+C_trace("loop542556");
t5=((C_word*)((C_word*)t0)[3])[1];
-f_6338(t5,((C_word*)t0)[2],t3,t4);}
+f_6292(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){
+/* g562 in loop542 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6323(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -24666,26 +24517,26 @@ 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");
+C_save_and_reclaim((void*)trf_6323,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6331,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t5=C_i_cadr(t3);
+t6=C_i_car(t3);
+C_trace("compiler.scm: 625 walk");
t7=((C_word*)((C_word*)t0)[4])[1];
-f_5774(t7,t4,t5,((C_word*)t0)[3],((C_word*)t0)[2],t6);}
+f_5724(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){
+/* k6329 in g562 in loop542 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6331(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6377,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_6331,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k6268 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6270(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24693,50 +24544,66 @@ 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));}
+C_save_and_reclaim((void*)tr2,(void*)f_6270,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6278,a[2]=((C_word*)t0)[8],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6282,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t2,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+t4=C_i_cddr(((C_word*)t0)[2]);
+C_trace("compiler.scm: 627 ##sys#canonicalize-body");
+((C_proc5)C_retrieve_symbol_proc(lf[161]))(5,*((C_word*)lf[161]+1),t3,t4,((C_word*)t0)[6],*((C_word*)lf[47]+1));}
-/* 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){
+/* k6280 in k6268 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6282(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6282,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6286,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 628 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[160]+1)))(4,*((C_word*)lf[160]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k6284 in k6280 in k6268 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6286(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 624 walk");
+C_trace("compiler.scm: 627 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]);}
+f_5724(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){
+/* k6276 in k6268 in k6257 in k6254 in k6251 in k6248 in k6242 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6278(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6278,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[159],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[158],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){
+/* k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6157(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6157,2,t0,t1);}
+t2=C_SCHEME_UNDEFINED;
+t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6159,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
+t5=((C_word*)t3)[1];
+f_6159(t5,((C_word*)t0)[2],t1);}
+
+/* loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6159(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -24744,19 +24611,19 @@ 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))){
+C_save_and_reclaim((void*)trf_6159,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_nullp(t2))){
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[150]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[149]);}
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);
+t3=C_i_car(t2);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6174,a[2]=((C_word*)t0)[3],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6180,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
C_trace("##sys#call-with-values");
C_call_with_values(4,0,t1,t4,t5);}}
-/* 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){
+/* a6179 in loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6180(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -24766,119 +24633,119 @@ 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);
+C_save_and_reclaim((void*)tr4,(void*)f_6180,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6184,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6206,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
if(C_truep(t3)){
t6=t3;
if(C_truep(t6)){
t7=t4;
-f_6234(2,t7,C_SCHEME_UNDEFINED);}
+f_6184(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]);}}
+C_trace("compiler.scm: 611 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t4,lf[152],lf[153],((C_word*)t0)[2]);}}
else{
-if(C_truep((C_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]);}
+if(C_truep(C_i_symbolp(((C_word*)t0)[2]))){
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6218,a[2]=t5,a[3]=((C_word*)t0)[2],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 606 feature?");
+((C_proc3)C_retrieve_symbol_proc(lf[157]))(3,*((C_word*)lf[157]+1),t6,((C_word*)t0)[2]);}
else{
-C_trace("compiler.scm: 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]);}}}
+C_trace("compiler.scm: 611 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),t4,lf[152],lf[153],((C_word*)t0)[2]);}}}
-/* 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){
+/* k6216 in a6179 in loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6218(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6268,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_6218,2,t0,t1);}
if(C_truep(t1)){
t2=t1;
if(C_truep(t2)){
t3=((C_word*)t0)[4];
-f_6234(2,t3,C_SCHEME_UNDEFINED);}
+f_6184(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]);}}
+C_trace("compiler.scm: 611 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[4],lf[152],lf[153],((C_word*)t0)[3]);}}
else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6228,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 608 ##sys#canonicalize-extension-path");
+((C_proc4)C_retrieve_symbol_proc(lf[155]))(4,*((C_word*)lf[155]+1),t2,((C_word*)t0)[3],lf[156]);}}
-/* 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){
+/* k6226 in k6216 in a6179 in loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6228(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 607 ##sys#find-extension");
+((C_proc4)C_retrieve_symbol_proc(lf[154]))(4,*((C_word*)lf[154]+1),((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
-/* 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){
+/* k6204 in a6179 in loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6206(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(C_truep(t1)){
t2=((C_word*)t0)[3];
-f_6234(2,t2,C_SCHEME_UNDEFINED);}
+f_6184(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]);}}
+C_trace("compiler.scm: 611 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[3],lf[152],lf[153],((C_word*)t0)[2]);}}
-/* 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){
+/* k6182 in a6179 in loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6184(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_6184,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6199,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_cdr(((C_word*)t0)[3]);
+C_trace("compiler.scm: 613 loop");
t4=((C_word*)((C_word*)t0)[2])[1];
-f_6209(t4,t2,t3);}
+f_6159(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){
+/* k6197 in k6182 in a6179 in loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6199(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6199,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[152],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[151],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){
+/* a6173 in loop in k6155 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6174(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6174,2,t0,t1);}
+C_trace("compiler.scm: 602 ##sys#do-the-right-thing");
+((C_proc5)C_retrieve_symbol_proc(lf[150]))(5,*((C_word*)lf[150]+1),t1,((C_word*)t0)[3],C_SCHEME_TRUE,((C_word*)t0)[2]);}
-/* 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){
+/* k6151 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6153(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 595 walk");
+C_trace("compiler.scm: 596 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]);}
+f_5724(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){
+/* loop410 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_6104(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -24887,12 +24754,12 @@ 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");
+C_save_and_reclaim((void*)trf_6104,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_retrieve(lf[147]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6133,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+C_trace("g426427");
t6=t3;
((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
else{
@@ -24900,8 +24767,8 @@ 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){
+/* k6131 in loop410 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6133(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24913,36 +24780,36 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6133,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop409422");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop410423");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6154(t6,((C_word*)t0)[3],t5);}
+f_6104(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-C_trace("loop409422");
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop410423");
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6154(t6,((C_word*)t0)[3],t5);}}
+f_6104(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){
+/* k6081 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6083(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_6083,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6086,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_apply(4,0,t2,C_retrieve(lf[146]),t1);}
-/* 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){
+/* k6084 in k6081 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6086(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -24950,99 +24817,99 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_6086,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6089,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6091,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6097,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 588 ##sys#hash-table-update!");
+((C_proc6)C_retrieve_symbol_proc(lf[144]))(6,*((C_word*)lf[144]+1),t2,*((C_word*)lf[83]+1),lf[145],t3,t4);}
-/* 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){
+/* a6096 in k6084 in k6081 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6097(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6147,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_6097,2,t0,t1);}
t2=t1;
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-/* 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){
+/* a6090 in k6084 in k6081 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6091(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_6141,3,t0,t1,t2);}
-t3=C_retrieve(lf[143]);
-C_trace("g437438");
+C_save_and_reclaim((void*)tr3,(void*)f_6091,3,t0,t1,t2);}
+t3=C_retrieve(lf[142]);
+C_trace("g438439");
t4=t3;
-((C_proc5)C_retrieve_proc(t4))(5,t4,t1,*((C_word*)lf[144]+1),t2,((C_word*)t0)[2]);}
+((C_proc5)C_retrieve_proc(t4))(5,t4,t1,*((C_word*)lf[143]+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){
+/* k6087 in k6084 in k6081 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6089(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[142]);}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[141]);}
-/* 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){
+/* k6056 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6058(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_6058,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6066,a[2]=((C_word*)t0)[7],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t3=C_i_caddr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 583 walk");
t4=((C_word*)((C_word*)t0)[5])[1];
-f_5774(t4,t2,t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_5724(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){
+/* k6064 in k6056 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6066(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6066,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[105],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[104],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){
+/* k6027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6029(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6029,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6037,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6041,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 578 cadadr");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[137]+1)))(3,*((C_word*)lf[137]+1),t3,((C_word*)t0)[2]);}
-/* 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){
+/* k6039 in k6027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6041(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 577 ##sys#strip-syntax");
-((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),((C_word*)t0)[2],t1);}
+C_trace("compiler.scm: 578 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k6035 in k6027 in k6006 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_6037(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -25050,45 +24917,45 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6037,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,lf[101],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,lf[100],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){
+/* k5948 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5950(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6000,2,t0,t1);}
-t2=(C_word)C_i_assoc(t1,*((C_word*)lf[54]+1));
+C_save_and_reclaim((void*)tr2,(void*)f_5950,2,t0,t1);}
+t2=C_i_assoc(t1,*((C_word*)lf[54]+1));
if(C_truep(t2)){
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_cdr(t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_cdr(t2));}
else{
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5962,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 568 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t3,lf[136]);}}
-/* 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){
+/* k5960 in k5948 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5962(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_5962,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5966,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 569 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[135]))(5,*((C_word*)lf[135]+1),t2,((C_word*)t0)[2],t1,*((C_word*)lf[54]+1));}
-/* 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){
+/* k5964 in k5960 in k5948 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5966(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -25100,112 +24967,112 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5966,2,t0,t1);}
t2=C_mutate((C_word*)lf[54]+1 /* (set! immutable-constants ...) */,t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6046,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_5996,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t4=((C_word*)t0)[2];
t5=C_SCHEME_END_OF_LIST;
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6021,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
-if(C_truep((C_word)C_i_nullp(t5))){
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5971,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t5))){
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t3,t4,lf[134],C_SCHEME_TRUE);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t3,t4,lf[133],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);
+t7=C_i_cdr(t5);
+if(C_truep(C_i_nullp(t7))){
+t8=C_i_car(t5);
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t3,t4,lf[134],t8);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),t3,t4,lf[133],t8);}
else{
C_trace("##sys#error");
-t8=*((C_word*)lf[135]+1);
+t8=*((C_word*)lf[134]+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){
+/* k5969 in k5964 in k5960 in k5948 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5971(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_trace("##sys#put!");
-((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[133],t1);}
-/* 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){
+/* k5994 in k5964 in k5960 in k5948 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5996(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_5996,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5999,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 571 hide-variable");
+((C_proc3)C_retrieve_symbol_proc(lf[132]))(3,*((C_word*)lf[132]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k5997 in k5994 in k5964 in k5960 in k5948 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5999(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k5908 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5910(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5910,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5921,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_cadr(((C_word*)t0)[2]);
+C_trace("compiler.scm: 557 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[127]))(3,*((C_word*)lf[127]+1),t2,t3);}
-/* 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){
+/* k5919 in k5908 in k5905 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5921(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5971,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+C_save_and_reclaim((void*)tr2,(void*)f_5921,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,lf[99],t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,lf[98],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){
+/* k5847 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5849(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_5849,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5860,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=C_i_cadr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 549 walk");
t4=((C_word*)((C_word*)t0)[4])[1];
-f_5774(t4,t2,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+f_5724(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){
+/* k5858 in k5847 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5860(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_5860,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5868,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+t3=C_i_caddr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 550 walk");
t4=((C_word*)((C_word*)t0)[4])[1];
-f_5774(t4,t2,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+f_5724(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){
+/* k5866 in k5858 in k5847 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5868(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -25216,23 +25083,23 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_5868,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5876,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t3=C_i_cdddr(((C_word*)t0)[5]);
+if(C_truep(C_i_nullp(t3))){
+t4=C_a_i_cons(&a,2,lf[124],C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,t1,t4);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[7],t5);
t7=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_cons(&a,2,lf[124],t6));}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_a_i_cons(&a,2,lf[123],t6));}
else{
-t4=(C_word)C_i_cadddr(((C_word*)t0)[5]);
-C_trace("compiler.scm: 552 walk");
+t4=C_i_cadddr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 553 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);}}
+f_5724(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){
+/* k5874 in k5866 in k5858 in k5847 in k5838 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5876(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -25240,79 +25107,79 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_5876,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
+t4=C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
t5=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,lf[124],t4));}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_a_i_cons(&a,2,lf[123],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){
+/* g329 in k5816 in k5804 in k5798 in k5795 in k5791 in k5788 in k5785 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5822(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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");
+C_save_and_reclaim((void*)trf_5822,NULL,3,t0,t1,t2);}
+t3=C_i_cdr(((C_word*)t0)[6]);
+t4=C_a_i_cons(&a,2,t2,t3);
+C_trace("compiler.scm: 540 walk");
t5=((C_word*)((C_word*)t0)[5])[1];
-f_5774(t5,t1,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_5724(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){
+/* k5766 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5768(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5818,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_5768,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);
+t2=C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,lf[99],t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,lf[98],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]);}}
+C_trace("compiler.scm: 523 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[119]))(4,*((C_word*)lf[119]+1),((C_word*)t0)[2],lf[120],((C_word*)t0)[3]);}}
-/* 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){
+/* k5738 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5740(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5790,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_5740,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");
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,lf[98],t2);
+C_trace("compiler.scm: 519 resolve-variable");
t4=((C_word*)((C_word*)t0)[7])[1];
-f_5474(t4,((C_word*)t0)[6],((C_word*)t0)[8],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
+f_5424(t4,((C_word*)t0)[6],((C_word*)t0)[8],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
else{
-if(C_truep((C_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]);}
+if(C_truep(C_i_memq(((C_word*)t0)[8],C_retrieve(lf[114])))){
+C_trace("compiler.scm: 516 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[115]))(5,*((C_word*)lf[115]+1),((C_word*)t0)[2],lf[116],lf[117],((C_word*)t0)[8]);}
else{
-C_trace("compiler.scm: 518 resolve-variable");
+C_trace("compiler.scm: 519 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]);}}}
+f_5424(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){
+/* k5732 in walk in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5734(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 518 resolve-variable");
+C_trace("compiler.scm: 519 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]);}
+f_5424(t2,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* eval/meta in ##compiler#canonicalize-expression in k5138 in k5135 */
-static void C_fcall f_5644(C_word t1,C_word t2){
+/* eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5594(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -25322,17 +25189,17 @@ 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]);
+C_save_and_reclaim((void*)trf_5594,NULL,2,t1,t2);}
+t3=C_retrieve(lf[108]);
+t4=C_retrieve(lf[109]);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);}
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5598,a[2]=t1,a[3]=t2,a[4]=t3,a[5]=t4,a[6]=t6,tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 482 ##sys#meta-macro-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[113]))(2,*((C_word*)lf[113]+1),t7);}
-/* 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){
+/* k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5598(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -25341,17 +25208,17 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5598,2,t0,t1);}
t2=t1;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5599,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t3,a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5619,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
C_trace("##sys#dynamic-wind");
-t6=*((C_word*)lf[113]+1);
+t6=*((C_word*)lf[112]+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){
+/* a5618 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5619(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -25359,86 +25226,86 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5619,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5623,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5630,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 486 ##sys#current-meta-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[111]))(2,*((C_word*)lf[111]+1),t3);}
-/* 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){
+/* k5628 in a5618 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5630(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 483 ##sys#compile-to-closure");
+((C_proc5)C_retrieve_symbol_proc(lf[110]))(5,*((C_word*)lf[110]+1),((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t1);}
-/* 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){
+/* k5621 in a5618 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5623(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("g235236");
+C_trace("g236237");
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){
+/* swap215 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5599(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(c!=2) C_bad_argc_2(c,2,t0);
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_5599,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5603,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+C_trace("g218219226");
t3=((C_word*)t0)[2];
((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-/* 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){
+/* k5601 in swap215 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5603(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_5603,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5606,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+C_trace("g218219226");
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[6])[1]);}
-/* 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){
+/* k5604 in k5601 in swap215 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5606(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5656,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_5606,2,t0,t1);}
t2=C_mutate(((C_word *)((C_word*)t0)[6])+1,((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5610,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("g220221227");
t4=((C_word*)t0)[2];
((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-/* 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){
+/* k5608 in k5604 in k5601 in swap215 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5610(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_5610,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5613,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("g220221227");
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
-/* 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){
+/* k5611 in k5608 in k5604 in k5601 in swap215 in k5596 in eval/meta in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5613(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -25447,21 +25314,21 @@ 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){
+/* resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5424(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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");
+C_save_and_reclaim((void*)trf_5424,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5428,a[2]=t2,a[3]=t1,a[4]=t5,a[5]=t4,a[6]=t3,a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 449 lookup");
t7=((C_word*)((C_word*)t0)[2])[1];
-f_5340(t7,t6,t2,t4);}
+f_5290(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){
+/* k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5428(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -25469,46 +25336,46 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5428,2,t0,t1);}
+t2=C_retrieve(lf[99]);
+if(C_truep(C_i_symbolp(t1))){
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5440,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+if(C_truep(*((C_word*)lf[58]+1))){
+C_trace("compiler.scm: 452 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[107]))(4,*((C_word*)lf[107]+1),t3,*((C_word*)lf[57]+1),t1);}
else{
t4=t3;
-f_5490(2,t4,C_SCHEME_FALSE);}}
+f_5440(2,t4,C_SCHEME_FALSE);}}
else{
t3=((C_word*)t0)[2];
t4=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5440(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5490,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_5440,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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");
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5444,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+C_trace("g175176");
t3=t2;
-f_5494(t3,((C_word*)t0)[3],t1);}
+f_5444(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]);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5458,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+if(C_truep(*((C_word*)lf[56]+1))){
+C_trace("compiler.scm: 454 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[107]))(4,*((C_word*)lf[107]+1),t2,*((C_word*)lf[55]+1),((C_word*)t0)[2]);}
else{
t3=t2;
-f_5508(2,t3,C_SCHEME_FALSE);}}}
+f_5458(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){
+/* k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5458(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -25519,33 +25386,33 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5458,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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");
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5462,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+C_trace("g181182");
t3=t2;
-f_5512(t3,((C_word*)t0)[3],t1);}
+f_5462(t3,((C_word*)t0)[3],t1);}
else{
-t2=(C_word)C_i_assq(((C_word*)t0)[2],*((C_word*)lf[65]+1));
+t2=C_i_assq(((C_word*)t0)[2],*((C_word*)lf[64]+1));
if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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");
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5476,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+C_trace("g185186");
t4=t3;
-f_5526(t4,((C_word*)t0)[3],t2);}
+f_5476(t4,((C_word*)t0)[3],t2);}
else{
-t3=(C_word)C_i_assq(((C_word*)t0)[2],*((C_word*)lf[76]+1));
+t3=C_i_assq(((C_word*)t0)[2],*((C_word*)lf[75]+1));
if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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");
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5523,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+C_trace("g197198");
t5=t4;
-f_5573(t5,((C_word*)t0)[3],t3);}
+f_5523(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]);}}}}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5566,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 476 ##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t4,((C_word*)t0)[2],lf[106]);}}}}
-/* 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){
+/* k5564 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5566(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -25554,30 +25421,30 @@ 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]))){
+if(C_truep(C_i_memq(((C_word*)t0)[3],((C_word*)t0)[2]))){
t2=((C_word*)t0)[3];
t3=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-C_trace("compiler.scm: 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);}}}
+C_trace("compiler.scm: 477 ##sys#alias-global-hook");
+((C_proc4)C_retrieve_symbol_proc(lf[105]))(4,*((C_word*)lf[105]+1),((C_word*)t0)[4],((C_word*)t0)[3],C_SCHEME_FALSE);}}}
-/* 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){
+/* g197 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5523(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_5523,NULL,3,t0,t1,t2);}
+t3=C_i_caddr(t2);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5530,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t2,a[8]=t3,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 469 final-foreign-type");
+((C_proc3)C_retrieve_symbol_proc(lf[103]))(3,*((C_word*)lf[103]+1),t4,t3);}
-/* 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){
+/* k5528 in g197 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5530(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -25589,50 +25456,50 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5530,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
+t3=C_i_cadr(((C_word*)t0)[7]);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,t2,t4);
+t6=C_a_i_cons(&a,2,lf[104],t5);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5540,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5544,a[2]=((C_word*)t0)[8],a[3]=t7,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 473 finish-foreign-result");
+((C_proc4)C_retrieve_symbol_proc(lf[102]))(4,*((C_word*)lf[102]+1),t8,t1,t6);}
-/* 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){
+/* k5542 in k5528 in g197 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5544(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 472 foreign-type-convert-result");
+((C_proc4)C_retrieve_symbol_proc(lf[101]))(4,*((C_word*)lf[101]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k5538 in k5528 in g197 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5540(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 470 walk");
+C_trace("compiler.scm: 471 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]);}
+f_5724(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){
+/* g185 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5476(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word ab[9],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_5476,NULL,3,t0,t1,t2);}
+t3=C_i_cadr(t2);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5483,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t3,a[8]=t2,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 459 final-foreign-type");
+((C_proc3)C_retrieve_symbol_proc(lf[103]))(3,*((C_word*)lf[103]+1),t4,t3);}
-/* 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){
+/* k5481 in g185 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5483(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -25644,60 +25511,60 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5483,2,t0,t1);}
+t2=C_i_caddr(((C_word*)t0)[8]);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,t2,t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,lf[100],t5);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5493,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5497,a[2]=((C_word*)t0)[7],a[3]=t7,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 463 finish-foreign-result");
+((C_proc4)C_retrieve_symbol_proc(lf[102]))(4,*((C_word*)lf[102]+1),t8,t1,t6);}
-/* 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){
+/* k5495 in k5481 in g185 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5497(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 462 foreign-type-convert-result");
+((C_proc4)C_retrieve_symbol_proc(lf[101]))(4,*((C_word*)lf[101]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k5491 in k5481 in g185 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5493(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 460 walk");
+C_trace("compiler.scm: 461 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]);}
+f_5724(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){
+/* g181 in k5456 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5462(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5512,NULL,3,t0,t1,t2);}
-C_trace("compiler.scm: 454 walk");
+C_save_and_reclaim((void*)trf_5462,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 455 walk");
t3=((C_word*)((C_word*)t0)[5])[1];
-f_5774(t3,t1,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_5724(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){
+/* g175 in k5438 in k5426 in resolve-variable in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5444(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5494,NULL,3,t0,t1,t2);}
-t3=(C_word)C_i_car(t2);
-C_trace("compiler.scm: 452 walk");
+C_save_and_reclaim((void*)trf_5444,NULL,3,t0,t1,t2);}
+t3=C_i_car(t2);
+C_trace("compiler.scm: 453 walk");
t4=((C_word*)((C_word*)t0)[5])[1];
-f_5774(t4,t1,t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_5724(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){
+/* unquotify in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5378(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -25710,18 +25577,18 @@ 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);
+C_save_and_reclaim((void*)trf_5378,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_listp(t2))){
+t4=C_i_length(t2);
+t5=C_eqp(C_fix(2),t4);
if(C_truep(t5)){
-t6=(C_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");
+t6=C_i_car(t2);
+if(C_truep(C_i_symbolp(t6))){
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5410,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t8=C_i_car(t2);
+C_trace("compiler.scm: 444 lookup");
t9=((C_word*)((C_word*)t0)[2])[1];
-f_5340(t9,t7,t8,t3);}
+f_5290(t9,t7,t8,t3);}
else{
t7=t2;
t8=t1;
@@ -25735,24 +25602,24 @@ 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){
+/* k5408 in unquotify in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5410(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_eqp(lf[99],t1);
+t2=C_eqp(lf[98],t1);
if(C_truep(t2)){
t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_cadr(((C_word*)t0)[2]));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_i_cadr(((C_word*)t0)[2]));}
else{
t3=((C_word*)t0)[2];
t4=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* set-real-names! in ##compiler#canonicalize-expression in k5138 in k5135 */
-static void C_fcall f_5368(C_word t1,C_word t2,C_word t3){
+/* set-real-names! in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5318(C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -25760,15 +25627,15 @@ 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);}
+C_save_and_reclaim((void*)trf_5318,NULL,3,t1,t2,t3);}
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5374,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5324,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
t7=((C_word*)t5)[1];
-f_5374(t7,t1,t2,t3);}
+f_5324(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){
+/* loop131 in set-real-names! in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5324(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -25779,175 +25646,175 @@ 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);
+C_save_and_reclaim((void*)trf_5324,NULL,4,t0,t1,t2,t3);}
+t4=C_i_pairp(t2);
+t5=(C_truep(t4)?C_i_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);}
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5339,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t7=C_slot(t2,C_fix(0));
+t8=C_slot(t3,C_fix(0));
+C_trace("compiler.scm: 433 set-real-name!");
+((C_proc4)C_retrieve_symbol_proc(lf[97]))(4,*((C_word*)lf[97]+1),t6,t7,t8);}
else{
t6=C_SCHEME_UNDEFINED;
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
-/* 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){
+/* k5337 in loop131 in set-real-names! in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5339(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=C_slot(((C_word*)t0)[5],C_fix(1));
+t3=C_slot(((C_word*)t0)[4],C_fix(1));
t4=((C_word*)((C_word*)t0)[3])[1];
-f_5374(t4,((C_word*)t0)[2],t2,t3);}
+f_5324(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){
+/* macro-alias in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5305(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_5305,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5309,a[2]=t3,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 428 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[96]))(3,*((C_word*)lf[96]+1),t4,t2);}
-/* 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){
+/* k5307 in macro-alias in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5309(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[8],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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");
+C_save_and_reclaim((void*)tr2,(void*)f_5309,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5312,a[2]=t1,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5316,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 429 lookup");
t4=((C_word*)((C_word*)t0)[4])[1];
-f_5340(t4,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_5290(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){
+/* k5314 in k5307 in macro-alias in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5316(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-C_trace("compiler.scm: 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);}
+C_trace("compiler.scm: 429 ##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[95]))(5,*((C_word*)lf[95]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[94],t1);}
-/* 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){
+/* k5310 in k5307 in macro-alias in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5312(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-/* lookup in ##compiler#canonicalize-expression in k5138 in k5135 */
-static void C_fcall f_5340(C_word t0,C_word t1,C_word t2,C_word t3){
+/* lookup in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5290(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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");
+C_save_and_reclaim((void*)trf_5290,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5294,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 423 find-id");
t5=((C_word*)((C_word*)t0)[2])[1];
-f_5301(t5,t4,t2,t3);}
+f_5251(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){
+/* k5292 in lookup in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5294(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5344,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_5294,2,t0,t1);}
if(C_truep(t1)){
t2=t1;
t3=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5300,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 424 ##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+1),t2,((C_word*)t0)[2],lf[94]);}}
-/* 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){
+/* k5298 in k5292 in lookup in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5300(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(t1)?t1:((C_word*)t0)[2]));}
-/* find-id in ##compiler#canonicalize-expression in k5138 in k5135 */
-static void C_fcall f_5301(C_word t0,C_word t1,C_word t2,C_word t3){
+/* find-id in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5251(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word ab[11],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_5301,NULL,4,t0,t1,t2,t3);}
-if(C_truep((C_word)C_i_nullp(t3))){
+C_save_and_reclaim((void*)trf_5251,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t3))){
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}
else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);}}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5264,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5288,a[2]=t3,a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 419 caar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[92]+1)))(3,*((C_word*)lf[92]+1),t5,t3);}}
-/* 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){
+/* k5286 in find-id in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5288(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5338,2,t0,t1);}
-t2=(C_word)C_eqp(((C_word*)t0)[4],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_5288,2,t0,t1);}
+t2=C_eqp(((C_word*)t0)[4],t1);
if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5284,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 419 cdar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[91]+1)))(3,*((C_word*)lf[91]+1),t3,((C_word*)t0)[2]);}
else{
t3=((C_word*)t0)[3];
-f_5314(t3,C_SCHEME_FALSE);}}
+f_5264(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){
+/* k5282 in k5286 in find-id in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_ccall f_5284(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
-f_5314(t2,(C_word)C_i_symbolp(t1));}
+f_5264(t2,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){
+/* k5262 in find-id in ##compiler#canonicalize-expression in k5089 in k5086 */
+static void C_fcall f_5264(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(C_truep(t1)){
-C_trace("compiler.scm: 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]);}
+C_trace("compiler.scm: 419 cdar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[91]+1)))(3,*((C_word*)lf[91]+1),((C_word*)t0)[5],((C_word*)t0)[4]);}
else{
-t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
-C_trace("compiler.scm: 419 find-id");
+t2=C_i_cdr(((C_word*)t0)[4]);
+C_trace("compiler.scm: 420 find-id");
t3=((C_word*)((C_word*)t0)[3])[1];
-f_5301(t3,((C_word*)t0)[5],((C_word*)t0)[2],t2);}}
+f_5251(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){
+/* ##compiler#initialize-compiler in k5089 in k5086 */
+static void C_ccall f_5187(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -25955,110 +25822,110 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_5187,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5191,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
if(C_truep(*((C_word*)lf[53]+1))){
C_trace("compiler.scm: 394 vector-fill!");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t2,*((C_word*)lf[53]+1),C_SCHEME_END_OF_LIST);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[86]+1)))(4,*((C_word*)lf[86]+1),t2,*((C_word*)lf[53]+1),C_SCHEME_END_OF_LIST);}
else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5296,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5246,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
C_trace("compiler.scm: 395 make-vector");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[88]+1)))(4,*((C_word*)lf[88]+1),t3,*((C_word*)lf[16]+1),C_SCHEME_END_OF_LIST);}}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t3,*((C_word*)lf[16]+1),C_SCHEME_END_OF_LIST);}}
-/* k5294 in ##compiler#initialize-compiler in k5138 in k5135 */
-static void C_ccall f_5296(C_word c,C_word t0,C_word t1){
+/* k5244 in ##compiler#initialize-compiler in k5089 in k5086 */
+static void C_ccall f_5246(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate((C_word*)lf[53]+1 /* (set! line-number-database-2 ...) */,t1);
t3=((C_word*)t0)[2];
-f_5241(2,t3,t2);}
+f_5191(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){
+/* k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
+static void C_ccall f_5191(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_5191,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5194,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(*((C_word*)lf[55]+1))){
C_trace("compiler.scm: 397 vector-fill!");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t2,*((C_word*)lf[56]+1),C_SCHEME_END_OF_LIST);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[86]+1)))(4,*((C_word*)lf[86]+1),t2,*((C_word*)lf[55]+1),C_SCHEME_END_OF_LIST);}
else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5289,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5239,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
C_trace("compiler.scm: 398 make-vector");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[88]+1)))(4,*((C_word*)lf[88]+1),t3,C_fix(301),C_SCHEME_END_OF_LIST);}}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t3,C_fix(301),C_SCHEME_END_OF_LIST);}}
-/* 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){
+/* k5237 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
+static void C_ccall f_5239(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_mutate((C_word*)lf[56]+1 /* (set! inline-table ...) */,t1);
+t2=C_mutate((C_word*)lf[55]+1 /* (set! inline-table ...) */,t1);
t3=((C_word*)t0)[2];
-f_5244(2,t3,t2);}
+f_5194(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){
+/* k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
+static void C_ccall f_5194(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[6],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_5194,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5197,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(*((C_word*)lf[57]+1))){
C_trace("compiler.scm: 400 vector-fill!");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t2,*((C_word*)lf[58]+1),C_SCHEME_END_OF_LIST);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[86]+1)))(4,*((C_word*)lf[86]+1),t2,*((C_word*)lf[57]+1),C_SCHEME_END_OF_LIST);}
else{
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5282,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5232,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
C_trace("compiler.scm: 401 make-vector");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[88]+1)))(4,*((C_word*)lf[88]+1),t3,C_fix(301),C_SCHEME_END_OF_LIST);}}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t3,C_fix(301),C_SCHEME_END_OF_LIST);}}
-/* 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){
+/* k5230 in k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
+static void C_ccall f_5232(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_mutate((C_word*)lf[58]+1 /* (set! constant-table ...) */,t1);
+t2=C_mutate((C_word*)lf[57]+1 /* (set! constant-table ...) */,t1);
t3=((C_word*)t0)[2];
-f_5247(2,t3,t2);}
+f_5197(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){
+/* k5195 in k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
+static void C_ccall f_5197(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_5197,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5201,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("compiler.scm: 402 make-random-name");
-((C_proc3)C_retrieve_symbol_proc(lf[89]))(3,*((C_word*)lf[89]+1),t2,lf[90]);}
+((C_proc3)C_retrieve_symbol_proc(lf[88]))(3,*((C_word*)lf[88]+1),t2,lf[89]);}
-/* 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){
+/* k5199 in k5195 in k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
+static void C_ccall f_5201(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_5201,2,t0,t1);}
+t2=C_mutate((C_word*)lf[71]+1 /* (set! profile-info-vector-name ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5205,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("compiler.scm: 403 make-vector");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[88]+1)))(4,*((C_word*)lf[88]+1),t3,C_fix(997),C_SCHEME_END_OF_LIST);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t3,C_fix(997),C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k5203 in k5199 in k5195 in k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
+static void C_ccall f_5205(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -26066,55 +25933,55 @@ 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_save_and_reclaim((void*)tr2,(void*)f_5205,2,t0,t1);}
+t2=C_mutate((C_word*)lf[74]+1 /* (set! real-name-table ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5208,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(*((C_word*)lf[83]+1))){
C_trace("compiler.scm: 405 vector-fill!");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t3,*((C_word*)lf[84]+1),C_SCHEME_END_OF_LIST);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[86]+1)))(4,*((C_word*)lf[86]+1),t3,*((C_word*)lf[83]+1),C_SCHEME_END_OF_LIST);}
else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5275,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5225,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
C_trace("compiler.scm: 406 make-vector");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[88]+1)))(4,*((C_word*)lf[88]+1),t4,C_fix(301),C_SCHEME_END_OF_LIST);}}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t4,C_fix(301),C_SCHEME_END_OF_LIST);}}
-/* 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){
+/* k5223 in k5203 in k5199 in k5195 in k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
+static void C_ccall f_5225(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_mutate((C_word*)lf[84]+1 /* (set! file-requirements ...) */,t1);
+t2=C_mutate((C_word*)lf[83]+1 /* (set! file-requirements ...) */,t1);
t3=((C_word*)t0)[2];
-f_5258(2,t3,t2);}
+f_5208(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){
+/* k5206 in k5203 in k5199 in k5195 in k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
+static void C_ccall f_5208(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5258,2,t0,t1);}
-if(C_truep(*((C_word*)lf[64]+1))){
+C_save_and_reclaim((void*)tr2,(void*)f_5208,2,t0,t1);}
+if(C_truep(*((C_word*)lf[63]+1))){
C_trace("compiler.scm: 408 vector-fill!");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),((C_word*)t0)[2],*((C_word*)lf[64]+1),C_SCHEME_END_OF_LIST);}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[86]+1)))(4,*((C_word*)lf[86]+1),((C_word*)t0)[2],*((C_word*)lf[63]+1),C_SCHEME_END_OF_LIST);}
else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5268,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5218,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
C_trace("compiler.scm: 409 make-vector");
-((C_proc4)C_retrieve_proc(*((C_word*)lf[88]+1)))(4,*((C_word*)lf[88]+1),t2,C_fix(301),C_SCHEME_END_OF_LIST);}}
+((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t2,C_fix(301),C_SCHEME_END_OF_LIST);}}
-/* 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){
+/* k5216 in k5206 in k5203 in k5199 in k5195 in k5192 in k5189 in ##compiler#initialize-compiler in k5089 in k5086 */
+static void C_ccall f_5218(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_mutate((C_word*)lf[64]+1 /* (set! foreign-type-table ...) */,t1);
+t2=C_mutate((C_word*)lf[63]+1 /* (set! foreign-type-table ...) */,t1);
t3=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* d in k5138 in k5135 */
-static void C_ccall f_5142(C_word c,C_word t0,C_word t1,C_word t2,...){
+/* d in k5089 in k5086 */
+static void C_ccall f_5093(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -26122,1134 +25989,1132 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_5093r,3,t0,t1,t2);}
else{
a=C_alloc((c-3)*3);
t3=C_restore_rest(a,C_rest_count(0));
-f_5142r(t0,t1,t2,t3);}}
+f_5093r(t0,t1,t2,t3);}}
-static void C_ccall f_5142r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_5093r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
-if(C_truep((C_word)C_i_nullp(t3))){
-C_trace("compiler.scm: 268 pp");
+if(C_truep(C_i_nullp(t3))){
+C_trace("compiler.scm: 269 pp");
((C_proc3)C_retrieve_symbol_proc(lf[3]))(3,*((C_word*)lf[3]+1),t1,t2);}
else{
C_apply(5,0,t1,*((C_word*)lf[4]+1),t2,t3);}}
#ifdef C_ENABLE_PTABLES
-static C_PTABLE_ENTRY ptable[1112] = {
+static C_PTABLE_ENTRY ptable[1110] = {
{"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_5088:compiler_scm",(void*)f_5088},
+{"f_5091:compiler_scm",(void*)f_5091},
+{"f_17502:compiler_scm",(void*)f_17502},
+{"f_19009:compiler_scm",(void*)f_19009},
+{"f_19012:compiler_scm",(void*)f_19012},
+{"f_19015:compiler_scm",(void*)f_19015},
+{"f_19018:compiler_scm",(void*)f_19018},
+{"f_19021:compiler_scm",(void*)f_19021},
{"f_18924:compiler_scm",(void*)f_18924},
-{"f_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_18951:compiler_scm",(void*)f_18951},
+{"f_18892:compiler_scm",(void*)f_18892},
+{"f_18908:compiler_scm",(void*)f_18908},
+{"f_18915:compiler_scm",(void*)f_18915},
+{"f_18922:compiler_scm",(void*)f_18922},
+{"f_18896:compiler_scm",(void*)f_18896},
+{"f_18906:compiler_scm",(void*)f_18906},
+{"f_18878:compiler_scm",(void*)f_18878},
+{"f_18886:compiler_scm",(void*)f_18886},
+{"f_18798:compiler_scm",(void*)f_18798},
+{"f_18805:compiler_scm",(void*)f_18805},
+{"f_18867:compiler_scm",(void*)f_18867},
+{"f_18857:compiler_scm",(void*)f_18857},
+{"f_18831:compiler_scm",(void*)f_18831},
+{"f_18817:compiler_scm",(void*)f_18817},
{"f_18752:compiler_scm",(void*)f_18752},
-{"f_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_18758:compiler_scm",(void*)f_18758},
+{"f_18792:compiler_scm",(void*)f_18792},
+{"f_18785:compiler_scm",(void*)f_18785},
+{"f_17629:compiler_scm",(void*)f_17629},
+{"f_18741:compiler_scm",(void*)f_18741},
+{"f_18632:compiler_scm",(void*)f_18632},
+{"f_18658:compiler_scm",(void*)f_18658},
+{"f_18691:compiler_scm",(void*)f_18691},
+{"f_18694:compiler_scm",(void*)f_18694},
+{"f_18713:compiler_scm",(void*)f_18713},
+{"f_18701:compiler_scm",(void*)f_18701},
+{"f_18669:compiler_scm",(void*)f_18669},
+{"f_18680:compiler_scm",(void*)f_18680},
+{"f_18648:compiler_scm",(void*)f_18648},
+{"f_18577:compiler_scm",(void*)f_18577},
+{"f_18580:compiler_scm",(void*)f_18580},
+{"f_18583:compiler_scm",(void*)f_18583},
+{"f_18603:compiler_scm",(void*)f_18603},
+{"f_18565:compiler_scm",(void*)f_18565},
+{"f_18466:compiler_scm",(void*)f_18466},
+{"f_18536:compiler_scm",(void*)f_18536},
{"f_18555:compiler_scm",(void*)f_18555},
-{"f_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_18530:compiler_scm",(void*)f_18530},
+{"f_18514:compiler_scm",(void*)f_18514},
+{"f_18487:compiler_scm",(void*)f_18487},
+{"f_18490:compiler_scm",(void*)f_18490},
+{"f_18432:compiler_scm",(void*)f_18432},
+{"f_18444:compiler_scm",(void*)f_18444},
+{"f_18383:compiler_scm",(void*)f_18383},
{"f_18401:compiler_scm",(void*)f_18401},
-{"f_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_18386:compiler_scm",(void*)f_18386},
+{"f_18398:compiler_scm",(void*)f_18398},
{"f_18225:compiler_scm",(void*)f_18225},
+{"f_18359:compiler_scm",(void*)f_18359},
+{"f_18348:compiler_scm",(void*)f_18348},
+{"f_18264:compiler_scm",(void*)f_18264},
+{"f_18344:compiler_scm",(void*)f_18344},
+{"f_18270:compiler_scm",(void*)f_18270},
+{"f_18276:compiler_scm",(void*)f_18276},
+{"f_18308:compiler_scm",(void*)f_18308},
+{"f_18300:compiler_scm",(void*)f_18300},
+{"f_18229:compiler_scm",(void*)f_18229},
+{"f_18250:compiler_scm",(void*)f_18250},
+{"f_18182:compiler_scm",(void*)f_18182},
{"f_18198:compiler_scm",(void*)f_18198},
-{"f_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_18202:compiler_scm",(void*)f_18202},
+{"f_18135:compiler_scm",(void*)f_18135},
+{"f_18147:compiler_scm",(void*)f_18147},
+{"f_18151:compiler_scm",(void*)f_18151},
+{"f_18139:compiler_scm",(void*)f_18139},
{"f_17946:compiler_scm",(void*)f_17946},
-{"f_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_18065:compiler_scm",(void*)f_18065},
+{"f_18071:compiler_scm",(void*)f_18071},
+{"f_18096:compiler_scm",(void*)f_18096},
+{"f_17953:compiler_scm",(void*)f_17953},
+{"f_18056:compiler_scm",(void*)f_18056},
+{"f_17956:compiler_scm",(void*)f_17956},
+{"f_17959:compiler_scm",(void*)f_17959},
+{"f_17962:compiler_scm",(void*)f_17962},
+{"f_18007:compiler_scm",(void*)f_18007},
+{"f_18033:compiler_scm",(void*)f_18033},
+{"f_18014:compiler_scm",(void*)f_18014},
+{"f_18018:compiler_scm",(void*)f_18018},
+{"f_17991:compiler_scm",(void*)f_17991},
+{"f_17873:compiler_scm",(void*)f_17873},
+{"f_17888:compiler_scm",(void*)f_17888},
+{"f_17857:compiler_scm",(void*)f_17857},
+{"f_17827:compiler_scm",(void*)f_17827},
+{"f_17801:compiler_scm",(void*)f_17801},
+{"f_17797:compiler_scm",(void*)f_17797},
+{"f_17793:compiler_scm",(void*)f_17793},
+{"f_17767:compiler_scm",(void*)f_17767},
+{"f_17763:compiler_scm",(void*)f_17763},
+{"f_17737:compiler_scm",(void*)f_17737},
+{"f_17711:compiler_scm",(void*)f_17711},
{"f_17556:compiler_scm",(void*)f_17556},
-{"f_17546:compiler_scm",(void*)f_17546},
+{"f_17616:compiler_scm",(void*)f_17616},
+{"f_17560:compiler_scm",(void*)f_17560},
+{"f_17595:compiler_scm",(void*)f_17595},
+{"f_17602:compiler_scm",(void*)f_17602},
+{"f_17563:compiler_scm",(void*)f_17563},
+{"f_17566:compiler_scm",(void*)f_17566},
+{"f_17582:compiler_scm",(void*)f_17582},
+{"f_17505:compiler_scm",(void*)f_17505},
+{"f_17509:compiler_scm",(void*)f_17509},
+{"f_17535:compiler_scm",(void*)f_17535},
+{"f_17551:compiler_scm",(void*)f_17551},
+{"f_17493:compiler_scm",(void*)f_17493},
+{"f_17484:compiler_scm",(void*)f_17484},
+{"f_17475:compiler_scm",(void*)f_17475},
+{"f_17466:compiler_scm",(void*)f_17466},
+{"f_17457:compiler_scm",(void*)f_17457},
+{"f_17448:compiler_scm",(void*)f_17448},
+{"f_17439:compiler_scm",(void*)f_17439},
+{"f_17430:compiler_scm",(void*)f_17430},
+{"f_17421:compiler_scm",(void*)f_17421},
+{"f_17412:compiler_scm",(void*)f_17412},
+{"f_17403:compiler_scm",(void*)f_17403},
+{"f_17394:compiler_scm",(void*)f_17394},
+{"f_17385:compiler_scm",(void*)f_17385},
+{"f_17376:compiler_scm",(void*)f_17376},
+{"f_17367:compiler_scm",(void*)f_17367},
+{"f_17358:compiler_scm",(void*)f_17358},
+{"f_17352:compiler_scm",(void*)f_17352},
+{"f_17346:compiler_scm",(void*)f_17346},
+{"f_15586:compiler_scm",(void*)f_15586},
+{"f_17313:compiler_scm",(void*)f_17313},
+{"f_17316:compiler_scm",(void*)f_17316},
+{"f_17319:compiler_scm",(void*)f_17319},
+{"f_17322:compiler_scm",(void*)f_17322},
+{"f_17325:compiler_scm",(void*)f_17325},
{"f_17340:compiler_scm",(void*)f_17340},
-{"f_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_17338:compiler_scm",(void*)f_17338},
+{"f_17328:compiler_scm",(void*)f_17328},
+{"f_17122:compiler_scm",(void*)f_17122},
+{"f_17129:compiler_scm",(void*)f_17129},
+{"f_17133:compiler_scm",(void*)f_17133},
+{"f_17154:compiler_scm",(void*)f_17154},
+{"f_17076:compiler_scm",(void*)f_17076},
+{"f_17082:compiler_scm",(void*)f_17082},
+{"f_17116:compiler_scm",(void*)f_17116},
+{"f_17109:compiler_scm",(void*)f_17109},
+{"f_16051:compiler_scm",(void*)f_16051},
+{"f_16085:compiler_scm",(void*)f_16085},
+{"f_16124:compiler_scm",(void*)f_16124},
+{"f_16962:compiler_scm",(void*)f_16962},
+{"f_16958:compiler_scm",(void*)f_16958},
+{"f_16747:compiler_scm",(void*)f_16747},
+{"f_16753:compiler_scm",(void*)f_16753},
+{"f_16850:compiler_scm",(void*)f_16850},
+{"f_16894:compiler_scm",(void*)f_16894},
+{"f_16870:compiler_scm",(void*)f_16870},
+{"f_16874:compiler_scm",(void*)f_16874},
+{"f_16757:compiler_scm",(void*)f_16757},
+{"f_16764:compiler_scm",(void*)f_16764},
+{"f_16833:compiler_scm",(void*)f_16833},
+{"f_16837:compiler_scm",(void*)f_16837},
+{"f_16805:compiler_scm",(void*)f_16805},
+{"f_16793:compiler_scm",(void*)f_16793},
+{"f_16258:compiler_scm",(void*)f_16258},
+{"f_16720:compiler_scm",(void*)f_16720},
+{"f_16262:compiler_scm",(void*)f_16262},
+{"f_16685:compiler_scm",(void*)f_16685},
+{"f_16714:compiler_scm",(void*)f_16714},
+{"f_16634:compiler_scm",(void*)f_16634},
+{"f_16636:compiler_scm",(void*)f_16636},
+{"f_16669:compiler_scm",(void*)f_16669},
+{"f_16649:compiler_scm",(void*)f_16649},
+{"f_16265:compiler_scm",(void*)f_16265},
+{"f_16268:compiler_scm",(void*)f_16268},
+{"f_16274:compiler_scm",(void*)f_16274},
+{"f_16280:compiler_scm",(void*)f_16280},
+{"f_16286:compiler_scm",(void*)f_16286},
+{"f_16601:compiler_scm",(void*)f_16601},
+{"f_16604:compiler_scm",(void*)f_16604},
+{"f_16289:compiler_scm",(void*)f_16289},
+{"f_16543:compiler_scm",(void*)f_16543},
+{"f_16570:compiler_scm",(void*)f_16570},
+{"f_16528:compiler_scm",(void*)f_16528},
+{"f_16524:compiler_scm",(void*)f_16524},
+{"f_16411:compiler_scm",(void*)f_16411},
{"f_16443:compiler_scm",(void*)f_16443},
-{"f_16431:compiler_scm",(void*)f_16431},
-{"f_16363:compiler_scm",(void*)f_16363},
-{"f_16315:compiler_scm",(void*)f_16315},
+{"f_16449:compiler_scm",(void*)f_16449},
+{"f_16493:compiler_scm",(void*)f_16493},
+{"f_16447:compiler_scm",(void*)f_16447},
+{"f_16422:compiler_scm",(void*)f_16422},
+{"f_16414:compiler_scm",(void*)f_16414},
+{"f_16407:compiler_scm",(void*)f_16407},
+{"f_16357:compiler_scm",(void*)f_16357},
+{"f_16395:compiler_scm",(void*)f_16395},
+{"f_16384:compiler_scm",(void*)f_16384},
+{"f_16392:compiler_scm",(void*)f_16392},
+{"f_16318:compiler_scm",(void*)f_16318},
+{"f_16348:compiler_scm",(void*)f_16348},
+{"f_16340:compiler_scm",(void*)f_16340},
+{"f_16336:compiler_scm",(void*)f_16336},
+{"f_16332:compiler_scm",(void*)f_16332},
{"f_16321:compiler_scm",(void*)f_16321},
-{"f_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_16157:compiler_scm",(void*)f_16157},
+{"f_16160:compiler_scm",(void*)f_16160},
+{"f_16241:compiler_scm",(void*)f_16241},
+{"f_16183:compiler_scm",(void*)f_16183},
+{"f_16225:compiler_scm",(void*)f_16225},
+{"f_16213:compiler_scm",(void*)f_16213},
+{"f_16145:compiler_scm",(void*)f_16145},
+{"f_16097:compiler_scm",(void*)f_16097},
+{"f_16103:compiler_scm",(void*)f_16103},
+{"f_15616:compiler_scm",(void*)f_15616},
+{"f_15650:compiler_scm",(void*)f_15650},
+{"f_15993:compiler_scm",(void*)f_15993},
{"f_16008:compiler_scm",(void*)f_16008},
-{"f_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_16001:compiler_scm",(void*)f_16001},
+{"f_15954:compiler_scm",(void*)f_15954},
+{"f_17178:compiler_scm",(void*)f_17178},
+{"f_17231:compiler_scm",(void*)f_17231},
+{"f_17262:compiler_scm",(void*)f_17262},
+{"f_17272:compiler_scm",(void*)f_17272},
+{"f_17257:compiler_scm",(void*)f_17257},
+{"f_17222:compiler_scm",(void*)f_17222},
+{"f_17176:compiler_scm",(void*)f_17176},
+{"f_15967:compiler_scm",(void*)f_15967},
+{"f_15970:compiler_scm",(void*)f_15970},
+{"f_15981:compiler_scm",(void*)f_15981},
+{"f_15908:compiler_scm",(void*)f_15908},
+{"f_15790:compiler_scm",(void*)f_15790},
+{"f_15796:compiler_scm",(void*)f_15796},
{"f_15813:compiler_scm",(void*)f_15813},
-{"f_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_15816:compiler_scm",(void*)f_15816},
+{"f_15819:compiler_scm",(void*)f_15819},
+{"f_15858:compiler_scm",(void*)f_15858},
+{"f_15837:compiler_scm",(void*)f_15837},
+{"f_15844:compiler_scm",(void*)f_15844},
+{"f_15822:compiler_scm",(void*)f_15822},
+{"f_15825:compiler_scm",(void*)f_15825},
+{"f_15828:compiler_scm",(void*)f_15828},
+{"f_15735:compiler_scm",(void*)f_15735},
+{"f_15740:compiler_scm",(void*)f_15740},
+{"f_15755:compiler_scm",(void*)f_15755},
+{"f_15748:compiler_scm",(void*)f_15748},
+{"f_15671:compiler_scm",(void*)f_15671},
+{"f_15688:compiler_scm",(void*)f_15688},
+{"f_15703:compiler_scm",(void*)f_15703},
+{"f_15696:compiler_scm",(void*)f_15696},
+{"f_15675:compiler_scm",(void*)f_15675},
+{"f_15686:compiler_scm",(void*)f_15686},
+{"f_15661:compiler_scm",(void*)f_15661},
+{"f_15605:compiler_scm",(void*)f_15605},
+{"f_15614:compiler_scm",(void*)f_15614},
+{"f_15595:compiler_scm",(void*)f_15595},
+{"f_15600:compiler_scm",(void*)f_15600},
+{"f_15589:compiler_scm",(void*)f_15589},
+{"f_13640:compiler_scm",(void*)f_13640},
+{"f_13644:compiler_scm",(void*)f_13644},
+{"f_14509:compiler_scm",(void*)f_14509},
+{"f_14513:compiler_scm",(void*)f_14513},
+{"f_14516:compiler_scm",(void*)f_14516},
+{"f_14525:compiler_scm",(void*)f_14525},
+{"f_15451:compiler_scm",(void*)f_15451},
+{"f_15459:compiler_scm",(void*)f_15459},
+{"f_14529:compiler_scm",(void*)f_14529},
{"f_15429:compiler_scm",(void*)f_15429},
-{"f_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_15402:compiler_scm",(void*)f_15402},
+{"f_14540:compiler_scm",(void*)f_14540},
+{"f_15399:compiler_scm",(void*)f_15399},
+{"f_15344:compiler_scm",(void*)f_15344},
+{"f_15347:compiler_scm",(void*)f_15347},
+{"f_15375:compiler_scm",(void*)f_15375},
+{"f_15353:compiler_scm",(void*)f_15353},
+{"f_14543:compiler_scm",(void*)f_14543},
+{"f_14546:compiler_scm",(void*)f_14546},
+{"f_15266:compiler_scm",(void*)f_15266},
{"f_15270:compiler_scm",(void*)f_15270},
-{"f_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_15329:compiler_scm",(void*)f_15329},
+{"f_15288:compiler_scm",(void*)f_15288},
+{"f_15293:compiler_scm",(void*)f_15293},
+{"f_15208:compiler_scm",(void*)f_15208},
+{"f_15246:compiler_scm",(void*)f_15246},
+{"f_15212:compiler_scm",(void*)f_15212},
+{"f_15229:compiler_scm",(void*)f_15229},
+{"f_15221:compiler_scm",(void*)f_15221},
+{"f_15202:compiler_scm",(void*)f_15202},
+{"f_15163:compiler_scm",(void*)f_15163},
+{"f_15157:compiler_scm",(void*)f_15157},
+{"f_15155:compiler_scm",(void*)f_15155},
+{"f_15147:compiler_scm",(void*)f_15147},
+{"f_15115:compiler_scm",(void*)f_15115},
+{"f_15121:compiler_scm",(void*)f_15121},
+{"f_14549:compiler_scm",(void*)f_14549},
+{"f_15062:compiler_scm",(void*)f_15062},
+{"f_15071:compiler_scm",(void*)f_15071},
+{"f_14552:compiler_scm",(void*)f_14552},
+{"f_14931:compiler_scm",(void*)f_14931},
+{"f_14954:compiler_scm",(void*)f_14954},
+{"f_14997:compiler_scm",(void*)f_14997},
+{"f_15033:compiler_scm",(void*)f_15033},
+{"f_15005:compiler_scm",(void*)f_15005},
+{"f_15030:compiler_scm",(void*)f_15030},
+{"f_15026:compiler_scm",(void*)f_15026},
+{"f_15012:compiler_scm",(void*)f_15012},
+{"f_15015:compiler_scm",(void*)f_15015},
+{"f_14958:compiler_scm",(void*)f_14958},
+{"f_14964:compiler_scm",(void*)f_14964},
+{"f_14555:compiler_scm",(void*)f_14555},
+{"f_14899:compiler_scm",(void*)f_14899},
+{"f_14885:compiler_scm",(void*)f_14885},
+{"f_14892:compiler_scm",(void*)f_14892},
+{"f_14873:compiler_scm",(void*)f_14873},
+{"f_14558:compiler_scm",(void*)f_14558},
+{"f_14753:compiler_scm",(void*)f_14753},
+{"f_14834:compiler_scm",(void*)f_14834},
+{"f_14759:compiler_scm",(void*)f_14759},
+{"f_14824:compiler_scm",(void*)f_14824},
+{"f_14816:compiler_scm",(void*)f_14816},
+{"f_14812:compiler_scm",(void*)f_14812},
+{"f_14808:compiler_scm",(void*)f_14808},
+{"f_14762:compiler_scm",(void*)f_14762},
+{"f_14765:compiler_scm",(void*)f_14765},
+{"f_14561:compiler_scm",(void*)f_14561},
+{"f_14567:compiler_scm",(void*)f_14567},
+{"f_14593:compiler_scm",(void*)f_14593},
+{"f_14619:compiler_scm",(void*)f_14619},
+{"f_14625:compiler_scm",(void*)f_14625},
+{"f_14519:compiler_scm",(void*)f_14519},
+{"f_14484:compiler_scm",(void*)f_14484},
+{"f_14494:compiler_scm",(void*)f_14494},
+{"f_14502:compiler_scm",(void*)f_14502},
+{"f_14470:compiler_scm",(void*)f_14470},
+{"f_14478:compiler_scm",(void*)f_14478},
+{"f_14464:compiler_scm",(void*)f_14464},
{"f_14286:compiler_scm",(void*)f_14286},
-{"f_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_14299:compiler_scm",(void*)f_14299},
+{"f_14415:compiler_scm",(void*)f_14415},
+{"f_14425:compiler_scm",(void*)f_14425},
+{"f_14311:compiler_scm",(void*)f_14311},
+{"f_14392:compiler_scm",(void*)f_14392},
+{"f_14399:compiler_scm",(void*)f_14399},
+{"f_14356:compiler_scm",(void*)f_14356},
+{"f_14359:compiler_scm",(void*)f_14359},
+{"f_14365:compiler_scm",(void*)f_14365},
+{"f_14314:compiler_scm",(void*)f_14314},
+{"f_14317:compiler_scm",(void*)f_14317},
+{"f_14252:compiler_scm",(void*)f_14252},
+{"f_14258:compiler_scm",(void*)f_14258},
+{"f_14273:compiler_scm",(void*)f_14273},
+{"f_14266:compiler_scm",(void*)f_14266},
+{"f_13653:compiler_scm",(void*)f_13653},
+{"f_13690:compiler_scm",(void*)f_13690},
+{"f_14208:compiler_scm",(void*)f_14208},
+{"f_14202:compiler_scm",(void*)f_14202},
+{"f_14166:compiler_scm",(void*)f_14166},
+{"f_14169:compiler_scm",(void*)f_14169},
+{"f_14104:compiler_scm",(void*)f_14104},
+{"f_14158:compiler_scm",(void*)f_14158},
{"f_14107:compiler_scm",(void*)f_14107},
-{"f_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_14130:compiler_scm",(void*)f_14130},
+{"f_14110:compiler_scm",(void*)f_14110},
+{"f_14113:compiler_scm",(void*)f_14113},
+{"f_14116:compiler_scm",(void*)f_14116},
+{"f_13971:compiler_scm",(void*)f_13971},
+{"f_14083:compiler_scm",(void*)f_14083},
+{"f_13978:compiler_scm",(void*)f_13978},
{"f_14051:compiler_scm",(void*)f_14051},
-{"f_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_14069:compiler_scm",(void*)f_14069},
+{"f_14059:compiler_scm",(void*)f_14059},
+{"f_14063:compiler_scm",(void*)f_14063},
+{"f_13981:compiler_scm",(void*)f_13981},
+{"f_13984:compiler_scm",(void*)f_13984},
+{"f_14043:compiler_scm",(void*)f_14043},
+{"f_13987:compiler_scm",(void*)f_13987},
+{"f_13990:compiler_scm",(void*)f_13990},
+{"f_13993:compiler_scm",(void*)f_13993},
+{"f_14025:compiler_scm",(void*)f_14025},
+{"f_13996:compiler_scm",(void*)f_13996},
+{"f_13905:compiler_scm",(void*)f_13905},
+{"f_13924:compiler_scm",(void*)f_13924},
+{"f_13939:compiler_scm",(void*)f_13939},
+{"f_13932:compiler_scm",(void*)f_13932},
+{"f_13909:compiler_scm",(void*)f_13909},
+{"f_13922:compiler_scm",(void*)f_13922},
+{"f_13913:compiler_scm",(void*)f_13913},
+{"f_13838:compiler_scm",(void*)f_13838},
+{"f_13843:compiler_scm",(void*)f_13843},
+{"f_13870:compiler_scm",(void*)f_13870},
+{"f_13873:compiler_scm",(void*)f_13873},
+{"f_13876:compiler_scm",(void*)f_13876},
+{"f_13861:compiler_scm",(void*)f_13861},
+{"f_13781:compiler_scm",(void*)f_13781},
+{"f_13784:compiler_scm",(void*)f_13784},
+{"f_13745:compiler_scm",(void*)f_13745},
+{"f_13702:compiler_scm",(void*)f_13702},
+{"f_13733:compiler_scm",(void*)f_13733},
+{"f_13631:compiler_scm",(void*)f_13631},
+{"f_13622:compiler_scm",(void*)f_13622},
+{"f_13613:compiler_scm",(void*)f_13613},
+{"f_13604:compiler_scm",(void*)f_13604},
+{"f_13595:compiler_scm",(void*)f_13595},
+{"f_13589:compiler_scm",(void*)f_13589},
+{"f_13583:compiler_scm",(void*)f_13583},
+{"f_12724:compiler_scm",(void*)f_12724},
+{"f_13545:compiler_scm",(void*)f_13545},
+{"f_13453:compiler_scm",(void*)f_13453},
+{"f_13459:compiler_scm",(void*)f_13459},
+{"f_13479:compiler_scm",(void*)f_13479},
+{"f_13497:compiler_scm",(void*)f_13497},
+{"f_13506:compiler_scm",(void*)f_13506},
+{"f_13539:compiler_scm",(void*)f_13539},
+{"f_13527:compiler_scm",(void*)f_13527},
+{"f_13473:compiler_scm",(void*)f_13473},
+{"f_13432:compiler_scm",(void*)f_13432},
+{"f_13438:compiler_scm",(void*)f_13438},
+{"f_13256:compiler_scm",(void*)f_13256},
+{"f_13260:compiler_scm",(void*)f_13260},
+{"f_13263:compiler_scm",(void*)f_13263},
+{"f_13342:compiler_scm",(void*)f_13342},
+{"f_13333:compiler_scm",(void*)f_13333},
+{"f_13329:compiler_scm",(void*)f_13329},
+{"f_13294:compiler_scm",(void*)f_13294},
+{"f_13300:compiler_scm",(void*)f_13300},
+{"f_13317:compiler_scm",(void*)f_13317},
+{"f_13313:compiler_scm",(void*)f_13313},
+{"f_13292:compiler_scm",(void*)f_13292},
+{"f_12784:compiler_scm",(void*)f_12784},
+{"f_12826:compiler_scm",(void*)f_12826},
+{"f_13167:compiler_scm",(void*)f_13167},
+{"f_13352:compiler_scm",(void*)f_13352},
+{"f_13355:compiler_scm",(void*)f_13355},
+{"f_13426:compiler_scm",(void*)f_13426},
+{"f_13417:compiler_scm",(void*)f_13417},
+{"f_13413:compiler_scm",(void*)f_13413},
+{"f_13401:compiler_scm",(void*)f_13401},
+{"f_13122:compiler_scm",(void*)f_13122},
+{"f_13158:compiler_scm",(void*)f_13158},
+{"f_13053:compiler_scm",(void*)f_13053},
+{"f_13062:compiler_scm",(void*)f_13062},
+{"f_13096:compiler_scm",(void*)f_13096},
+{"f_13092:compiler_scm",(void*)f_13092},
+{"f_13040:compiler_scm",(void*)f_13040},
+{"f_12963:compiler_scm",(void*)f_12963},
+{"f_12986:compiler_scm",(void*)f_12986},
+{"f_13007:compiler_scm",(void*)f_13007},
+{"f_12838:compiler_scm",(void*)f_12838},
+{"f_12841:compiler_scm",(void*)f_12841},
+{"f_12948:compiler_scm",(void*)f_12948},
+{"f_12939:compiler_scm",(void*)f_12939},
+{"f_12935:compiler_scm",(void*)f_12935},
+{"f_12894:compiler_scm",(void*)f_12894},
+{"f_12911:compiler_scm",(void*)f_12911},
+{"f_12915:compiler_scm",(void*)f_12915},
+{"f_12888:compiler_scm",(void*)f_12888},
{"f_12842:compiler_scm",(void*)f_12842},
-{"f_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_12859:compiler_scm",(void*)f_12859},
+{"f_12727:compiler_scm",(void*)f_12727},
+{"f_12731:compiler_scm",(void*)f_12731},
+{"f_12761:compiler_scm",(void*)f_12761},
{"f_12778:compiler_scm",(void*)f_12778},
-{"f_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_12755:compiler_scm",(void*)f_12755},
+{"f_12634:compiler_scm",(void*)f_12634},
+{"f_12666:compiler_scm",(void*)f_12666},
+{"f_12685:compiler_scm",(void*)f_12685},
+{"f_12708:compiler_scm",(void*)f_12708},
+{"f_12691:compiler_scm",(void*)f_12691},
+{"f_12637:compiler_scm",(void*)f_12637},
+{"f_12643:compiler_scm",(void*)f_12643},
+{"f_12653:compiler_scm",(void*)f_12653},
+{"f_12495:compiler_scm",(void*)f_12495},
{"f_12499:compiler_scm",(void*)f_12499},
-{"f_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_12505:compiler_scm",(void*)f_12505},
+{"f_12508:compiler_scm",(void*)f_12508},
+{"f_12558:compiler_scm",(void*)f_12558},
+{"f_12587:compiler_scm",(void*)f_12587},
+{"f_12511:compiler_scm",(void*)f_12511},
+{"f_12521:compiler_scm",(void*)f_12521},
+{"f_12523:compiler_scm",(void*)f_12523},
+{"f_12552:compiler_scm",(void*)f_12552},
+{"f_12514:compiler_scm",(void*)f_12514},
+{"f_12396:compiler_scm",(void*)f_12396},
+{"f_12406:compiler_scm",(void*)f_12406},
+{"f_12456:compiler_scm",(void*)f_12456},
+{"f_12485:compiler_scm",(void*)f_12485},
+{"f_12409:compiler_scm",(void*)f_12409},
+{"f_12419:compiler_scm",(void*)f_12419},
+{"f_12421:compiler_scm",(void*)f_12421},
+{"f_12450:compiler_scm",(void*)f_12450},
+{"f_12412:compiler_scm",(void*)f_12412},
+{"f_12359:compiler_scm",(void*)f_12359},
+{"f_12385:compiler_scm",(void*)f_12385},
{"f_12366:compiler_scm",(void*)f_12366},
-{"f_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_12108:compiler_scm",(void*)f_12108},
+{"f_12112:compiler_scm",(void*)f_12112},
+{"f_12115:compiler_scm",(void*)f_12115},
+{"f_12353:compiler_scm",(void*)f_12353},
{"f_12118:compiler_scm",(void*)f_12118},
-{"f_10418:compiler_scm",(void*)f_10418},
+{"f_12121:compiler_scm",(void*)f_12121},
+{"f_12124:compiler_scm",(void*)f_12124},
+{"f_12127:compiler_scm",(void*)f_12127},
+{"f_12347:compiler_scm",(void*)f_12347},
+{"f_12130:compiler_scm",(void*)f_12130},
+{"f_12140:compiler_scm",(void*)f_12140},
+{"f_12259:compiler_scm",(void*)f_12259},
+{"f_12298:compiler_scm",(void*)f_12298},
+{"f_12301:compiler_scm",(void*)f_12301},
+{"f_12272:compiler_scm",(void*)f_12272},
+{"f_12143:compiler_scm",(void*)f_12143},
+{"f_12183:compiler_scm",(void*)f_12183},
+{"f_12186:compiler_scm",(void*)f_12186},
+{"f_12213:compiler_scm",(void*)f_12213},
+{"f_12209:compiler_scm",(void*)f_12209},
+{"f_12205:compiler_scm",(void*)f_12205},
+{"f_12176:compiler_scm",(void*)f_12176},
+{"f_12166:compiler_scm",(void*)f_12166},
+{"f_12154:compiler_scm",(void*)f_12154},
+{"f_12099:compiler_scm",(void*)f_12099},
+{"f_12090:compiler_scm",(void*)f_12090},
+{"f_12081:compiler_scm",(void*)f_12081},
+{"f_12072:compiler_scm",(void*)f_12072},
+{"f_12063:compiler_scm",(void*)f_12063},
+{"f_12054:compiler_scm",(void*)f_12054},
+{"f_12045:compiler_scm",(void*)f_12045},
+{"f_12036:compiler_scm",(void*)f_12036},
+{"f_12030:compiler_scm",(void*)f_12030},
+{"f_12024:compiler_scm",(void*)f_12024},
+{"f_10414:compiler_scm",(void*)f_10414},
+{"f_10481:compiler_scm",(void*)f_10481},
{"f_10485:compiler_scm",(void*)f_10485},
-{"f_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_10488:compiler_scm",(void*)f_10488},
+{"f_11926:compiler_scm",(void*)f_11926},
+{"f_11941:compiler_scm",(void*)f_11941},
+{"f_11944:compiler_scm",(void*)f_11944},
+{"f_11985:compiler_scm",(void*)f_11985},
+{"f_11903:compiler_scm",(void*)f_11903},
+{"f_11868:compiler_scm",(void*)f_11868},
+{"f_11874:compiler_scm",(void*)f_11874},
+{"f_11840:compiler_scm",(void*)f_11840},
+{"f_11805:compiler_scm",(void*)f_11805},
+{"f_11811:compiler_scm",(void*)f_11811},
+{"f_11779:compiler_scm",(void*)f_11779},
+{"f_11744:compiler_scm",(void*)f_11744},
{"f_11750:compiler_scm",(void*)f_11750},
-{"f_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_11616:compiler_scm",(void*)f_11616},
+{"f_11618:compiler_scm",(void*)f_11618},
+{"f_11669:compiler_scm",(void*)f_11669},
+{"f_11663:compiler_scm",(void*)f_11663},
+{"f_11659:compiler_scm",(void*)f_11659},
+{"f_11716:compiler_scm",(void*)f_11716},
+{"f_11612:compiler_scm",(void*)f_11612},
{"f_11608:compiler_scm",(void*)f_11608},
-{"f_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_11591:compiler_scm",(void*)f_11591},
+{"f_11595:compiler_scm",(void*)f_11595},
+{"f_11563:compiler_scm",(void*)f_11563},
+{"f_11546:compiler_scm",(void*)f_11546},
+{"f_11511:compiler_scm",(void*)f_11511},
+{"f_11517:compiler_scm",(void*)f_11517},
+{"f_11449:compiler_scm",(void*)f_11449},
+{"f_11454:compiler_scm",(void*)f_11454},
+{"f_11464:compiler_scm",(void*)f_11464},
+{"f_11402:compiler_scm",(void*)f_11402},
+{"f_11414:compiler_scm",(void*)f_11414},
+{"f_11424:compiler_scm",(void*)f_11424},
{"f_11135:compiler_scm",(void*)f_11135},
-{"f_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_11138:compiler_scm",(void*)f_11138},
+{"f_11355:compiler_scm",(void*)f_11355},
+{"f_11358:compiler_scm",(void*)f_11358},
+{"f_11344:compiler_scm",(void*)f_11344},
+{"f_11309:compiler_scm",(void*)f_11309},
+{"f_11315:compiler_scm",(void*)f_11315},
+{"f_11274:compiler_scm",(void*)f_11274},
+{"f_11278:compiler_scm",(void*)f_11278},
+{"f_11282:compiler_scm",(void*)f_11282},
+{"f_11249:compiler_scm",(void*)f_11249},
+{"f_11214:compiler_scm",(void*)f_11214},
+{"f_11220:compiler_scm",(void*)f_11220},
+{"f_11188:compiler_scm",(void*)f_11188},
+{"f_11184:compiler_scm",(void*)f_11184},
+{"f_11159:compiler_scm",(void*)f_11159},
+{"f_11155:compiler_scm",(void*)f_11155},
+{"f_11122:compiler_scm",(void*)f_11122},
+{"f_11087:compiler_scm",(void*)f_11087},
+{"f_11093:compiler_scm",(void*)f_11093},
+{"f_11048:compiler_scm",(void*)f_11048},
{"f_11052:compiler_scm",(void*)f_11052},
-{"f_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_10957:compiler_scm",(void*)f_10957},
+{"f_10998:compiler_scm",(void*)f_10998},
+{"f_11004:compiler_scm",(void*)f_11004},
+{"f_10960:compiler_scm",(void*)f_10960},
+{"f_10965:compiler_scm",(void*)f_10965},
+{"f_10971:compiler_scm",(void*)f_10971},
+{"f_10948:compiler_scm",(void*)f_10948},
+{"f_10913:compiler_scm",(void*)f_10913},
+{"f_10919:compiler_scm",(void*)f_10919},
+{"f_10871:compiler_scm",(void*)f_10871},
+{"f_10911:compiler_scm",(void*)f_10911},
+{"f_10876:compiler_scm",(void*)f_10876},
+{"f_10882:compiler_scm",(void*)f_10882},
+{"f_10851:compiler_scm",(void*)f_10851},
+{"f_10816:compiler_scm",(void*)f_10816},
+{"f_10822:compiler_scm",(void*)f_10822},
{"f_10801:compiler_scm",(void*)f_10801},
+{"f_10797:compiler_scm",(void*)f_10797},
+{"f_10713:compiler_scm",(void*)f_10713},
{"f_10717:compiler_scm",(void*)f_10717},
-{"f_10721:compiler_scm",(void*)f_10721},
+{"f_10688:compiler_scm",(void*)f_10688},
{"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_10659:compiler_scm",(void*)f_10659},
{"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_10630:compiler_scm",(void*)f_10630},
+{"f_10582:compiler_scm",(void*)f_10582},
+{"f_10585:compiler_scm",(void*)f_10585},
+{"f_10609:compiler_scm",(void*)f_10609},
+{"f_10588:compiler_scm",(void*)f_10588},
{"f_10595:compiler_scm",(void*)f_10595},
-{"f_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_10591:compiler_scm",(void*)f_10591},
+{"f_10497:compiler_scm",(void*)f_10497},
+{"f_10500:compiler_scm",(void*)f_10500},
+{"f_10568:compiler_scm",(void*)f_10568},
+{"f_10562:compiler_scm",(void*)f_10562},
+{"f_10509:compiler_scm",(void*)f_10509},
+{"f_10518:compiler_scm",(void*)f_10518},
+{"f_10553:compiler_scm",(void*)f_10553},
+{"f_10556:compiler_scm",(void*)f_10556},
+{"f_10512:compiler_scm",(void*)f_10512},
{"f_10516:compiler_scm",(void*)f_10516},
-{"f_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_10491:compiler_scm",(void*)f_10491},
+{"f_10471:compiler_scm",(void*)f_10471},
+{"f_10465:compiler_scm",(void*)f_10465},
+{"f_10417:compiler_scm",(void*)f_10417},
+{"f_10440:compiler_scm",(void*)f_10440},
+{"f_5248:compiler_scm",(void*)f_5248},
+{"f_10409:compiler_scm",(void*)f_10409},
+{"f_10371:compiler_scm",(void*)f_10371},
+{"f_10374:compiler_scm",(void*)f_10374},
{"f_10393:compiler_scm",(void*)f_10393},
+{"f_10403:compiler_scm",(void*)f_10403},
{"f_10389:compiler_scm",(void*)f_10389},
-{"f_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_10385:compiler_scm",(void*)f_10385},
+{"f_10324:compiler_scm",(void*)f_10324},
+{"f_10330:compiler_scm",(void*)f_10330},
+{"f_10364:compiler_scm",(void*)f_10364},
+{"f_10357:compiler_scm",(void*)f_10357},
+{"f_5724:compiler_scm",(void*)f_5724},
+{"f_10252:compiler_scm",(void*)f_10252},
+{"f_10264:compiler_scm",(void*)f_10264},
+{"f_10267:compiler_scm",(void*)f_10267},
+{"f_10294:compiler_scm",(void*)f_10294},
+{"f_10255:compiler_scm",(void*)f_10255},
+{"f_10258:compiler_scm",(void*)f_10258},
+{"f_5787:compiler_scm",(void*)f_5787},
+{"f_5790:compiler_scm",(void*)f_5790},
+{"f_10222:compiler_scm",(void*)f_10222},
+{"f_10225:compiler_scm",(void*)f_10225},
+{"f_10228:compiler_scm",(void*)f_10228},
+{"f_10231:compiler_scm",(void*)f_10231},
+{"f_10234:compiler_scm",(void*)f_10234},
+{"f_5793:compiler_scm",(void*)f_5793},
+{"f_5797:compiler_scm",(void*)f_5797},
+{"f_5800:compiler_scm",(void*)f_5800},
+{"f_5806:compiler_scm",(void*)f_5806},
+{"f_5818:compiler_scm",(void*)f_5818},
{"f_5840:compiler_scm",(void*)f_5840},
-{"f_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_5907:compiler_scm",(void*)f_5907},
+{"f_6008:compiler_scm",(void*)f_6008},
+{"f_9983:compiler_scm",(void*)f_9983},
+{"f_10116:compiler_scm",(void*)f_10116},
+{"f_10077:compiler_scm",(void*)f_10077},
+{"f_10045:compiler_scm",(void*)f_10045},
+{"f_9999:compiler_scm",(void*)f_9999},
+{"f_9943:compiler_scm",(void*)f_9943},
+{"f_9947:compiler_scm",(void*)f_9947},
+{"f_9953:compiler_scm",(void*)f_9953},
+{"f_9967:compiler_scm",(void*)f_9967},
+{"f_9956:compiler_scm",(void*)f_9956},
+{"f_9632:compiler_scm",(void*)f_9632},
+{"f_9923:compiler_scm",(void*)f_9923},
+{"f_9651:compiler_scm",(void*)f_9651},
+{"f_9654:compiler_scm",(void*)f_9654},
+{"f_9665:compiler_scm",(void*)f_9665},
+{"f_9838:compiler_scm",(void*)f_9838},
+{"f_9882:compiler_scm",(void*)f_9882},
+{"f_9878:compiler_scm",(void*)f_9878},
+{"f_9874:compiler_scm",(void*)f_9874},
+{"f_9862:compiler_scm",(void*)f_9862},
+{"f_9697:compiler_scm",(void*)f_9697},
+{"f_9829:compiler_scm",(void*)f_9829},
+{"f_9793:compiler_scm",(void*)f_9793},
+{"f_9747:compiler_scm",(void*)f_9747},
+{"f_9721:compiler_scm",(void*)f_9721},
+{"f_9717:compiler_scm",(void*)f_9717},
+{"f_9705:compiler_scm",(void*)f_9705},
+{"f_9673:compiler_scm",(void*)f_9673},
+{"f_9661:compiler_scm",(void*)f_9661},
+{"f_9622:compiler_scm",(void*)f_9622},
+{"f_9573:compiler_scm",(void*)f_9573},
+{"f_9607:compiler_scm",(void*)f_9607},
+{"f_9600:compiler_scm",(void*)f_9600},
+{"f_9567:compiler_scm",(void*)f_9567},
+{"f_9563:compiler_scm",(void*)f_9563},
+{"f_9488:compiler_scm",(void*)f_9488},
+{"f_9506:compiler_scm",(void*)f_9506},
+{"f_9536:compiler_scm",(void*)f_9536},
+{"f_9542:compiler_scm",(void*)f_9542},
+{"f_9512:compiler_scm",(void*)f_9512},
+{"f_9519:compiler_scm",(void*)f_9519},
+{"f_9494:compiler_scm",(void*)f_9494},
+{"f_9500:compiler_scm",(void*)f_9500},
+{"f_9357:compiler_scm",(void*)f_9357},
+{"f_9360:compiler_scm",(void*)f_9360},
+{"f_9371:compiler_scm",(void*)f_9371},
+{"f_9381:compiler_scm",(void*)f_9381},
+{"f_9384:compiler_scm",(void*)f_9384},
+{"f_9387:compiler_scm",(void*)f_9387},
+{"f_9392:compiler_scm",(void*)f_9392},
+{"f_9417:compiler_scm",(void*)f_9417},
+{"f_9422:compiler_scm",(void*)f_9422},
+{"f_9447:compiler_scm",(void*)f_9447},
+{"f_9374:compiler_scm",(void*)f_9374},
+{"f_9342:compiler_scm",(void*)f_9342},
+{"f_9338:compiler_scm",(void*)f_9338},
+{"f_9333:compiler_scm",(void*)f_9333},
+{"f_9177:compiler_scm",(void*)f_9177},
+{"f_9180:compiler_scm",(void*)f_9180},
+{"f_9183:compiler_scm",(void*)f_9183},
+{"f_9189:compiler_scm",(void*)f_9189},
+{"f_9300:compiler_scm",(void*)f_9300},
+{"f_9261:compiler_scm",(void*)f_9261},
+{"f_9228:compiler_scm",(void*)f_9228},
+{"f_9236:compiler_scm",(void*)f_9236},
+{"f_9224:compiler_scm",(void*)f_9224},
+{"f_9204:compiler_scm",(void*)f_9204},
+{"f_9121:compiler_scm",(void*)f_9121},
+{"f_9130:compiler_scm",(void*)f_9130},
+{"f_9165:compiler_scm",(void*)f_9165},
+{"f_9161:compiler_scm",(void*)f_9161},
+{"f_9133:compiler_scm",(void*)f_9133},
+{"f_9153:compiler_scm",(void*)f_9153},
+{"f_9145:compiler_scm",(void*)f_9145},
+{"f_8957:compiler_scm",(void*)f_8957},
+{"f_9105:compiler_scm",(void*)f_9105},
+{"f_8969:compiler_scm",(void*)f_8969},
+{"f_8972:compiler_scm",(void*)f_8972},
+{"f_8975:compiler_scm",(void*)f_8975},
+{"f_8980:compiler_scm",(void*)f_8980},
+{"f_9005:compiler_scm",(void*)f_9005},
+{"f_9010:compiler_scm",(void*)f_9010},
+{"f_9035:compiler_scm",(void*)f_9035},
+{"f_9038:compiler_scm",(void*)f_9038},
+{"f_9041:compiler_scm",(void*)f_9041},
+{"f_9072:compiler_scm",(void*)f_9072},
+{"f_8900:compiler_scm",(void*)f_8900},
+{"f_8903:compiler_scm",(void*)f_8903},
+{"f_8906:compiler_scm",(void*)f_8906},
+{"f_8918:compiler_scm",(void*)f_8918},
+{"f_8891:compiler_scm",(void*)f_8891},
+{"f_8878:compiler_scm",(void*)f_8878},
+{"f_8865:compiler_scm",(void*)f_8865},
+{"f_8852:compiler_scm",(void*)f_8852},
+{"f_8839:compiler_scm",(void*)f_8839},
+{"f_8772:compiler_scm",(void*)f_8772},
+{"f_8791:compiler_scm",(void*)f_8791},
+{"f_8818:compiler_scm",(void*)f_8818},
+{"f_8822:compiler_scm",(void*)f_8822},
+{"f_8811:compiler_scm",(void*)f_8811},
+{"f_8785:compiler_scm",(void*)f_8785},
+{"f_8756:compiler_scm",(void*)f_8756},
+{"f_8741:compiler_scm",(void*)f_8741},
+{"f_8710:compiler_scm",(void*)f_8710},
+{"f_8718:compiler_scm",(void*)f_8718},
+{"f_8681:compiler_scm",(void*)f_8681},
+{"f_8648:compiler_scm",(void*)f_8648},
+{"f_8634:compiler_scm",(void*)f_8634},
+{"f_8642:compiler_scm",(void*)f_8642},
+{"f_8638:compiler_scm",(void*)f_8638},
+{"f_8601:compiler_scm",(void*)f_8601},
+{"f_8609:compiler_scm",(void*)f_8609},
+{"f_8605:compiler_scm",(void*)f_8605},
+{"f_8268:compiler_scm",(void*)f_8268},
+{"f_8274:compiler_scm",(void*)f_8274},
+{"f_8277:compiler_scm",(void*)f_8277},
+{"f_8283:compiler_scm",(void*)f_8283},
+{"f_8509:compiler_scm",(void*)f_8509},
+{"f_8512:compiler_scm",(void*)f_8512},
+{"f_8520:compiler_scm",(void*)f_8520},
+{"f_8545:compiler_scm",(void*)f_8545},
+{"f_8550:compiler_scm",(void*)f_8550},
+{"f_8438:compiler_scm",(void*)f_8438},
+{"f_8477:compiler_scm",(void*)f_8477},
+{"f_8493:compiler_scm",(void*)f_8493},
+{"f_8496:compiler_scm",(void*)f_8496},
+{"f_8499:compiler_scm",(void*)f_8499},
+{"f_8490:compiler_scm",(void*)f_8490},
+{"f_8480:compiler_scm",(void*)f_8480},
+{"f_8441:compiler_scm",(void*)f_8441},
+{"f_8471:compiler_scm",(void*)f_8471},
+{"f_8444:compiler_scm",(void*)f_8444},
+{"f_8447:compiler_scm",(void*)f_8447},
+{"f_8462:compiler_scm",(void*)f_8462},
+{"f_8366:compiler_scm",(void*)f_8366},
+{"f_8373:compiler_scm",(void*)f_8373},
+{"f_8432:compiler_scm",(void*)f_8432},
+{"f_8420:compiler_scm",(void*)f_8420},
+{"f_8290:compiler_scm",(void*)f_8290},
+{"f_8297:compiler_scm",(void*)f_8297},
+{"f_8356:compiler_scm",(void*)f_8356},
+{"f_8336:compiler_scm",(void*)f_8336},
+{"f_8223:compiler_scm",(void*)f_8223},
+{"f_8252:compiler_scm",(void*)f_8252},
+{"f_8140:compiler_scm",(void*)f_8140},
+{"f_8174:compiler_scm",(void*)f_8174},
+{"f_8207:compiler_scm",(void*)f_8207},
+{"f_8187:compiler_scm",(void*)f_8187},
+{"f_8172:compiler_scm",(void*)f_8172},
+{"f_8143:compiler_scm",(void*)f_8143},
+{"f_8164:compiler_scm",(void*)f_8164},
+{"f_8168:compiler_scm",(void*)f_8168},
+{"f_8146:compiler_scm",(void*)f_8146},
+{"f_8149:compiler_scm",(void*)f_8149},
+{"f_8121:compiler_scm",(void*)f_8121},
+{"f_7596:compiler_scm",(void*)f_7596},
+{"f_8004:compiler_scm",(void*)f_8004},
+{"f_8006:compiler_scm",(void*)f_8006},
+{"f_8084:compiler_scm",(void*)f_8084},
+{"f_8033:compiler_scm",(void*)f_8033},
+{"f_8057:compiler_scm",(void*)f_8057},
+{"f_8046:compiler_scm",(void*)f_8046},
+{"f_7602:compiler_scm",(void*)f_7602},
+{"f_7994:compiler_scm",(void*)f_7994},
+{"f_7605:compiler_scm",(void*)f_7605},
+{"f_7879:compiler_scm",(void*)f_7879},
+{"f_7922:compiler_scm",(void*)f_7922},
+{"f_7943:compiler_scm",(void*)f_7943},
+{"f_7949:compiler_scm",(void*)f_7949},
+{"f_7987:compiler_scm",(void*)f_7987},
+{"f_7976:compiler_scm",(void*)f_7976},
+{"f_7984:compiler_scm",(void*)f_7984},
+{"f_7941:compiler_scm",(void*)f_7941},
{"f_7923:compiler_scm",(void*)f_7923},
-{"f_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_7927:compiler_scm",(void*)f_7927},
+{"f_7930:compiler_scm",(void*)f_7930},
+{"f_7934:compiler_scm",(void*)f_7934},
+{"f_7937:compiler_scm",(void*)f_7937},
+{"f_7918:compiler_scm",(void*)f_7918},
+{"f_7883:compiler_scm",(void*)f_7883},
+{"f_7889:compiler_scm",(void*)f_7889},
+{"f_7910:compiler_scm",(void*)f_7910},
+{"f_7914:compiler_scm",(void*)f_7914},
+{"f_7899:compiler_scm",(void*)f_7899},
+{"f_7886:compiler_scm",(void*)f_7886},
+{"f_7610:compiler_scm",(void*)f_7610},
+{"f_7614:compiler_scm",(void*)f_7614},
{"f_7642:compiler_scm",(void*)f_7642},
-{"f_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_7652:compiler_scm",(void*)f_7652},
+{"f_7873:compiler_scm",(void*)f_7873},
+{"f_7869:compiler_scm",(void*)f_7869},
+{"f_7816:compiler_scm",(void*)f_7816},
+{"f_7819:compiler_scm",(void*)f_7819},
+{"f_7763:compiler_scm",(void*)f_7763},
+{"f_7786:compiler_scm",(void*)f_7786},
+{"f_7778:compiler_scm",(void*)f_7778},
+{"f_7709:compiler_scm",(void*)f_7709},
+{"f_7734:compiler_scm",(void*)f_7734},
+{"f_7750:compiler_scm",(void*)f_7750},
+{"f_7756:compiler_scm",(void*)f_7756},
+{"f_7740:compiler_scm",(void*)f_7740},
+{"f_7748:compiler_scm",(void*)f_7748},
+{"f_7715:compiler_scm",(void*)f_7715},
+{"f_7721:compiler_scm",(void*)f_7721},
+{"f_7732:compiler_scm",(void*)f_7732},
{"f_7725:compiler_scm",(void*)f_7725},
-{"f_7736:compiler_scm",(void*)f_7736},
-{"f_7729:compiler_scm",(void*)f_7729},
+{"f_7662:compiler_scm",(void*)f_7662},
+{"f_7665:compiler_scm",(void*)f_7665},
+{"f_7693:compiler_scm",(void*)f_7693},
{"f_7704:compiler_scm",(void*)f_7704},
-{"f_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_7697:compiler_scm",(void*)f_7697},
+{"f_7672:compiler_scm",(void*)f_7672},
{"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_5636:compiler_scm",(void*)f_5636},
+{"f_5712:compiler_scm",(void*)f_5712},
+{"f_5639:compiler_scm",(void*)f_5639},
+{"f_5705:compiler_scm",(void*)f_5705},
+{"f_5642:compiler_scm",(void*)f_5642},
+{"f_5657:compiler_scm",(void*)f_5657},
+{"f_5662:compiler_scm",(void*)f_5662},
+{"f_5699:compiler_scm",(void*)f_5699},
+{"f_5666:compiler_scm",(void*)f_5666},
+{"f_5674:compiler_scm",(void*)f_5674},
+{"f_5684:compiler_scm",(void*)f_5684},
+{"f_5669:compiler_scm",(void*)f_5669},
+{"f20080:compiler_scm",(void*)f20080},
+{"f_7676:compiler_scm",(void*)f_7676},
+{"f_7683:compiler_scm",(void*)f_7683},
{"f_7615:compiler_scm",(void*)f_7615},
-{"f_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_7619:compiler_scm",(void*)f_7619},
+{"f_7622:compiler_scm",(void*)f_7622},
+{"f_7626:compiler_scm",(void*)f_7626},
+{"f_7629:compiler_scm",(void*)f_7629},
+{"f_7633:compiler_scm",(void*)f_7633},
+{"f_7636:compiler_scm",(void*)f_7636},
+{"f_7509:compiler_scm",(void*)f_7509},
+{"f_7583:compiler_scm",(void*)f_7583},
+{"f_7536:compiler_scm",(void*)f_7536},
+{"f_7540:compiler_scm",(void*)f_7540},
+{"f_7543:compiler_scm",(void*)f_7543},
+{"f_7568:compiler_scm",(void*)f_7568},
+{"f_7564:compiler_scm",(void*)f_7564},
+{"f_7550:compiler_scm",(void*)f_7550},
+{"f_7554:compiler_scm",(void*)f_7554},
+{"f_7402:compiler_scm",(void*)f_7402},
+{"f_7463:compiler_scm",(void*)f_7463},
+{"f_7469:compiler_scm",(void*)f_7469},
+{"f_7492:compiler_scm",(void*)f_7492},
{"f_7449:compiler_scm",(void*)f_7449},
-{"f_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_7457:compiler_scm",(void*)f_7457},
+{"f_7407:compiler_scm",(void*)f_7407},
+{"f_7413:compiler_scm",(void*)f_7413},
+{"f_7436:compiler_scm",(void*)f_7436},
+{"f_7295:compiler_scm",(void*)f_7295},
+{"f_7393:compiler_scm",(void*)f_7393},
+{"f_7389:compiler_scm",(void*)f_7389},
+{"f_7298:compiler_scm",(void*)f_7298},
+{"f_7385:compiler_scm",(void*)f_7385},
+{"f_7377:compiler_scm",(void*)f_7377},
+{"f_7381:compiler_scm",(void*)f_7381},
+{"f_7301:compiler_scm",(void*)f_7301},
+{"f_7331:compiler_scm",(void*)f_7331},
+{"f_7150:compiler_scm",(void*)f_7150},
+{"f_7153:compiler_scm",(void*)f_7153},
+{"f_7237:compiler_scm",(void*)f_7237},
+{"f_7241:compiler_scm",(void*)f_7241},
+{"f_7156:compiler_scm",(void*)f_7156},
+{"f_7159:compiler_scm",(void*)f_7159},
+{"f_7223:compiler_scm",(void*)f_7223},
+{"f_7162:compiler_scm",(void*)f_7162},
{"f_7211:compiler_scm",(void*)f_7211},
-{"f_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_7219:compiler_scm",(void*)f_7219},
+{"f_7215:compiler_scm",(void*)f_7215},
+{"f_7165:compiler_scm",(void*)f_7165},
+{"f_7029:compiler_scm",(void*)f_7029},
+{"f_7087:compiler_scm",(void*)f_7087},
+{"f_7137:compiler_scm",(void*)f_7137},
+{"f_7114:compiler_scm",(void*)f_7114},
+{"f_7130:compiler_scm",(void*)f_7130},
+{"f_7126:compiler_scm",(void*)f_7126},
+{"f_7032:compiler_scm",(void*)f_7032},
+{"f_7035:compiler_scm",(void*)f_7035},
{"f_7051:compiler_scm",(void*)f_7051},
-{"f_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_7059:compiler_scm",(void*)f_7059},
+{"f_7038:compiler_scm",(void*)f_7038},
+{"f_7045:compiler_scm",(void*)f_7045},
+{"f_6942:compiler_scm",(void*)f_6942},
+{"f_6966:compiler_scm",(void*)f_6966},
+{"f_7016:compiler_scm",(void*)f_7016},
+{"f_6993:compiler_scm",(void*)f_6993},
+{"f_7009:compiler_scm",(void*)f_7009},
+{"f_7005:compiler_scm",(void*)f_7005},
+{"f_6960:compiler_scm",(void*)f_6960},
+{"f_6945:compiler_scm",(void*)f_6945},
+{"f_6952:compiler_scm",(void*)f_6952},
+{"f_6613:compiler_scm",(void*)f_6613},
+{"f_6919:compiler_scm",(void*)f_6919},
+{"f_6930:compiler_scm",(void*)f_6930},
+{"f_6924:compiler_scm",(void*)f_6924},
+{"f_6622:compiler_scm",(void*)f_6622},
+{"f_6627:compiler_scm",(void*)f_6627},
+{"f_6883:compiler_scm",(void*)f_6883},
+{"f_6912:compiler_scm",(void*)f_6912},
+{"f_6631:compiler_scm",(void*)f_6631},
+{"f_6834:compiler_scm",(void*)f_6834},
+{"f_6867:compiler_scm",(void*)f_6867},
+{"f_6847:compiler_scm",(void*)f_6847},
+{"f_6832:compiler_scm",(void*)f_6832},
+{"f_6634:compiler_scm",(void*)f_6634},
+{"f_6637:compiler_scm",(void*)f_6637},
+{"f_6828:compiler_scm",(void*)f_6828},
+{"f_6640:compiler_scm",(void*)f_6640},
+{"f_6824:compiler_scm",(void*)f_6824},
+{"f_6643:compiler_scm",(void*)f_6643},
+{"f_6649:compiler_scm",(void*)f_6649},
+{"f_6799:compiler_scm",(void*)f_6799},
+{"f_6772:compiler_scm",(void*)f_6772},
+{"f_6664:compiler_scm",(void*)f_6664},
+{"f_6751:compiler_scm",(void*)f_6751},
{"f_6695:compiler_scm",(void*)f_6695},
-{"f_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_6729:compiler_scm",(void*)f_6729},
+{"f_6673:compiler_scm",(void*)f_6673},
+{"f_6456:compiler_scm",(void*)f_6456},
+{"f_6559:compiler_scm",(void*)f_6559},
+{"f_6477:compiler_scm",(void*)f_6477},
+{"f_6503:compiler_scm",(void*)f_6503},
+{"f_6485:compiler_scm",(void*)f_6485},
+{"f_6501:compiler_scm",(void*)f_6501},
+{"f_6481:compiler_scm",(void*)f_6481},
+{"f_6244:compiler_scm",(void*)f_6244},
+{"f_6250:compiler_scm",(void*)f_6250},
+{"f_6411:compiler_scm",(void*)f_6411},
+{"f_6440:compiler_scm",(void*)f_6440},
+{"f_6253:compiler_scm",(void*)f_6253},
+{"f_6362:compiler_scm",(void*)f_6362},
+{"f_6395:compiler_scm",(void*)f_6395},
+{"f_6375:compiler_scm",(void*)f_6375},
+{"f_6360:compiler_scm",(void*)f_6360},
+{"f_6256:compiler_scm",(void*)f_6256},
+{"f_6259:compiler_scm",(void*)f_6259},
+{"f_6292:compiler_scm",(void*)f_6292},
+{"f_6342:compiler_scm",(void*)f_6342},
{"f_6305:compiler_scm",(void*)f_6305},
-{"f_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_6323:compiler_scm",(void*)f_6323},
+{"f_6331:compiler_scm",(void*)f_6331},
+{"f_6270:compiler_scm",(void*)f_6270},
+{"f_6282:compiler_scm",(void*)f_6282},
+{"f_6286:compiler_scm",(void*)f_6286},
{"f_6278:compiler_scm",(void*)f_6278},
-{"f_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_6157:compiler_scm",(void*)f_6157},
+{"f_6159:compiler_scm",(void*)f_6159},
+{"f_6180:compiler_scm",(void*)f_6180},
+{"f_6218:compiler_scm",(void*)f_6218},
+{"f_6228:compiler_scm",(void*)f_6228},
+{"f_6206:compiler_scm",(void*)f_6206},
+{"f_6184:compiler_scm",(void*)f_6184},
+{"f_6199:compiler_scm",(void*)f_6199},
+{"f_6174:compiler_scm",(void*)f_6174},
+{"f_6153:compiler_scm",(void*)f_6153},
+{"f_6104:compiler_scm",(void*)f_6104},
{"f_6133:compiler_scm",(void*)f_6133},
-{"f_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_6083:compiler_scm",(void*)f_6083},
+{"f_6086:compiler_scm",(void*)f_6086},
+{"f_6097:compiler_scm",(void*)f_6097},
{"f_6091:compiler_scm",(void*)f_6091},
-{"f_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_6089:compiler_scm",(void*)f_6089},
+{"f_6058:compiler_scm",(void*)f_6058},
+{"f_6066:compiler_scm",(void*)f_6066},
+{"f_6029:compiler_scm",(void*)f_6029},
+{"f_6041:compiler_scm",(void*)f_6041},
+{"f_6037:compiler_scm",(void*)f_6037},
+{"f_5950:compiler_scm",(void*)f_5950},
+{"f_5962:compiler_scm",(void*)f_5962},
+{"f_5966:compiler_scm",(void*)f_5966},
{"f_5971:compiler_scm",(void*)f_5971},
-{"f_5899:compiler_scm",(void*)f_5899},
+{"f_5996:compiler_scm",(void*)f_5996},
+{"f_5999:compiler_scm",(void*)f_5999},
{"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_5921:compiler_scm",(void*)f_5921},
+{"f_5849:compiler_scm",(void*)f_5849},
+{"f_5860:compiler_scm",(void*)f_5860},
+{"f_5868:compiler_scm",(void*)f_5868},
+{"f_5876:compiler_scm",(void*)f_5876},
+{"f_5822:compiler_scm",(void*)f_5822},
+{"f_5768:compiler_scm",(void*)f_5768},
+{"f_5740:compiler_scm",(void*)f_5740},
+{"f_5734:compiler_scm",(void*)f_5734},
{"f_5594:compiler_scm",(void*)f_5594},
-{"f_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_5598:compiler_scm",(void*)f_5598},
+{"f_5619:compiler_scm",(void*)f_5619},
+{"f_5630:compiler_scm",(void*)f_5630},
+{"f_5623:compiler_scm",(void*)f_5623},
+{"f_5599:compiler_scm",(void*)f_5599},
+{"f_5603:compiler_scm",(void*)f_5603},
+{"f_5606:compiler_scm",(void*)f_5606},
+{"f_5610:compiler_scm",(void*)f_5610},
+{"f_5613:compiler_scm",(void*)f_5613},
+{"f_5424:compiler_scm",(void*)f_5424},
{"f_5428:compiler_scm",(void*)f_5428},
-{"f_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_5440:compiler_scm",(void*)f_5440},
+{"f_5458:compiler_scm",(void*)f_5458},
+{"f_5566:compiler_scm",(void*)f_5566},
+{"f_5523:compiler_scm",(void*)f_5523},
+{"f_5530:compiler_scm",(void*)f_5530},
+{"f_5544:compiler_scm",(void*)f_5544},
+{"f_5540:compiler_scm",(void*)f_5540},
+{"f_5476:compiler_scm",(void*)f_5476},
+{"f_5483:compiler_scm",(void*)f_5483},
+{"f_5497:compiler_scm",(void*)f_5497},
+{"f_5493:compiler_scm",(void*)f_5493},
+{"f_5462:compiler_scm",(void*)f_5462},
+{"f_5444:compiler_scm",(void*)f_5444},
+{"f_5378:compiler_scm",(void*)f_5378},
+{"f_5410:compiler_scm",(void*)f_5410},
+{"f_5318:compiler_scm",(void*)f_5318},
+{"f_5324:compiler_scm",(void*)f_5324},
+{"f_5339:compiler_scm",(void*)f_5339},
+{"f_5305:compiler_scm",(void*)f_5305},
+{"f_5309:compiler_scm",(void*)f_5309},
+{"f_5316:compiler_scm",(void*)f_5316},
+{"f_5312:compiler_scm",(void*)f_5312},
+{"f_5290:compiler_scm",(void*)f_5290},
+{"f_5294:compiler_scm",(void*)f_5294},
+{"f_5300:compiler_scm",(void*)f_5300},
{"f_5251:compiler_scm",(void*)f_5251},
-{"f_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},
+{"f_5288:compiler_scm",(void*)f_5288},
+{"f_5284:compiler_scm",(void*)f_5284},
+{"f_5264:compiler_scm",(void*)f_5264},
+{"f_5187:compiler_scm",(void*)f_5187},
+{"f_5246:compiler_scm",(void*)f_5246},
+{"f_5191:compiler_scm",(void*)f_5191},
+{"f_5239:compiler_scm",(void*)f_5239},
+{"f_5194:compiler_scm",(void*)f_5194},
+{"f_5232:compiler_scm",(void*)f_5232},
+{"f_5197:compiler_scm",(void*)f_5197},
+{"f_5201:compiler_scm",(void*)f_5201},
+{"f_5205:compiler_scm",(void*)f_5205},
+{"f_5225:compiler_scm",(void*)f_5225},
+{"f_5208:compiler_scm",(void*)f_5208},
+{"f_5218:compiler_scm",(void*)f_5218},
+{"f_5093:compiler_scm",(void*)f_5093},
{NULL,NULL}};
#endif
diff --git a/bootstrap/data-structures.c b/bootstrap/data-structures.c
index 3dd072fe..2d40db10 100644
--- a/bootstrap/data-structures.c
+++ b/bootstrap/data-structures.c
@@ -1,10 +1,10 @@
/* Generated from data-structures.scm by the CHICKEN compiler
http://www.call-with-current-continuation.org
- 2009-12-04 21:25
+ 2010-02-09 21:33
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
+ windows-mingw32-x86 [ manyargs ptables ]
+ compiled 2010-01-08 on lenovo-1 (MINGW32_NT-6.0)
+ command line: data-structures.scm -optimize-level 2 -include-path . -include-path ./ -inline -explicit-use -no-trace -output-file data-structures.c -extend ./private-namespace.scm
unit: data_structures
*/
@@ -14,46 +14,46 @@
static C_PTABLE_ENTRY *create_ptable(void);
-static C_TLS C_word lf[117];
+static C_TLS C_word lf[116];
static double C_possibly_force_alignment;
static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,14),40,105,100,101,110,116,105,116,121,32,120,50,54,41,0,0};
-static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,17),40,102,95,49,50,57,56,32,46,32,97,114,103,115,50,57,41,0,0,0,0,0,0,0};
+static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,17),40,102,95,49,50,57,55,32,46,32,97,114,103,115,50,57,41,0,0,0,0,0,0,0};
static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,13),40,112,114,111,106,101,99,116,32,110,50,56,41,0,0,0};
static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,112,114,101,100,115,51,52,41,0,0};
-static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,12),40,102,95,49,51,48,54,32,120,51,50,41,0,0,0,0};
+static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,12),40,102,95,49,51,48,53,32,120,51,50,41,0,0,0,0};
static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,19),40,99,111,110,106,111,105,110,32,46,32,112,114,101,100,115,51,49,41,0,0,0,0,0};
static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,112,114,101,100,115,52,57,41,0,0};
-static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,12),40,102,95,49,51,51,57,32,120,52,55,41,0,0,0,0};
+static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,12),40,102,95,49,51,51,56,32,120,52,55,41,0,0,0,0};
static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,19),40,100,105,115,106,111,105,110,32,46,32,112,114,101,100,115,52,54,41,0,0,0,0,0};
-static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,14),40,102,95,49,51,56,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 li9[] C_aligned={C_lihdr(0,0,14),40,102,95,49,51,56,52,32,46,32,95,54,51,41,0,0};
+static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,14),40,102,95,49,51,56,54,32,46,32,95,54,52,41,0,0};
static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,19),40,99,111,110,115,116,97,110,116,108,121,32,46,32,120,115,54,49,41,0,0,0,0,0};
-static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,16),40,102,95,49,51,57,57,32,120,54,55,32,121,54,56,41};
+static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,16),40,102,95,49,51,57,56,32,120,54,55,32,121,54,56,41};
static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,13),40,102,108,105,112,32,112,114,111,99,54,54,41,0,0,0};
-static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,17),40,102,95,49,52,48,55,32,46,32,97,114,103,115,55,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,17),40,102,95,49,52,48,54,32,46,32,97,114,103,115,55,48,41,0,0,0,0,0,0,0};
static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,16),40,99,111,109,112,108,101,109,101,110,116,32,112,54,57,41};
-static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,7),40,97,49,52,51,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 li16[] C_aligned={C_lihdr(0,0,7),40,97,49,52,51,50,41,0};
+static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,17),40,102,95,49,52,50,55,32,46,32,97,114,103,115,55,54,41,0,0,0,0,0,0,0};
static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,18),40,114,101,99,32,102,48,55,52,32,46,32,102,110,115,55,53,41,0,0,0,0,0,0};
static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,17),40,99,111,109,112,111,115,101,32,46,32,102,110,115,55,50,41,0,0,0,0,0,0,0};
-static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,12),40,102,95,49,52,55,57,32,120,56,52,41,0,0,0,0};
+static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,12),40,102,95,49,52,55,56,32,120,56,52,41,0,0,0,0};
static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,102,110,115,56,49,41,0,0,0,0};
static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,11),40,111,32,46,32,102,110,115,55,57,41,0,0,0,0,0};
static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,108,115,116,57,50,41,0,0,0,0};
-static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,14),40,102,95,49,52,57,52,32,108,115,116,57,48,41,0,0};
+static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,14),40,102,95,49,52,57,51,32,108,115,116,57,48,41,0,0};
static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,17),40,108,105,115,116,45,111,102,63,32,112,114,101,100,56,57,41,0,0,0,0,0,0,0};
static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,13),40,110,111,111,112,32,46,32,95,49,48,49,41,0,0,0};
-static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,15),40,102,95,49,53,52,55,32,46,32,95,49,49,48,41,0};
+static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,15),40,102,95,49,53,52,53,32,46,32,95,49,49,48,41,0};
static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,112,114,111,99,115,49,49,51,41,0};
-static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,18),40,102,95,49,53,54,49,32,46,32,97,114,103,115,49,49,49,41,0,0,0,0,0,0};
+static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,18),40,102,95,49,53,53,57,32,46,32,97,114,103,115,49,49,49,41,0,0,0,0,0,0};
static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,17),40,101,97,99,104,32,46,32,112,114,111,99,115,49,48,51,41,0,0,0,0,0,0,0};
static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,11),40,97,110,121,63,32,120,49,49,57,41,0,0,0,0,0};
static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,12),40,110,111,110,101,63,32,120,49,50,49,41,0,0,0,0};
static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,16),40,97,108,119,97,121,115,63,32,46,32,95,49,50,51,41};
static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,15),40,110,101,118,101,114,63,32,46,32,95,49,50,53,41,0};
-static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,16),40,102,95,49,54,49,50,32,46,32,120,115,49,50,57,41};
+static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,16),40,102,95,49,54,49,48,32,46,32,120,115,49,50,57,41};
static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,32),40,108,101,102,116,45,115,101,99,116,105,111,110,32,112,114,111,99,49,50,55,32,46,32,97,114,103,115,49,50,56,41};
-static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,16),40,102,95,49,54,51,48,32,46,32,120,115,49,51,53,41};
+static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,16),40,102,95,49,54,50,56,32,46,32,120,115,49,51,53,41};
static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,33),40,114,105,103,104,116,45,115,101,99,116,105,111,110,32,112,114,111,99,49,51,50,32,46,32,97,114,103,115,49,51,51,41,0,0,0,0,0,0,0};
static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,12),40,97,116,111,109,63,32,120,49,51,56,41,0,0,0,0};
static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
@@ -72,15 +72,15 @@ static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,23),40,106,111,105,110,32,108,
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 li56[] C_aligned={C_lihdr(0,0,17),40,97,50,48,53,56,32,120,51,48,56,32,121,51,48,57,41,0,0,0,0,0,0,0};
static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,11),40,103,51,48,50,32,120,51,48,52,41,0,0,0,0,0};
static C_char C_TLS li58[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,50,56,54,32,103,50,57,54,51,48,48,41,0,0,0,0,0,0,0};
static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,24),40,115,104,117,102,102,108,101,32,108,50,53,56,32,114,97,110,100,111,109,50,53,57,41};
static C_char C_TLS li60[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,108,115,116,51,51,56,41,0,0,0};
-static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,20),40,102,95,50,49,53,56,32,120,51,51,53,32,108,115,116,51,51,54,41,0,0,0,0};
+static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,20),40,102,95,50,49,53,54,32,120,51,51,53,32,108,115,116,51,51,54,41,0,0,0,0};
static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,44),40,97,108,105,115,116,45,117,112,100,97,116,101,33,32,120,51,49,55,32,121,51,49,56,32,108,115,116,51,49,57,32,46,32,116,109,112,51,49,54,51,50,48,41,0,0,0,0};
static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,108,115,116,51,56,52,41,0,0,0};
-static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,20),40,102,95,50,50,52,57,32,120,51,56,49,32,108,115,116,51,56,50,41,0,0,0,0};
+static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,20),40,102,95,50,50,52,55,32,120,51,56,49,32,108,115,116,51,56,50,41,0,0,0,0};
static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,27),40,98,111,100,121,51,54,50,32,99,109,112,51,55,49,32,100,101,102,97,117,108,116,51,55,50,41,0,0,0,0,0};
static C_char C_TLS li66[] C_aligned={C_lihdr(0,0,27),40,100,101,102,45,100,101,102,97,117,108,116,51,54,53,32,37,99,109,112,51,54,48,51,57,51,41,0,0,0,0,0};
static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,12),40,100,101,102,45,99,109,112,51,54,52,41,0,0,0,0};
@@ -95,9 +95,9 @@ static C_char C_TLS li75[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,52,53,5
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 li79[] C_aligned={C_lihdr(0,0,17),40,97,50,54,48,57,32,105,52,57,55,32,108,52,57,56,41,0,0,0,0,0,0,0};
static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,50),40,35,35,115,121,115,35,115,117,98,115,116,114,105,110,103,45,105,110,100,101,120,32,119,104,105,99,104,52,57,52,32,119,104,101,114,101,52,57,53,32,115,116,97,114,116,52,57,54,41,0,0,0,0,0,0};
-static C_char C_TLS li81[] C_aligned={C_lihdr(0,0,17),40,97,50,54,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 li81[] C_aligned={C_lihdr(0,0,17),40,97,50,54,49,56,32,105,53,48,50,32,108,53,48,51,41,0,0,0,0,0,0,0};
static C_char C_TLS li82[] C_aligned={C_lihdr(0,0,53),40,35,35,115,121,115,35,115,117,98,115,116,114,105,110,103,45,105,110,100,101,120,45,99,105,32,119,104,105,99,104,52,57,57,32,119,104,101,114,101,53,48,48,32,115,116,97,114,116,53,48,49,41,0,0,0};
static C_char C_TLS li83[] C_aligned={C_lihdr(0,0,47),40,115,117,98,115,116,114,105,110,103,45,105,110,100,101,120,32,119,104,105,99,104,53,49,51,32,119,104,101,114,101,53,49,52,32,46,32,116,109,112,53,49,50,53,49,53,41,0};
static C_char C_TLS li84[] C_aligned={C_lihdr(0,0,50),40,115,117,98,115,116,114,105,110,103,45,105,110,100,101,120,45,99,105,32,119,104,105,99,104,53,50,56,32,119,104,101,114,101,53,50,57,32,46,32,116,109,112,53,50,55,53,51,48,41,0,0,0,0,0,0};
@@ -123,10 +123,10 @@ static C_char C_TLS li103[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,50,32,
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 li107[] C_aligned={C_lihdr(0,0,13),40,102,95,51,50,51,50,32,99,55,55,57,41,0,0,0};
static C_char C_TLS li108[] C_aligned={C_lihdr(0,0,15),40,105,110,115,116,114,105,110,103,32,115,55,55,55,41,0};
static C_char C_TLS li109[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,105,56,49,54,32,106,56,49,55,41};
-static C_char C_TLS li110[] C_aligned={C_lihdr(0,0,13),40,102,95,51,52,48,51,32,99,55,57,54,41,0,0,0};
+static C_char C_TLS li110[] C_aligned={C_lihdr(0,0,13),40,102,95,51,52,48,49,32,99,55,57,54,41,0,0,0};
static C_char C_TLS li111[] C_aligned={C_lihdr(0,0,41),40,115,116,114,105,110,103,45,116,114,97,110,115,108,97,116,101,32,115,116,114,55,55,50,32,102,114,111,109,55,55,51,32,46,32,116,111,55,55,52,41,0,0,0,0,0,0,0};
static C_char C_TLS li112[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,115,109,97,112,56,52,55,41,0,0};
static C_char C_TLS li113[] C_aligned={C_lihdr(0,0,37),40,99,111,108,108,101,99,116,32,105,56,52,50,32,102,114,111,109,56,52,51,32,116,111,116,97,108,56,52,52,32,102,115,56,52,53,41,0,0,0};
@@ -177,756 +177,756 @@ static C_char C_TLS li156[] C_aligned={C_lihdr(0,0,10),40,116,111,112,108,101,11
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_1290)
+static void C_ccall f_1290(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4737)
+static void C_ccall f_4737(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4747)
+static void C_ccall f_4747(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4766)
+static C_word C_fcall f_4766(C_word t0);
+C_noret_decl(f_4708)
+static void C_ccall f_4708(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4654)
+static void C_ccall f_4654(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4673)
+static void C_fcall f_4673(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4683)
+static void C_ccall f_4683(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4665)
+static void C_ccall f_4665(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4645)
+static void C_ccall f_4645(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4609)
+static void C_ccall f_4609(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4619)
+static void C_ccall f_4619(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4577)
+static void C_ccall f_4577(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4556)
+static void C_ccall f_4556(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4566)
+static void C_ccall f_4566(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4535)
+static void C_ccall f_4535(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4545)
+static void C_ccall f_4545(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4522)
+static void C_ccall f_4522(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4516)
+static void C_ccall f_4516(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4510)
+static void C_ccall f_4510(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4427)
+static void C_ccall f_4427(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4505)
+static void C_ccall f_4505(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4431)
+static void C_fcall f_4431(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4445)
+static void C_fcall f_4445(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4455)
+static void C_ccall f_4455(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4164)
+static void C_ccall f_4164(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4391)
+static void C_fcall f_4391(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4414)
+static void C_ccall f_4414(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4399)
+static void C_fcall f_4399(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4314)
+static void C_ccall f_4314(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4381)
+static void C_ccall f_4381(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4385)
+static void C_ccall f_4385(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4317)
+static void C_ccall f_4317(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4326)
+static void C_fcall f_4326(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4366)
+static void C_ccall f_4366(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4334)
+static void C_fcall f_4334(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4338)
+static void C_ccall f_4338(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4320)
+static void C_ccall f_4320(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4255)
-static void C_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;
+static void C_fcall f_4255(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4259)
+static void C_ccall f_4259(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4268)
+static void C_fcall f_4268(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4300)
+static void C_ccall f_4300(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4276)
+static void C_fcall f_4276(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4280)
+static void C_ccall f_4280(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4262)
+static void C_ccall f_4262(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4220)
-static void C_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;
+static void C_fcall f_4220(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4226)
+static void C_fcall f_4226(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4253)
+static void C_ccall f_4253(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4239)
+static void C_ccall f_4239(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4173)
+static void C_fcall f_4173(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4179)
+static void C_fcall f_4179(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4218)
+static void C_ccall f_4218(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4200)
+static void C_ccall f_4200(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4137)
+static void C_ccall f_4137(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4162)
+static void C_ccall f_4162(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4155)
+static void C_ccall f_4155(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4151)
+static void C_ccall f_4151(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4004)
+static void C_ccall f_4004(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4094)
+static void C_ccall f_4094(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4101)
+static void C_ccall f_4101(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_4103)
-static void C_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;
+static void C_fcall f_4103(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4007)
+static void C_fcall f_4007(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4058)
+static void C_ccall f_4058(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4017)
+static void C_ccall f_4017(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4020)
+static void C_ccall f_4020(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4026)
+static void C_ccall f_4026(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3872)
+static void C_ccall f_3872(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3954)
+static void C_ccall f_3954(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3977)
+static void C_ccall f_3977(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3957)
+static void C_ccall f_3957(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3875)
+static void C_fcall f_3875(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3882)
+static void C_ccall f_3882(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3773)
+static void C_ccall f_3773(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3807)
+static void C_fcall f_3807(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_3814)
+static void C_ccall f_3814(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3862)
+static void C_ccall f_3862(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3834)
+static void C_ccall f_3834(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3664)
+static void C_ccall f_3664(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3739)
+static void C_fcall f_3739(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3767)
+static void C_ccall f_3767(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3691)
+static void C_fcall f_3691(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3701)
+static void C_ccall f_3701(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3612)
+static void C_ccall f_3612(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_3612)
+static void C_ccall f_3612r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_3616)
+static void C_ccall f_3616(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3548)
+static void C_ccall f_3548(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3563)
+static void C_fcall f_3563(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3594)
+static void C_ccall f_3594(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3598)
+static void C_ccall f_3598(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3583)
+static void C_ccall f_3583(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3426)
+static void C_ccall f_3426(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3438)
+static void C_fcall f_3438(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_3471)
+static void C_fcall f_3471(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3536)
+static void C_ccall f_3536(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3510)
+static void C_fcall f_3510(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3466)
+static void C_ccall f_3466(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3452)
+static void C_ccall f_3452(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3224)
+static void C_ccall f_3224(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_3224)
+static void C_ccall f_3224r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_3418)
+static void C_ccall f_3418(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3401)
+static void C_ccall f_3401(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3261)
+static void C_ccall f_3261(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3264)
+static void C_ccall f_3264(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3276)
+static void C_ccall f_3276(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3281)
+static void C_fcall f_3281(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3300)
+static void C_ccall f_3300(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3227)
+static void C_fcall f_3227(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3232)
+static void C_ccall f_3232(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3238)
+static C_word C_fcall f_3238(C_word t0,C_word t1);
+C_noret_decl(f_3109)
+static void C_ccall f_3109(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_3109)
+static void C_ccall f_3109r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_3113)
+static void C_ccall f_3113(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3127)
+static void C_fcall f_3127(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3137)
+static void C_ccall f_3137(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3142)
+static C_word C_fcall f_3142(C_word t0,C_word t1,C_word t2);
+C_noret_decl(f_2974)
+static void C_ccall f_2974(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_2974)
+static void C_ccall f_2974r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_3015)
+static void C_fcall f_3015(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3042)
+static void C_fcall f_3042(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3081)
+static void C_ccall f_3081(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3025)
+static void C_ccall f_3025(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2995)
+static void C_fcall f_2995(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3010)
+static void C_ccall f_3010(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2894)
+static void C_ccall f_2894(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_2894)
+static void C_ccall f_2894r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_2911)
+static void C_fcall f_2911(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2906)
+static void C_fcall f_2906(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2901)
+static void C_fcall f_2901(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_2896)
-static void C_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;
+static void C_fcall f_2896(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2857)
+static void C_ccall f_2857(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
+C_noret_decl(f_2867)
+static void C_fcall f_2867(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2777)
+static void C_ccall f_2777(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_2777)
+static void C_ccall f_2777r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_2794)
+static void C_fcall f_2794(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2789)
+static void C_fcall f_2789(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2784)
+static void C_fcall f_2784(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_2779)
-static void C_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;
+static void C_fcall f_2779(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2740)
+static void C_ccall f_2740(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
+C_noret_decl(f_2750)
+static void C_fcall f_2750(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2709)
+static void C_ccall f_2709(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2678)
+static void C_ccall f_2678(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2650)
+static void C_ccall f_2650(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_2650)
+static void C_ccall f_2650r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_2654)
+static void C_ccall f_2654(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2622)
+static void C_ccall f_2622(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_2622)
+static void C_ccall f_2622r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_2626)
+static void C_ccall f_2626(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2613)
+static void C_ccall f_2613(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2619)
+static void C_ccall f_2619(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2604)
+static void C_ccall f_2604(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2610)
+static void C_ccall f_2610(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2557)
+static void C_fcall f_2557(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_2578)
+static void C_fcall f_2578(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2591)
+static void C_ccall f_2591(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2512)
+static void C_ccall f_2512(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_2512)
+static void C_ccall f_2512r(C_word t0,C_word t1,C_word t3) C_noret;
C_noret_decl(f_2522)
-static void C_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;
+static void C_fcall f_2522(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2551)
+static void C_ccall f_2551(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2520)
+static void C_ccall f_2520(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2467)
+static void C_ccall f_2467(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2504)
+static void C_ccall f_2504(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2507)
+static void C_ccall f_2507(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2390)
+static void C_ccall f_2390(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2393)
+static void C_fcall f_2393(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2409)
+static void C_ccall f_2409(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2418)
+static void C_fcall f_2418(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2340)
+static void C_ccall f_2340(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_2340)
+static void C_ccall f_2340r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_2352)
+static void C_fcall f_2352(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2371)
+static void C_ccall f_2371(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2216)
+static void C_ccall f_2216(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_2216)
+static void C_ccall f_2216r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_2292)
+static void C_fcall f_2292(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2287)
+static void C_fcall f_2287(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_2218)
-static void C_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;
+static void C_fcall f_2218(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2247)
+static void C_ccall f_2247(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2253)
+static void C_fcall f_2253(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2269)
+static void C_ccall f_2269(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2222)
+static void C_fcall f_2222(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2225)
+static void C_ccall f_2225(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2117)
+static void C_ccall f_2117(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
+C_noret_decl(f_2117)
+static void C_ccall f_2117r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
+C_noret_decl(f_2121)
+static void C_ccall f_2121(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2156)
+static void C_ccall f_2156(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2162)
+static void C_fcall f_2162(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2178)
+static void C_ccall f_2178(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2124)
+static void C_fcall f_2124(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2127)
+static void C_ccall f_2127(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2007)
+static void C_ccall f_2007(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2073)
+static void C_fcall f_2073(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2111)
+static void C_ccall f_2111(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2100)
+static void C_fcall f_2100(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2108)
+static void C_ccall f_2108(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2057)
+static void C_ccall f_2057(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2059)
-static void C_ccall f_2059(C_word c,C_word t0,C_word t1) C_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;
+static void C_ccall f_2059(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2018)
+static void C_ccall f_2018(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_2020)
-static void C_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;
+static void C_fcall f_2020(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2049)
+static void C_ccall f_2049(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1927)
+static void C_ccall f_1927(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1936)
+static void C_fcall f_1936(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1978)
+static void C_ccall f_1978(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1868)
+static void C_ccall f_1868(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_1868)
+static void C_ccall f_1868r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_1880)
+static void C_fcall f_1880(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1915)
+static void C_ccall f_1915(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_1783)
-static void C_ccall f_1783(C_word c,C_word t0,C_word t1) C_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;
+static void C_ccall f_1783(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1790)
+static void C_ccall f_1790(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1798)
+static void C_fcall f_1798(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1819)
+static void C_fcall f_1819(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1833)
+static void C_ccall f_1833(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1837)
+static void C_ccall f_1837(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1742)
+static void C_ccall f_1742(C_word c,C_word t0,C_word t1,...) C_noret;
C_noret_decl(f_1742)
-static void C_ccall f_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;
+static void C_ccall f_1742r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1748)
+static void C_fcall f_1748(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1781)
+static void C_ccall f_1781(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1774)
+static void C_ccall f_1774(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_1710)
-static void C_ccall f_1710(C_word c,C_word t0,C_word t1) C_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;
+static void C_ccall f_1710(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1719)
+static void C_fcall f_1719(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1740)
+static void C_ccall f_1740(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1677)
+static void C_ccall f_1677(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1683)
+static void C_fcall f_1683(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1708)
+static void C_ccall f_1708(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1649)
+static void C_ccall f_1649(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1661)
+static C_word C_fcall f_1661(C_word t0,C_word t1);
C_noret_decl(f_1646)
-static void C_ccall f_1646(C_word c,C_word t0,C_word t1) C_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;
+static void C_ccall f_1646(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1620)
+static void C_ccall f_1620(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
C_noret_decl(f_1620)
-static void C_ccall f_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){
+static void C_ccall f_1620r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_1624)
+static void C_ccall f_1624(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1627)
+static void C_ccall f_1627(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1628)
+static void C_ccall f_1628(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1628)
+static void C_ccall f_1628r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1644)
+static void C_ccall f_1644(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1640)
+static void C_ccall f_1640(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1636)
+static void C_ccall f_1636(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1605)
+static void C_ccall f_1605(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_1605)
+static void C_ccall f_1605r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_1609)
+static void C_ccall f_1609(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1610)
+static void C_ccall f_1610(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1610)
+static void C_ccall f_1610r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1618)
+static void C_ccall f_1618(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1602)
+static void C_ccall f_1602(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1599)
+static void C_ccall f_1599(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1596)
+static void C_ccall f_1596(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1593)
+static void C_ccall f_1593(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1537)
+static void C_ccall f_1537(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1537)
+static void C_ccall f_1537r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1559)
+static void C_ccall f_1559(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1559)
+static void C_ccall f_1559r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1565)
+static void C_fcall f_1565(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1584)
+static void C_ccall f_1584(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1545)
+static void C_ccall f_1545(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1531)
+static void C_ccall f_1531(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1491)
+static void C_ccall f_1491(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1493)
+static void C_ccall f_1493(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1499)
+static void C_fcall f_1499(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1518)
+static void C_ccall f_1518(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1452)
+static void C_ccall f_1452(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1452)
+static void C_ccall f_1452r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1464)
+static void C_fcall f_1464(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1478)
+static void C_ccall f_1478(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1486)
+static void C_ccall f_1486(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1489)
+static void C_ccall f_1489(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1416)
+static void C_ccall f_1416(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1416)
+static void C_ccall f_1416r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1419)
+static void C_ccall f_1419(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_1419)
+static void C_ccall f_1419r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_1427)
+static void C_ccall f_1427(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1427)
+static void C_ccall f_1427r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1433)
+static void C_ccall f_1433(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1441)
+static void C_ccall f_1441(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1404)
+static void C_ccall f_1404(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1406)
+static void C_ccall f_1406(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1406)
+static void C_ccall f_1406r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1414)
+static void C_ccall f_1414(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1396)
+static void C_ccall f_1396(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1398)
+static void C_ccall f_1398(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1373)
+static void C_ccall f_1373(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1373)
+static void C_ccall f_1373r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1386)
+static void C_ccall f_1386(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1384)
+static void C_ccall f_1384(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1336)
+static void C_ccall f_1336(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1336)
+static void C_ccall f_1336r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1338)
+static void C_ccall f_1338(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1344)
+static void C_fcall f_1344(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1357)
+static void C_ccall f_1357(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1303)
+static void C_ccall f_1303(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1303)
+static void C_ccall f_1303r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1305)
+static void C_ccall f_1305(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1311)
+static void C_fcall f_1311(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1327)
+static void C_ccall f_1327(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1295)
+static void C_ccall f_1295(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1297)
+static void C_ccall f_1297(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1297)
+static void C_ccall f_1297r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1292)
+static void C_ccall f_1292(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+
+C_noret_decl(trf_4673)
+static void C_fcall trf_4673(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4673(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4675(t0,t1,t2);}
+f_4673(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_noret_decl(trf_4431)
+static void C_fcall trf_4431(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4431(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_4433(t0,t1);}
+f_4431(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_noret_decl(trf_4445)
+static void C_fcall trf_4445(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4445(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_4447(t0,t1,t2,t3);}
+f_4445(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_noret_decl(trf_4391)
+static void C_fcall trf_4391(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4391(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4393(t0,t1,t2);}
+f_4391(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_noret_decl(trf_4399)
+static void C_fcall trf_4399(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4399(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4401(t0,t1,t2);}
+f_4399(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_noret_decl(trf_4326)
+static void C_fcall trf_4326(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4326(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4328(t0,t1,t2);}
+f_4326(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_noret_decl(trf_4334)
+static void C_fcall trf_4334(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4334(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4336(t0,t1,t2);}
+f_4334(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_noret_decl(trf_4255)
+static void C_fcall trf_4255(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4255(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_4257(t0,t1,t2,t3);}
+f_4255(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_noret_decl(trf_4268)
+static void C_fcall trf_4268(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4268(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4270(t0,t1,t2);}
+f_4268(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_noret_decl(trf_4276)
+static void C_fcall trf_4276(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4276(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4278(t0,t1,t2);}
+f_4276(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_noret_decl(trf_4220)
+static void C_fcall trf_4220(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4220(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4222(t0,t1,t2);}
+f_4220(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_noret_decl(trf_4226)
+static void C_fcall trf_4226(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4226(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4228(t0,t1,t2);}
+f_4226(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_noret_decl(trf_4173)
+static void C_fcall trf_4173(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4173(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_4175(t0,t1,t2,t3);}
+f_4173(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_noret_decl(trf_4179)
+static void C_fcall trf_4179(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4179(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4181(t0,t1,t2);}
+f_4179(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_noret_decl(trf_4103)
+static void C_fcall trf_4103(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4103(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_4105(t0,t1,t2,t3);}
+f_4103(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_noret_decl(trf_4007)
+static void C_fcall trf_4007(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4007(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_4009(t0,t1,t2);}
+f_4007(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_noret_decl(trf_3875)
+static void C_fcall trf_3875(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3875(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_3877(t0,t1,t2,t3,t4);}
+f_3875(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_noret_decl(trf_3807)
+static void C_fcall trf_3807(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3807(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -934,40 +934,40 @@ 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);}
+f_3807(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_noret_decl(trf_3739)
+static void C_fcall trf_3739(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3739(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_3741(t0,t1,t2,t3);}
+f_3739(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_noret_decl(trf_3691)
+static void C_fcall trf_3691(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3691(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3693(t0,t1,t2);}
+f_3691(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_noret_decl(trf_3563)
+static void C_fcall trf_3563(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3563(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_3565(t0,t1,t2,t3);}
+f_3563(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_noret_decl(trf_3438)
+static void C_fcall trf_3438(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3438(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -975,179 +975,179 @@ 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);}
+f_3438(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_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_3473(t0,t1,t2);}
+f_3471(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_noret_decl(trf_3510)
+static void C_fcall trf_3510(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3510(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_3512(t0,t1);}
+f_3510(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_noret_decl(trf_3281)
+static void C_fcall trf_3281(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3281(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_3283(t0,t1,t2,t3);}
+f_3281(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_noret_decl(trf_3227)
+static void C_fcall trf_3227(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3227(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_3229(t0,t1);}
+f_3227(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_noret_decl(trf_3127)
+static void C_fcall trf_3127(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3127(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_3129(t0,t1,t2,t3);}
+f_3127(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_noret_decl(trf_3015)
+static void C_fcall trf_3015(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3015(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_3017(t0,t1,t2,t3,t4);}
+f_3015(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_noret_decl(trf_3042)
+static void C_fcall trf_3042(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3042(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_3044(t0,t1,t2);}
+f_3042(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_noret_decl(trf_2995)
+static void C_fcall trf_2995(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2995(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_2997(t0,t1,t2,t3,t4);}
+f_2995(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_noret_decl(trf_2911)
+static void C_fcall trf_2911(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2911(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2913(t0,t1);}
+f_2911(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_noret_decl(trf_2906)
+static void C_fcall trf_2906(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2906(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2908(t0,t1,t2);}
+f_2906(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_noret_decl(trf_2901)
+static void C_fcall trf_2901(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2901(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_2903(t0,t1,t2,t3);}
+f_2901(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_noret_decl(trf_2896)
+static void C_fcall trf_2896(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2896(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_2898(t0,t1,t2,t3,t4);}
+f_2896(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_noret_decl(trf_2867)
+static void C_fcall trf_2867(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2867(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2869(t0,t1);}
+f_2867(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_noret_decl(trf_2794)
+static void C_fcall trf_2794(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2794(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2796(t0,t1);}
+f_2794(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_noret_decl(trf_2789)
+static void C_fcall trf_2789(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2789(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2791(t0,t1,t2);}
+f_2789(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_noret_decl(trf_2784)
+static void C_fcall trf_2784(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2784(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_2786(t0,t1,t2,t3);}
+f_2784(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_noret_decl(trf_2779)
+static void C_fcall trf_2779(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2779(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_2781(t0,t1,t2,t3,t4);}
+f_2779(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_noret_decl(trf_2750)
+static void C_fcall trf_2750(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2750(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2752(t0,t1);}
+f_2750(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_noret_decl(trf_2557)
+static void C_fcall trf_2557(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2557(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -1155,256 +1155,256 @@ 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);}
+f_2557(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_noret_decl(trf_2578)
+static void C_fcall trf_2578(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2578(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_2580(t0,t1,t2,t3);}
+f_2578(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_noret_decl(trf_2522)
+static void C_fcall trf_2522(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2522(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2524(t0,t1,t2);}
+f_2522(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_noret_decl(trf_2393)
+static void C_fcall trf_2393(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2393(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_2395(t0,t1,t2,t3);}
+f_2393(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_noret_decl(trf_2418)
+static void C_fcall trf_2418(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2418(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_2420(t0,t1,t2,t3);}
+f_2418(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_noret_decl(trf_2352)
+static void C_fcall trf_2352(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2352(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2354(t0,t1,t2);}
+f_2352(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_noret_decl(trf_2292)
+static void C_fcall trf_2292(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2292(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2294(t0,t1);}
+f_2292(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_noret_decl(trf_2287)
+static void C_fcall trf_2287(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2287(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2289(t0,t1,t2);}
+f_2287(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_noret_decl(trf_2218)
+static void C_fcall trf_2218(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2218(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_2220(t0,t1,t2,t3);}
+f_2218(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_noret_decl(trf_2253)
+static void C_fcall trf_2253(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2253(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2255(t0,t1,t2);}
+f_2253(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_noret_decl(trf_2222)
+static void C_fcall trf_2222(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2222(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2224(t0,t1);}
+f_2222(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_noret_decl(trf_2162)
+static void C_fcall trf_2162(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2162(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2164(t0,t1,t2);}
+f_2162(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_noret_decl(trf_2124)
+static void C_fcall trf_2124(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2124(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_2126(t0,t1);}
+f_2124(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_noret_decl(trf_2073)
+static void C_fcall trf_2073(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2073(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2075(t0,t1,t2);}
+f_2073(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_noret_decl(trf_2100)
+static void C_fcall trf_2100(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2100(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2102(t0,t1,t2);}
+f_2100(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_noret_decl(trf_2020)
+static void C_fcall trf_2020(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2020(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_2022(t0,t1,t2);}
+f_2020(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_noret_decl(trf_1936)
+static void C_fcall trf_1936(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1936(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_1938(t0,t1,t2,t3);}
+f_1936(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_noret_decl(trf_1880)
+static void C_fcall trf_1880(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1880(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1882(t0,t1,t2);}
+f_1880(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_noret_decl(trf_1798)
+static void C_fcall trf_1798(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1798(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_1800(t0,t1,t2,t3);}
+f_1798(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_noret_decl(trf_1819)
+static void C_fcall trf_1819(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1819(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_1821(t0,t1,t2,t3,t4);}
+f_1819(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_noret_decl(trf_1748)
+static void C_fcall trf_1748(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1748(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_1750(t0,t1,t2,t3);}
+f_1748(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_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_1721(t0,t1,t2);}
+f_1719(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_noret_decl(trf_1683)
+static void C_fcall trf_1683(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1683(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1685(t0,t1,t2);}
+f_1683(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_noret_decl(trf_1565)
+static void C_fcall trf_1565(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1565(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1567(t0,t1,t2);}
+f_1565(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_noret_decl(trf_1499)
+static void C_fcall trf_1499(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1499(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1500(t0,t1,t2);}
+f_1499(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_noret_decl(trf_1464)
+static void C_fcall trf_1464(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1464(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1465(t0,t1,t2);}
+f_1464(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_noret_decl(trf_1344)
+static void C_fcall trf_1344(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1344(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1345(t0,t1,t2);}
+f_1344(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_noret_decl(trf_1311)
+static void C_fcall trf_1311(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1311(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_1312(t0,t1,t2);}
+f_1311(t0,t1,t2);}
C_noret_decl(tr7)
static void C_fcall tr7(C_proc7 k) C_regparm C_noret;
@@ -1577,12 +1577,12 @@ if(!C_demand(3)){
C_save(t1);
C_reclaim((void*)toplevel_trampoline,NULL);}
toplevel_initialized=1;
-if(!C_demand_2(1050)){
+if(!C_demand_2(1040)){
C_save(t1);
-C_rereclaim2(1050*sizeof(C_word), 1);
+C_rereclaim2(1040*sizeof(C_word), 1);
t1=C_restore;}
a=C_alloc(3);
-C_initialize_lf(lf,117);
+C_initialize_lf(lf,116);
lf[1]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
lf[2]=C_h_intern(&lf[2],8,"identity");
lf[3]=C_h_intern(&lf[3],7,"project");
@@ -1595,118 +1595,117 @@ 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());
+lf[13]=C_h_intern(&lf[13],4,"noop");
+lf[14]=C_h_intern(&lf[14],19,"\003sysundefined-value");
+lf[15]=C_h_intern(&lf[15],4,"each");
+lf[16]=C_h_intern(&lf[16],4,"any\077");
+lf[17]=C_h_intern(&lf[17],5,"none\077");
+lf[18]=C_h_intern(&lf[18],7,"always\077");
+lf[19]=C_h_intern(&lf[19],6,"never\077");
+lf[20]=C_h_intern(&lf[20],12,"left-section");
+lf[21]=C_h_intern(&lf[21],10,"\003sysappend");
+lf[22]=C_h_intern(&lf[22],17,"\003syscheck-closure");
+lf[23]=C_h_intern(&lf[23],7,"reverse");
+lf[24]=C_h_intern(&lf[24],13,"right-section");
+lf[25]=C_h_intern(&lf[25],5,"atom\077");
+lf[26]=C_h_intern(&lf[26],5,"tail\077");
+lf[27]=C_h_intern(&lf[27],11,"intersperse");
+lf[28]=C_h_intern(&lf[28],7,"butlast");
+lf[29]=C_h_intern(&lf[29],7,"flatten");
+lf[30]=C_h_intern(&lf[30],4,"chop");
+lf[31]=C_h_intern(&lf[31],9,"\003syserror");
+lf[32]=C_decode_literal(C_heaptop,"\376B\000\000\030invalid numeric argument");
+lf[33]=C_h_intern(&lf[33],4,"join");
+lf[34]=C_h_intern(&lf[34],27,"\003syserror-not-a-proper-list");
+lf[35]=C_h_intern(&lf[35],8,"compress");
+lf[36]=C_decode_literal(C_heaptop,"\376B\000\000%bad argument type - not a proper list");
+lf[37]=C_h_intern(&lf[37],15,"\003syssignal-hook");
+lf[38]=C_h_intern(&lf[38],11,"\000type-error");
+lf[39]=C_h_intern(&lf[39],7,"shuffle");
+lf[40]=C_h_intern(&lf[40],3,"cdr");
+lf[41]=C_h_intern(&lf[41],5,"sort!");
+lf[42]=C_h_intern(&lf[42],13,"alist-update!");
+lf[43]=C_h_intern(&lf[43],3,"eq\077");
+lf[44]=C_h_intern(&lf[44],4,"assq");
+lf[45]=C_h_intern(&lf[45],4,"eqv\077");
+lf[46]=C_h_intern(&lf[46],4,"assv");
+lf[47]=C_h_intern(&lf[47],6,"equal\077");
+lf[48]=C_h_intern(&lf[48],5,"assoc");
+lf[49]=C_h_intern(&lf[49],9,"alist-ref");
+lf[50]=C_h_intern(&lf[50],6,"rassoc");
+lf[51]=C_h_intern(&lf[51],21,"reverse-string-append");
+lf[52]=C_h_intern(&lf[52],11,"make-string");
+lf[53]=C_h_intern(&lf[53],18,"open-output-string");
+lf[54]=C_h_intern(&lf[54],7,"display");
+lf[55]=C_h_intern(&lf[55],6,"string");
+lf[56]=C_h_intern(&lf[56],17,"get-output-string");
+lf[57]=C_h_intern(&lf[57],8,"->string");
+lf[58]=C_h_intern(&lf[58],14,"symbol->string");
+lf[59]=C_h_intern(&lf[59],18,"\003sysnumber->string");
+lf[60]=C_h_intern(&lf[60],13,"string-append");
+lf[61]=C_h_intern(&lf[61],4,"conc");
+lf[62]=C_h_intern(&lf[62],19,"\003syssubstring-index");
+lf[63]=C_h_intern(&lf[63],15,"substring-index");
+lf[64]=C_h_intern(&lf[64],22,"\003syssubstring-index-ci");
+lf[65]=C_h_intern(&lf[65],18,"substring-index-ci");
+lf[66]=C_h_intern(&lf[66],15,"string-compare3");
+lf[67]=C_h_intern(&lf[67],18,"string-compare3-ci");
+lf[68]=C_h_intern(&lf[68],15,"\003syssubstring=\077");
+lf[69]=C_h_intern(&lf[69],11,"substring=\077");
+lf[70]=C_h_intern(&lf[70],18,"\003syssubstring-ci=\077");
+lf[71]=C_h_intern(&lf[71],14,"substring-ci=\077");
+lf[72]=C_h_intern(&lf[72],12,"string-split");
+lf[73]=C_decode_literal(C_heaptop,"\376B\000\000\003\011\012 ");
+lf[74]=C_h_intern(&lf[74],13,"\003syssubstring");
+lf[75]=C_h_intern(&lf[75],18,"string-intersperse");
+lf[76]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[77]=C_h_intern(&lf[77],19,"\003sysallocate-vector");
+lf[78]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
+lf[79]=C_h_intern(&lf[79],12,"list->string");
+lf[80]=C_h_intern(&lf[80],16,"string-translate");
+lf[81]=C_decode_literal(C_heaptop,"\376B\000\000\037invalid translation destination");
+lf[82]=C_h_intern(&lf[82],17,"string-translate*");
+lf[83]=C_h_intern(&lf[83],21,"\003sysfragments->string");
+lf[84]=C_h_intern(&lf[84],11,"string-chop");
+lf[85]=C_h_intern(&lf[85],12,"string-chomp");
+lf[86]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
+lf[87]=C_h_intern(&lf[87],7,"sorted\077");
+lf[88]=C_h_intern(&lf[88],5,"merge");
+lf[89]=C_h_intern(&lf[89],6,"merge!");
+lf[90]=C_h_intern(&lf[90],12,"vector->list");
+lf[91]=C_h_intern(&lf[91],4,"sort");
+lf[92]=C_h_intern(&lf[92],12,"list->vector");
+lf[93]=C_h_intern(&lf[93],6,"append");
+lf[94]=C_h_intern(&lf[94],16,"topological-sort");
+lf[95]=C_h_intern(&lf[95],4,"caar");
+lf[96]=C_h_intern(&lf[96],4,"cdar");
+lf[97]=C_h_intern(&lf[97],7,"colored");
+lf[98]=C_h_intern(&lf[98],13,"binary-search");
+lf[99]=C_h_intern(&lf[99],10,"make-queue");
+lf[100]=C_h_intern(&lf[100],5,"queue");
+lf[101]=C_h_intern(&lf[101],6,"queue\077");
+lf[102]=C_h_intern(&lf[102],12,"queue-empty\077");
+lf[103]=C_h_intern(&lf[103],11,"queue-first");
+lf[104]=C_decode_literal(C_heaptop,"\376B\000\000\016queue is empty");
+lf[105]=C_h_intern(&lf[105],10,"queue-last");
+lf[106]=C_decode_literal(C_heaptop,"\376B\000\000\016queue is empty");
+lf[107]=C_h_intern(&lf[107],10,"queue-add!");
+lf[108]=C_h_intern(&lf[108],13,"queue-remove!");
+lf[109]=C_decode_literal(C_heaptop,"\376B\000\000\016queue is empty");
+lf[110]=C_h_intern(&lf[110],11,"queue->list");
+lf[111]=C_h_intern(&lf[111],11,"list->queue");
+lf[112]=C_h_intern(&lf[112],16,"queue-push-back!");
+lf[113]=C_h_intern(&lf[113],21,"queue-push-back-list!");
+lf[114]=C_h_intern(&lf[114],17,"register-feature!");
+lf[115]=C_h_intern(&lf[115],15,"data-structures");
+C_register_lf2(lf,116,create_ptable());
t2=C_mutate(&lf[0] /* (set! c326 ...) */,lf[1]);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1291,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1290,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* data-structures.scm: 72 register-feature! */
-((C_proc3)C_retrieve_proc(*((C_word*)lf[115]+1)))(3,*((C_word*)lf[115]+1),t3,lf[116]);}
+((C_proc3)C_retrieve_proc(*((C_word*)lf[114]+1)))(3,*((C_word*)lf[114]+1),t3,lf[115]);}
-/* k1289 */
-static void C_ccall f_1291(C_word c,C_word t0,C_word t1){
+/* k1288 */
+static void C_ccall f_1290(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1787,95 +1786,93 @@ 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));
+C_save_and_reclaim((void*)tr2,(void*)f_1290,2,t0,t1);}
+t2=C_mutate((C_word*)lf[2]+1 /* (set! identity ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1292,a[2]=((C_word)li0),tmp=(C_word)a,a+=3,tmp));
+t3=C_mutate((C_word*)lf[3]+1 /* (set! project ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1295,a[2]=((C_word)li2),tmp=(C_word)a,a+=3,tmp));
+t4=C_mutate((C_word*)lf[4]+1 /* (set! conjoin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1303,a[2]=((C_word)li5),tmp=(C_word)a,a+=3,tmp));
+t5=C_mutate((C_word*)lf[5]+1 /* (set! disjoin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1336,a[2]=((C_word)li8),tmp=(C_word)a,a+=3,tmp));
+t6=C_mutate((C_word*)lf[6]+1 /* (set! constantly ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1373,a[2]=((C_word)li11),tmp=(C_word)a,a+=3,tmp));
+t7=C_mutate((C_word*)lf[7]+1 /* (set! flip ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1396,a[2]=((C_word)li13),tmp=(C_word)a,a+=3,tmp));
+t8=C_mutate((C_word*)lf[8]+1 /* (set! complement ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1404,a[2]=((C_word)li15),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[9]+1 /* (set! compose ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1416,a[2]=((C_word)li19),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate((C_word*)lf[11]+1 /* (set! o ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1452,a[2]=((C_word)li22),tmp=(C_word)a,a+=3,tmp));
+t11=C_mutate((C_word*)lf[12]+1 /* (set! list-of? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1491,a[2]=((C_word)li25),tmp=(C_word)a,a+=3,tmp));
+t12=C_mutate((C_word*)lf[13]+1 /* (set! noop ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1531,a[2]=((C_word)li26),tmp=(C_word)a,a+=3,tmp));
+t13=C_mutate((C_word*)lf[15]+1 /* (set! each ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1537,a[2]=((C_word)li30),tmp=(C_word)a,a+=3,tmp));
+t14=C_mutate((C_word*)lf[16]+1 /* (set! any? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1593,a[2]=((C_word)li31),tmp=(C_word)a,a+=3,tmp));
+t15=C_mutate((C_word*)lf[17]+1 /* (set! none? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1596,a[2]=((C_word)li32),tmp=(C_word)a,a+=3,tmp));
+t16=C_mutate((C_word*)lf[18]+1 /* (set! always? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1599,a[2]=((C_word)li33),tmp=(C_word)a,a+=3,tmp));
+t17=C_mutate((C_word*)lf[19]+1 /* (set! never? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1602,a[2]=((C_word)li34),tmp=(C_word)a,a+=3,tmp));
+t18=C_mutate((C_word*)lf[20]+1 /* (set! left-section ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1605,a[2]=((C_word)li36),tmp=(C_word)a,a+=3,tmp));
+t19=*((C_word*)lf[23]+1);
+t20=C_mutate((C_word*)lf[24]+1 /* (set! right-section ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1620,a[2]=t19,a[3]=((C_word)li38),tmp=(C_word)a,a+=4,tmp));
+t21=C_mutate((C_word*)lf[25]+1 /* (set! atom? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1646,a[2]=((C_word)li39),tmp=(C_word)a,a+=3,tmp));
+t22=C_mutate((C_word*)lf[26]+1 /* (set! tail? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1649,a[2]=((C_word)li41),tmp=(C_word)a,a+=3,tmp));
+t23=C_mutate((C_word*)lf[27]+1 /* (set! intersperse ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1677,a[2]=((C_word)li43),tmp=(C_word)a,a+=3,tmp));
+t24=C_mutate((C_word*)lf[28]+1 /* (set! butlast ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1710,a[2]=((C_word)li45),tmp=(C_word)a,a+=3,tmp));
+t25=C_mutate((C_word*)lf[29]+1 /* (set! flatten ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1742,a[2]=((C_word)li47),tmp=(C_word)a,a+=3,tmp));
+t26=*((C_word*)lf[23]+1);
+t27=C_mutate((C_word*)lf[30]+1 /* (set! chop ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1783,a[2]=t26,a[3]=((C_word)li50),tmp=(C_word)a,a+=4,tmp));
+t28=C_mutate((C_word*)lf[33]+1 /* (set! join ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1868,a[2]=((C_word)li52),tmp=(C_word)a,a+=3,tmp));
+t29=C_mutate((C_word*)lf[35]+1 /* (set! compress ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1927,a[2]=((C_word)li54),tmp=(C_word)a,a+=3,tmp));
+t30=C_mutate((C_word*)lf[39]+1 /* (set! shuffle ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2007,a[2]=((C_word)li59),tmp=(C_word)a,a+=3,tmp));
+t31=C_mutate((C_word*)lf[42]+1 /* (set! alist-update! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2117,a[2]=((C_word)li62),tmp=(C_word)a,a+=3,tmp));
+t32=C_mutate((C_word*)lf[49]+1 /* (set! alist-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2216,a[2]=((C_word)li68),tmp=(C_word)a,a+=3,tmp));
+t33=C_mutate((C_word*)lf[50]+1 /* (set! rassoc ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2340,a[2]=((C_word)li70),tmp=(C_word)a,a+=3,tmp));
+t34=C_mutate((C_word*)lf[51]+1 /* (set! reverse-string-append ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2390,a[2]=((C_word)li73),tmp=(C_word)a,a+=3,tmp));
+t35=*((C_word*)lf[53]+1);
t36=*((C_word*)lf[54]+1);
t37=*((C_word*)lf[55]+1);
t38=*((C_word*)lf[56]+1);
-t39=*((C_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){
+t39=C_mutate((C_word*)lf[57]+1 /* (set! ->string ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2467,a[2]=t35,a[3]=t36,a[4]=t38,a[5]=t37,a[6]=((C_word)li74),tmp=(C_word)a,a+=7,tmp));
+t40=*((C_word*)lf[60]+1);
+t41=C_mutate((C_word*)lf[61]+1 /* (set! conc ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2512,a[2]=t40,a[3]=((C_word)li76),tmp=(C_word)a,a+=4,tmp));
+t42=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2557,a[2]=((C_word)li78),tmp=(C_word)a,a+=3,tmp);
+t43=C_mutate((C_word*)lf[62]+1 /* (set! substring-index ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2604,a[2]=t42,a[3]=((C_word)li80),tmp=(C_word)a,a+=4,tmp));
+t44=C_mutate((C_word*)lf[64]+1 /* (set! substring-index-ci ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2613,a[2]=t42,a[3]=((C_word)li82),tmp=(C_word)a,a+=4,tmp));
+t45=C_mutate((C_word*)lf[63]+1 /* (set! substring-index ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2622,a[2]=((C_word)li83),tmp=(C_word)a,a+=3,tmp));
+t46=C_mutate((C_word*)lf[65]+1 /* (set! substring-index-ci ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2650,a[2]=((C_word)li84),tmp=(C_word)a,a+=3,tmp));
+t47=C_mutate((C_word*)lf[66]+1 /* (set! string-compare3 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2678,a[2]=((C_word)li85),tmp=(C_word)a,a+=3,tmp));
+t48=C_mutate((C_word*)lf[67]+1 /* (set! string-compare3-ci ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2709,a[2]=((C_word)li86),tmp=(C_word)a,a+=3,tmp));
+t49=C_mutate((C_word*)lf[68]+1 /* (set! substring=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2740,a[2]=((C_word)li87),tmp=(C_word)a,a+=3,tmp));
+t50=C_mutate((C_word*)lf[69]+1 /* (set! substring=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2777,a[2]=((C_word)li92),tmp=(C_word)a,a+=3,tmp));
+t51=C_mutate((C_word*)lf[70]+1 /* (set! substring-ci=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2857,a[2]=((C_word)li93),tmp=(C_word)a,a+=3,tmp));
+t52=C_mutate((C_word*)lf[71]+1 /* (set! substring-ci=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2894,a[2]=((C_word)li98),tmp=(C_word)a,a+=3,tmp));
+t53=C_mutate((C_word*)lf[72]+1 /* (set! string-split ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2974,a[2]=((C_word)li102),tmp=(C_word)a,a+=3,tmp));
+t54=C_mutate((C_word*)lf[75]+1 /* (set! string-intersperse ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3109,a[2]=((C_word)li105),tmp=(C_word)a,a+=3,tmp));
+t55=*((C_word*)lf[52]+1);
+t56=*((C_word*)lf[79]+1);
+t57=C_mutate((C_word*)lf[80]+1 /* (set! string-translate ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3224,a[2]=t56,a[3]=t55,a[4]=((C_word)li111),tmp=(C_word)a,a+=5,tmp));
+t58=C_mutate((C_word*)lf[82]+1 /* (set! string-translate* ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3426,a[2]=((C_word)li114),tmp=(C_word)a,a+=3,tmp));
+t59=C_mutate((C_word*)lf[84]+1 /* (set! string-chop ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3548,a[2]=((C_word)li116),tmp=(C_word)a,a+=3,tmp));
+t60=C_mutate((C_word*)lf[85]+1 /* (set! string-chomp ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3612,a[2]=((C_word)li117),tmp=(C_word)a,a+=3,tmp));
+t61=C_mutate((C_word*)lf[87]+1 /* (set! sorted? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3664,a[2]=((C_word)li120),tmp=(C_word)a,a+=3,tmp));
+t62=C_mutate((C_word*)lf[88]+1 /* (set! merge ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3773,a[2]=((C_word)li122),tmp=(C_word)a,a+=3,tmp));
+t63=C_mutate((C_word*)lf[89]+1 /* (set! merge! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3872,a[2]=((C_word)li124),tmp=(C_word)a,a+=3,tmp));
+t64=C_mutate((C_word*)lf[41]+1 /* (set! sort! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4004,a[2]=((C_word)li127),tmp=(C_word)a,a+=3,tmp));
+t65=C_mutate((C_word*)lf[91]+1 /* (set! sort ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4137,a[2]=((C_word)li128),tmp=(C_word)a,a+=3,tmp));
+t66=C_mutate((C_word*)lf[94]+1 /* (set! topological-sort ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4164,a[2]=((C_word)li140),tmp=(C_word)a,a+=3,tmp));
+t67=*((C_word*)lf[92]+1);
+t68=C_mutate((C_word*)lf[98]+1 /* (set! binary-search ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4427,a[2]=t67,a[3]=((C_word)li142),tmp=(C_word)a,a+=4,tmp));
+t69=C_mutate((C_word*)lf[99]+1 /* (set! make-queue ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4510,a[2]=((C_word)li143),tmp=(C_word)a,a+=3,tmp));
+t70=C_mutate((C_word*)lf[101]+1 /* (set! queue? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4516,a[2]=((C_word)li144),tmp=(C_word)a,a+=3,tmp));
+t71=C_mutate((C_word*)lf[102]+1 /* (set! queue-empty? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4522,a[2]=((C_word)li145),tmp=(C_word)a,a+=3,tmp));
+t72=C_mutate((C_word*)lf[103]+1 /* (set! queue-first ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4535,a[2]=((C_word)li146),tmp=(C_word)a,a+=3,tmp));
+t73=C_mutate((C_word*)lf[105]+1 /* (set! queue-last ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4556,a[2]=((C_word)li147),tmp=(C_word)a,a+=3,tmp));
+t74=C_mutate((C_word*)lf[107]+1 /* (set! queue-add! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4577,a[2]=((C_word)li148),tmp=(C_word)a,a+=3,tmp));
+t75=C_mutate((C_word*)lf[108]+1 /* (set! queue-remove! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4609,a[2]=((C_word)li149),tmp=(C_word)a,a+=3,tmp));
+t76=C_mutate((C_word*)lf[110]+1 /* (set! queue->list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4645,a[2]=((C_word)li150),tmp=(C_word)a,a+=3,tmp));
+t77=C_mutate((C_word*)lf[111]+1 /* (set! list->queue ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4654,a[2]=((C_word)li152),tmp=(C_word)a,a+=3,tmp));
+t78=C_mutate((C_word*)lf[112]+1 /* (set! queue-push-back! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4708,a[2]=((C_word)li153),tmp=(C_word)a,a+=3,tmp));
+t79=C_mutate((C_word*)lf[113]+1 /* (set! queue-push-back-list! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4737,a[2]=((C_word)li155),tmp=(C_word)a,a+=3,tmp));
+t80=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t80+1)))(2,t80,C_SCHEME_UNDEFINED);}
+
+/* queue-push-back-list! in k1288 */
+static void C_ccall f_4737(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -1886,17 +1883,17 @@ 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);
+C_save_and_reclaim((void*)tr4,(void*)f_4737,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_structure_2(t2,lf[100],lf[113]);
+t5=(C_word)C_i_check_list_2(t3,lf[113]);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4747,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
t7=(C_word)C_slot(t2,C_fix(1));
-/* data-structures.scm: 954 append */
-t8=*((C_word*)lf[94]+1);
+/* data-structures.scm: 952 append */
+t8=*((C_word*)lf[93]+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){
+/* k4745 in queue-push-back-list! in k1288 */
+static void C_ccall f_4747(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1908,7 +1905,7 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4747,2,t0,t1);}
t2=(C_word)C_eqp(t1,C_SCHEME_END_OF_LIST);
if(C_truep(t2)){
t3=(C_word)C_i_setslot(((C_word*)t0)[3],C_fix(1),t1);
@@ -1916,14 +1913,14 @@ 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);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4766,a[2]=((C_word)li154),tmp=(C_word)a,a+=3,tmp);
+t5=f_4766(t3);
t6=(C_word)C_i_setslot(((C_word*)t0)[3],C_fix(1),t1);
t7=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_i_setslot(((C_word*)t0)[3],C_fix(2),t5));}}
-/* doloop1207 in k4747 in queue-push-back-list! in k1289 */
-static C_word C_fcall f_4768(C_word t1){
+/* doloop1207 in k4745 in queue-push-back-list! in k1288 */
+static C_word C_fcall f_4766(C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -1944,8 +1941,8 @@ 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){
+/* queue-push-back! in k1288 */
+static void C_ccall f_4708(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -1959,8 +1956,8 @@ 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]);
+C_save_and_reclaim((void*)tr4,(void*)f_4708,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_structure_2(t2,lf[100],lf[112]);
t5=(C_word)C_slot(t2,C_fix(1));
t6=(C_word)C_a_i_cons(&a,2,t3,t5);
t7=(C_word)C_i_setslot(t2,C_fix(1),t6);
@@ -1974,8 +1971,8 @@ 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){
+/* list->queue in k1288 */
+static void C_ccall f_4654(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -1988,22 +1985,22 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_4654,3,t0,t1,t2);}
+t3=(C_word)C_i_check_list_2(t2,lf[111]);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4665,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t5=(C_word)C_eqp(t2,C_SCHEME_END_OF_LIST);
if(C_truep(t5)){
t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,3,lf[101],t2,C_SCHEME_END_OF_LIST));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,3,lf[100],t2,C_SCHEME_END_OF_LIST));}
else{
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4675,a[2]=t2,a[3]=t7,a[4]=((C_word)li151),tmp=(C_word)a,a+=5,tmp));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4673,a[2]=t2,a[3]=t7,a[4]=((C_word)li151),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
-f_4675(t9,t4,t2);}}
+f_4673(t9,t4,t2);}}
-/* doloop1178 in list->queue in k1289 */
-static void C_fcall f_4675(C_word t0,C_word t1,C_word t2){
+/* doloop1178 in list->queue in k1288 */
+static void C_fcall f_4673(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2020,7 +2017,7 @@ 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);}
+C_save_and_reclaim((void*)trf_4673,NULL,3,t0,t1,t2);}
t3=(C_word)C_slot(t2,C_fix(1));
t4=(C_word)C_eqp(t3,C_SCHEME_END_OF_LIST);
if(C_truep(t4)){
@@ -2028,13 +2025,13 @@ 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);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4683,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t6=(C_word)C_i_not((C_word)C_blockp(t2));
t7=(C_truep(t6)?t6:(C_word)C_i_not((C_word)C_pairp(t2)));
if(C_truep(t7)){
-/* data-structures.scm: 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]);}
+/* data-structures.scm: 928 ##sys#error-not-a-proper-list */
+t8=*((C_word*)lf[34]+1);
+((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t5,((C_word*)t0)[2],lf[111]);}
else{
t8=(C_word)C_slot(t2,C_fix(1));
t11=t1;
@@ -2043,29 +2040,29 @@ 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){
+/* k4681 in doloop1178 in list->queue in k1288 */
+static void C_ccall f_4683(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
t3=((C_word*)((C_word*)t0)[3])[1];
-f_4675(t3,((C_word*)t0)[2],t2);}
+f_4673(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){
+/* k4663 in list->queue in k1288 */
+static void C_ccall f_4665(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4667,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_4665,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_record(&a,3,lf[101],((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_record(&a,3,lf[100],((C_word*)t0)[2],t1));}
-/* queue->list in k1289 */
-static void C_ccall f_4647(C_word c,C_word t0,C_word t1,C_word t2){
+/* queue->list in k1288 */
+static void C_ccall f_4645(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2073,13 +2070,13 @@ 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]);
+C_save_and_reclaim((void*)tr3,(void*)f_4645,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure_2(t2,lf[100],lf[110]);
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_slot(t2,C_fix(1)));}
-/* queue-remove! in k1289 */
-static void C_ccall f_4611(C_word c,C_word t0,C_word t1,C_word t2){
+/* queue-remove! in k1288 */
+static void C_ccall f_4609(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2090,21 +2087,21 @@ 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]);
+C_save_and_reclaim((void*)tr3,(void*)f_4609,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure_2(t2,lf[100],lf[108]);
t4=(C_word)C_slot(t2,C_fix(1));
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4621,a[2]=t1,a[3]=t2,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4619,a[2]=t1,a[3]=t2,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
t6=(C_word)C_eqp(C_SCHEME_END_OF_LIST,t4);
if(C_truep(t6)){
-/* data-structures.scm: 908 ##sys#error */
-t7=*((C_word*)lf[32]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[109],lf[110],t2);}
+/* data-structures.scm: 906 ##sys#error */
+t7=*((C_word*)lf[31]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[108],lf[109],t2);}
else{
t7=t5;
-f_4621(2,t7,C_SCHEME_UNDEFINED);}}
+f_4619(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){
+/* k4617 in queue-remove! in k1288 */
+static void C_ccall f_4619(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2123,8 +2120,8 @@ 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){
+/* queue-add! in k1288 */
+static void C_ccall f_4577(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -2140,8 +2137,8 @@ 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]);
+C_save_and_reclaim((void*)tr4,(void*)f_4577,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_structure_2(t2,lf[100],lf[107]);
t5=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
t6=(C_word)C_slot(t2,C_fix(1));
t7=(C_word)C_eqp(C_SCHEME_END_OF_LIST,t6);
@@ -2157,8 +2154,8 @@ 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){
+/* queue-last in k1288 */
+static void C_ccall f_4556(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2169,29 +2166,29 @@ 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]);
+C_save_and_reclaim((void*)tr3,(void*)f_4556,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure_2(t2,lf[100],lf[105]);
t4=(C_word)C_slot(t2,C_fix(2));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4568,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4566,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t6=(C_word)C_eqp(C_SCHEME_END_OF_LIST,t4);
if(C_truep(t6)){
-/* data-structures.scm: 889 ##sys#error */
-t7=*((C_word*)lf[32]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[106],lf[107],t2);}
+/* data-structures.scm: 887 ##sys#error */
+t7=*((C_word*)lf[31]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[105],lf[106],t2);}
else{
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_slot(t4,C_fix(0)));}}
-/* k4566 in queue-last in k1289 */
-static void C_ccall f_4568(C_word c,C_word t0,C_word t1){
+/* k4564 in queue-last in k1288 */
+static void C_ccall f_4566(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_slot(((C_word*)t0)[2],C_fix(0)));}
-/* queue-first in k1289 */
-static void C_ccall f_4537(C_word c,C_word t0,C_word t1,C_word t2){
+/* queue-first in k1288 */
+static void C_ccall f_4535(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2202,29 +2199,29 @@ 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]);
+C_save_and_reclaim((void*)tr3,(void*)f_4535,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure_2(t2,lf[100],lf[103]);
t4=(C_word)C_slot(t2,C_fix(1));
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4547,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4545,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t6=(C_word)C_eqp(C_SCHEME_END_OF_LIST,t4);
if(C_truep(t6)){
-/* data-structures.scm: 878 ##sys#error */
-t7=*((C_word*)lf[32]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[104],lf[105],t2);}
+/* data-structures.scm: 876 ##sys#error */
+t7=*((C_word*)lf[31]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[103],lf[104],t2);}
else{
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_slot(t4,C_fix(0)));}}
-/* k4545 in queue-first in k1289 */
-static void C_ccall f_4547(C_word c,C_word t0,C_word t1){
+/* k4543 in queue-first in k1288 */
+static void C_ccall f_4545(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_slot(((C_word*)t0)[2],C_fix(0)));}
-/* queue-empty? in k1289 */
-static void C_ccall f_4524(C_word c,C_word t0,C_word t1,C_word t2){
+/* queue-empty? in k1288 */
+static void C_ccall f_4522(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2233,38 +2230,38 @@ 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]);
+C_save_and_reclaim((void*)tr3,(void*)f_4522,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure_2(t2,lf[100],lf[102]);
t4=(C_word)C_slot(t2,C_fix(1));
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_eqp(C_SCHEME_END_OF_LIST,t4));}
-/* queue? in k1289 */
-static void C_ccall f_4518(C_word c,C_word t0,C_word t1,C_word t2){
+/* queue? in k1288 */
+static void C_ccall f_4516(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_4518,3,t0,t1,t2);}
+C_save_and_reclaim((void*)tr3,(void*)f_4516,3,t0,t1,t2);}
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_structurep(t2,lf[101]));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_structurep(t2,lf[100]));}
-/* make-queue in k1289 */
-static void C_ccall f_4512(C_word c,C_word t0,C_word t1){
+/* make-queue in k1288 */
+static void C_ccall f_4510(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[4],*a=ab;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_4512,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_4510,2,t0,t1);}
t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_record(&a,3,lf[101],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_record(&a,3,lf[100],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST));}
-/* binary-search in k1289 */
-static void C_ccall f_4429(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
+/* binary-search in k1288 */
+static void C_ccall f_4427(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -2274,30 +2271,30 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_4427,4,t0,t1,t2,t3);}
t4=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4433,a[2]=t1,a[3]=t3,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4431,a[2]=t1,a[3]=t3,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
if(C_truep((C_word)C_i_pairp(((C_word*)t4)[1]))){
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4507,a[2]=t5,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 835 list->vector */
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4505,a[2]=t5,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 833 list->vector */
t7=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t7))(3,t7,t6,((C_word*)t4)[1]);}
else{
t6=t5;
-f_4433(t6,(C_word)C_i_check_vector_2(((C_word*)t4)[1],lf[99]));}}
+f_4431(t6,(C_word)C_i_check_vector_2(((C_word*)t4)[1],lf[98]));}}
-/* k4505 in binary-search in k1289 */
-static void C_ccall f_4507(C_word c,C_word t0,C_word t1){
+/* k4503 in binary-search in k1288 */
+static void C_ccall f_4505(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
t3=((C_word*)t0)[2];
-f_4433(t3,t2);}
+f_4431(t3,t2);}
-/* k4431 in binary-search in k1289 */
-static void C_fcall f_4433(C_word t0,C_word t1){
+/* k4429 in binary-search in k1288 */
+static void C_fcall f_4431(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2307,20 +2304,20 @@ 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);}
+C_save_and_reclaim((void*)trf_4431,NULL,2,t0,t1);}
t2=(C_word)C_block_size(((C_word*)((C_word*)t0)[4])[1]);
if(C_truep((C_word)C_fixnum_greaterp(t2,C_fix(0)))){
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4445,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=((C_word*)t0)[4],a[5]=((C_word)li141),tmp=(C_word)a,a+=6,tmp));
t6=((C_word*)t4)[1];
-f_4447(t6,((C_word*)t0)[2],C_fix(0),t2);}
+f_4445(t6,((C_word*)t0)[2],C_fix(0),t2);}
else{
t3=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-/* loop in k4431 in binary-search in k1289 */
-static void C_fcall f_4447(C_word t0,C_word t1,C_word t2,C_word t3){
+/* loop in k4429 in binary-search in k1288 */
+static void C_fcall f_4445(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -2331,18 +2328,18 @@ 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);}
+C_save_and_reclaim((void*)trf_4445,NULL,4,t0,t1,t2,t3);}
t4=(C_word)C_fixnum_difference(t3,t2);
t5=(C_word)C_fixnum_divide(t4,C_fix(2));
t6=(C_word)C_fixnum_plus(t2,t5);
t7=(C_word)C_slot(((C_word*)((C_word*)t0)[4])[1],t6);
-t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4455,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t6,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+/* data-structures.scm: 841 proc */
t9=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t9))(3,t9,t8,t7);}
-/* 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){
+/* k4453 in loop in k4429 in binary-search in k1288 */
+static void C_ccall f_4455(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2360,21 +2357,21 @@ 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 */
+/* data-structures.scm: 843 loop */
t4=((C_word*)((C_word*)t0)[3])[1];
-f_4447(t4,((C_word*)t0)[6],((C_word*)t0)[2],((C_word*)t0)[5]);}}
+f_4445(t4,((C_word*)t0)[6],((C_word*)t0)[2],((C_word*)t0)[5]);}}
else{
t3=(C_word)C_eqp(((C_word*)t0)[2],((C_word*)t0)[5]);
if(C_truep(t3)){
t4=((C_word*)t0)[6];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}
else{
-/* data-structures.scm: 846 loop */
+/* data-structures.scm: 844 loop */
t4=((C_word*)((C_word*)t0)[3])[1];
-f_4447(t4,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4]);}}}}
+f_4445(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){
+/* topological-sort in k1288 */
+static void C_ccall f_4164(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -2399,7 +2396,7 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_4164,4,t0,t1,t2,t3);}
if(C_truep((C_word)C_i_nullp(t2))){
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
@@ -2414,19 +2411,19 @@ 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);
+t14=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4173,a[2]=t3,a[3]=t5,a[4]=((C_word)li130),tmp=(C_word)a,a+=5,tmp));
+t15=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4220,a[2]=t5,a[3]=t3,a[4]=((C_word)li132),tmp=(C_word)a,a+=5,tmp));
+t16=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4255,a[2]=t9,a[3]=t11,a[4]=t13,a[5]=t7,a[6]=((C_word)li135),tmp=(C_word)a,a+=7,tmp));
+t17=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4314,a[2]=t11,a[3]=t13,a[4]=t2,a[5]=t1,a[6]=t7,tmp=(C_word)a,a+=7,tmp);
t18=(C_word)C_i_cdr(t2);
t19=C_SCHEME_UNDEFINED;
t20=(*a=C_VECTOR_TYPE|1,a[1]=t19,tmp=(C_word)a,a+=2,tmp);
-t21=C_set_block_item(t20,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4393,a[2]=t20,a[3]=t9,a[4]=((C_word)li139),tmp=(C_word)a,a+=5,tmp));
+t21=C_set_block_item(t20,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4391,a[2]=t20,a[3]=t9,a[4]=((C_word)li139),tmp=(C_word)a,a+=5,tmp));
t22=((C_word*)t20)[1];
-f_4393(t22,t17,t18);}}
+f_4391(t22,t17,t18);}}
-/* loop1015 in topological-sort in k1289 */
-static void C_fcall f_4393(C_word t0,C_word t1,C_word t2){
+/* loop1015 in topological-sort in k1288 */
+static void C_fcall f_4391(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2436,31 +2433,31 @@ 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);}
+C_save_and_reclaim((void*)trf_4391,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4399,a[2]=((C_word*)t0)[3],a[3]=((C_word)li138),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4414,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
/* g10701071 */
t6=t3;
-f_4401(t6,t4,t5);}
+f_4399(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){
+/* k4412 in loop1015 in topological-sort in k1288 */
+static void C_ccall f_4414(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
t3=((C_word*)((C_word*)t0)[3])[1];
-f_4393(t3,((C_word*)t0)[2],t2);}
+f_4391(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){
+/* g1070 in loop1015 in topological-sort in k1288 */
+static void C_fcall f_4399(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2468,15 +2465,15 @@ 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);}
+C_save_and_reclaim((void*)trf_4399,NULL,3,t0,t1,t2);}
t3=(C_word)C_i_car(t2);
t4=(C_word)C_i_cdr(t2);
-/* data-structures.scm: 817 insert */
+/* data-structures.scm: 815 insert */
t5=((C_word*)((C_word*)t0)[2])[1];
-f_4175(t5,t1,t3,t4);}
+f_4173(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){
+/* k4312 in topological-sort in k1288 */
+static void C_ccall f_4314(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2484,38 +2481,38 @@ 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_save_and_reclaim((void*)tr2,(void*)f_4314,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4317,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4381,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 818 caar */
+t4=*((C_word*)lf[95]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[4]);}
-/* k4381 in k4314 in topological-sort in k1289 */
-static void C_ccall f_4383(C_word c,C_word t0,C_word t1){
+/* k4379 in k4312 in topological-sort in k1288 */
+static void C_ccall f_4381(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_4381,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4385,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 818 cdar */
+t3=*((C_word*)lf[96]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k4383 in k4379 in k4312 in topological-sort in k1288 */
+static void C_ccall f_4385(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 820 visit */
+/* data-structures.scm: 818 visit */
t2=((C_word*)((C_word*)t0)[4])[1];
-f_4257(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+f_4255(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){
+/* k4315 in k4312 in topological-sort in k1288 */
+static void C_ccall f_4317(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2526,17 +2523,17 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4317,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4320,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4326,a[2]=t5,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word)li137),tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
-f_4328(t7,t2,t3);}
+f_4326(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){
+/* loop1077 in k4315 in k4312 in topological-sort in k1288 */
+static void C_fcall f_4326(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2546,31 +2543,31 @@ 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);}
+C_save_and_reclaim((void*)trf_4326,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4334,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li136),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4366,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
/* g10841085 */
t6=t3;
-f_4336(t6,t4,t5);}
+f_4334(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){
+/* k4364 in loop1077 in k4315 in k4312 in topological-sort in k1288 */
+static void C_ccall f_4366(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
t3=((C_word*)((C_word*)t0)[3])[1];
-f_4328(t3,((C_word*)t0)[2],t2);}
+f_4326(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){
+/* g1084 in loop1077 in k4315 in k4312 in topological-sort in k1288 */
+static void C_fcall f_4334(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2578,15 +2575,15 @@ 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);
+C_save_and_reclaim((void*)trf_4334,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4338,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
t4=(C_word)C_i_car(t2);
-/* data-structures.scm: 822 lookup */
+/* data-structures.scm: 820 lookup */
t5=((C_word*)((C_word*)t0)[2])[1];
-f_4222(t5,t3,t4);}
+f_4220(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){
+/* k4336 in g1084 in loop1077 in k4315 in k4312 in topological-sort in k1288 */
+static void C_ccall f_4338(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2594,7 +2591,7 @@ C_word t4;
C_word t5;
C_word t6;
C_word *a;
-t2=(C_word)C_eqp(t1,lf[98]);
+t2=(C_word)C_eqp(t1,lf[97]);
if(C_truep(t2)){
t3=C_SCHEME_UNDEFINED;
t4=((C_word*)t0)[4];
@@ -2602,12 +2599,12 @@ t4=((C_word*)t0)[4];
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 */
+/* data-structures.scm: 822 visit */
t5=((C_word*)((C_word*)t0)[2])[1];
-f_4257(t5,((C_word*)t0)[4],t3,t4);}}
+f_4255(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){
+/* k4318 in k4315 in k4312 in topological-sort in k1288 */
+static void C_ccall f_4320(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2616,22 +2613,22 @@ 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){
+/* visit in topological-sort in k1288 */
+static void C_fcall f_4255(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[8],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_4255,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4259,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
+/* data-structures.scm: 803 insert */
t5=((C_word*)((C_word*)t0)[2])[1];
-f_4175(t5,t4,t2,lf[98]);}
+f_4173(t5,t4,t2,lf[97]);}
-/* k4259 in visit in topological-sort in k1289 */
-static void C_ccall f_4261(C_word c,C_word t0,C_word t1){
+/* k4257 in visit in topological-sort in k1288 */
+static void C_ccall f_4259(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2641,16 +2638,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_4259,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4262,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4268,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word)li134),tmp=(C_word)a,a+=6,tmp));
t6=((C_word*)t4)[1];
-f_4270(t6,t2,((C_word*)t0)[2]);}
+f_4268(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){
+/* loop1048 in k4257 in visit in topological-sort in k1288 */
+static void C_fcall f_4268(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2660,52 +2657,52 @@ 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);}
+C_save_and_reclaim((void*)trf_4268,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4276,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li133),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4300,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
/* g10551056 */
t6=t3;
-f_4278(t6,t4,t5);}
+f_4276(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){
+/* k4298 in loop1048 in k4257 in visit in topological-sort in k1288 */
+static void C_ccall f_4300(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
t3=((C_word*)((C_word*)t0)[3])[1];
-f_4270(t3,((C_word*)t0)[2],t2);}
+f_4268(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){
+/* g1055 in loop1048 in k4257 in visit in topological-sort in k1288 */
+static void C_fcall f_4276(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_4276,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4280,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 806 lookup */
t4=((C_word*)((C_word*)t0)[2])[1];
-f_4222(t4,t3,t2);}
+f_4220(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){
+/* k4278 in g1055 in loop1048 in k4257 in visit in topological-sort in k1288 */
+static void C_ccall f_4280(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
-t2=(C_word)C_eqp(t1,lf[98]);
+t2=(C_word)C_eqp(t1,lf[97]);
if(C_truep(t2)){
t3=C_SCHEME_UNDEFINED;
t4=((C_word*)t0)[4];
@@ -2713,16 +2710,16 @@ t4=((C_word*)t0)[4];
else{
if(C_truep(t1)){
t3=t1;
-/* data-structures.scm: 810 visit */
+/* data-structures.scm: 808 visit */
t4=((C_word*)((C_word*)t0)[3])[1];
-f_4257(t4,((C_word*)t0)[4],((C_word*)t0)[2],t3);}
+f_4255(t4,((C_word*)t0)[4],((C_word*)t0)[2],t3);}
else{
-/* data-structures.scm: 810 visit */
+/* data-structures.scm: 808 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);}}}
+f_4255(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){
+/* k4260 in k4257 in visit in topological-sort in k1288 */
+static void C_ccall f_4262(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2730,14 +2727,14 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4262,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)((C_word*)t0)[3])[1]);
t3=C_mutate(((C_word *)((C_word*)t0)[3])+1,t2);
t4=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
-/* lookup in topological-sort in k1289 */
-static void C_fcall f_4222(C_word t0,C_word t1,C_word t2){
+/* lookup in topological-sort in k1288 */
+static void C_fcall f_4220(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2746,15 +2743,15 @@ 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);}
+C_save_and_reclaim((void*)trf_4220,NULL,3,t0,t1,t2);}
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4226,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t4,a[5]=((C_word)li131),tmp=(C_word)a,a+=6,tmp));
t6=((C_word*)t4)[1];
-f_4228(t6,t1,((C_word*)((C_word*)t0)[2])[1]);}
+f_4226(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){
+/* loop in lookup in topological-sort in k1288 */
+static void C_fcall f_4226(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2762,44 +2759,44 @@ 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);}
+C_save_and_reclaim((void*)trf_4226,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_nullp(t2))){
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4239,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4253,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 798 caar */
+t5=*((C_word*)lf[95]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}
-/* 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){
+/* k4251 in loop in lookup in topological-sort in k1288 */
+static void C_ccall f_4253(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 800 pred */
+/* data-structures.scm: 798 pred */
t2=((C_word*)t0)[4];
((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k4237 in loop in lookup in topological-sort in k1288 */
+static void C_ccall f_4239(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(C_truep(t1)){
-/* data-structures.scm: 800 cdar */
-t2=*((C_word*)lf[97]+1);
+/* data-structures.scm: 798 cdar */
+t2=*((C_word*)lf[96]+1);
((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[4],((C_word*)t0)[3]);}
else{
t2=(C_word)C_i_cdr(((C_word*)t0)[3]);
-/* data-structures.scm: 801 loop */
+/* data-structures.scm: 799 loop */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_4228(t3,((C_word*)t0)[4],t2);}}
+f_4226(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){
+/* insert in topological-sort in k1288 */
+static void C_fcall f_4173(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -2808,15 +2805,15 @@ 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);}
+C_save_and_reclaim((void*)trf_4173,NULL,4,t0,t1,t2,t3);}
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4179,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t2,a[7]=((C_word)li129),tmp=(C_word)a,a+=8,tmp));
t7=((C_word*)t5)[1];
-f_4181(t7,t1,((C_word*)((C_word*)t0)[3])[1]);}
+f_4179(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){
+/* loop in insert in topological-sort in k1288 */
+static void C_fcall f_4179(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -2827,7 +2824,7 @@ 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);}
+C_save_and_reclaim((void*)trf_4179,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_nullp(t2))){
t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],((C_word*)t0)[5]);
t4=(C_word)C_a_i_cons(&a,2,t3,((C_word*)((C_word*)t0)[4])[1]);
@@ -2835,23 +2832,23 @@ 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);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4200,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4218,a[2]=((C_word*)t0)[6],a[3]=t3,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 792 caar */
+t5=*((C_word*)lf[95]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}
-/* 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){
+/* k4216 in loop in insert in topological-sort in k1288 */
+static void C_ccall f_4218(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 794 pred */
+/* data-structures.scm: 792 pred */
t2=((C_word*)t0)[4];
((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k4198 in loop in insert in topological-sort in k1288 */
+static void C_ccall f_4200(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2863,12 +2860,12 @@ 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 */
+/* data-structures.scm: 793 loop */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_4181(t3,((C_word*)t0)[4],t2);}}
+f_4179(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){
+/* sort in k1288 */
+static void C_ccall f_4137(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -2878,48 +2875,48 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_4137,4,t0,t1,t2,t3);}
if(C_truep((C_word)C_i_vectorp(t2))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4151,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4155,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 775 vector->list */
+t6=*((C_word*)lf[90]+1);
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}
else{
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4162,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 776 append */
+t5=*((C_word*)lf[93]+1);
((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,C_SCHEME_END_OF_LIST);}}
-/* k4162 in sort in k1289 */
-static void C_ccall f_4164(C_word c,C_word t0,C_word t1){
+/* k4160 in sort in k1288 */
+static void C_ccall f_4162(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 778 sort! */
-t2=*((C_word*)lf[42]+1);
+/* data-structures.scm: 776 sort! */
+t2=*((C_word*)lf[41]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* k4155 in sort in k1289 */
-static void C_ccall f_4157(C_word c,C_word t0,C_word t1){
+/* k4153 in sort in k1288 */
+static void C_ccall f_4155(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 777 sort! */
-t2=*((C_word*)lf[42]+1);
+/* data-structures.scm: 775 sort! */
+t2=*((C_word*)lf[41]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* k4151 in sort in k1289 */
-static void C_ccall f_4153(C_word c,C_word t0,C_word t1){
+/* k4149 in sort in k1288 */
+static void C_ccall f_4151(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 777 list->vector */
-t2=*((C_word*)lf[93]+1);
+/* data-structures.scm: 775 list->vector */
+t2=*((C_word*)lf[92]+1);
((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-/* sort! in k1289 */
-static void C_ccall f_4006(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
+/* sort! in k1288 */
+static void C_ccall f_4004(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -2934,26 +2931,26 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_4004,4,t0,t1,t2,t3);}
t4=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4009,a[2]=t4,a[3]=t6,a[4]=t3,a[5]=((C_word)li125),tmp=(C_word)a,a+=6,tmp));
+t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4007,a[2]=t4,a[3]=t6,a[4]=t3,a[5]=((C_word)li125),tmp=(C_word)a,a+=6,tmp));
if(C_truep((C_word)C_i_vectorp(((C_word*)t4)[1]))){
t8=(C_word)C_i_vector_length(((C_word*)t4)[1]);
t9=((C_word*)t4)[1];
-t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);
+t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4094,a[2]=t8,a[3]=t6,a[4]=t1,a[5]=t9,a[6]=t4,tmp=(C_word)a,a+=7,tmp);
+/* data-structures.scm: 758 vector->list */
+t11=*((C_word*)lf[90]+1);
((C_proc3)(void*)(*((C_word*)t11+1)))(3,t11,t10,((C_word*)t4)[1]);}
else{
t8=(C_word)C_i_length(((C_word*)t4)[1]);
-/* data-structures.scm: 766 step */
+/* data-structures.scm: 764 step */
t9=((C_word*)t6)[1];
-f_4009(t9,t1,t8);}}
+f_4007(t9,t1,t8);}}
-/* k4094 in sort! in k1289 */
-static void C_ccall f_4096(C_word c,C_word t0,C_word t1){
+/* k4092 in sort! in k1288 */
+static void C_ccall f_4094(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2961,15 +2958,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4094,2,t0,t1);}
t2=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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 */
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4101,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 759 step */
t4=((C_word*)((C_word*)t0)[3])[1];
-f_4009(t4,t3,((C_word*)t0)[2]);}
+f_4007(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){
+/* k4099 in k4092 in sort! in k1288 */
+static void C_ccall f_4101(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -2978,15 +2975,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4101,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4105,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word)li126),tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4103,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word)li126),tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_4105(t5,((C_word*)t0)[2],t1,C_fix(0));}
+f_4103(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){
+/* doloop994 in k4099 in k4092 in sort! in k1288 */
+static void C_fcall f_4103(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -3001,7 +2998,7 @@ 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);}
+C_save_and_reclaim((void*)trf_4103,NULL,4,t0,t1,t2,t3);}
if(C_truep((C_word)C_i_nullp(t2))){
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,((C_word*)t0)[3]);}
@@ -3018,8 +3015,8 @@ 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){
+/* step in sort! in k1288 */
+static void C_fcall f_4007(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -3036,9 +3033,9 @@ 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);}
+C_save_and_reclaim((void*)trf_4007,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_greaterp(t2,C_fix(2)))){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4017,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
C_quotient(4,0,t3,t2,C_fix(2));}
else{
if(C_truep((C_word)C_i_nequalp(t2,C_fix(2)))){
@@ -3047,8 +3044,8 @@ 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? */
+t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4058,a[2]=t1,a[3]=t3,a[4]=t4,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
+/* data-structures.scm: 743 less? */
t9=((C_word*)t0)[4];
((C_proc4)C_retrieve_proc(t9))(4,t9,t8,t4,t3);}
else{
@@ -3063,8 +3060,8 @@ 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){
+/* k4056 in step in sort! in k1288 */
+static void C_ccall f_4058(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3089,22 +3086,22 @@ 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){
+/* k4015 in step in sort! in k1288 */
+static void C_ccall f_4017(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_4017,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4020,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+/* data-structures.scm: 734 step */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_4009(t3,t2,t1);}
+f_4007(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){
+/* k4018 in k4015 in step in sort! in k1288 */
+static void C_ccall f_4020(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3112,24 +3109,24 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_4020,2,t0,t1);}
t2=(C_word)C_a_i_minus(&a,2,((C_word*)t0)[6],((C_word*)t0)[5]);
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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 */
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4026,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 736 step */
t4=((C_word*)((C_word*)t0)[2])[1];
-f_4009(t4,t3,t2);}
+f_4007(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){
+/* k4024 in k4018 in k4015 in step in sort! in k1288 */
+static void C_ccall f_4026(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 739 merge! */
-t2=*((C_word*)lf[90]+1);
+/* data-structures.scm: 737 merge! */
+t2=*((C_word*)lf[89]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* merge! in 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){
+/* merge! in k1288 */
+static void C_ccall f_3872(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -3143,10 +3140,10 @@ 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);}
+C_save_and_reclaim((void*)tr5,(void*)f_3872,5,t0,t1,t2,t3,t4);}
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3877,a[2]=t4,a[3]=t6,a[4]=((C_word)li123),tmp=(C_word)a,a+=5,tmp));
+t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3875,a[2]=t4,a[3]=t6,a[4]=((C_word)li123),tmp=(C_word)a,a+=5,tmp));
if(C_truep((C_word)C_i_nullp(t2))){
t8=t3;
t9=t1;
@@ -3156,15 +3153,15 @@ 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);
+t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3954,a[2]=t6,a[3]=t2,a[4]=t1,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
t9=(C_word)C_i_car(t3);
t10=(C_word)C_i_car(t2);
-/* data-structures.scm: 713 less? */
+/* data-structures.scm: 711 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){
+/* k3952 in merge! in k1288 */
+static void C_ccall f_3954(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3180,9 +3177,9 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3954,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3959,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3957,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
t3=(C_word)C_i_cdr(((C_word*)t0)[5]);
if(C_truep((C_word)C_i_nullp(t3))){
t4=(C_word)C_i_set_cdr(((C_word*)t0)[5],((C_word*)t0)[3]);
@@ -3191,11 +3188,11 @@ 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 */
+/* data-structures.scm: 714 loop */
t5=((C_word*)((C_word*)t0)[2])[1];
-f_3877(t5,t2,((C_word*)t0)[5],((C_word*)t0)[3],t4);}}
+f_3875(t5,t2,((C_word*)t0)[5],((C_word*)t0)[3],t4);}}
else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3979,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3977,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
if(C_truep((C_word)C_i_nullp(t3))){
t4=(C_word)C_i_set_cdr(((C_word*)t0)[3],((C_word*)t0)[5]);
@@ -3204,12 +3201,12 @@ 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 */
+/* data-structures.scm: 719 loop */
t5=((C_word*)((C_word*)t0)[2])[1];
-f_3877(t5,t2,((C_word*)t0)[3],t4,((C_word*)t0)[5]);}}}
+f_3875(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){
+/* k3975 in k3952 in merge! in k1288 */
+static void C_ccall f_3977(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3218,8 +3215,8 @@ 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){
+/* k3955 in k3952 in merge! in k1288 */
+static void C_ccall f_3957(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3228,8 +3225,8 @@ 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){
+/* loop in merge! in k1288 */
+static void C_fcall f_3875(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -3238,16 +3235,16 @@ 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);
+C_save_and_reclaim((void*)trf_3875,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3882,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t1,a[5]=t4,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
t6=(C_word)C_i_car(t4);
t7=(C_word)C_i_car(t3);
-/* data-structures.scm: 698 less? */
+/* data-structures.scm: 696 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){
+/* k3880 in loop in merge! in k1288 */
+static void C_ccall f_3882(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3265,9 +3262,9 @@ 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 */
+/* data-structures.scm: 701 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);}}
+f_3875(t5,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[3],t4);}}
else{
t2=(C_word)C_i_set_cdr(((C_word*)t0)[6],((C_word*)t0)[3]);
t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
@@ -3276,12 +3273,12 @@ 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 */
+/* data-structures.scm: 707 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]);}}}
+f_3875(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){
+/* merge in k1288 */
+static void C_ccall f_3773(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -3296,7 +3293,7 @@ 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);}
+C_save_and_reclaim((void*)tr5,(void*)f_3773,5,t0,t1,t2,t3,t4);}
if(C_truep((C_word)C_i_nullp(t2))){
t5=t3;
t6=t1;
@@ -3312,26 +3309,26 @@ 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));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3807,a[2]=t4,a[3]=t10,a[4]=((C_word)li121),tmp=(C_word)a,a+=5,tmp));
t12=((C_word*)t10)[1];
-f_3809(t12,t1,t5,t6,t7,t8);}}}
+f_3807(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){
+/* loop in merge in k1288 */
+static void C_fcall f_3807(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word ab[8],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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? */
+C_save_and_reclaim((void*)trf_3807,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3814,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=t1,a[5]=t3,a[6]=t2,a[7]=t5,tmp=(C_word)a,a+=8,tmp);
+/* data-structures.scm: 679 less? */
t7=((C_word*)t0)[2];
((C_proc4)C_retrieve_proc(t7))(4,t7,t6,t4,t2);}
-/* k3814 in loop in merge in k1289 */
-static void C_ccall f_3816(C_word c,C_word t0,C_word t1){
+/* k3812 in loop in merge in k1288 */
+static void C_ccall f_3814(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3345,56 +3342,56 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3814,2,t0,t1);}
if(C_truep(t1)){
if(C_truep((C_word)C_i_nullp(((C_word*)t0)[7]))){
t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],((C_word*)t0)[5]);
t3=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t2));}
else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3836,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3834,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t3=(C_word)C_i_car(((C_word*)t0)[7]);
t4=(C_word)C_i_cdr(((C_word*)t0)[7]);
-/* data-structures.scm: 684 loop */
+/* data-structures.scm: 682 loop */
t5=((C_word*)((C_word*)t0)[2])[1];
-f_3809(t5,t2,((C_word*)t0)[6],((C_word*)t0)[5],t3,t4);}}
+f_3807(t5,t2,((C_word*)t0)[6],((C_word*)t0)[5],t3,t4);}}
else{
if(C_truep((C_word)C_i_nullp(((C_word*)t0)[5]))){
t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],((C_word*)t0)[7]);
t3=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t2));}
else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3864,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3862,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t3=(C_word)C_i_car(((C_word*)t0)[5]);
t4=(C_word)C_i_cdr(((C_word*)t0)[5]);
-/* data-structures.scm: 688 loop */
+/* data-structures.scm: 686 loop */
t5=((C_word*)((C_word*)t0)[2])[1];
-f_3809(t5,t2,t3,t4,((C_word*)t0)[3],((C_word*)t0)[7]);}}}
+f_3807(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){
+/* k3860 in k3812 in loop in merge in k1288 */
+static void C_ccall f_3862(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3864,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_3862,2,t0,t1);}
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-/* k3834 in k3814 in loop in merge in k1289 */
-static void C_ccall f_3836(C_word c,C_word t0,C_word t1){
+/* k3832 in k3812 in loop in merge in k1288 */
+static void C_ccall f_3834(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3836,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_3834,2,t0,t1);}
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-/* sorted? in k1289 */
-static void C_ccall f_3666(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
+/* sorted? in k1288 */
+static void C_ccall f_3664(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -3410,7 +3407,7 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_3664,4,t0,t1,t2,t3);}
if(C_truep((C_word)C_i_nullp(t2))){
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_TRUE);}
@@ -3423,20 +3420,20 @@ t5=t1;
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));
+t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3691,a[2]=t3,a[3]=t2,a[4]=t6,a[5]=t4,a[6]=((C_word)li118),tmp=(C_word)a,a+=7,tmp));
t8=((C_word*)t6)[1];
-f_3693(t8,t1,C_fix(1));}}
+f_3691(t8,t1,C_fix(1));}}
else{
t4=(C_word)C_i_car(t2);
t5=(C_word)C_i_cdr(t2);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3741,a[2]=t3,a[3]=t7,a[4]=((C_word)li119),tmp=(C_word)a,a+=5,tmp));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3739,a[2]=t3,a[3]=t7,a[4]=((C_word)li119),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
-f_3741(t9,t1,t4,t5);}}}
+f_3739(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){
+/* loop in sorted? in k1288 */
+static void C_fcall f_3739(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -3445,20 +3442,20 @@ 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);}
+C_save_and_reclaim((void*)trf_3739,NULL,4,t0,t1,t2,t3);}
t4=(C_word)C_i_nullp(t3);
if(C_truep(t4)){
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3769,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3767,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
t6=(C_word)C_i_car(t3);
-/* data-structures.scm: 664 less? */
+/* data-structures.scm: 662 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){
+/* k3765 in loop in sorted? in k1288 */
+static void C_ccall f_3767(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3470,12 +3467,12 @@ t2=((C_word*)t0)[4];
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 */
+/* data-structures.scm: 663 loop */
t4=((C_word*)((C_word*)t0)[2])[1];
-f_3741(t4,((C_word*)t0)[4],t2,t3);}}
+f_3739(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){
+/* doloop909 in sorted? in k1288 */
+static void C_fcall f_3691(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -3486,39 +3483,39 @@ 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);}
+C_save_and_reclaim((void*)trf_3691,NULL,3,t0,t1,t2);}
t3=(C_word)C_i_nequalp(t2,((C_word*)t0)[5]);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3701,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
if(C_truep(t3)){
t5=t4;
-f_3703(2,t5,t3);}
+f_3701(2,t5,t3);}
else{
t5=(C_word)C_i_vector_ref(((C_word*)t0)[3],t2);
t6=(C_word)C_a_i_minus(&a,2,t2,C_fix(1));
t7=(C_word)C_i_vector_ref(((C_word*)t0)[3],t6);
-/* data-structures.scm: 658 less? */
+/* data-structures.scm: 656 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){
+/* k3699 in doloop909 in sorted? in k1288 */
+static void C_ccall f_3701(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3703,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_3701,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[5];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_i_nequalp(((C_word*)t0)[4],((C_word*)t0)[3]));}
else{
t2=(C_word)C_a_i_plus(&a,2,((C_word*)t0)[4],C_fix(1));
t3=((C_word*)((C_word*)t0)[2])[1];
-f_3693(t3,((C_word*)t0)[5],t2);}}
+f_3691(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,...){
+/* string-chomp in k1288 */
+static void C_ccall f_3612(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -3527,34 +3524,34 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_3612r,3,t0,t1,t2);}
else{
a=C_alloc((c-3)*3);
t3=C_restore_rest(a,C_rest_count(0));
-f_3614r(t0,t1,t2,t3);}}
+f_3612r(t0,t1,t2,t3);}}
-static void C_ccall f_3614r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_3612r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3618,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3616,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
if(C_truep((C_word)C_i_nullp(t3))){
t5=t4;
-f_3618(2,t5,lf[87]);}
+f_3616(2,t5,lf[86]);}
else{
t5=(C_word)C_i_cdr(t3);
if(C_truep((C_word)C_i_nullp(t5))){
t6=t4;
-f_3618(2,t6,(C_word)C_i_car(t3));}
+f_3616(2,t6,(C_word)C_i_car(t3));}
else{
/* ##sys#error */
-t6=*((C_word*)lf[32]+1);
+t6=*((C_word*)lf[31]+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){
+/* k3614 in string-chomp in k1288 */
+static void C_ccall f_3616(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3566,24 +3563,24 @@ 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]);
+t2=(C_word)C_i_check_string_2(((C_word*)t0)[3],lf[85]);
+t3=(C_word)C_i_check_string_2(t1,lf[85]);
t4=(C_word)C_block_size(((C_word*)t0)[3]);
t5=(C_word)C_block_size(t1);
t6=(C_word)C_fixnum_difference(t4,t5);
t7=(C_word)C_fixnum_greater_or_equal_p(t4,t5);
t8=(C_truep(t7)?(C_word)C_substring_compare(((C_word*)t0)[3],t1,t6,C_fix(0),t5):C_SCHEME_FALSE);
if(C_truep(t8)){
-/* data-structures.scm: 625 ##sys#substring */
-t9=*((C_word*)lf[75]+1);
+/* data-structures.scm: 623 ##sys#substring */
+t9=*((C_word*)lf[74]+1);
((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,((C_word*)t0)[2],((C_word*)t0)[3],C_fix(0),t6);}
else{
t9=((C_word*)t0)[3];
t10=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,t9);}}
-/* string-chop in k1289 */
-static void C_ccall f_3550(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
+/* string-chop in k1288 */
+static void C_ccall f_3548(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -3596,18 +3593,18 @@ 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]);
+C_save_and_reclaim((void*)tr4,(void*)f_3548,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_string_2(t2,lf[84]);
+t5=(C_word)C_i_check_exact_2(t3,lf[84]);
t6=(C_word)C_block_size(t2);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3565,a[2]=t8,a[3]=t2,a[4]=t3,a[5]=((C_word)li115),tmp=(C_word)a,a+=6,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3563,a[2]=t8,a[3]=t2,a[4]=t3,a[5]=((C_word)li115),tmp=(C_word)a,a+=6,tmp));
t10=((C_word*)t8)[1];
-f_3565(t10,t1,t6,C_fix(0));}
+f_3563(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){
+/* loop in string-chop in k1288 */
+static void C_fcall f_3563(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -3617,26 +3614,26 @@ 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);}
+C_save_and_reclaim((void*)trf_3563,NULL,4,t0,t1,t2,t3);}
if(C_truep((C_word)C_fixnum_less_or_equal_p(t2,C_fix(0)))){
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
else{
if(C_truep((C_word)C_fixnum_less_or_equal_p(t2,((C_word*)t0)[4]))){
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3585,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3583,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t5=(C_word)C_fixnum_plus(t3,t2);
-/* data-structures.scm: 611 ##sys#substring */
-t6=*((C_word*)lf[75]+1);
+/* data-structures.scm: 609 ##sys#substring */
+t6=*((C_word*)lf[74]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t4,((C_word*)t0)[3],t3,t5);}
else{
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3594,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
t5=(C_word)C_fixnum_plus(t3,((C_word*)t0)[4]);
-/* data-structures.scm: 612 ##sys#substring */
-t6=*((C_word*)lf[75]+1);
+/* data-structures.scm: 610 ##sys#substring */
+t6=*((C_word*)lf[74]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t4,((C_word*)t0)[3],t3,t5);}}}
-/* k3594 in loop in string-chop in k1289 */
-static void C_ccall f_3596(C_word c,C_word t0,C_word t1){
+/* k3592 in loop in string-chop in k1288 */
+static void C_ccall f_3594(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3645,38 +3642,38 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3594,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3598,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
t3=(C_word)C_fixnum_difference(((C_word*)t0)[5],((C_word*)t0)[4]);
t4=(C_word)C_fixnum_plus(((C_word*)t0)[3],((C_word*)t0)[4]);
-/* data-structures.scm: 612 loop */
+/* data-structures.scm: 610 loop */
t5=((C_word*)((C_word*)t0)[2])[1];
-f_3565(t5,t2,t3,t4);}
+f_3563(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){
+/* k3596 in k3592 in loop in string-chop in k1288 */
+static void C_ccall f_3598(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3600,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_3598,2,t0,t1);}
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-/* k3583 in loop in string-chop in k1289 */
-static void C_ccall f_3585(C_word c,C_word t0,C_word t1){
+/* k3581 in loop in string-chop in k1288 */
+static void C_ccall f_3583(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3585,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_3583,2,t0,t1);}
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,1,t1));}
-/* string-translate* in k1289 */
-static void C_ccall f_3428(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
+/* string-translate* in k1288 */
+static void C_ccall f_3426(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -3689,19 +3686,19 @@ 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]);
+C_save_and_reclaim((void*)tr4,(void*)f_3426,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_string_2(t2,lf[82]);
+t5=(C_word)C_i_check_list_2(t3,lf[82]);
t6=(C_word)C_block_size(t2);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3438,a[2]=t3,a[3]=t8,a[4]=t2,a[5]=t6,a[6]=((C_word)li113),tmp=(C_word)a,a+=7,tmp));
+/* data-structures.scm: 598 collect */
t10=((C_word*)t8)[1];
-f_3440(t10,t1,C_fix(0),C_fix(0),C_fix(0),C_SCHEME_END_OF_LIST);}
+f_3438(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){
+/* collect in string-translate* in k1288 */
+static void C_fcall f_3438(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -3714,29 +3711,29 @@ 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);}
+C_save_and_reclaim((void*)trf_3438,NULL,6,t0,t1,t2,t3,t4,t5);}
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[5]))){
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3454,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3452,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
if(C_truep((C_word)C_fixnum_greaterp(t2,t3))){
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3466,a[2]=t7,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 580 ##sys#substring */
+t9=*((C_word*)lf[74]+1);
((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,((C_word*)t0)[4],t3,t2);}
else{
t8=((C_word*)t6)[1];
-/* data-structures.scm: 580 reverse */
-t9=*((C_word*)lf[24]+1);
+/* data-structures.scm: 578 reverse */
+t9=*((C_word*)lf[23]+1);
((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t7,t8);}}
else{
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3471,a[2]=t8,a[3]=((C_word*)t0)[4],a[4]=t6,a[5]=t3,a[6]=((C_word*)t0)[3],a[7]=t4,a[8]=t2,a[9]=((C_word)li112),tmp=(C_word)a,a+=10,tmp));
t10=((C_word*)t8)[1];
-f_3473(t10,t1,((C_word*)t0)[2]);}}
+f_3471(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){
+/* loop in collect in string-translate* in k1288 */
+static void C_fcall f_3471(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -3756,13 +3753,13 @@ 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);}
+C_save_and_reclaim((void*)trf_3471,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_nullp(t2))){
t3=(C_word)C_fixnum_plus(((C_word*)t0)[8],C_fix(1));
t4=(C_word)C_fixnum_plus(((C_word*)t0)[7],C_fix(1));
-/* data-structures.scm: 586 collect */
+/* data-structures.scm: 584 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]);}
+f_3438(t5,t1,t3,((C_word*)t0)[5],t4,((C_word*)((C_word*)t0)[4])[1]);}
else{
t3=(C_word)C_i_car(t2);
t4=(C_word)C_i_car(t3);
@@ -3770,26 +3767,26 @@ 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);
+t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3510,a[2]=t7,a[3]=t1,a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[7],a[7]=t6,tmp=(C_word)a,a+=8,tmp);
if(C_truep((C_word)C_fixnum_greaterp(((C_word*)t0)[8],((C_word*)t0)[5]))){
-t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3536,a[2]=t8,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 592 ##sys#substring */
+t10=*((C_word*)lf[74]+1);
((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t9,((C_word*)t0)[3],((C_word*)t0)[5],((C_word*)t0)[8]);}
else{
t9=t8;
-f_3512(t9,C_SCHEME_UNDEFINED);}}
+f_3510(t9,C_SCHEME_UNDEFINED);}}
else{
t7=(C_word)C_i_cdr(t2);
-/* data-structures.scm: 599 loop */
+/* data-structures.scm: 597 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){
+/* k3534 in loop in collect in string-translate* in k1288 */
+static void C_ccall f_3536(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3797,14 +3794,14 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3536,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)((C_word*)t0)[3])[1]);
t3=C_mutate(((C_word *)((C_word*)t0)[3])+1,t2);
t4=((C_word*)t0)[2];
-f_3512(t4,t3);}
+f_3510(t4,t3);}
-/* k3510 in loop in collect in string-translate* in k1289 */
-static void C_fcall f_3512(C_word t0,C_word t1){
+/* k3508 in loop in collect in string-translate* in k1288 */
+static void C_fcall f_3510(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3813,39 +3810,39 @@ 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);}
+C_save_and_reclaim((void*)trf_3510,NULL,2,t0,t1);}
t2=(C_word)C_i_string_length(((C_word*)t0)[7]);
t3=(C_word)C_fixnum_plus(((C_word*)t0)[6],t2);
t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],((C_word*)((C_word*)t0)[5])[1]);
-/* data-structures.scm: 595 collect */
+/* data-structures.scm: 593 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);}
+f_3438(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){
+/* k3464 in collect in string-translate* in k1288 */
+static void C_ccall f_3466(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_3468,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_3466,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)((C_word*)t0)[3])[1]);
-/* data-structures.scm: 580 reverse */
-t3=*((C_word*)lf[24]+1);
+/* data-structures.scm: 578 reverse */
+t3=*((C_word*)lf[23]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],t2);}
-/* k3452 in collect in string-translate* in k1289 */
-static void C_ccall f_3454(C_word c,C_word t0,C_word t1){
+/* k3450 in collect in string-translate* in k1288 */
+static void C_ccall f_3452(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 578 ##sys#fragments->string */
-t2=*((C_word*)lf[84]+1);
+/* data-structures.scm: 576 ##sys#fragments->string */
+t2=*((C_word*)lf[83]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* string-translate in k1289 */
-static void C_ccall f_3226(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
+/* string-translate in k1288 */
+static void C_ccall f_3224(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
C_word tmp;
C_word t4;
va_list v;
@@ -3854,13 +3851,13 @@ 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);}
+C_save_and_reclaim((void*)tr4r,(void*)f_3224r,4,t0,t1,t2,t3);}
else{
a=C_alloc((c-4)*3);
t4=C_restore_rest(a,C_rest_count(0));
-f_3226r(t0,t1,t2,t3,t4);}}
+f_3224r(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){
+static void C_ccall f_3224r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -3868,44 +3865,44 @@ 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);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3227,a[2]=((C_word)li108),tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3261,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
if(C_truep((C_word)C_charp(t3))){
t7=t6;
-f_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));}
+f_3261(2,t7,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3401,a[2]=t3,a[3]=((C_word)li110),tmp=(C_word)a,a+=4,tmp));}
else{
if(C_truep((C_word)C_i_pairp(t3))){
-t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3420,a[2]=t6,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 536 list->string */
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3418,a[2]=t6,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 534 list->string */
t8=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t8))(3,t8,t7,t3);}
else{
-t7=(C_word)C_i_check_string_2(t3,lf[81]);
-/* data-structures.scm: 539 instring */
-f_3229(t6,t3);}}}
+t7=(C_word)C_i_check_string_2(t3,lf[80]);
+/* data-structures.scm: 537 instring */
+f_3227(t6,t3);}}}
-/* k3418 in string-translate in k1289 */
-static void C_ccall f_3420(C_word c,C_word t0,C_word t1){
+/* k3416 in string-translate in k1288 */
+static void C_ccall f_3418(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 536 instring */
-f_3229(((C_word*)t0)[2],t1);}
+/* data-structures.scm: 534 instring */
+f_3227(((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){
+/* f_3401 in string-translate in k1288 */
+static void C_ccall f_3401(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_3403,3,t0,t1,t2);}
+C_save_and_reclaim((void*)tr3,(void*)f_3401,3,t0,t1,t2);}
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_eqp(t2,((C_word*)t0)[2]));}
-/* k3261 in string-translate in k1289 */
-static void C_ccall f_3263(C_word c,C_word t0,C_word t1){
+/* k3259 in string-translate in k1288 */
+static void C_ccall f_3261(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3914,28 +3911,28 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_3261,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3264,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
if(C_truep((C_word)C_i_pairp(((C_word*)t0)[3]))){
t3=(C_word)C_slot(((C_word*)t0)[3],C_fix(0));
if(C_truep((C_word)C_charp(t3))){
t4=t2;
-f_3266(2,t4,t3);}
+f_3264(2,t4,t3);}
else{
if(C_truep((C_word)C_i_pairp(t3))){
-/* data-structures.scm: 544 list->string */
+/* data-structures.scm: 542 list->string */
t4=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t4))(3,t4,t2,t3);}
else{
-t4=(C_word)C_i_check_string_2(t3,lf[81]);
+t4=(C_word)C_i_check_string_2(t3,lf[80]);
t5=t2;
-f_3266(2,t5,t3);}}}
+f_3264(2,t5,t3);}}}
else{
t3=t2;
-f_3266(2,t3,C_SCHEME_FALSE);}}
+f_3264(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){
+/* k3262 in k3259 in string-translate in k1288 */
+static void C_ccall f_3264(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3946,18 +3943,18 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3264,2,t0,t1);}
t2=(C_word)C_i_stringp(t1);
t3=(C_truep(t2)?(C_word)C_block_size(t1):C_SCHEME_FALSE);
-t4=(C_word)C_i_check_string_2(((C_word*)t0)[5],lf[81]);
+t4=(C_word)C_i_check_string_2(((C_word*)t0)[5],lf[80]);
t5=(C_word)C_block_size(((C_word*)t0)[5]);
-t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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 */
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3276,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=t5,tmp=(C_word)a,a+=8,tmp);
+/* data-structures.scm: 549 make-string */
t7=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t7))(3,t7,t6,t5);}
-/* 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){
+/* k3274 in k3262 in k3259 in string-translate in k1288 */
+static void C_ccall f_3276(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -3966,15 +3963,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3276,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3281,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word)li109),tmp=(C_word)a,a+=10,tmp));
t5=((C_word*)t3)[1];
-f_3283(t5,((C_word*)t0)[2],C_fix(0),C_fix(0));}
+f_3281(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){
+/* loop in k3274 in k3262 in k3259 in string-translate in k1288 */
+static void C_fcall f_3281(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -3982,24 +3979,24 @@ 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);}
+C_save_and_reclaim((void*)trf_3281,NULL,4,t0,t1,t2,t3);}
if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[8]))){
if(C_truep((C_word)C_fixnum_lessp(t3,t2))){
-/* data-structures.scm: 555 ##sys#substring */
-t4=*((C_word*)lf[75]+1);
+/* data-structures.scm: 553 ##sys#substring */
+t4=*((C_word*)lf[74]+1);
((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t1,((C_word*)t0)[7],C_fix(0),t3);}
else{
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,((C_word*)t0)[7]);}}
else{
t4=(C_word)C_subchar(((C_word*)t0)[6],t2);
-t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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 */
+t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3300,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=t2,a[7]=t3,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[5],tmp=(C_word)a,a+=10,tmp);
+/* data-structures.scm: 556 from */
t6=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t4);}}
-/* 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){
+/* k3298 in loop in k3274 in k3262 in k3259 in string-translate in k1288 */
+static void C_ccall f_3300(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4023,49 +4020,49 @@ 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 */
+/* data-structures.scm: 563 loop */
t7=((C_word*)((C_word*)t0)[5])[1];
-f_3283(t7,((C_word*)t0)[4],t5,t6);}
+f_3281(t7,((C_word*)t0)[4],t5,t6);}
else{
if(C_truep((C_word)C_fixnum_greater_or_equal_p(t1,((C_word*)t0)[3]))){
-/* data-structures.scm: 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]);}
+/* data-structures.scm: 565 ##sys#error */
+t4=*((C_word*)lf[31]+1);
+((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,((C_word*)t0)[4],lf[80],lf[81],((C_word*)t0)[6],((C_word*)t0)[9]);}
else{
t4=(C_word)C_setsubchar(((C_word*)t0)[8],((C_word*)t0)[7],(C_word)C_subchar(((C_word*)t0)[9],t1));
t5=(C_word)C_fixnum_plus(((C_word*)t0)[6],C_fix(1));
t6=(C_word)C_fixnum_plus(((C_word*)t0)[7],C_fix(1));
-/* data-structures.scm: 570 loop */
+/* data-structures.scm: 568 loop */
t7=((C_word*)((C_word*)t0)[5])[1];
-f_3283(t7,((C_word*)t0)[4],t5,t6);}}}
+f_3281(t7,((C_word*)t0)[4],t5,t6);}}}
else{
t4=(C_word)C_fixnum_plus(((C_word*)t0)[6],C_fix(1));
-/* data-structures.scm: 562 loop */
+/* data-structures.scm: 560 loop */
t5=((C_word*)((C_word*)t0)[5])[1];
-f_3283(t5,((C_word*)t0)[4],t4,((C_word*)t0)[7]);}}
+f_3281(t5,((C_word*)t0)[4],t4,((C_word*)t0)[7]);}}
else{
t3=(C_word)C_setsubchar(((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[2]);
t4=(C_word)C_fixnum_plus(((C_word*)t0)[6],C_fix(1));
t5=(C_word)C_fixnum_plus(((C_word*)t0)[7],C_fix(1));
-/* data-structures.scm: 561 loop */
+/* data-structures.scm: 559 loop */
t6=((C_word*)((C_word*)t0)[5])[1];
-f_3283(t6,((C_word*)t0)[4],t4,t5);}}
+f_3281(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){
+/* instring in string-translate in k1288 */
+static void C_fcall f_3227(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_3229,NULL,2,t1,t2);}
+C_save_and_reclaim((void*)trf_3227,NULL,2,t1,t2);}
t3=(C_word)C_block_size(t2);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3234,a[2]=t2,a[3]=t3,a[4]=((C_word)li107),tmp=(C_word)a,a+=5,tmp));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3232,a[2]=t2,a[3]=t3,a[4]=((C_word)li107),tmp=(C_word)a,a+=5,tmp));}
-/* f_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){
+/* f_3232 in instring in string-translate in k1288 */
+static void C_ccall f_3232(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4073,13 +4070,13 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_3232,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3238,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word)li106),tmp=(C_word)a,a+=6,tmp);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,f_3240(t3,C_fix(0)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,f_3238(t3,C_fix(0)));}
/* loop */
-static C_word C_fcall f_3240(C_word t0,C_word t1){
+static C_word C_fcall f_3238(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4099,8 +4096,8 @@ 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,...){
+/* string-intersperse in k1288 */
+static void C_ccall f_3109(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -4109,34 +4106,34 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_3109r,3,t0,t1,t2);}
else{
a=C_alloc((c-3)*3);
t3=C_restore_rest(a,C_rest_count(0));
-f_3111r(t0,t1,t2,t3);}}
+f_3109r(t0,t1,t2,t3);}}
-static void C_ccall f_3111r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_3109r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3115,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3113,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
if(C_truep((C_word)C_i_nullp(t3))){
t5=t4;
-f_3115(2,t5,lf[79]);}
+f_3113(2,t5,lf[78]);}
else{
t5=(C_word)C_i_cdr(t3);
if(C_truep((C_word)C_i_nullp(t5))){
t6=t4;
-f_3115(2,t6,(C_word)C_i_car(t3));}
+f_3113(2,t6,(C_word)C_i_car(t3));}
else{
/* ##sys#error */
-t6=*((C_word*)lf[32]+1);
+t6=*((C_word*)lf[31]+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){
+/* k3111 in string-intersperse in k1288 */
+static void C_ccall f_3113(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4148,18 +4145,18 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_3113,2,t0,t1);}
+t2=(C_word)C_i_check_list_2(((C_word*)t0)[3],lf[75]);
+t3=(C_word)C_i_check_string_2(t1,lf[75]);
t4=(C_word)C_block_size(t1);
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3127,a[2]=t6,a[3]=t4,a[4]=t1,a[5]=((C_word*)t0)[3],a[6]=((C_word)li104),tmp=(C_word)a,a+=7,tmp));
t8=((C_word*)t6)[1];
-f_3129(t8,((C_word*)t0)[2],((C_word*)t0)[3],C_fix(0));}
+f_3127(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){
+/* loop1 in k3111 in string-intersperse in k1288 */
+static void C_fcall f_3127(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -4179,27 +4176,27 @@ 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);}
+C_save_and_reclaim((void*)trf_3127,NULL,4,t0,t1,t2,t3);}
if(C_truep((C_word)C_eqp(t2,C_SCHEME_END_OF_LIST))){
if(C_truep((C_word)C_eqp(((C_word*)t0)[5],C_SCHEME_END_OF_LIST))){
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[77]);}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[76]);}
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);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3137,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
t5=(C_word)C_fixnum_difference(t3,((C_word*)t0)[3]);
-/* data-structures.scm: 499 ##sys#allocate-vector */
-t6=*((C_word*)lf[78]+1);
+/* data-structures.scm: 497 ##sys#allocate-vector */
+t6=*((C_word*)lf[77]+1);
((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t4,t5,C_SCHEME_TRUE,C_make_character(32),C_SCHEME_FALSE);}}
else{
t4=(C_truep((C_word)C_blockp(t2))?(C_word)C_pairp(t2):C_SCHEME_FALSE);
if(C_truep(t4)){
t5=(C_word)C_slot(t2,C_fix(0));
-t6=(C_word)C_i_check_string_2(t5,lf[76]);
+t6=(C_word)C_i_check_string_2(t5,lf[75]);
t7=(C_word)C_slot(t2,C_fix(1));
t8=(C_word)C_block_size(t5);
t9=(C_word)C_fixnum_plus(((C_word*)t0)[3],t3);
t10=(C_word)C_fixnum_plus(t8,t9);
-/* data-structures.scm: 514 loop1 */
+/* data-structures.scm: 512 loop1 */
t14=t1;
t15=t7;
t16=t10;
@@ -4208,25 +4205,25 @@ t2=t15;
t3=t16;
goto loop;}
else{
-/* data-structures.scm: 516 ##sys#error-not-a-proper-list */
-t5=*((C_word*)lf[35]+1);
+/* data-structures.scm: 514 ##sys#error-not-a-proper-list */
+t5=*((C_word*)lf[34]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t1,((C_word*)t0)[5]);}}}
-/* 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){
+/* k3135 in loop1 in k3111 in string-intersperse in k1288 */
+static void C_ccall f_3137(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_3137,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3142,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word)li103),tmp=(C_word)a,a+=6,tmp);
t3=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,f_3144(t2,((C_word*)t0)[2],C_fix(0)));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,f_3142(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){
+/* loop2 in k3135 in loop1 in k3111 in string-intersperse in k1288 */
+static C_word C_fcall f_3142(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4258,8 +4255,8 @@ 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,...){
+/* string-split in k1288 */
+static void C_ccall f_2974(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -4268,13 +4265,13 @@ 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);}
+C_save_and_reclaim((void*)tr3rv,(void*)f_2974r,3,t0,t1,t2);}
else{
a=C_alloc((c-3)*3);
t3=C_restore_rest_vector(a,C_rest_count(0));
-f_2976r(t0,t1,t2,t3);}}
+f_2974r(t0,t1,t2,t3);}}
-static void C_ccall f_2976r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_2974r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -4293,26 +4290,26 @@ 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]);
+t4=(C_word)C_i_check_string_2(t2,lf[72]);
t5=(C_word)C_vemptyp(t3);
-t6=(C_truep(t5)?lf[74]:(C_word)C_i_vector_ref(t3,C_fix(0)));
+t6=(C_truep(t5)?lf[73]:(C_word)C_i_vector_ref(t3,C_fix(0)));
t7=(C_word)C_block_size(t3);
t8=(C_word)C_eqp(t7,C_fix(2));
t9=(C_truep(t8)?(C_word)C_i_vector_ref(t3,C_fix(1)):C_SCHEME_FALSE);
t10=(C_word)C_block_size(t2);
-t11=(C_word)C_i_check_string_2(t6,lf[73]);
+t11=(C_word)C_i_check_string_2(t6,lf[72]);
t12=(C_word)C_block_size(t6);
t13=C_SCHEME_FALSE;
t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
-t15=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2997,a[2]=t2,a[3]=t14,a[4]=((C_word)li99),tmp=(C_word)a,a+=5,tmp);
+t15=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2995,a[2]=t2,a[3]=t14,a[4]=((C_word)li99),tmp=(C_word)a,a+=5,tmp);
t16=C_SCHEME_UNDEFINED;
t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
-t18=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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));
+t18=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3015,a[2]=t6,a[3]=t17,a[4]=t12,a[5]=t2,a[6]=t15,a[7]=t9,a[8]=t14,a[9]=t10,a[10]=((C_word)li101),tmp=(C_word)a,a+=11,tmp));
t19=((C_word*)t17)[1];
-f_3017(t19,t1,C_fix(0),C_SCHEME_FALSE,C_fix(0));}
+f_3015(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){
+/* loop in string-split in k1288 */
+static void C_fcall f_3015(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -4326,15 +4323,15 @@ 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);}
+C_save_and_reclaim((void*)trf_3015,NULL,5,t0,t1,t2,t3,t4);}
if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[9]))){
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3027,a[2]=t1,a[3]=((C_word*)t0)[8],tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3025,a[2]=t1,a[3]=((C_word*)t0)[8],tmp=(C_word)a,a+=4,tmp);
t6=(C_word)C_fixnum_greaterp(t2,t4);
t7=(C_truep(t6)?t6:((C_word*)t0)[7]);
if(C_truep(t7)){
-/* data-structures.scm: 475 add */
+/* data-structures.scm: 473 add */
t8=((C_word*)t0)[6];
-f_2997(t8,t5,t4,t2,t3);}
+f_2995(t8,t5,t4,t2,t3);}
else{
t8=((C_word*)((C_word*)t0)[8])[1];
t9=t1;
@@ -4343,12 +4340,12 @@ 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));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_3042,a[2]=t7,a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[2],a[6]=t5,a[7]=t4,a[8]=t3,a[9]=((C_word*)t0)[3],a[10]=t2,a[11]=((C_word*)t0)[4],a[12]=((C_word)li100),tmp=(C_word)a,a+=13,tmp));
t9=((C_word*)t7)[1];
-f_3044(t9,t1,C_fix(0));}}
+f_3042(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){
+/* scan in loop in string-split in k1288 */
+static void C_fcall f_3042(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4365,12 +4362,12 @@ 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);}
+C_save_and_reclaim((void*)trf_3042,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[11]))){
t3=(C_word)C_fixnum_plus(((C_word*)t0)[10],C_fix(1));
-/* data-structures.scm: 480 loop */
+/* data-structures.scm: 478 loop */
t4=((C_word*)((C_word*)t0)[9])[1];
-f_3017(t4,t1,t3,((C_word*)t0)[8],((C_word*)t0)[7]);}
+f_3015(t4,t1,t3,((C_word*)t0)[8],((C_word*)t0)[7]);}
else{
t3=(C_word)C_eqp(((C_word*)t0)[6],(C_word)C_subchar(((C_word*)t0)[5],t2));
if(C_truep(t3)){
@@ -4378,34 +4375,34 @@ 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 */
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3081,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 482 add */
t8=((C_word*)t0)[3];
-f_2997(t8,t7,((C_word*)t0)[7],((C_word*)t0)[10],((C_word*)t0)[8]);}
+f_2995(t8,t7,((C_word*)t0)[7],((C_word*)t0)[10],((C_word*)t0)[8]);}
else{
-/* data-structures.scm: 485 loop */
+/* data-structures.scm: 483 loop */
t7=((C_word*)((C_word*)t0)[9])[1];
-f_3017(t7,t1,t4,((C_word*)t0)[8],t4);}}
+f_3015(t7,t1,t4,((C_word*)t0)[8],t4);}}
else{
t4=(C_word)C_fixnum_plus(t2,C_fix(1));
-/* data-structures.scm: 486 scan */
+/* data-structures.scm: 484 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){
+/* k3079 in scan in loop in string-split in k1288 */
+static void C_ccall f_3081(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 484 loop */
+/* data-structures.scm: 482 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]);}
+f_3015(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){
+/* k3023 in loop in string-split in k1288 */
+static void C_ccall f_3025(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4414,22 +4411,22 @@ 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){
+/* add in string-split in k1288 */
+static void C_fcall f_2995(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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_save_and_reclaim((void*)trf_2995,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3010,a[2]=t1,a[3]=t4,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 466 ##sys#substring */
+t6=*((C_word*)lf[74]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,((C_word*)t0)[2],t2,t3);}
-/* k3010 in add in string-split in k1289 */
-static void C_ccall f_3012(C_word c,C_word t0,C_word t1){
+/* k3008 in add in string-split in k1288 */
+static void C_ccall f_3010(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4438,7 +4435,7 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_3010,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
t3=(C_word)C_i_setslot(((C_word*)t0)[3],C_fix(1),t2);
@@ -4449,8 +4446,8 @@ 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,...){
+/* substring-ci=? in k1288 */
+static void C_ccall f_2894(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
C_word tmp;
C_word t4;
va_list v;
@@ -4459,13 +4456,13 @@ 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);}
+C_save_and_reclaim((void*)tr4r,(void*)f_2894r,4,t0,t1,t2,t3);}
else{
a=C_alloc((c-4)*3);
t4=C_restore_rest(a,C_rest_count(0));
-f_2896r(t0,t1,t2,t3,t4);}}
+f_2894r(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){
+static void C_ccall f_2894r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -4479,89 +4476,89 @@ 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);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2896,a[2]=t3,a[3]=t2,a[4]=((C_word)li94),tmp=(C_word)a,a+=5,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2901,a[2]=t5,a[3]=((C_word)li95),tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2906,a[2]=t6,a[3]=((C_word)li96),tmp=(C_word)a,a+=4,tmp);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2911,a[2]=t7,a[3]=((C_word)li97),tmp=(C_word)a,a+=4,tmp);
if(C_truep((C_word)C_i_nullp(t4))){
/* def-start1647663 */
t9=t8;
-f_2913(t9,t1);}
+f_2911(t9,t1);}
else{
t9=(C_word)C_i_car(t4);
t10=(C_word)C_i_cdr(t4);
if(C_truep((C_word)C_i_nullp(t10))){
/* def-start2648661 */
t11=t7;
-f_2908(t11,t1,t9);}
+f_2906(t11,t1,t9);}
else{
t11=(C_word)C_i_car(t10);
t12=(C_word)C_i_cdr(t10);
if(C_truep((C_word)C_i_nullp(t12))){
/* def-len649658 */
t13=t6;
-f_2903(t13,t1,t9,t11);}
+f_2901(t13,t1,t9,t11);}
else{
t13=(C_word)C_i_car(t12);
t14=(C_word)C_i_cdr(t12);
if(C_truep((C_word)C_i_nullp(t14))){
/* body645654 */
t15=t5;
-f_2898(t15,t1,t9,t11,t13);}
+f_2896(t15,t1,t9,t11,t13);}
else{
/* ##sys#error */
-t15=*((C_word*)lf[32]+1);
+t15=*((C_word*)lf[31]+1);
((C_proc4)(void*)(*((C_word*)t15+1)))(4,t15,t1,lf[0],t14);}}}}}
-/* def-start1647 in substring-ci=? in k1289 */
-static void C_fcall f_2913(C_word t0,C_word t1){
+/* def-start1647 in substring-ci=? in k1288 */
+static void C_fcall f_2911(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2913,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_2911,NULL,2,t0,t1);}
/* def-start2648661 */
t2=((C_word*)t0)[2];
-f_2908(t2,t1,C_fix(0));}
+f_2906(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){
+/* def-start2648 in substring-ci=? in k1288 */
+static void C_fcall f_2906(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2908,NULL,3,t0,t1,t2);}
+C_save_and_reclaim((void*)trf_2906,NULL,3,t0,t1,t2);}
/* def-len649658 */
t3=((C_word*)t0)[2];
-f_2903(t3,t1,t2,C_fix(0));}
+f_2901(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){
+/* def-len649 in substring-ci=? in k1288 */
+static void C_fcall f_2901(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2903,NULL,4,t0,t1,t2,t3);}
+C_save_and_reclaim((void*)trf_2901,NULL,4,t0,t1,t2,t3);}
/* body645654 */
t4=((C_word*)t0)[2];
-f_2898(t4,t1,t2,t3,C_SCHEME_FALSE);}
+f_2896(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){
+/* body645 in substring-ci=? in k1288 */
+static void C_fcall f_2896(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_2896,NULL,5,t0,t1,t2,t3,t4);}
+/* data-structures.scm: 451 ##sys#substring-ci=? */
+((C_proc7)C_retrieve_proc(*((C_word*)lf[70]+1)))(7,*((C_word*)lf[70]+1),t1,((C_word*)t0)[3],((C_word*)t0)[2],t2,t3,t4);}
-/* ##sys#substring-ci=? in 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){
+/* ##sys#substring-ci=? in k1288 */
+static void C_ccall f_2857(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
C_word tmp;
C_word t7;
C_word t8;
@@ -4575,35 +4572,35 @@ 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);
+C_save_and_reclaim((void*)tr7,(void*)f_2857,7,t0,t1,t2,t3,t4,t5,t6);}
+t7=(C_word)C_i_check_string_2(t2,lf[71]);
+t8=(C_word)C_i_check_string_2(t3,lf[71]);
+t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2867,a[2]=t3,a[3]=t2,a[4]=t1,a[5]=t5,a[6]=t4,tmp=(C_word)a,a+=7,tmp);
if(C_truep(t6)){
t10=t9;
-f_2869(t10,t6);}
+f_2867(t10,t6);}
else{
t10=(C_word)C_block_size(t2);
t11=(C_word)C_fixnum_difference(t10,t4);
t12=(C_word)C_block_size(t3);
t13=(C_word)C_fixnum_difference(t12,t5);
t14=t9;
-f_2869(t14,(C_word)C_i_fixnum_min(t11,t13));}}
+f_2867(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){
+/* k2865 in ##sys#substring-ci=? in k1288 */
+static void C_fcall f_2867(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_i_check_exact_2(((C_word*)t0)[6],lf[72]);
-t3=(C_word)C_i_check_exact_2(((C_word*)t0)[5],lf[72]);
+t2=(C_word)C_i_check_exact_2(((C_word*)t0)[6],lf[71]);
+t3=(C_word)C_i_check_exact_2(((C_word*)t0)[5],lf[71]);
t4=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_substring_compare_case_insensitive(((C_word*)t0)[3],((C_word*)t0)[2],((C_word*)t0)[6],((C_word*)t0)[5],t1));}
-/* substring=? in k1289 */
-static void C_ccall f_2779(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
+/* substring=? in k1288 */
+static void C_ccall f_2777(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
C_word tmp;
C_word t4;
va_list v;
@@ -4612,13 +4609,13 @@ 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);}
+C_save_and_reclaim((void*)tr4r,(void*)f_2777r,4,t0,t1,t2,t3);}
else{
a=C_alloc((c-4)*3);
t4=C_restore_rest(a,C_rest_count(0));
-f_2779r(t0,t1,t2,t3,t4);}}
+f_2777r(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){
+static void C_ccall f_2777r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -4632,89 +4629,89 @@ 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);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2779,a[2]=t3,a[3]=t2,a[4]=((C_word)li88),tmp=(C_word)a,a+=5,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2784,a[2]=t5,a[3]=((C_word)li89),tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2789,a[2]=t6,a[3]=((C_word)li90),tmp=(C_word)a,a+=4,tmp);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2794,a[2]=t7,a[3]=((C_word)li91),tmp=(C_word)a,a+=4,tmp);
if(C_truep((C_word)C_i_nullp(t4))){
/* def-start1590606 */
t9=t8;
-f_2796(t9,t1);}
+f_2794(t9,t1);}
else{
t9=(C_word)C_i_car(t4);
t10=(C_word)C_i_cdr(t4);
if(C_truep((C_word)C_i_nullp(t10))){
/* def-start2591604 */
t11=t7;
-f_2791(t11,t1,t9);}
+f_2789(t11,t1,t9);}
else{
t11=(C_word)C_i_car(t10);
t12=(C_word)C_i_cdr(t10);
if(C_truep((C_word)C_i_nullp(t12))){
/* def-len592601 */
t13=t6;
-f_2786(t13,t1,t9,t11);}
+f_2784(t13,t1,t9,t11);}
else{
t13=(C_word)C_i_car(t12);
t14=(C_word)C_i_cdr(t12);
if(C_truep((C_word)C_i_nullp(t14))){
/* body588597 */
t15=t5;
-f_2781(t15,t1,t9,t11,t13);}
+f_2779(t15,t1,t9,t11,t13);}
else{
/* ##sys#error */
-t15=*((C_word*)lf[32]+1);
+t15=*((C_word*)lf[31]+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){
+/* def-start1590 in substring=? in k1288 */
+static void C_fcall f_2794(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2796,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_2794,NULL,2,t0,t1);}
/* def-start2591604 */
t2=((C_word*)t0)[2];
-f_2791(t2,t1,C_fix(0));}
+f_2789(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){
+/* def-start2591 in substring=? in k1288 */
+static void C_fcall f_2789(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2791,NULL,3,t0,t1,t2);}
+C_save_and_reclaim((void*)trf_2789,NULL,3,t0,t1,t2);}
/* def-len592601 */
t3=((C_word*)t0)[2];
-f_2786(t3,t1,t2,C_fix(0));}
+f_2784(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){
+/* def-len592 in substring=? in k1288 */
+static void C_fcall f_2784(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2786,NULL,4,t0,t1,t2,t3);}
+C_save_and_reclaim((void*)trf_2784,NULL,4,t0,t1,t2,t3);}
/* body588597 */
t4=((C_word*)t0)[2];
-f_2781(t4,t1,t2,t3,C_SCHEME_FALSE);}
+f_2779(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){
+/* body588 in substring=? in k1288 */
+static void C_fcall f_2779(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_2779,NULL,5,t0,t1,t2,t3,t4);}
+/* data-structures.scm: 437 ##sys#substring=? */
+((C_proc7)C_retrieve_proc(*((C_word*)lf[68]+1)))(7,*((C_word*)lf[68]+1),t1,((C_word*)t0)[3],((C_word*)t0)[2],t2,t3,t4);}
-/* ##sys#substring=? in 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){
+/* ##sys#substring=? in k1288 */
+static void C_ccall f_2740(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
C_word tmp;
C_word t7;
C_word t8;
@@ -4728,35 +4725,35 @@ 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);
+C_save_and_reclaim((void*)tr7,(void*)f_2740,7,t0,t1,t2,t3,t4,t5,t6);}
+t7=(C_word)C_i_check_string_2(t2,lf[69]);
+t8=(C_word)C_i_check_string_2(t3,lf[69]);
+t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2750,a[2]=t3,a[3]=t2,a[4]=t1,a[5]=t5,a[6]=t4,tmp=(C_word)a,a+=7,tmp);
if(C_truep(t6)){
t10=t9;
-f_2752(t10,t6);}
+f_2750(t10,t6);}
else{
t10=(C_word)C_block_size(t2);
t11=(C_word)C_fixnum_difference(t10,t4);
t12=(C_word)C_block_size(t3);
t13=(C_word)C_fixnum_difference(t12,t5);
t14=t9;
-f_2752(t14,(C_word)C_i_fixnum_min(t11,t13));}}
+f_2750(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){
+/* k2748 in ##sys#substring=? in k1288 */
+static void C_fcall f_2750(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_i_check_exact_2(((C_word*)t0)[6],lf[70]);
-t3=(C_word)C_i_check_exact_2(((C_word*)t0)[5],lf[70]);
+t2=(C_word)C_i_check_exact_2(((C_word*)t0)[6],lf[69]);
+t3=(C_word)C_i_check_exact_2(((C_word*)t0)[5],lf[69]);
t4=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_substring_compare(((C_word*)t0)[3],((C_word*)t0)[2],((C_word*)t0)[6],((C_word*)t0)[5],t1));}
-/* string-compare3-ci in k1289 */
-static void C_ccall f_2711(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
+/* string-compare3-ci in k1288 */
+static void C_ccall f_2709(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -4772,9 +4769,9 @@ 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]);
+C_save_and_reclaim((void*)tr4,(void*)f_2709,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_string_2(t2,lf[67]);
+t5=(C_word)C_i_check_string_2(t3,lf[67]);
t6=(C_word)C_block_size(t2);
t7=(C_word)C_block_size(t3);
t8=(C_word)C_fixnum_difference(t6,t7);
@@ -4785,8 +4782,8 @@ 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){
+/* string-compare3 in k1288 */
+static void C_ccall f_2678(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -4802,9 +4799,9 @@ 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]);
+C_save_and_reclaim((void*)tr4,(void*)f_2678,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_string_2(t2,lf[66]);
+t5=(C_word)C_i_check_string_2(t3,lf[66]);
t6=(C_word)C_block_size(t2);
t7=(C_word)C_block_size(t3);
t8=(C_word)C_fixnum_difference(t6,t7);
@@ -4815,8 +4812,8 @@ 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,...){
+/* substring-index-ci in k1288 */
+static void C_ccall f_2650(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
C_word tmp;
C_word t4;
va_list v;
@@ -4825,44 +4822,44 @@ 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);}
+C_save_and_reclaim((void*)tr4r,(void*)f_2650r,4,t0,t1,t2,t3);}
else{
a=C_alloc((c-4)*3);
t4=C_restore_rest(a,C_rest_count(0));
-f_2652r(t0,t1,t2,t3,t4);}}
+f_2650r(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){
+static void C_ccall f_2650r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a=C_alloc(5);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2656,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2654,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
if(C_truep((C_word)C_i_nullp(t4))){
-/* data-structures.scm: 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));}
+/* data-structures.scm: 396 ##sys#substring-index-ci */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[64]+1)))(5,*((C_word*)lf[64]+1),t1,t2,t3,C_fix(0));}
else{
t6=(C_word)C_i_cdr(t4);
if(C_truep((C_word)C_i_nullp(t6))){
t7=(C_word)C_i_car(t4);
-/* data-structures.scm: 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);}
+/* data-structures.scm: 396 ##sys#substring-index-ci */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[64]+1)))(5,*((C_word*)lf[64]+1),t1,t2,t3,t7);}
else{
/* ##sys#error */
-t7=*((C_word*)lf[32]+1);
+t7=*((C_word*)lf[31]+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){
+/* k2652 in substring-index-ci in k1288 */
+static void C_ccall f_2654(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 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);}
+/* data-structures.scm: 396 ##sys#substring-index-ci */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[64]+1)))(5,*((C_word*)lf[64]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* substring-index in k1289 */
-static void C_ccall f_2624(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
+/* substring-index in k1288 */
+static void C_ccall f_2622(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
C_word tmp;
C_word t4;
va_list v;
@@ -4871,44 +4868,44 @@ 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);}
+C_save_and_reclaim((void*)tr4r,(void*)f_2622r,4,t0,t1,t2,t3);}
else{
a=C_alloc((c-4)*3);
t4=C_restore_rest(a,C_rest_count(0));
-f_2624r(t0,t1,t2,t3,t4);}}
+f_2622r(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){
+static void C_ccall f_2622r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a=C_alloc(5);
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2628,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2626,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
if(C_truep((C_word)C_i_nullp(t4))){
-/* data-structures.scm: 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));}
+/* data-structures.scm: 393 ##sys#substring-index */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[62]+1)))(5,*((C_word*)lf[62]+1),t1,t2,t3,C_fix(0));}
else{
t6=(C_word)C_i_cdr(t4);
if(C_truep((C_word)C_i_nullp(t6))){
t7=(C_word)C_i_car(t4);
-/* data-structures.scm: 395 ##sys#substring-index */
-((C_proc5)C_retrieve_proc(*((C_word*)lf[63]+1)))(5,*((C_word*)lf[63]+1),t1,t2,t3,t7);}
+/* data-structures.scm: 393 ##sys#substring-index */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[62]+1)))(5,*((C_word*)lf[62]+1),t1,t2,t3,t7);}
else{
/* ##sys#error */
-t7=*((C_word*)lf[32]+1);
+t7=*((C_word*)lf[31]+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){
+/* k2624 in substring-index in k1288 */
+static void C_ccall f_2626(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 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);}
+/* data-structures.scm: 393 ##sys#substring-index */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[62]+1)))(5,*((C_word*)lf[62]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* ##sys#substring-index-ci in 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){
+/* ##sys#substring-index-ci in k1288 */
+static void C_ccall f_2613(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -4916,25 +4913,25 @@ 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]);}
+C_save_and_reclaim((void*)tr5,(void*)f_2613,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2619,a[2]=t3,a[3]=t2,a[4]=((C_word)li81),tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 387 traverse */
+f_2557(t1,t2,t3,t4,t5,lf[65]);}
-/* 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){
+/* a2618 in ##sys#substring-index-ci in k1288 */
+static void C_ccall f_2619(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2621,4,t0,t1,t2,t3);}
+C_save_and_reclaim((void*)tr4,(void*)f_2619,4,t0,t1,t2,t3);}
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_substring_compare_case_insensitive(((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0),t2,t3));}
-/* ##sys#substring-index in 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){
+/* ##sys#substring-index in k1288 */
+static void C_ccall f_2604(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -4942,25 +4939,25 @@ 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]);}
+C_save_and_reclaim((void*)tr5,(void*)f_2604,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2610,a[2]=t3,a[3]=t2,a[4]=((C_word)li79),tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 381 traverse */
+f_2557(t1,t2,t3,t4,t5,lf[63]);}
-/* 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){
+/* a2609 in ##sys#substring-index in k1288 */
+static void C_ccall f_2610(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_2612,4,t0,t1,t2,t3);}
+C_save_and_reclaim((void*)tr4,(void*)f_2610,4,t0,t1,t2,t3);}
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_substring_compare(((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0),t2,t3));}
-/* traverse in 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){
+/* traverse in k1288 */
+static void C_fcall f_2557(C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
C_word tmp;
C_word t7;
C_word t8;
@@ -4974,7 +4971,7 @@ 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);}
+C_save_and_reclaim((void*)trf_2557,NULL,6,t1,t2,t3,t4,t5,t6);}
t7=(C_word)C_i_check_string_2(t2,t6);
t8=(C_word)C_i_check_string_2(t3,t6);
t9=(C_word)C_block_size(t3);
@@ -4982,30 +4979,30 @@ 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));
+t14=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2578,a[2]=t10,a[3]=t5,a[4]=t13,a[5]=t9,a[6]=((C_word)li77),tmp=(C_word)a,a+=7,tmp));
t15=((C_word*)t13)[1];
-f_2580(t15,t1,t4,t10);}
+f_2578(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){
+/* loop in traverse in k1288 */
+static void C_fcall f_2578(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2580,NULL,4,t0,t1,t2,t3);}
+C_save_and_reclaim((void*)trf_2578,NULL,4,t0,t1,t2,t3);}
if(C_truep((C_word)C_fixnum_greaterp(t3,((C_word*)t0)[5]))){
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}
else{
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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 */
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2591,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+/* data-structures.scm: 375 test */
t5=((C_word*)t0)[3];
((C_proc4)C_retrieve_proc(t5))(4,t5,t4,t2,((C_word*)t0)[2]);}}
-/* k2591 in loop in traverse in k1289 */
-static void C_ccall f_2593(C_word c,C_word t0,C_word t1){
+/* k2589 in loop in traverse in k1288 */
+static void C_ccall f_2591(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5017,12 +5014,12 @@ t2=((C_word*)t0)[5];
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 */
+/* data-structures.scm: 377 loop */
t4=((C_word*)((C_word*)t0)[2])[1];
-f_2580(t4,((C_word*)t0)[5],t2,t3);}}
+f_2578(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,...){
+/* conc in k1288 */
+static void C_ccall f_2512(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -5030,13 +5027,13 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_2512r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_2514r(t0,t1,t2);}}
+f_2512r(t0,t1,t2);}}
-static void C_ccall f_2514r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_2512r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5052,15 +5049,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|3,a[1]=(C_word)f_2522,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2520,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2524,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li75),tmp=(C_word)a,a+=6,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2522,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li75),tmp=(C_word)a,a+=6,tmp));
t11=((C_word*)t9)[1];
-f_2524(t11,t7,t2);}
+f_2522(t11,t7,t2);}
-/* loop452 in conc in k1289 */
-static void C_fcall f_2524(C_word t0,C_word t1,C_word t2){
+/* loop452 in conc in k1288 */
+static void C_fcall f_2522(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5070,10 +5067,10 @@ 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);}
+C_save_and_reclaim((void*)trf_2522,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[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);
+t3=*((C_word*)lf[57]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2551,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
/* g468469 */
t6=t3;
@@ -5083,8 +5080,8 @@ 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){
+/* k2549 in loop452 in conc in k1288 */
+static void C_ccall f_2551(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5097,7 +5094,7 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2551,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
@@ -5105,24 +5102,24 @@ 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);}
+f_2522(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
/* loop452465 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_2524(t6,((C_word*)t0)[3],t5);}}
+f_2522(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){
+/* k2518 in conc in k1288 */
+static void C_ccall f_2520(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_apply(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* ->string in k1289 */
-static void C_ccall f_2469(C_word c,C_word t0,C_word t1,C_word t2){
+/* ->string in k1288 */
+static void C_ccall f_2467(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5131,57 +5128,57 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_2467,3,t0,t1,t2);}
if(C_truep((C_word)C_i_stringp(t2))){
t3=t2;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
if(C_truep((C_word)C_i_symbolp(t2))){
-/* data-structures.scm: 352 symbol->string */
-t3=*((C_word*)lf[59]+1);
+/* data-structures.scm: 350 symbol->string */
+t3=*((C_word*)lf[58]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,t2);}
else{
if(C_truep((C_word)C_charp(t2))){
-/* data-structures.scm: 353 string */
+/* data-structures.scm: 351 string */
t3=((C_word*)t0)[5];
((C_proc3)C_retrieve_proc(t3))(3,t3,t1,t2);}
else{
if(C_truep((C_word)C_i_numberp(t2))){
-/* data-structures.scm: 354 ##sys#number->string */
-t3=*((C_word*)lf[60]+1);
+/* data-structures.scm: 352 ##sys#number->string */
+t3=*((C_word*)lf[59]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,t2);}
else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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 */
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2504,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+/* data-structures.scm: 354 open-output-string */
t4=((C_word*)t0)[2];
((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}}}}}
-/* k2504 in ->string in k1289 */
-static void C_ccall f_2506(C_word c,C_word t0,C_word t1){
+/* k2502 in ->string in k1288 */
+static void C_ccall f_2504(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_2504,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2507,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 355 display */
t3=((C_word*)t0)[3];
((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[2],t1);}
-/* k2507 in k2504 in ->string in k1289 */
-static void C_ccall f_2509(C_word c,C_word t0,C_word t1){
+/* k2505 in k2502 in ->string in k1288 */
+static void C_ccall f_2507(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 358 get-output-string */
+/* data-structures.scm: 356 get-output-string */
t2=((C_word*)t0)[4];
((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* reverse-string-append in k1289 */
-static void C_ccall f_2392(C_word c,C_word t0,C_word t1,C_word t2){
+/* reverse-string-append in k1288 */
+static void C_ccall f_2390(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5191,16 +5188,16 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_2390,3,t0,t1,t2);}
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2395,a[2]=t4,a[3]=((C_word)li72),tmp=(C_word)a,a+=4,tmp));
-/* data-structures.scm: 341 rev-string-append */
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2393,a[2]=t4,a[3]=((C_word)li72),tmp=(C_word)a,a+=4,tmp));
+/* data-structures.scm: 339 rev-string-append */
t6=((C_word*)t4)[1];
-f_2395(t6,t1,t2,C_fix(0));}
+f_2393(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){
+/* rev-string-append in reverse-string-append in k1288 */
+static void C_fcall f_2393(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5216,14 +5213,14 @@ 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);}
+C_save_and_reclaim((void*)trf_2393,NULL,4,t0,t1,t2,t3);}
if(C_truep((C_word)C_i_pairp(t2))){
t4=(C_word)C_i_car(t2);
t5=(C_word)C_i_string_length(t4);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2411,a[2]=t1,a[3]=t4,a[4]=t5,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2409,a[2]=t1,a[3]=t4,a[4]=t5,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
t7=(C_word)C_i_cdr(t2);
t8=(C_word)C_a_i_plus(&a,2,t3,t5);
-/* data-structures.scm: 332 rev-string-append */
+/* data-structures.scm: 330 rev-string-append */
t10=t6;
t11=t7;
t12=t8;
@@ -5232,12 +5229,12 @@ t2=t11;
t3=t12;
goto loop;}
else{
-/* data-structures.scm: 339 make-string */
-t4=*((C_word*)lf[53]+1);
+/* data-structures.scm: 337 make-string */
+t4=*((C_word*)lf[52]+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){
+/* k2407 in rev-string-append in reverse-string-append in k1288 */
+static void C_ccall f_2409(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5249,18 +5246,18 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2409,2,t0,t1);}
t2=(C_word)C_i_string_length(t1);
t3=(C_word)C_a_i_minus(&a,2,t2,((C_word*)t0)[5]);
t4=(C_word)C_a_i_minus(&a,2,t3,((C_word*)t0)[4]);
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2418,a[2]=t6,a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word)li71),tmp=(C_word)a,a+=7,tmp));
t8=((C_word*)t6)[1];
-f_2420(t8,((C_word*)t0)[2],C_fix(0),t4);}
+f_2418(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){
+/* loop in k2407 in rev-string-append in reverse-string-append in k1288 */
+static void C_fcall f_2418(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5276,13 +5273,13 @@ 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);}
+C_save_and_reclaim((void*)trf_2418,NULL,4,t0,t1,t2,t3);}
if(C_truep((C_word)C_i_lessp(t2,((C_word*)t0)[5]))){
t4=(C_word)C_i_string_ref(((C_word*)t0)[4],t2);
t5=(C_word)C_i_string_set(((C_word*)t0)[3],t3,t4);
t6=(C_word)C_a_i_plus(&a,2,t2,C_fix(1));
t7=(C_word)C_a_i_plus(&a,2,t3,C_fix(1));
-/* data-structures.scm: 337 loop */
+/* data-structures.scm: 335 loop */
t10=t1;
t11=t6;
t12=t7;
@@ -5295,8 +5292,8 @@ 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,...){
+/* rassoc in k1288 */
+static void C_ccall f_2340(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
C_word tmp;
C_word t4;
va_list v;
@@ -5305,13 +5302,13 @@ 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);}
+C_save_and_reclaim((void*)tr4rv,(void*)f_2340r,4,t0,t1,t2,t3);}
else{
a=C_alloc((c-4)*3);
t4=C_restore_rest_vector(a,C_rest_count(0));
-f_2342r(t0,t1,t2,t3,t4);}}
+f_2340r(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){
+static void C_ccall f_2340r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -5321,17 +5318,17 @@ 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]);
+t5=(C_word)C_i_check_list_2(t3,lf[50]);
t6=(C_word)C_notvemptyp(t4);
-t7=(C_truep(t6)?(C_word)C_i_vector_ref(t4,C_fix(0)):*((C_word*)lf[46]+1));
+t7=(C_truep(t6)?(C_word)C_i_vector_ref(t4,C_fix(0)):*((C_word*)lf[45]+1));
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2354,a[2]=t2,a[3]=t7,a[4]=t9,a[5]=((C_word)li69),tmp=(C_word)a,a+=6,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2352,a[2]=t2,a[3]=t7,a[4]=t9,a[5]=((C_word)li69),tmp=(C_word)a,a+=6,tmp));
t11=((C_word*)t9)[1];
-f_2354(t11,t1,t3);}
+f_2352(t11,t1,t3);}
-/* loop in rassoc in k1289 */
-static void C_fcall f_2354(C_word t0,C_word t1,C_word t2){
+/* loop in rassoc in k1288 */
+static void C_fcall f_2352(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5341,21 +5338,21 @@ 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);}
+C_save_and_reclaim((void*)trf_2352,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
t3=(C_word)C_slot(t2,C_fix(0));
-t4=(C_word)C_i_check_pair_2(t3,lf[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);
+t4=(C_word)C_i_check_pair_2(t3,lf[50]);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2371,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
t6=(C_word)C_slot(t3,C_fix(1));
-/* data-structures.scm: 318 tst */
+/* data-structures.scm: 316 tst */
t7=((C_word*)t0)[3];
((C_proc4)C_retrieve_proc(t7))(4,t7,t5,((C_word*)t0)[2],t6);}
else{
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-/* k2371 in loop in rassoc in k1289 */
-static void C_ccall f_2373(C_word c,C_word t0,C_word t1){
+/* k2369 in loop in rassoc in k1288 */
+static void C_ccall f_2371(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5365,12 +5362,12 @@ 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 */
+/* data-structures.scm: 318 loop */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_2354(t3,((C_word*)t0)[5],t2);}}
+f_2352(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,...){
+/* alist-ref in k1288 */
+static void C_ccall f_2216(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
C_word tmp;
C_word t4;
va_list v;
@@ -5379,13 +5376,13 @@ 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);}
+C_save_and_reclaim((void*)tr4r,(void*)f_2216r,4,t0,t1,t2,t3);}
else{
a=C_alloc((c-4)*3);
t4=C_restore_rest(a,C_rest_count(0));
-f_2218r(t0,t1,t2,t3,t4);}}
+f_2216r(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){
+static void C_ccall f_2216r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -5396,58 +5393,58 @@ 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);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2218,a[2]=t3,a[3]=t2,a[4]=((C_word)li65),tmp=(C_word)a,a+=5,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2287,a[2]=t5,a[3]=((C_word)li66),tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2292,a[2]=t6,a[3]=((C_word)li67),tmp=(C_word)a,a+=4,tmp);
if(C_truep((C_word)C_i_nullp(t4))){
/* def-cmp364394 */
t8=t7;
-f_2294(t8,t1);}
+f_2292(t8,t1);}
else{
t8=(C_word)C_i_car(t4);
t9=(C_word)C_i_cdr(t4);
if(C_truep((C_word)C_i_nullp(t9))){
/* def-default365392 */
t10=t6;
-f_2289(t10,t1,t8);}
+f_2287(t10,t1,t8);}
else{
t10=(C_word)C_i_car(t9);
t11=(C_word)C_i_cdr(t9);
if(C_truep((C_word)C_i_nullp(t11))){
/* body362370 */
t12=t5;
-f_2220(t12,t1,t8,t10);}
+f_2218(t12,t1,t8,t10);}
else{
/* ##sys#error */
-t12=*((C_word*)lf[32]+1);
+t12=*((C_word*)lf[31]+1);
((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t1,lf[0],t11);}}}}
-/* def-cmp364 in alist-ref in k1289 */
-static void C_fcall f_2294(C_word t0,C_word t1){
+/* def-cmp364 in alist-ref in k1288 */
+static void C_fcall f_2292(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2294,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_2292,NULL,2,t0,t1);}
/* def-default365392 */
t2=((C_word*)t0)[2];
-f_2289(t2,t1,*((C_word*)lf[46]+1));}
+f_2287(t2,t1,*((C_word*)lf[45]+1));}
-/* def-default365 in alist-ref in k1289 */
-static void C_fcall f_2289(C_word t0,C_word t1,C_word t2){
+/* def-default365 in alist-ref in k1288 */
+static void C_fcall f_2287(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_2289,NULL,3,t0,t1,t2);}
+C_save_and_reclaim((void*)trf_2287,NULL,3,t0,t1,t2);}
/* body362370 */
t3=((C_word*)t0)[2];
-f_2220(t3,t1,t2,C_SCHEME_FALSE);}
+f_2218(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){
+/* body362 in alist-ref in k1288 */
+static void C_fcall f_2218(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5458,25 +5455,25 @@ 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);
+C_save_and_reclaim((void*)trf_2218,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2222,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t5=(C_word)C_eqp(*((C_word*)lf[43]+1),t2);
if(C_truep(t5)){
t6=t4;
-f_2224(t6,*((C_word*)lf[45]+1));}
+f_2222(t6,*((C_word*)lf[44]+1));}
else{
-t6=(C_word)C_eqp(*((C_word*)lf[46]+1),t2);
+t6=(C_word)C_eqp(*((C_word*)lf[45]+1),t2);
if(C_truep(t6)){
-t7=*((C_word*)lf[47]+1);
+t7=*((C_word*)lf[46]+1);
t8=t4;
-f_2224(t8,t7);}
+f_2222(t8,t7);}
else{
-t7=(C_word)C_eqp(*((C_word*)lf[48]+1),t2);
+t7=(C_word)C_eqp(*((C_word*)lf[47]+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_2222(t8,(C_truep(t7)?*((C_word*)lf[48]+1):(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2247,a[2]=t2,a[3]=((C_word)li64),tmp=(C_word)a,a+=4,tmp)));}}}
-/* f_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){
+/* f_2247 in body362 in alist-ref in k1288 */
+static void C_ccall f_2247(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5486,15 +5483,15 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_2247,4,t0,t1,t2,t3);}
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2253,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=((C_word)li63),tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
-f_2255(t7,t1,t3);}
+f_2253(t7,t1,t3);}
/* loop */
-static void C_fcall f_2255(C_word t0,C_word t1,C_word t2){
+static void C_fcall f_2253(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5503,24 +5500,24 @@ 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);}
+C_save_and_reclaim((void*)trf_2253,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
t3=(C_word)C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2271,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2269,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
if(C_truep((C_word)C_i_pairp(t3))){
t5=(C_word)C_slot(t3,C_fix(0));
-/* data-structures.scm: 303 cmp */
+/* data-structures.scm: 301 cmp */
t6=((C_word*)t0)[3];
((C_proc4)C_retrieve_proc(t6))(4,t6,t4,t5,((C_word*)t0)[2]);}
else{
t5=t4;
-f_2271(2,t5,C_SCHEME_FALSE);}}
+f_2269(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){
+/* k2267 in loop */
+static void C_ccall f_2269(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5530,26 +5527,26 @@ 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 */
+/* data-structures.scm: 303 loop */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_2255(t3,((C_word*)t0)[5],t2);}}
+f_2253(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){
+/* k2220 in body362 in alist-ref in k1288 */
+static void C_fcall f_2222(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_2222,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2225,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 304 aq */
t3=t1;
((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k2223 in k2220 in body362 in alist-ref in k1288 */
+static void C_ccall f_2225(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5562,8 +5559,8 @@ 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,...){
+/* alist-update! in k1288 */
+static void C_ccall f_2117(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...){
C_word tmp;
C_word t5;
va_list v;
@@ -5572,34 +5569,34 @@ 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);}
+C_save_and_reclaim((void*)tr5r,(void*)f_2117r,5,t0,t1,t2,t3,t4);}
else{
a=C_alloc((c-5)*3);
t5=C_restore_rest(a,C_rest_count(0));
-f_2119r(t0,t1,t2,t3,t4,t5);}}
+f_2117r(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){
+static void C_ccall f_2117r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word t8;
C_word *a=C_alloc(6);
-t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2123,a[2]=t2,a[3]=t1,a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2121,a[2]=t2,a[3]=t1,a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
if(C_truep((C_word)C_i_nullp(t5))){
t7=t6;
-f_2123(2,t7,*((C_word*)lf[46]+1));}
+f_2121(2,t7,*((C_word*)lf[45]+1));}
else{
t7=(C_word)C_i_cdr(t5);
if(C_truep((C_word)C_i_nullp(t7))){
t8=t6;
-f_2123(2,t8,(C_word)C_i_car(t5));}
+f_2121(2,t8,(C_word)C_i_car(t5));}
else{
/* ##sys#error */
-t8=*((C_word*)lf[32]+1);
+t8=*((C_word*)lf[31]+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){
+/* k2119 in alist-update! in k1288 */
+static void C_ccall f_2121(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5610,25 +5607,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_2121,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2124,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=(C_word)C_eqp(*((C_word*)lf[43]+1),t1);
if(C_truep(t3)){
t4=t2;
-f_2126(t4,*((C_word*)lf[45]+1));}
+f_2124(t4,*((C_word*)lf[44]+1));}
else{
-t4=(C_word)C_eqp(*((C_word*)lf[46]+1),t1);
+t4=(C_word)C_eqp(*((C_word*)lf[45]+1),t1);
if(C_truep(t4)){
-t5=*((C_word*)lf[47]+1);
+t5=*((C_word*)lf[46]+1);
t6=t2;
-f_2126(t6,t5);}
+f_2124(t6,t5);}
else{
-t5=(C_word)C_eqp(*((C_word*)lf[48]+1),t1);
+t5=(C_word)C_eqp(*((C_word*)lf[47]+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_2124(t6,(C_truep(t5)?*((C_word*)lf[48]+1):(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2156,a[2]=t1,a[3]=((C_word)li61),tmp=(C_word)a,a+=4,tmp)));}}}
-/* f_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){
+/* f_2156 in k2119 in alist-update! in k1288 */
+static void C_ccall f_2156(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5638,15 +5635,15 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_2156,4,t0,t1,t2,t3);}
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2162,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=((C_word)li60),tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
-f_2164(t7,t1,t3);}
+f_2162(t7,t1,t3);}
/* loop */
-static void C_fcall f_2164(C_word t0,C_word t1,C_word t2){
+static void C_fcall f_2162(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5655,24 +5652,24 @@ 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);}
+C_save_and_reclaim((void*)trf_2162,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
t3=(C_word)C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2180,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2178,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
if(C_truep((C_word)C_i_pairp(t3))){
t5=(C_word)C_slot(t3,C_fix(0));
-/* data-structures.scm: 284 cmp */
+/* data-structures.scm: 282 cmp */
t6=((C_word*)t0)[3];
((C_proc4)C_retrieve_proc(t6))(4,t6,t4,t5,((C_word*)t0)[2]);}
else{
t5=t4;
-f_2180(2,t5,C_SCHEME_FALSE);}}
+f_2178(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){
+/* k2176 in loop */
+static void C_ccall f_2178(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5682,26 +5679,26 @@ 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 */
+/* data-structures.scm: 284 loop */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_2164(t3,((C_word*)t0)[5],t2);}}
+f_2162(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){
+/* k2122 in k2119 in alist-update! in k1288 */
+static void C_fcall f_2124(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_2124,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2127,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* data-structures.scm: 285 aq */
t3=t1;
((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[2],((C_word*)t0)[4]);}
-/* 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){
+/* k2125 in k2122 in k2119 in alist-update! in k1288 */
+static void C_ccall f_2127(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5710,7 +5707,7 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2127,2,t0,t1);}
if(C_truep(t1)){
t2=(C_word)C_i_setslot(t1,C_fix(1),((C_word*)t0)[5]);
t3=((C_word*)t0)[4];
@@ -5721,8 +5718,8 @@ 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){
+/* shuffle in k1288 */
+static void C_ccall f_2007(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5743,26 +5740,26 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_2007,4,t0,t1,t2,t3);}
t4=(C_word)C_i_length(t2);
t5=C_SCHEME_END_OF_LIST;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_FALSE;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2020,a[2]=t1,a[3]=t6,a[4]=t8,tmp=(C_word)a,a+=5,tmp);
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2018,a[2]=t1,a[3]=t6,a[4]=t8,tmp=(C_word)a,a+=5,tmp);
t10=C_SCHEME_END_OF_LIST;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
t12=C_SCHEME_FALSE;
t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
-t14=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2059,a[2]=t9,tmp=(C_word)a,a+=3,tmp);
+t14=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2057,a[2]=t9,tmp=(C_word)a,a+=3,tmp);
t15=C_SCHEME_UNDEFINED;
t16=(*a=C_VECTOR_TYPE|1,a[1]=t15,tmp=(C_word)a,a+=2,tmp);
-t17=C_set_block_item(t16,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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));
+t17=C_set_block_item(t16,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2073,a[2]=t11,a[3]=t16,a[4]=t13,a[5]=t4,a[6]=t3,a[7]=((C_word)li58),tmp=(C_word)a,a+=8,tmp));
t18=((C_word*)t16)[1];
-f_2075(t18,t14,t2);}
+f_2073(t18,t14,t2);}
-/* loop286 in shuffle in k1289 */
-static void C_fcall f_2075(C_word t0,C_word t1,C_word t2){
+/* loop286 in shuffle in k1288 */
+static void C_fcall f_2073(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5772,21 +5769,21 @@ 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);}
+C_save_and_reclaim((void*)trf_2073,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2100,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li57),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2111,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
/* g302303 */
t6=t3;
-f_2102(t6,t4,t5);}
+f_2100(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* k2111 in loop286 in shuffle in k1289 */
-static void C_ccall f_2113(C_word c,C_word t0,C_word t1){
+/* k2109 in loop286 in shuffle in k1288 */
+static void C_ccall f_2111(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5799,7 +5796,7 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2111,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
@@ -5807,56 +5804,56 @@ 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);}
+f_2073(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
/* loop286299 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_2075(t6,((C_word*)t0)[3],t5);}}
+f_2073(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){
+/* g302 in loop286 in shuffle in k1288 */
+static void C_fcall f_2100(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_2100,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2108,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 267 random */
t4=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
-/* k2108 in g302 in loop286 in shuffle in k1289 */
-static void C_ccall f_2110(C_word c,C_word t0,C_word t1){
+/* k2106 in g302 in loop286 in shuffle in k1288 */
+static void C_ccall f_2108(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_2110,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_2108,2,t0,t1);}
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[2]));}
-/* k2057 in shuffle in k1289 */
-static void C_ccall f_2059(C_word c,C_word t0,C_word t1){
+/* k2055 in shuffle in k1288 */
+static void C_ccall f_2057(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_2057,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2059,a[2]=((C_word)li56),tmp=(C_word)a,a+=3,tmp);
+/* data-structures.scm: 267 sort! */
+t3=*((C_word*)lf[41]+1);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],t1,t2);}
-/* 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){
+/* a2058 in k2055 in shuffle in k1288 */
+static void C_ccall f_2059(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5865,14 +5862,14 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_2059,4,t0,t1,t2,t3);}
t4=(C_word)C_i_car(t2);
t5=(C_word)C_i_car(t3);
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_i_lessp(t4,t5));}
-/* k2018 in shuffle in k1289 */
-static void C_ccall f_2020(C_word c,C_word t0,C_word t1){
+/* k2016 in shuffle in k1288 */
+static void C_ccall f_2018(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5881,15 +5878,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2018,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2020,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word)li55),tmp=(C_word)a,a+=6,tmp));
t5=((C_word*)t3)[1];
-f_2022(t5,((C_word*)t0)[2],t1);}
+f_2020(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){
+/* loop263 in k2016 in shuffle in k1288 */
+static void C_fcall f_2020(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5899,10 +5896,10 @@ 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);}
+C_save_and_reclaim((void*)trf_2020,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_pairp(t2))){
-t3=*((C_word*)lf[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);
+t3=*((C_word*)lf[40]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2049,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t5=(C_word)C_slot(t2,C_fix(0));
/* g279280 */
t6=t3;
@@ -5912,8 +5909,8 @@ 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){
+/* k2047 in loop263 in k2016 in shuffle in k1288 */
+static void C_ccall f_2049(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5926,7 +5923,7 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_2049,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
@@ -5934,17 +5931,17 @@ 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);}
+f_2020(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
/* loop263276 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_2022(t6,((C_word*)t0)[3],t5);}}
+f_2020(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){
+/* compress in k1288 */
+static void C_ccall f_1927(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5956,17 +5953,17 @@ 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]);
+C_save_and_reclaim((void*)tr4,(void*)f_1927,4,t0,t1,t2,t3);}
+t4=lf[36];
+t5=(C_word)C_i_check_list_2(t3,lf[35]);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1938,a[2]=t4,a[3]=t7,a[4]=((C_word)li53),tmp=(C_word)a,a+=5,tmp));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1936,a[2]=t4,a[3]=t7,a[4]=((C_word)li53),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
-f_1938(t9,t1,t2,t3);}
+f_1936(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){
+/* loop in compress in k1288 */
+static void C_fcall f_1936(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5983,7 +5980,7 @@ 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);}
+C_save_and_reclaim((void*)trf_1936,NULL,4,t0,t1,t2,t3);}
if(C_truep((C_word)C_i_nullp(t2))){
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
@@ -5992,10 +5989,10 @@ 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);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1978,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t6=(C_word)C_slot(t2,C_fix(1));
t7=(C_word)C_slot(t3,C_fix(1));
-/* data-structures.scm: 261 loop */
+/* data-structures.scm: 259 loop */
t11=t5;
t12=t6;
t13=t7;
@@ -6006,7 +6003,7 @@ 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 */
+/* data-structures.scm: 260 loop */
t11=t1;
t12=t4;
t13=t5;
@@ -6015,27 +6012,27 @@ 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);}}}
+t4=*((C_word*)lf[37]+1);
+((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t1,lf[38],lf[35],((C_word*)t0)[2],t3);}}
+else{
+/* data-structures.scm: 256 ##sys#signal-hook */
+t4=*((C_word*)lf[37]+1);
+((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t1,lf[38],lf[35],((C_word*)t0)[2],t2);}}}
-/* k1978 in loop in compress in k1289 */
-static void C_ccall f_1980(C_word c,C_word t0,C_word t1){
+/* k1976 in loop in compress in k1288 */
+static void C_ccall f_1978(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1980,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1978,2,t0,t1);}
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-/* join in k1289 */
-static void C_ccall f_1870(C_word c,C_word t0,C_word t1,C_word t2,...){
+/* join in k1288 */
+static void C_ccall f_1868(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -6044,13 +6041,13 @@ 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);}
+C_save_and_reclaim((void*)tr3rv,(void*)f_1868r,3,t0,t1,t2);}
else{
a=C_alloc((c-3)*3);
t3=C_restore_rest_vector(a,C_rest_count(0));
-f_1870r(t0,t1,t2,t3);}}
+f_1868r(t0,t1,t2,t3);}}
-static void C_ccall f_1870r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_1868r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -6062,15 +6059,15 @@ 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]);
+t6=(C_word)C_i_check_list_2(t5,lf[33]);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1882,a[2]=t8,a[3]=t5,a[4]=((C_word)li51),tmp=(C_word)a,a+=5,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1880,a[2]=t8,a[3]=t5,a[4]=((C_word)li51),tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
-f_1882(t10,t1,t2);}
+f_1880(t10,t1,t2);}
-/* loop in join in k1289 */
-static void C_fcall f_1882(C_word t0,C_word t1,C_word t2){
+/* loop in join in k1288 */
+static void C_fcall f_1880(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6083,7 +6080,7 @@ 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);}
+C_save_and_reclaim((void*)trf_1880,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_nullp(t2))){
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
@@ -6095,29 +6092,29 @@ 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 */
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1915,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 247 loop */
t7=t5;
t8=t4;
t1=t7;
t2=t8;
goto loop;}}
else{
-/* data-structures.scm: 243 ##sys#error-not-a-proper-list */
-t3=*((C_word*)lf[35]+1);
+/* data-structures.scm: 241 ##sys#error-not-a-proper-list */
+t3=*((C_word*)lf[34]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,t2);}}}
-/* k1915 in loop in join in k1289 */
-static void C_ccall f_1917(C_word c,C_word t0,C_word t1){
+/* k1913 in loop in join in k1288 */
+static void C_ccall f_1915(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 249 ##sys#append */
-t2=*((C_word*)lf[22]+1);
+/* data-structures.scm: 247 ##sys#append */
+t2=*((C_word*)lf[21]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* chop in k1289 */
-static void C_ccall f_1785(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
+/* chop in k1288 */
+static void C_ccall f_1783(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -6126,19 +6123,19 @@ 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);
+C_save_and_reclaim((void*)tr4,(void*)f_1783,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_exact_2(t3,lf[30]);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1790,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
if(C_truep((C_word)C_fixnum_less_or_equal_p(t3,C_fix(0)))){
-/* data-structures.scm: 224 ##sys#error */
-t6=*((C_word*)lf[32]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[31],lf[33],t3);}
+/* data-structures.scm: 222 ##sys#error */
+t6=*((C_word*)lf[31]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[30],lf[32],t3);}
else{
t6=t5;
-f_1792(2,t6,C_SCHEME_UNDEFINED);}}
+f_1790(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){
+/* k1788 in chop in k1288 */
+static void C_ccall f_1790(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6148,16 +6145,16 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_1790,2,t0,t1);}
t2=(C_word)C_i_length(((C_word*)t0)[5]);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1798,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=((C_word*)t0)[4],a[5]=((C_word)li49),tmp=(C_word)a,a+=6,tmp));
t6=((C_word*)t4)[1];
-f_1800(t6,((C_word*)t0)[2],((C_word*)t0)[5],t2);}
+f_1798(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){
+/* loop in k1788 in chop in k1288 */
+static void C_fcall f_1798(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -6166,7 +6163,7 @@ 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);}
+C_save_and_reclaim((void*)trf_1798,NULL,4,t0,t1,t2,t3);}
if(C_truep((C_word)C_i_nullp(t2))){
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}
@@ -6177,12 +6174,12 @@ t4=t1;
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));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1819,a[2]=t5,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t3,a[7]=((C_word)li48),tmp=(C_word)a,a+=8,tmp));
t7=((C_word*)t5)[1];
-f_1821(t7,t1,C_SCHEME_END_OF_LIST,t2,((C_word*)t0)[4]);}}}
+f_1819(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){
+/* doloop205 in loop in k1788 in chop in k1288 */
+static void C_fcall f_1819(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -6200,11 +6197,11 @@ 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);}
+C_save_and_reclaim((void*)trf_1819,NULL,5,t0,t1,t2,t3,t4);}
t5=(C_word)C_eqp(t4,C_fix(0));
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1833,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+/* data-structures.scm: 233 reverse */
t7=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t7))(3,t7,t6,t2);}
else{
@@ -6222,8 +6219,8 @@ 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){
+/* k1831 in doloop205 in loop in k1788 in chop in k1288 */
+static void C_ccall f_1833(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6231,26 +6228,26 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_1833,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1837,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
t3=(C_word)C_fixnum_difference(((C_word*)t0)[5],((C_word*)t0)[4]);
-/* data-structures.scm: 235 loop */
+/* data-structures.scm: 233 loop */
t4=((C_word*)((C_word*)t0)[3])[1];
-f_1800(t4,t2,((C_word*)t0)[2],t3);}
+f_1798(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){
+/* k1835 in k1831 in doloop205 in loop in k1788 in chop in k1288 */
+static void C_ccall f_1837(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1839,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1837,2,t0,t1);}
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-/* flatten in k1289 */
-static void C_ccall f_1744(C_word c,C_word t0,C_word t1,...){
+/* flatten in k1288 */
+static void C_ccall f_1742(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -6258,13 +6255,13 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_1742r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_1744r(t0,t1,t2);}}
+f_1742r(t0,t1,t2);}}
-static void C_ccall f_1744r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_1742r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6273,12 +6270,12 @@ 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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1748,a[2]=t4,a[3]=((C_word)li46),tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
-f_1750(t6,t1,t2,C_SCHEME_END_OF_LIST);}
+f_1748(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){
+/* loop in flatten in k1288 */
+static void C_fcall f_1748(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -6294,7 +6291,7 @@ 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);}
+C_save_and_reclaim((void*)trf_1748,NULL,4,t0,t1,t2,t3);}
if(C_truep((C_word)C_i_nullp(t2))){
t4=t3;
t5=t1;
@@ -6303,8 +6300,8 @@ 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 */
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1774,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 214 loop */
t10=t6;
t11=t5;
t12=t3;
@@ -6313,8 +6310,8 @@ 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 */
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1781,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 215 loop */
t10=t6;
t11=t5;
t12=t3;
@@ -6323,28 +6320,28 @@ 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){
+/* k1779 in loop in flatten in k1288 */
+static void C_ccall f_1781(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1783,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1781,2,t0,t1);}
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-/* k1774 in loop in flatten in k1289 */
-static void C_ccall f_1776(C_word c,C_word t0,C_word t1){
+/* k1772 in loop in flatten in k1288 */
+static void C_ccall f_1774(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 216 loop */
+/* data-structures.scm: 214 loop */
t2=((C_word*)((C_word*)t0)[4])[1];
-f_1750(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+f_1748(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){
+/* butlast in k1288 */
+static void C_ccall f_1710(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6355,16 +6352,16 @@ 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]);
+C_save_and_reclaim((void*)tr3,(void*)f_1710,3,t0,t1,t2);}
+t3=(C_word)C_i_check_pair_2(t2,lf[28]);
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1721,a[2]=t5,a[3]=((C_word)li44),tmp=(C_word)a,a+=4,tmp));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1719,a[2]=t5,a[3]=((C_word)li44),tmp=(C_word)a,a+=4,tmp));
t7=((C_word*)t5)[1];
-f_1721(t7,t1,t2);}
+f_1719(t7,t1,t2);}
-/* loop in butlast in k1289 */
-static void C_fcall f_1721(C_word t0,C_word t1,C_word t2){
+/* loop in butlast in k1288 */
+static void C_fcall f_1719(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6378,13 +6375,13 @@ 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);}
+C_save_and_reclaim((void*)trf_1719,NULL,3,t0,t1,t2);}
t3=(C_word)C_slot(t2,C_fix(1));
t4=(C_truep((C_word)C_blockp(t3))?(C_word)C_pairp(t3):C_SCHEME_FALSE);
if(C_truep(t4)){
t5=(C_word)C_slot(t2,C_fix(0));
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1742,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
-/* data-structures.scm: 206 loop */
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1740,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 204 loop */
t8=t6;
t9=t3;
t1=t8;
@@ -6394,19 +6391,19 @@ 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){
+/* k1738 in loop in butlast in k1288 */
+static void C_ccall f_1740(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1742,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1740,2,t0,t1);}
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
-/* intersperse in k1289 */
-static void C_ccall f_1679(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
+/* intersperse in k1288 */
+static void C_ccall f_1677(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -6416,15 +6413,15 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_1677,4,t0,t1,t2,t3);}
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1685,a[2]=t5,a[3]=t3,a[4]=((C_word)li42),tmp=(C_word)a,a+=5,tmp));
+t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1683,a[2]=t5,a[3]=t3,a[4]=((C_word)li42),tmp=(C_word)a,a+=5,tmp));
t7=((C_word*)t5)[1];
-f_1685(t7,t1,t2);}
+f_1683(t7,t1,t2);}
-/* loop in intersperse in k1289 */
-static void C_fcall f_1685(C_word t0,C_word t1,C_word t2){
+/* loop in intersperse in k1288 */
+static void C_fcall f_1683(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6438,7 +6435,7 @@ 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);}
+C_save_and_reclaim((void*)trf_1683,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_eqp(t2,C_SCHEME_END_OF_LIST))){
t3=t2;
t4=t1;
@@ -6450,29 +6447,29 @@ 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 */
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1708,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 197 loop */
t8=t5;
t9=t3;
t1=t8;
t2=t9;
goto loop;}}}
-/* k1708 in loop in intersperse in k1289 */
-static void C_ccall f_1710(C_word c,C_word t0,C_word t1){
+/* k1706 in loop in intersperse in k1288 */
+static void C_ccall f_1708(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1710,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1708,2,t0,t1);}
t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
t3=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
-/* tail? in k1289 */
-static void C_ccall f_1651(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
+/* tail? in k1288 */
+static void C_ccall f_1649(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -6482,19 +6479,19 @@ 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]);
+C_save_and_reclaim((void*)tr4,(void*)f_1649,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_list_2(t3,lf[26]);
t5=(C_word)C_eqp(t2,C_SCHEME_END_OF_LIST);
if(C_truep(t5)){
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
else{
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1663,a[2]=t2,a[3]=((C_word)li40),tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1661,a[2]=t2,a[3]=((C_word)li40),tmp=(C_word)a,a+=4,tmp);
t7=t1;
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,f_1663(t6,t3));}}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,f_1661(t6,t3));}}
-/* loop in tail? in k1289 */
-static C_word C_fcall f_1663(C_word t0,C_word t1){
+/* loop in tail? in k1288 */
+static C_word C_fcall f_1661(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6512,20 +6509,20 @@ 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){
+/* atom? in k1288 */
+static void C_ccall f_1646(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1648,3,t0,t1,t2);}
+C_save_and_reclaim((void*)tr3,(void*)f_1646,3,t0,t1,t2);}
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_not_pair_p(t2));}
-/* right-section in k1289 */
-static void C_ccall f_1622(C_word c,C_word t0,C_word t1,C_word t2,...){
+/* right-section in k1288 */
+static void C_ccall f_1620(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -6534,49 +6531,49 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_1620r,3,t0,t1,t2);}
else{
a=C_alloc((c-3)*3);
t3=C_restore_rest(a,C_rest_count(0));
-f_1622r(t0,t1,t2,t3);}}
+f_1620r(t0,t1,t2,t3);}}
-static void C_ccall f_1622r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_1620r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word *a=C_alloc(6);
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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]);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1624,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+/* data-structures.scm: 171 ##sys#check-closure */
+t5=*((C_word*)lf[22]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[24]);}
-/* k1624 in right-section in k1289 */
-static void C_ccall f_1626(C_word c,C_word t0,C_word t1){
+/* k1622 in right-section in k1288 */
+static void C_ccall f_1624(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_1624,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1627,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 172 ##sys#reverse */
t3=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-/* k1627 in k1624 in right-section in k1289 */
-static void C_ccall f_1629(C_word c,C_word t0,C_word t1){
+/* k1625 in k1622 in right-section in k1288 */
+static void C_ccall f_1627(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1629,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1627,2,t0,t1);}
t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1628,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word)li37),tmp=(C_word)a,a+=6,tmp));}
-/* f_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,...){
+/* f_1628 in k1625 in k1622 in right-section in k1288 */
+static void C_ccall f_1628(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -6584,53 +6581,53 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_1628r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_1630r(t0,t1,t2);}}
+f_1628r(t0,t1,t2);}}
-static void C_ccall f_1630r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_1628r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a=C_alloc(12);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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 */
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1636,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1640,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1644,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 174 ##sys#reverse */
t6=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t2);}
-/* k1644 */
-static void C_ccall f_1646(C_word c,C_word t0,C_word t1){
+/* k1642 */
+static void C_ccall f_1644(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 176 ##sys#append */
-t2=*((C_word*)lf[22]+1);
+/* data-structures.scm: 174 ##sys#append */
+t2=*((C_word*)lf[21]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* k1640 */
-static void C_ccall f_1642(C_word c,C_word t0,C_word t1){
+/* k1638 */
+static void C_ccall f_1640(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 176 ##sys#reverse */
+/* data-structures.scm: 174 ##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){
+/* k1634 */
+static void C_ccall f_1636(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_apply(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* left-section in k1289 */
-static void C_ccall f_1607(C_word c,C_word t0,C_word t1,C_word t2,...){
+/* left-section in k1288 */
+static void C_ccall f_1605(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -6639,35 +6636,35 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_1605r,3,t0,t1,t2);}
else{
a=C_alloc((c-3)*3);
t3=C_restore_rest(a,C_rest_count(0));
-f_1607r(t0,t1,t2,t3);}}
+f_1605r(t0,t1,t2,t3);}}
-static void C_ccall f_1607r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_1605r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word *a=C_alloc(5);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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]);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1609,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 164 ##sys#check-closure */
+t5=*((C_word*)lf[22]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[20]);}
-/* k1609 in left-section in k1289 */
-static void C_ccall f_1611(C_word c,C_word t0,C_word t1){
+/* k1607 in left-section in k1288 */
+static void C_ccall f_1609(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1611,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1609,2,t0,t1);}
t2=((C_word*)t0)[4];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1610,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word)li35),tmp=(C_word)a,a+=5,tmp));}
-/* f_1612 in k1609 in left-section in k1289 */
-static void C_ccall f_1612(C_word c,C_word t0,C_word t1,...){
+/* f_1610 in k1607 in left-section in k1288 */
+static void C_ccall f_1610(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -6675,77 +6672,77 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_1610r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_1612r(t0,t1,t2);}}
+f_1610r(t0,t1,t2);}}
-static void C_ccall f_1612r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_1610r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1618,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 166 ##sys#append */
+t4=*((C_word*)lf[21]+1);
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[2],t2);}
-/* k1618 */
-static void C_ccall f_1620(C_word c,C_word t0,C_word t1){
+/* k1616 */
+static void C_ccall f_1618(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_apply(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* never? in k1289 */
-static void C_ccall f_1604(C_word c,C_word t0,C_word t1,...){
+/* never? in k1288 */
+static void C_ccall f_1602(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1604,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1602,2,t0,t1);}
t2=t1;
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-/* always? in k1289 */
-static void C_ccall f_1601(C_word c,C_word t0,C_word t1,...){
+/* always? in k1288 */
+static void C_ccall f_1599(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1601,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1599,2,t0,t1);}
t2=t1;
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
-/* none? in k1289 */
-static void C_ccall f_1598(C_word c,C_word t0,C_word t1,C_word t2){
+/* none? in k1288 */
+static void C_ccall f_1596(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1598,3,t0,t1,t2);}
+C_save_and_reclaim((void*)tr3,(void*)f_1596,3,t0,t1,t2);}
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-/* any? in k1289 */
-static void C_ccall f_1595(C_word c,C_word t0,C_word t1,C_word t2){
+/* any? in k1288 */
+static void C_ccall f_1593(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1595,3,t0,t1,t2);}
+C_save_and_reclaim((void*)tr3,(void*)f_1593,3,t0,t1,t2);}
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_TRUE);}
-/* each in k1289 */
-static void C_ccall f_1539(C_word c,C_word t0,C_word t1,...){
+/* each in k1288 */
+static void C_ccall f_1537(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -6753,13 +6750,13 @@ 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);}
+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_1539r(t0,t1,t2);}}
+f_1537r(t0,t1,t2);}}
-static void C_ccall f_1539r(C_word t0,C_word t1,C_word 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;
@@ -6767,17 +6764,17 @@ 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);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1545,a[2]=((C_word)li27),tmp=(C_word)a,a+=3,tmp);
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
t3=(C_word)C_slot(t2,C_fix(1));
t4=(C_word)C_i_nullp(t3);
t5=t1;
-((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_truep(t4)?(C_word)C_slot(t2,C_fix(0)):(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1561,a[2]=t2,a[3]=((C_word)li29),tmp=(C_word)a,a+=4,tmp)));}}
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_truep(t4)?(C_word)C_slot(t2,C_fix(0)):(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1559,a[2]=t2,a[3]=((C_word)li29),tmp=(C_word)a,a+=4,tmp)));}}
-/* f_1561 in each in k1289 */
-static void C_ccall f_1561(C_word c,C_word t0,C_word t1,...){
+/* f_1559 in each in k1288 */
+static void C_ccall f_1559(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -6785,13 +6782,13 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_1559r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_1561r(t0,t1,t2);}}
+f_1559r(t0,t1,t2);}}
-static void C_ccall f_1561r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_1559r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6800,12 +6797,12 @@ 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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1565,a[2]=t4,a[3]=t2,a[4]=((C_word)li28),tmp=(C_word)a,a+=5,tmp));
t6=((C_word*)t4)[1];
-f_1567(t6,t1,((C_word*)t0)[2]);}
+f_1565(t6,t1,((C_word*)t0)[2]);}
/* loop */
-static void C_fcall f_1567(C_word t0,C_word t1,C_word t2){
+static void C_fcall f_1565(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6814,60 +6811,60 @@ 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);}
+C_save_and_reclaim((void*)trf_1565,NULL,3,t0,t1,t2);}
t3=(C_word)C_slot(t2,C_fix(0));
t4=(C_word)C_slot(t2,C_fix(1));
if(C_truep((C_word)C_i_nullp(t4))){
C_apply(4,0,t1,t3,((C_word*)t0)[3]);}
else{
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1586,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1584,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
C_apply(4,0,t5,t3,((C_word*)t0)[3]);}}
-/* k1584 in loop */
-static void C_ccall f_1586(C_word c,C_word t0,C_word t1){
+/* k1582 in loop */
+static void C_ccall f_1584(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* data-structures.scm: 155 loop */
+/* data-structures.scm: 153 loop */
t2=((C_word*)((C_word*)t0)[4])[1];
-f_1567(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_1565(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,...){
+/* f_1545 in each in k1288 */
+static void C_ccall f_1545(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1547,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1545,2,t0,t1);}
t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,*((C_word*)lf[15]+1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,*((C_word*)lf[14]+1));}
-/* noop in k1289 */
-static void C_ccall f_1533(C_word c,C_word t0,C_word t1,...){
+/* noop in k1288 */
+static void C_ccall f_1531(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1533,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1531,2,t0,t1);}
t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,*((C_word*)lf[15]+1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,*((C_word*)lf[14]+1));}
-/* list-of? in k1289 */
-static void C_ccall f_1492(C_word c,C_word t0,C_word t1,C_word t2){
+/* list-of? in k1288 */
+static void C_ccall f_1491(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word ab[4],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1492,3,t0,t1,t2);}
+C_save_and_reclaim((void*)tr3,(void*)f_1491,3,t0,t1,t2);}
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1494,a[2]=t2,a[3]=((C_word)li24),tmp=(C_word)a,a+=4,tmp));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1493,a[2]=t2,a[3]=((C_word)li24),tmp=(C_word)a,a+=4,tmp));}
-/* f_1494 in list-of? in k1289 */
-static void C_ccall f_1494(C_word c,C_word t0,C_word t1,C_word t2){
+/* f_1493 in list-of? in k1288 */
+static void C_ccall f_1493(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6877,15 +6874,15 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_1493,3,t0,t1,t2);}
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1500,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word)li23),tmp=(C_word)a,a+=5,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1499,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word)li23),tmp=(C_word)a,a+=5,tmp));
t6=((C_word*)t4)[1];
-f_1500(t6,t1,t2);}
+f_1499(t6,t1,t2);}
/* loop */
-static void C_fcall f_1500(C_word t0,C_word t1,C_word t2){
+static void C_fcall f_1499(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6893,7 +6890,7 @@ 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);}
+C_save_and_reclaim((void*)trf_1499,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_nullp(t2))){
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_TRUE);}
@@ -6902,14 +6899,14 @@ 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);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1518,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t4=(C_word)C_slot(t2,C_fix(0));
/* data-structures.scm: 136 pred */
t5=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t5))(3,t5,t3,t4);}}}
-/* k1517 in loop */
-static void C_ccall f_1519(C_word c,C_word t0,C_word t1){
+/* k1516 in loop */
+static void C_ccall f_1518(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6918,13 +6915,13 @@ 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);}
+f_1499(t3,((C_word*)t0)[2],t2);}
else{
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-/* o in k1289 */
-static void C_ccall f_1453(C_word c,C_word t0,C_word t1,...){
+/* o in k1288 */
+static void C_ccall f_1452(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -6932,13 +6929,13 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_1452r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_1453r(t0,t1,t2);}}
+f_1452r(t0,t1,t2);}}
-static void C_ccall f_1453r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_1452r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6953,12 +6950,12 @@ t4=t1;
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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1464,a[2]=t4,a[3]=((C_word)li21),tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
-f_1465(t6,t1,t2);}}
+f_1464(t6,t1,t2);}}
-/* loop in o in k1289 */
-static void C_fcall f_1465(C_word t0,C_word t1,C_word t2){
+/* loop in o in k1288 */
+static void C_fcall f_1464(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6967,19 +6964,19 @@ 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);}
+C_save_and_reclaim((void*)trf_1464,NULL,3,t0,t1,t2);}
t3=(C_word)C_slot(t2,C_fix(0));
t4=(C_word)C_slot(t2,C_fix(1));
if(C_truep((C_word)C_i_nullp(t4))){
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
else{
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1478,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=((C_word)li20),tmp=(C_word)a,a+=6,tmp);
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-/* f_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){
+/* f_1478 in loop in o in k1288 */
+static void C_ccall f_1478(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6987,28 +6984,28 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_1478,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1486,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
/* data-structures.scm: 129 loop */
t4=((C_word*)((C_word*)t0)[3])[1];
-f_1465(t4,t3,((C_word*)t0)[2]);}
+f_1464(t4,t3,((C_word*)t0)[2]);}
-/* k1485 */
-static void C_ccall f_1487(C_word c,C_word t0,C_word t1){
+/* k1484 */
+static void C_ccall f_1486(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_1486,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1489,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
/* g8586 */
t3=t1;
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-/* k1488 in k1485 */
-static void C_ccall f_1490(C_word c,C_word t0,C_word t1){
+/* k1487 in k1484 */
+static void C_ccall f_1489(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
@@ -7016,8 +7013,8 @@ C_word *a;
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,...){
+/* compose in k1288 */
+static void C_ccall f_1416(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -7025,13 +7022,13 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_1416r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_1417r(t0,t1,t2);}}
+f_1416r(t0,t1,t2);}}
-static void C_ccall f_1417r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_1416r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7041,7 +7038,7 @@ 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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1419,a[2]=t4,a[3]=((C_word)li18),tmp=(C_word)a,a+=4,tmp));
if(C_truep((C_word)C_i_nullp(t2))){
t6=*((C_word*)lf[10]+1);
t7=t1;
@@ -7049,8 +7046,8 @@ t7=t1;
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,...){
+/* rec in compose in k1288 */
+static void C_ccall f_1419(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -7059,13 +7056,13 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_1419r,3,t0,t1,t2);}
else{
a=C_alloc((c-3)*3);
t3=C_restore_rest(a,C_rest_count(0));
-f_1420r(t0,t1,t2,t3);}}
+f_1419r(t0,t1,t2,t3);}}
-static void C_ccall f_1420r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_1419r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -7076,12 +7073,12 @@ 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);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1427,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=((C_word)li17),tmp=(C_word)a,a+=6,tmp);
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-/* f_1428 in rec in compose in k1289 */
-static void C_ccall f_1428(C_word c,C_word t0,C_word t1,...){
+/* f_1427 in rec in compose in k1288 */
+static void C_ccall f_1427(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -7089,23 +7086,23 @@ 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);}
+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_1428r(t0,t1,t2);}}
+f_1427r(t0,t1,t2);}}
-static void C_ccall f_1428r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_1427r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a=C_alloc(6);
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1433,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word)li16),tmp=(C_word)a,a+=6,tmp);
/* data-structures.scm: 114 call-with-values */
C_call_with_values(4,0,t1,t3,((C_word*)t0)[2]);}
-/* a1433 */
-static void C_ccall f_1434(C_word c,C_word t0,C_word t1){
+/* a1432 */
+static void C_ccall f_1433(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7113,31 +7110,31 @@ 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_save_and_reclaim((void*)tr2,(void*)f_1433,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1441,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
C_apply(4,0,t2,((C_word*)((C_word*)t0)[3])[1],((C_word*)t0)[2]);}
-/* k1440 in a1433 */
-static void C_ccall f_1442(C_word c,C_word t0,C_word t1){
+/* k1439 in a1432 */
+static void C_ccall f_1441(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_apply(4,0,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* complement in k1289 */
-static void C_ccall f_1405(C_word c,C_word t0,C_word t1,C_word t2){
+/* complement in k1288 */
+static void C_ccall f_1404(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word ab[4],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1405,3,t0,t1,t2);}
+C_save_and_reclaim((void*)tr3,(void*)f_1404,3,t0,t1,t2);}
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1407,a[2]=t2,a[3]=((C_word)li14),tmp=(C_word)a,a+=4,tmp));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1406,a[2]=t2,a[3]=((C_word)li14),tmp=(C_word)a,a+=4,tmp));}
-/* f_1407 in complement in k1289 */
-static void C_ccall f_1407(C_word c,C_word t0,C_word t1,...){
+/* f_1406 in complement in k1288 */
+static void C_ccall f_1406(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -7145,55 +7142,55 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_1406r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_1407r(t0,t1,t2);}}
+f_1406r(t0,t1,t2);}}
-static void C_ccall f_1407r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_1406r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1415,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1414,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
C_apply(4,0,t3,((C_word*)t0)[2],t2);}
-/* k1413 */
-static void C_ccall f_1415(C_word c,C_word t0,C_word t1){
+/* k1412 */
+static void C_ccall f_1414(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_i_not(t1));}
-/* flip in k1289 */
-static void C_ccall f_1397(C_word c,C_word t0,C_word t1,C_word t2){
+/* flip in k1288 */
+static void C_ccall f_1396(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word ab[4],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1397,3,t0,t1,t2);}
+C_save_and_reclaim((void*)tr3,(void*)f_1396,3,t0,t1,t2);}
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1399,a[2]=t2,a[3]=((C_word)li12),tmp=(C_word)a,a+=4,tmp));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1398,a[2]=t2,a[3]=((C_word)li12),tmp=(C_word)a,a+=4,tmp));}
-/* f_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){
+/* f_1398 in flip in k1288 */
+static void C_ccall f_1398(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr4,(void*)f_1399,4,t0,t1,t2,t3);}
+C_save_and_reclaim((void*)tr4,(void*)f_1398,4,t0,t1,t2,t3);}
/* data-structures.scm: 103 proc */
t4=((C_word*)t0)[2];
((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t3,t2);}
-/* constantly in k1289 */
-static void C_ccall f_1374(C_word c,C_word t0,C_word t1,...){
+/* constantly in k1288 */
+static void C_ccall f_1373(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -7201,13 +7198,13 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_1373r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_1374r(t0,t1,t2);}}
+f_1373r(t0,t1,t2);}}
-static void C_ccall f_1374r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_1373r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7220,37 +7217,37 @@ 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);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1384,a[2]=t5,a[3]=((C_word)li9),tmp=(C_word)a,a+=4,tmp);
t7=t1;
((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
else{
-t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1387,a[2]=t2,a[3]=((C_word)li10),tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1386,a[2]=t2,a[3]=((C_word)li10),tmp=(C_word)a,a+=4,tmp);
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
-/* f_1387 in constantly in k1289 */
-static void C_ccall f_1387(C_word c,C_word t0,C_word t1,...){
+/* f_1386 in constantly in k1288 */
+static void C_ccall f_1386(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1387,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1386,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,...){
+/* f_1384 in constantly in k1288 */
+static void C_ccall f_1384(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_1385,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_1384,2,t0,t1);}
t2=t1;
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
-/* disjoin in k1289 */
-static void C_ccall f_1337(C_word c,C_word t0,C_word t1,...){
+/* disjoin in k1288 */
+static void C_ccall f_1336(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -7258,21 +7255,21 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_1336r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_1337r(t0,t1,t2);}}
+f_1336r(t0,t1,t2);}}
-static void C_ccall f_1337r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_1336r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a=C_alloc(4);
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1339,a[2]=t2,a[3]=((C_word)li7),tmp=(C_word)a,a+=4,tmp));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1338,a[2]=t2,a[3]=((C_word)li7),tmp=(C_word)a,a+=4,tmp));}
-/* f_1339 in disjoin in k1289 */
-static void C_ccall f_1339(C_word c,C_word t0,C_word t1,C_word t2){
+/* f_1338 in disjoin in k1288 */
+static void C_ccall f_1338(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7282,15 +7279,15 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_1338,3,t0,t1,t2);}
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1345,a[2]=t2,a[3]=t4,a[4]=((C_word)li6),tmp=(C_word)a,a+=5,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1344,a[2]=t2,a[3]=t4,a[4]=((C_word)li6),tmp=(C_word)a,a+=5,tmp));
t6=((C_word*)t4)[1];
-f_1345(t6,t1,((C_word*)t0)[2]);}
+f_1344(t6,t1,((C_word*)t0)[2]);}
/* loop */
-static void C_fcall f_1345(C_word t0,C_word t1,C_word t2){
+static void C_fcall f_1344(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7298,19 +7295,19 @@ 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);}
+C_save_and_reclaim((void*)trf_1344,NULL,3,t0,t1,t2);}
if(C_truep((C_word)C_i_nullp(t2))){
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
else{
t3=(C_word)C_slot(t2,C_fix(0));
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1358,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1357,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* g5758 */
t5=t3;
((C_proc3)C_retrieve_proc(t5))(3,t5,t4,((C_word*)t0)[2]);}}
-/* k1356 in loop */
-static void C_ccall f_1358(C_word c,C_word t0,C_word t1){
+/* k1355 in loop */
+static void C_ccall f_1357(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7322,10 +7319,10 @@ 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);}}
+f_1344(t3,((C_word*)t0)[4],t2);}}
-/* conjoin in k1289 */
-static void C_ccall f_1304(C_word c,C_word t0,C_word t1,...){
+/* conjoin in k1288 */
+static void C_ccall f_1303(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -7333,21 +7330,21 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_1303r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_1304r(t0,t1,t2);}}
+f_1303r(t0,t1,t2);}}
-static void C_ccall f_1304r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_1303r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a=C_alloc(4);
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1306,a[2]=t2,a[3]=((C_word)li4),tmp=(C_word)a,a+=4,tmp));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1305,a[2]=t2,a[3]=((C_word)li4),tmp=(C_word)a,a+=4,tmp));}
-/* f_1306 in conjoin in k1289 */
-static void C_ccall f_1306(C_word c,C_word t0,C_word t1,C_word t2){
+/* f_1305 in conjoin in k1288 */
+static void C_ccall f_1305(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7357,15 +7354,15 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_1305,3,t0,t1,t2);}
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1312,a[2]=t2,a[3]=t4,a[4]=((C_word)li3),tmp=(C_word)a,a+=5,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1311,a[2]=t2,a[3]=t4,a[4]=((C_word)li3),tmp=(C_word)a,a+=5,tmp));
t6=((C_word*)t4)[1];
-f_1312(t6,t1,((C_word*)t0)[2]);}
+f_1311(t6,t1,((C_word*)t0)[2]);}
/* loop */
-static void C_fcall f_1312(C_word t0,C_word t1,C_word t2){
+static void C_fcall f_1311(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7374,20 +7371,20 @@ 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);}
+C_save_and_reclaim((void*)trf_1311,NULL,3,t0,t1,t2);}
t3=(C_word)C_i_nullp(t2);
if(C_truep(t3)){
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
t4=(C_word)C_slot(t2,C_fix(0));
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1328,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1327,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* g4243 */
t6=t4;
((C_proc3)C_retrieve_proc(t6))(3,t6,t5,((C_word*)t0)[2]);}}
-/* k1326 in loop */
-static void C_ccall f_1328(C_word c,C_word t0,C_word t1){
+/* k1325 in loop */
+static void C_ccall f_1327(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7396,25 +7393,25 @@ 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);}
+f_1311(t3,((C_word*)t0)[2],t2);}
else{
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-/* project in k1289 */
-static void C_ccall f_1296(C_word c,C_word t0,C_word t1,C_word t2){
+/* project in k1288 */
+static void C_ccall f_1295(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word ab[4],*a=ab;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1296,3,t0,t1,t2);}
+C_save_and_reclaim((void*)tr3,(void*)f_1295,3,t0,t1,t2);}
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1298,a[2]=t2,a[3]=((C_word)li1),tmp=(C_word)a,a+=4,tmp));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1297,a[2]=t2,a[3]=((C_word)li1),tmp=(C_word)a,a+=4,tmp));}
-/* f_1298 in project in k1289 */
-static void C_ccall f_1298(C_word c,C_word t0,C_word t1,...){
+/* f_1297 in project in k1288 */
+static void C_ccall f_1297(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -7422,298 +7419,298 @@ 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);}
+C_save_and_reclaim((void*)tr2rv,(void*)f_1297r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest_vector(a,C_rest_count(0));
-f_1298r(t0,t1,t2);}}
+f_1297r(t0,t1,t2);}}
-static void C_ccall f_1298r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_1297r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_vector_ref(t2,((C_word*)t0)[2]));}
-/* identity in k1289 */
-static void C_ccall f_1293(C_word c,C_word t0,C_word t1,C_word t2){
+/* identity in k1288 */
+static void C_ccall f_1292(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_1293,3,t0,t1,t2);}
+C_save_and_reclaim((void*)tr3,(void*)f_1292,3,t0,t1,t2);}
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
#ifdef C_ENABLE_PTABLES
static C_PTABLE_ENTRY ptable[267] = {
{"toplevel:data_structures_scm",(void*)C_data_structures_toplevel},
-{"f_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_1290:data_structures_scm",(void*)f_1290},
+{"f_4737:data_structures_scm",(void*)f_4737},
+{"f_4747:data_structures_scm",(void*)f_4747},
+{"f_4766:data_structures_scm",(void*)f_4766},
+{"f_4708:data_structures_scm",(void*)f_4708},
+{"f_4654:data_structures_scm",(void*)f_4654},
+{"f_4673:data_structures_scm",(void*)f_4673},
+{"f_4683:data_structures_scm",(void*)f_4683},
+{"f_4665:data_structures_scm",(void*)f_4665},
+{"f_4645:data_structures_scm",(void*)f_4645},
+{"f_4609:data_structures_scm",(void*)f_4609},
+{"f_4619:data_structures_scm",(void*)f_4619},
+{"f_4577:data_structures_scm",(void*)f_4577},
+{"f_4556:data_structures_scm",(void*)f_4556},
+{"f_4566:data_structures_scm",(void*)f_4566},
+{"f_4535:data_structures_scm",(void*)f_4535},
+{"f_4545:data_structures_scm",(void*)f_4545},
+{"f_4522:data_structures_scm",(void*)f_4522},
+{"f_4516:data_structures_scm",(void*)f_4516},
+{"f_4510:data_structures_scm",(void*)f_4510},
+{"f_4427:data_structures_scm",(void*)f_4427},
+{"f_4505:data_structures_scm",(void*)f_4505},
+{"f_4431:data_structures_scm",(void*)f_4431},
+{"f_4445:data_structures_scm",(void*)f_4445},
+{"f_4455:data_structures_scm",(void*)f_4455},
+{"f_4164:data_structures_scm",(void*)f_4164},
+{"f_4391:data_structures_scm",(void*)f_4391},
+{"f_4414:data_structures_scm",(void*)f_4414},
+{"f_4399:data_structures_scm",(void*)f_4399},
+{"f_4314:data_structures_scm",(void*)f_4314},
+{"f_4381:data_structures_scm",(void*)f_4381},
+{"f_4385:data_structures_scm",(void*)f_4385},
+{"f_4317:data_structures_scm",(void*)f_4317},
+{"f_4326:data_structures_scm",(void*)f_4326},
+{"f_4366:data_structures_scm",(void*)f_4366},
+{"f_4334:data_structures_scm",(void*)f_4334},
+{"f_4338:data_structures_scm",(void*)f_4338},
+{"f_4320:data_structures_scm",(void*)f_4320},
{"f_4255:data_structures_scm",(void*)f_4255},
-{"f_4241:data_structures_scm",(void*)f_4241},
-{"f_4175:data_structures_scm",(void*)f_4175},
-{"f_4181:data_structures_scm",(void*)f_4181},
+{"f_4259:data_structures_scm",(void*)f_4259},
+{"f_4268:data_structures_scm",(void*)f_4268},
+{"f_4300:data_structures_scm",(void*)f_4300},
+{"f_4276:data_structures_scm",(void*)f_4276},
+{"f_4280:data_structures_scm",(void*)f_4280},
+{"f_4262:data_structures_scm",(void*)f_4262},
{"f_4220:data_structures_scm",(void*)f_4220},
-{"f_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_4226:data_structures_scm",(void*)f_4226},
+{"f_4253:data_structures_scm",(void*)f_4253},
+{"f_4239:data_structures_scm",(void*)f_4239},
+{"f_4173:data_structures_scm",(void*)f_4173},
+{"f_4179:data_structures_scm",(void*)f_4179},
+{"f_4218:data_structures_scm",(void*)f_4218},
+{"f_4200:data_structures_scm",(void*)f_4200},
+{"f_4137:data_structures_scm",(void*)f_4137},
+{"f_4162:data_structures_scm",(void*)f_4162},
+{"f_4155:data_structures_scm",(void*)f_4155},
+{"f_4151:data_structures_scm",(void*)f_4151},
+{"f_4004:data_structures_scm",(void*)f_4004},
+{"f_4094:data_structures_scm",(void*)f_4094},
+{"f_4101:data_structures_scm",(void*)f_4101},
{"f_4103:data_structures_scm",(void*)f_4103},
-{"f_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_4007:data_structures_scm",(void*)f_4007},
+{"f_4058:data_structures_scm",(void*)f_4058},
+{"f_4017:data_structures_scm",(void*)f_4017},
+{"f_4020:data_structures_scm",(void*)f_4020},
+{"f_4026:data_structures_scm",(void*)f_4026},
+{"f_3872:data_structures_scm",(void*)f_3872},
+{"f_3954:data_structures_scm",(void*)f_3954},
+{"f_3977:data_structures_scm",(void*)f_3977},
+{"f_3957:data_structures_scm",(void*)f_3957},
+{"f_3875:data_structures_scm",(void*)f_3875},
+{"f_3882:data_structures_scm",(void*)f_3882},
+{"f_3773:data_structures_scm",(void*)f_3773},
+{"f_3807:data_structures_scm",(void*)f_3807},
+{"f_3814:data_structures_scm",(void*)f_3814},
+{"f_3862:data_structures_scm",(void*)f_3862},
+{"f_3834:data_structures_scm",(void*)f_3834},
+{"f_3664:data_structures_scm",(void*)f_3664},
+{"f_3739:data_structures_scm",(void*)f_3739},
+{"f_3767:data_structures_scm",(void*)f_3767},
+{"f_3691:data_structures_scm",(void*)f_3691},
+{"f_3701:data_structures_scm",(void*)f_3701},
+{"f_3612:data_structures_scm",(void*)f_3612},
+{"f_3616:data_structures_scm",(void*)f_3616},
+{"f_3548:data_structures_scm",(void*)f_3548},
+{"f_3563:data_structures_scm",(void*)f_3563},
+{"f_3594:data_structures_scm",(void*)f_3594},
+{"f_3598:data_structures_scm",(void*)f_3598},
+{"f_3583:data_structures_scm",(void*)f_3583},
+{"f_3426:data_structures_scm",(void*)f_3426},
+{"f_3438:data_structures_scm",(void*)f_3438},
+{"f_3471:data_structures_scm",(void*)f_3471},
+{"f_3536:data_structures_scm",(void*)f_3536},
+{"f_3510:data_structures_scm",(void*)f_3510},
+{"f_3466:data_structures_scm",(void*)f_3466},
+{"f_3452:data_structures_scm",(void*)f_3452},
+{"f_3224:data_structures_scm",(void*)f_3224},
+{"f_3418:data_structures_scm",(void*)f_3418},
+{"f_3401:data_structures_scm",(void*)f_3401},
+{"f_3261:data_structures_scm",(void*)f_3261},
+{"f_3264:data_structures_scm",(void*)f_3264},
+{"f_3276:data_structures_scm",(void*)f_3276},
+{"f_3281:data_structures_scm",(void*)f_3281},
+{"f_3300:data_structures_scm",(void*)f_3300},
+{"f_3227:data_structures_scm",(void*)f_3227},
+{"f_3232:data_structures_scm",(void*)f_3232},
+{"f_3238:data_structures_scm",(void*)f_3238},
+{"f_3109:data_structures_scm",(void*)f_3109},
+{"f_3113:data_structures_scm",(void*)f_3113},
+{"f_3127:data_structures_scm",(void*)f_3127},
+{"f_3137:data_structures_scm",(void*)f_3137},
+{"f_3142:data_structures_scm",(void*)f_3142},
+{"f_2974:data_structures_scm",(void*)f_2974},
+{"f_3015:data_structures_scm",(void*)f_3015},
+{"f_3042:data_structures_scm",(void*)f_3042},
+{"f_3081:data_structures_scm",(void*)f_3081},
+{"f_3025:data_structures_scm",(void*)f_3025},
+{"f_2995:data_structures_scm",(void*)f_2995},
+{"f_3010:data_structures_scm",(void*)f_3010},
+{"f_2894:data_structures_scm",(void*)f_2894},
+{"f_2911:data_structures_scm",(void*)f_2911},
+{"f_2906:data_structures_scm",(void*)f_2906},
+{"f_2901:data_structures_scm",(void*)f_2901},
{"f_2896:data_structures_scm",(void*)f_2896},
-{"f_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_2857:data_structures_scm",(void*)f_2857},
+{"f_2867:data_structures_scm",(void*)f_2867},
+{"f_2777:data_structures_scm",(void*)f_2777},
+{"f_2794:data_structures_scm",(void*)f_2794},
+{"f_2789:data_structures_scm",(void*)f_2789},
+{"f_2784:data_structures_scm",(void*)f_2784},
{"f_2779:data_structures_scm",(void*)f_2779},
-{"f_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_2740:data_structures_scm",(void*)f_2740},
+{"f_2750:data_structures_scm",(void*)f_2750},
+{"f_2709:data_structures_scm",(void*)f_2709},
+{"f_2678:data_structures_scm",(void*)f_2678},
+{"f_2650:data_structures_scm",(void*)f_2650},
+{"f_2654:data_structures_scm",(void*)f_2654},
+{"f_2622:data_structures_scm",(void*)f_2622},
+{"f_2626:data_structures_scm",(void*)f_2626},
+{"f_2613:data_structures_scm",(void*)f_2613},
+{"f_2619:data_structures_scm",(void*)f_2619},
+{"f_2604:data_structures_scm",(void*)f_2604},
+{"f_2610:data_structures_scm",(void*)f_2610},
+{"f_2557:data_structures_scm",(void*)f_2557},
+{"f_2578:data_structures_scm",(void*)f_2578},
+{"f_2591:data_structures_scm",(void*)f_2591},
+{"f_2512:data_structures_scm",(void*)f_2512},
{"f_2522:data_structures_scm",(void*)f_2522},
-{"f_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_2551:data_structures_scm",(void*)f_2551},
+{"f_2520:data_structures_scm",(void*)f_2520},
+{"f_2467:data_structures_scm",(void*)f_2467},
+{"f_2504:data_structures_scm",(void*)f_2504},
+{"f_2507:data_structures_scm",(void*)f_2507},
+{"f_2390:data_structures_scm",(void*)f_2390},
+{"f_2393:data_structures_scm",(void*)f_2393},
+{"f_2409:data_structures_scm",(void*)f_2409},
+{"f_2418:data_structures_scm",(void*)f_2418},
+{"f_2340:data_structures_scm",(void*)f_2340},
+{"f_2352:data_structures_scm",(void*)f_2352},
+{"f_2371:data_structures_scm",(void*)f_2371},
+{"f_2216:data_structures_scm",(void*)f_2216},
+{"f_2292:data_structures_scm",(void*)f_2292},
+{"f_2287:data_structures_scm",(void*)f_2287},
{"f_2218:data_structures_scm",(void*)f_2218},
-{"f_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_2247:data_structures_scm",(void*)f_2247},
+{"f_2253:data_structures_scm",(void*)f_2253},
+{"f_2269:data_structures_scm",(void*)f_2269},
+{"f_2222:data_structures_scm",(void*)f_2222},
+{"f_2225:data_structures_scm",(void*)f_2225},
+{"f_2117:data_structures_scm",(void*)f_2117},
+{"f_2121:data_structures_scm",(void*)f_2121},
+{"f_2156:data_structures_scm",(void*)f_2156},
+{"f_2162:data_structures_scm",(void*)f_2162},
+{"f_2178:data_structures_scm",(void*)f_2178},
+{"f_2124:data_structures_scm",(void*)f_2124},
+{"f_2127:data_structures_scm",(void*)f_2127},
+{"f_2007:data_structures_scm",(void*)f_2007},
+{"f_2073:data_structures_scm",(void*)f_2073},
+{"f_2111:data_structures_scm",(void*)f_2111},
+{"f_2100:data_structures_scm",(void*)f_2100},
+{"f_2108:data_structures_scm",(void*)f_2108},
+{"f_2057:data_structures_scm",(void*)f_2057},
{"f_2059:data_structures_scm",(void*)f_2059},
-{"f_2061:data_structures_scm",(void*)f_2061},
+{"f_2018:data_structures_scm",(void*)f_2018},
{"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_2049:data_structures_scm",(void*)f_2049},
+{"f_1927:data_structures_scm",(void*)f_1927},
+{"f_1936:data_structures_scm",(void*)f_1936},
+{"f_1978:data_structures_scm",(void*)f_1978},
+{"f_1868:data_structures_scm",(void*)f_1868},
+{"f_1880:data_structures_scm",(void*)f_1880},
+{"f_1915:data_structures_scm",(void*)f_1915},
{"f_1783:data_structures_scm",(void*)f_1783},
-{"f_1776:data_structures_scm",(void*)f_1776},
-{"f_1712:data_structures_scm",(void*)f_1712},
-{"f_1721:data_structures_scm",(void*)f_1721},
+{"f_1790:data_structures_scm",(void*)f_1790},
+{"f_1798:data_structures_scm",(void*)f_1798},
+{"f_1819:data_structures_scm",(void*)f_1819},
+{"f_1833:data_structures_scm",(void*)f_1833},
+{"f_1837:data_structures_scm",(void*)f_1837},
{"f_1742:data_structures_scm",(void*)f_1742},
-{"f_1679:data_structures_scm",(void*)f_1679},
-{"f_1685:data_structures_scm",(void*)f_1685},
+{"f_1748:data_structures_scm",(void*)f_1748},
+{"f_1781:data_structures_scm",(void*)f_1781},
+{"f_1774:data_structures_scm",(void*)f_1774},
{"f_1710:data_structures_scm",(void*)f_1710},
-{"f_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_1719:data_structures_scm",(void*)f_1719},
+{"f_1740:data_structures_scm",(void*)f_1740},
+{"f_1677:data_structures_scm",(void*)f_1677},
+{"f_1683:data_structures_scm",(void*)f_1683},
+{"f_1708:data_structures_scm",(void*)f_1708},
+{"f_1649:data_structures_scm",(void*)f_1649},
+{"f_1661:data_structures_scm",(void*)f_1661},
{"f_1646:data_structures_scm",(void*)f_1646},
-{"f_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},
+{"f_1624:data_structures_scm",(void*)f_1624},
+{"f_1627:data_structures_scm",(void*)f_1627},
+{"f_1628:data_structures_scm",(void*)f_1628},
+{"f_1644:data_structures_scm",(void*)f_1644},
+{"f_1640:data_structures_scm",(void*)f_1640},
+{"f_1636:data_structures_scm",(void*)f_1636},
+{"f_1605:data_structures_scm",(void*)f_1605},
+{"f_1609:data_structures_scm",(void*)f_1609},
+{"f_1610:data_structures_scm",(void*)f_1610},
+{"f_1618:data_structures_scm",(void*)f_1618},
+{"f_1602:data_structures_scm",(void*)f_1602},
+{"f_1599:data_structures_scm",(void*)f_1599},
+{"f_1596:data_structures_scm",(void*)f_1596},
+{"f_1593:data_structures_scm",(void*)f_1593},
+{"f_1537:data_structures_scm",(void*)f_1537},
+{"f_1559:data_structures_scm",(void*)f_1559},
+{"f_1565:data_structures_scm",(void*)f_1565},
+{"f_1584:data_structures_scm",(void*)f_1584},
+{"f_1545:data_structures_scm",(void*)f_1545},
+{"f_1531:data_structures_scm",(void*)f_1531},
+{"f_1491:data_structures_scm",(void*)f_1491},
+{"f_1493:data_structures_scm",(void*)f_1493},
+{"f_1499:data_structures_scm",(void*)f_1499},
+{"f_1518:data_structures_scm",(void*)f_1518},
+{"f_1452:data_structures_scm",(void*)f_1452},
+{"f_1464:data_structures_scm",(void*)f_1464},
+{"f_1478:data_structures_scm",(void*)f_1478},
+{"f_1486:data_structures_scm",(void*)f_1486},
+{"f_1489:data_structures_scm",(void*)f_1489},
+{"f_1416:data_structures_scm",(void*)f_1416},
+{"f_1419:data_structures_scm",(void*)f_1419},
+{"f_1427:data_structures_scm",(void*)f_1427},
+{"f_1433:data_structures_scm",(void*)f_1433},
+{"f_1441:data_structures_scm",(void*)f_1441},
+{"f_1404:data_structures_scm",(void*)f_1404},
+{"f_1406:data_structures_scm",(void*)f_1406},
+{"f_1414:data_structures_scm",(void*)f_1414},
+{"f_1396:data_structures_scm",(void*)f_1396},
+{"f_1398:data_structures_scm",(void*)f_1398},
+{"f_1373:data_structures_scm",(void*)f_1373},
+{"f_1386:data_structures_scm",(void*)f_1386},
+{"f_1384:data_structures_scm",(void*)f_1384},
+{"f_1336:data_structures_scm",(void*)f_1336},
+{"f_1338:data_structures_scm",(void*)f_1338},
+{"f_1344:data_structures_scm",(void*)f_1344},
+{"f_1357:data_structures_scm",(void*)f_1357},
+{"f_1303:data_structures_scm",(void*)f_1303},
+{"f_1305:data_structures_scm",(void*)f_1305},
+{"f_1311:data_structures_scm",(void*)f_1311},
+{"f_1327:data_structures_scm",(void*)f_1327},
+{"f_1295:data_structures_scm",(void*)f_1295},
+{"f_1297:data_structures_scm",(void*)f_1297},
+{"f_1292:data_structures_scm",(void*)f_1292},
{NULL,NULL}};
#endif
diff --git a/bootstrap/eval.c b/bootstrap/eval.c
index 12221e61..431adfc6 100644
--- a/bootstrap/eval.c
+++ b/bootstrap/eval.c
@@ -1,9 +1,9 @@
/* 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)
+ 2010-02-22 11:31
+ Version 4.3.5
+ windows-mingw32-x86 [ manyargs dload ptables ]
+ compiled 2010-02-17 on lenovo-1 (MINGW32_NT-6.0)
command line: eval.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -explicit-use -no-trace -output-file eval.c
unit: eval
*/
@@ -54,314 +54,309 @@ 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 C_TLS C_word lf[402];
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){
+static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,99,104,105,99,107,101,110,45,112,114,101,102,105,120,32,46,32,116,109,112,49,51,54,49,51,55,41,0,0,0,0,0,0};
+static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,14),40,99,104,105,99,107,101,110,45,104,111,109,101,41,0,0};
+static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,29),40,35,35,115,121,115,35,104,97,115,104,45,115,121,109,98,111,108,32,115,49,53,52,32,110,49,53,53,41,0,0,0};
+static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
+static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,35),40,35,35,115,121,115,35,104,97,115,104,45,116,97,98,108,101,45,114,101,102,32,104,116,49,53,57,32,107,101,121,49,54,48,41,0,0,0,0,0};
+static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,98,117,99,107,101,116,49,55,52,41};
+static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,43),40,35,35,115,121,115,35,104,97,115,104,45,116,97,98,108,101,45,115,101,116,33,32,104,116,49,54,55,32,107,101,121,49,54,56,32,118,97,108,49,54,57,41,0,0,0,0,0};
+static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,63),40,35,35,115,121,115,35,104,97,115,104,45,116,97,98,108,101,45,117,112,100,97,116,101,33,32,104,116,49,55,55,32,107,101,121,49,55,56,32,117,112,100,116,102,117,110,99,49,55,57,32,118,97,108,117,102,117,110,99,49,56,48,41,0};
+static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,16),40,103,50,48,52,32,98,117,99,107,101,116,50,48,54,41};
+static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,49,57,55,32,103,50,48,49,50,48,51,41,0,0,0,0,0,0,0};
+static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,16),40,100,111,108,111,111,112,49,57,48,32,105,49,57,52,41};
+static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,38),40,35,35,115,121,115,35,104,97,115,104,45,116,97,98,108,101,45,102,111,114,45,101,97,99,104,32,112,49,56,55,32,104,116,49,56,56,41,0,0};
+static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,98,117,99,107,101,116,50,49,57,41};
+static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,48),40,35,35,115,121,115,35,104,97,115,104,45,116,97,98,108,101,45,108,111,99,97,116,105,111,110,32,104,116,50,49,50,32,107,101,121,50,49,51,32,97,100,100,112,50,49,52,41};
+static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,12),40,97,51,51,50,48,32,120,50,51,49,41,0,0,0,0};
+static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,17),40,97,51,51,51,51,32,112,50,51,52,32,105,50,51,53,41,0,0,0,0,0,0,0};
+static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,46),40,35,35,115,121,115,35,101,118,97,108,45,100,101,99,111,114,97,116,111,114,32,112,50,50,55,32,108,108,50,50,56,32,104,50,50,57,32,99,110,116,114,50,51,48,41,0,0};
+static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,21),40,102,105,110,100,45,105,100,32,105,100,50,55,52,32,115,101,50,55,53,41,0,0,0};
+static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,21),40,114,101,110,97,109,101,32,118,97,114,50,56,52,32,115,101,50,56,53,41,0,0,0};
+static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,11),40,108,111,111,112,32,105,51,50,55,41,0,0,0,0,0};
+static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,11),40,103,51,49,56,32,112,51,50,48,41,0,0,0,0,0};
+static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,32,101,110,118,115,51,48,56,32,101,105,51,48,57,41,0,0,0,0};
+static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,27),40,108,111,111,107,117,112,32,118,97,114,48,51,48,50,32,101,51,48,51,32,115,101,51,48,52,41,0,0,0,0,0};
+static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,9),40,115,119,97,112,51,53,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,7),40,97,51,53,53,48,41,0};
+static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,19),40,101,118,97,108,47,109,101,116,97,32,102,111,114,109,51,52,57,41,0,0,0,0,0};
+static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,15),40,102,95,51,53,56,53,32,46,32,118,51,56,56,41,0};
+static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,7),40,97,51,53,57,54,41,0};
+static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,13),40,102,95,51,54,56,53,32,118,52,50,53,41,0,0,0};
+static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,13),40,102,95,51,54,57,52,32,118,52,50,54,41,0,0,0};
+static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,15),40,102,95,51,54,50,51,32,46,32,118,52,49,50,41,0};
+static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,20),40,102,49,48,54,52,50,32,46,32,118,52,50,51,49,48,54,52,49,41,0,0,0,0};
+static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,20),40,102,49,48,54,52,55,32,46,32,118,52,50,51,49,48,54,52,54,41,0,0,0,0};
+static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,17),40,97,51,54,48,50,32,105,51,57,49,32,106,51,57,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,49,49,32,46,32,118,52,51,50,41,0};
+static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,49,57,32,46,32,118,52,51,51,41,0};
+static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,50,55,32,46,32,118,52,51,52,41,0};
+static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,51,53,32,46,32,118,52,51,53,41,0};
+static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,51,55,32,46,32,118,52,51,54,41,0};
+static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,52,56,32,46,32,118,52,51,55,41,0};
+static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,53,48,32,46,32,118,52,51,56,41,0};
+static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,15),40,102,95,51,55,54,49,32,46,32,118,52,52,57,41,0};
+static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,49,55,32,46,32,118,52,54,53,41,0};
+static C_char C_TLS li43[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,50,53,32,46,32,118,52,54,54,41,0};
+static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,51,51,32,46,32,118,52,54,55,41,0};
+static C_char C_TLS li45[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,52,49,32,46,32,118,52,54,56,41,0};
+static C_char C_TLS li46[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,52,57,32,46,32,118,52,54,57,41,0};
+static C_char C_TLS li47[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,53,55,32,46,32,118,52,55,48,41,0};
+static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,54,53,32,46,32,118,52,55,49,41,0};
+static C_char C_TLS li49[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,54,55,32,46,32,118,52,55,50,41,0};
+static C_char C_TLS li50[] C_aligned={C_lihdr(0,0,15),40,102,95,51,56,56,53,32,46,32,118,52,56,48,41,0};
+static C_char C_TLS li51[] C_aligned={C_lihdr(0,0,15),40,102,95,51,57,48,50,32,46,32,118,52,56,51,41,0};
+static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,15),40,102,95,51,57,48,55,32,46,32,118,52,56,52,41,0};
+static C_char C_TLS li53[] C_aligned={C_lihdr(0,0,13),40,102,95,51,57,52,49,32,118,52,56,53,41,0,0,0};
+static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,13),40,102,95,51,57,54,49,32,118,52,57,48,41,0,0,0};
+static C_char C_TLS li55[] C_aligned={C_lihdr(0,0,13),40,102,95,52,48,53,50,32,118,53,48,56,41,0,0,0};
+static C_char C_TLS li56[] C_aligned={C_lihdr(0,0,13),40,102,95,52,48,55,55,32,118,53,49,56,41,0,0,0};
+static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,7),40,97,52,49,51,48,41,0};
+static C_char C_TLS li58[] C_aligned={C_lihdr(0,0,13),40,102,95,52,49,57,56,32,118,53,52,55,41,0,0,0};
+static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,13),40,102,95,52,50,49,49,32,118,53,52,56,41,0,0,0};
+static C_char C_TLS li60[] C_aligned={C_lihdr(0,0,13),40,102,95,52,49,54,54,32,118,53,52,51,41,0,0,0};
+static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,15),40,102,95,52,49,55,53,32,46,32,118,53,52,52,41,0};
+static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,13),40,102,95,52,49,56,51,32,118,53,52,54,41,0,0,0};
+static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,17),40,97,52,49,51,54,32,105,53,51,48,32,106,53,51,49,41,0,0,0,0,0,0,0};
+static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,13),40,102,95,52,50,54,54,32,118,54,52,51,41,0,0,0};
+static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,13),40,102,95,52,51,48,51,32,118,54,52,54,41,0,0,0};
+static C_char C_TLS li66[] C_aligned={C_lihdr(0,0,13),40,102,95,52,51,53,56,32,118,54,53,50,41,0,0,0};
+static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,13),40,102,95,52,52,50,56,32,118,54,53,57,41,0,0,0};
+static C_char C_TLS li68[] C_aligned={C_lihdr(0,0,25),40,100,111,108,111,111,112,54,56,55,32,105,54,57,49,32,118,108,105,115,116,54,57,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li69[] C_aligned={C_lihdr(0,0,13),40,102,95,52,52,57,50,32,118,54,56,53,41,0,0,0};
+static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,11),40,103,54,55,57,32,120,54,56,49,41,0,0,0,0,0};
+static C_char C_TLS li71[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,54,54,51,32,103,54,55,51,54,55,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li72[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,54,49,49,32,103,54,50,49,54,50,54,32,103,54,50,50,54,50,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li73[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,53,56,54,32,103,53,57,54,54,48,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li74[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,53,54,49,32,103,53,55,49,53,55,53,41,0,0,0,0,0,0,0};
+static C_char C_TLS li75[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,55,51,52,32,103,55,52,52,55,52,56,41,0,0,0,0,0,0,0};
+static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,55,49,48,32,103,55,50,48,55,50,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,14),40,97,52,57,51,52,32,46,32,114,56,53,50,41,0,0};
+static C_char C_TLS li78[] C_aligned={C_lihdr(0,0,13),40,102,95,52,57,50,57,32,118,56,53,49,41,0,0,0};
+static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,7),40,97,52,57,53,51,41,0};
+static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,13),40,102,95,52,57,52,56,32,118,56,53,51,41,0,0,0};
+static C_char C_TLS li81[] C_aligned={C_lihdr(0,0,20),40,97,52,57,55,55,32,97,49,56,53,53,32,46,32,114,56,53,54,41,0,0,0,0};
+static C_char C_TLS li82[] C_aligned={C_lihdr(0,0,13),40,102,95,52,57,55,50,32,118,56,53,52,41,0,0,0};
+static C_char C_TLS li83[] C_aligned={C_lihdr(0,0,13),40,97,52,57,57,54,32,97,49,56,53,56,41,0,0,0};
+static C_char C_TLS li84[] C_aligned={C_lihdr(0,0,13),40,102,95,52,57,57,49,32,118,56,53,55,41,0,0,0};
+static C_char C_TLS li85[] C_aligned={C_lihdr(0,0,26),40,97,53,48,50,52,32,97,49,56,54,48,32,97,50,56,54,49,32,46,32,114,56,54,50,41,0,0,0,0,0,0};
+static C_char C_TLS li86[] C_aligned={C_lihdr(0,0,13),40,102,95,53,48,49,57,32,118,56,53,57,41,0,0,0};
+static C_char C_TLS li87[] C_aligned={C_lihdr(0,0,19),40,97,53,48,52,51,32,97,49,56,54,52,32,97,50,56,54,53,41,0,0,0,0,0};
+static C_char C_TLS li88[] C_aligned={C_lihdr(0,0,13),40,102,95,53,48,51,56,32,118,56,54,51,41,0,0,0};
+static C_char C_TLS li89[] C_aligned={C_lihdr(0,0,32),40,97,53,48,55,49,32,97,49,56,54,55,32,97,50,56,54,56,32,97,51,56,54,57,32,46,32,114,56,55,48,41};
+static C_char C_TLS li90[] C_aligned={C_lihdr(0,0,13),40,102,95,53,48,54,54,32,118,56,54,54,41,0,0,0};
+static C_char C_TLS li91[] C_aligned={C_lihdr(0,0,25),40,97,53,48,57,48,32,97,49,56,55,50,32,97,50,56,55,51,32,97,51,56,55,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,13),40,102,95,53,48,56,53,32,118,56,55,49,41,0,0,0};
+static C_char C_TLS li93[] C_aligned={C_lihdr(0,0,38),40,97,53,49,49,56,32,97,49,56,55,54,32,97,50,56,55,55,32,97,51,56,55,56,32,97,52,56,55,57,32,46,32,114,56,56,48,41,0,0};
+static C_char C_TLS li94[] C_aligned={C_lihdr(0,0,13),40,102,95,53,49,49,51,32,118,56,55,53,41,0,0,0};
+static C_char C_TLS li95[] C_aligned={C_lihdr(0,0,31),40,97,53,49,51,55,32,97,49,56,56,50,32,97,50,56,56,51,32,97,51,56,56,52,32,97,52,56,56,53,41,0};
+static C_char C_TLS li96[] C_aligned={C_lihdr(0,0,13),40,102,95,53,49,51,50,32,118,56,56,49,41,0,0,0};
+static C_char C_TLS li97[] C_aligned={C_lihdr(0,0,42),40,100,111,108,111,111,112,49,50,52,57,32,110,49,50,53,51,32,99,49,50,53,52,32,97,114,103,115,49,50,53,53,32,108,97,115,116,49,50,53,54,41,0,0,0,0,0,0};
+static C_char C_TLS li98[] C_aligned={C_lihdr(0,0,15),40,97,53,49,53,57,32,46,32,97,115,56,56,55,41,0};
+static C_char C_TLS li99[] C_aligned={C_lihdr(0,0,13),40,102,95,53,49,53,52,32,118,56,56,54,41,0,0,0};
+static C_char C_TLS li100[] C_aligned={C_lihdr(0,0,15),40,97,53,49,56,50,32,46,32,97,115,56,56,57,41,0};
+static C_char C_TLS li101[] C_aligned={C_lihdr(0,0,13),40,102,95,53,49,55,55,32,118,56,56,56,41,0,0,0};
+static C_char C_TLS li102[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,56,49,52,32,103,56,50,52,56,50,57,32,103,56,50,53,56,51,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li103[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,55,57,48,32,103,56,48,48,56,48,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li104[] C_aligned={C_lihdr(0,0,31),40,97,52,57,48,53,32,118,97,114,115,55,56,51,32,97,114,103,99,55,56,52,32,114,101,115,116,55,56,53,41,0};
+static C_char C_TLS li105[] C_aligned={C_lihdr(0,0,7),40,97,53,51,49,52,41,0};
+static C_char C_TLS li106[] C_aligned={C_lihdr(0,0,30),40,97,53,51,50,48,32,108,108,105,115,116,55,55,56,55,56,48,32,98,111,100,121,55,55,57,55,56,49,41,0,0};
+static C_char C_TLS li107[] C_aligned={C_lihdr(0,0,11),40,103,57,49,50,32,98,57,49,52,41,0,0,0,0,0};
+static C_char C_TLS li108[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,56,57,54,32,103,57,48,54,57,49,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li109[] C_aligned={C_lihdr(0,0,6),40,103,57,53,53,41,0,0};
+static C_char C_TLS li110[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,57,52,56,32,103,57,53,50,57,53,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li111[] C_aligned={C_lihdr(0,0,11),40,103,57,51,57,32,98,57,52,49,41,0,0,0,0,0};
+static C_char C_TLS li112[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,57,50,51,32,103,57,51,51,57,51,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li113[] C_aligned={C_lihdr(0,0,10),40,115,119,97,112,49,48,50,48,41,0,0,0,0,0,0};
+static C_char C_TLS li114[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,50,32,120,115,49,48,53,54,41,0,0};
+static C_char C_TLS li115[] C_aligned={C_lihdr(0,0,14),40,102,95,53,54,55,53,32,118,49,48,53,52,41,0,0};
+static C_char C_TLS li116[] C_aligned={C_lihdr(0,0,22),40,108,111,111,112,32,98,111,100,121,49,48,53,49,32,120,115,49,48,53,50,41,0,0};
+static C_char C_TLS li117[] C_aligned={C_lihdr(0,0,7),40,97,53,54,53,48,41,0};
+static C_char C_TLS li118[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
+static C_char C_TLS li119[] C_aligned={C_lihdr(0,0,13),40,103,57,57,52,32,101,120,112,57,57,54,41,0,0,0};
+static C_char C_TLS li120[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,57,55,56,32,103,57,56,56,57,57,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li121[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,49,51,32,103,49,49,50,51,49,49,50,55,41,0,0,0,0};
+static C_char C_TLS li122[] C_aligned={C_lihdr(0,0,13),40,103,49,49,48,48,32,120,49,49,48,50,41,0,0,0};
+static C_char C_TLS li123[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,48,56,52,32,103,49,48,57,52,49,48,57,56,41,0,0,0,0};
+static C_char C_TLS li124[] C_aligned={C_lihdr(0,0,7),40,97,54,48,54,50,41,0};
+static C_char C_TLS li125[] C_aligned={C_lihdr(0,0,37),40,97,54,48,55,50,32,101,120,112,49,49,52,53,49,49,52,54,49,49,52,57,32,95,49,49,52,55,49,49,52,56,49,49,53,48,41,0,0,0};
+static C_char C_TLS li126[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,105,100,115,49,49,52,50,41,0,0};
+static C_char C_TLS li127[] C_aligned={C_lihdr(0,0,13),40,103,49,49,55,56,32,100,49,49,56,48,41,0,0,0};
+static C_char C_TLS li128[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,55,49,32,103,49,49,55,53,49,49,55,55,41,0,0,0,0};
+static C_char C_TLS li129[] C_aligned={C_lihdr(0,0,44),40,99,111,109,112,105,108,101,32,120,51,55,54,32,101,51,55,55,32,104,51,55,56,32,116,102,51,55,57,32,99,110,116,114,51,56,48,32,115,101,51,56,49,41,0,0,0,0};
+static C_char C_TLS li130[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,110,49,50,54,50,41,0,0,0,0};
+static C_char C_TLS li131[] C_aligned={C_lihdr(0,0,14),40,102,95,54,52,56,51,32,118,49,50,56,53,41,0,0};
+static C_char C_TLS li132[] C_aligned={C_lihdr(0,0,14),40,102,95,54,53,48,51,32,118,49,50,57,48,41,0,0};
+static C_char C_TLS li133[] C_aligned={C_lihdr(0,0,14),40,102,95,54,53,51,52,32,118,49,50,57,55,41,0,0};
+static C_char C_TLS li134[] C_aligned={C_lihdr(0,0,14),40,102,95,54,53,55,50,32,118,49,51,48,53,41,0,0};
+static C_char C_TLS li135[] C_aligned={C_lihdr(0,0,14),40,102,95,54,54,49,55,32,118,49,51,49,52,41,0,0};
+static C_char C_TLS li136[] C_aligned={C_lihdr(0,0,13),40,103,49,51,54,50,32,97,49,51,54,52,41,0,0,0};
+static C_char C_TLS li137[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,51,52,54,32,103,49,51,53,54,49,51,54,48,41,0,0,0,0};
+static C_char C_TLS li138[] C_aligned={C_lihdr(0,0,14),40,102,95,54,54,53,49,32,118,49,51,52,51,41,0,0};
+static C_char C_TLS li139[] C_aligned={C_lihdr(0,0,13),40,103,49,51,51,55,32,97,49,51,51,57,41,0,0,0};
+static C_char C_TLS li140[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,51,50,49,32,103,49,51,51,49,49,51,51,53,41,0,0,0,0};
+static C_char C_TLS li141[] C_aligned={C_lihdr(0,0,49),40,99,111,109,112,105,108,101,45,99,97,108,108,32,120,49,50,55,48,32,101,49,50,55,49,32,116,102,49,50,55,50,32,99,110,116,114,49,50,55,51,32,115,101,49,50,55,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li142[] C_aligned={C_lihdr(0,0,58),40,35,35,115,121,115,35,99,111,109,112,105,108,101,45,116,111,45,99,108,111,115,117,114,101,32,101,120,112,50,53,50,32,101,110,118,50,53,51,32,115,101,50,53,52,32,46,32,116,109,112,50,53,49,50,53,53,41,0,0,0,0,0,0};
+static C_char C_TLS li143[] C_aligned={C_lihdr(0,0,22),40,101,118,97,108,32,120,49,52,49,57,32,46,32,101,110,118,49,52,50,48,41,0,0};
+static C_char C_TLS li144[] C_aligned={C_lihdr(0,0,5),40,101,114,114,41,0,0,0};
+static C_char C_TLS li145[] C_aligned={C_lihdr(0,0,34),40,108,111,111,112,32,108,108,105,115,116,49,52,50,55,32,118,97,114,115,49,52,50,56,32,97,114,103,99,49,52,50,57,41,0,0,0,0,0,0};
+static C_char C_TLS li146[] C_aligned={C_lihdr(0,0,46),40,35,35,115,121,115,35,100,101,99,111,109,112,111,115,101,45,108,97,109,98,100,97,45,108,105,115,116,32,108,108,105,115,116,48,49,52,50,50,32,107,49,52,50,51,41,0,0};
+static C_char C_TLS li147[] C_aligned={C_lihdr(0,0,8),40,102,95,54,56,55,55,41};
+static C_char C_TLS li148[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,109,111,100,101,49,52,52,53,41,0};
+static C_char C_TLS li149[] C_aligned={C_lihdr(0,0,33),40,115,101,116,45,100,121,110,97,109,105,99,45,108,111,97,100,45,109,111,100,101,33,32,109,111,100,101,49,52,52,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li150[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
+static C_char C_TLS li151[] C_aligned={C_lihdr(0,0,18),40,104,97,115,45,115,101,112,63,32,115,116,114,49,52,54,57,41,0,0,0,0,0,0};
+static C_char C_TLS li152[] C_aligned={C_lihdr(0,0,8),40,102,95,55,48,51,53,41};
+static C_char C_TLS li153[] C_aligned={C_lihdr(0,0,7),40,97,55,48,52,51,41,0};
+static C_char C_TLS li154[] C_aligned={C_lihdr(0,0,7),40,97,55,48,54,51,41,0};
+static C_char C_TLS li155[] C_aligned={C_lihdr(0,0,7),40,97,55,49,49,53,41,0};
+static C_char C_TLS li156[] C_aligned={C_lihdr(0,0,19),40,97,55,49,50,49,32,46,32,116,49,54,49,48,49,54,49,51,41,0,0,0,0,0};
+static C_char C_TLS li157[] C_aligned={C_lihdr(0,0,7),40,97,55,49,48,51,41,0};
+static C_char C_TLS li158[] C_aligned={C_lihdr(0,0,13),40,103,49,54,50,56,32,114,49,54,51,48,41,0,0,0};
+static C_char C_TLS li159[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,54,50,49,32,103,49,54,50,53,49,54,50,55,41,0,0,0,0};
+static C_char C_TLS li160[] C_aligned={C_lihdr(0,0,21),40,97,55,49,51,55,32,46,32,114,101,115,117,108,116,115,49,54,49,54,41,0,0,0};
+static C_char C_TLS li161[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,49,54,48,51,32,120,49,54,48,55,41,0,0,0,0,0,0};
+static C_char C_TLS li162[] C_aligned={C_lihdr(0,0,7),40,97,55,48,54,54,41,0};
+static C_char C_TLS li163[] C_aligned={C_lihdr(0,0,7),40,97,55,49,57,52,41,0};
+static C_char C_TLS li164[] C_aligned={C_lihdr(0,0,7),40,97,55,48,53,52,41,0};
+static C_char C_TLS li165[] C_aligned={C_lihdr(0,0,7),40,97,55,50,48,51,41,0};
+static C_char C_TLS li166[] C_aligned={C_lihdr(0,0,16),40,97,55,48,50,57,32,97,98,114,116,49,53,54,48,41};
+static C_char C_TLS li167[] C_aligned={C_lihdr(0,0,32),40,98,111,100,121,49,52,57,49,32,116,105,109,101,114,49,53,48,48,32,112,114,105,110,116,101,114,49,53,48,49,41};
+static C_char C_TLS li168[] C_aligned={C_lihdr(0,0,32),40,100,101,102,45,112,114,105,110,116,101,114,49,52,57,52,32,37,116,105,109,101,114,49,52,56,57,49,54,53,48,41};
+static C_char C_TLS li169[] C_aligned={C_lihdr(0,0,15),40,100,101,102,45,116,105,109,101,114,49,52,57,51,41,0};
+static C_char C_TLS li170[] C_aligned={C_lihdr(0,0,57),40,35,35,115,121,115,35,108,111,97,100,32,105,110,112,117,116,49,52,56,50,32,101,118,97,108,117,97,116,111,114,49,52,56,51,32,112,102,49,52,56,52,32,46,32,116,109,112,49,52,56,49,49,52,56,53,41,0,0,0,0,0,0,0};
+static C_char C_TLS li171[] C_aligned={C_lihdr(0,0,35),40,108,111,97,100,32,102,105,108,101,110,97,109,101,49,54,53,54,32,46,32,101,118,97,108,117,97,116,111,114,49,54,53,55,41,0,0,0,0,0};
+static C_char C_TLS li172[] C_aligned={C_lihdr(0,0,44),40,108,111,97,100,45,114,101,108,97,116,105,118,101,32,102,105,108,101,110,97,109,101,49,54,54,50,32,46,32,101,118,97,108,117,97,116,111,114,49,54,54,51,41,0,0,0,0};
+static C_char C_TLS li173[] C_aligned={C_lihdr(0,0,7),40,97,55,53,49,49,41,0};
+static C_char C_TLS li174[] C_aligned={C_lihdr(0,0,7),40,97,55,53,49,52,41,0};
+static C_char C_TLS li175[] C_aligned={C_lihdr(0,0,7),40,97,55,53,49,55,41,0};
+static C_char C_TLS li176[] C_aligned={C_lihdr(0,0,41),40,108,111,97,100,45,110,111,105,115,105,108,121,32,102,105,108,101,110,97,109,101,49,54,55,52,32,46,32,116,109,112,49,54,55,51,49,54,55,53,41,0,0,0,0,0,0,0};
+static C_char C_TLS li177[] C_aligned={C_lihdr(0,0,24),40,99,111,109,112,108,101,116,101,32,103,49,55,48,54,49,55,48,55,49,55,48,56,41};
+static C_char C_TLS li178[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,108,105,98,115,49,55,53,54,41,0};
+static C_char C_TLS li179[] C_aligned={C_lihdr(0,0,40),40,35,35,115,121,115,35,108,111,97,100,45,108,105,98,114,97,114,121,45,48,32,117,110,97,109,101,49,55,52,49,32,108,105,98,49,55,52,50,41};
+static C_char C_TLS li180[] C_aligned={C_lihdr(0,0,40),40,35,35,115,121,115,35,108,111,97,100,45,108,105,98,114,97,114,121,32,117,110,97,109,101,49,55,54,56,32,46,32,108,105,98,49,55,54,57,41};
+static C_char C_TLS li181[] C_aligned={C_lihdr(0,0,5),40,101,114,114,41,0,0,0};
+static C_char C_TLS li182[] C_aligned={C_lihdr(0,0,13),40,99,104,101,99,107,32,112,49,56,50,51,41,0,0,0};
+static C_char C_TLS li183[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,105,100,49,56,49,51,41,0,0,0};
+static C_char C_TLS li184[] C_aligned={C_lihdr(0,0,50),40,35,35,115,121,115,35,99,97,110,111,110,105,99,97,108,105,122,101,45,101,120,116,101,110,115,105,111,110,45,112,97,116,104,32,105,100,49,55,57,53,32,108,111,99,49,55,57,54,41,0,0,0,0,0,0};
+static C_char C_TLS li185[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,114,101,112,111,115,105,116,111,114,121,45,112,97,116,104,32,46,32,116,109,112,49,56,53,50,49,56,53,51,41,0,0,0};
+static C_char C_TLS li186[] C_aligned={C_lihdr(0,0,16),40,99,104,101,99,107,32,112,97,116,104,49,56,54,53,41};
+static C_char C_TLS li187[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,112,97,116,104,115,49,56,56,49,41};
+static C_char C_TLS li188[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,102,105,110,100,45,101,120,116,101,110,115,105,111,110,32,112,49,56,54,49,32,105,110,99,63,49,56,54,50,41,0,0,0};
+static C_char C_TLS li189[] C_aligned={C_lihdr(0,0,51),40,35,35,115,121,115,35,108,111,97,100,45,101,120,116,101,110,115,105,111,110,32,105,100,49,56,57,57,32,108,111,99,49,57,48,48,32,46,32,116,109,112,49,56,57,56,49,57,48,49,41,0,0,0,0,0};
+static C_char C_TLS li190[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,57,52,54,32,103,49,57,53,48,49,57,53,50,41,0,0,0,0};
+static C_char C_TLS li191[] C_aligned={C_lihdr(0,0,25),40,35,35,115,121,115,35,112,114,111,118,105,100,101,32,46,32,105,100,115,49,57,52,51,41,0,0,0,0,0,0,0};
+static C_char C_TLS li192[] C_aligned={C_lihdr(0,0,24),40,35,35,115,121,115,35,112,114,111,118,105,100,101,100,63,32,105,100,49,57,54,49,41};
+static C_char C_TLS li193[] C_aligned={C_lihdr(0,0,21),40,97,56,49,55,52,32,103,49,57,56,49,49,57,56,50,49,57,56,51,41,0,0,0};
+static C_char C_TLS li194[] C_aligned={C_lihdr(0,0,25),40,35,35,115,121,115,35,114,101,113,117,105,114,101,32,46,32,105,100,115,49,57,54,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li195[] C_aligned={C_lihdr(0,0,21),40,103,50,48,48,55,32,103,50,48,49,51,50,48,49,52,50,48,49,53,41,0,0,0};
+static C_char C_TLS li196[] C_aligned={C_lihdr(0,0,44),40,35,35,115,121,115,35,101,120,116,101,110,115,105,111,110,45,105,110,102,111,114,109,97,116,105,111,110,32,105,100,49,57,57,48,32,108,111,99,49,57,57,49,41,0,0,0,0};
+static C_char C_TLS li197[] C_aligned={C_lihdr(0,0,31),40,101,120,116,101,110,115,105,111,110,45,105,110,102,111,114,109,97,116,105,111,110,32,101,120,116,50,48,49,57,41,0};
+static C_char C_TLS li198[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,49,32,105,100,115,50,48,50,52,41,0};
+static C_char C_TLS li199[] C_aligned={C_lihdr(0,0,43),40,35,35,115,121,115,35,108,111,111,107,117,112,45,114,117,110,116,105,109,101,45,114,101,113,117,105,114,101,109,101,110,116,115,32,105,100,115,50,48,50,50,41,0,0,0,0,0};
+static C_char C_TLS li200[] C_aligned={C_lihdr(0,0,21),40,97,56,50,56,53,32,103,50,48,53,55,50,48,53,56,50,48,53,57,41,0,0,0};
+static C_char C_TLS li201[] C_aligned={C_lihdr(0,0,7),40,97,56,50,57,49,41,0};
+static C_char C_TLS li202[] C_aligned={C_lihdr(0,0,28),40,97,100,100,45,114,101,113,32,105,100,50,48,52,57,32,115,121,110,116,97,120,63,50,48,53,48,41,0,0,0,0};
+static C_char C_TLS li203[] C_aligned={C_lihdr(0,0,35),40,105,109,112,102,111,114,109,32,120,50,48,54,50,32,105,100,50,48,54,51,32,98,117,105,108,116,105,110,63,50,48,54,52,41,0,0,0,0,0};
+static C_char C_TLS li204[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,49,53,52,32,103,50,49,54,52,50,49,54,56,41,0,0,0,0};
+static C_char C_TLS li205[] C_aligned={C_lihdr(0,0,23),40,100,111,105,116,32,105,100,50,48,56,48,32,105,109,112,105,100,50,48,56,49,41,0};
+static C_char C_TLS li206[] C_aligned={C_lihdr(0,0,7),40,97,56,55,54,49,41,0};
+static C_char C_TLS li207[] C_aligned={C_lihdr(0,0,38),40,97,56,55,54,55,32,101,120,112,50,50,51,50,50,50,51,51,50,50,51,54,32,102,50,50,50,51,52,50,50,51,53,50,50,51,55,41,0,0};
+static C_char C_TLS li208[] C_aligned={C_lihdr(0,0,13),40,103,50,50,50,52,32,110,50,50,50,54,41,0,0,0};
+static C_char C_TLS li209[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,50,48,56,32,103,50,50,49,56,50,50,50,50,41,0,0,0,0};
+static C_char C_TLS li210[] C_aligned={C_lihdr(0,0,16),40,102,111,108,108,111,119,32,105,100,50,50,50,54,54,41};
+static C_char C_TLS li211[] C_aligned={C_lihdr(0,0,52),40,35,35,115,121,115,35,100,111,45,116,104,101,45,114,105,103,104,116,45,116,104,105,110,103,32,105,100,50,48,51,55,32,99,111,109,112,63,50,48,51,56,32,105,109,112,63,50,48,51,57,41,0,0,0,0};
+static C_char C_TLS li212[] C_aligned={C_lihdr(0,0,12),40,100,111,108,111,111,112,50,50,55,56,41,0,0,0,0};
+static C_char C_TLS li213[] C_aligned={C_lihdr(0,0,36),40,35,35,115,121,115,35,115,116,114,105,110,103,45,62,99,45,105,100,101,110,116,105,102,105,101,114,32,115,116,114,50,50,55,52,41,0,0,0,0};
+static C_char C_TLS li214[] C_aligned={C_lihdr(0,0,28),40,35,35,115,121,115,35,101,110,118,105,114,111,110,109,101,110,116,63,32,111,98,106,50,50,57,54,41,0,0,0,0};
+static C_char C_TLS li215[] C_aligned={C_lihdr(0,0,12),40,99,111,112,121,32,98,50,51,49,53,41,0,0,0,0};
+static C_char C_TLS li216[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,50,51,48,57,32,105,50,51,49,51,41,0,0,0,0,0,0};
+static C_char C_TLS li217[] C_aligned={C_lihdr(0,0,54),40,35,35,115,121,115,35,99,111,112,121,45,101,110,118,45,116,97,98,108,101,32,101,50,50,57,57,32,109,102,102,50,51,48,48,32,109,102,50,51,48,49,32,46,32,97,114,103,115,50,51,48,50,41,0,0};
+static C_char C_TLS li218[] C_aligned={C_lihdr(0,0,26),40,108,111,111,112,32,98,117,99,107,101,116,50,51,52,48,32,115,121,109,115,50,51,52,49,41,0,0,0,0,0,0};
+static C_char C_TLS li219[] C_aligned={C_lihdr(0,0,27),40,100,111,108,111,111,112,50,51,51,51,32,105,50,51,51,55,32,115,121,109,115,50,51,51,56,41,0,0,0,0,0};
+static C_char C_TLS li220[] C_aligned={C_lihdr(0,0,15),40,97,57,49,53,56,32,115,121,109,50,51,53,49,41,0};
+static C_char C_TLS li221[] C_aligned={C_lihdr(0,0,46),40,35,35,115,121,115,35,101,110,118,105,114,111,110,109,101,110,116,45,115,121,109,98,111,108,115,32,101,110,118,50,51,50,54,32,46,32,97,114,103,115,50,51,50,55,41,0,0};
+static C_char C_TLS li222[] C_aligned={C_lihdr(0,0,25),40,105,110,116,101,114,97,99,116,105,111,110,45,101,110,118,105,114,111,110,109,101,110,116,41,0,0,0,0,0,0,0};
+static C_char C_TLS li223[] C_aligned={C_lihdr(0,0,47),40,115,99,104,101,109,101,45,114,101,112,111,114,116,45,101,110,118,105,114,111,110,109,101,110,116,32,110,50,51,54,50,32,46,32,109,117,116,97,98,108,101,50,51,54,51,41,0};
+static C_char C_TLS li224[] C_aligned={C_lihdr(0,0,38),40,110,117,108,108,45,101,110,118,105,114,111,110,109,101,110,116,32,110,50,51,55,52,32,46,32,109,117,116,97,98,108,101,50,51,55,53,41,0,0};
+static C_char C_TLS li225[] C_aligned={C_lihdr(0,0,14),40,102,95,57,50,55,49,32,98,50,51,57,53,41,0,0};
+static C_char C_TLS li226[] C_aligned={C_lihdr(0,0,14),40,105,110,105,116,98,32,104,116,50,51,57,52,41,0,0};
+static C_char C_TLS li227[] C_aligned={C_lihdr(0,0,19),40,101,120,105,115,116,115,63,32,102,110,97,109,101,50,52,49,53,41,0,0,0,0,0};
+static C_char C_TLS li228[] C_aligned={C_lihdr(0,0,25),40,116,101,115,116,50,32,102,110,97,109,101,50,52,51,57,32,108,115,116,50,52,52,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li229[] C_aligned={C_lihdr(0,0,16),40,116,101,115,116,32,102,110,97,109,101,50,52,52,52,41};
+static C_char C_TLS li230[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,112,97,116,104,115,50,52,53,51,41};
+static C_char C_TLS li231[] C_aligned={C_lihdr(0,0,74),40,35,35,115,121,115,35,114,101,115,111,108,118,101,45,105,110,99,108,117,100,101,45,102,105,108,101,110,97,109,101,32,102,110,97,109,101,50,52,50,53,32,112,114,101,102,101,114,45,115,111,117,114,99,101,50,52,50,54,32,46,32,116,109,112,50,52,50,52,50,52,50,55,41,0,0,0,0,0,0};
+static C_char C_TLS li232[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,50,52,55,52,32,105,50,52,55,56,41,0,0,0,0,0,0};
+static C_char C_TLS li233[] C_aligned={C_lihdr(0,0,14),40,115,112,97,99,101,115,32,110,50,52,55,51,41,0,0};
+static C_char C_TLS li234[] C_aligned={C_lihdr(0,0,24),40,100,105,115,112,108,97,121,45,114,106,32,120,50,52,56,50,32,119,50,52,56,51,41};
+static C_char C_TLS li235[] C_aligned={C_lihdr(0,0,30),40,35,35,115,121,115,35,100,105,115,112,108,97,121,45,116,105,109,101,115,32,105,110,102,111,50,52,56,56,41,0,0};
+static C_char C_TLS li236[] C_aligned={C_lihdr(0,0,7),40,97,57,53,56,51,41,0};
+static C_char C_TLS li237[] C_aligned={C_lihdr(0,0,38),40,35,35,115,121,115,35,114,101,112,108,45,112,114,105,110,116,45,104,111,111,107,32,120,50,52,57,57,32,112,111,114,116,50,53,48,48,41,0,0};
+static C_char C_TLS li238[] C_aligned={C_lihdr(0,0,24),40,35,35,115,121,115,35,114,101,97,100,45,112,114,111,109,112,116,45,104,111,111,107,41};
+static C_char C_TLS li239[] C_aligned={C_lihdr(0,0,26),40,35,35,115,121,115,35,99,108,101,97,114,45,116,114,97,99,101,45,98,117,102,102,101,114,41,0,0,0,0,0,0};
+static C_char C_TLS li240[] C_aligned={C_lihdr(0,0,21),40,97,57,54,50,49,32,103,50,53,52,48,50,53,52,49,50,53,52,50,41,0,0,0};
+static C_char C_TLS li241[] C_aligned={C_lihdr(0,0,18),40,119,114,105,116,101,45,101,114,114,32,120,115,50,53,50,51,41,0,0,0,0,0,0};
+static C_char C_TLS li242[] C_aligned={C_lihdr(0,0,26),40,97,57,54,56,57,32,109,115,103,50,53,56,49,32,46,32,97,114,103,115,50,53,56,50,41,0,0,0,0,0,0};
+static C_char C_TLS li243[] C_aligned={C_lihdr(0,0,7),40,97,57,54,55,54,41,0};
+static C_char C_TLS li244[] C_aligned={C_lihdr(0,0,7),40,97,57,55,56,49,41,0};
+static C_char C_TLS li245[] C_aligned={C_lihdr(0,0,21),40,97,57,54,52,50,32,103,50,53,54,51,50,53,54,52,50,53,54,53,41,0,0,0};
+static C_char C_TLS li246[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,54,52,49,32,103,50,54,52,53,50,54,52,55,41,0,0,0,0};
+static C_char C_TLS li247[] C_aligned={C_lihdr(0,0,21),40,108,111,111,112,32,118,97,114,115,50,54,50,57,32,117,50,54,51,48,41,0,0,0};
+static C_char C_TLS li248[] C_aligned={C_lihdr(0,0,20),40,97,57,55,57,48,32,46,32,114,101,115,117,108,116,50,54,50,51,41,0,0,0,0};
+static C_char C_TLS li249[] C_aligned={C_lihdr(0,0,7),40,97,57,57,53,48,41,0};
+static C_char C_TLS li250[] C_aligned={C_lihdr(0,0,13),40,97,57,57,52,52,32,99,50,53,57,56,41,0,0,0};
+static C_char C_TLS li251[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
+static C_char C_TLS li252[] C_aligned={C_lihdr(0,0,7),40,97,57,55,52,49,41,0};
+static C_char C_TLS li253[] C_aligned={C_lihdr(0,0,7),40,97,57,57,54,49,41,0};
+static C_char C_TLS li254[] C_aligned={C_lihdr(0,0,6),40,114,101,112,108,41,0,0};
+static C_char C_TLS li255[] C_aligned={C_lihdr(0,0,38),40,100,101,102,105,110,101,45,114,101,97,100,101,114,45,99,116,111,114,32,115,112,101,99,50,54,56,54,32,112,114,111,99,50,54,56,55,41,0,0};
+static C_char C_TLS li256[] C_aligned={C_lihdr(0,0,5),40,101,114,114,41,0,0,0};
+static C_char C_TLS li257[] C_aligned={C_lihdr(0,0,40),40,35,35,115,121,115,35,117,115,101,114,45,114,101,97,100,45,104,111,111,107,32,99,104,97,114,50,54,57,50,32,112,111,114,116,50,54,57,51,41};
+static C_char C_TLS li258[] C_aligned={C_lihdr(0,0,8),40,97,49,48,48,56,52,41};
+static C_char C_TLS li259[] C_aligned={C_lihdr(0,0,15),40,97,49,48,48,55,56,32,101,120,50,55,49,57,41,0};
+static C_char C_TLS li260[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,48,51,41};
+static C_char C_TLS li261[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,49,53,41};
+static C_char C_TLS li262[] C_aligned={C_lihdr(0,0,23),40,97,49,48,49,48,57,32,46,32,97,114,103,115,50,55,49,52,50,55,50,51,41,0};
+static C_char C_TLS li263[] C_aligned={C_lihdr(0,0,8),40,97,49,48,48,57,55,41};
+static C_char C_TLS li264[] C_aligned={C_lihdr(0,0,18),40,97,49,48,48,55,50,32,107,50,55,49,51,50,55,49,56,41,0,0,0,0,0,0};
+static C_char C_TLS li265[] C_aligned={C_lihdr(0,0,20),40,114,117,110,45,115,97,102,101,32,116,104,117,110,107,50,55,49,50,41,0,0,0,0};
+static C_char C_TLS li266[] C_aligned={C_lihdr(0,0,31),40,115,116,111,114,101,45,114,101,115,117,108,116,32,120,50,55,50,54,32,114,101,115,117,108,116,50,55,50,55,41,0};
+static C_char C_TLS li267[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,51,54,41};
+static C_char C_TLS li268[] C_aligned={C_lihdr(0,0,15),40,67,72,73,67,75,69,78,95,121,105,101,108,100,41,0};
+static C_char C_TLS li269[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,52,56,41};
+static C_char C_TLS li270[] C_aligned={C_lihdr(0,0,33),40,67,72,73,67,75,69,78,95,101,118,97,108,32,101,120,112,50,55,51,57,32,114,101,115,117,108,116,50,55,52,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li271[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,54,55,41};
+static C_char C_TLS li272[] C_aligned={C_lihdr(0,0,40),40,67,72,73,67,75,69,78,95,101,118,97,108,95,115,116,114,105,110,103,32,115,116,114,50,55,52,54,32,114,101,115,117,108,116,50,55,52,55,41};
+static C_char C_TLS li273[] C_aligned={C_lihdr(0,0,34),40,115,116,111,114,101,45,115,116,114,105,110,103,32,98,117,102,115,105,122,101,50,55,53,51,32,98,117,102,50,55,53,52,41,0,0,0,0,0,0};
+static C_char C_TLS li274[] C_aligned={C_lihdr(0,0,8),40,97,49,48,50,48,51,41};
+static C_char C_TLS li275[] C_aligned={C_lihdr(0,0,52),40,67,72,73,67,75,69,78,95,101,118,97,108,95,116,111,95,115,116,114,105,110,103,32,101,120,112,50,55,54,54,32,98,117,102,50,55,54,55,32,98,117,102,115,105,122,101,50,55,54,56,41,0,0,0,0};
+static C_char C_TLS li276[] C_aligned={C_lihdr(0,0,8),40,97,49,48,50,51,50,41};
+static C_char C_TLS li277[] C_aligned={C_lihdr(0,0,59),40,67,72,73,67,75,69,78,95,101,118,97,108,95,115,116,114,105,110,103,95,116,111,95,115,116,114,105,110,103,32,115,116,114,50,55,55,55,32,98,117,102,50,55,55,56,32,98,117,102,115,105,122,101,50,55,55,57,41,0,0,0,0,0};
+static C_char C_TLS li278[] C_aligned={C_lihdr(0,0,8),40,97,49,48,50,54,54,41};
+static C_char C_TLS li279[] C_aligned={C_lihdr(0,0,44),40,67,72,73,67,75,69,78,95,97,112,112,108,121,32,102,117,110,99,50,55,56,56,32,97,114,103,115,50,55,56,57,32,114,101,115,117,108,116,50,55,57,48,41,0,0,0,0};
+static C_char C_TLS li280[] C_aligned={C_lihdr(0,0,8),40,97,49,48,50,56,50,41};
+static C_char C_TLS li281[] C_aligned={C_lihdr(0,0,63),40,67,72,73,67,75,69,78,95,97,112,112,108,121,95,116,111,95,115,116,114,105,110,103,32,102,117,110,99,50,55,57,55,32,97,114,103,115,50,55,57,56,32,98,117,102,50,55,57,57,32,98,117,102,115,105,122,101,50,56,48,48,41,0};
+static C_char C_TLS li282[] C_aligned={C_lihdr(0,0,8),40,97,49,48,51,49,49,41};
+static C_char C_TLS li283[] C_aligned={C_lihdr(0,0,33),40,67,72,73,67,75,69,78,95,114,101,97,100,32,115,116,114,50,56,49,48,32,114,101,115,117,108,116,50,56,49,49,41,0,0,0,0,0,0,0};
+static C_char C_TLS li284[] C_aligned={C_lihdr(0,0,8),40,97,49,48,51,51,51,41};
+static C_char C_TLS li285[] C_aligned={C_lihdr(0,0,22),40,67,72,73,67,75,69,78,95,108,111,97,100,32,115,116,114,50,56,49,56,41,0,0};
+static C_char C_TLS li286[] C_aligned={C_lihdr(0,0,39),40,67,72,73,67,75,69,78,95,103,101,116,95,101,114,114,111,114,95,109,101,115,115,97,103,101,32,98,117,102,115,105,122,101,50,56,50,53,41,0};
+static C_char C_TLS li287[] C_aligned={C_lihdr(0,0,32),40,35,35,115,121,115,35,109,97,107,101,45,108,97,109,98,100,97,45,105,110,102,111,32,115,116,114,50,56,51,52,41};
+static C_char C_TLS li288[] C_aligned={C_lihdr(0,0,8),40,97,49,48,51,53,56,41};
+static C_char C_TLS li289[] C_aligned={C_lihdr(0,0,14),40,97,49,48,52,48,57,32,120,49,55,51,52,41,0,0};
+static C_char C_TLS li290[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,55,49,51,32,103,49,55,50,51,49,55,50,55,41,0,0,0,0};
+static C_char C_TLS li291[] C_aligned={C_lihdr(0,0,8),40,97,49,48,53,51,48,41};
+static C_char C_TLS li292[] C_aligned={C_lihdr(0,0,8),40,97,49,48,53,51,55,41};
+static C_char C_TLS li293[] C_aligned={C_lihdr(0,0,8),40,97,49,48,53,52,55,41};
+static C_char C_TLS li294[] C_aligned={C_lihdr(0,0,24),40,97,49,48,53,49,56,32,120,49,51,56,50,32,46,32,101,110,118,49,51,56,51,41};
+static C_char C_TLS li295[] C_aligned={C_lihdr(0,0,10),40,116,111,112,108,101,118,101,108,41,0,0,0,0,0,0};
+
+
+/* from ##sys#clear-trace-buffer in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static C_word C_fcall stub2512(C_word C_buf) C_regparm;
+C_regparm static C_word C_fcall stub2512(C_word C_buf){
C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;
C_clear_trace_buffer();
return C_r;}
@@ -374,1022 +369,1002 @@ 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_10519)
+static void C_ccall f_10519(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_10519)
+static void C_ccall f_10519r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_10523)
+static void C_fcall f_10523(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10548)
+static void C_ccall f_10548(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10538)
+static void C_ccall f_10538(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10546)
+static void C_ccall f_10546(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10531)
+static void C_ccall f_10531(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10526)
+static void C_ccall f_10526(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6780)
+static void C_ccall f_6780(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6875)
+static void C_ccall f_6875(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6956)
+static void C_ccall f_6956(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10513)
+static void C_ccall f_10513(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10509)
+static void C_ccall f_10509(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10505)
+static void C_ccall f_10505(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10501)
+static void C_ccall f_10501(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7523)
+static void C_fcall f_7523(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7528)
+static void C_ccall f_7528(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10473)
+static void C_ccall f_10473(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10452)
+static void C_fcall f_10452(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10459)
+static void C_ccall f_10459(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7535)
+static void C_ccall f_7535(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10416)
+static void C_fcall f_10416(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10445)
+static void C_ccall f_10445(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10408)
+static void C_ccall f_10408(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10410)
+static void C_ccall f_10410(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7544)
+static void C_ccall f_7544(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10380)
+static void C_ccall f_10380(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10400)
+static void C_ccall f_10400(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10396)
+static void C_ccall f_10396(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10386)
-static void C_ccall f_10386(C_word c,C_word t0,C_word t1,C_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;
+static void C_ccall f_10386(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7898)
+static void C_ccall f_7898(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8934)
+static void C_ccall f_8934(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10371)
+static void C_ccall f_10371(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9285)
+static void C_ccall f_9285(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9289)
+static void C_ccall f_9289(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10367)
+static void C_ccall f_10367(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9292)
+static void C_ccall f_9292(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9296)
+static void C_ccall f_9296(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9570)
+static void C_ccall f_9570(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10359)
static void C_ccall f_10359(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_9592)
+static void C_ccall f_9592(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9977)
+static void C_ccall f_9977(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10350)
+static void C_ccall f_10350(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10357)
+static void C_ccall f_10357(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10340)
+static C_word C_fcall f_10340(C_word t0,C_word t1);
+C_noret_decl(f_10325)
+static void C_ccall f_10325(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10329)
+static void C_ccall f_10329(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10334)
+static void C_ccall f_10334(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10338)
+static void C_ccall f_10338(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10303)
+static void C_ccall f_10303(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10307)
+static void C_ccall f_10307(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10312)
+static void C_ccall f_10312(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10316)
+static void C_ccall f_10316(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10323)
static void C_ccall f_10323(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_10277)
+static void C_ccall f_10277(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
C_noret_decl(f_10283)
static void C_ccall f_10283(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_10287)
+static void C_ccall f_10287(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10301)
+static void C_ccall f_10301(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10290)
+static void C_ccall f_10290(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10297)
+static void C_ccall f_10297(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10261)
+static void C_ccall f_10261(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10267)
+static void C_ccall f_10267(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10275)
+static void C_ccall f_10275(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10224)
+static void C_ccall f_10224(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10228)
+static void C_ccall f_10228(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10233)
+static void C_ccall f_10233(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10237)
+static void C_ccall f_10237(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10259)
+static void C_ccall f_10259(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10255)
+static void C_ccall f_10255(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10251)
+static void C_ccall f_10251(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10240)
static void C_ccall f_10240(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_10198)
+static void C_ccall f_10198(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_10204)
static void C_ccall f_10204(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10208)
static void C_ccall f_10208(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_10222)
+static void C_ccall f_10222(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10211)
+static void C_ccall f_10211(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10218)
+static void C_ccall f_10218(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10185)
-static 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;
+static C_word C_fcall f_10185(C_word t0,C_word t1,C_word t2);
+C_noret_decl(f_10159)
+static void C_ccall f_10159(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10163)
+static void C_ccall f_10163(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10168)
+static void C_ccall f_10168(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10172)
+static void C_ccall f_10172(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10183)
+static void C_ccall f_10183(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10179)
+static void C_ccall f_10179(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10143)
+static void C_ccall f_10143(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10149)
+static void C_ccall f_10149(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10157)
+static void C_ccall f_10157(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10131)
+static void C_ccall f_10131(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10137)
+static void C_ccall f_10137(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10141)
+static void C_ccall f_10141(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10122)
+static void C_fcall f_10122(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10126)
+static void C_ccall f_10126(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10063)
+static void C_fcall f_10063(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10073)
+static void C_ccall f_10073(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10098)
+static void C_ccall f_10098(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10110)
+static void C_ccall f_10110(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_10110)
+static void C_ccall f_10110r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_10116)
+static void C_ccall f_10116(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10104)
static void C_ccall f_10104(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_10079)
+static void C_ccall f_10079(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10085)
+static void C_ccall f_10085(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10089)
+static void C_ccall f_10089(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10092)
+static void C_ccall f_10092(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10096)
+static void C_ccall f_10096(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10068)
+static void C_ccall f_10068(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9988)
+static void C_ccall f_9988(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9998)
static void C_ccall f_9998(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10001)
+static void C_ccall f_10001(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10015)
+static void C_fcall f_10015(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10033)
+static void C_ccall f_10033(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_10002)
-static void C_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;
+static void C_fcall f_10002(C_word t0,C_word t1) C_noret;
C_noret_decl(f_9979)
-static void C_ccall f_9979(C_word c,C_word t0,C_word t1) C_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;
+static void C_ccall f_9979(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9613)
+static void C_ccall f_9613(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9657)
+static void C_ccall f_9657(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9660)
+static void C_ccall f_9660(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_9962)
static void C_ccall f_9962(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_9966)
+static void C_ccall f_9966(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9970)
+static void C_ccall f_9970(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_9742)
static void C_ccall f_9742(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_9748)
+static void C_fcall f_9748(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9945)
+static void C_ccall f_9945(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9951)
+static void C_ccall f_9951(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9755)
+static void C_ccall f_9755(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9758)
+static void C_ccall f_9758(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9764)
+static void C_ccall f_9764(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9943)
+static void C_ccall f_9943(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9773)
+static void C_ccall f_9773(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9776)
+static void C_ccall f_9776(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9791)
+static void C_ccall f_9791(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_9791)
+static void C_ccall f_9791r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_9809)
+static void C_fcall f_9809(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9930)
+static void C_ccall f_9930(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9926)
+static void C_ccall f_9926(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9897)
+static void C_ccall f_9897(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9825)
+static void C_ccall f_9825(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9833)
+static void C_fcall f_9833(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9845)
+static void C_ccall f_9845(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9848)
+static void C_ccall f_9848(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9860)
+static void C_ccall f_9860(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9863)
+static void C_ccall f_9863(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9851)
+static void C_ccall f_9851(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9877)
+static void C_ccall f_9877(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9828)
+static void C_ccall f_9828(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9813)
+static void C_ccall f_9813(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9795)
+static void C_ccall f_9795(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9638)
+static void C_fcall f_9638(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9643)
+static void C_ccall f_9643(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9798)
+static void C_ccall f_9798(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9782)
+static void C_ccall f_9782(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9677)
+static void C_ccall f_9677(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9682)
+static void C_ccall f_9682(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9685)
+static void C_ccall f_9685(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9690)
+static void C_ccall f_9690(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_9690)
+static void C_ccall f_9690r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_9697)
+static void C_ccall f_9697(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9737)
+static void C_ccall f_9737(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9700)
+static void C_ccall f_9700(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9712)
+static void C_fcall f_9712(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9721)
+static void C_ccall f_9721(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9715)
+static void C_ccall f_9715(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9703)
+static void C_ccall f_9703(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9706)
+static void C_ccall f_9706(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9668)
+static C_word C_fcall f_9668(C_word t0);
+C_noret_decl(f_9662)
+static C_word C_fcall f_9662(C_word t0);
+C_noret_decl(f_9616)
+static void C_fcall f_9616(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9622)
+static void C_ccall f_9622(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9610)
+static void C_ccall f_9610(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9594)
+static void C_ccall f_9594(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9605)
+static void C_ccall f_9605(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9608)
+static void C_ccall f_9608(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9598)
+static void C_ccall f_9598(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9575)
+static void C_ccall f_9575(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9584)
+static void C_ccall f_9584(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_9579)
static void C_ccall f_9579(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_9515)
+static void C_ccall f_9515(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9519)
+static void C_ccall f_9519(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9522)
+static void C_ccall f_9522(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9525)
+static void C_ccall f_9525(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9528)
+static void C_ccall f_9528(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9531)
+static void C_ccall f_9531(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_9534)
static void C_ccall f_9534(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_9537)
static void C_ccall f_9537(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_9540)
+static void C_ccall f_9540(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9543)
+static void C_ccall f_9543(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9494)
+static void C_fcall f_9494(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9498)
+static void C_ccall f_9498(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9501)
+static void C_ccall f_9501(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9470)
+static void C_fcall f_9470(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9476)
+static void C_fcall f_9476(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9486)
+static void C_ccall f_9486(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9321)
+static void C_ccall f_9321(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_9321)
+static void C_ccall f_9321r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_9325)
+static void C_ccall f_9325(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9392)
+static void C_ccall f_9392(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9439)
+static void C_ccall f_9439(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9449)
+static void C_ccall f_9449(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9402)
+static void C_ccall f_9402(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9404)
+static void C_fcall f_9404(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_9428)
static void C_ccall f_9428(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_9414)
+static void C_ccall f_9414(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9362)
+static void C_fcall f_9362(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9327)
+static void C_fcall f_9327(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9343)
+static void C_ccall f_9343(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9349)
+static void C_ccall f_9349(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9340)
+static void C_ccall f_9340(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9302)
+static void C_fcall f_9302(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9306)
+static void C_ccall f_9306(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9269)
+static void C_fcall f_9269(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9271)
+static void C_ccall f_9271(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9275)
+static void C_ccall f_9275(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9231)
+static void C_ccall f_9231(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_9231)
+static void C_ccall f_9231r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_9238)
+static void C_ccall f_9238(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9245)
+static void C_ccall f_9245(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9187)
+static void C_ccall f_9187(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_9187)
+static void C_ccall f_9187r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
C_noret_decl(f_9220)
static void C_ccall f_9220(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_9207)
+static void C_ccall f_9207(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9184)
+static void C_ccall f_9184(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9065)
+static void C_ccall f_9065(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_9065)
+static void C_ccall f_9065r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_9159)
+static void C_ccall f_9159(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9169)
+static void C_ccall f_9169(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9157)
+static void C_ccall f_9157(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9086)
+static void C_fcall f_9086(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9110)
+static void C_fcall f_9110(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9129)
+static void C_ccall f_9129(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9104)
+static void C_ccall f_9104(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8957)
+static void C_ccall f_8957(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
+C_noret_decl(f_8957)
+static void C_ccall f_8957r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
+C_noret_decl(f_8967)
+static void C_ccall f_8967(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8972)
+static void C_fcall f_8972(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8999)
+static void C_fcall f_8999(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9028)
+static void C_fcall f_9028(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9032)
+static void C_ccall f_9032(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_8993)
-static void C_ccall f_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;
+static void C_ccall f_8993(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8941)
+static void C_ccall f_8941(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8878)
+static void C_ccall f_8878(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8882)
+static void C_ccall f_8882(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8890)
+static C_word C_fcall f_8890(C_word t0,C_word t1);
+C_noret_decl(f_8270)
+static void C_ccall f_8270(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_8694)
+static void C_fcall f_8694(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8803)
+static void C_fcall f_8803(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8812)
+static void C_fcall f_8812(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_8819)
-static void C_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;
+static void C_fcall f_8819(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8810)
+static void C_ccall f_8810(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8723)
+static void C_fcall f_8723(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8790)
+static void C_ccall f_8790(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8750)
+static void C_fcall f_8750(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8754)
+static void C_ccall f_8754(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8781)
+static void C_ccall f_8781(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8777)
+static void C_ccall f_8777(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8757)
+static void C_ccall f_8757(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8768)
+static void C_ccall f_8768(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8762)
+static void C_ccall f_8762(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8717)
+static void C_ccall f_8717(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8713)
+static void C_ccall f_8713(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8339)
+static void C_fcall f_8339(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8349)
+static void C_ccall f_8349(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8511)
+static void C_ccall f_8511(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8656)
+static void C_ccall f_8656(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8663)
+static void C_ccall f_8663(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8526)
+static void C_ccall f_8526(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8545)
+static void C_fcall f_8545(C_word t0,C_word t1) C_noret;
C_noret_decl(f_8577)
-static void C_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;
+static void C_fcall f_8577(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8571)
+static void C_ccall f_8571(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8567)
+static void C_ccall f_8567(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8549)
+static void C_ccall f_8549(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8541)
+static void C_ccall f_8541(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8533)
+static void C_ccall f_8533(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8416)
+static void C_ccall f_8416(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8437)
+static void C_fcall f_8437(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8445)
+static void C_ccall f_8445(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8433)
+static void C_ccall f_8433(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8369)
+static void C_ccall f_8369(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8356)
+static void C_ccall f_8356(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8298)
+static void C_fcall f_8298(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_8317)
-static void C_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;
+static void C_ccall f_8317(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8310)
+static void C_ccall f_8310(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8273)
+static void C_fcall f_8273(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8292)
+static void C_ccall f_8292(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8286)
+static void C_ccall f_8286(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8221)
+static void C_ccall f_8221(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8227)
+static void C_fcall f_8227(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8241)
+static void C_ccall f_8241(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8244)
+static void C_fcall f_8244(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8251)
+static void C_ccall f_8251(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8215)
+static void C_ccall f_8215(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8182)
+static void C_ccall f_8182(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8186)
+static void C_ccall f_8186(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8192)
+static void C_ccall f_8192(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8195)
+static void C_ccall f_8195(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_8213)
-static void C_ccall f_8213(C_word c,C_word t0,C_word t1,...) C_noret;
-C_noret_decl(f_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;
+static void C_ccall f_8213(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8198)
+static void C_ccall f_8198(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8202)
+static void C_fcall f_8202(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8169)
+static void C_ccall f_8169(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_8169)
+static void C_ccall f_8169r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_8175)
+static void C_ccall f_8175(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8155)
+static void C_ccall f_8155(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8166)
+static void C_ccall f_8166(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8113)
+static void C_ccall f_8113(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_8113)
+static void C_ccall f_8113r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_8119)
+static void C_fcall f_8119(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8134)
+static void C_ccall f_8134(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8029)
+static void C_ccall f_8029(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_8029)
+static void C_ccall f_8029r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_8033)
+static void C_ccall f_8033(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8089)
+static void C_ccall f_8089(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8036)
+static void C_fcall f_8036(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8039)
+static void C_ccall f_8039(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8066)
+static void C_ccall f_8066(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8072)
+static void C_ccall f_8072(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8054)
+static void C_ccall f_8054(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7930)
+static void C_ccall f_7930(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7934)
+static void C_ccall f_7934(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7982)
+static void C_ccall f_7982(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7984)
-static void C_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;
+static void C_fcall f_7984(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7997)
+static void C_ccall f_7997(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7936)
+static void C_fcall f_7936(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_7940)
static void C_ccall f_7940(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7975)
+static void C_ccall f_7975(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7946)
+static void C_ccall f_7946(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7956)
+static void C_ccall f_7956(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7949)
+static void C_ccall f_7949(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7899)
+static void C_ccall f_7899(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_7899)
+static void C_ccall f_7899r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_7903)
+static void C_ccall f_7903(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7738)
+static void C_ccall f_7738(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7843)
+static void C_fcall f_7843(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7860)
+static void C_ccall f_7860(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7868)
+static void C_ccall f_7868(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7760)
+static void C_ccall f_7760(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7765)
+static void C_fcall f_7765(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7804)
+static void C_ccall f_7804(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7791)
+static void C_ccall f_7791(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7741)
-static void C_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;
+static void C_fcall f_7741(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7652)
+static void C_ccall f_7652(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_7652)
+static void C_ccall f_7652r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_7659)
+static void C_ccall f_7659(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7669)
+static void C_ccall f_7669(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7546)
+static void C_ccall f_7546(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7550)
+static void C_ccall f_7550(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7642)
-static void C_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;
+static void C_ccall f_7642(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7646)
+static void C_ccall f_7646(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7559)
+static void C_fcall f_7559(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7628)
+static void C_ccall f_7628(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7624)
+static void C_ccall f_7624(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7562)
+static void C_ccall f_7562(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7611)
+static void C_ccall f_7611(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7614)
+static void C_ccall f_7614(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7617)
+static void C_ccall f_7617(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7565)
+static void C_ccall f_7565(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7570)
+static void C_fcall f_7570(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7604)
+static void C_ccall f_7604(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7583)
+static void C_ccall f_7583(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7537)
+static void C_fcall f_7537(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_7497)
static void C_ccall f_7497(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
C_noret_decl(f_7497)
static void C_ccall f_7497r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
-C_noret_decl(f_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_7518)
+static void C_ccall f_7518(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7501)
+static void C_ccall f_7501(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7515)
+static void C_ccall f_7515(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7504)
+static void C_ccall f_7504(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7512)
+static void C_ccall f_7512(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7507)
+static void C_ccall f_7507(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7454)
+static void C_ccall f_7454(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_7454)
+static void C_ccall f_7454r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_7462)
+static void C_ccall f_7462(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7466)
+static void C_ccall f_7466(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7425)
+static void C_ccall f_7425(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_7425)
+static void C_ccall f_7425r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_7433)
+static void C_ccall f_7433(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7004)
+static void C_ccall f_7004(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
+C_noret_decl(f_7004)
+static void C_ccall f_7004r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
+C_noret_decl(f_7377)
+static void C_fcall f_7377(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7372)
+static void C_fcall f_7372(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7006)
+static void C_fcall f_7006(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7371)
+static void C_ccall f_7371(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7010)
+static void C_fcall f_7010(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7293)
+static void C_ccall f_7293(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7308)
+static void C_ccall f_7308(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7311)
+static void C_fcall f_7311(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7314)
+static void C_ccall f_7314(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7320)
+static void C_ccall f_7320(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7323)
+static void C_ccall f_7323(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7329)
static void C_ccall f_7329(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7013)
+static void C_ccall f_7013(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7284)
+static void C_ccall f_7284(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7272)
+static void C_ccall f_7272(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7275)
+static void C_ccall f_7275(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7278)
+static void C_ccall f_7278(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7019)
+static void C_ccall f_7019(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7257)
+static void C_ccall f_7257(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7229)
+static void C_ccall f_7229(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7253)
+static void C_ccall f_7253(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7249)
+static void C_ccall f_7249(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7245)
+static void C_ccall f_7245(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7022)
+static void C_ccall f_7022(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7030)
+static void C_ccall f_7030(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7216)
+static void C_ccall f_7216(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7034)
+static void C_ccall f_7034(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7204)
+static void C_ccall f_7204(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7055)
+static void C_ccall f_7055(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7059)
+static void C_ccall f_7059(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7195)
+static void C_ccall f_7195(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7067)
+static void C_ccall f_7067(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7071)
+static void C_ccall f_7071(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7189)
+static void C_ccall f_7189(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7074)
+static void C_ccall f_7074(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7077)
+static void C_ccall f_7077(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7082)
+static void C_fcall f_7082(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7092)
+static void C_ccall f_7092(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7138)
+static void C_ccall f_7138(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_7138)
+static void C_ccall f_7138r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_7147)
+static void C_fcall f_7147(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7165)
+static void C_ccall f_7165(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7155)
+static void C_fcall f_7155(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7159)
+static void C_ccall f_7159(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7104)
+static void C_ccall f_7104(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7111)
+static void C_ccall f_7111(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7122)
+static void C_ccall f_7122(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_7122)
+static void C_ccall f_7122r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_7133)
+static void C_ccall f_7133(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7126)
+static void C_ccall f_7126(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_7116)
static void C_ccall f_7116(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_7095)
+static void C_ccall f_7095(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7102)
+static void C_ccall f_7102(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7064)
+static void C_ccall f_7064(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7044)
+static void C_ccall f_7044(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7035)
+static void C_ccall f_7035(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7025)
+static void C_ccall f_7025(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6958)
+static void C_fcall f_6958(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6968)
+static C_word C_fcall f_6968(C_word t0,C_word t1);
+C_noret_decl(f_6883)
+static void C_ccall f_6883(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6895)
+static void C_fcall f_6895(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6908)
+static void C_ccall f_6908(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6890)
+static void C_ccall f_6890(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6877)
+static void C_ccall f_6877(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6793)
+static void C_ccall f_6793(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6806)
+static void C_fcall f_6806(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6839)
+static void C_ccall f_6839(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6820)
+static void C_ccall f_6820(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6796)
+static void C_fcall f_6796(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6783)
+static void C_ccall f_6783(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6783)
+static void C_ccall f_6783r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6791)
+static void C_ccall f_6791(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3359)
static void C_ccall f_3359(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
C_noret_decl(f_3359)
static void C_ccall f_3359r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
C_noret_decl(f_3363)
static void C_ccall f_3363(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_6457)
+static void C_fcall f_6457(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
+C_noret_decl(f_6461)
+static void C_ccall f_6461(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6708)
+static void C_fcall f_6708(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6742)
+static void C_ccall f_6742(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6735)
+static void C_fcall f_6735(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6650)
+static void C_ccall f_6650(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_6651)
-static void C_ccall f_6651(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6658)
-static void C_ccall f_6658(C_word c,C_word t0,C_word t1) C_noret;
+static void C_ccall f_6651(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6655)
+static void C_fcall f_6655(C_word t0,C_word t1) C_noret;
C_noret_decl(f_6662)
static void C_ccall f_6662(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6668)
+static void C_fcall f_6668(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6702)
+static void C_ccall f_6702(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6695)
+static void C_fcall f_6695(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_6666)
static void C_ccall f_6666(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_6607)
+static void C_ccall f_6607(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_6610)
-static void C_fcall f_6610(C_word t0,C_word t1) C_noret;
+static void C_ccall f_6610(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_6613)
static void C_ccall f_6613(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_6620)
-static void C_ccall f_6620(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6616)
+static void C_ccall f_6616(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6617)
+static void C_ccall f_6617(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6621)
+static void C_fcall f_6621(C_word t0,C_word t1) C_noret;
C_noret_decl(f_6624)
static void C_ccall f_6624(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_6631)
+static void C_ccall f_6631(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6635)
+static void C_ccall f_6635(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6639)
+static void C_ccall f_6639(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6643)
+static void C_ccall f_6643(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6565)
+static void C_ccall f_6565(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6568)
+static void C_ccall f_6568(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6571)
+static void C_ccall f_6571(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6572)
+static void C_ccall f_6572(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6576)
+static void C_fcall f_6576(C_word t0,C_word t1) C_noret;
C_noret_decl(f_6579)
-static void C_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;
+static void C_ccall f_6579(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6586)
+static void C_ccall f_6586(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6590)
+static void C_ccall f_6590(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6594)
+static void C_ccall f_6594(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6530)
+static void C_ccall f_6530(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6533)
+static void C_ccall f_6533(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6534)
+static void C_ccall f_6534(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6538)
+static void C_fcall f_6538(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6541)
+static void C_ccall f_6541(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6548)
+static void C_ccall f_6548(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6552)
+static void C_ccall f_6552(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6502)
+static void C_ccall f_6502(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_6503)
-static C_word C_fcall f_6503(C_word t0,C_word t1);
+static void C_ccall f_6503(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6507)
+static void C_fcall f_6507(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6510)
+static void C_ccall f_6510(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6517)
+static void C_ccall f_6517(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6483)
+static void C_ccall f_6483(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f11767)
+static void C_ccall f11767(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f11763)
+static void C_ccall f11763(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6431)
+static C_word C_fcall f_6431(C_word t0,C_word t1);
C_noret_decl(f_3577)
static void C_fcall f_3577(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7) C_noret;
C_noret_decl(f_3584)
@@ -1404,144 +1379,132 @@ 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_6231)
+static void C_fcall f_6231(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6214)
+static void C_ccall f_6214(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6218)
+static void C_ccall f_6218(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6165)
+static void C_fcall f_6165(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6180)
+static void C_ccall f_6180(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6173)
+static void C_fcall f_6173(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6150)
+static void C_ccall f_6150(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6109)
+static void C_ccall f_6109(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6049)
+static void C_ccall f_6049(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6051)
+static void C_fcall f_6051(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6073)
+static void C_ccall f_6073(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6089)
+static void C_ccall f_6089(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6063)
+static void C_ccall f_6063(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6045)
+static void C_ccall f_6045(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5991)
+static void C_fcall f_5991(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6025)
+static void C_ccall f_6025(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6018)
+static void C_fcall f_6018(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5914)
+static void C_ccall f_5914(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5917)
+static void C_ccall f_5917(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5920)
+static void C_ccall f_5920(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5943)
+static void C_fcall f_5943(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_5941)
static void C_ccall f_5941(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_5937)
+static void C_ccall f_5937(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5897)
+static void C_ccall f_5897(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5901)
+static void C_ccall f_5901(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5868)
+static void C_ccall f_5868(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5872)
+static void C_ccall f_5872(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5611)
+static void C_ccall f_5611(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5755)
+static void C_ccall f_5755(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5757)
+static void C_fcall f_5757(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5835)
+static void C_ccall f_5835(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5784)
+static void C_fcall f_5784(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5808)
+static C_word C_fcall f_5808(C_word t0);
+C_noret_decl(f_5797)
+static void C_fcall f_5797(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5617)
+static void C_ccall f_5617(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5745)
+static void C_ccall f_5745(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5620)
+static void C_ccall f_5620(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5623)
+static void C_ccall f_5623(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5651)
+static void C_ccall f_5651(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5661)
+static void C_fcall f_5661(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5742)
+static void C_ccall f_5742(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5734)
-static void C_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;
+static void C_ccall f_5734(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5671)
static void C_ccall f_5671(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5719)
+static void C_ccall f_5719(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5674)
+static void C_ccall f_5674(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5675)
+static void C_ccall f_5675(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5681)
+static void C_fcall f_5681(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5706)
+static void C_ccall f_5706(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5624)
+static void C_ccall f_5624(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5628)
+static void C_ccall f_5628(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5631)
+static void C_ccall f_5631(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5635)
-static void C_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;
+static void C_ccall f_5635(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5638)
+static void C_ccall f_5638(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5642)
+static void C_ccall f_5642(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5645)
+static void C_ccall f_5645(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5598)
+static void C_ccall f_5598(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5551)
static void C_ccall f_5551(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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_5576)
+static void C_ccall f_5576(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5554)
-static void C_fcall f_5554(C_word t0,C_word t1) C_noret;
+static void C_ccall f_5554(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5564)
+static void C_ccall f_5564(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5572)
+static void C_ccall f_5572(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5568)
+static void C_ccall f_5568(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5557)
static void C_ccall f_5557(C_word c,C_word t0,C_word t1) C_noret;
-C_noret_decl(f_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)
@@ -1630,10 +1593,10 @@ 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_6385)
+static void C_fcall f_6385(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_6414)
+static void C_ccall f_6414(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5176)
static void C_ccall f_5176(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_5172)
@@ -1940,10 +1903,10 @@ 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(f10647)
+static void C_ccall f10647(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f10642)
+static void C_ccall f10642(C_word c,C_word t0,C_word t1,...) C_noret;
C_noret_decl(f_3619)
static void C_ccall f_3619(C_word c,C_word t0,C_word t1) C_noret;
C_noret_decl(f_3622)
@@ -2066,10 +2029,6 @@ 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){
@@ -2078,7 +2037,7 @@ 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);}
+C_save(x);C_callback_wrapper((void *)f_10340,2);}
/* from CHICKEN_load */
int CHICKEN_load(char * t0){
@@ -2086,7 +2045,7 @@ 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));}
+return C_truep(C_callback_wrapper((void *)f_10325,1));}
/* from CHICKEN_read */
int CHICKEN_read(char * t0,C_word *t1){
@@ -2096,7 +2055,7 @@ 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));}
+return C_truep(C_callback_wrapper((void *)f_10303,2));}
/* from CHICKEN_apply_to_string */
int CHICKEN_apply_to_string(C_word t0,C_word t1,char *t2,int t3){
@@ -2110,7 +2069,7 @@ 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));}
+return C_truep(C_callback_wrapper((void *)f_10277,4));}
/* from CHICKEN_apply */
int CHICKEN_apply(C_word t0,C_word t1,C_word *t2){
@@ -2122,7 +2081,7 @@ 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));}
+return C_truep(C_callback_wrapper((void *)f_10261,3));}
/* from CHICKEN_eval_string_to_string */
int CHICKEN_eval_string_to_string(char * t0,char *t1,int t2){
@@ -2134,7 +2093,7 @@ 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));}
+return C_truep(C_callback_wrapper((void *)f_10224,3));}
/* from CHICKEN_eval_to_string */
int CHICKEN_eval_to_string(C_word t0,char *t1,int t2){
@@ -2146,7 +2105,7 @@ 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));}
+return C_truep(C_callback_wrapper((void *)f_10198,3));}
/* from CHICKEN_eval_string */
int CHICKEN_eval_string(char * t0,C_word *t1){
@@ -2156,7 +2115,7 @@ 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));}
+return C_truep(C_callback_wrapper((void *)f_10159,2));}
/* from CHICKEN_eval */
int CHICKEN_eval(C_word t0,C_word *t1){
@@ -2166,570 +2125,578 @@ 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));}
+return C_truep(C_callback_wrapper((void *)f_10143,2));}
/* from CHICKEN_yield */
int CHICKEN_yield(){
C_word x,s=0,*a=C_alloc(s);
C_callback_adjust_stack(a,s);
-return C_truep(C_callback_wrapper((void *)f_10167,0));}
+return C_truep(C_callback_wrapper((void *)f_10131,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_noret_decl(trf_10523)
+static void C_fcall trf_10523(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10523(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_10706(t0,t1);}
+f_10523(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_noret_decl(trf_7523)
+static void C_fcall trf_7523(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7523(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7595(t0,t1);}
+f_7523(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_noret_decl(trf_10452)
+static void C_fcall trf_10452(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10452(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_10635(t0,t1);}
+f_10452(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_noret_decl(trf_10416)
+static void C_fcall trf_10416(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10416(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_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);}
+f_10416(t0,t1,t2);}
-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_noret_decl(trf_10122)
+static void C_fcall trf_10122(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10122(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_10158(t0,t1,t2);}
+f_10122(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_noret_decl(trf_10063)
+static void C_fcall trf_10063(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10063(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_10099(t0,t1);}
+f_10063(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_noret_decl(trf_10015)
+static void C_fcall trf_10015(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10015(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_10051(t0,t1);}
+f_10015(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_noret_decl(trf_10002)
+static void C_fcall trf_10002(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10002(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_10038(t0,t1);}
+f_10002(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_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_9784(t0,t1);}
+f_9748(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_noret_decl(trf_9809)
+static void C_fcall trf_9809(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9809(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_9845(t0,t1,t2,t3);}
+f_9809(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_noret_decl(trf_9833)
+static void C_fcall trf_9833(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9833(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_9869(t0,t1,t2);}
+f_9833(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_noret_decl(trf_9638)
+static void C_fcall trf_9638(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9638(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9674(t0,t1);}
+f_9638(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_noret_decl(trf_9712)
+static void C_fcall trf_9712(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9712(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9748(t0,t1);}
+f_9712(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_noret_decl(trf_9616)
+static void C_fcall trf_9616(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9616(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9652(t0,t1);}
+f_9616(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_noret_decl(trf_9494)
+static void C_fcall trf_9494(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9494(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_9530(t0,t1,t2,t3);}
+f_9494(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_noret_decl(trf_9470)
+static void C_fcall trf_9470(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9470(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_9506(t0,t1,t2);}
+f_9470(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_noret_decl(trf_9476)
+static void C_fcall trf_9476(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9476(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_9512(t0,t1,t2);}
+f_9476(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_noret_decl(trf_9404)
+static void C_fcall trf_9404(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9404(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_9440(t0,t1,t2);}
+f_9404(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_noret_decl(trf_9362)
+static void C_fcall trf_9362(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9362(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_9398(t0,t1,t2);}
+f_9362(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_noret_decl(trf_9327)
+static void C_fcall trf_9327(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9327(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_9363(t0,t1,t2,t3);}
+f_9327(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_noret_decl(trf_9302)
+static void C_fcall trf_9302(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9302(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9338(t0,t1);}
+f_9302(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_noret_decl(trf_9269)
+static void C_fcall trf_9269(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9269(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9305(t0,t1);}
+f_9269(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_noret_decl(trf_9086)
+static void C_fcall trf_9086(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9086(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_9122(t0,t1,t2,t3);}
+f_9086(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_noret_decl(trf_9110)
+static void C_fcall trf_9110(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9110(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_9146(t0,t1,t2,t3);}
+f_9110(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_noret_decl(trf_8972)
+static void C_fcall trf_8972(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8972(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_9008(t0,t1,t2);}
+f_8972(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_noret_decl(trf_8999)
+static void C_fcall trf_8999(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8999(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_9035(t0,t1,t2);}
+f_8999(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_noret_decl(trf_9028)
+static void C_fcall trf_9028(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9028(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_9064(t0,t1);}
+f_9028(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_noret_decl(trf_8694)
+static void C_fcall trf_8694(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8694(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8738(t0,t1);}
+f_8694(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_8803)
+static void C_fcall trf_8803(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8803(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8803(t0,t1);}
+
+C_noret_decl(trf_8812)
+static void C_fcall trf_8812(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8812(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8812(t0,t1,t2);}
+
+C_noret_decl(trf_8819)
+static void C_fcall trf_8819(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8819(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8819(t0,t1);}
+
+C_noret_decl(trf_8723)
+static void C_fcall trf_8723(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8723(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8723(t0,t1,t2);}
-C_noret_decl(trf_8383)
-static void C_fcall trf_8383(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8383(void *dummy){
+C_noret_decl(trf_8750)
+static void C_fcall trf_8750(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8750(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8383(t0,t1,t2);}
+f_8750(t0,t1,t2);}
+
+C_noret_decl(trf_8339)
+static void C_fcall trf_8339(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8339(void *dummy){
+C_word t3=C_pick(0);
+C_word t2=C_pick(1);
+C_word t1=C_pick(2);
+C_word t0=C_pick(3);
+C_adjust_stack(-4);
+f_8339(t0,t1,t2,t3);}
-C_noret_decl(trf_8589)
-static void C_fcall trf_8589(void *dummy) C_regparm C_noret;
-C_regparm static void C_fcall trf_8589(void *dummy){
+C_noret_decl(trf_8545)
+static void C_fcall trf_8545(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8545(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8589(t0,t1);}
+f_8545(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_noret_decl(trf_8577)
+static void C_fcall trf_8577(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8577(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8621(t0,t1,t2);}
+f_8577(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_noret_decl(trf_8437)
+static void C_fcall trf_8437(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8437(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8481(t0,t1);}
+f_8437(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_noret_decl(trf_8298)
+static void C_fcall trf_8298(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8298(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_8342(t0,t1,t2,t3,t4);}
+f_8298(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_noret_decl(trf_8273)
+static void C_fcall trf_8273(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8273(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_8317(t0,t1,t2,t3);}
+f_8273(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_noret_decl(trf_8227)
+static void C_fcall trf_8227(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8227(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8271(t0,t1,t2);}
+f_8227(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_noret_decl(trf_8244)
+static void C_fcall trf_8244(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8244(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8288(t0,t1);}
+f_8244(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_noret_decl(trf_8202)
+static void C_fcall trf_8202(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8202(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8246(t0,t1,t2);}
+f_8202(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_noret_decl(trf_8119)
+static void C_fcall trf_8119(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8119(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8163(t0,t1,t2);}
+f_8119(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_noret_decl(trf_8036)
+static void C_fcall trf_8036(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8036(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_8080(t0,t1);}
+f_8036(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_noret_decl(trf_7984)
+static void C_fcall trf_7984(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7984(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_8028(t0,t1,t2);}
+f_7984(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_noret_decl(trf_7936)
+static void C_fcall trf_7936(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7936(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7980(t0,t1,t2);}
+f_7936(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_noret_decl(trf_7843)
+static void C_fcall trf_7843(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7843(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7915(t0,t1,t2);}
+f_7843(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_noret_decl(trf_7765)
+static void C_fcall trf_7765(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7765(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7837(t0,t1,t2);}
+f_7765(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_noret_decl(trf_7741)
+static void C_fcall trf_7741(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7741(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7813(t0,t1);}
+f_7741(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_noret_decl(trf_7559)
+static void C_fcall trf_7559(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7559(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7631(t0,t1);}
+f_7559(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_noret_decl(trf_7570)
+static void C_fcall trf_7570(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7570(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7642(t0,t1,t2);}
+f_7570(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_noret_decl(trf_7537)
+static void C_fcall trf_7537(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7537(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7609(t0,t1,t2);}
+f_7537(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_noret_decl(trf_7377)
+static void C_fcall trf_7377(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7377(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7449(t0,t1);}
+f_7377(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_noret_decl(trf_7372)
+static void C_fcall trf_7372(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7372(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7444(t0,t1,t2);}
+f_7372(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_noret_decl(trf_7006)
+static void C_fcall trf_7006(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7006(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_7078(t0,t1,t2,t3);}
+f_7006(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_noret_decl(trf_7010)
+static void C_fcall trf_7010(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7010(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7082(t0,t1);}
+f_7010(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_noret_decl(trf_7311)
+static void C_fcall trf_7311(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7311(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7383(t0,t1);}
+f_7311(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_noret_decl(trf_7082)
+static void C_fcall trf_7082(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7082(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7154(t0,t1,t2);}
+f_7082(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_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_7219(t0,t1,t2);}
+f_7147(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_noret_decl(trf_7155)
+static void C_fcall trf_7155(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7155(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_7227(t0,t1,t2);}
+f_7155(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_noret_decl(trf_6958)
+static void C_fcall trf_6958(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6958(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_7030(t0,t1);}
+f_6958(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_noret_decl(trf_6895)
+static void C_fcall trf_6895(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6895(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6967(t0,t1,t2);}
+f_6895(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_noret_decl(trf_6806)
+static void C_fcall trf_6806(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6806(void *dummy){
C_word t4=C_pick(0);
C_word t3=C_pick(1);
C_word t2=C_pick(2);
C_word t1=C_pick(3);
C_word t0=C_pick(4);
C_adjust_stack(-5);
-f_6878(t0,t1,t2,t3,t4);}
+f_6806(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_noret_decl(trf_6796)
+static void C_fcall trf_6796(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6796(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6868(t0,t1);}
+f_6796(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_noret_decl(trf_6457)
+static void C_fcall trf_6457(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6457(void *dummy){
C_word t6=C_pick(0);
C_word t5=C_pick(1);
C_word t4=C_pick(2);
@@ -2738,83 +2705,83 @@ 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);}
+f_6457(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_noret_decl(trf_6708)
+static void C_fcall trf_6708(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6708(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6780(t0,t1,t2);}
+f_6708(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_noret_decl(trf_6735)
+static void C_fcall trf_6735(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6735(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6807(t0,t1,t2);}
+f_6735(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_noret_decl(trf_6655)
+static void C_fcall trf_6655(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6655(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6727(t0,t1);}
+f_6655(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_noret_decl(trf_6668)
+static void C_fcall trf_6668(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6668(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6740(t0,t1,t2);}
+f_6668(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_noret_decl(trf_6695)
+static void C_fcall trf_6695(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6695(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6767(t0,t1,t2);}
+f_6695(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_noret_decl(trf_6621)
+static void C_fcall trf_6621(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6621(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6693(t0,t1);}
+f_6621(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_noret_decl(trf_6576)
+static void C_fcall trf_6576(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6576(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6648(t0,t1);}
+f_6576(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_noret_decl(trf_6538)
+static void C_fcall trf_6538(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6538(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6610(t0,t1);}
+f_6538(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_noret_decl(trf_6507)
+static void C_fcall trf_6507(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6507(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6579(t0,t1);}
+f_6507(t0,t1);}
C_noret_decl(trf_3577)
static void C_fcall trf_3577(void *dummy) C_regparm C_noret;
@@ -2846,128 +2813,112 @@ 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_noret_decl(trf_6231)
+static void C_fcall trf_6231(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6231(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_6300(t0,t1);}
+f_6231(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_noret_decl(trf_6165)
+static void C_fcall trf_6165(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6165(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6234(t0,t1,t2);}
+f_6165(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_noret_decl(trf_6173)
+static void C_fcall trf_6173(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6173(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6242(t0,t1,t2);}
+f_6173(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_noret_decl(trf_6051)
+static void C_fcall trf_6051(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6051(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6124(t0,t1,t2);}
+f_6051(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_noret_decl(trf_5991)
+static void C_fcall trf_5991(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5991(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6064(t0,t1,t2);}
+f_5991(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_noret_decl(trf_6018)
+static void C_fcall trf_6018(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6018(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6091(t0,t1,t2);}
+f_6018(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_noret_decl(trf_5943)
+static void C_fcall trf_5943(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5943(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_6016(t0,t1,t2);}
+f_5943(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_noret_decl(trf_5757)
+static void C_fcall trf_5757(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5757(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5830(t0,t1,t2);}
+f_5757(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_noret_decl(trf_5784)
+static void C_fcall trf_5784(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5784(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_5857(t0,t1,t2);}
+f_5784(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_noret_decl(trf_5797)
+static void C_fcall trf_5797(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5797(void *dummy){
C_word t1=C_pick(0);
C_word t0=C_pick(1);
C_adjust_stack(-2);
-f_5870(t0,t1);}
+f_5797(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_noret_decl(trf_5661)
+static void C_fcall trf_5661(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5661(void *dummy){
C_word t3=C_pick(0);
C_word t2=C_pick(1);
C_word t1=C_pick(2);
C_word t0=C_pick(3);
C_adjust_stack(-4);
-f_5734(t0,t1,t2,t3);}
+f_5661(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_noret_decl(trf_5681)
+static void C_fcall trf_5681(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5681(void *dummy){
C_word t2=C_pick(0);
C_word t1=C_pick(1);
C_word t0=C_pick(2);
C_adjust_stack(-3);
-f_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);}
+f_5681(t0,t1,t2);}
C_noret_decl(trf_5482)
static void C_fcall trf_5482(void *dummy) C_regparm C_noret;
@@ -3041,9 +2992,9 @@ 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_noret_decl(trf_6385)
+static void C_fcall trf_6385(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6385(void *dummy){
C_word t5=C_pick(0);
C_word t4=C_pick(1);
C_word t3=C_pick(2);
@@ -3051,7 +3002,7 @@ 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);}
+f_6385(t0,t1,t2,t3,t4,t5);}
C_noret_decl(trf_4835)
static void C_fcall trf_4835(void *dummy) C_regparm C_noret;
@@ -3352,20 +3303,6 @@ 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){
@@ -3379,25 +3316,9 @@ 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){
+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);
@@ -3405,8 +3326,8 @@ 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);
+a=C_alloc(n*3);
+t3=C_restore_rest(a,n);
(k)(t0,t1,t2,t3);}
/* toplevel */
@@ -3429,383 +3350,381 @@ if(!C_demand(3)){
C_save(t1);
C_reclaim((void*)toplevel_trampoline,NULL);}
toplevel_initialized=1;
-if(!C_demand_2(6655)){
+if(!C_demand_2(6464)){
C_save(t1);
-C_rereclaim2(6655*sizeof(C_word), 1);
+C_rereclaim2(6464*sizeof(C_word), 1);
t1=C_restore;}
a=C_alloc(3);
-C_initialize_lf(lf,416);
+C_initialize_lf(lf,402);
lf[1]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
-lf[2]=C_h_intern(&lf[2],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"
+lf[2]=C_h_intern(&lf[2],24,"\003syscore-library-modules");
+lf[3]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006extras\376\003\000\000\002\376\001\000\000\007lolevel\376\003\000\000\002\376\001\000\000\005utils\376\003\000\000\002\376\001\000\000\005files\376\003\000\000\002\376\001\000\000\003tcp\376\003\000\000"
"\002\376\001\000\000\005regex\376\003\000\000\002\376\001\000\000\005posix\376\003\000\000\002\376\001\000\000\006srfi-1\376\003\000\000\002\376\001\000\000\006srfi-4\376\003\000\000\002\376\001\000\000\007srfi-13\376\003\000\000\002"
"\376\001\000\000\007srfi-14\376\003\000\000\002\376\001\000\000\007srfi-18\376\003\000\000\002\376\001\000\000\007srfi-69\376\003\000\000\002\376\001\000\000\017data-structures\376\003\000\000\002\376\001\000\000"
"\005ports\376\003\000\000\002\376\001\000\000\016chicken-syntax\376\377\016");
-lf[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_"
+lf[4]=C_h_intern(&lf[4],28,"\003sysexplicit-library-modules");
+lf[6]=C_decode_literal(C_heaptop,"\376B\000\000\003.so");
+lf[8]=C_decode_literal(C_heaptop,"\376B\000\000\004.scm");
+lf[9]=C_h_intern(&lf[9],18,"\003syschicken-prefix");
+lf[10]=C_h_intern(&lf[10],17,"\003sysstring-append");
+lf[11]=C_h_intern(&lf[11],9,"\003syserror");
+lf[12]=C_h_intern(&lf[12],12,"chicken-home");
+lf[13]=C_h_intern(&lf[13],17,"\003syspeek-c-string");
+lf[14]=C_decode_literal(C_heaptop,"\376B\000\000\015share/chicken");
+lf[15]=C_h_intern(&lf[15],15,"\003syshash-symbol");
+lf[16]=C_h_intern(&lf[16],18,"\003syshash-table-ref");
+lf[17]=C_h_intern(&lf[17],19,"\003syshash-table-set!");
+lf[18]=C_h_intern(&lf[18],22,"\003syshash-table-update!");
+lf[19]=C_h_intern(&lf[19],23,"\003syshash-table-for-each");
+lf[20]=C_h_intern(&lf[20],28,"\003sysarbitrary-unbound-symbol");
+lf[21]=C_h_intern(&lf[21],23,"\003syshash-table-location");
+lf[22]=C_h_intern(&lf[22],20,"\003syseval-environment");
+lf[23]=C_h_intern(&lf[23],26,"\003sysenvironment-is-mutable");
+lf[24]=C_h_intern(&lf[24],18,"\003syseval-decorator");
+lf[25]=C_h_intern(&lf[25],20,"\003sysmake-lambda-info");
+lf[26]=C_h_intern(&lf[26],17,"get-output-string");
+lf[27]=C_h_intern(&lf[27],5,"write");
+lf[28]=C_h_intern(&lf[28],18,"open-output-string");
+lf[29]=C_h_intern(&lf[29],19,"\003sysdecorate-lambda");
+lf[30]=C_h_intern(&lf[30],19,"\003sysunbound-in-eval");
+lf[31]=C_h_intern(&lf[31],20,"\003syseval-debug-level");
+lf[32]=C_h_intern(&lf[32],7,"reverse");
+lf[33]=C_h_intern(&lf[33],20,"with-input-from-file");
+lf[34]=C_h_intern(&lf[34],7,"display");
+lf[35]=C_h_intern(&lf[35],22,"\003syscompile-to-closure");
+lf[36]=C_h_intern(&lf[36],4,"cdar");
+lf[37]=C_h_intern(&lf[37],4,"caar");
+lf[38]=C_h_intern(&lf[38],7,"\003sysget");
+lf[39]=C_h_intern(&lf[39],16,"\004coremacro-alias");
+lf[40]=C_h_intern(&lf[40],19,"\003sysundefined-value");
+lf[41]=C_h_intern(&lf[41],18,"\003syscurrent-module");
+lf[42]=C_h_intern(&lf[42],21,"\003sysmacro-environment");
+lf[43]=C_h_intern(&lf[43],28,"\003syscurrent-meta-environment");
+lf[44]=C_h_intern(&lf[44],16,"\003sysdynamic-wind");
+lf[45]=C_h_intern(&lf[45],26,"\003sysmeta-macro-environment");
+lf[46]=C_decode_literal(C_heaptop,"\376B\000\000\020unbound variable");
+lf[47]=C_h_intern(&lf[47],21,"\003syssyntax-error-hook");
+lf[48]=C_decode_literal(C_heaptop,"\376B\000\000!reference to undefined identifier");
+lf[49]=C_h_intern(&lf[49],32,"\003syssymbol-has-toplevel-binding\077");
+lf[50]=C_h_intern(&lf[50],14,"\004coreprimitive");
+lf[51]=C_h_intern(&lf[51],21,"\003sysalias-global-hook");
+lf[52]=C_h_intern(&lf[52],5,"quote");
+lf[53]=C_h_intern(&lf[53],16,"\003sysstrip-syntax");
+lf[54]=C_h_intern(&lf[54],16,"\003syscheck-syntax");
+lf[55]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\005quote\376\003\000\000\002\376\001\000\000\001_\376\377\016");
+lf[56]=C_h_intern(&lf[56],6,"syntax");
+lf[57]=C_h_intern(&lf[57],11,"\004coresyntax");
+lf[58]=C_h_intern(&lf[58],15,"\004coreglobal-ref");
+lf[59]=C_h_intern(&lf[59],10,"\004corecheck");
+lf[60]=C_h_intern(&lf[60],14,"\004coreimmutable");
+lf[61]=C_h_intern(&lf[61],14,"\004coreundefined");
+lf[62]=C_h_intern(&lf[62],2,"if");
+lf[63]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[64]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\002if\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\001\376\001\000\000\001_");
+lf[65]=C_h_intern(&lf[65],5,"begin");
+lf[66]=C_h_intern(&lf[66],10,"\004corebegin");
+lf[67]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[68]=C_h_intern(&lf[68],10,"\003sysappend");
+lf[69]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\000");
+lf[70]=C_h_intern(&lf[70],4,"set!");
+lf[71]=C_h_intern(&lf[71],9,"\004coreset!");
+lf[72]=C_decode_literal(C_heaptop,"\376B\000\000 assignment to immutable variable");
+lf[73]=C_decode_literal(C_heaptop,"\376B\000\000\042assignment of undefined identifier");
+lf[74]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016");
+lf[75]=C_h_intern(&lf[75],3,"let");
+lf[76]=C_h_intern(&lf[76],8,"\004corelet");
+lf[77]=C_h_intern(&lf[77],5,"cadar");
+lf[78]=C_h_intern(&lf[78],6,"cadadr");
+lf[79]=C_h_intern(&lf[79],15,"\003sysmake-vector");
+lf[80]=C_h_intern(&lf[80],21,"\003syscanonicalize-body");
+lf[81]=C_h_intern(&lf[81],6,"append");
+lf[82]=C_h_intern(&lf[82],4,"cons");
+lf[83]=C_h_intern(&lf[83],6,"gensym");
+lf[84]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
+lf[85]=C_h_intern(&lf[85],6,"letrec");
+lf[86]=C_h_intern(&lf[86],11,"\004coreletrec");
+lf[87]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[88]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\006symbol\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
+lf[89]=C_h_intern(&lf[89],6,"lambda");
+lf[90]=C_h_intern(&lf[90],11,"\004corelambda");
+lf[91]=C_h_intern(&lf[91],1,"\077");
+lf[92]=C_h_intern(&lf[92],10,"\003sysvector");
+lf[93]=C_decode_literal(C_heaptop,"\376B\000\000\022bad argument count");
+lf[94]=C_decode_literal(C_heaptop,"\376B\000\000\022bad argument count");
+lf[95]=C_h_intern(&lf[95],25,"\003sysdecompose-lambda-list");
+lf[96]=C_h_intern(&lf[96],31,"\003sysexpand-extended-lambda-list");
+lf[97]=C_h_intern(&lf[97],25,"\003sysextended-lambda-list\077");
+lf[98]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\003\000\000\002\376\001\000\000\013lambda-list\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
+lf[99]=C_h_intern(&lf[99],10,"let-syntax");
+lf[100]=C_h_intern(&lf[100],18,"\003syser-transformer");
+lf[101]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\012let-syntax\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000\000\001_"
"\376\377\001\000\000\000\001");
-lf[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"
+lf[102]=C_h_intern(&lf[102],13,"letrec-syntax");
+lf[103]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\015letrec-syntax\376\003\000\000\002\376\000\000\000\002\376\003\000\000\002\376\001\000\000\010variable\376\003\000\000\002\376\001\000\000\001_\376\377\016\376\377\001\000\000\000\000\376\000\000\000\002\376\001\000"
"\000\001_\376\377\001\000\000\000\001");
-lf[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[104]=C_h_intern(&lf[104],18,"\004coredefine-syntax");
+lf[105]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[106]=C_h_intern(&lf[106],28,"\003sysextend-macro-environment");
+lf[107]=C_h_intern(&lf[107],23,"\003syscurrent-environment");
+lf[108]=C_h_intern(&lf[108],26,"\003sysregister-syntax-export");
+lf[109]=C_h_intern(&lf[109],27,"\004coredefine-compiler-syntax");
+lf[110]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[111]=C_h_intern(&lf[111],24,"\004corelet-compiler-syntax");
+lf[112]=C_h_intern(&lf[112],11,"\004coremodule");
+lf[113]=C_h_intern(&lf[113],29,"\003sysinitial-macro-environment");
+lf[114]=C_h_intern(&lf[114],19,"\003sysfinalize-module");
+lf[115]=C_h_intern(&lf[115],19,"\003sysregister-module");
+lf[116]=C_h_intern(&lf[116],6,"module");
+lf[117]=C_decode_literal(C_heaptop,"\376B\000\000\031modules may not be nested");
+lf[118]=C_decode_literal(C_heaptop,"\376B\000\000\025invalid export syntax");
+lf[119]=C_h_intern(&lf[119],16,"\004coreloop-lambda");
+lf[120]=C_h_intern(&lf[120],17,"\004corenamed-lambda");
+lf[121]=C_h_intern(&lf[121],23,"\004corerequire-for-syntax");
+lf[122]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[123]=C_h_intern(&lf[123],11,"\003sysrequire");
+lf[124]=C_h_intern(&lf[124],31,"\003syslookup-runtime-requirements");
+lf[125]=C_h_intern(&lf[125],22,"\004corerequire-extension");
+lf[126]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[127]=C_h_intern(&lf[127],22,"\003sysdo-the-right-thing");
+lf[128]=C_h_intern(&lf[128],24,"\004coreelaborationtimeonly");
+lf[129]=C_h_intern(&lf[129],23,"\004coreelaborationtimetoo");
lf[130]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[131]=C_h_intern(&lf[131],11,"\003sysrequire");
-lf[132]=C_h_intern(&lf[132],31,"\003syslookup-runtime-requirements");
-lf[133]=C_h_intern(&lf[133],22,"\004corerequire-extension");
+lf[131]=C_h_intern(&lf[131],19,"\004corecompiletimetoo");
+lf[132]=C_h_intern(&lf[132],20,"\004corecompiletimeonly");
+lf[133]=C_h_intern(&lf[133],13,"\004corecallunit");
lf[134]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
-lf[135]=C_h_intern(&lf[135],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"
+lf[135]=C_h_intern(&lf[135],12,"\004coredeclare");
+lf[136]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[137]=C_h_intern(&lf[137],10,"\000compiling");
+lf[138]=C_h_intern(&lf[138],12,"\003sysfeatures");
+lf[139]=C_h_intern(&lf[139],28,"\010compilerprocess-declaration");
+lf[140]=C_h_intern(&lf[140],8,"\003syswarn");
+lf[141]=C_decode_literal(C_heaptop,"\376B\000\000,declarations are ignored in interpreted code");
+lf[142]=C_h_intern(&lf[142],18,"\004coredefine-inline");
+lf[143]=C_h_intern(&lf[143],20,"\004coredefine-constant");
+lf[144]=C_h_intern(&lf[144],6,"define");
+lf[145]=C_decode_literal(C_heaptop,"\376B\000\000%cannot evaluate compiler-special-form");
+lf[146]=C_h_intern(&lf[146],8,"\004coreapp");
+lf[147]=C_h_intern(&lf[147],8,"location");
+lf[148]=C_decode_literal(C_heaptop,"\376B\000\000%cannot evaluate compiler-special-form");
+lf[149]=C_h_intern(&lf[149],11,"\004coreinline");
+lf[150]=C_h_intern(&lf[150],20,"\004coreinline_allocate");
+lf[151]=C_h_intern(&lf[151],19,"\004coreforeign-lambda");
+lf[152]=C_h_intern(&lf[152],28,"\004coredefine-foreign-variable");
+lf[153]=C_h_intern(&lf[153],29,"\004coredefine-external-variable");
+lf[154]=C_h_intern(&lf[154],17,"\004corelet-location");
+lf[155]=C_h_intern(&lf[155],22,"\004coreforeign-primitive");
+lf[156]=C_h_intern(&lf[156],20,"\004coreforeign-lambda*");
+lf[157]=C_h_intern(&lf[157],24,"\004coredefine-foreign-type");
+lf[158]=C_h_intern(&lf[158],10,"\003sysexpand");
+lf[159]=C_h_intern(&lf[159],18,"\003syscurrent-thread");
+lf[160]=C_decode_literal(C_heaptop,"\376B\000\000\031illegal non-atomic object");
+lf[161]=C_h_intern(&lf[161],11,"\003sysnumber\077");
+lf[162]=C_h_intern(&lf[162],8,"keyword\077");
+lf[163]=C_decode_literal(C_heaptop,"\376B\000\000\024malformed expression");
+lf[164]=C_h_intern(&lf[164],16,"\003syseval-handler");
+lf[165]=C_h_intern(&lf[165],12,"eval-handler");
+lf[166]=C_h_intern(&lf[166],4,"eval");
+lf[167]=C_h_intern(&lf[167],24,"\003syssyntax-error-culprit");
+lf[168]=C_decode_literal(C_heaptop,"\376B\000\000\032illegal lambda-list syntax");
+lf[169]=C_h_intern(&lf[169],12,"load-verbose");
+lf[170]=C_h_intern(&lf[170],14,"\003sysabort-load");
+lf[171]=C_h_intern(&lf[171],27,"\003syscurrent-source-filename");
+lf[172]=C_h_intern(&lf[172],21,"\003syscurrent-load-path");
+lf[173]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[174]=C_h_intern(&lf[174],18,"\003sysdload-disabled");
+lf[175]=C_h_intern(&lf[175],22,"set-dynamic-load-mode!");
+lf[176]=C_h_intern(&lf[176],21,"\003sysset-dlopen-flags!");
+lf[177]=C_h_intern(&lf[177],6,"global");
+lf[178]=C_h_intern(&lf[178],5,"local");
+lf[179]=C_h_intern(&lf[179],4,"lazy");
+lf[180]=C_h_intern(&lf[180],3,"now");
+lf[181]=C_h_intern(&lf[181],15,"\003syssignal-hook");
+lf[182]=C_decode_literal(C_heaptop,"\376B\000\000\031invalid dynamic-load mode");
+lf[183]=C_h_intern(&lf[183],4,"read");
+lf[184]=C_h_intern(&lf[184],7,"newline");
+lf[185]=C_h_intern(&lf[185],12,"flush-output");
+lf[186]=C_h_intern(&lf[186],15,"open-input-file");
+lf[187]=C_h_intern(&lf[187],16,"close-input-port");
+lf[188]=C_h_intern(&lf[188],13,"string-append");
+lf[189]=C_h_intern(&lf[189],8,"\003sysload");
+lf[190]=C_h_intern(&lf[190],31,"\003sysread-error-with-line-number");
+lf[191]=C_h_intern(&lf[191],17,"\003sysdisplay-times");
+lf[192]=C_h_intern(&lf[192],14,"\003sysstop-timer");
+lf[193]=C_h_intern(&lf[193],15,"\003sysstart-timer");
+lf[194]=C_h_intern(&lf[194],4,"load");
+lf[195]=C_decode_literal(C_heaptop,"\376B\000\000\036unable to load compiled module");
+lf[196]=C_h_intern(&lf[196],9,"peek-char");
+lf[197]=C_h_intern(&lf[197],13,"\003syssubstring");
+lf[198]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[199]=C_h_intern(&lf[199],30,"call-with-current-continuation");
+lf[200]=C_h_intern(&lf[200],9,"\003sysdload");
+lf[201]=C_h_intern(&lf[201],17,"\003sysmake-c-string");
+lf[202]=C_decode_literal(C_heaptop,"\376B\000\000\002./");
+lf[203]=C_h_intern(&lf[203],11,"\000file-error");
+lf[204]=C_decode_literal(C_heaptop,"\376B\000\000\020cannot open file");
+lf[205]=C_decode_literal(C_heaptop,"\376B\000\000\005 ...\012");
+lf[206]=C_decode_literal(C_heaptop,"\376B\000\000\012; loading ");
+lf[207]=C_h_intern(&lf[207],13,"\003sysfile-info");
+lf[208]=C_h_intern(&lf[208],26,"\003sysload-dynamic-extension");
+lf[209]=C_h_intern(&lf[209],11,"\000type-error");
+lf[210]=C_decode_literal(C_heaptop,"\376B\000\000(bad argument type - not a port or string");
+lf[211]=C_h_intern(&lf[211],5,"port\077");
+lf[212]=C_h_intern(&lf[212],20,"\003sysexpand-home-path");
+lf[213]=C_h_intern(&lf[213],13,"load-relative");
+lf[214]=C_h_intern(&lf[214],12,"load-noisily");
+lf[215]=C_h_intern(&lf[215],15,"\003sysget-keyword");
+lf[216]=C_h_intern(&lf[216],8,"\000printer");
+lf[217]=C_h_intern(&lf[217],5,"\000time");
+lf[218]=C_h_intern(&lf[218],10,"\000evaluator");
+lf[219]=C_h_intern(&lf[219],26,"\003sysload-library-extension");
+lf[220]=C_h_intern(&lf[220],6,"cygwin");
+lf[221]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\014cygchicken-0\376\377\016");
+lf[222]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\012libchicken\376\377\016");
+lf[223]=C_h_intern(&lf[223],34,"\003sysdefault-dynamic-load-libraries");
+lf[224]=C_h_intern(&lf[224],22,"dynamic-load-libraries");
+lf[225]=C_h_intern(&lf[225],18,"\003sysload-library-0");
+lf[226]=C_decode_literal(C_heaptop,"\376B\000\000\005 ...\012");
+lf[227]=C_decode_literal(C_heaptop,"\376B\000\000\022; loading library ");
+lf[228]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
+lf[229]=C_decode_literal(C_heaptop,"\376B\000\000\011_toplevel");
+lf[230]=C_h_intern(&lf[230],24,"\003sysstring->c-identifier");
+lf[231]=C_h_intern(&lf[231],16,"\003sys->feature-id");
+lf[232]=C_h_intern(&lf[232],16,"\003sysload-library");
+lf[233]=C_h_intern(&lf[233],12,"load-library");
+lf[234]=C_decode_literal(C_heaptop,"\376B\000\000\026unable to load library");
+lf[235]=C_h_intern(&lf[235],31,"\003syscanonicalize-extension-path");
+lf[236]=C_decode_literal(C_heaptop,"\376B\000\000\026invalid extension path");
+lf[237]=C_h_intern(&lf[237],18,"\003syssymbol->string");
+lf[238]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[239]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[240]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
+lf[241]=C_h_intern(&lf[241],19,"\003sysrepository-path");
+lf[242]=C_h_intern(&lf[242],15,"repository-path");
+lf[243]=C_h_intern(&lf[243],14,"\003syssetup-mode");
+lf[244]=C_h_intern(&lf[244],12,"file-exists\077");
+lf[245]=C_h_intern(&lf[245],18,"\003sysfind-extension");
+lf[246]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
+lf[247]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\001.\376\377\016");
+lf[248]=C_h_intern(&lf[248],21,"\003sysinclude-pathnames");
+lf[249]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\001.\376\377\016");
+lf[250]=C_h_intern(&lf[250],21,"\003sysloaded-extensions");
+lf[251]=C_h_intern(&lf[251],14,"string->symbol");
+lf[252]=C_h_intern(&lf[252],18,"\003sysload-extension");
+lf[253]=C_decode_literal(C_heaptop,"\376B\000\000\030cannot load core library");
+lf[254]=C_decode_literal(C_heaptop,"\376B\000\000\025cannot load extension");
+lf[255]=C_h_intern(&lf[255],11,"\003sysprovide");
+lf[256]=C_h_intern(&lf[256],7,"provide");
+lf[257]=C_h_intern(&lf[257],13,"\003sysprovided\077");
+lf[258]=C_h_intern(&lf[258],9,"provided\077");
+lf[259]=C_h_intern(&lf[259],7,"require");
+lf[260]=C_h_intern(&lf[260],12,"\003sysfor-each");
+lf[261]=C_h_intern(&lf[261],25,"\003sysextension-information");
+lf[262]=C_decode_literal(C_heaptop,"\376B\000\000\012setup-info");
+lf[263]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
+lf[264]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
+lf[265]=C_h_intern(&lf[265],21,"extension-information");
+lf[266]=C_h_intern(&lf[266],18,"require-at-runtime");
+lf[267]=C_h_intern(&lf[267],12,"vector->list");
+lf[268]=C_h_intern(&lf[268],14,"dynamic/syntax");
+lf[269]=C_h_intern(&lf[269],7,"dynamic");
+lf[270]=C_h_intern(&lf[270],11,"lset-adjoin");
+lf[271]=C_h_intern(&lf[271],3,"eq\077");
+lf[272]=C_h_intern(&lf[272],26,"\010compilerfile-requirements");
+lf[273]=C_h_intern(&lf[273],6,"import");
+lf[274]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\007chicken\376\003\000\000\002\376\001\000\000\006srfi-2\376\003\000\000\002\376\001\000\000\006srfi-6\376\003\000\000\002\376\001\000\000\007srfi-10\376\003\000\000\002\376\001\000\000\007srfi"
"-12\376\003\000\000\002\376\001\000\000\007srfi-23\376\003\000\000\002\376\001\000\000\007srfi-28\376\003\000\000\002\376\001\000\000\007srfi-30\376\003\000\000\002\376\001\000\000\007srfi-31\376\003\000\000\002\376\001\000\000"
-"\007srfi-39\376\003\000\000\002\376\001\000\000\007srfi-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"
+"\007srfi-39\376\003\000\000\002\376\001\000\000\007srfi-55\376\003\000\000\002\376\001\000\000\007srfi-88\376\003\000\000\002\376\001\000\000\007srfi-98\376\377\016");
+lf[275]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[276]=C_h_intern(&lf[276],4,"uses");
+lf[277]=C_h_intern(&lf[277],11,"import-only");
+lf[278]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[279]=C_h_intern(&lf[279],17,"require-extension");
+lf[280]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006srfi-6\376\003\000\000\002\376\001\000\000\006srfi-8\376\003\000\000\002\376\001\000\000\006srfi-9\376\003\000\000\002\376\001\000\000\007srfi-11\376\003\000\000\002\376\001\000\000\007srfi-"
+"15\376\003\000\000\002\376\001\000\000\007srfi-16\376\003\000\000\002\376\001\000\000\007srfi-17\376\003\000\000\002\376\001\000\000\007srfi-26\376\377\016");
+lf[281]=C_h_intern(&lf[281],12,"\003sysfeature\077");
+lf[282]=C_h_intern(&lf[282],4,"srfi");
+lf[283]=C_decode_literal(C_heaptop,"\376B\000\000\005srfi-");
+lf[284]=C_h_intern(&lf[284],16,"\003syssyntax-error");
+lf[285]=C_decode_literal(C_heaptop,"\376B\000\000\023invalid SRFI number");
+lf[286]=C_h_intern(&lf[286],6,"rename");
+lf[287]=C_decode_literal(C_heaptop,"\376B\000\000\033invalid extension specifier");
+lf[288]=C_h_intern(&lf[288],6,"except");
+lf[289]=C_h_intern(&lf[289],4,"only");
+lf[290]=C_h_intern(&lf[290],6,"prefix");
+lf[291]=C_decode_literal(C_heaptop,"\376B\000\000\033invalid extension specifier");
+lf[292]=C_h_intern(&lf[292],11,"string-copy");
+lf[295]=C_h_intern(&lf[295],11,"environment");
+lf[297]=C_h_intern(&lf[297],16,"\003sysenvironment\077");
+lf[298]=C_h_intern(&lf[298],18,"\003syscopy-env-table");
+lf[299]=C_h_intern(&lf[299],23,"\003sysenvironment-symbols");
+lf[300]=C_h_intern(&lf[300],18,"\003syswalk-namespace");
+lf[301]=C_h_intern(&lf[301],23,"interaction-environment");
+lf[302]=C_h_intern(&lf[302],25,"scheme-report-environment");
+lf[303]=C_decode_literal(C_heaptop,"\376B\000\000\026no support for version");
+lf[304]=C_h_intern(&lf[304],11,"make-vector");
+lf[305]=C_h_intern(&lf[305],16,"null-environment");
+lf[306]=C_decode_literal(C_heaptop,"\376B\000\000\026no support for version");
+lf[307]=C_h_intern(&lf[307],28,"\003sysresolve-include-filename");
+lf[308]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
+lf[309]=C_decode_literal(C_heaptop,"\376B\000\000\0010");
+lf[310]=C_decode_literal(C_heaptop,"\376B\000\000\013 major GCs\012");
+lf[311]=C_decode_literal(C_heaptop,"\376B\000\000\013 minor GCs\012");
+lf[312]=C_decode_literal(C_heaptop,"\376B\000\000\013 mutations\012");
+lf[313]=C_decode_literal(C_heaptop,"\376B\000\000\027 seconds in (major) GC\012");
+lf[314]=C_decode_literal(C_heaptop,"\376B\000\000\021 seconds elapsed\012");
+lf[315]=C_h_intern(&lf[315],18,"\003sysrepl-eval-hook");
+lf[316]=C_h_intern(&lf[316],27,"\003sysrepl-print-length-limit");
+lf[317]=C_h_intern(&lf[317],18,"\003sysrepl-read-hook");
+lf[318]=C_h_intern(&lf[318],19,"\003sysrepl-print-hook");
+lf[319]=C_h_intern(&lf[319],16,"\003syswrite-char-0");
+lf[320]=C_h_intern(&lf[320],9,"\003sysprint");
+lf[321]=C_h_intern(&lf[321],27,"\003syswith-print-length-limit");
+lf[322]=C_h_intern(&lf[322],11,"repl-prompt");
+lf[323]=C_h_intern(&lf[323],20,"\003sysread-prompt-hook");
+lf[324]=C_h_intern(&lf[324],16,"\003sysflush-output");
+lf[325]=C_h_intern(&lf[325],19,"\003sysstandard-output");
+lf[326]=C_h_intern(&lf[326],22,"\003sysclear-trace-buffer");
+lf[327]=C_h_intern(&lf[327],16,"print-call-chain");
+lf[328]=C_h_intern(&lf[328],5,"reset");
+lf[329]=C_h_intern(&lf[329],4,"repl");
+lf[330]=C_h_intern(&lf[330],18,"\003sysstandard-error");
+lf[331]=C_h_intern(&lf[331],18,"\003sysstandard-input");
+lf[332]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
+lf[333]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
+lf[334]=C_decode_literal(C_heaptop,"\376B\000\000\006\012Error");
+lf[335]=C_h_intern(&lf[335],17,"\003syserror-handler");
+lf[336]=C_h_intern(&lf[336],20,"\003syswarnings-enabled");
+lf[337]=C_decode_literal(C_heaptop,"\376B\000\000\005 (in ");
+lf[338]=C_decode_literal(C_heaptop,"\376B\000\000\002 ");
+lf[339]=C_decode_literal(C_heaptop,"\376B\000\000FWarning: the following toplevel variables are referenced but unbound:\012");
+lf[340]=C_h_intern(&lf[340],15,"\003sysread-char-0");
+lf[341]=C_h_intern(&lf[341],15,"\003syspeek-char-0");
+lf[342]=C_h_intern(&lf[342],21,"\003sysenable-qualifiers");
+lf[343]=C_h_intern(&lf[343],17,"\003sysreset-handler");
+lf[344]=C_h_intern(&lf[344],28,"\003syssharp-comma-reader-ctors");
+lf[345]=C_h_intern(&lf[345],18,"define-reader-ctor");
+lf[346]=C_h_intern(&lf[346],18,"\003sysuser-read-hook");
+lf[347]=C_h_intern(&lf[347],9,"read-char");
+lf[348]=C_h_intern(&lf[348],14,"\003sysread-error");
+lf[349]=C_decode_literal(C_heaptop,"\376B\000\000!invalid sharp-comma external form");
+lf[350]=C_decode_literal(C_heaptop,"\376B\000\000!undefined sharp-comma constructor");
+lf[353]=C_h_intern(&lf[353],19,"print-error-message");
+lf[354]=C_h_intern(&lf[354],22,"with-exception-handler");
+lf[356]=C_h_intern(&lf[356],6,"\003sysgc");
+lf[358]=C_h_intern(&lf[358],17,"\003systhread-yield!");
+lf[361]=C_h_intern(&lf[361],17,"open-input-string");
+lf[363]=C_decode_literal(C_heaptop,"\376B\000\000(Error: not enough room for result string");
+lf[371]=C_decode_literal(C_heaptop,"\376B\000\000\010No error");
+lf[372]=C_h_intern(&lf[372],15,"\003sysmake-string");
+lf[373]=C_decode_literal(C_heaptop,"\376B\000\000\004#;> ");
+lf[374]=C_h_intern(&lf[374],14,"make-parameter");
+lf[375]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\007\000srfi-8\376\003\000\000\002\376\001\000\000\007\000srfi-6\376\003\000\000\002\376\001\000\000\007\000srfi-2\376\003\000\000\002\376\001\000\000\007\000srfi-0\376\003\000\000\002\376\001\000\000\010\000s"
"rfi-10\376\003\000\000\002\376\001\000\000\007\000srfi-9\376\003\000\000\002\376\001\000\000\010\000srfi-55\376\003\000\000\002\376\001\000\000\010\000srfi-61\376\377\016");
-lf[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"
+lf[376]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\014dynamic-wind\376\003\000\000\002\376\001\000\000\006values\376\003\000\000\002\376\001\000\000\020call-with-values\376\003\000\000\002\376\001\000\000\004eval\376\003"
"\000\000\002\376\001\000\000\031scheme-report-environment\376\003\000\000\002\376\001\000\000\020null-environment\376\003\000\000\002\376\001\000\000\027interaction"
"-environment\376\377\016");
-lf[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"
+lf[377]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003not\376\003\000\000\002\376\001\000\000\010boolean\077\376\003\000\000\002\376\001\000\000\003eq\077\376\003\000\000\002\376\001\000\000\004eqv\077\376\003\000\000\002\376\001\000\000\006equal\077\376\003\000\000\002\376"
"\001\000\000\005pair\077\376\003\000\000\002\376\001\000\000\004cons\376\003\000\000\002\376\001\000\000\003car\376\003\000\000\002\376\001\000\000\003cdr\376\003\000\000\002\376\001\000\000\004caar\376\003\000\000\002\376\001\000\000\004cadr\376\003\000"
"\000\002\376\001\000\000\004cdar\376\003\000\000\002\376\001\000\000\004cddr\376\003\000\000\002\376\001\000\000\005caaar\376\003\000\000\002\376\001\000\000\005caadr\376\003\000\000\002\376\001\000\000\005cadar\376\003\000\000\002\376\001\000\000\005"
"caddr\376\003\000\000\002\376\001\000\000\005cdaar\376\003\000\000\002\376\001\000\000\005cdadr\376\003\000\000\002\376\001\000\000\005cddar\376\003\000\000\002\376\001\000\000\005cdddr\376\003\000\000\002\376\001\000\000\006caaaa"
@@ -3848,43 +3767,31 @@ lf[379]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003not\
"\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());
+lf[378]=C_decode_literal(C_heaptop,"\376B\000\000\014lib/chicken/");
+lf[379]=C_h_intern(&lf[379],18,"\003sysnumber->string");
+lf[380]=C_h_intern(&lf[380],24,"get-environment-variable");
+lf[381]=C_decode_literal(C_heaptop,"\376B\000\000\022CHICKEN_REPOSITORY");
+lf[382]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
+lf[383]=C_h_intern(&lf[383],5,"linux");
+lf[384]=C_h_intern(&lf[384],6,"netbsd");
+lf[385]=C_h_intern(&lf[385],7,"openbsd");
+lf[386]=C_h_intern(&lf[386],7,"freebsd");
+lf[387]=C_h_intern(&lf[387],16,"software-version");
+lf[388]=C_h_intern(&lf[388],14,"build-platform");
+lf[389]=C_h_intern(&lf[389],7,"windows");
+lf[390]=C_decode_literal(C_heaptop,"\376B\000\000\004.dll");
+lf[391]=C_h_intern(&lf[391],6,"macosx");
+lf[392]=C_decode_literal(C_heaptop,"\376B\000\000\006.dylib");
+lf[393]=C_h_intern(&lf[393],4,"hpux");
+lf[394]=C_h_intern(&lf[394],4,"hppa");
+lf[395]=C_decode_literal(C_heaptop,"\376B\000\000\003.sl");
+lf[396]=C_h_intern(&lf[396],12,"machine-type");
+lf[397]=C_h_intern(&lf[397],13,"software-type");
+lf[398]=C_decode_literal(C_heaptop,"\376B\000\000\012C_toplevel");
+lf[399]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[400]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
+lf[401]=C_decode_literal(C_heaptop,"\376B\000\000\016CHICKEN_PREFIX");
+C_register_lf2(lf,402,create_ptable());
t2=C_mutate(&lf[0] /* (set! c143 ...) */,lf[1]);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2954,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
C_expand_toplevel(2,C_SCHEME_UNDEFINED,t3);}
@@ -3898,20 +3805,18 @@ C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word t8;
-C_word ab[6],*a=ab;
+C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
C_save_and_reclaim((void*)tr2,(void*)f_2954,2,t0,t1);}
-t2=C_mutate((C_word*)lf[2]+1 /* (set! 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);
+t2=C_mutate((C_word*)lf[2]+1 /* (set! core-library-modules ...) */,lf[3]);
+t3=C_set_block_item(lf[4] /* explicit-library-modules */,0,C_SCHEME_END_OF_LIST);
+t4=C_mutate(&lf[5] /* (set! constant62 ...) */,lf[6]);
+t5=C_mutate(&lf[7] /* (set! constant70 ...) */,lf[8]);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2987,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
/* eval.scm: 137 get-environment-variable */
-t8=*((C_word*)lf[394]+1);
-((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,lf[415]);}
+t7=*((C_word*)lf[380]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[401]);}
/* k2985 in k2952 */
static void C_ccall f_2987(C_word c,C_word t0,C_word t1){
@@ -3927,17 +3832,17 @@ 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)))){
+t3=C_block_size(t1);
+t4=C_fixnum_difference(t3,C_fix(1));
+t5=C_i_string_ref(t1,t4);
+if(C_truep((C_truep(C_eqp(t5,C_make_character(92)))?C_SCHEME_TRUE:(C_truep(C_eqp(t5,C_make_character(47)))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
/* eval.scm: 138 ##sys#string-append */
-t6=*((C_word*)lf[13]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t2,t1,lf[413]);}
+t6=*((C_word*)lf[10]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t2,t1,lf[399]);}
else{
/* eval.scm: 138 ##sys#string-append */
-t6=*((C_word*)lf[13]+1);
-((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t2,t1,lf[414]);}}
+t6=*((C_word*)lf[10]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t2,t1,lf[400]);}}
else{
t3=t2;
f_2990(2,t3,C_SCHEME_FALSE);}}
@@ -3978,40 +3883,40 @@ 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));
+t2=C_mutate((C_word*)lf[9]+1 /* (set! chicken-prefix ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2991,a[2]=t1,a[3]=((C_word)li0),tmp=(C_word)a,a+=4,tmp));
+t3=C_mutate((C_word*)lf[12]+1 /* (set! chicken-home ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3025,a[2]=((C_word)li1),tmp=(C_word)a,a+=3,tmp));
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_FALSE;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_mutate((C_word*)lf[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);
+t8=C_mutate((C_word*)lf[15]+1 /* (set! hash-symbol ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3037,a[2]=t7,a[3]=t5,a[4]=((C_word)li2),tmp=(C_word)a,a+=5,tmp));
+t9=C_mutate((C_word*)lf[16]+1 /* (set! hash-table-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3052,a[2]=((C_word)li4),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate((C_word*)lf[17]+1 /* (set! hash-table-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3107,a[2]=((C_word)li6),tmp=(C_word)a,a+=3,tmp));
+t11=C_mutate((C_word*)lf[18]+1 /* (set! hash-table-update! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3167,a[2]=((C_word)li7),tmp=(C_word)a,a+=3,tmp));
+t12=C_mutate((C_word*)lf[19]+1 /* (set! hash-table-for-each ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3187,a[2]=((C_word)li11),tmp=(C_word)a,a+=3,tmp));
+t13=C_slot(lf[20],C_fix(0));
+t14=C_mutate((C_word*)lf[21]+1 /* (set! hash-table-location ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3255,a[2]=t13,a[3]=((C_word)li13),tmp=(C_word)a,a+=4,tmp));
+t15=C_set_block_item(lf[22] /* eval-environment */,0,C_SCHEME_FALSE);
+t16=C_set_block_item(lf[23] /* environment-is-mutable */,0,C_SCHEME_FALSE);
+t17=C_mutate((C_word*)lf[24]+1 /* (set! eval-decorator ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3315,a[2]=((C_word)li16),tmp=(C_word)a,a+=3,tmp));
+t18=C_set_block_item(lf[30] /* unbound-in-eval */,0,C_SCHEME_FALSE);
+t19=C_set_block_item(lf[31] /* eval-debug-level */,0,C_fix(1));
+t20=*((C_word*)lf[27]+1);
+t21=*((C_word*)lf[32]+1);
+t22=*((C_word*)lf[28]+1);
+t23=*((C_word*)lf[26]+1);
+t24=C_retrieve(lf[33]);
+t25=C_slot(lf[20],C_fix(0));
+t26=*((C_word*)lf[34]+1);
+t27=C_mutate((C_word*)lf[35]+1 /* (set! compile-to-closure ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3359,a[2]=t21,a[3]=t25,a[4]=((C_word)li142),tmp=(C_word)a,a+=5,tmp));
+t28=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6780,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t29=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10519,a[2]=((C_word)li294),tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 817 make-parameter */
+t30=*((C_word*)lf[374]+1);
((C_proc3)(void*)(*((C_word*)t30+1)))(3,t30,t28,t29);}
-/* 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,...){
+/* a10518 in k2988 in k2985 in k2952 */
+static void C_ccall f_10519(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -4020,13 +3925,13 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_10519r,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);}}
+t3=C_restore_rest(a,C_rest_count(0));
+f_10519r(t0,t1,t2,t3);}}
-static void C_ccall f_10702r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_10519r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -4042,31 +3947,31 @@ C_word t14;
C_word t15;
C_word t16;
C_word *a=C_alloc(10);
-t4=C_retrieve(lf[26]);
+t4=C_retrieve(lf[23]);
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_FALSE;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10523,a[2]=t2,a[3]=t1,a[4]=t7,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_i_pairp(t3))){
+t9=C_i_car(t3);
if(C_truep(t9)){
-t10=(C_word)C_i_check_structure(t9,lf[297]);
-t11=(C_word)C_slot(t9,C_fix(1));
+t10=C_i_check_structure(t9,lf[295]);
+t11=C_slot(t9,C_fix(1));
t12=C_set_block_item(t7,0,t11);
-t13=(C_word)C_slot(t9,C_fix(2));
+t13=C_slot(t9,C_fix(2));
t14=C_set_block_item(t5,0,t13);
t15=t8;
-f_10706(t15,t14);}
+f_10523(t15,t14);}
else{
t10=C_SCHEME_UNDEFINED;
t11=t8;
-f_10706(t11,t10);}}
+f_10523(t11,t10);}}
else{
t9=t8;
-f_10706(t9,C_SCHEME_UNDEFINED);}}
+f_10523(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){
+/* k10521 in a10518 in k2988 in k2985 in k2952 */
+static void C_fcall f_10523(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4084,7 +3989,7 @@ 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);}
+C_save_and_reclaim((void*)trf_10523,NULL,2,t0,t1);}
t2=((C_word*)((C_word*)t0)[5])[1];
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=((C_word*)((C_word*)t0)[4])[1];
@@ -4093,16 +3998,16 @@ 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);
+t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10526,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t11=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10531,a[2]=t5,a[3]=t3,a[4]=t9,a[5]=t7,a[6]=((C_word)li291),tmp=(C_word)a,a+=7,tmp);
+t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10538,a[2]=((C_word*)t0)[2],a[3]=((C_word)li292),tmp=(C_word)a,a+=4,tmp);
+t13=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10548,a[2]=t9,a[3]=t7,a[4]=t5,a[5]=t3,a[6]=((C_word)li293),tmp=(C_word)a,a+=7,tmp);
/* ##sys#dynamic-wind */
-t14=*((C_word*)lf[47]+1);
+t14=*((C_word*)lf[44]+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){
+/* a10547 in k10521 in a10518 in k2988 in k2985 in k2952 */
+static void C_ccall f_10548(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4113,16 +4018,16 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_10548,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,C_retrieve(lf[23]));
+t3=C_mutate(((C_word *)((C_word*)t0)[4])+1,C_retrieve(lf[22]));
+t4=C_mutate((C_word*)lf[23]+1 /* (set! environment-is-mutable ...) */,((C_word*)((C_word*)t0)[3])[1]);
+t5=C_mutate((C_word*)lf[22]+1 /* (set! eval-environment ...) */,((C_word*)((C_word*)t0)[2])[1]);
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_UNDEFINED);}
-/* 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){
+/* a10537 in k10521 in a10518 in k2988 in k2985 in k2952 */
+static void C_ccall f_10538(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4130,22 +4035,22 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10538,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10546,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 829 ##sys#current-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[107]))(2,*((C_word*)lf[107]+1),t2);}
-/* 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){
+/* k10544 in a10537 in k10521 in a10518 in k2988 in k2985 in k2952 */
+static void C_ccall f_10546(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 836 ##sys#compile-to-closure */
-t2=*((C_word*)lf[38]+1);
+/* eval.scm: 829 ##sys#compile-to-closure */
+t2=*((C_word*)lf[35]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t1);}
-/* 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){
+/* a10530 in k10521 in a10518 in k2988 in k2985 in k2952 */
+static void C_ccall f_10531(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4156,25 +4061,25 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_10531,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,C_retrieve(lf[23]));
+t3=C_mutate(((C_word *)((C_word*)t0)[4])+1,C_retrieve(lf[22]));
+t4=C_mutate((C_word*)lf[23]+1 /* (set! environment-is-mutable ...) */,((C_word*)((C_word*)t0)[3])[1]);
+t5=C_mutate((C_word*)lf[22]+1 /* (set! eval-environment ...) */,((C_word*)((C_word*)t0)[2])[1]);
t6=t1;
((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_UNDEFINED);}
-/* 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){
+/* k10524 in k10521 in a10518 in k2988 in k2985 in k2952 */
+static void C_ccall f_10526(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* g14051406 */
+/* g13931394 */
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){
+/* k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_6780(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4187,20 +4092,20 @@ 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_save_and_reclaim((void*)tr2,(void*)f_6780,2,t0,t1);}
+t2=C_mutate((C_word*)lf[164]+1 /* (set! eval-handler ...) */,t1);
+t3=C_mutate((C_word*)lf[165]+1 /* (set! eval-handler ...) */,*((C_word*)lf[164]+1));
+t4=C_mutate((C_word*)lf[166]+1 /* (set! eval ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6783,a[2]=((C_word)li143),tmp=(C_word)a,a+=3,tmp));
+t5=*((C_word*)lf[32]+1);
+t6=C_mutate((C_word*)lf[95]+1 /* (set! decompose-lambda-list ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6793,a[2]=t5,a[3]=((C_word)li146),tmp=(C_word)a,a+=4,tmp));
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6875,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t8=C_fudge(C_fix(13));
+/* eval.scm: 861 make-parameter */
+t9=*((C_word*)lf[374]+1);
((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t7,t8);}
-/* k6945 in k6850 in k2988 in k2985 in k2952 */
-static void C_ccall f_6947(C_word c,C_word t0,C_word t1){
+/* k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_6875(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4223,30 +4128,30 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_6875,2,t0,t1);}
+t2=C_mutate((C_word*)lf[169]+1 /* (set! load-verbose ...) */,t1);
+t3=C_mutate((C_word*)lf[170]+1 /* (set! abort-load ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6877,a[2]=((C_word)li147),tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(lf[171] /* current-source-filename */,0,C_SCHEME_FALSE);
+t5=C_mutate((C_word*)lf[172]+1 /* (set! current-load-path ...) */,lf[173]);
+t6=C_set_block_item(lf[174] /* dload-disabled */,0,C_SCHEME_FALSE);
+t7=C_mutate((C_word*)lf[175]+1 /* (set! set-dynamic-load-mode! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6883,a[2]=((C_word)li149),tmp=(C_word)a,a+=3,tmp));
+t8=*((C_word*)lf[183]+1);
+t9=*((C_word*)lf[27]+1);
+t10=*((C_word*)lf[34]+1);
+t11=*((C_word*)lf[184]+1);
+t12=*((C_word*)lf[185]+1);
+t13=*((C_word*)lf[166]+1);
+t14=*((C_word*)lf[186]+1);
+t15=*((C_word*)lf[187]+1);
+t16=*((C_word*)lf[188]+1);
+t17=*((C_word*)lf[169]+1);
+t18=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6956,a[2]=((C_word*)t0)[2],a[3]=t17,a[4]=t10,a[5]=t12,a[6]=t14,a[7]=t15,a[8]=t9,a[9]=t11,a[10]=t8,a[11]=t13,tmp=(C_word)a,a+=12,tmp);
+/* eval.scm: 895 ##sys#make-c-string */
+t19=*((C_word*)lf[201]+1);
+((C_proc3)(void*)(*((C_word*)t19+1)))(3,t19,t18,lf[398]);}
-/* 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){
+/* k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_6956(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4259,20 +4164,20 @@ 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_save_and_reclaim((void*)tr2,(void*)f_6956,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6958,a[2]=((C_word)li151),tmp=(C_word)a,a+=3,tmp);
+t3=C_mutate((C_word*)lf[189]+1 /* (set! load ...) */,(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7004,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=t2,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word)li170),tmp=(C_word)a,a+=14,tmp));
+t4=C_mutate((C_word*)lf[194]+1 /* (set! load ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7425,a[2]=((C_word)li171),tmp=(C_word)a,a+=3,tmp));
+t5=C_mutate((C_word*)lf[213]+1 /* (set! load-relative ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7454,a[2]=((C_word)li172),tmp=(C_word)a,a+=3,tmp));
+t6=C_mutate((C_word*)lf[214]+1 /* (set! load-noisily ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7497,a[2]=((C_word)li176),tmp=(C_word)a,a+=3,tmp));
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7523,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10513,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 988 software-type */
+t9=*((C_word*)lf[397]+1);
((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t8);}
-/* 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){
+/* k10511 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10513(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4280,19 +4185,19 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_10513,2,t0,t1);}
+t2=C_eqp(t1,lf[389]);
if(C_truep(t2)){
t3=((C_word*)t0)[2];
-f_7595(t3,lf[404]);}
+f_7523(t3,lf[390]);}
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);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10509,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 989 software-version */
+t4=*((C_word*)lf[387]+1);
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k10507 in k10511 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10509(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4300,19 +4205,19 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_10509,2,t0,t1);}
+t2=C_eqp(t1,lf[391]);
if(C_truep(t2)){
t3=((C_word*)t0)[2];
-f_7595(t3,lf[406]);}
+f_7523(t3,lf[392]);}
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);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10505,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 990 software-version */
+t4=*((C_word*)lf[387]+1);
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k10503 in k10507 in k10511 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10505(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4320,29 +4225,29 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_10505,2,t0,t1);}
+t2=C_eqp(t1,lf[393]);
if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10501,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 991 machine-type */
+t4=*((C_word*)lf[396]+1);
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
t3=((C_word*)t0)[2];
-f_7595(t3,lf[8]);}}
+f_7523(t3,lf[5]);}}
-/* 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){
+/* k10499 in k10503 in k10507 in k10511 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10501(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_eqp(t1,lf[408]);
+t2=C_eqp(t1,lf[394]);
t3=((C_word*)t0)[2];
-f_7595(t3,(C_truep(t2)?lf[409]:lf[8]));}
+f_7523(t3,(C_truep(t2)?lf[395]:lf[5]));}
-/* 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){
+/* k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7523(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4351,16 +4256,16 @@ 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_save_and_reclaim((void*)trf_7523,NULL,2,t0,t1);}
+t2=C_mutate((C_word*)lf[219]+1 /* (set! load-library-extension ...) */,t1);
+t3=C_mutate((C_word*)lf[208]+1 /* (set! load-dynamic-extension ...) */,lf[5]);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7528,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 997 build-platform */
+t5=*((C_word*)lf[388]+1);
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-/* 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){
+/* k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7528(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4372,59 +4277,59 @@ 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_save_and_reclaim((void*)tr2,(void*)f_7528,2,t0,t1);}
+t2=C_eqp(t1,lf[220]);
+t3=(C_truep(t2)?lf[221]:lf[222]);
+t4=C_mutate((C_word*)lf[223]+1 /* (set! default-dynamic-load-libraries ...) */,t3);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7535,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10452,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10473,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1003 software-version */
+t8=*((C_word*)lf[387]+1);
((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t7);}
-/* 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){
+/* k10471 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10473(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-if(C_truep((C_truep((C_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));
+if(C_truep((C_truep(C_eqp(t1,lf[383]))?C_SCHEME_TRUE:(C_truep(C_eqp(t1,lf[384]))?C_SCHEME_TRUE:(C_truep(C_eqp(t1,lf[385]))?C_SCHEME_TRUE:(C_truep(C_eqp(t1,lf[386]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))){
+t2=C_i_zerop(C_fix((C_word)C_BINARY_VERSION));
t3=((C_word*)t0)[2];
-f_10635(t3,(C_word)C_i_not(t2));}
+f_10452(t3,C_i_not(t2));}
else{
t2=((C_word*)t0)[2];
-f_10635(t2,C_SCHEME_FALSE);}}
+f_10452(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){
+/* k10450 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_10452(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_10635,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_10452,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10642,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1015 number->string */
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10459,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1008 number->string */
C_number_to_string(3,0,t2,C_fix((C_word)C_BINARY_VERSION));}
else{
t2=((C_word*)t0)[2];
-f_7607(2,t2,C_retrieve(lf[227]));}}
+f_7535(2,t2,C_retrieve(lf[219]));}}
-/* 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){
+/* k10457 in k10450 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10459(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 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);}
+/* eval.scm: 1005 string-append */
+t2=*((C_word*)lf[188]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],C_retrieve(lf[219]),lf[382],t1);}
-/* 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){
+/* k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7535(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4440,22 +4345,22 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7535,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7537,a[2]=t1,a[3]=((C_word)li177),tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7544,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
t4=C_SCHEME_END_OF_LIST;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_FALSE;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10591,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10408,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10416,a[2]=t2,a[3]=t5,a[4]=t10,a[5]=t7,a[6]=((C_word)li290),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
-f_10599(t12,t8,C_retrieve(lf[231]));}
+f_10416(t12,t8,C_retrieve(lf[223]));}
-/* 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){
+/* loop1713 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_10416(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4464,20 +4369,20 @@ 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 */
+C_save_and_reclaim((void*)trf_10416,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10445,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
+t4=C_slot(t2,C_fix(0));
+/* g17291730 */
t5=((C_word*)t0)[2];
-f_7609(t5,t3,t4);}
+f_7537(t5,t3,t4);}
else{
t3=((C_word*)((C_word*)t0)[3])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k10443 in loop1713 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10445(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4490,39 +4395,39 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_10445,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop17251738 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop17131726 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_10599(t6,((C_word*)t0)[3],t5);}
+f_10416(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop17251738 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop17131726 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_10599(t6,((C_word*)t0)[3],t5);}}
+f_10416(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){
+/* k10406 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10408(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10408,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10410,a[2]=((C_word)li289),tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1012 make-parameter */
+t3=*((C_word*)lf[374]+1);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],t1,t2);}
-/* 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){
+/* a10409 in k10406 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10410(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -4530,13 +4435,13 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_10410,3,t0,t1,t2);}
+t3=C_i_check_list(t2);
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}
-/* 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){
+/* k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7544(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4555,26 +4460,31 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_7544,2,t0,t1);}
+t2=C_mutate((C_word*)lf[224]+1 /* (set! dynamic-load-libraries ...) */,t1);
+t3=*((C_word*)lf[169]+1);
+t4=*((C_word*)lf[188]+1);
+t5=*((C_word*)lf[224]+1);
+t6=*((C_word*)lf[34]+1);
+t7=C_mutate((C_word*)lf[225]+1 /* (set! load-library-0 ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7546,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t6,a[6]=((C_word)li179),tmp=(C_word)a,a+=7,tmp));
+t8=C_mutate((C_word*)lf[232]+1 /* (set! load-library ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7652,a[2]=((C_word)li180),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[233]+1 /* (set! load-library ...) */,*((C_word*)lf[232]+1));
+t10=*((C_word*)lf[32]+1);
+t11=*((C_word*)lf[188]+1);
+t12=C_mutate((C_word*)lf[235]+1 /* (set! canonicalize-extension-path ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7738,a[2]=t11,a[3]=((C_word)li184),tmp=(C_word)a,a+=4,tmp));
+t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7898,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_fudge(C_fix(22)))){
+/* ##sys#peek-c-string */
+t14=*((C_word*)lf[13]+1);
+((C_proc4)(void*)(*((C_word*)t14+1)))(4,t14,t13,C_mpointer(&a,(void*)C_private_repository_path()),C_fix(0));}
+else{
+t14=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10380,a[2]=t13,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1104 get-environment-variable */
+t15=*((C_word*)lf[380]+1);
+((C_proc3)(void*)(*((C_word*)t15+1)))(3,t15,t14,lf[381]);}}
-/* 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){
+/* k10378 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10380(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4582,78 +4492,57 @@ 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_word ab[9],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_10380,2,t0,t1);}
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);}
+t2=t1;
+t3=((C_word*)t0)[2];
+f_7898(2,t3,t2);}
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);}}}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10386,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10396,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10400,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=C_fudge(C_fix(42));
+/* eval.scm: 1108 ##sys#number->string */
+((C_proc3)C_retrieve_symbol_proc(lf[379]))(3,*((C_word*)lf[379]+1),t4,t5);}}
-/* 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){
+/* k10398 in k10378 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10400(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 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);}
+/* eval.scm: 1106 ##sys#string-append */
+t2=*((C_word*)lf[10]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[378],t1);}
-/* 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){
+/* k10394 in k10378 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10396(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 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);}
+/* eval.scm: 1105 ##sys#chicken-prefix */
+((C_proc3)C_retrieve_symbol_proc(lf[9]))(3,*((C_word*)lf[9]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k10384 in k10378 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10386(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
-C_word 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10386,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);}
+t2=((C_word*)t0)[2];
+f_7898(2,t2,t1);}
else{
/* ##sys#peek-c-string */
-t2=*((C_word*)lf[16]+1);
+t2=*((C_word*)lf[13]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_mpointer(&a,(void*)C_INSTALL_EGG_HOME),C_fix(0));}}
-/* 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){
+/* k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7898(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -4687,430 +4576,152 @@ 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_word ab[47],*a=ab;
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_save_and_reclaim((void*)tr2,(void*)f_7898,2,t0,t1);}
+t2=t1;
+t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
+t4=C_mutate((C_word*)lf[241]+1 /* (set! repository-path ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7899,a[2]=t3,a[3]=((C_word)li185),tmp=(C_word)a,a+=4,tmp));
+t5=C_mutate((C_word*)lf[242]+1 /* (set! repository-path ...) */,*((C_word*)lf[241]+1));
+t6=C_set_block_item(lf[243] /* setup-mode */,0,C_SCHEME_FALSE);
+t7=*((C_word*)lf[244]+1);
+t8=*((C_word*)lf[188]+1);
+t9=C_mutate((C_word*)lf[245]+1 /* (set! find-extension ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7930,a[2]=t8,a[3]=t7,a[4]=((C_word)li188),tmp=(C_word)a,a+=5,tmp));
+t10=C_set_block_item(lf[250] /* loaded-extensions */,0,C_SCHEME_END_OF_LIST);
+t11=*((C_word*)lf[251]+1);
+t12=C_mutate((C_word*)lf[252]+1 /* (set! load-extension ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8029,a[2]=t11,a[3]=((C_word)li189),tmp=(C_word)a,a+=4,tmp));
+t13=C_mutate((C_word*)lf[255]+1 /* (set! provide ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8113,a[2]=((C_word)li191),tmp=(C_word)a,a+=3,tmp));
+t14=C_mutate((C_word*)lf[256]+1 /* (set! provide ...) */,C_retrieve(lf[255]));
+t15=C_mutate((C_word*)lf[257]+1 /* (set! provided? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8155,a[2]=((C_word)li192),tmp=(C_word)a,a+=3,tmp));
+t16=C_mutate((C_word*)lf[258]+1 /* (set! provided? ...) */,C_retrieve(lf[257]));
+t17=C_mutate((C_word*)lf[123]+1 /* (set! require ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8169,a[2]=((C_word)li194),tmp=(C_word)a,a+=3,tmp));
+t18=C_mutate((C_word*)lf[259]+1 /* (set! require ...) */,C_retrieve(lf[123]));
+t19=C_retrieve(lf[33]);
+t20=*((C_word*)lf[244]+1);
+t21=*((C_word*)lf[188]+1);
+t22=*((C_word*)lf[183]+1);
+t23=C_mutate((C_word*)lf[261]+1 /* (set! extension-information ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8182,a[2]=t21,a[3]=t20,a[4]=t22,a[5]=t19,a[6]=((C_word)li196),tmp=(C_word)a,a+=7,tmp));
+t24=C_mutate((C_word*)lf[265]+1 /* (set! extension-information ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8215,a[2]=((C_word)li197),tmp=(C_word)a,a+=3,tmp));
+t25=C_retrieve(lf[33]);
+t26=*((C_word*)lf[183]+1);
+t27=C_mutate((C_word*)lf[124]+1 /* (set! lookup-runtime-requirements ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8221,a[2]=((C_word)li199),tmp=(C_word)a,a+=3,tmp));
+t28=*((C_word*)lf[267]+1);
+t29=C_mutate((C_word*)lf[127]+1 /* (set! do-the-right-thing ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8270,a[2]=((C_word)li211),tmp=(C_word)a,a+=3,tmp));
+t30=*((C_word*)lf[292]+1);
+t31=C_mutate((C_word*)lf[230]+1 /* (set! string->c-identifier ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8878,a[2]=t30,a[3]=((C_word)li213),tmp=(C_word)a,a+=4,tmp));
+t32=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8934,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1333 make-vector */
+t33=*((C_word*)lf[304]+1);
+((C_proc4)(void*)(*((C_word*)t33+1)))(4,t33,t32,C_fix(301),C_SCHEME_END_OF_LIST);}
+
+/* k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8934(C_word c,C_word t0,C_word t1){
C_word tmp;
+C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
-C_word ab[11],*a=ab;
+C_word 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*)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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8934,2,t0,t1);}
+t2=C_mutate(&lf[293] /* (set! r4rs-environment ...) */,t1);
+t3=lf[294] /* r5rs-environment */ =C_SCHEME_FALSE;;
+t4=C_a_i_record(&a,3,lf[295],C_SCHEME_FALSE,C_SCHEME_TRUE);
+t5=C_mutate(&lf[296] /* (set! interaction-environment ...) */,t4);
+t6=C_mutate((C_word*)lf[297]+1 /* (set! environment? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8941,a[2]=((C_word)li214),tmp=(C_word)a,a+=3,tmp));
+t7=C_mutate((C_word*)lf[298]+1 /* (set! copy-env-table ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8957,a[2]=((C_word)li217),tmp=(C_word)a,a+=3,tmp));
+t8=C_mutate((C_word*)lf[299]+1 /* (set! environment-symbols ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9065,a[2]=((C_word)li221),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[301]+1 /* (set! interaction-environment ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9184,a[2]=((C_word)li222),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate((C_word*)lf[302]+1 /* (set! scheme-report-environment ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9187,a[2]=((C_word)li223),tmp=(C_word)a,a+=3,tmp));
+t11=*((C_word*)lf[304]+1);
+t12=C_mutate((C_word*)lf[305]+1 /* (set! null-environment ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9231,a[2]=t11,a[3]=((C_word)li224),tmp=(C_word)a,a+=4,tmp));
+t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9269,a[2]=((C_word)li226),tmp=(C_word)a,a+=3,tmp);
+t14=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9285,a[2]=t13,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t15=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10371,a[2]=t14,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1417 initb */
+f_9269(t15,C_retrieve2(lf[293],"r4rs-environment"));}
-/* 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){
+/* k10369 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10371(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* 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);}
+/* for-each */
+t2=*((C_word*)lf[260]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,lf[377]);}
-/* 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){
+/* k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9285(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9285,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9289,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1438 ##sys#copy-env-table */
+t3=*((C_word*)lf[298]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,C_retrieve2(lf[293],"r4rs-environment"),C_SCHEME_TRUE,C_SCHEME_TRUE);}
-/* 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){
+/* k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9289(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
-C_word ab[3],*a=ab;
+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_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));}
+C_save_and_reclaim((void*)tr2,(void*)f_9289,2,t0,t1);}
+t2=C_mutate(&lf[294] /* (set! r5rs-environment ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9292,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10367,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1440 initb */
+f_9269(t4,C_retrieve2(lf[294],"r5rs-environment"));}
-/* 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){
+/* k10365 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10367(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1330 list->vector */
-t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+/* for-each */
+t2=*((C_word*)lf[260]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,lf[376]);}
-/* 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){
+/* k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9292(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
-C_word t4;
-C_word ab[6],*a=ab;
+C_word ab[3],*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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9292,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9296,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1447 chicken-home */
+t3=*((C_word*)lf[12]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* 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){
+/* k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9296(C_word c,C_word t0,C_word t1){
C_word tmp;
-C_word 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 t2;
+C_word t3;
C_word t4;
C_word t5;
C_word t6;
@@ -5123,23 +4734,23 @@ 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_save_and_reclaim((void*)tr2,(void*)f_9296,2,t0,t1);}
+t2=(C_truep(t1)?C_a_i_list(&a,1,t1):C_SCHEME_END_OF_LIST);
+t3=C_mutate((C_word*)lf[248]+1 /* (set! include-pathnames ...) */,t2);
+t4=*((C_word*)lf[188]+1);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9302,a[2]=((C_word)li227),tmp=(C_word)a,a+=3,tmp);
+t6=C_mutate((C_word*)lf[307]+1 /* (set! resolve-include-filename ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9321,a[2]=t4,a[3]=t5,a[4]=((C_word)li231),tmp=(C_word)a,a+=5,tmp));
+t7=*((C_word*)lf[34]+1);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9470,a[2]=t7,a[3]=((C_word)li233),tmp=(C_word)a,a+=4,tmp);
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9494,a[2]=t8,a[3]=t7,a[4]=((C_word)li234),tmp=(C_word)a,a+=5,tmp);
+t10=C_mutate((C_word*)lf[191]+1 /* (set! display-times ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9515,a[2]=t9,a[3]=t7,a[4]=((C_word)li235),tmp=(C_word)a,a+=5,tmp));
+t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9570,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1516 append */
+t12=*((C_word*)lf[81]+1);
+((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t11,lf[375],C_retrieve(lf[138]));}
+
+/* k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9570(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5152,32 +4763,32 @@ 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_save_and_reclaim((void*)tr2,(void*)f_9570,2,t0,t1);}
+t2=C_mutate((C_word*)lf[138]+1 /* (set! features ...) */,t1);
+t3=C_set_block_item(lf[315] /* repl-eval-hook */,0,C_SCHEME_FALSE);
+t4=C_set_block_item(lf[316] /* repl-print-length-limit */,0,C_SCHEME_FALSE);
+t5=C_set_block_item(lf[317] /* repl-read-hook */,0,C_SCHEME_FALSE);
+t6=C_mutate((C_word*)lf[318]+1 /* (set! repl-print-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9575,a[2]=((C_word)li237),tmp=(C_word)a,a+=3,tmp));
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9592,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10359,a[2]=((C_word)li288),tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1530 make-parameter */
+t9=*((C_word*)lf[374]+1);
((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t7,t8);}
-/* 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){
+/* a10358 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10359(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10395,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_10359,2,t0,t1);}
t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[375]);}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[373]);}
-/* 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){
+/* k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9592(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5196,26 +4807,26 @@ 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_save_and_reclaim((void*)tr2,(void*)f_9592,2,t0,t1);}
+t2=C_mutate((C_word*)lf[322]+1 /* (set! repl-prompt ...) */,t1);
+t3=*((C_word*)lf[322]+1);
+t4=C_mutate((C_word*)lf[323]+1 /* (set! read-prompt-hook ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9594,a[2]=t3,a[3]=((C_word)li238),tmp=(C_word)a,a+=4,tmp));
+t5=C_mutate((C_word*)lf[326]+1 /* (set! clear-trace-buffer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9610,a[2]=((C_word)li239),tmp=(C_word)a,a+=3,tmp));
+t6=*((C_word*)lf[166]+1);
+t7=*((C_word*)lf[183]+1);
+t8=*((C_word*)lf[199]+1);
+t9=*((C_word*)lf[327]+1);
+t10=*((C_word*)lf[185]+1);
+t11=*((C_word*)lf[169]+1);
+t12=C_retrieve(lf[328]);
+t13=C_mutate((C_word*)lf[329]+1 /* (set! repl ...) */,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9613,a[2]=t8,a[3]=t6,a[4]=t7,a[5]=t11,a[6]=t9,a[7]=t10,a[8]=((C_word)li254),tmp=(C_word)a,a+=9,tmp));
+t14=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9977,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1647 make-vector */
+t15=*((C_word*)lf[304]+1);
((C_proc4)(void*)(*((C_word*)t15+1)))(4,t15,t14,C_fix(301),C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9977(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5242,33 +4853,33 @@ 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));
+C_save_and_reclaim((void*)tr2,(void*)f_9977,2,t0,t1);}
+t2=C_mutate((C_word*)lf[344]+1 /* (set! sharp-comma-reader-ctors ...) */,t1);
+t3=C_mutate((C_word*)lf[345]+1 /* (set! define-reader-ctor ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9979,a[2]=((C_word)li255),tmp=(C_word)a,a+=3,tmp));
+t4=C_retrieve(lf[346]);
+t5=*((C_word*)lf[347]+1);
+t6=*((C_word*)lf[183]+1);
+t7=C_mutate((C_word*)lf[346]+1 /* (set! user-read-hook ...) */,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9988,a[2]=t4,a[3]=t5,a[4]=t6,a[5]=((C_word)li257),tmp=(C_word)a,a+=6,tmp));
+t8=lf[351] /* last-error */ =C_SCHEME_FALSE;;
+t9=C_mutate(&lf[352] /* (set! run-safe ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10063,a[2]=((C_word)li265),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate(&lf[355] /* (set! store-result ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10122,a[2]=((C_word)li266),tmp=(C_word)a,a+=3,tmp));
+t11=C_mutate(&lf[357] /* (set! CHICKEN_yield ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10131,a[2]=((C_word)li268),tmp=(C_word)a,a+=3,tmp));
+t12=C_mutate(&lf[359] /* (set! CHICKEN_eval ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10143,a[2]=((C_word)li270),tmp=(C_word)a,a+=3,tmp));
+t13=C_mutate(&lf[360] /* (set! CHICKEN_eval_string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10159,a[2]=((C_word)li272),tmp=(C_word)a,a+=3,tmp));
+t14=C_mutate(&lf[362] /* (set! store-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10185,a[2]=((C_word)li273),tmp=(C_word)a,a+=3,tmp));
+t15=C_mutate(&lf[364] /* (set! CHICKEN_eval_to_string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10198,a[2]=((C_word)li275),tmp=(C_word)a,a+=3,tmp));
+t16=C_mutate(&lf[365] /* (set! CHICKEN_eval_string_to_string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10224,a[2]=((C_word)li277),tmp=(C_word)a,a+=3,tmp));
+t17=C_mutate(&lf[366] /* (set! CHICKEN_apply ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10261,a[2]=((C_word)li279),tmp=(C_word)a,a+=3,tmp));
+t18=C_mutate(&lf[367] /* (set! CHICKEN_apply_to_string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10277,a[2]=((C_word)li281),tmp=(C_word)a,a+=3,tmp));
+t19=C_mutate(&lf[368] /* (set! CHICKEN_read ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10303,a[2]=((C_word)li283),tmp=(C_word)a,a+=3,tmp));
+t20=C_mutate(&lf[369] /* (set! CHICKEN_load ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10325,a[2]=((C_word)li285),tmp=(C_word)a,a+=3,tmp));
+t21=C_mutate(&lf[370] /* (set! CHICKEN_get_error_message ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10340,a[2]=((C_word)li286),tmp=(C_word)a,a+=3,tmp));
+t22=C_mutate((C_word*)lf[25]+1 /* (set! make-lambda-info ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10350,a[2]=((C_word)li287),tmp=(C_word)a,a+=3,tmp));
t23=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t23+1)))(2,t23,C_SCHEME_UNDEFINED);}
-/* ##sys#make-lambda-info in 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){
+/* ##sys#make-lambda-info in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10350(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5277,39 +4888,39 @@ 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_save_and_reclaim((void*)tr3,(void*)f_10350,3,t0,t1,t2);}
+t3=C_block_size(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10357,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1778 ##sys#make-string */
+t5=*((C_word*)lf[372]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
-/* 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){
+/* k10355 in ##sys#make-lambda-info in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10357(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_word)C_copy_memory(t1,((C_word*)t0)[4],((C_word*)t0)[3]);
-t3=(C_word)C_string_to_lambdainfo(t1);
+t2=C_copy_memory(t1,((C_word*)t0)[4],((C_word*)t0)[3]);
+t3=C_string_to_lambdainfo(t1);
t4=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t1);}
-/* CHICKEN_get_error_message in 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){
+/* CHICKEN_get_error_message in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static C_word C_fcall f_10340(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_stack_check;
-t3=C_retrieve2(lf[353],"last-error");
+t3=C_retrieve2(lf[351],"last-error");
if(C_truep(t3)){
-return(f_10221(t3,t2,t1));}
+return(f_10185(t3,t2,t1));}
else{
-return(f_10221(lf[373],t2,t1));}}
+return(f_10185(lf[371],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){
+/* CHICKEN_load in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10325(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5317,27 +4928,27 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_10325,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10329,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* ##sys#peek-c-string */
-t4=*((C_word*)lf[16]+1);
+t4=*((C_word*)lf[13]+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){
+/* k10327 in CHICKEN_load in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10329(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10329,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10334,a[2]=t1,a[3]=((C_word)li284),tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1768 run-safe */
+f_10063(((C_word*)t0)[2],t2);}
-/* 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){
+/* a10333 in k10327 in CHICKEN_load in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10334(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5345,21 +4956,21 @@ 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_10334,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10338,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1768 load */
+((C_proc3)C_retrieve_symbol_proc(lf[194]))(3,*((C_word*)lf[194]+1),t2,((C_word*)t0)[2]);}
-/* 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){
+/* k10336 in a10333 in k10327 in CHICKEN_load in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10338(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
-/* CHICKEN_read in 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){
+/* CHICKEN_read in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10303(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5367,14 +4978,14 @@ 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);
+C_save_and_reclaim((void*)tr4,(void*)f_10303,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10307,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* ##sys#peek-c-string */
-t5=*((C_word*)lf[16]+1);
+t5=*((C_word*)lf[13]+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){
+/* k10305 in CHICKEN_read in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10307(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5382,14 +4993,14 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10307,2,t0,t1);}
t2=((C_word*)t0)[3];
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10312,a[2]=t1,a[3]=t2,a[4]=((C_word)li282),tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1762 run-safe */
+f_10063(((C_word*)t0)[2],t3);}
-/* 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){
+/* a10311 in k10305 in CHICKEN_read in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10312(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5397,36 +5008,36 @@ 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_save_and_reclaim((void*)tr2,(void*)f_10312,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10316,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1764 open-input-string */
+t3=*((C_word*)lf[361]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k10314 in a10311 in k10305 in CHICKEN_read in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10316(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10316,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10323,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1765 read */
+t3=*((C_word*)lf[183]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,t1);}
-/* 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){
+/* k10321 in k10314 in a10311 in k10305 in CHICKEN_read in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10323(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1807 store-result */
-f_10158(((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+/* eval.scm: 1765 store-result */
+f_10122(((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){
+/* CHICKEN_apply_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10277(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -5434,13 +5045,13 @@ 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);}
+C_save_and_reclaim((void*)tr6,(void*)f_10277,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10283,a[2]=t3,a[3]=t2,a[4]=t4,a[5]=t5,a[6]=((C_word)li280),tmp=(C_word)a,a+=7,tmp);
+/* eval.scm: 1755 run-safe */
+f_10063(t1,t6);}
-/* 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){
+/* a10282 in CHICKEN_apply_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10283(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5448,14 +5059,14 @@ 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_save_and_reclaim((void*)tr2,(void*)f_10283,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10287,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+/* eval.scm: 1757 open-output-string */
+t3=*((C_word*)lf[28]+1);
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* 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){
+/* k10285 in a10282 in CHICKEN_apply_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10287(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5463,45 +5074,45 @@ 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_save_and_reclaim((void*)tr2,(void*)f_10287,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10290,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10301,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
C_apply(4,0,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k10299 in k10285 in a10282 in CHICKEN_apply_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10301(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1800 write */
-t2=*((C_word*)lf[30]+1);
+/* eval.scm: 1758 write */
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k10288 in k10285 in a10282 in CHICKEN_apply_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10290(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10290,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10297,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1759 get-output-string */
+t3=*((C_word*)lf[26]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k10295 in k10288 in k10285 in a10282 in CHICKEN_apply_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10297(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1801 store-string */
+/* eval.scm: 1759 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]));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,f_10185(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){
+/* CHICKEN_apply in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10261(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -5509,13 +5120,13 @@ 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);}
+C_save_and_reclaim((void*)tr5,(void*)f_10261,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10267,a[2]=t3,a[3]=t2,a[4]=t4,a[5]=((C_word)li278),tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1750 run-safe */
+f_10063(t1,t5);}
-/* 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){
+/* a10266 in CHICKEN_apply in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10267(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5523,20 +5134,20 @@ 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_save_and_reclaim((void*)tr2,(void*)f_10267,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10275,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
C_apply(4,0,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k10273 in a10266 in CHICKEN_apply in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10275(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1792 store-result */
-f_10158(((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+/* eval.scm: 1750 store-result */
+f_10122(((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){
+/* CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10224(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -5544,14 +5155,14 @@ 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);
+C_save_and_reclaim((void*)tr5,(void*)f_10224,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10228,a[2]=t1,a[3]=t4,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
/* ##sys#peek-c-string */
-t6=*((C_word*)lf[16]+1);
+t6=*((C_word*)lf[13]+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){
+/* k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10228(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5560,15 +5171,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10228,2,t0,t1);}
t2=((C_word*)t0)[4];
t3=((C_word*)t0)[3];
-t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10233,a[2]=t1,a[3]=t2,a[4]=t3,a[5]=((C_word)li276),tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1741 run-safe */
+f_10063(((C_word*)t0)[2],t4);}
-/* 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){
+/* a10232 in k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10233(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5576,14 +5187,14 @@ 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_save_and_reclaim((void*)tr2,(void*)f_10233,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10237,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1743 open-output-string */
+t3=*((C_word*)lf[28]+1);
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* 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){
+/* k10235 in a10232 in k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10237(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5593,67 +5204,67 @@ 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_save_and_reclaim((void*)tr2,(void*)f_10237,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10240,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10251,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10255,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10259,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1744 open-input-string */
+t6=*((C_word*)lf[361]+1);
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[2]);}
-/* 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){
+/* k10257 in k10235 in a10232 in k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10259(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1786 read */
-t2=*((C_word*)lf[191]+1);
+/* eval.scm: 1744 read */
+t2=*((C_word*)lf[183]+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){
+/* k10253 in k10235 in a10232 in k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10255(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1786 eval */
-t2=*((C_word*)lf[174]+1);
+/* eval.scm: 1744 eval */
+t2=*((C_word*)lf[166]+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){
+/* k10249 in k10235 in a10232 in k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10251(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1786 write */
-t2=*((C_word*)lf[30]+1);
+/* eval.scm: 1744 write */
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k10238 in k10235 in a10232 in k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10240(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10240,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10247,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1745 get-output-string */
+t3=*((C_word*)lf[26]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k10245 in k10238 in k10235 in a10232 in k10226 in CHICKEN_eval_string_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10247(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1787 store-string */
+/* eval.scm: 1745 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]));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,f_10185(t1,((C_word*)t0)[3],((C_word*)t0)[2]));}
-/* CHICKEN_eval_to_string in 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){
+/* CHICKEN_eval_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10198(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -5661,13 +5272,13 @@ 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);}
+C_save_and_reclaim((void*)tr5,(void*)f_10198,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10204,a[2]=t2,a[3]=t3,a[4]=t4,a[5]=((C_word)li274),tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1732 run-safe */
+f_10063(t1,t5);}
-/* 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){
+/* a10203 in CHICKEN_eval_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10204(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5675,14 +5286,14 @@ 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_save_and_reclaim((void*)tr2,(void*)f_10204,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10208,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1734 open-output-string */
+t3=*((C_word*)lf[28]+1);
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* 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){
+/* k10206 in a10203 in CHICKEN_eval_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10208(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5690,63 +5301,63 @@ 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_save_and_reclaim((void*)tr2,(void*)f_10208,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10211,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10222,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1735 eval */
+t4=*((C_word*)lf[166]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-/* 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){
+/* k10220 in k10206 in a10203 in CHICKEN_eval_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10222(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1777 write */
-t2=*((C_word*)lf[30]+1);
+/* eval.scm: 1735 write */
+t2=*((C_word*)lf[27]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
-/* 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){
+/* k10209 in k10206 in a10203 in CHICKEN_eval_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10211(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10211,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10218,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1736 get-output-string */
+t3=*((C_word*)lf[26]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k10216 in k10209 in k10206 in a10203 in CHICKEN_eval_to_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10218(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1778 store-string */
+/* eval.scm: 1736 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]));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,f_10185(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){
+/* store-string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static C_word C_fcall f_10185(C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_stack_check;
-t4=(C_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]);
+t4=C_block_size(t1);
+if(C_truep(C_fixnum_greater_or_equal_p(t4,t2))){
+t5=C_mutate(&lf[351] /* (set! last-error ...) */,lf[363]);
return(C_SCHEME_FALSE);}
else{
-t5=(C_word)C_copy_result_string(t1,t3,t4);
+t5=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){
+/* CHICKEN_eval_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10159(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5754,14 +5365,14 @@ 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);
+C_save_and_reclaim((void*)tr4,(void*)f_10159,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10163,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* ##sys#peek-c-string */
-t5=*((C_word*)lf[16]+1);
+t5=*((C_word*)lf[13]+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){
+/* k10161 in CHICKEN_eval_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10163(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5769,14 +5380,14 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10163,2,t0,t1);}
t2=((C_word*)t0)[3];
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10168,a[2]=t1,a[3]=t2,a[4]=((C_word)li271),tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1713 run-safe */
+f_10063(((C_word*)t0)[2],t3);}
-/* 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){
+/* a10167 in k10161 in CHICKEN_eval_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10168(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5784,14 +5395,14 @@ 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_save_and_reclaim((void*)tr2,(void*)f_10168,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10172,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1715 open-input-string */
+t3=*((C_word*)lf[361]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k10170 in a10167 in k10161 in CHICKEN_eval_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10172(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5799,32 +5410,32 @@ 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_save_and_reclaim((void*)tr2,(void*)f_10172,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10179,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10183,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1716 read */
+t4=*((C_word*)lf[183]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t1);}
-/* 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){
+/* k10181 in k10170 in a10167 in k10161 in CHICKEN_eval_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10183(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1758 eval */
-t2=*((C_word*)lf[174]+1);
+/* eval.scm: 1716 eval */
+t2=*((C_word*)lf[166]+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){
+/* k10177 in k10170 in a10167 in k10161 in CHICKEN_eval_string in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10179(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1758 store-result */
-f_10158(((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+/* eval.scm: 1716 store-result */
+f_10122(((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){
+/* CHICKEN_eval in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10143(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -5832,13 +5443,13 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_10143,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10149,a[2]=t2,a[3]=t3,a[4]=((C_word)li269),tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1708 run-safe */
+f_10063(t1,t4);}
-/* 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){
+/* a10148 in CHICKEN_eval in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10149(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5846,22 +5457,22 @@ 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_save_and_reclaim((void*)tr2,(void*)f_10149,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10157,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1710 eval */
+t3=*((C_word*)lf[166]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k10155 in a10148 in CHICKEN_eval in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10157(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1752 store-result */
-f_10158(((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+/* eval.scm: 1710 store-result */
+f_10122(((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){
+/* CHICKEN_yield in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10131(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5869,13 +5480,13 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10131,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10137,a[2]=((C_word)li267),tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1705 run-safe */
+f_10063(t1,t2);}
-/* 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){
+/* a10136 in CHICKEN_yield in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10137(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5883,49 +5494,49 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_10137,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10141,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1705 ##sys#thread-yield! */
+((C_proc2)C_retrieve_symbol_proc(lf[358]))(2,*((C_word*)lf[358]+1),t2);}
-/* 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){
+/* k10139 in a10136 in CHICKEN_yield in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10141(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
-/* store-result in 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){
+/* store-result in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_10122(C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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_save_and_reclaim((void*)trf_10122,NULL,3,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10126,a[2]=t1,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1699 ##sys#gc */
+t5=*((C_word*)lf[356]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,C_SCHEME_FALSE);}
-/* 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){
+/* k10124 in store-result in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10126(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(C_truep(((C_word*)t0)[4])){
-t2=(C_word)C_store_result(((C_word*)t0)[3],((C_word*)t0)[4]);
+t2=C_store_result(((C_word*)t0)[3],((C_word*)t0)[4]);
t3=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_TRUE);}
else{
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}}
-/* run-safe in 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){
+/* run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_10063(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5934,16 +5545,16 @@ 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);
+C_save_and_reclaim((void*)trf_10063,NULL,2,t1,t2);}
+t3=lf[351] /* last-error */ =C_SCHEME_FALSE;;
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10068,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10073,a[2]=t2,a[3]=((C_word)li264),tmp=(C_word)a,a+=4,tmp);
/* call-with-current-continuation */
-t6=*((C_word*)lf[207]+1);
+t6=*((C_word*)lf[199]+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){
+/* a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10073(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -5952,15 +5563,15 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_10073,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10079,a[2]=t2,a[3]=((C_word)li259),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10098,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li263),tmp=(C_word)a,a+=5,tmp);
/* with-exception-handler */
-t5=*((C_word*)lf[356]+1);
+t5=*((C_word*)lf[354]+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){
+/* a10097 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10098(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -5969,14 +5580,14 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_10098,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10104,a[2]=((C_word*)t0)[3],a[3]=((C_word)li260),tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10110,a[2]=((C_word*)t0)[2],a[3]=((C_word)li262),tmp=(C_word)a,a+=4,tmp);
/* ##sys#call-with-values */
C_call_with_values(4,0,t1,t2,t3);}
-/* 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,...){
+/* a10109 in a10097 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10110(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -5984,48 +5595,48 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_10110r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_10146r(t0,t1,t2);}}
+f_10110r(t0,t1,t2);}}
-static void C_ccall f_10146r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_10110r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a=C_alloc(4);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10152,a[2]=t2,a[3]=((C_word)li262),tmp=(C_word)a,a+=4,tmp);
-/* k27092714 */
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10116,a[2]=t2,a[3]=((C_word)li261),tmp=(C_word)a,a+=4,tmp);
+/* k27132718 */
t4=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-/* 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){
+/* a10115 in a10109 in a10097 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10116(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10152,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_10116,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){
+/* a10103 in a10097 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10104(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_10140,2,t0,t1);}
-/* eval.scm: 1734 thunk */
+C_save_and_reclaim((void*)tr2,(void*)f_10104,2,t0,t1);}
+/* eval.scm: 1692 thunk */
t2=((C_word*)t0)[2];
((C_proc2)C_retrieve_proc(t2))(2,t2,t1);}
-/* 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){
+/* a10078 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10079(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6033,14 +5644,14 @@ 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 */
+C_save_and_reclaim((void*)tr3,(void*)f_10079,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10085,a[2]=t2,a[3]=((C_word)li258),tmp=(C_word)a,a+=4,tmp);
+/* k27132718 */
t4=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
-/* 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){
+/* a10084 in a10078 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10085(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6048,61 +5659,61 @@ 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_save_and_reclaim((void*)tr2,(void*)f_10085,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10089,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1688 open-output-string */
+t3=*((C_word*)lf[28]+1);
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* 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){
+/* k10087 in a10084 in a10078 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10089(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10089,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10092,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1689 print-error-message */
+t3=*((C_word*)lf[353]+1);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],t1);}
-/* 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){
+/* k10090 in k10087 in a10084 in a10078 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10092(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_10092,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10096,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1690 get-output-string */
+t3=*((C_word*)lf[26]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k10094 in k10090 in k10087 in a10084 in a10078 in a10072 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10096(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=C_mutate(&lf[353] /* (set! last-error ...) */,t1);
+t2=C_mutate(&lf[351] /* (set! last-error ...) */,t1);
t3=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
-/* 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){
+/* k10066 in run-safe in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10068(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* g27122713 */
+/* g27162717 */
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){
+/* ##sys#user-read-hook in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9988(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -6111,34 +5722,34 @@ 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));
+C_save_and_reclaim((void*)tr4,(void*)f_9988,4,t0,t1,t2,t3);}
+t4=C_eqp(t2,C_make_character(44));
if(C_truep(t4)){
-t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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 */
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9998,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1659 read-char */
t6=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t3);}
else{
-/* eval.scm: 1713 old */
+/* eval.scm: 1671 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){
+/* k9996 in ##sys#user-read-hook in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9998(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9998,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10001,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1660 read */
t3=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[4]);}
-/* 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){
+/* k9999 in k9996 in ##sys#user-read-hook in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10001(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6148,20 +5759,20 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_10001,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10002,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word)li256),tmp=(C_word)a,a+=5,tmp);
+t3=C_i_nullp(t1);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10015,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
if(C_truep(t3)){
t5=t4;
-f_10051(t5,t3);}
+f_10015(t5,t3);}
else{
-t5=(C_word)C_i_listp(t1);
+t5=C_i_listp(t1);
t6=t4;
-f_10051(t6,(C_word)C_i_not(t5));}}
+f_10015(t6,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){
+/* k10013 in k9999 in k9996 in ##sys#user-read-hook in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_10015(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6169,51 +5780,51 @@ 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);}
+C_save_and_reclaim((void*)trf_10015,NULL,2,t0,t1);}
if(C_truep(t1)){
-/* eval.scm: 1705 err */
+/* eval.scm: 1663 err */
t2=((C_word*)t0)[5];
-f_10038(t2,((C_word*)t0)[4]);}
+f_10002(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);}
+t2=C_slot(((C_word*)t0)[3],C_fix(0));
+if(C_truep(C_i_symbolp(t2))){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10033,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1667 ##sys#hash-table-ref */
+t4=*((C_word*)lf[16]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,C_retrieve(lf[344]),t2);}
else{
-/* eval.scm: 1708 err */
+/* eval.scm: 1666 err */
t3=((C_word*)t0)[5];
-f_10038(t3,((C_word*)t0)[4]);}}}
+f_10002(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){
+/* k10031 in k10013 in k9999 in k9996 in ##sys#user-read-hook in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_10033(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(C_truep(t1)){
-t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
+t2=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]);}}
+/* eval.scm: 1670 ##sys#read-error */
+t2=*((C_word*)lf[348]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[350],((C_word*)t0)[2]);}}
-/* err in 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){
+/* err in k9999 in k9996 in ##sys#user-read-hook in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_10002(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_10002,NULL,2,t0,t1);}
+/* eval.scm: 1661 ##sys#read-error */
+t2=*((C_word*)lf[348]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,t1,((C_word*)t0)[3],lf[349],((C_word*)t0)[2]);}
-/* define-reader-ctor in 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){
+/* define-reader-ctor in k9975 in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9979(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -6221,14 +5832,14 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_9979,4,t0,t1,t2,t3);}
+t4=C_i_check_symbol_2(t2,lf[345]);
+/* eval.scm: 1651 ##sys#hash-table-set! */
+t5=*((C_word*)lf[17]+1);
+((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,C_retrieve(lf[344]),t2,t3);}
-/* repl in 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){
+/* repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9613(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6243,35 +5854,35 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9613,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9616,a[2]=((C_word)li241),tmp=(C_word)a,a+=3,tmp);
+t3=*((C_word*)lf[331]+1);
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=*((C_word*)lf[327]+1);
+t5=*((C_word*)lf[325]+1);
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=*((C_word*)lf[332]+1);
+t7=*((C_word*)lf[330]+1);
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_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);
+t9=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_9657,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t2,a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=t8,a[11]=t6,a[12]=t4,tmp=(C_word)a,a+=13,tmp);
+/* eval.scm: 1560 ##sys#error-handler */
+t10=*((C_word*)lf[335]+1);
((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,t9);}
-/* 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){
+/* k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9657(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[14],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9657,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_9660,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],tmp=(C_word)a,a+=14,tmp);
+/* eval.scm: 1561 ##sys#reset-handler */
+t3=*((C_word*)lf[343]+1);
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* 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){
+/* k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9660(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6289,25 +5900,25 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9660,2,t0,t1);}
t2=C_SCHEME_FALSE;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_retrieve(lf[33]);
+t4=C_retrieve(lf[30]);
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t9=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9662,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],tmp=(C_word)a,a+=5,tmp));
+t10=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9668,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],tmp=(C_word)a,a+=5,tmp));
+t11=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9677,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],a[6]=t8,a[7]=t3,a[8]=((C_word)li243),tmp=(C_word)a,a+=9,tmp);
+t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9742,a[2]=((C_word*)t0)[4],a[3]=t8,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t6,a[7]=((C_word)li252),tmp=(C_word)a,a+=8,tmp);
+t13=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9962,a[2]=t3,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=t4,a[7]=((C_word)li253),tmp=(C_word)a,a+=8,tmp);
+/* eval.scm: 1575 ##sys#dynamic-wind */
+t14=*((C_word*)lf[44]+1);
((C_proc5)(void*)(*((C_word*)t14+1)))(5,t14,((C_word*)t0)[2],t11,t12,t13);}
-/* 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){
+/* a9961 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9962(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6315,14 +5926,14 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9962,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9966,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1639 load-verbose */
t3=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[2])[1]);}
-/* 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){
+/* k9964 in a9961 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9966(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6330,24 +5941,24 @@ 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_save_and_reclaim((void*)tr2,(void*)f_9966,2,t0,t1);}
+t2=C_mutate((C_word*)lf[30]+1 /* (set! unbound-in-eval ...) */,((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9970,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1641 ##sys#error-handler */
+t4=*((C_word*)lf[335]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
-/* 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){
+/* k9968 in k9964 in a9961 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9970(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1684 ##sys#reset-handler */
-t2=*((C_word*)lf[345]+1);
+/* eval.scm: 1642 ##sys#reset-handler */
+t2=*((C_word*)lf[343]+1);
((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9742(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6357,15 +5968,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9742,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9748,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word)li251),tmp=(C_word)a,a+=9,tmp));
t5=((C_word*)t3)[1];
-f_9784(t5,t1);}
+f_9748(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){
+/* loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9748(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6374,16 +5985,16 @@ 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 */
+C_save_and_reclaim((void*)trf_9748,NULL,2,t0,t1);}
+t2=f_9662(((C_word*)((C_word*)t0)[7])[1]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9755,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9945,a[2]=((C_word*)t0)[3],a[3]=((C_word)li250),tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1598 call-with-current-continuation */
t5=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t5))(3,t5,t3,t4);}
-/* 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){
+/* a9944 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9945(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6391,14 +6002,14 @@ 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_save_and_reclaim((void*)tr3,(void*)f_9945,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9951,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li249),tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1600 ##sys#reset-handler */
+t4=*((C_word*)lf[343]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t3);}
-/* 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){
+/* a9950 in a9944 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9951(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6408,30 +6019,30 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9951,2,t0,t1);}
+t2=C_set_block_item(lf[190] /* read-error-with-line-number */,0,C_SCHEME_FALSE);
+t3=C_set_block_item(lf[342] /* enable-qualifiers */,0,C_SCHEME_TRUE);
+t4=f_9668(((C_word*)((C_word*)t0)[3])[1]);
+/* eval.scm: 1605 c */
t5=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t5))(3,t5,t1,C_SCHEME_FALSE);}
-/* 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){
+/* k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9755(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9755,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9758,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1606 ##sys#read-prompt-hook */
+t3=*((C_word*)lf[323]+1);
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* 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){
+/* k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9758(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6440,16 +6051,16 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_9758,2,t0,t1);}
+t2=C_retrieve(lf[317]);
t3=(C_truep(t2)?t2:((C_word*)t0)[5]);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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 */
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9764,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* g26032604 */
t5=t3;
((C_proc2)C_retrieve_proc(t5))(2,t5,t4);}
-/* 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){
+/* k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9764(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6458,49 +6069,49 @@ 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))){
+C_save_and_reclaim((void*)tr2,(void*)f_9764,2,t0,t1);}
+if(C_truep(C_eofp(t1))){
t2=C_SCHEME_UNDEFINED;
t3=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));}}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9773,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9943,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1609 ##sys#peek-char-0 */
+t4=*((C_word*)lf[341]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,*((C_word*)lf[331]+1));}}
-/* 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){
+/* k9941 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9943(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_eqp(C_make_character(10),t1);
+t2=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));}
+/* eval.scm: 1610 ##sys#read-char-0 */
+t3=*((C_word*)lf[340]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],*((C_word*)lf[331]+1));}
else{
t3=((C_word*)t0)[2];
-f_9809(2,t3,C_SCHEME_UNDEFINED);}}
+f_9773(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){
+/* k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9773(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9773,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9776,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1611 ##sys#clear-trace-buffer */
+t3=*((C_word*)lf[326]+1);
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* 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){
+/* k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9776(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6509,15 +6120,15 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9776,2,t0,t1);}
+t2=C_set_block_item(lf[30] /* unbound-in-eval */,0,C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9782,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word)li244),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9791,a[2]=((C_word*)t0)[3],a[3]=((C_word)li248),tmp=(C_word)a,a+=4,tmp);
/* ##sys#call-with-values */
C_call_with_values(4,0,((C_word*)t0)[2],t3,t4);}
-/* 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,...){
+/* a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9791(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -6525,13 +6136,13 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_9791r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_9827r(t0,t1,t2);}}
+f_9791r(t0,t1,t2);}}
-static void C_ccall f_9827r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_9791r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6540,20 +6151,20 @@ 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);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9795,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+t4=(C_truep(C_retrieve(lf[336]))?C_i_pairp(C_retrieve(lf[30])):C_SCHEME_FALSE);
if(C_truep(t4)){
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9845,a[2]=t6,a[3]=((C_word)li248),tmp=(C_word)a,a+=4,tmp));
+t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9809,a[2]=t6,a[3]=((C_word)li247),tmp=(C_word)a,a+=4,tmp));
t8=((C_word*)t6)[1];
-f_9845(t8,t3,C_retrieve(lf[33]),C_SCHEME_END_OF_LIST);}
+f_9809(t8,t3,C_retrieve(lf[30]),C_SCHEME_END_OF_LIST);}
else{
t5=t3;
-f_9831(2,t5,C_SCHEME_UNDEFINED);}}
+f_9795(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){
+/* loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9809(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -6562,25 +6173,25 @@ 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));}
+C_save_and_reclaim((void*)trf_9809,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9813,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_i_nullp(t2))){
+if(C_truep(C_i_pairp(t3))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9825,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1618 ##sys#print */
+t6=*((C_word*)lf[320]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[339],C_SCHEME_FALSE,*((C_word*)lf[330]+1));}
else{
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_fix(9));}}
else{
-t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9930,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1632 caar */
+t6=*((C_word*)lf[37]+1);
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}}
-/* 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){
+/* k9928 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9930(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6589,28 +6200,28 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9930,2,t0,t1);}
+t2=C_i_memq(t1,((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9897,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
if(C_truep(t2)){
t4=t3;
-f_9933(2,t4,t2);}
+f_9897(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);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9926,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1633 caar */
+t5=*((C_word*)lf[37]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[4]);}}
-/* 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){
+/* k9924 in k9928 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9926(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 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);}
+/* eval.scm: 1633 ##sys#symbol-has-toplevel-binding? */
+((C_proc3)C_retrieve_symbol_proc(lf[49]))(3,*((C_word*)lf[49]+1),((C_word*)t0)[2],t1);}
-/* 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){
+/* k9895 in k9928 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9897(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6620,22 +6231,22 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9897,2,t0,t1);}
if(C_truep(t1)){
-t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
-/* eval.scm: 1676 loop */
+t2=C_i_cdr(((C_word*)t0)[5]);
+/* eval.scm: 1634 loop */
t3=((C_word*)((C_word*)t0)[4])[1];
-f_9845(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
+f_9809(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 */
+t2=C_i_cdr(((C_word*)t0)[5]);
+t3=C_i_car(((C_word*)t0)[5]);
+t4=C_a_i_cons(&a,2,t3,((C_word*)t0)[2]);
+/* eval.scm: 1635 loop */
t5=((C_word*)((C_word*)t0)[4])[1];
-f_9845(t5,((C_word*)t0)[3],t2,t4);}}
+f_9809(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){
+/* k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9825(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6645,16 +6256,16 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9825,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9828,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9869,a[2]=t4,a[3]=((C_word)li247),tmp=(C_word)a,a+=4,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9833,a[2]=t4,a[3]=((C_word)li246),tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
-f_9869(t6,t2,((C_word*)t0)[2]);}
+f_9833(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){
+/* loop2641 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9833(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6664,21 +6275,21 @@ 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));}
+C_save_and_reclaim((void*)trf_9833,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9877,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=C_slot(t2,C_fix(0));
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9845,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1623 ##sys#print */
+t6=*((C_word*)lf[320]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[338],C_SCHEME_FALSE,*((C_word*)lf[330]+1));}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k9843 in loop2641 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9845(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6686,15 +6297,15 @@ 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));}
+C_save_and_reclaim((void*)tr2,(void*)f_9845,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9848,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=C_i_car(((C_word*)t0)[2]);
+/* eval.scm: 1624 ##sys#print */
+t4=*((C_word*)lf[320]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,t3,C_SCHEME_TRUE,*((C_word*)lf[330]+1));}
-/* 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){
+/* k9846 in k9843 in loop2641 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9848(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6702,20 +6313,20 @@ 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));}
+C_save_and_reclaim((void*)tr2,(void*)f_9848,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9851,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_i_cdr(((C_word*)t0)[2]))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9860,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1626 ##sys#print */
+t4=*((C_word*)lf[320]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,lf[337],C_SCHEME_FALSE,*((C_word*)lf[330]+1));}
else{
-/* eval.scm: 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));}}
+/* eval.scm: 1629 ##sys#write-char-0 */
+t3=*((C_word*)lf[319]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],C_make_character(10),*((C_word*)lf[330]+1));}}
-/* 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){
+/* k9858 in k9846 in k9843 in loop2641 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9860(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6723,60 +6334,60 @@ 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));}
+C_save_and_reclaim((void*)tr2,(void*)f_9860,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9863,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=C_i_cdr(((C_word*)t0)[2]);
+/* eval.scm: 1627 ##sys#print */
+t4=*((C_word*)lf[320]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,t3,C_SCHEME_TRUE,*((C_word*)lf[330]+1));}
-/* 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){
+/* k9861 in k9858 in k9846 in k9843 in loop2641 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9863(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 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));}
+/* eval.scm: 1628 ##sys#write-char-0 */
+t2=*((C_word*)lf[319]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_make_character(41),*((C_word*)lf[330]+1));}
-/* 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){
+/* k9849 in k9846 in k9843 in loop2641 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9851(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 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));}
+/* eval.scm: 1629 ##sys#write-char-0 */
+t2=*((C_word*)lf[319]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_make_character(10),*((C_word*)lf[330]+1));}
-/* 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){
+/* k9875 in loop2641 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9877(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_9833(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){
+/* k9826 in k9823 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9828(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 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));}
+/* eval.scm: 1631 ##sys#flush-output */
+t2=*((C_word*)lf[324]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],*((C_word*)lf[330]+1));}
-/* 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){
+/* k9811 in loop in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9813(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(9));}
-/* 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){
+/* k9793 in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9795(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6787,40 +6398,40 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9795,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9798,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t3=((C_word*)t0)[2];
-t4=(C_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);
+t4=C_i_nullp(t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9638,a[2]=t3,a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
if(C_truep(t4)){
t6=t5;
-f_9674(t6,t4);}
+f_9638(t6,t4);}
else{
-t6=(C_word)C_i_car(t3);
+t6=C_i_car(t3);
t7=t5;
-f_9674(t7,(C_word)C_eqp(C_SCHEME_UNDEFINED,t6));}}
+f_9638(t7,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){
+/* k9636 in k9793 in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9638(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9674,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_9638,NULL,2,t0,t1);}
if(C_truep(t1)){
-/* eval.scm: 1679 loop */
+/* eval.scm: 1637 loop */
t2=((C_word*)((C_word*)t0)[5])[1];
-f_9784(t2,((C_word*)t0)[4]);}
+f_9748(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);
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9643,a[2]=((C_word)li245),tmp=(C_word)a,a+=3,tmp);
/* for-each */
-t3=*((C_word*)lf[268]+1);
+t3=*((C_word*)lf[260]+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){
+/* a9642 in k9636 in k9793 in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9643(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -6828,23 +6439,23 @@ 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 */
+C_save_and_reclaim((void*)tr3,(void*)f_9643,3,t0,t1,t2);}
+t3=C_retrieve(lf[318]);
+/* g25662567 */
t4=t3;
-((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,*((C_word*)lf[327]+1));}
+((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,*((C_word*)lf[325]+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){
+/* k9796 in k9793 in a9790 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9798(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1679 loop */
+/* eval.scm: 1637 loop */
t2=((C_word*)((C_word*)t0)[3])[1];
-f_9784(t2,((C_word*)t0)[2]);}
+f_9748(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){
+/* a9781 in k9774 in k9771 in k9762 in k9756 in k9753 in loop in a9741 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9782(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6852,19 +6463,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9782,2,t0,t1);}
+t2=*((C_word*)lf[315]+1);
if(C_truep(t2)){
-/* g26122613 */
+/* g26162617 */
t3=t2;
((C_proc3)C_retrieve_proc(t3))(3,t3,t1,((C_word*)t0)[3]);}
else{
-/* g26122613 */
+/* g26162617 */
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){
+/* a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9677(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6872,14 +6483,14 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9677,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9682,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+/* eval.scm: 1577 load-verbose */
t3=((C_word*)t0)[2];
((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-/* 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){
+/* k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9682(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6887,29 +6498,29 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9682,2,t0,t1);}
t2=C_mutate(((C_word *)((C_word*)t0)[8])+1,t1);
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9685,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+/* eval.scm: 1578 load-verbose */
t4=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t4))(3,t4,t3,C_SCHEME_TRUE);}
-/* 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){
+/* k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9685(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_9685,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9690,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word)li242),tmp=(C_word)a,a+=7,tmp);
+/* eval.scm: 1579 ##sys#error-handler */
+t3=*((C_word*)lf[335]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],t2);}
-/* 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,...){
+/* a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9690(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -6918,26 +6529,26 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_9690r,3,t0,t1,t2);}
else{
a=C_alloc((c-3)*3);
t3=C_restore_rest(a,C_rest_count(0));
-f_9726r(t0,t1,t2,t3);}}
+f_9690r(t0,t1,t2,t3);}}
-static void C_ccall f_9726r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_9690r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word *a=C_alloc(8);
-t4=f_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));}
+t4=f_9668(((C_word*)((C_word*)t0)[5])[1]);
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9697,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=t1,a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
+/* eval.scm: 1582 ##sys#print */
+t6=*((C_word*)lf[320]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[334],C_SCHEME_FALSE,*((C_word*)lf[330]+1));}
-/* 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){
+/* k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9697(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6945,28 +6556,28 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_9697,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9700,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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));}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9737,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1584 ##sys#print */
+t4=*((C_word*)lf[320]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,lf[333],C_SCHEME_FALSE,*((C_word*)lf[330]+1));}
else{
t3=t2;
-f_9736(2,t3,C_SCHEME_UNDEFINED);}}
+f_9700(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){
+/* k9735 in k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9737(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 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));}
+/* eval.scm: 1585 ##sys#print */
+t2=*((C_word*)lf[320]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE,*((C_word*)lf[330]+1));}
-/* 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){
+/* k9698 in k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9700(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6975,19 +6586,19 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_9700,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9703,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9712,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_i_pairp(((C_word*)t0)[2]))){
+t4=C_i_cdr(((C_word*)t0)[2]);
t5=t3;
-f_9748(t5,(C_word)C_i_nullp(t4));}
+f_9712(t5,C_i_nullp(t4));}
else{
t4=t3;
-f_9748(t4,C_SCHEME_FALSE);}}
+f_9712(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){
+/* k9710 in k9698 in k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9712(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -6995,99 +6606,99 @@ 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);}
+C_save_and_reclaim((void*)trf_9712,NULL,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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));}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9715,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1588 ##sys#print */
+t3=*((C_word*)lf[320]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[332],C_SCHEME_FALSE,*((C_word*)lf[330]+1));}
else{
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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));}}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9721,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1591 ##sys#write-char-0 */
+t3=*((C_word*)lf[319]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(10),*((C_word*)lf[330]+1));}}
-/* 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){
+/* k9719 in k9710 in k9698 in k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9721(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1634 write-err */
-f_9652(((C_word*)t0)[3],((C_word*)t0)[2]);}
+/* eval.scm: 1592 write-err */
+f_9616(((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){
+/* k9713 in k9710 in k9698 in k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9715(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1631 write-err */
-f_9652(((C_word*)t0)[3],((C_word*)t0)[2]);}
+/* eval.scm: 1589 write-err */
+f_9616(((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){
+/* k9701 in k9698 in k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9703(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9703,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9706,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1593 print-call-chain */
t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,*((C_word*)lf[332]+1));}
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,*((C_word*)lf[330]+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){
+/* k9704 in k9701 in k9698 in k9695 in a9689 in k9683 in k9680 in a9676 in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9706(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1636 flush-output */
+/* eval.scm: 1594 flush-output */
t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],*((C_word*)lf[332]+1));}
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],*((C_word*)lf[330]+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){
+/* resetports in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static C_word C_fcall f_9668(C_word t0){
C_word tmp;
C_word t1;
C_word t2;
C_word t3;
C_word t4;
C_stack_check;
-t1=C_mutate((C_word*)lf[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]);
+t1=C_mutate((C_word*)lf[331]+1 /* (set! standard-input ...) */,((C_word*)((C_word*)t0)[4])[1]);
+t2=C_mutate((C_word*)lf[325]+1 /* (set! standard-output ...) */,((C_word*)((C_word*)t0)[3])[1]);
+t3=C_mutate((C_word*)lf[330]+1 /* (set! standard-error ...) */,((C_word*)((C_word*)t0)[2])[1]);
return(t3);}
-/* saveports in 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){
+/* saveports in k9658 in k9655 in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static C_word C_fcall f_9662(C_word t0){
C_word tmp;
C_word t1;
C_word t2;
C_word t3;
C_word t4;
C_stack_check;
-t1=C_mutate(((C_word *)((C_word*)t0)[4])+1,*((C_word*)lf[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));
+t1=C_mutate(((C_word *)((C_word*)t0)[4])+1,*((C_word*)lf[331]+1));
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,*((C_word*)lf[325]+1));
+t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,*((C_word*)lf[330]+1));
return(t3);}
-/* write-err in repl in 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){
+/* write-err in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9616(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);
+C_save_and_reclaim((void*)trf_9616,NULL,2,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9622,a[2]=((C_word)li240),tmp=(C_word)a,a+=3,tmp);
/* for-each */
-t4=*((C_word*)lf[268]+1);
+t4=*((C_word*)lf[260]+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){
+/* a9621 in write-err in repl in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9622(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7095,26 +6706,26 @@ 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 */
+C_save_and_reclaim((void*)tr3,(void*)f_9622,3,t0,t1,t2);}
+t3=C_retrieve(lf[318]);
+/* g25432544 */
t4=t3;
-((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,*((C_word*)lf[332]+1));}
+((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,*((C_word*)lf[330]+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){
+/* ##sys#clear-trace-buffer in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9610(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9646,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_9610,2,t0,t1);}
t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)stub2508(C_SCHEME_UNDEFINED));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,stub2512(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){
+/* ##sys#read-prompt-hook in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9594(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7123,47 +6734,47 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9594,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9598,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9605,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1535 repl-prompt */
t4=((C_word*)t0)[2];
((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-/* 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){
+/* k9603 in ##sys#read-prompt-hook in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9605(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9605,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9608,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* g25092510 */
t3=t1;
((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-/* 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){
+/* k9606 in k9603 in ##sys#read-prompt-hook in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9608(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 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));}
+/* eval.scm: 1535 ##sys#print */
+t2=*((C_word*)lf[320]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],t1,C_SCHEME_FALSE,*((C_word*)lf[325]+1));}
-/* 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){
+/* k9596 in ##sys#read-prompt-hook in k9590 in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9598(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 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));}
+/* eval.scm: 1536 ##sys#flush-output */
+t2=*((C_word*)lf[324]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],*((C_word*)lf[325]+1));}
-/* ##sys#repl-print-hook in 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){
+/* ##sys#repl-print-hook in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9575(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -7172,15 +6783,15 @@ 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);}
+C_save_and_reclaim((void*)tr4,(void*)f_9575,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9579,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9584,a[2]=t3,a[3]=t2,a[4]=((C_word)li236),tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1527 ##sys#with-print-length-limit */
+t6=*((C_word*)lf[321]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,C_retrieve(lf[316]),t5);}
-/* 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){
+/* a9583 in ##sys#repl-print-hook in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9584(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7188,23 +6799,23 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9584,2,t0,t1);}
+t2=*((C_word*)lf[320]+1);
+/* g25052506 */
t3=t2;
((C_proc5)C_retrieve_proc(t3))(5,t3,t1,((C_word*)t0)[3],C_SCHEME_TRUE,((C_word*)t0)[2]);}
-/* 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){
+/* k9577 in ##sys#repl-print-hook in k9568 in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9579(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1570 ##sys#write-char-0 */
-t2=*((C_word*)lf[321]+1);
+/* eval.scm: 1528 ##sys#write-char-0 */
+t2=*((C_word*)lf[319]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],C_make_character(10),((C_word*)t0)[2]);}
-/* ##sys#display-times in 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){
+/* ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9515(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7213,29 +6824,29 @@ 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 */
+C_save_and_reclaim((void*)tr3,(void*)f_9515,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9519,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+t4=C_slot(t2,C_fix(0));
+/* eval.scm: 1501 display-rj */
t5=((C_word*)t0)[2];
-f_9530(t5,t3,t4,C_fix(8));}
+f_9494(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){
+/* k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9519(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9519,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9522,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1502 display */
t3=((C_word*)t0)[5];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[316]);}
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[314]);}
-/* 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){
+/* k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9522(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7243,29 +6854,29 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9522,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9525,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=C_slot(((C_word*)t0)[3],C_fix(1));
+/* eval.scm: 1503 display-rj */
t4=((C_word*)t0)[2];
-f_9530(t4,t2,t3,C_fix(8));}
+f_9494(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){
+/* k9523 in k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9525(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9525,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9528,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1504 display */
t3=((C_word*)t0)[5];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[315]);}
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[313]);}
-/* 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){
+/* k9526 in k9523 in k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9528(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7273,29 +6884,29 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9528,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9531,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=C_slot(((C_word*)t0)[3],C_fix(2));
+/* eval.scm: 1505 display-rj */
t4=((C_word*)t0)[2];
-f_9530(t4,t2,t3,C_fix(8));}
+f_9494(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){
+/* k9529 in k9526 in k9523 in k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9531(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9531,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9534,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1506 display */
t3=((C_word*)t0)[5];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[314]);}
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[312]);}
-/* 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){
+/* k9532 in k9529 in k9526 in k9523 in k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9534(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7303,29 +6914,29 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9534,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9537,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=C_slot(((C_word*)t0)[3],C_fix(3));
+/* eval.scm: 1507 display-rj */
t4=((C_word*)t0)[2];
-f_9530(t4,t2,t3,C_fix(8));}
+f_9494(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){
+/* k9535 in k9532 in k9529 in k9526 in k9523 in k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9537(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9537,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9540,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1508 display */
t3=((C_word*)t0)[5];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[313]);}
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[311]);}
-/* 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){
+/* k9538 in k9535 in k9532 in k9529 in k9526 in k9523 in k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9540(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7333,41 +6944,41 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9540,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9543,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t3=C_slot(((C_word*)t0)[3],C_fix(4));
+/* eval.scm: 1509 display-rj */
t4=((C_word*)t0)[2];
-f_9530(t4,t2,t3,C_fix(8));}
+f_9494(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){
+/* k9541 in k9538 in k9535 in k9532 in k9529 in k9526 in k9523 in k9520 in k9517 in ##sys#display-times in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9543(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1552 display */
+/* eval.scm: 1510 display */
t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],lf[312]);}
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],lf[310]);}
-/* 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){
+/* display-rj in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9494(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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))){
+C_save_and_reclaim((void*)trf_9494,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9498,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_i_zerop(t2))){
t5=t4;
-f_9534(2,t5,lf[311]);}
+f_9498(2,t5,lf[309]);}
else{
-/* eval.scm: 1538 number->string */
+/* eval.scm: 1496 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){
+/* k9496 in display-rj in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9498(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7376,25 +6987,25 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9498,2,t0,t1);}
+t2=C_block_size(t1);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9501,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+t4=C_fixnum_difference(((C_word*)t0)[3],t2);
+/* eval.scm: 1498 spaces */
t5=((C_word*)t0)[2];
-f_9506(t5,t3,t4);}
+f_9470(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){
+/* k9499 in k9496 in display-rj in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9501(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1541 display */
+/* eval.scm: 1499 display */
t2=((C_word*)t0)[4];
((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* spaces in 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){
+/* spaces in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9470(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7403,15 +7014,15 @@ 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);}
+C_save_and_reclaim((void*)trf_9470,NULL,3,t0,t1,t2);}
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9512,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word)li233),tmp=(C_word)a,a+=5,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9476,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word)li232),tmp=(C_word)a,a+=5,tmp));
t6=((C_word*)t4)[1];
-f_9512(t6,t1,t2);}
+f_9476(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){
+/* doloop2474 in spaces in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9476(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7419,29 +7030,29 @@ 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)))){
+C_save_and_reclaim((void*)trf_9476,NULL,3,t0,t1,t2);}
+if(C_truep(C_fixnum_less_or_equal_p(t2,C_fix(0)))){
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9522,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 1535 display */
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9486,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1493 display */
t4=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t4))(3,t4,t3,C_make_character(32));}}
-/* 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){
+/* k9484 in doloop2474 in spaces in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9486(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_9476(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,...){
+/* ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9321(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
C_word tmp;
C_word t4;
va_list v;
@@ -7450,34 +7061,34 @@ 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);}
+C_save_and_reclaim((void*)tr4r,(void*)f_9321r,4,t0,t1,t2,t3);}
else{
a=C_alloc((c-4)*3);
t4=C_restore_rest(a,C_rest_count(0));
-f_9357r(t0,t1,t2,t3,t4);}}
+f_9321r(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){
+static void C_ccall f_9321r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word *a=C_alloc(7);
-t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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))){
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9325,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,a[5]=t3,a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
+if(C_truep(C_i_nullp(t4))){
t6=t5;
-f_9361(2,t6,C_SCHEME_FALSE);}
+f_9325(2,t6,C_SCHEME_FALSE);}
else{
-t6=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t6))){
+t6=C_i_cdr(t4);
+if(C_truep(C_i_nullp(t6))){
t7=t5;
-f_9361(2,t7,(C_word)C_i_car(t4));}
+f_9325(2,t7,C_i_car(t4));}
else{
/* ##sys#error */
-t7=*((C_word*)lf[14]+1);
+t7=*((C_word*)lf[11]+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){
+/* k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9325(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7490,20 +7101,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9325,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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 */
+t6=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9327,a[2]=t3,a[3]=((C_word*)t0)[6],a[4]=((C_word)li228),tmp=(C_word)a,a+=5,tmp));
+t7=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9362,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=((C_word)li229),tmp=(C_word)a,a+=5,tmp));
+t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9392,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+/* eval.scm: 1469 test */
t9=((C_word*)t5)[1];
-f_9398(t9,t8,((C_word*)t0)[3]);}
+f_9362(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){
+/* k9390 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9392(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7512,57 +7123,57 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9392,2,t0,t1);}
if(C_truep(t1)){
t2=t1;
t3=((C_word*)t0)[6];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9402,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
if(C_truep(((C_word*)t0)[2])){
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9475,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 1515 ##sys#repository-path */
-t4=*((C_word*)lf[249]+1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9439,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1473 ##sys#repository-path */
+t4=*((C_word*)lf[241]+1);
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
t3=t2;
-f_9438(2,t3,C_retrieve(lf[256]));}}}
+f_9402(2,t3,C_retrieve(lf[248]));}}}
-/* 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){
+/* k9437 in k9390 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9439(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9475,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_9439,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9449,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1475 ##sys#repository-path */
+t3=*((C_word*)lf[241]+1);
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-/* eval.scm: 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);}}
+/* eval.scm: 1471 ##sys#append */
+t2=*((C_word*)lf[68]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_retrieve(lf[248]),C_SCHEME_END_OF_LIST);}}
-/* 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){
+/* k9447 in k9437 in k9390 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9449(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9449,2,t0,t1);}
+t2=C_a_i_list(&a,1,t1);
+/* eval.scm: 1471 ##sys#append */
+t3=*((C_word*)lf[68]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],C_retrieve(lf[248]),t2);}
-/* 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){
+/* k9400 in k9390 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9402(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7571,15 +7182,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9402,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9404,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=((C_word)li230),tmp=(C_word)a,a+=7,tmp));
t5=((C_word*)t3)[1];
-f_9440(t5,((C_word*)t0)[2],t1);}
+f_9404(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){
+/* loop in k9400 in k9390 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9404(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7590,31 +7201,31 @@ 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);
+C_save_and_reclaim((void*)trf_9404,NULL,3,t0,t1,t2);}
+t3=C_eqp(t2,C_SCHEME_END_OF_LIST);
if(C_truep(t3)){
t4=((C_word*)t0)[5];
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
else{
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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 */
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9414,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9428,a[2]=t4,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t6=C_slot(t2,C_fix(0));
+/* eval.scm: 1479 string-append */
t7=((C_word*)t0)[2];
-((C_proc5)C_retrieve_proc(t7))(5,t7,t5,t6,lf[310],((C_word*)t0)[5]);}}
+((C_proc5)C_retrieve_proc(t7))(5,t7,t5,t6,lf[308],((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){
+/* k9426 in loop in k9400 in k9390 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9428(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1521 test */
+/* eval.scm: 1479 test */
t2=((C_word*)((C_word*)t0)[3])[1];
-f_9398(t2,((C_word*)t0)[2],t1);}
+f_9362(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){
+/* k9412 in loop in k9400 in k9390 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9414(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7623,13 +7234,13 @@ 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 */
+t2=C_slot(((C_word*)t0)[3],C_fix(1));
+/* eval.scm: 1482 loop */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_9440(t3,((C_word*)t0)[4],t2);}}
+f_9404(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){
+/* test in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9362(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7637,15 +7248,15 @@ 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 */
+C_save_and_reclaim((void*)trf_9362,NULL,3,t0,t1,t2);}
+t3=C_fudge(C_fix(24));
+t4=(C_truep(t3)?(C_truep(((C_word*)t0)[3])?C_a_i_list(&a,2,lf[7],C_retrieve(lf[208])):C_a_i_list(&a,2,C_retrieve(lf[208]),lf[7])):C_a_i_list(&a,1,lf[7]));
+/* eval.scm: 1464 test2 */
t5=((C_word*)((C_word*)t0)[2])[1];
-f_9363(t5,t1,t2,t4);}
+f_9327(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){
+/* test2 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9327(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -7654,33 +7265,33 @@ 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);}
+C_save_and_reclaim((void*)trf_9327,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t3))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9340,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1458 exists? */
+f_9302(t4,t2);}
else{
-t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9343,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=t3,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+t5=C_i_car(t3);
+/* eval.scm: 1459 ##sys#string-append */
+t6=*((C_word*)lf[10]+1);
((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,t2,t5);}}
-/* 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){
+/* k9341 in test2 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9343(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9343,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9349,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
+/* eval.scm: 1460 exists? */
+f_9302(t2,t1);}
-/* 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){
+/* k9347 in k9341 in test2 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9349(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -7689,62 +7300,62 @@ 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 */
+t2=C_i_cdr(((C_word*)t0)[4]);
+/* eval.scm: 1462 test2 */
t3=((C_word*)((C_word*)t0)[3])[1];
-f_9363(t3,((C_word*)t0)[6],((C_word*)t0)[2],t2);}}
+f_9327(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){
+/* k9338 in test2 in k9323 in ##sys#resolve-include-filename in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9340(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_truep(t1)?((C_word*)t0)[2]:C_SCHEME_FALSE));}
-/* exists? in 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){
+/* exists? in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9302(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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_save_and_reclaim((void*)trf_9302,NULL,2,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9306,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1453 ##sys#file-info */
+t4=*((C_word*)lf[207]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
-/* 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){
+/* k9304 in exists? in k9294 in k9290 in k9287 in k9283 in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9306(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
if(C_truep(t1)){
-t2=(C_word)C_slot(t1,C_fix(4));
-t3=(C_word)C_eqp(C_fix(1),t2);
+t2=C_slot(t1,C_fix(4));
+t3=C_eqp(C_fix(1),t2);
t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_not(t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_i_not(t3));}
else{
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-/* initb in 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){
+/* initb in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9269(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_9305,NULL,2,t1,t2);}
+C_save_and_reclaim((void*)trf_9269,NULL,2,t1,t2);}
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9307,a[2]=t2,a[3]=((C_word)li226),tmp=(C_word)a,a+=4,tmp));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9271,a[2]=t2,a[3]=((C_word)li225),tmp=(C_word)a,a+=4,tmp));}
-/* f_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){
+/* f_9271 in initb in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9271(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7752,24 +7363,24 @@ 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_save_and_reclaim((void*)tr3,(void*)f_9271,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9275,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1414 ##sys#hash-table-location */
+t4=*((C_word*)lf[21]+1);
((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[2],t2,C_SCHEME_TRUE);}
-/* k9309 */
-static void C_ccall f_9311(C_word c,C_word t0,C_word t1){
+/* k9273 */
+static void C_ccall f_9275(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(0));
+t2=C_slot(((C_word*)t0)[3],C_fix(0));
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_setslot(t1,C_fix(1),t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,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,...){
+/* null-environment in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9231(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -7778,72 +7389,72 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_9231r,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);}}
+t3=C_restore_rest(a,C_rest_count(0));
+f_9231r(t0,t1,t2,t3);}}
-static void C_ccall f_9267r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_9231r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a=C_alloc(5);
-t4=(C_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));
+t4=C_i_check_exact_2(t2,lf[305]);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9238,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+t6=C_fixnum_lessp(t2,C_fix(4));
if(C_truep(t6)){
if(C_truep(t6)){
-/* eval.scm: 1447 ##sys#error */
-t7=*((C_word*)lf[14]+1);
-((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[307],lf[308],t2);}
+/* eval.scm: 1405 ##sys#error */
+t7=*((C_word*)lf[11]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[305],lf[306],t2);}
else{
t7=t5;
-f_9274(2,t7,C_SCHEME_UNDEFINED);}}
+f_9238(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);}
+if(C_truep(C_fixnum_greaterp(t2,C_fix(5)))){
+/* eval.scm: 1405 ##sys#error */
+t7=*((C_word*)lf[11]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[305],lf[306],t2);}
else{
t7=t5;
-f_9274(2,t7,C_SCHEME_UNDEFINED);}}}
+f_9238(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){
+/* k9236 in null-environment in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9238(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_9238,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9245,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1408 make-vector */
t3=((C_word*)t0)[2];
((C_proc4)C_retrieve_proc(t3))(4,t3,t2,C_fix(301),C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k9243 in k9236 in null-environment in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9245(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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));
+C_save_and_reclaim((void*)tr2,(void*)f_9245,2,t0,t1);}
+if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
+t2=C_i_car(((C_word*)t0)[3]);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,3,lf[297],t1,t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_record(&a,3,lf[295],t1,t2));}
else{
t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_record(&a,3,lf[297],t1,C_SCHEME_FALSE));}}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_record(&a,3,lf[295],t1,C_SCHEME_FALSE));}}
-/* scheme-report-environment in 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,...){
+/* scheme-report-environment in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9187(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -7852,13 +7463,13 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_9187r,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);}}
+t3=C_restore_rest(a,C_rest_count(0));
+f_9187r(t0,t1,t2,t3);}}
-static void C_ccall f_9223r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_9187r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -7868,62 +7479,62 @@ 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);
+t4=C_i_check_exact_2(t2,lf[302]);
+t5=C_i_pairp(t3);
+t6=(C_truep(t5)?C_i_car(t3):C_SCHEME_FALSE);
t7=t2;
switch(t7){
case C_fix(4):
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9207,a[2]=t6,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1396 ##sys#copy-env-table */
+t9=*((C_word*)lf[298]+1);
+((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,C_retrieve2(lf[293],"r4rs-environment"),C_SCHEME_TRUE,t6);
case C_fix(5):
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9220,a[2]=t6,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1397 ##sys#copy-env-table */
+t9=*((C_word*)lf[298]+1);
+((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,C_retrieve2(lf[294],"r5rs-environment"),C_SCHEME_TRUE,t6);
default:
-/* eval.scm: 1440 ##sys#error */
-t8=*((C_word*)lf[14]+1);
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t1,lf[304],lf[305],t2);}}
+/* eval.scm: 1398 ##sys#error */
+t8=*((C_word*)lf[11]+1);
+((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t1,lf[302],lf[303],t2);}}
-/* 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){
+/* k9218 in scheme-report-environment in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9220(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9256,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_9220,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_record(&a,3,lf[297],t1,((C_word*)t0)[2]));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_record(&a,3,lf[295],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){
+/* k9205 in scheme-report-environment in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9207(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9243,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_9207,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_record(&a,3,lf[297],t1,((C_word*)t0)[2]));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_a_i_record(&a,3,lf[295],t1,((C_word*)t0)[2]));}
-/* interaction-environment in 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){
+/* interaction-environment in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9184(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9220,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_9184,2,t0,t1);}
t2=t1;
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_retrieve2(lf[298],"interaction-environment"));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_retrieve2(lf[296],"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,...){
+/* ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9065(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -7932,13 +7543,13 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_9065r,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);}}
+t3=C_restore_rest(a,C_rest_count(0));
+f_9065r(t0,t1,t2,t3);}}
-static void C_ccall f_9101r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_9065r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -7954,27 +7565,27 @@ 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));
+t4=C_i_check_structure(t2,lf[295]);
+t5=C_i_pairp(t3);
+t6=(C_truep(t5)?C_i_car(t3):C_SCHEME_FALSE);
+t7=C_slot(t2,C_fix(1));
if(C_truep(t7)){
-t8=(C_word)C_i_vector_length(t7);
+t8=C_i_vector_length(t7);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
-t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9086,a[2]=t6,a[3]=t7,a[4]=t10,a[5]=t8,a[6]=((C_word)li219),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
-f_9122(t12,t1,C_fix(0),C_SCHEME_END_OF_LIST);}
+f_9086(t12,t1,C_fix(0),C_SCHEME_END_OF_LIST);}
else{
t8=C_SCHEME_END_OF_LIST;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);}}
+t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9157,a[2]=t1,a[3]=t9,tmp=(C_word)a,a+=4,tmp);
+t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9159,a[2]=t9,a[3]=t6,a[4]=((C_word)li220),tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1383 ##sys#walk-namespace */
+((C_proc3)C_retrieve_symbol_proc(lf[300]))(3,*((C_word*)lf[300]+1),t10,t11);}}
-/* 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){
+/* a9158 in ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9159(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -7983,19 +7594,19 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_9159,3,t0,t1,t2);}
+t3=C_i_not(((C_word*)t0)[3]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9169,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
if(C_truep(t3)){
t5=t4;
-f_9205(2,t5,t3);}
+f_9169(2,t5,t3);}
else{
-/* eval.scm: 1427 pred */
+/* eval.scm: 1385 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){
+/* k9167 in a9158 in ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9169(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8004,9 +7615,9 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9169,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]);
+t2=C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)((C_word*)t0)[3])[1]);
t3=C_mutate(((C_word *)((C_word*)t0)[3])+1,t2);
t4=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
@@ -8015,8 +7626,8 @@ 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){
+/* k9155 in ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9157(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8025,8 +7636,8 @@ 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){
+/* doloop2333 in ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9086(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -8039,23 +7650,23 @@ 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]))){
+C_save_and_reclaim((void*)trf_9086,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[5]))){
t4=t3;
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
else{
-t4=(C_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);
+t4=C_fixnum_plus(t2,C_fix(1));
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9104,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+t6=C_i_vector_ref(((C_word*)t0)[3],t2);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9146,a[2]=t8,a[3]=((C_word*)t0)[2],a[4]=((C_word)li219),tmp=(C_word)a,a+=5,tmp));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9110,a[2]=t8,a[3]=((C_word*)t0)[2],a[4]=((C_word)li218),tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
-f_9146(t10,t5,t6,t3);}}
+f_9110(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){
+/* loop in doloop2333 in ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9110(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -8066,26 +7677,26 @@ 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))){
+C_save_and_reclaim((void*)trf_9110,NULL,4,t0,t1,t2,t3);}
+if(C_truep(C_i_nullp(t2))){
t4=t3;
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
else{
-t4=(C_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);
+t4=C_i_car(t2);
+t5=C_i_vector_ref(t4,C_fix(0));
+t6=C_i_not(((C_word*)t0)[3]);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9129,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t5,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
if(C_truep(t6)){
t8=t7;
-f_9165(2,t8,t6);}
+f_9129(2,t8,t6);}
else{
-/* eval.scm: 1419 pred */
+/* eval.scm: 1377 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){
+/* k9127 in loop in doloop2333 in ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9129(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8094,29 +7705,29 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_9129,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 */
+t2=C_i_cdr(((C_word*)t0)[6]);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
+/* eval.scm: 1378 loop */
t4=((C_word*)((C_word*)t0)[3])[1];
-f_9146(t4,((C_word*)t0)[2],t2,t3);}
+f_9110(t4,((C_word*)t0)[2],t2,t3);}
else{
-t2=(C_word)C_i_cdr(((C_word*)t0)[6]);
-/* eval.scm: 1421 loop */
+t2=C_i_cdr(((C_word*)t0)[6]);
+/* eval.scm: 1379 loop */
t3=((C_word*)((C_word*)t0)[3])[1];
-f_9146(t3,((C_word*)t0)[2],t2,((C_word*)t0)[4]);}}
+f_9110(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){
+/* k9102 in doloop2333 in ##sys#environment-symbols in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9104(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)((C_word*)t0)[4])[1];
-f_9122(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+f_9086(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,...){
+/* ##sys#copy-env-table in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8957(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...){
C_word tmp;
C_word t5;
va_list v;
@@ -8125,13 +7736,13 @@ 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);}
+C_save_and_reclaim((void*)tr5r,(void*)f_8957r,5,t0,t1,t2,t3,t4);}
else{
a=C_alloc((c-5)*3);
-t5=C_restore_rest_vector(a,C_rest_count(0));
-f_8993r(t0,t1,t2,t3,t4,t5);}}
+t5=C_restore_rest(a,C_rest_count(0));
+f_8957r(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){
+static void C_ccall f_8957r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -8139,16 +7750,16 @@ 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);
+t6=C_i_pairp(t5);
+t7=(C_truep(t6)?C_i_car(t5):C_SCHEME_FALSE);
+t8=C_block_size(t2);
+t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8967,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t7,a[6]=t2,a[7]=t8,tmp=(C_word)a,a+=8,tmp);
+/* eval.scm: 1344 ##sys#make-vector */
+t10=*((C_word*)lf[79]+1);
((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t9,t8,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k8965 in ##sys#copy-env-table in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8967(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8157,15 +7768,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8967,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8972,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t3,a[7]=t1,a[8]=((C_word*)t0)[7],a[9]=((C_word)li216),tmp=(C_word)a,a+=10,tmp));
t5=((C_word*)t3)[1];
-f_9008(t5,((C_word*)t0)[2],C_fix(0));}
+f_8972(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){
+/* doloop2309 in k8965 in ##sys#copy-env-table in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8972(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8177,22 +7788,22 @@ 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]))){
+C_save_and_reclaim((void*)trf_8972,NULL,3,t0,t1,t2);}
+if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[8]))){
t3=((C_word*)t0)[7];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8993,a[2]=t1,a[3]=((C_word*)t0)[6],a[4]=t2,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+t4=C_slot(((C_word*)t0)[5],t2);
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8999,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t6,a[5]=((C_word*)t0)[4],a[6]=((C_word)li215),tmp=(C_word)a,a+=7,tmp));
t8=((C_word*)t6)[1];
-f_9035(t8,t3,t4);}}
+f_8999(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){
+/* copy in doloop2309 in k8965 in ##sys#copy-env-table in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8999(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8211,37 +7822,37 @@ 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))){
+C_save_and_reclaim((void*)trf_8999,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_nullp(t2))){
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
else{
-t3=(C_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]));
+t3=C_slot(t2,C_fix(0));
+t4=C_slot(t3,C_fix(0));
+t5=C_i_not(((C_word*)t0)[5]);
+t6=(C_truep(t5)?t5:C_i_memq(t4,((C_word*)t0)[5]));
if(C_truep(t6)){
-t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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));
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9028,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t8=C_slot(t3,C_fix(1));
if(C_truep(((C_word*)t0)[3])){
t9=((C_word*)t0)[2];
t10=t7;
-f_9064(t10,(C_word)C_a_i_vector(&a,3,t4,t8,t9));}
+f_9028(t10,C_a_i_vector(&a,3,t4,t8,t9));}
else{
-t9=(C_word)C_slot(t3,C_fix(2));
+t9=C_slot(t3,C_fix(2));
t10=t7;
-f_9064(t10,(C_word)C_a_i_vector(&a,3,t4,t8,t9));}}
+f_9028(t10,C_a_i_vector(&a,3,t4,t8,t9));}}
else{
-t7=(C_word)C_slot(t2,C_fix(1));
-/* eval.scm: 1402 copy */
+t7=C_slot(t2,C_fix(1));
+/* eval.scm: 1360 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){
+/* k9026 in copy in doloop2309 in k8965 in ##sys#copy-env-table in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_9028(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8249,38 +7860,38 @@ 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 */
+C_save_and_reclaim((void*)trf_9028,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9032,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=C_slot(((C_word*)t0)[3],C_fix(1));
+/* eval.scm: 1359 copy */
t4=((C_word*)((C_word*)t0)[2])[1];
-f_9035(t4,t2,t3);}
+f_8999(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){
+/* k9030 in k9026 in copy in doloop2309 in k8965 in ##sys#copy-env-table in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_9032(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_9068,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_9032,2,t0,t1);}
t2=((C_word*)t0)[3];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* k8991 in doloop2309 in k8965 in ##sys#copy-env-table in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8993(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
-t2=(C_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));
+t2=C_i_setslot(((C_word*)t0)[5],((C_word*)t0)[4],t1);
+t3=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
t4=((C_word*)((C_word*)t0)[3])[1];
-f_9008(t4,((C_word*)t0)[2],t3);}
+f_8972(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){
+/* ##sys#environment? in k8932 in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8941(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8288,17 +7899,17 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_8941,3,t0,t1,t2);}
+if(C_truep(C_i_structurep(t2,lf[295]))){
+t3=C_block_size(t2);
t4=t1;
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_eqp(C_fix(3),t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_eqp(C_fix(3),t3));}
else{
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
-/* ##sys#string->c-identifier in 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){
+/* ##sys#string->c-identifier in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8878(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8306,14 +7917,14 @@ 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 */
+C_save_and_reclaim((void*)tr3,(void*)f_8878,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8882,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1322 string-copy */
t4=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
-/* 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){
+/* k8880 in ##sys#string->c-identifier in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8882(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8321,14 +7932,14 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8882,2,t0,t1);}
+t2=C_block_size(t1);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8890,a[2]=t1,a[3]=t2,a[4]=((C_word)li212),tmp=(C_word)a,a+=5,tmp);
t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,f_8926(t3,C_fix(0)));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,f_8890(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){
+/* doloop2278 in k8880 in ##sys#string->c-identifier in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static C_word C_fcall f_8890(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8346,49 +7957,48 @@ 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]))){
+if(C_truep(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));
+t2=C_subchar(((C_word*)t0)[2],t1);
+if(C_truep(C_u_i_char_alphabeticp(t2))){
+t3=C_fixnum_plus(t1,C_fix(1));
t15=t3;
t1=t15;
goto loop;}
else{
-t3=(C_word)C_u_i_char_numericp(t2);
-t4=(C_word)C_i_not(t3);
+t3=C_u_i_char_numericp(t2);
+t4=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));
+t5=C_setsubchar(((C_word*)t0)[2],t1,C_make_character(95));
+t6=C_fixnum_plus(t1,C_fix(1));
t15=t6;
t1=t15;
goto loop;}
else{
-t5=(C_word)C_fixnum_plus(t1,C_fix(1));
+t5=C_fixnum_plus(t1,C_fix(1));
t15=t5;
t1=t15;
goto loop;}}
else{
-t5=(C_word)C_eqp(t1,C_fix(0));
+t5=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));
+t6=C_setsubchar(((C_word*)t0)[2],t1,C_make_character(95));
+t7=C_fixnum_plus(t1,C_fix(1));
t15=t7;
t1=t15;
goto loop;}
else{
-t6=(C_word)C_fixnum_plus(t1,C_fix(1));
+t6=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){
+/* ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8270(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
-C_word t4;
C_word t5;
C_word t6;
C_word t7;
@@ -8397,55 +8007,39 @@ 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_word t13;
+C_word t14;
+C_word t15;
+C_word t16;
+C_word ab[25],*a=ab;
+if(c!=5) C_bad_argc_2(c,5,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)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));}
+C_save_and_reclaim((void*)tr5,(void*)f_8270,5,t0,t1,t2,t3,t4);}
+t5=C_SCHEME_UNDEFINED;
+t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
+t7=C_SCHEME_UNDEFINED;
+t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
+t9=C_SCHEME_UNDEFINED;
+t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
+t11=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8273,a[2]=t3,a[3]=((C_word)li202),tmp=(C_word)a,a+=4,tmp));
+t12=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8298,a[2]=t4,a[3]=((C_word)li203),tmp=(C_word)a,a+=4,tmp));
+t13=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8339,a[2]=t6,a[3]=t3,a[4]=t8,a[5]=((C_word)li205),tmp=(C_word)a,a+=6,tmp));
+t14=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8694,a[2]=t10,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_i_pairp(t2))){
+t15=C_i_car(t2);
+t16=t14;
+f_8694(t16,C_i_symbolp(t15));}
else{
-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);}
+t15=t14;
+f_8694(t15,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){
+/* k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8694(C_word t0,C_word t1){
C_word tmp;
+C_word t2;
C_word t3;
-C_word *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 t4;
C_word t5;
C_word t6;
C_word t7;
@@ -8458,221 +8052,331 @@ 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_word t17;
+C_word t18;
+C_word t19;
+C_word t20;
+C_word ab[23],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)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;
+C_save_and_reclaim((void*)trf_8694,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=C_i_car(((C_word*)t0)[4]);
+t3=C_eqp(t2,lf[282]);
+if(C_truep(t3)){
+t4=C_SCHEME_FALSE;
+t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8713,a[2]=t5,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t7=C_SCHEME_END_OF_LIST;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_SCHEME_UNDEFINED;
+t9=C_SCHEME_FALSE;
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));}
+t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8717,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
+t12=C_i_cdr(((C_word*)t0)[4]);
+t13=C_SCHEME_UNDEFINED;
+t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
+t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8723,a[2]=t8,a[3]=t14,a[4]=t10,a[5]=t5,a[6]=((C_word*)t0)[2],a[7]=((C_word)li209),tmp=(C_word)a,a+=8,tmp));
+t16=((C_word*)t14)[1];
+f_8723(t16,t11,t12);}
+else{
+t4=C_eqp(t2,lf[286]);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8803,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+if(C_truep(t4)){
+t6=t5;
+f_8803(t6,t4);}
else{
-t15=t14;
-f_8738(t15,C_SCHEME_FALSE);}}
+t6=C_eqp(t2,lf[288]);
+if(C_truep(t6)){
+t7=t5;
+f_8803(t7,t6);}
+else{
+t7=C_eqp(t2,lf[289]);
+t8=t5;
+f_8803(t8,(C_truep(t7)?t7:C_eqp(t2,lf[290])));}}}}
+else{
+if(C_truep(C_i_symbolp(((C_word*)t0)[4]))){
+/* eval.scm: 1313 doit */
+t2=((C_word*)((C_word*)t0)[2])[1];
+f_8339(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[4]);}
+else{
+/* eval.scm: 1314 ##sys#error */
+t2=*((C_word*)lf[11]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],lf[291],((C_word*)t0)[4]);}}}
-/* 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){
+/* k8801 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8803(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
-C_word ab[6],*a=ab;
+C_word ab[11],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8738,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_8803,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]);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8810,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+t3=C_SCHEME_UNDEFINED;
+t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8812,a[2]=t4,a[3]=((C_word)li210),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_8812(t6,t2,((C_word*)t0)[2]);}
else{
-/* eval.scm: 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]);}}}
+/* eval.scm: 1311 ##sys#error */
+t2=*((C_word*)lf[11]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],lf[287],((C_word*)t0)[2]);}}
-/* 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){
+/* follow in k8801 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8812(C_word t0,C_word t1,C_word t2){
C_word tmp;
-C_word t2;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[6],*a=ab;
+C_word ab[5],*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);}
+C_save_and_reclaim((void*)trf_8812,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8819,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+if(C_truep(C_i_pairp(t2))){
+t4=C_i_cdr(t2);
+t5=t3;
+f_8819(t5,C_i_pairp(t4));}
else{
-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);}
+t4=t3;
+f_8819(t4,C_SCHEME_FALSE);}}
+
+/* k8817 in follow in k8801 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8819(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word *a;
+if(C_truep(t1)){
+t2=C_i_cadr(((C_word*)t0)[4]);
+/* eval.scm: 1308 follow */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_8812(t3,((C_word*)t0)[2],t2);}
else{
-/* 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]);}}}
+t2=((C_word*)t0)[4];
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-/* 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){
+/* k8808 in k8801 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8810(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
+C_word *a;
+/* eval.scm: 1305 doit */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_8339(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8723(C_word t0,C_word t1,C_word t2){
+C_word tmp;
C_word t3;
C_word t4;
C_word t5;
-C_word ab[8],*a=ab;
+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_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);}
+C_save_and_reclaim((void*)trf_8723,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8750,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li208),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8790,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g22242225 */
+t6=t3;
+f_8750(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k8788 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8790(C_word c,C_word t0,C_word t1){
C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
-C_word ab[13],*a=ab;
+C_word ab[3],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8790,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop22082221 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8723(t6,((C_word*)t0)[3],t5);}
+else{
+t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
+t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop22082221 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8723(t6,((C_word*)t0)[3],t5);}}
+
+/* g2224 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8750(C_word t0,C_word t1,C_word t2){
+C_word tmp;
+C_word t3;
+C_word t4;
+C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);}
+C_save_and_reclaim((void*)trf_8750,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8754,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_fixnump(t2))){
+t4=t3;
+f_8754(2,t4,C_SCHEME_UNDEFINED);}
else{
-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);
+/* eval.scm: 1297 ##sys#syntax-error */
+((C_proc5)C_retrieve_symbol_proc(lf[284]))(5,*((C_word*)lf[284]+1),t3,lf[279],lf[285],t2);}}
+
+/* k8752 in g2224 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8754(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[11],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8754,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8757,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8777,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8781,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1298 number->string */
+C_number_to_string(3,0,t4,((C_word*)t0)[2]);}
+
+/* k8779 in k8752 in g2224 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8781(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1298 string-append */
+t2=*((C_word*)lf[188]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[283],t1);}
+
+/* k8775 in k8752 in g2224 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8777(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1298 string->symbol */
+t2=*((C_word*)lf[251]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k8755 in k8752 in g2224 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8757(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[9],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8757,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8762,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word)li206),tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8768,a[2]=((C_word*)t0)[3],a[3]=((C_word)li207),tmp=(C_word)a,a+=4,tmp);
/* ##sys#call-with-values */
-C_call_with_values(4,0,t1,t5,t6);}}
+C_call_with_values(4,0,((C_word*)t0)[2],t2,t3);}
-/* 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){
+/* a8767 in k8755 in k8752 in g2224 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8768(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word t8;
-C_word ab[3],*a=ab;
+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_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);}
+C_save_and_reclaim((void*)tr4,(void*)f_8768,4,t0,t1,t2,t3);}
+t4=((C_word*)((C_word*)t0)[2])[1];
+if(C_truep(t4)){
+t5=C_mutate(((C_word *)((C_word*)t0)[2])+1,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t2);}
else{
-t6=((C_word*)t0)[2];
-/* eval.scm: 1302 loop */
-t7=((C_word*)((C_word*)t0)[3])[1];
-f_8782(t7,t1,t4,t5,t6);}}
+t5=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t2);}}
-/* 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){
+/* a8761 in k8755 in k8752 in g2224 in loop2208 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8762(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
-C_word 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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_8762,2,t0,t1);}
+/* eval.scm: 1299 doit */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_8339(t2,t1,((C_word*)t0)[2],((C_word*)t0)[2]);}
-/* 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){
+/* k8715 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8717(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[71]+1);
+t2=*((C_word*)lf[68]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k8711 in k8692 in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8713(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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]);}
+C_save_and_reclaim((void*)tr2,(void*)f_8713,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[66],t1);
+/* eval.scm: 1303 values */
+C_values(4,0,((C_word*)t0)[3],t2,((C_word*)((C_word*)t0)[2])[1]);}
-/* doit in ##sys#do-the-right-thing in 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){
+/* doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8339(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
-C_word t3;
C_word t4;
C_word t5;
-C_word ab[7],*a=ab;
+C_word t6;
+C_word ab[8],*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);}
+C_save_and_reclaim((void*)trf_8339,NULL,4,t0,t1,t2,t3);}
+t4=C_i_memq(t2,lf[274]);
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8349,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t3,a[6]=((C_word*)t0)[4],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+if(C_truep(t4)){
+t6=t5;
+f_8349(2,t6,t4);}
else{
if(C_truep(((C_word*)t0)[3])){
-t5=t4;
-f_8393(2,t5,(C_word)C_i_memq(t2,lf[288]));}
+t6=t5;
+f_8349(2,t6,C_i_memq(t2,lf[280]));}
else{
-/* eval.scm: 1239 ##sys#feature? */
-t5=*((C_word*)lf[289]+1);
-((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}}
+/* eval.scm: 1238 ##sys#feature? */
+t6=*((C_word*)lf[281]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,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){
+/* k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8349(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8691,46 +8395,46 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8349,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8356,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1239 impform */
+t3=((C_word*)((C_word*)t0)[6])[1];
+f_8298(t3,t2,lf[275],((C_word*)t0)[5],C_SCHEME_TRUE);}
else{
-if(C_truep((C_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_i_memq(((C_word*)t0)[4],*((C_word*)lf[2]+1)))){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8369,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
if(C_truep(((C_word*)t0)[3])){
-t3=(C_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);}}
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,lf[276],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,lf[135],t5);
+/* eval.scm: 1242 impform */
+t7=((C_word*)((C_word*)t0)[6])[1];
+f_8298(t7,t2,t6,((C_word*)t0)[5],C_SCHEME_TRUE);}
+else{
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,lf[52],t3);
+t5=C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,t4,t5);
+t7=C_a_i_cons(&a,2,lf[232],t6);
+/* eval.scm: 1242 impform */
+t8=((C_word*)((C_word*)t0)[6])[1];
+f_8298(t8,t2,t7,((C_word*)t0)[5],C_SCHEME_TRUE);}}
else{
-if(C_truep((C_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]);}
+if(C_truep(C_i_memq(((C_word*)t0)[4],*((C_word*)lf[4]+1)))){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8416,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+/* eval.scm: 1249 ##sys#extension-information */
+t3=*((C_word*)lf[261]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[4],lf[279]);}
else{
-t2=(*a=C_CLOSURE_TYPE|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]);}}}}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8511,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+/* eval.scm: 1264 ##sys#extension-information */
+t3=*((C_word*)lf[261]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[4],lf[279]);}}}}
-/* 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){
+/* k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8511(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8738,30 +8442,30 @@ C_word t4;
C_word t5;
C_word t6;
C_word t7;
-C_word ab[8],*a=ab;
+C_word ab[9],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8555,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_8511,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);
+t2=C_i_assq(lf[56],t1);
+t3=C_i_assq(lf[277],t1);
+t4=C_i_assq(lf[266],t1);
+t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8526,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t4,a[5]=t3,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
if(C_truep(t2)){
-/* eval.scm: 1270 add-req */
+/* eval.scm: 1269 add-req */
t6=((C_word*)((C_word*)t0)[2])[1];
-f_8317(t6,t5,((C_word*)t0)[3],C_SCHEME_TRUE);}
+f_8273(t6,t5,((C_word*)t0)[3],C_SCHEME_TRUE);}
else{
t6=t5;
-f_8570(2,t6,C_SCHEME_UNDEFINED);}}
+f_8526(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 */
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8656,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1283 add-req */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_8317(t3,t2,((C_word*)t0)[3],C_SCHEME_FALSE);}}
+f_8273(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){
+/* k8654 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8656(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8772,26 +8476,26 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8656,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8663,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,lf[52],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,lf[123],t5);
+/* eval.scm: 1285 impform */
+t7=((C_word*)((C_word*)t0)[3])[1];
+f_8298(t7,t2,t6,((C_word*)t0)[2],C_SCHEME_FALSE);}
-/* 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){
+/* k8661 in k8654 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8663(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1285 values */
+/* eval.scm: 1284 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){
+/* k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8526(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8804,23 +8508,23 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8526,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8533,a[2]=((C_word*)t0)[8],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8541,a[2]=((C_word*)t0)[6],a[3]=t2,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8545,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
+if(C_truep(((C_word*)t0)[3])){
+t5=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,lf[52],t5);
+t7=C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
+t8=C_a_i_cons(&a,2,lf[121],t7);
t9=t4;
-f_8589(t9,(C_word)C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST));}
+f_8545(t9,C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST));}
else{
t5=t4;
-f_8589(t5,C_SCHEME_END_OF_LIST);}}
+f_8545(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){
+/* k8543 in k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8545(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8838,29 +8542,29 @@ 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);
+C_save_and_reclaim((void*)trf_8545,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8549,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
t3=(C_truep(((C_word*)t0)[5])?((C_word*)t0)[5]:(C_truep(((C_word*)t0)[4])?C_SCHEME_FALSE:((C_word*)t0)[3]));
if(C_truep(t3)){
/* ##sys#append */
-t4=*((C_word*)lf[71]+1);
+t4=*((C_word*)lf[68]+1);
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}
else{
-t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8611,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8567,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
t5=C_SCHEME_END_OF_LIST;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_FALSE;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_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]));
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8571,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t10=(C_truep(((C_word*)t0)[4])?C_i_cdr(((C_word*)t0)[4]):C_a_i_list(&a,1,((C_word*)t0)[2]));
t11=C_SCHEME_UNDEFINED;
t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8621,a[2]=t6,a[3]=t12,a[4]=t8,a[5]=((C_word)li204),tmp=(C_word)a,a+=6,tmp));
+t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8577,a[2]=t6,a[3]=t12,a[4]=t8,a[5]=((C_word)li204),tmp=(C_word)a,a+=6,tmp));
t14=((C_word*)t12)[1];
-f_8621(t14,t9,t10);}}
+f_8577(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){
+/* loop2154 in k8543 in k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8577(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -8881,17 +8585,17 @@ 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);
+C_save_and_reclaim((void*)trf_8577,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_slot(t2,C_fix(0));
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,lf[52],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
+t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop21492162 */
+t9=C_slot(t2,C_fix(1));
+/* loop21542167 */
t15=t1;
t16=t9;
t1=t15;
@@ -8900,8 +8604,8 @@ 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 */
+t9=C_slot(t2,C_fix(1));
+/* loop21542167 */
t15=t1;
t16=t9;
t1=t15;
@@ -8912,17 +8616,17 @@ 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){
+/* k8569 in k8543 in k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8571(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[71]+1);
+t2=*((C_word*)lf[68]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k8565 in k8543 in k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8567(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8930,46 +8634,46 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8567,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[123],t1);
+t3=C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
/* ##sys#append */
-t4=*((C_word*)lf[71]+1);
+t4=*((C_word*)lf[68]+1);
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[2],t3,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k8547 in k8543 in k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8549(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[71]+1);
+t2=*((C_word*)lf[68]+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){
+/* k8539 in k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8541(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8585,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[69],t1);
-/* eval.scm: 1272 impform */
+C_save_and_reclaim((void*)tr2,(void*)f_8541,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[66],t1);
+/* eval.scm: 1271 impform */
t3=((C_word*)((C_word*)t0)[4])[1];
-f_8342(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2],C_SCHEME_FALSE);}
+f_8298(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){
+/* k8531 in k8524 in k8509 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8533(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1271 values */
+/* eval.scm: 1270 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){
+/* k8414 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8416(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -8980,27 +8684,27 @@ C_word t7;
C_word t8;
C_word t9;
C_word t10;
-C_word ab[25],*a=ab;
+C_word ab[26],*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);
+C_save_and_reclaim((void*)tr2,(void*)f_8416,2,t0,t1);}
+t2=C_i_assq(lf[277],t1);
+t3=C_i_assq(lf[56],t1);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8433,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8437,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t2,a[7]=t4,tmp=(C_word)a,a+=8,tmp);
if(C_truep(t3)){
-t6=(C_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);
+t6=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
+t7=C_a_i_cons(&a,2,lf[52],t6);
+t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=C_a_i_cons(&a,2,lf[121],t8);
t10=t5;
-f_8481(t10,(C_word)C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST));}
+f_8437(t10,C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST));}
else{
t6=t5;
-f_8481(t6,C_SCHEME_END_OF_LIST);}}
+f_8437(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){
+/* k8435 in k8414 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8437(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9016,76 +8720,76 @@ 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);}
+C_save_and_reclaim((void*)trf_8437,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8445,a[2]=t1,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+if(C_truep(((C_word*)t0)[6])){
+/* eval.scm: 1255 impform */
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_8298(t3,t2,lf[278],((C_word*)t0)[4],C_SCHEME_FALSE);}
else{
-if(C_truep(((C_word*)t0)[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);}}}
+if(C_truep(((C_word*)t0)[3])){
+t3=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,lf[276],t3);
+t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,lf[135],t5);
+/* eval.scm: 1255 impform */
+t7=((C_word*)((C_word*)t0)[5])[1];
+f_8298(t7,t2,t6,((C_word*)t0)[4],C_SCHEME_FALSE);}
+else{
+t3=C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
+t4=C_a_i_cons(&a,2,lf[52],t3);
+t5=C_a_i_cons(&a,2,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);
+t6=C_a_i_cons(&a,2,t4,t5);
+t7=C_a_i_cons(&a,2,lf[232],t6);
+/* eval.scm: 1255 impform */
+t8=((C_word*)((C_word*)t0)[5])[1];
+f_8298(t8,t2,t7,((C_word*)t0)[4],C_SCHEME_FALSE);}}}
-/* 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){
+/* k8443 in k8435 in k8414 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8445(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8489,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+C_save_and_reclaim((void*)tr2,(void*)f_8445,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
/* ##sys#append */
-t3=*((C_word*)lf[71]+1);
+t3=*((C_word*)lf[68]+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){
+/* k8431 in k8414 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8433(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8477,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[69],t1);
-/* eval.scm: 1253 values */
+C_save_and_reclaim((void*)tr2,(void*)f_8433,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[66],t1);
+/* eval.scm: 1252 values */
C_values(4,0,((C_word*)t0)[2],t2,C_SCHEME_TRUE);}
-/* 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){
+/* k8367 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8369(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1242 values */
+/* eval.scm: 1241 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){
+/* k8354 in k8347 in doit in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8356(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1240 values */
+/* eval.scm: 1239 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){
+/* impform in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8298(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -9094,23 +8798,23 @@ 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);
+C_save_and_reclaim((void*)trf_8298,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8310,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8317,a[2]=t5,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
if(C_truep(((C_word*)t0)[2])){
-t7=(C_word)C_i_not(t4);
+t7=C_i_not(t4);
if(C_truep(t7)){
t8=t6;
-f_8361(2,t8,t7);}
+f_8317(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);}}
+/* eval.scm: 1231 ##sys#current-module */
+((C_proc2)C_retrieve_symbol_proc(lf[41]))(2,*((C_word*)lf[41]+1),t6);}}
else{
t7=t6;
-f_8361(2,t7,C_SCHEME_FALSE);}}
+f_8317(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){
+/* k8315 in impform in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8317(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9119,34 +8823,34 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_8317,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);
+t2=C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,lf[273],t2);
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
/* ##sys#append */
-t5=*((C_word*)lf[71]+1);
+t5=*((C_word*)lf[68]+1);
((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[2],t4,C_SCHEME_END_OF_LIST);}
else{
/* ##sys#append */
-t2=*((C_word*)lf[71]+1);
+t2=*((C_word*)lf[68]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}}
-/* 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){
+/* k8308 in impform in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8310(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8354,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
+C_save_and_reclaim((void*)tr2,(void*)f_8310,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
t3=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cons(&a,2,lf[69],t2));}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_a_i_cons(&a,2,lf[66],t2));}
-/* add-req in ##sys#do-the-right-thing in 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){
+/* add-req in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8273(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -9156,32 +8860,32 @@ 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);}
+C_save_and_reclaim((void*)trf_8273,NULL,4,t0,t1,t2,t3);}
if(C_truep(((C_word*)t0)[2])){
-t4=(C_truep(t3)?lf[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);}
+t4=(C_truep(t3)?lf[268]:lf[269]);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8286,a[2]=t2,a[3]=((C_word)li200),tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8292,a[2]=t2,a[3]=((C_word)li201),tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1223 ##sys#hash-table-update! */
+((C_proc6)C_retrieve_symbol_proc(lf[18]))(6,*((C_word*)lf[18]+1),t1,C_retrieve(lf[272]),t4,t5,t6);}
else{
t4=C_SCHEME_UNDEFINED;
t5=t1;
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
-/* 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){
+/* a8291 in add-req in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8292(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8336,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_8292,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]));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,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){
+/* a8285 in add-req in ##sys#do-the-right-thing in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8286(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9189,14 +8893,14 @@ 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 */
+C_save_and_reclaim((void*)tr3,(void*)f_8286,3,t0,t1,t2);}
+t3=C_retrieve(lf[270]);
+/* g20602061 */
t4=t3;
-((C_proc5)C_retrieve_proc(t4))(5,t4,t1,*((C_word*)lf[279]+1),t2,((C_word*)t0)[2]);}
+((C_proc5)C_retrieve_proc(t4))(5,t4,t1,*((C_word*)lf[271]+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){
+/* ##sys#lookup-runtime-requirements in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8221(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9206,15 +8910,15 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_8221,3,t0,t1,t2);}
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
-t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8271,a[2]=t4,a[3]=((C_word)li198),tmp=(C_word)a,a+=4,tmp));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8227,a[2]=t4,a[3]=((C_word)li198),tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
-f_8271(t6,t1,t2);}
+f_8227(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){
+/* loop1 in ##sys#lookup-runtime-requirements in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8227(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9222,19 +8926,19 @@ 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))){
+C_save_and_reclaim((void*)trf_8227,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_nullp(t2))){
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_END_OF_LIST);}
else{
-t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8241,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t4=C_i_car(t2);
+/* eval.scm: 1212 ##sys#extension-information */
+t5=*((C_word*)lf[261]+1);
((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_FALSE);}}
-/* 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){
+/* k8239 in loop1 in ##sys#lookup-runtime-requirements in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8241(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9242,18 +8946,18 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8241,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8244,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
if(C_truep(t1)){
-t3=(C_word)C_i_assq(lf[274],t1);
+t3=C_i_assq(lf[266],t1);
t4=t2;
-f_8288(t4,(C_truep(t3)?(C_word)C_i_cdr(t3):C_SCHEME_FALSE));}
+f_8244(t4,(C_truep(t3)?C_i_cdr(t3):C_SCHEME_FALSE));}
else{
t3=t2;
-f_8288(t3,C_SCHEME_FALSE);}}
+f_8244(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){
+/* k8242 in k8239 in loop1 in ##sys#lookup-runtime-requirements in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8244(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9262,38 +8966,38 @@ 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);}
+C_save_and_reclaim((void*)trf_8244,NULL,2,t0,t1);}
t2=(C_truep(t1)?t1:C_SCHEME_END_OF_LIST);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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 */
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8251,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t4=C_i_cdr(((C_word*)t0)[3]);
+/* eval.scm: 1216 loop1 */
t5=((C_word*)((C_word*)t0)[2])[1];
-f_8271(t5,t3,t4);}
+f_8227(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){
+/* k8249 in k8242 in k8239 in loop1 in ##sys#lookup-runtime-requirements in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8251(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1212 append */
-t2=*((C_word*)lf[84]+1);
+/* eval.scm: 1211 append */
+t2=*((C_word*)lf[81]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* extension-information in 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){
+/* extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8215(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr3,(void*)f_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]);}
+C_save_and_reclaim((void*)tr3,(void*)f_8215,3,t0,t1,t2);}
+/* eval.scm: 1202 ##sys#extension-information */
+t3=*((C_word*)lf[261]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t1,t2,lf[265]);}
-/* ##sys#extension-information in 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){
+/* ##sys#extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8182(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -9301,46 +9005,46 @@ 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_save_and_reclaim((void*)tr4,(void*)f_8182,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8186,a[2]=t3,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=t1,a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[5],tmp=(C_word)a,a+=9,tmp);
+/* eval.scm: 1194 ##sys#repository-path */
+t5=*((C_word*)lf[241]+1);
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-/* 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){
+/* k8184 in ##sys#extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8186(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8230,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_8186,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8192,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
+/* eval.scm: 1195 ##sys#canonicalize-extension-path */
+t3=*((C_word*)lf[235]+1);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
else{
t2=((C_word*)t0)[6];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-/* 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){
+/* k8190 in k8184 in ##sys#extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8192(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8192,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8195,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+/* eval.scm: 1196 string-append */
t3=((C_word*)t0)[3];
-((C_proc6)C_retrieve_proc(t3))(6,t3,t2,((C_word*)t0)[2],lf[271],t1,lf[272]);}
+((C_proc6)C_retrieve_proc(t3))(6,t3,t2,((C_word*)t0)[2],lf[263],t1,lf[264]);}
-/* 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){
+/* k8193 in k8190 in k8184 in ##sys#extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8195(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9348,54 +9052,54 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8195,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8198,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8213,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1197 string-append */
t4=((C_word*)t0)[2];
-((C_proc4)C_retrieve_proc(t4))(4,t4,t3,t1,lf[270]);}
+((C_proc4)C_retrieve_proc(t4))(4,t4,t3,t1,lf[262]);}
-/* 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){
+/* k8211 in k8193 in k8190 in k8184 in ##sys#extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8213(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1198 file-exists? */
+/* eval.scm: 1197 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){
+/* k8196 in k8193 in k8190 in k8184 in ##sys#extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8198(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8242,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_8198,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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 */
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8202,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li195),tmp=(C_word)a,a+=5,tmp);
+/* g20072008 */
t3=t2;
-f_8246(t3,((C_word*)t0)[2],t1);}
+f_8202(t3,((C_word*)t0)[2],t1);}
else{
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
-/* 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){
+/* g2007 in k8196 in k8193 in k8190 in k8184 in ##sys#extension-information in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8202(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_8246,NULL,3,t0,t1,t2);}
-/* g20182019 */
+C_save_and_reclaim((void*)trf_8202,NULL,3,t0,t1,t2);}
+/* g20162017 */
t3=((C_word*)t0)[3];
((C_proc4)C_retrieve_proc(t3))(4,t3,t1,t2,((C_word*)t0)[2]);}
-/* ##sys#require in 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,...){
+/* ##sys#require in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8169(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -9403,24 +9107,24 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_8169r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_8213r(t0,t1,t2);}}
+f_8169r(t0,t1,t2);}}
-static void C_ccall f_8213r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_8169r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a=C_alloc(3);
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8219,a[2]=((C_word)li193),tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8175,a[2]=((C_word)li193),tmp=(C_word)a,a+=3,tmp);
/* for-each */
-t4=*((C_word*)lf[268]+1);
+t4=*((C_word*)lf[260]+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){
+/* a8174 in ##sys#require in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8175(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9428,14 +9132,14 @@ 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 */
+C_save_and_reclaim((void*)tr3,(void*)f_8175,3,t0,t1,t2);}
+t3=*((C_word*)lf[252]+1);
+/* g19841985 */
t4=t3;
-((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,lf[267]);}
+((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,lf[259]);}
-/* ##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){
+/* ##sys#provided? in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8155(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9443,24 +9147,24 @@ 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]);}
+C_save_and_reclaim((void*)tr3,(void*)f_8155,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8166,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1175 ##sys#canonicalize-extension-path */
+t4=*((C_word*)lf[235]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[258]);}
-/* 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){
+/* k8164 in ##sys#provided? in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8166(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_i_member(t1,C_retrieve(lf[258]));
+t2=C_i_member(t1,C_retrieve(lf[250]));
t3=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(t2)?C_SCHEME_TRUE:C_SCHEME_FALSE));}
-/* ##sys#provide in 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,...){
+/* ##sys#provide in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8113(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -9468,13 +9172,13 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_8113r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_8157r(t0,t1,t2);}}
+f_8113r(t0,t1,t2);}}
-static void C_ccall f_8157r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_8113r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9483,12 +9187,12 @@ 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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8119,a[2]=t4,a[3]=((C_word)li190),tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
-f_8163(t6,t1,t2);}
+f_8119(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){
+/* loop1946 in ##sys#provide in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8119(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9498,21 +9202,21 @@ 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]);}
+C_save_and_reclaim((void*)trf_8119,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_slot(t2,C_fix(0));
+t4=C_i_check_symbol_2(t3,lf[256]);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8134,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1168 ##sys#canonicalize-extension-path */
+t6=*((C_word*)lf[235]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t3,lf[256]);}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k8132 in loop1946 in ##sys#provide in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8134(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9521,15 +9225,15 @@ 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));
+C_save_and_reclaim((void*)tr2,(void*)f_8134,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_retrieve(lf[250]));
+t3=C_mutate((C_word*)lf[250]+1 /* (set! loaded-extensions ...) */,t2);
+t4=C_slot(((C_word*)t0)[4],C_fix(1));
t5=((C_word*)((C_word*)t0)[3])[1];
-f_8163(t5,((C_word*)t0)[2],t4);}
+f_8119(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,...){
+/* ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8029(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...){
C_word tmp;
C_word t4;
va_list v;
@@ -9538,13 +9242,13 @@ 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);}
+C_save_and_reclaim((void*)tr4r,(void*)f_8029r,4,t0,t1,t2,t3);}
else{
a=C_alloc((c-4)*3);
t4=C_restore_rest(a,C_rest_count(0));
-f_8073r(t0,t1,t2,t3,t4);}}
+f_8029r(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){
+static void C_ccall f_8029r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -9552,22 +9256,22 @@ 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))){
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8033,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_i_nullp(t4))){
t7=t6;
-f_8077(2,t7,C_SCHEME_TRUE);}
+f_8033(2,t7,C_SCHEME_TRUE);}
else{
-t7=(C_word)C_i_cdr(t4);
-if(C_truep((C_word)C_i_nullp(t7))){
+t7=C_i_cdr(t4);
+if(C_truep(C_i_nullp(t7))){
t8=t6;
-f_8077(2,t8,(C_word)C_i_car(t4));}
+f_8033(2,t8,C_i_car(t4));}
else{
/* ##sys#error */
-t8=*((C_word*)lf[14]+1);
+t8=*((C_word*)lf[11]+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){
+/* k8031 in ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8033(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9575,43 +9279,43 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_8033,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8036,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_i_stringp(((C_word*)((C_word*)t0)[4])[1]))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8089,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1147 string->symbol */
t4=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)((C_word*)t0)[4])[1]);}
else{
t3=t2;
-f_8080(t3,(C_word)C_i_check_symbol_2(((C_word*)((C_word*)t0)[4])[1],((C_word*)t0)[3]));}}
+f_8036(t3,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){
+/* k8087 in k8031 in ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8089(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
t3=((C_word*)t0)[2];
-f_8080(t3,t2);}
+f_8036(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){
+/* k8034 in k8031 in ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_8036(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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_save_and_reclaim((void*)trf_8036,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8039,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1149 ##sys#canonicalize-extension-path */
+t3=*((C_word*)lf[235]+1);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)((C_word*)t0)[4])[1],((C_word*)t0)[2]);}
-/* 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){
+/* k8037 in k8034 in k8031 in ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8039(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9620,48 +9324,48 @@ 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]));
+C_save_and_reclaim((void*)tr2,(void*)f_8039,2,t0,t1);}
+t2=C_i_member(t1,C_retrieve(lf[250]));
if(C_truep(t2)){
t3=((C_word*)t0)[5];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-if(C_truep((C_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);
+if(C_truep(C_i_memq(((C_word*)((C_word*)t0)[4])[1],*((C_word*)lf[2]+1)))){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8054,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1152 ##sys#load-library-0 */
+t4=*((C_word*)lf[225]+1);
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)((C_word*)t0)[4])[1],C_SCHEME_FALSE);}
else{
-t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8066,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[5],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+/* eval.scm: 1156 ##sys#find-extension */
+t4=*((C_word*)lf[245]+1);
((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t1,C_SCHEME_TRUE);}}}
-/* 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){
+/* k8064 in k8037 in k8034 in k8031 in ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8066(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_8110,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_8066,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8072,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1158 ##sys#load */
+t3=*((C_word*)lf[189]+1);
((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,t1,C_SCHEME_FALSE,C_SCHEME_FALSE);}
else{
if(C_truep(((C_word*)t0)[4])){
-/* eval.scm: 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]);}
+/* eval.scm: 1161 ##sys#error */
+t2=*((C_word*)lf[11]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[5],((C_word*)t0)[3],lf[254],((C_word*)((C_word*)t0)[2])[1]);}
else{
t2=((C_word*)t0)[5];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}}
-/* 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){
+/* k8070 in k8064 in k8037 in k8034 in k8031 in ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8072(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9669,14 +9373,14 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_8072,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[3],C_retrieve(lf[250]));
+t3=C_mutate((C_word*)lf[250]+1 /* (set! loaded-extensions ...) */,t2);
t4=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_TRUE);}
-/* 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){
+/* k8052 in k8037 in k8034 in k8031 in ##sys#load-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_8054(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9687,15 +9391,15 @@ 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]);}
+/* eval.scm: 1154 ##sys#error */
+t2=*((C_word*)lf[11]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[5],((C_word*)t0)[3],lf[253],((C_word*)((C_word*)t0)[2])[1]);}
else{
t2=((C_word*)t0)[5];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}}
-/* ##sys#find-extension in 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){
+/* ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7930(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -9703,14 +9407,14 @@ 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_save_and_reclaim((void*)tr4,(void*)f_7930,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7934,a[2]=t3,a[3]=t1,a[4]=t2,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[3],tmp=(C_word)a,a+=7,tmp);
+/* eval.scm: 1123 ##sys#repository-path */
+t5=*((C_word*)lf[241]+1);
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-/* 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){
+/* k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7934(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9721,23 +9425,23 @@ 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_save_and_reclaim((void*)tr2,(void*)f_7934,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7936,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,a[5]=((C_word*)t0)[6],a[6]=((C_word)li186),tmp=(C_word)a,a+=7,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7982,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(C_truep(C_retrieve(lf[243]))?lf[247]:C_SCHEME_END_OF_LIST);
+t5=(C_truep(t1)?C_a_i_list(&a,1,t1):C_SCHEME_END_OF_LIST);
+t6=(C_truep(((C_word*)t0)[2])?C_retrieve(lf[248]):C_SCHEME_END_OF_LIST);
+if(C_truep(C_retrieve(lf[243]))){
+/* eval.scm: 1132 ##sys#append */
+t7=*((C_word*)lf[68]+1);
((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t3,t4,t5,t6,C_SCHEME_END_OF_LIST);}
else{
-/* eval.scm: 1133 ##sys#append */
-t7=*((C_word*)lf[71]+1);
-((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t3,t4,t5,t6,lf[257]);}}
+/* eval.scm: 1132 ##sys#append */
+t7=*((C_word*)lf[68]+1);
+((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t3,t4,t5,t6,lf[249]);}}
-/* 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){
+/* k7980 in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7982(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9746,15 +9450,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7982,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8028,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word)li187),tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7984,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word)li187),tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_8028(t5,((C_word*)t0)[2],t1);}
+f_7984(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){
+/* loop in k7980 in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7984(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9762,19 +9466,19 @@ 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 */
+C_save_and_reclaim((void*)trf_7984,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_slot(t2,C_fix(0));
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7997,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1139 check */
t5=((C_word*)t0)[2];
-f_7980(t5,t4,t3);}
+f_7936(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){
+/* k7995 in loop in k7980 in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7997(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9783,27 +9487,27 @@ 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 */
+t2=C_slot(((C_word*)t0)[3],C_fix(1));
+/* eval.scm: 1140 loop */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_8028(t3,((C_word*)t0)[4],t2);}}
+f_7984(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){
+/* check in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7936(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_7936,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7940,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1125 string-append */
t4=((C_word*)t0)[3];
-((C_proc5)C_retrieve_proc(t4))(5,t4,t3,t2,lf[254],((C_word*)t0)[2]);}
+((C_proc5)C_retrieve_proc(t4))(5,t4,t3,t2,lf[246],((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){
+/* k7938 in check in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7940(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9812,37 +9516,37 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7940,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7946,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
if(C_truep(((C_word*)t0)[2])){
-t3=C_retrieve(lf[182]);
+t3=C_retrieve(lf[174]);
if(C_truep(t3)){
t4=t2;
-f_7990(2,t4,C_SCHEME_FALSE);}
+f_7946(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]));}
+if(C_truep(C_fudge(C_fix(24)))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7975,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1129 ##sys#string-append */
+t5=*((C_word*)lf[10]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t1,C_retrieve(lf[208]));}
else{
t4=t2;
-f_7990(2,t4,C_SCHEME_FALSE);}}}
+f_7946(2,t4,C_SCHEME_FALSE);}}}
else{
t3=t2;
-f_7990(2,t3,C_SCHEME_FALSE);}}
+f_7946(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){
+/* k7973 in k7938 in check in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7975(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1130 file-exists? */
+/* eval.scm: 1129 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){
+/* k7944 in k7938 in check in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7946(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9852,8 +9556,8 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7946,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7949,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
if(C_truep(t1)){
t3=t1;
if(C_truep(t3)){
@@ -9864,36 +9568,99 @@ 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]);}}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7956,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1130 ##sys#string-append */
+t4=*((C_word*)lf[10]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[4],lf[7]);}}
-/* 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){
+/* k7954 in k7944 in k7938 in check in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7956(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1131 file-exists? */
+/* eval.scm: 1130 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){
+/* k7947 in k7944 in k7938 in check in k7932 in ##sys#find-extension in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7949(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word *a;
+if(C_truep(t1)){
+t2=((C_word*)t0)[3];
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+else{
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* ##sys#repository-path in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7899(C_word c,C_word t0,C_word t1,...){
+C_word tmp;
+C_word t2;
+va_list v;
+C_word *a,c2=c;
+C_save_rest(t1,c2,2);
+C_check_for_interrupt;
+if(!C_demand(c*C_SIZEOF_PAIR+4)){
+C_save_and_reclaim((void*)tr2r,(void*)f_7899r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_7899r(t0,t1,t2);}}
+
+static void C_ccall f_7899r(C_word t0,C_word t1,C_word t2){
+C_word tmp;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word t8;
+C_word t9;
+C_word *a=C_alloc(4);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7903,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t2))){
+t4=((C_word*)((C_word*)t0)[2])[1];
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+else{
+t4=C_i_cdr(t2);
+if(C_truep(C_i_nullp(t4))){
+t5=C_i_car(t2);
+if(C_truep(t5)){
+t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
+else{
+t6=((C_word*)((C_word*)t0)[2])[1];
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
+else{
+/* ##sys#error */
+t5=*((C_word*)lf[11]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
+
+/* k7901 in ##sys#repository-path in k7896 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7903(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
+C_word t4;
C_word *a;
if(C_truep(t1)){
-t2=((C_word*)t0)[3];
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
t3=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-t2=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+t2=((C_word*)((C_word*)t0)[3])[1];
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
-/* ##sys#canonicalize-extension-path in 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){
+/* ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7738(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -9905,30 +9672,30 @@ 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))){
+C_save_and_reclaim((void*)tr4,(void*)f_7738,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7741,a[2]=t2,a[3]=t3,a[4]=((C_word)li181),tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7760,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_stringp(t2))){
t6=t5;
-f_7832(2,t6,t2);}
+f_7760(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);
+if(C_truep(C_i_symbolp(t2))){
+/* eval.scm: 1077 ##sys#symbol->string */
+t6=*((C_word*)lf[237]+1);
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}
else{
-if(C_truep((C_word)C_i_listp(t2))){
+if(C_truep(C_i_listp(t2))){
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
-t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7843,a[2]=t4,a[3]=t7,a[4]=((C_word*)t0)[2],a[5]=((C_word)li183),tmp=(C_word)a,a+=6,tmp));
t9=((C_word*)t7)[1];
-f_7915(t9,t5,t2);}
+f_7843(t9,t5,t2);}
else{
t6=t5;
-f_7832(2,t6,C_SCHEME_UNDEFINED);}}}}
+f_7760(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){
+/* loop in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7843(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -9936,28 +9703,28 @@ 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))){
+C_save_and_reclaim((void*)trf_7843,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_nullp(t2))){
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[246]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[238]);}
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);
+t3=C_slot(t2,C_fix(0));
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7860,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+if(C_truep(C_i_symbolp(t3))){
+/* eval.scm: 1084 ##sys#symbol->string */
+t5=*((C_word*)lf[237]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
else{
-if(C_truep((C_word)C_i_stringp(t3))){
+if(C_truep(C_i_stringp(t3))){
t5=t4;
-f_7932(2,t5,t3);}
+f_7860(2,t5,t3);}
else{
-/* eval.scm: 1093 err */
+/* eval.scm: 1086 err */
t5=((C_word*)t0)[2];
-f_7813(t5,t4);}}}}
+f_7741(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){
+/* k7858 in loop in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7860(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9968,27 +9735,27 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7860,2,t0,t1);}
+t2=C_slot(((C_word*)t0)[5],C_fix(1));
+t3=C_i_nullp(t2);
+t4=(C_truep(t3)?lf[239]:lf[240]);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7868,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+t6=C_slot(((C_word*)t0)[5],C_fix(1));
+/* eval.scm: 1090 loop */
t7=((C_word*)((C_word*)t0)[2])[1];
-f_7915(t7,t5,t6);}
+f_7843(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){
+/* k7866 in k7858 in loop in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7868(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1089 string-append */
+/* eval.scm: 1082 string-append */
t2=((C_word*)t0)[5];
((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k7758 in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7760(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -9997,15 +9764,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7760,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7837,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word)li183),tmp=(C_word)a,a+=5,tmp));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7765,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word)li182),tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
-f_7837(t5,((C_word*)t0)[2],t1);}
+f_7765(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){
+/* check in k7758 in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7765(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -10024,70 +9791,70 @@ 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);
+C_save_and_reclaim((void*)trf_7765,NULL,3,t0,t1,t2);}
+t3=C_block_size(t2);
+t4=C_eqp(C_fix(0),t3);
if(C_truep(t4)){
-/* eval.scm: 1100 err */
+/* eval.scm: 1093 err */
t5=((C_word*)t0)[3];
-f_7813(t5,t1);}
+f_7741(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));
+t5=C_i_string_ref(t2,C_fix(0));
+t6=C_eqp(C_make_character(92),t5);
+t7=(C_truep(t6)?t6:C_eqp(C_make_character(47),t5));
if(C_truep(t7)){
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7791,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1095 ##sys#substring */
+t9=*((C_word*)lf[197]+1);
((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,t2,C_fix(1),t3);}
else{
-t8=(C_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));
+t8=C_fixnum_difference(t3,C_fix(1));
+t9=C_i_string_ref(t2,t8);
+t10=C_eqp(C_make_character(92),t9);
+t11=(C_truep(t10)?t10:C_eqp(C_make_character(47),t9));
if(C_truep(t11)){
-t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7804,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t13=C_fixnum_difference(t3,C_fix(1));
+/* eval.scm: 1097 ##sys#substring */
+t14=*((C_word*)lf[197]+1);
((C_proc5)(void*)(*((C_word*)t14+1)))(5,t14,t12,t2,C_fix(0),t13);}
else{
t12=t2;
t13=t1;
((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,t12);}}}}
-/* 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){
+/* k7802 in check in k7758 in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7804(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1104 check */
+/* eval.scm: 1097 check */
t2=((C_word*)((C_word*)t0)[3])[1];
-f_7837(t2,((C_word*)t0)[2],t1);}
+f_7765(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){
+/* k7789 in check in k7758 in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7791(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1102 check */
+/* eval.scm: 1095 check */
t2=((C_word*)((C_word*)t0)[3])[1];
-f_7837(t2,((C_word*)t0)[2],t1);}
+f_7765(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){
+/* err in ##sys#canonicalize-extension-path in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7741(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_7741,NULL,2,t0,t1);}
+/* eval.scm: 1074 ##sys#error */
+t2=*((C_word*)lf[11]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,t1,((C_word*)t0)[3],lf[236],((C_word*)t0)[2]);}
-/* ##sys#load-library in 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,...){
+/* ##sys#load-library in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7652(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -10096,33 +9863,33 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_7652r,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);}}
+t3=C_restore_rest(a,C_rest_count(0));
+f_7652r(t0,t1,t2,t3);}}
-static void C_ccall f_7724r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_7652r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a=C_alloc(4);
-t4=(C_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);
+t4=C_i_check_symbol_2(t2,lf[233]);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7659,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_pairp(t3))){
+t6=C_i_car(t3);
+/* eval.scm: 1051 ##sys#load-library-0 */
+t7=*((C_word*)lf[225]+1);
((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t2,t6);}
else{
-/* eval.scm: 1058 ##sys#load-library-0 */
-t6=*((C_word*)lf[233]+1);
+/* eval.scm: 1051 ##sys#load-library-0 */
+t6=*((C_word*)lf[225]+1);
((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t2,C_SCHEME_FALSE);}}
-/* 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){
+/* k7657 in ##sys#load-library in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7659(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10130,28 +9897,28 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7659,2,t0,t1);}
if(C_truep(t1)){
t2=t1;
t3=((C_word*)t0)[3];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7741,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7669,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
/* ##sys#peek-c-string */
-t3=*((C_word*)lf[16]+1);
+t3=*((C_word*)lf[13]+1);
((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_mpointer(&a,(void*)C_dlerror),C_fix(0));}}
-/* 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){
+/* k7667 in k7657 in ##sys#load-library in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7669(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 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);}
+/* eval.scm: 1052 ##sys#error */
+t2=*((C_word*)lf[11]+1);
+((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],lf[233],lf[234],((C_word*)t0)[2],t1);}
-/* ##sys#load-library-0 in 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){
+/* ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7546(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -10159,14 +9926,14 @@ 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_save_and_reclaim((void*)tr4,(void*)f_7546,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7550,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t2,a[7]=((C_word*)t0)[5],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
+/* eval.scm: 1024 ##sys#->feature-id */
+t5=*((C_word*)lf[231]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
-/* 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){
+/* k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7550(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10176,50 +9943,50 @@ 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]));
+C_save_and_reclaim((void*)tr2,(void*)f_7550,2,t0,t1);}
+t2=C_i_memq(t1,C_retrieve(lf[138]));
if(C_truep(t2)){
t3=((C_word*)t0)[8];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7559,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)t0)[3])){
t4=t3;
-f_7631(t4,(C_word)C_a_i_list(&a,1,((C_word*)t0)[3]));}
+f_7559(t4,C_a_i_list(&a,1,((C_word*)t0)[3]));}
else{
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]));}}}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7642,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t5=C_slot(((C_word*)t0)[6],C_fix(1));
+/* eval.scm: 1029 ##sys#string-append */
+t6=*((C_word*)lf[10]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,t5,C_retrieve(lf[219]));}}}
-/* 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){
+/* k7640 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7642(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7642,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7646,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1030 dynamic-load-libraries */
t3=((C_word*)t0)[2];
((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
-/* 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){
+/* k7644 in k7640 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7646(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7718,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7646,2,t0,t1);}
t2=((C_word*)t0)[3];
-f_7631(t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+f_7559(t2,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){
+/* k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7559(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10229,35 +9996,35 @@ 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_save_and_reclaim((void*)trf_7559,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7562,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7624,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7628,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t5=C_slot(((C_word*)t0)[4],C_fix(1));
+/* eval.scm: 1035 ##sys#string->c-identifier */
+t6=*((C_word*)lf[230]+1);
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
-/* 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){
+/* k7626 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7628(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1040 string-append */
+/* eval.scm: 1033 string-append */
t2=((C_word*)t0)[3];
-((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[2],lf[236],t1,lf[237]);}
+((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[2],lf[228],t1,lf[229]);}
-/* 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){
+/* k7622 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7624(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1039 ##sys#make-c-string */
-t2=*((C_word*)lf[209]+1);
+/* eval.scm: 1032 ##sys#make-c-string */
+t2=*((C_word*)lf[201]+1);
((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-/* 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){
+/* k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7562(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10265,56 +10032,56 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7562,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7565,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t1,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7611,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1037 load-verbose */
t4=((C_word*)t0)[2];
((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
-/* 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){
+/* k7609 in k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7611(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7683,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7611,2,t0,t1);}
if(C_truep(t1)){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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 */
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7614,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1038 display */
t3=((C_word*)t0)[4];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[235]);}
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[227]);}
else{
t2=((C_word*)t0)[3];
-f_7637(2,t2,C_SCHEME_UNDEFINED);}}
+f_7565(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){
+/* k7612 in k7609 in k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7614(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7614,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7617,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1039 display */
t3=((C_word*)t0)[4];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7615 in k7612 in k7609 in k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7617(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1047 display */
+/* eval.scm: 1040 display */
t2=((C_word*)t0)[3];
-((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],lf[234]);}
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],lf[226]);}
-/* 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){
+/* k7563 in k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7565(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10323,15 +10090,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7565,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7570,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=((C_word)li178),tmp=(C_word)a,a+=6,tmp));
t5=((C_word*)t3)[1];
-f_7642(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_7570(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){
+/* loop in k7563 in k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7570(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -10340,29 +10107,29 @@ 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))){
+C_save_and_reclaim((void*)trf_7570,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_nullp(t2))){
t3=t1;
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
else{
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7583,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7604,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t5=C_slot(t2,C_fix(0));
+/* eval.scm: 1043 ##sys#make-c-string */
+t6=*((C_word*)lf[201]+1);
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}}
-/* 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){
+/* k7602 in loop in k7563 in k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7604(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 1050 ##sys#dload */
-t2=*((C_word*)lf[208]+1);
+/* eval.scm: 1043 ##sys#dload */
+t2=*((C_word*)lf[200]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_FALSE);}
-/* 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){
+/* k7581 in loop in k7563 in k7560 in k7557 in k7548 in ##sys#load-library-0 in k7542 in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7583(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10371,38 +10138,38 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7583,2,t0,t1);}
if(C_truep(t1)){
-if(C_truep((C_word)C_i_memq(((C_word*)t0)[5],C_retrieve(lf[146])))){
+if(C_truep(C_i_memq(((C_word*)t0)[5],C_retrieve(lf[138])))){
t2=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
else{
-t2=(C_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);
+t2=C_a_i_cons(&a,2,((C_word*)t0)[5],C_retrieve(lf[138]));
+t3=C_mutate((C_word*)lf[138]+1 /* (set! features ...) */,t2);
t4=((C_word*)t0)[4];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_TRUE);}}
else{
-t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(1));
-/* eval.scm: 1053 loop */
+t2=C_slot(((C_word*)t0)[3],C_fix(1));
+/* eval.scm: 1046 loop */
t3=((C_word*)((C_word*)t0)[2])[1];
-f_7642(t3,((C_word*)t0)[4],t2);}}
+f_7570(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){
+/* complete in k7533 in k7526 in k7521 in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7537(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7609,NULL,3,t0,t1,t2);}
-t3=*((C_word*)lf[13]+1);
-/* g17211722 */
+C_save_and_reclaim((void*)trf_7537,NULL,3,t0,t1,t2);}
+t3=*((C_word*)lf[10]+1);
+/* g17091710 */
t4=t3;
((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,((C_word*)t0)[2]);}
-/* load-noisily in 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,...){
+/* load-noisily in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7497(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -10411,38 +10178,38 @@ 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);}
+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_7569r(t0,t1,t2,t3);}}
+f_7497r(t0,t1,t2,t3);}}
-static void C_ccall f_7569r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_7497r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word *a=C_alloc(8);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7501,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7518,a[2]=((C_word)li175),tmp=(C_word)a,a+=3,tmp);
/* ##sys#get-keyword */
-t6=*((C_word*)lf[223]+1);
-((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t4,lf[226],t3,t5);}
+t6=*((C_word*)lf[215]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t4,lf[218],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){
+/* a7517 in load-noisily in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7518(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7590,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7518,2,t0,t1);}
t2=t1;
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-/* 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){
+/* k7499 in load-noisily in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7501(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10450,27 +10217,27 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7501,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7504,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7515,a[2]=((C_word)li174),tmp=(C_word)a,a+=3,tmp);
/* ##sys#get-keyword */
-t4=*((C_word*)lf[223]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,lf[225],((C_word*)t0)[2],t3);}
+t4=*((C_word*)lf[215]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,lf[217],((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){
+/* a7514 in k7499 in load-noisily in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7515(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7587,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7515,2,t0,t1);}
t2=t1;
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-/* 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){
+/* k7502 in k7499 in load-noisily in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7504(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10478,36 +10245,36 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7504,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7507,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7512,a[2]=((C_word)li173),tmp=(C_word)a,a+=3,tmp);
/* ##sys#get-keyword */
-t4=*((C_word*)lf[223]+1);
-((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,lf[224],((C_word*)t0)[2],t3);}
+t4=*((C_word*)lf[215]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,lf[216],((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){
+/* a7511 in k7502 in k7499 in load-noisily in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7512(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7584,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7512,2,t0,t1);}
t2=t1;
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-/* 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){
+/* k7505 in k7502 in k7499 in load-noisily in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7507(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 992 ##sys#load */
-t2=*((C_word*)lf[197]+1);
+/* eval.scm: 985 ##sys#load */
+t2=*((C_word*)lf[189]+1);
((C_proc7)(void*)(*((C_word*)t2+1)))(7,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],C_SCHEME_TRUE,((C_word*)t0)[2],t1);}
-/* load-relative in 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,...){
+/* load-relative in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7454(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -10516,30 +10283,30 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_7454r,3,t0,t1,t2);}
else{
a=C_alloc((c-3)*3);
t3=C_restore_rest(a,C_rest_count(0));
-f_7526r(t0,t1,t2,t3);}}
+f_7454r(t0,t1,t2,t3);}}
-static void C_ccall f_7526r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_7454r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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)))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7462,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t5=C_i_string_ref(t2,C_fix(0));
+if(C_truep((C_truep(C_eqp(t5,C_make_character(92)))?C_SCHEME_TRUE:(C_truep(C_eqp(t5,C_make_character(47)))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
t6=t4;
-f_7534(2,t6,t2);}
+f_7462(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);}}
+/* eval.scm: 981 ##sys#string-append */
+t6=*((C_word*)lf[10]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,C_retrieve(lf[172]),t2);}}
-/* 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){
+/* k7460 in load-relative in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7462(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10549,36 +10316,36 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7462,2,t0,t1);}
t2=((C_word*)t0)[3];
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7466,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t2))){
+/* eval.scm: 978 ##sys#load */
+t4=*((C_word*)lf[189]+1);
((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[2],t1,C_SCHEME_FALSE,C_SCHEME_FALSE);}
else{
-t4=(C_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);
+t4=C_i_cdr(t2);
+if(C_truep(C_i_nullp(t4))){
+t5=C_i_car(t2);
+/* eval.scm: 978 ##sys#load */
+t6=*((C_word*)lf[189]+1);
((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,((C_word*)t0)[2],t1,t5,C_SCHEME_FALSE);}
else{
/* ##sys#error */
-t5=*((C_word*)lf[14]+1);
+t5=*((C_word*)lf[11]+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){
+/* k7464 in k7460 in load-relative in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7466(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 985 ##sys#load */
-t2=*((C_word*)lf[197]+1);
+/* eval.scm: 978 ##sys#load */
+t2=*((C_word*)lf[189]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
-/* load in 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,...){
+/* load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7425(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -10587,47 +10354,47 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_7425r,3,t0,t1,t2);}
else{
a=C_alloc((c-3)*3);
t3=C_restore_rest(a,C_rest_count(0));
-f_7497r(t0,t1,t2,t3);}}
+f_7425r(t0,t1,t2,t3);}}
-static void C_ccall f_7497r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_7425r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a=C_alloc(4);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7433,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t3))){
+/* eval.scm: 975 ##sys#load */
+t5=*((C_word*)lf[189]+1);
((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,t2,C_SCHEME_FALSE,C_SCHEME_FALSE);}
else{
-t5=(C_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);
+t5=C_i_cdr(t3);
+if(C_truep(C_i_nullp(t5))){
+t6=C_i_car(t3);
+/* eval.scm: 975 ##sys#load */
+t7=*((C_word*)lf[189]+1);
((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t1,t2,t6,C_SCHEME_FALSE);}
else{
/* ##sys#error */
-t6=*((C_word*)lf[14]+1);
+t6=*((C_word*)lf[11]+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){
+/* k7431 in load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7433(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 982 ##sys#load */
-t2=*((C_word*)lf[197]+1);
+/* eval.scm: 975 ##sys#load */
+t2=*((C_word*)lf[189]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
-/* ##sys#load in 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,...){
+/* ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7004(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...){
C_word tmp;
C_word t5;
va_list v;
@@ -10636,13 +10403,13 @@ 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);}
+C_save_and_reclaim((void*)tr5r,(void*)f_7004r,5,t0,t1,t2,t3,t4);}
else{
a=C_alloc((c-5)*3);
t5=C_restore_rest(a,C_rest_count(0));
-f_7076r(t0,t1,t2,t3,t4,t5);}}
+f_7004r(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){
+static void C_ccall f_7004r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
@@ -10655,58 +10422,58 @@ 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 */
+t7=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_7006,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t6,a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=t4,a[13]=((C_word*)t0)[11],a[14]=((C_word*)t0)[12],a[15]=t3,a[16]=((C_word)li167),tmp=(C_word)a,a+=17,tmp);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7372,a[2]=t7,a[3]=((C_word)li168),tmp=(C_word)a,a+=4,tmp);
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7377,a[2]=t8,a[3]=((C_word)li169),tmp=(C_word)a,a+=4,tmp);
+if(C_truep(C_i_nullp(t5))){
+/* def-timer14931651 */
t10=t9;
-f_7449(t10,t1);}
+f_7377(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 */
+t10=C_i_car(t5);
+t11=C_i_cdr(t5);
+if(C_truep(C_i_nullp(t11))){
+/* def-printer14941649 */
t12=t8;
-f_7444(t12,t1,t10);}
+f_7372(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 */
+t12=C_i_car(t11);
+t13=C_i_cdr(t11);
+if(C_truep(C_i_nullp(t13))){
+/* body14911499 */
t14=t7;
-f_7078(t14,t1,t10,t12);}
+f_7006(t14,t1,t10,t12);}
else{
/* ##sys#error */
-t14=*((C_word*)lf[14]+1);
+t14=*((C_word*)lf[11]+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){
+/* def-timer1493 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7377(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7449,NULL,2,t0,t1);}
-/* def-printer15061661 */
+C_save_and_reclaim((void*)trf_7377,NULL,2,t0,t1);}
+/* def-printer14941649 */
t2=((C_word*)t0)[2];
-f_7444(t2,t1,C_SCHEME_FALSE);}
+f_7372(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){
+/* def-printer1494 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7372(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7444,NULL,3,t0,t1,t2);}
-/* body15031511 */
+C_save_and_reclaim((void*)trf_7372,NULL,3,t0,t1,t2);}
+/* body14911499 */
t3=((C_word*)t0)[2];
-f_7078(t3,t1,t2,C_SCHEME_FALSE);}
+f_7006(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){
+/* body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7006(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -10714,29 +10481,29 @@ 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_save_and_reclaim((void*)trf_7006,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_7010,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t3,a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=t2,a[15]=((C_word*)t0)[13],a[16]=t1,a[17]=((C_word*)t0)[14],a[18]=((C_word*)t0)[15],tmp=(C_word)a,a+=19,tmp);
+if(C_truep(C_i_stringp(((C_word*)((C_word*)t0)[7])[1]))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7371,a[2]=t4,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 907 ##sys#expand-home-path */
+t6=*((C_word*)lf[212]+1);
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)((C_word*)t0)[7])[1]);}
else{
t5=t4;
-f_7082(t5,C_SCHEME_UNDEFINED);}}
+f_7010(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){
+/* k7369 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7371(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
t3=((C_word*)t0)[2];
-f_7082(t3,t2);}
+f_7010(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){
+/* k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7010(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10746,17 +10513,17 @@ 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);}
+C_save_and_reclaim((void*)trf_7010,NULL,2,t0,t1);}
t2=C_SCHEME_FALSE;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_7013,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],a[15]=((C_word*)t0)[15],a[16]=((C_word*)t0)[16],a[17]=((C_word*)t0)[17],a[18]=((C_word*)t0)[18],tmp=(C_word)a,a+=19,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7293,a[2]=t3,a[3]=((C_word*)t0)[7],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 910 port? */
+t6=*((C_word*)lf[211]+1);
((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)((C_word*)t0)[7])[1]);}
-/* 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){
+/* k7291 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7293(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10764,24 +10531,24 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7293,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[4];
-f_7085(2,t2,C_SCHEME_FALSE);}
+f_7013(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);
+if(C_truep(C_i_stringp(((C_word*)((C_word*)t0)[3])[1]))){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7308,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 912 ##sys#file-info */
+t3=*((C_word*)lf[207]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)((C_word*)t0)[3])[1]);}
else{
t2=((C_word*)((C_word*)t0)[3])[1];
-/* eval.scm: 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);}}}
+/* eval.scm: 903 ##sys#signal-hook */
+t3=*((C_word*)lf[181]+1);
+((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,((C_word*)t0)[4],lf[209],lf[194],lf[210],t2);}}}
-/* 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){
+/* k7306 in k7291 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7308(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10791,42 +10558,42 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7308,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7311,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
if(C_truep(t1)){
-t3=(C_word)C_slot(t1,C_fix(4));
+t3=C_slot(t1,C_fix(4));
if(C_truep(t3)){
-t4=(C_word)C_eqp(C_fix(1),t3);
+t4=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]));}
+f_7311(t6,C_i_not(((C_word*)((C_word*)t0)[2])[1]));}
else{
t4=t2;
-f_7383(t4,C_SCHEME_FALSE);}}
+f_7311(t4,C_SCHEME_FALSE);}}
else{
t3=t2;
-f_7383(t3,C_SCHEME_FALSE);}}
+f_7311(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){
+/* k7309 in k7306 in k7291 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7311(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_7383,NULL,2,t0,t1);}
+C_save_and_reclaim((void*)trf_7311,NULL,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[4];
-f_7085(2,t2,((C_word*)((C_word*)t0)[3])[1]);}
+f_7013(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]));}}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7314,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 918 ##sys#string-append */
+t3=*((C_word*)lf[10]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)((C_word*)t0)[3])[1],C_retrieve(lf[208]));}}
-/* 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){
+/* k7312 in k7309 in k7306 in k7291 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7314(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10834,23 +10601,23 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_7314,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7320,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t3=C_retrieve(lf[174]);
if(C_truep(t3)){
t4=t2;
-f_7392(2,t4,C_SCHEME_FALSE);}
+f_7320(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);
+if(C_truep(C_fudge(C_fix(24)))){
+/* eval.scm: 921 ##sys#file-info */
+t4=*((C_word*)lf[207]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t1);}
else{
t4=t2;
-f_7392(2,t4,C_SCHEME_FALSE);}}}
+f_7320(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){
+/* k7318 in k7312 in k7309 in k7306 in k7291 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7320(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10858,33 +10625,33 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7320,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[5];
t3=((C_word*)t0)[4];
-f_7085(2,t3,t2);}
+f_7013(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]);}}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7323,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 923 ##sys#string-append */
+t3=*((C_word*)lf[10]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)((C_word*)t0)[2])[1],lf[7]);}}
-/* 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){
+/* k7321 in k7318 in k7312 in k7309 in k7306 in k7291 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7323(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_7323,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7329,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 924 ##sys#file-info */
+t3=*((C_word*)lf[207]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,t1);}
-/* 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){
+/* k7327 in k7321 in k7318 in k7312 in k7309 in k7306 in k7291 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7329(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10892,19 +10659,19 @@ C_word t4;
C_word *a;
if(C_truep(t1)){
t2=((C_word*)t0)[5];
-f_7085(2,t2,((C_word*)t0)[4]);}
+f_7013(2,t2,((C_word*)t0)[4]);}
else{
t2=((C_word*)((C_word*)t0)[3])[1];
if(C_truep(t2)){
t3=((C_word*)t0)[5];
-f_7085(2,t3,C_SCHEME_FALSE);}
+f_7013(2,t3,C_SCHEME_FALSE);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=((C_word*)t0)[5];
-f_7085(2,t4,t3);}}}
+f_7013(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){
+/* k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7013(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10916,24 +10683,24 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7013,2,t0,t1);}
t2=((C_word*)t0)[18];
t3=(C_truep(t2)?t2:((C_word*)t0)[17]);
-t4=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_7019,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[12],a[10]=((C_word*)t0)[13],a[11]=t3,a[12]=((C_word*)t0)[14],a[13]=((C_word*)t0)[15],a[14]=t1,a[15]=((C_word*)t0)[16],tmp=(C_word)a,a+=16,tmp);
+t5=C_i_stringp(((C_word*)((C_word*)t0)[7])[1]);
+t6=(C_truep(t5)?C_i_not(t1):C_SCHEME_FALSE);
if(C_truep(t6)){
-/* eval.scm: 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]);}
+/* eval.scm: 929 ##sys#signal-hook */
+t7=*((C_word*)lf[181]+1);
+((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t4,lf[203],lf[194],lf[204],((C_word*)((C_word*)t0)[7])[1]);}
else{
-t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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 */
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7284,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 930 load-verbose */
t8=((C_word*)t0)[2];
((C_proc2)C_retrieve_proc(t8))(2,t8,t7);}}
-/* 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){
+/* k7282 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7284(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -10942,57 +10709,57 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7284,2,t0,t1);}
t2=(C_truep(t1)?((C_word*)t0)[5]:C_SCHEME_FALSE);
if(C_truep(t2)){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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 */
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7272,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 931 display */
t4=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[214]);}
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[206]);}
else{
t3=C_SCHEME_UNDEFINED;
t4=((C_word*)t0)[3];
-f_7091(2,t4,t3);}}
+f_7019(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){
+/* k7270 in k7282 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7272(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7272,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7275,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 932 display */
t3=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7273 in k7270 in k7282 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7275(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7275,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7278,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 933 display */
t3=((C_word*)t0)[2];
-((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[213]);}
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[205]);}
-/* 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){
+/* k7276 in k7273 in k7270 in k7282 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7278(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 941 flush-output */
+/* eval.scm: 934 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){
+/* k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7019(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11001,29 +10768,29 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7019,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_7022,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],tmp=(C_word)a,a+=15,tmp);
if(C_truep(((C_word*)t0)[14])){
-t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7229,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[2],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7257,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 936 ##sys#make-c-string */
+t5=*((C_word*)lf[201]+1);
((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[14]);}
else{
t3=t2;
-f_7094(2,t3,C_SCHEME_FALSE);}}
+f_7022(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){
+/* k7255 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7257(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 943 ##sys#dload */
-t2=*((C_word*)lf[208]+1);
+/* eval.scm: 936 ##sys#dload */
+t2=*((C_word*)lf[200]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_TRUE);}
-/* 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){
+/* k7227 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7229(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11031,18 +10798,18 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7229,2,t0,t1);}
if(C_truep(t1)){
t2=t1;
t3=((C_word*)t0)[5];
-f_7094(2,t3,t2);}
+f_7022(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]);}}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7253,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 937 has-sep? */
+f_6958(t2,((C_word*)t0)[3]);}}
-/* 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){
+/* k7251 in k7227 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7253(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11050,37 +10817,37 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7253,2,t0,t1);}
if(C_truep(t1)){
t2=((C_word*)t0)[4];
-f_7094(2,t2,C_SCHEME_FALSE);}
+f_7022(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]);}}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7245,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7249,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 938 ##sys#string-append */
+t4=*((C_word*)lf[10]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[202],((C_word*)t0)[2]);}}
-/* 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){
+/* k7247 in k7251 in k7227 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7249(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 945 ##sys#make-c-string */
-t2=*((C_word*)lf[209]+1);
+/* eval.scm: 938 ##sys#make-c-string */
+t2=*((C_word*)lf[201]+1);
((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
-/* 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){
+/* k7243 in k7251 in k7227 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7245(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 945 ##sys#dload */
-t2=*((C_word*)lf[208]+1);
+/* eval.scm: 938 ##sys#dload */
+t2=*((C_word*)lf[200]+1);
((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_TRUE);}
-/* 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){
+/* k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7022(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11088,19 +10855,19 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7022,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7025,a[2]=((C_word*)t0)[14],tmp=(C_word)a,a+=3,tmp);
if(C_truep(t1)){
t3=((C_word*)t0)[14];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_UNDEFINED);}
else{
-t3=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_7030,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word)li166),tmp=(C_word)a,a+=15,tmp);
+/* eval.scm: 939 call-with-current-continuation */
+t4=*((C_word*)lf[199]+1);
((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t3);}}
-/* 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){
+/* a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7030(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -11113,37 +10880,37 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_7030,3,t0,t1,t2);}
t3=C_SCHEME_TRUE;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=((C_word*)t0)[13];
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_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);
+t7=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_7034,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[12],a[14]=t6,a[15]=t4,a[16]=t2,tmp=(C_word)a,a+=17,tmp);
if(C_truep(((C_word*)t0)[13])){
-t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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]);}
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7216,a[2]=((C_word*)t0)[13],a[3]=t7,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 945 has-sep? */
+f_6958(t8,((C_word*)t0)[13]);}
else{
t8=t7;
-f_7106(2,t8,C_SCHEME_FALSE);}}
+f_7034(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){
+/* k7214 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7216(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
if(C_truep(t1)){
-t2=(C_word)C_fixnum_plus(t1,C_fix(1));
-/* eval.scm: 953 ##sys#substring */
-t3=*((C_word*)lf[205]+1);
+t2=C_fixnum_plus(t1,C_fix(1));
+/* eval.scm: 946 ##sys#substring */
+t3=*((C_word*)lf[197]+1);
((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0),t2);}
else{
t2=((C_word*)t0)[3];
-f_7106(2,t2,lf[206]);}}
+f_7034(2,t2,lf[198]);}}
-/* 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){
+/* k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7034(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11164,10 +10931,10 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7034,2,t0,t1);}
t2=t1;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7107,a[2]=((C_word*)t0)[16],a[3]=((C_word)li153),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7035,a[2]=((C_word*)t0)[16],a[3]=((C_word)li152),tmp=(C_word)a,a+=4,tmp);
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_FALSE;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
@@ -11177,15 +10944,15 @@ 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);
+t14=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7044,a[2]=t5,a[3]=t3,a[4]=((C_word*)t0)[14],a[5]=((C_word*)t0)[15],a[6]=t13,a[7]=t11,a[8]=t9,a[9]=t7,a[10]=((C_word)li153),tmp=(C_word)a,a+=11,tmp);
+t15=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7055,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[13],a[13]=((C_word)li164),tmp=(C_word)a,a+=14,tmp);
+t16=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7204,a[2]=t13,a[3]=t11,a[4]=t9,a[5]=t7,a[6]=t5,a[7]=t3,a[8]=((C_word*)t0)[14],a[9]=((C_word*)t0)[15],a[10]=((C_word)li165),tmp=(C_word)a,a+=11,tmp);
/* ##sys#dynamic-wind */
-t17=*((C_word*)lf[47]+1);
+t17=*((C_word*)lf[44]+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){
+/* a7203 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7204(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11200,20 +10967,20 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_7204,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[9])+1,C_retrieve(lf[190]));
+t3=C_mutate(((C_word *)((C_word*)t0)[8])+1,C_retrieve(lf[171]));
+t4=C_mutate(((C_word *)((C_word*)t0)[7])+1,C_retrieve(lf[172]));
+t5=C_mutate(((C_word *)((C_word*)t0)[6])+1,C_retrieve(lf[170]));
+t6=C_mutate((C_word*)lf[190]+1 /* (set! read-error-with-line-number ...) */,((C_word*)((C_word*)t0)[5])[1]);
+t7=C_mutate((C_word*)lf[171]+1 /* (set! current-source-filename ...) */,((C_word*)((C_word*)t0)[4])[1]);
+t8=C_mutate((C_word*)lf[172]+1 /* (set! current-load-path ...) */,((C_word*)((C_word*)t0)[3])[1]);
+t9=C_mutate((C_word*)lf[170]+1 /* (set! abort-load ...) */,((C_word*)((C_word*)t0)[2])[1]);
t10=t1;
((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_SCHEME_UNDEFINED);}
-/* 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){
+/* a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7055(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11221,18 +10988,18 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7055,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7059,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],tmp=(C_word)a,a+=12,tmp);
if(C_truep(((C_word*)t0)[5])){
-/* eval.scm: 955 open-input-file */
+/* eval.scm: 948 open-input-file */
t3=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[5]);}
else{
t3=t2;
-f_7131(2,t3,((C_word*)((C_word*)t0)[2])[1]);}}
+f_7059(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){
+/* k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7059(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11241,29 +11008,29 @@ 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_save_and_reclaim((void*)tr2,(void*)f_7059,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7064,a[2]=((C_word)li154),tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7067,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[10],a[9]=t1,a[10]=((C_word*)t0)[11],a[11]=((C_word)li162),tmp=(C_word)a,a+=12,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7195,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word)li163),tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 949 ##sys#dynamic-wind */
+t5=*((C_word*)lf[44]+1);
((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,((C_word*)t0)[2],t2,t3,t4);}
-/* 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){
+/* a7194 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7195(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7267,2,t0,t1);}
-/* eval.scm: 978 close-input-port */
+C_save_and_reclaim((void*)tr2,(void*)f_7195,2,t0,t1);}
+/* eval.scm: 971 close-input-port */
t2=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
-/* 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){
+/* a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7067(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11271,14 +11038,14 @@ 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_save_and_reclaim((void*)tr2,(void*)f_7067,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7071,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
+/* eval.scm: 952 peek-char */
+t3=*((C_word*)lf[196]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[9]);}
-/* 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){
+/* k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7071(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11287,43 +11054,43 @@ 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));
+C_save_and_reclaim((void*)tr2,(void*)f_7071,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7074,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
+t3=C_eqp(t1,C_make_character(127));
if(C_truep(t3)){
-t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7261,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7189,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* ##sys#peek-c-string */
-t5=*((C_word*)lf[16]+1);
+t5=*((C_word*)lf[13]+1);
((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,C_mpointer(&a,(void*)C_dlerror),C_fix(0));}
else{
t4=t2;
-f_7146(2,t4,C_SCHEME_UNDEFINED);}}
+f_7074(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){
+/* k7187 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7189(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 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);}
+/* eval.scm: 954 ##sys#error */
+t2=*((C_word*)lf[11]+1);
+((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],lf[194],lf[195],((C_word*)t0)[2],t1);}
-/* 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){
+/* k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7074(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[11],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7074,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7077,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],tmp=(C_word)a,a+=11,tmp);
+/* eval.scm: 955 read */
t3=((C_word*)t0)[10];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[9]);}
-/* 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){
+/* k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7077(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11332,15 +11099,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7077,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7082,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[10],a[10]=t3,a[11]=((C_word)li161),tmp=(C_word)a,a+=12,tmp));
t5=((C_word*)t3)[1];
-f_7154(t5,((C_word*)t0)[2],t1);}
+f_7082(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){
+/* doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7082(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -11348,23 +11115,23 @@ 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))){
+C_save_and_reclaim((void*)trf_7082,NULL,3,t0,t1,t2);}
+if(C_truep(C_eofp(t2))){
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
else{
-t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7092,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t2,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
if(C_truep(((C_word*)t0)[2])){
-/* eval.scm: 965 printer */
+/* eval.scm: 958 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);}}}
+f_7092(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){
+/* k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7092(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11373,15 +11140,15 @@ 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_save_and_reclaim((void*)tr2,(void*)f_7092,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7095,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],tmp=(C_word)a,a+=6,tmp);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7104,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word)li157),tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7138,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word)li160),tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 959 ##sys#call-with-values */
C_call_with_values(4,0,t2,t3,t4);}
-/* 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,...){
+/* a7137 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7138(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -11389,13 +11156,13 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_7138r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_7210r(t0,t1,t2);}}
+f_7138r(t0,t1,t2);}}
-static void C_ccall f_7210r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_7138r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -11406,16 +11173,16 @@ 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));
+t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7147,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word)li159),tmp=(C_word)a,a+=6,tmp));
t6=((C_word*)t4)[1];
-f_7219(t6,t1,t2);}
+f_7147(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){
+/* loop1621 in a7137 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7147(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -11425,54 +11192,54 @@ 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 */
+C_save_and_reclaim((void*)trf_7147,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7155,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li158),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7165,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g16281629 */
t6=t3;
-f_7227(t6,t4,t5);}
+f_7155(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){
+/* k7163 in loop1621 in a7137 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7165(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_7147(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){
+/* g1628 in loop1621 in a7137 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_7155(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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 */
+C_save_and_reclaim((void*)trf_7155,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7159,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 968 write */
t4=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
-/* 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){
+/* k7157 in g1628 in loop1621 in a7137 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7159(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 976 newline */
+/* eval.scm: 969 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){
+/* a7103 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7104(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11480,19 +11247,19 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_7104,2,t0,t1);}
if(C_truep(((C_word*)t0)[4])){
-t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7183,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7111,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
/* ##sys#start-timer */
-t3=*((C_word*)lf[201]+1);
+t3=*((C_word*)lf[193]+1);
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-/* eval.scm: 970 evproc */
+/* eval.scm: 963 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){
+/* k7109 in a7103 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7111(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11500,14 +11267,14 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_7111,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7116,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li155),tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7122,a[2]=((C_word)li156),tmp=(C_word)a,a+=3,tmp);
/* ##sys#call-with-values */
C_call_with_values(4,0,((C_word*)t0)[2],t2,t3);}
-/* 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,...){
+/* a7121 in k7109 in a7103 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7122(C_word c,C_word t0,C_word t1,...){
C_word tmp;
C_word t2;
va_list v;
@@ -11515,88 +11282,88 @@ 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);}
+C_save_and_reclaim((void*)tr2r,(void*)f_7122r,2,t0,t1);}
else{
a=C_alloc((c-2)*3);
t2=C_restore_rest(a,C_rest_count(0));
-f_7194r(t0,t1,t2);}}
+f_7122r(t0,t1,t2);}}
-static void C_ccall f_7194r(C_word t0,C_word t1,C_word t2){
+static void C_ccall f_7122r(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word *a=C_alloc(7);
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_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);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7126,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7133,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
/* ##sys#stop-timer */
-t5=*((C_word*)lf[200]+1);
+t5=*((C_word*)lf[192]+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){
+/* k7131 in a7121 in k7109 in a7103 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7133(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#display-times */
-((C_proc3)C_retrieve_symbol_proc(lf[199]))(3,*((C_word*)lf[199]+1),((C_word*)t0)[2],t1);}
+((C_proc3)C_retrieve_symbol_proc(lf[191]))(3,*((C_word*)lf[191]+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){
+/* k7124 in a7121 in k7109 in a7103 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7126(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_apply_values(3,0,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* a7115 in k7109 in a7103 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7116(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7188,2,t0,t1);}
-/* eval.scm: 969 evproc */
+C_save_and_reclaim((void*)tr2,(void*)f_7116,2,t0,t1);}
+/* eval.scm: 962 evproc */
t2=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
-/* 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){
+/* k7093 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7095(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_7095,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7102,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 956 read */
t3=((C_word*)t0)[3];
((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k7100 in k7093 in k7090 in doloop1603 in k7075 in k7072 in k7069 in a7066 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7102(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)((C_word*)t0)[3])[1];
-f_7154(t2,((C_word*)t0)[2],t1);}
+f_7082(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){
+/* a7063 in k7057 in a7054 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7064(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7136,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_7064,2,t0,t1);}
t2=t1;
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-/* 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){
+/* a7043 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7044(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11611,41 +11378,41 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_7044,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[9])+1,C_retrieve(lf[190]));
+t3=C_mutate(((C_word *)((C_word*)t0)[8])+1,C_retrieve(lf[171]));
+t4=C_mutate(((C_word *)((C_word*)t0)[7])+1,C_retrieve(lf[172]));
+t5=C_mutate(((C_word *)((C_word*)t0)[6])+1,C_retrieve(lf[170]));
+t6=C_mutate((C_word*)lf[190]+1 /* (set! read-error-with-line-number ...) */,((C_word*)((C_word*)t0)[5])[1]);
+t7=C_mutate((C_word*)lf[171]+1 /* (set! current-source-filename ...) */,((C_word*)((C_word*)t0)[4])[1]);
+t8=C_mutate((C_word*)lf[172]+1 /* (set! current-load-path ...) */,((C_word*)((C_word*)t0)[3])[1]);
+t9=C_mutate((C_word*)lf[170]+1 /* (set! abort-load ...) */,((C_word*)((C_word*)t0)[2])[1]);
t10=t1;
((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_SCHEME_UNDEFINED);}
-/* f_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){
+/* f_7035 in k7032 in a7029 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7035(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_7107,2,t0,t1);}
-/* eval.scm: 954 abrt */
+C_save_and_reclaim((void*)tr2,(void*)f_7035,2,t0,t1);}
+/* eval.scm: 947 abrt */
t2=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t2))(3,t2,t1,C_SCHEME_FALSE);}
-/* 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){
+/* k7023 in k7020 in k7017 in k7011 in k7008 in body1491 in ##sys#load in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_7025(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
t2=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
-/* has-sep? in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
-static void C_fcall f_7030(C_word t1,C_word t2){
+/* has-sep? in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_6958(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -11654,15 +11421,15 @@ 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);
+C_save_and_reclaim((void*)trf_6958,NULL,2,t1,t2);}
+t3=C_block_size(t2);
+t4=C_fixnum_difference(t3,C_fix(1));
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6968,a[2]=t2,a[3]=((C_word)li150),tmp=(C_word)a,a+=4,tmp);
t6=t1;
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,f_7040(t5,t4));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,f_6968(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){
+/* loop in has-sep? in k6954 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static C_word C_fcall f_6968(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -11670,20 +11437,20 @@ C_word t4;
C_word t5;
loop:
C_stack_check;
-if(C_truep((C_word)C_i_zerop(t1))){
+if(C_truep(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)))){
+t2=C_subchar(((C_word*)t0)[2],t1);
+if(C_truep((C_truep(C_eqp(t2,C_make_character(92)))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,C_make_character(47)))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
return(t1);}
else{
-t3=(C_word)C_fixnum_difference(t1,C_fix(1));
+t3=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){
+/* set-dynamic-load-mode! in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_6883(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -11700,22 +11467,22 @@ 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));
+C_save_and_reclaim((void*)tr3,(void*)f_6883,3,t0,t1,t2);}
+t3=C_i_pairp(t2);
+t4=(C_truep(t3)?t2:C_a_i_list(&a,1,t2));
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_TRUE;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6962,a[2]=t8,a[3]=t6,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6890,a[2]=t8,a[3]=t6,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
t10=C_SCHEME_UNDEFINED;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
-t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6967,a[2]=t6,a[3]=t8,a[4]=t11,a[5]=((C_word)li149),tmp=(C_word)a,a+=6,tmp));
+t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6895,a[2]=t6,a[3]=t8,a[4]=t11,a[5]=((C_word)li148),tmp=(C_word)a,a+=6,tmp));
t13=((C_word*)t11)[1];
-f_6967(t13,t9,t4);}
+f_6895(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){
+/* loop in set-dynamic-load-mode! in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_6895(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -11741,97 +11508,97 @@ 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]);
+C_save_and_reclaim((void*)trf_6895,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_slot(t2,C_fix(0));
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6908,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_eqp(t3,lf[177]);
if(C_truep(t5)){
t6=C_set_block_item(((C_word*)t0)[3],0,C_SCHEME_TRUE);
-t7=(C_word)C_slot(t2,C_fix(1));
-/* eval.scm: 889 loop */
+t7=C_slot(t2,C_fix(1));
+/* eval.scm: 882 loop */
t20=t1;
t21=t7;
t1=t20;
t2=t21;
goto loop;}
else{
-t6=(C_word)C_eqp(t3,lf[186]);
+t6=C_eqp(t3,lf[178]);
if(C_truep(t6)){
t7=C_set_block_item(((C_word*)t0)[3],0,C_SCHEME_FALSE);
-t8=(C_word)C_slot(t2,C_fix(1));
-/* eval.scm: 889 loop */
+t8=C_slot(t2,C_fix(1));
+/* eval.scm: 882 loop */
t20=t1;
t21=t8;
t1=t20;
t2=t21;
goto loop;}
else{
-t7=(C_word)C_eqp(t3,lf[187]);
+t7=C_eqp(t3,lf[179]);
if(C_truep(t7)){
t8=C_set_block_item(((C_word*)t0)[2],0,C_SCHEME_FALSE);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* eval.scm: 889 loop */
+t9=C_slot(t2,C_fix(1));
+/* eval.scm: 882 loop */
t20=t1;
t21=t9;
t1=t20;
t2=t21;
goto loop;}
else{
-t8=(C_word)C_eqp(t3,lf[188]);
+t8=C_eqp(t3,lf[180]);
if(C_truep(t8)){
t9=C_set_block_item(((C_word*)t0)[2],0,C_SCHEME_TRUE);
-t10=(C_word)C_slot(t2,C_fix(1));
-/* eval.scm: 889 loop */
+t10=C_slot(t2,C_fix(1));
+/* eval.scm: 882 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);}}}}}
+t9=C_slot(t2,C_fix(0));
+/* eval.scm: 881 ##sys#signal-hook */
+t10=*((C_word*)lf[181]+1);
+((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t4,lf[175],lf[182],t9);}}}}}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k6906 in loop in set-dynamic-load-mode! in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_6908(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
-/* eval.scm: 889 loop */
+t2=C_slot(((C_word*)t0)[4],C_fix(1));
+/* eval.scm: 882 loop */
t3=((C_word*)((C_word*)t0)[3])[1];
-f_6967(t3,((C_word*)t0)[2],t2);}
+f_6895(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){
+/* k6888 in set-dynamic-load-mode! in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_6890(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 890 ##sys#set-dlopen-flags! */
-t2=*((C_word*)lf[184]+1);
+/* eval.scm: 883 ##sys#set-dlopen-flags! */
+t2=*((C_word*)lf[176]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],((C_word*)((C_word*)t0)[3])[1],((C_word*)((C_word*)t0)[2])[1]);}
-/* f_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){
+/* f_6877 in k6873 in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_6877(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6949,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_6877,2,t0,t1);}
t2=t1;
((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
-/* ##sys#decompose-lambda-list in 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){
+/* ##sys#decompose-lambda-list in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_6793(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -11842,16 +11609,16 @@ 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);
+C_save_and_reclaim((void*)tr4,(void*)f_6793,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6796,a[2]=t2,a[3]=((C_word)li144),tmp=(C_word)a,a+=4,tmp);
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t7=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6806,a[2]=t4,a[3]=t6,a[4]=((C_word*)t0)[2],a[5]=t3,a[6]=((C_word)li145),tmp=(C_word)a,a+=7,tmp));
t8=((C_word*)t6)[1];
-f_6878(t8,t1,t2,C_SCHEME_END_OF_LIST,C_fix(0));}
+f_6806(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){
+/* loop in ##sys#decompose-lambda-list in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_6806(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
@@ -11871,28 +11638,28 @@ 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);
+C_save_and_reclaim((void*)trf_6806,NULL,5,t0,t1,t2,t3,t4);}
+t5=C_eqp(t2,C_SCHEME_END_OF_LIST);
if(C_truep(t5)){
-t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6892,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
-/* eval.scm: 857 reverse */
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6820,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 850 reverse */
t7=((C_word*)t0)[4];
((C_proc3)C_retrieve_proc(t7))(3,t7,t6,t3);}
else{
-if(C_truep((C_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 */
+if(C_truep(C_blockp(t2))){
+if(C_truep(C_symbolp(t2))){
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6839,a[2]=t2,a[3]=t4,a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t7=C_a_i_cons(&a,2,t2,t3);
+/* eval.scm: 852 reverse */
t8=((C_word*)t0)[4];
((C_proc3)C_retrieve_proc(t8))(3,t8,t6,t7);}
else{
-if(C_truep((C_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 */
+if(C_truep(C_pairp(t2))){
+t6=C_slot(t2,C_fix(1));
+t7=C_slot(t2,C_fix(0));
+t8=C_a_i_cons(&a,2,t7,t3);
+t9=C_fixnum_plus(t4,C_fix(1));
+/* eval.scm: 854 loop */
t14=t1;
t15=t6;
t16=t8;
@@ -11903,48 +11670,48 @@ t3=t16;
t4=t17;
goto loop;}
else{
-/* eval.scm: 860 err */
+/* eval.scm: 853 err */
t6=((C_word*)t0)[2];
-f_6868(t6,t1);}}}
+f_6796(t6,t1);}}}
else{
-/* eval.scm: 858 err */
+/* eval.scm: 851 err */
t6=((C_word*)t0)[2];
-f_6868(t6,t1);}}}
+f_6796(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){
+/* k6837 in loop in ##sys#decompose-lambda-list in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_6839(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 859 k */
+/* eval.scm: 852 k */
t2=((C_word*)t0)[5];
((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k6818 in loop in ##sys#decompose-lambda-list in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_6820(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 857 k */
+/* eval.scm: 850 k */
t2=((C_word*)t0)[4];
((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_FALSE);}
-/* err in ##sys#decompose-lambda-list in k6850 in k2988 in k2985 in k2952 */
-static void C_fcall f_6868(C_word t0,C_word t1){
+/* err in ##sys#decompose-lambda-list in k6778 in k2988 in k2985 in k2952 */
+static void C_fcall f_6796(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_6796,NULL,2,t0,t1);}
+t2=C_set_block_item(lf[167] /* syntax-error-culprit */,0,C_SCHEME_FALSE);
+/* eval.scm: 847 ##sys#syntax-error-hook */
+t3=*((C_word*)lf[47]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t1,lf[168],((C_word*)t0)[2]);}
-/* eval in 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,...){
+/* eval in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_6783(C_word c,C_word t0,C_word t1,C_word t2,...){
C_word tmp;
C_word t3;
va_list v;
@@ -11953,24 +11720,24 @@ 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);}
+C_save_and_reclaim((void*)tr3r,(void*)f_6783r,3,t0,t1,t2);}
else{
a=C_alloc((c-3)*3);
t3=C_restore_rest(a,C_rest_count(0));
-f_6855r(t0,t1,t2,t3);}}
+f_6783r(t0,t1,t2,t3);}}
-static void C_ccall f_6855r(C_word t0,C_word t1,C_word t2,C_word t3){
+static void C_ccall f_6783r(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word *a=C_alloc(5);
-t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_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);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6791,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 835 ##sys#eval-handler */
+t5=*((C_word*)lf[164]+1);
((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
-/* 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){
+/* k6789 in eval in k6778 in k2988 in k2985 in k2952 */
+static void C_ccall f_6791(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
@@ -11999,17 +11766,17 @@ 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))){
+if(C_truep(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))){
+t7=C_i_cdr(t5);
+if(C_truep(C_i_nullp(t7))){
t8=t6;
-f_3363(2,t8,(C_word)C_i_car(t5));}
+f_3363(2,t8,C_i_car(t5));}
else{
/* ##sys#error */
-t8=*((C_word*)lf[14]+1);
+t8=*((C_word*)lf[11]+1);
((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,lf[0],t5);}}}
/* k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
@@ -12051,19 +11818,19 @@ 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 */
+t14=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3365,a[2]=t3,a[3]=((C_word)li17),tmp=(C_word)a,a+=4,tmp));
+t15=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3404,a[2]=t3,a[3]=((C_word)li18),tmp=(C_word)a,a+=4,tmp));
+t16=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3419,a[2]=t5,a[3]=((C_word)li22),tmp=(C_word)a,a+=4,tmp));
+t17=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3526,a[2]=((C_word)li25),tmp=(C_word)a,a+=3,tmp));
+t18=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3577,a[2]=t13,a[3]=((C_word*)t0)[6],a[4]=t5,a[5]=t9,a[6]=t11,a[7]=((C_word*)t0)[7],a[8]=t7,a[9]=((C_word)li129),tmp=(C_word)a,a+=10,tmp));
+t19=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6457,a[2]=t11,a[3]=((C_word)li141),tmp=(C_word)a,a+=4,tmp));
+t20=C_fixnum_greaterp(C_retrieve(lf[31]),C_fix(0));
+/* eval.scm: 814 compile */
t21=((C_word*)t11)[1];
f_3577(t21,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],C_SCHEME_FALSE,t20,t1,((C_word*)t0)[2]);}
/* compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
-static void C_fcall f_6529(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
+static void C_fcall f_6457(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
C_word tmp;
C_word t7;
C_word t8;
@@ -12071,15 +11838,15 @@ 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 */
+C_save_and_reclaim((void*)trf_6457,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
+t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6461,a[2]=t6,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=t5,a[6]=t4,a[7]=t1,a[8]=t2,tmp=(C_word)a,a+=9,tmp);
+t8=C_slot(t2,C_fix(0));
+/* eval.scm: 778 compile */
t9=((C_word*)((C_word*)t0)[2])[1];
f_3577(t9,t7,t8,t3,C_SCHEME_FALSE,t4,t5,t6);}
-/* 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){
+/* k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6461(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12105,41 +11872,41 @@ 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));
+C_save_and_reclaim((void*)tr2,(void*)f_6461,2,t0,t1);}
+t2=C_slot(((C_word*)t0)[8],C_fix(1));
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6431,a[2]=((C_word)li130),tmp=(C_word)a,a+=3,tmp);
+t4=f_6431(t2,C_fix(0));
t5=((C_word*)t0)[8];
switch(t4){
case C_SCHEME_FALSE:
-/* eval.scm: 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]);
+/* eval.scm: 783 ##sys#syntax-error-hook */
+t6=*((C_word*)lf[47]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,((C_word*)t0)[7],lf[163],((C_word*)t0)[8]);
case C_fix(0):
t6=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6483,a[2]=t1,a[3]=t5,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word)li131),tmp=(C_word)a,a+=7,tmp));
case C_fix(1):
-t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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 */
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6502,a[2]=((C_word*)t0)[7],a[3]=t5,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+t7=C_slot(t2,C_fix(0));
+/* eval.scm: 787 compile */
t8=((C_word*)((C_word*)t0)[4])[1];
f_3577(t8,t6,t7,((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[2]);
case C_fix(2):
-t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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 */
+t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6530,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=t5,a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=t1,a[10]=((C_word*)t0)[7],tmp=(C_word)a,a+=11,tmp);
+t7=C_slot(t2,C_fix(0));
+/* eval.scm: 791 compile */
t8=((C_word*)((C_word*)t0)[4])[1];
f_3577(t8,t6,t7,((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[2]);
case C_fix(3):
-t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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 */
+t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6565,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[7],a[7]=t5,a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=t1,tmp=(C_word)a,a+=11,tmp);
+t7=C_slot(t2,C_fix(0));
+/* eval.scm: 796 compile */
t8=((C_word*)((C_word*)t0)[4])[1];
f_3577(t8,t6,t7,((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[2]);
case C_fix(4):
-t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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 */
+t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6607,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=t5,a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=t1,a[10]=((C_word*)t0)[7],tmp=(C_word)a,a+=11,tmp);
+t7=C_slot(t2,C_fix(0));
+/* eval.scm: 802 compile */
t8=((C_word*)((C_word*)t0)[4])[1];
f_3577(t8,t6,t7,((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[2]);
default:
@@ -12147,15 +11914,15 @@ 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);
+t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6650,a[2]=t5,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],a[5]=t1,a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
t11=C_SCHEME_UNDEFINED;
t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
-t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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));
+t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6708,a[2]=t7,a[3]=t12,a[4]=t9,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[3],a[9]=((C_word*)t0)[4],a[10]=((C_word)li140),tmp=(C_word)a,a+=11,tmp));
t14=((C_word*)t12)[1];
-f_6780(t14,t10,t2);}}
+f_6708(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){
+/* loop1321 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_fcall f_6708(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12165,21 +11932,21 @@ 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 */
+C_save_and_reclaim((void*)trf_6708,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6735,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word)li139),tmp=(C_word)a,a+=8,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6742,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g13371338 */
t6=t3;
-f_6807(t6,t4,t5);}
+f_6735(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k6740 in loop1321 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6742(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12192,48 +11959,48 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6742,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop13331346 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop13211334 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6780(t6,((C_word*)t0)[3],t5);}
+f_6708(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop13331346 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop13211334 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6780(t6,((C_word*)t0)[3],t5);}}
+f_6708(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){
+/* g1337 in loop1321 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_fcall f_6735(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6807,NULL,3,t0,t1,t2);}
-/* eval.scm: 816 compile */
+C_save_and_reclaim((void*)trf_6735,NULL,3,t0,t1,t2);}
+/* eval.scm: 809 compile */
t3=((C_word*)((C_word*)t0)[6])[1];
f_3577(t3,t1,t2,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k6648 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6650(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[8],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6722,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_6650,2,t0,t1);}
t2=((C_word*)t0)[6];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6651,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word)li138),tmp=(C_word)a,a+=8,tmp));}
-/* f_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){
+/* f_6651 in k6648 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6651(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12245,34 +12012,34 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_6651,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6655,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
t4=((C_word*)t0)[4];
t5=((C_word*)t0)[3];
if(C_truep(t4)){
-t6=(C_word)C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[167]));
+t6=C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[159]));
t7=t3;
-f_6727(t7,t6);}
+f_6655(t7,t6);}
else{
t6=C_SCHEME_UNDEFINED;
t7=t3;
-f_6727(t7,t6);}}
+f_6655(t7,t6);}}
-/* k6725 */
-static void C_fcall f_6727(C_word t0,C_word t1){
+/* k6653 */
+static void C_fcall f_6655(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);
+C_save_and_reclaim((void*)trf_6655,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6662,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
-/* k6732 in k6725 */
-static void C_ccall f_6734(C_word c,C_word t0,C_word t1){
+/* k6660 in k6653 */
+static void C_ccall f_6662(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12286,20 +12053,20 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_6662,2,t0,t1);}
t2=C_SCHEME_END_OF_LIST;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_FALSE;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
-t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6738,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6666,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6668,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[3],a[6]=((C_word)li137),tmp=(C_word)a,a+=7,tmp));
t10=((C_word*)t8)[1];
-f_6740(t10,t6,((C_word*)t0)[2]);}
+f_6668(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){
+/* loop1346 in k6660 in k6653 */
+static void C_fcall f_6668(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12309,21 +12076,21 @@ 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 */
+C_save_and_reclaim((void*)trf_6668,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6695,a[2]=((C_word*)t0)[5],a[3]=((C_word)li136),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6702,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g13621363 */
t6=t3;
-f_6767(t6,t4,t5);}
+f_6695(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* k6772 in loop1358 in k6732 in k6725 */
-static void C_ccall f_6774(C_word c,C_word t0,C_word t1){
+/* k6700 in loop1346 in k6660 in k6653 */
+static void C_ccall f_6702(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -12336,96 +12103,96 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6702,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop13581371 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop13461359 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6740(t6,((C_word*)t0)[3],t5);}
+f_6668(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop13581371 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop13461359 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6740(t6,((C_word*)t0)[3],t5);}}
+f_6668(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){
+/* g1362 in loop1346 in k6660 in k6653 */
+static void C_fcall f_6695(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6767,NULL,3,t0,t1,t2);}
+C_save_and_reclaim((void*)trf_6695,NULL,3,t0,t1,t2);}
t3=t2;
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,((C_word*)t0)[2]);}
-/* k6736 in k6732 in k6725 */
-static void C_ccall f_6738(C_word c,C_word t0,C_word t1){
+/* k6664 in k6660 in k6653 */
+static void C_ccall f_6666(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_apply(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k6605 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6607(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[12],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6607,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6610,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=t1,a[11]=((C_word*)t0)[10],tmp=(C_word)a,a+=12,tmp);
+/* eval.scm: 803 compile */
t3=((C_word*)((C_word*)t0)[5])[1];
-f_3577(t3,t2,(C_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]);}
+f_3577(t3,t2,C_u_i_list_ref(((C_word*)t0)[4],C_fix(1)),((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[2]);}
-/* 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){
+/* k6608 in k6605 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6610(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[13],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6610,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_6613,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=t1,a[12]=((C_word*)t0)[11],tmp=(C_word)a,a+=13,tmp);
+/* eval.scm: 804 compile */
t3=((C_word*)((C_word*)t0)[5])[1];
-f_3577(t3,t2,(C_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]);}
+f_3577(t3,t2,C_u_i_list_ref(((C_word*)t0)[4],C_fix(2)),((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[2]);}
-/* 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){
+/* k6611 in k6608 in k6605 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6613(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6613,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6616,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=t1,a[9]=((C_word*)t0)[12],tmp=(C_word)a,a+=10,tmp);
+/* eval.scm: 805 compile */
t3=((C_word*)((C_word*)t0)[5])[1];
-f_3577(t3,t2,(C_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]);}
+f_3577(t3,t2,C_u_i_list_ref(((C_word*)t0)[4],C_fix(3)),((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[2]);}
-/* 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){
+/* k6614 in k6611 in k6608 in k6605 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6616(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[11],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6688,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_6616,2,t0,t1);}
t2=((C_word*)t0)[9];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_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));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6617,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,a[10]=((C_word)li135),tmp=(C_word)a,a+=11,tmp));}
-/* f_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){
+/* f_6617 in k6614 in k6611 in k6608 in k6605 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6617(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12437,136 +12204,136 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_6617,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6621,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=t2,a[7]=((C_word*)t0)[9],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
t4=((C_word*)t0)[4];
t5=((C_word*)t0)[3];
if(C_truep(t4)){
-t6=(C_word)C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[167]));
+t6=C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[159]));
t7=t3;
-f_6693(t7,t6);}
+f_6621(t7,t6);}
else{
t6=C_SCHEME_UNDEFINED;
t7=t3;
-f_6693(t7,t6);}}
+f_6621(t7,t6);}}
-/* k6691 */
-static void C_fcall f_6693(C_word t0,C_word t1){
+/* k6619 */
+static void C_fcall f_6621(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);
+C_save_and_reclaim((void*)trf_6621,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6624,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[6]);}
-/* k6694 in k6691 */
-static void C_ccall f_6696(C_word c,C_word t0,C_word t1){
+/* k6622 in k6619 */
+static void C_ccall f_6624(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6624,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6631,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
-/* k6701 in k6694 in k6691 */
-static void C_ccall f_6703(C_word c,C_word t0,C_word t1){
+/* k6629 in k6622 in k6619 */
+static void C_ccall f_6631(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6631,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6635,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
-/* k6705 in k6701 in k6694 in k6691 */
-static void C_ccall f_6707(C_word c,C_word t0,C_word t1){
+/* k6633 in k6629 in k6622 in k6619 */
+static void C_ccall f_6635(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6635,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6639,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-/* k6709 in k6705 in k6701 in k6694 in k6691 */
-static void C_ccall f_6711(C_word c,C_word t0,C_word t1){
+/* k6637 in k6633 in k6629 in k6622 in k6619 */
+static void C_ccall f_6639(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6639,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6643,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k6641 in k6637 in k6633 in k6629 in k6622 in k6619 */
+static void C_ccall f_6643(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* g13271328 */
+/* g13151316 */
t2=((C_word*)t0)[6];
((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k6563 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6565(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[12],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6565,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6568,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=t1,tmp=(C_word)a,a+=12,tmp);
+/* eval.scm: 797 compile */
t3=((C_word*)((C_word*)t0)[5])[1];
-f_3577(t3,t2,(C_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]);}
+f_3577(t3,t2,C_u_i_list_ref(((C_word*)t0)[4],C_fix(1)),((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[2]);}
-/* 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){
+/* k6566 in k6563 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6568(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6568,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6571,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
+/* eval.scm: 798 compile */
t3=((C_word*)((C_word*)t0)[5])[1];
-f_3577(t3,t2,(C_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]);}
+f_3577(t3,t2,C_u_i_list_ref(((C_word*)t0)[4],C_fix(2)),((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[2]);}
-/* 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){
+/* k6569 in k6566 in k6563 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6571(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[10],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6571,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6572,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,a[9]=((C_word)li134),tmp=(C_word)a,a+=10,tmp);
t3=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* f_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){
+/* f_6572 in k6569 in k6566 in k6563 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6572(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12578,107 +12345,107 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_6572,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6576,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=t2,a[6]=((C_word*)t0)[8],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
t4=((C_word*)t0)[4];
t5=((C_word*)t0)[3];
if(C_truep(t4)){
-t6=(C_word)C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[167]));
+t6=C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[159]));
t7=t3;
-f_6648(t7,t6);}
+f_6576(t7,t6);}
else{
t6=C_SCHEME_UNDEFINED;
t7=t3;
-f_6648(t7,t6);}}
+f_6576(t7,t6);}}
-/* k6646 */
-static void C_fcall f_6648(C_word t0,C_word t1){
+/* k6574 */
+static void C_fcall f_6576(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);
+C_save_and_reclaim((void*)trf_6576,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6579,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
-/* k6649 in k6646 */
-static void C_ccall f_6651(C_word c,C_word t0,C_word t1){
+/* k6577 in k6574 */
+static void C_ccall f_6579(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6579,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6586,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
-/* k6656 in k6649 in k6646 */
-static void C_ccall f_6658(C_word c,C_word t0,C_word t1){
+/* k6584 in k6577 in k6574 */
+static void C_ccall f_6586(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[7],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6586,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6590,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-/* k6660 in k6656 in k6649 in k6646 */
-static void C_ccall f_6662(C_word c,C_word t0,C_word t1){
+/* k6588 in k6584 in k6577 in k6574 */
+static void C_ccall f_6590(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6590,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6594,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* k6664 in k6660 in k6656 in k6649 in k6646 */
-static void C_ccall f_6666(C_word c,C_word t0,C_word t1){
+/* k6592 in k6588 in k6584 in k6577 in k6574 */
+static void C_ccall f_6594(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* g13181319 */
+/* g13061307 */
t2=((C_word*)t0)[5];
((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
-/* 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){
+/* k6528 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6530(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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 */
+C_save_and_reclaim((void*)tr2,(void*)f_6530,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6533,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=t1,a[7]=((C_word*)t0)[10],tmp=(C_word)a,a+=8,tmp);
+/* eval.scm: 792 compile */
t3=((C_word*)((C_word*)t0)[5])[1];
-f_3577(t3,t2,(C_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]);}
+f_3577(t3,t2,C_u_i_list_ref(((C_word*)t0)[4],C_fix(1)),((C_word*)t0)[3],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[2]);}
-/* 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){
+/* k6531 in k6528 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6533(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word ab[9],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6605,2,t0,t1);}
+C_save_and_reclaim((void*)tr2,(void*)f_6533,2,t0,t1);}
t2=((C_word*)t0)[7];
-((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_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));}
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6534,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=t1,a[8]=((C_word)li133),tmp=(C_word)a,a+=9,tmp));}
-/* f_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){
+/* f_6534 in k6531 in k6528 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6534(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12690,82 +12457,82 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_6534,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6538,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t2,a[5]=((C_word*)t0)[7],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
t4=((C_word*)t0)[4];
t5=((C_word*)t0)[3];
if(C_truep(t4)){
-t6=(C_word)C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[167]));
+t6=C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[159]));
t7=t3;
-f_6610(t7,t6);}
+f_6538(t7,t6);}
else{
t6=C_SCHEME_UNDEFINED;
t7=t3;
-f_6610(t7,t6);}}
+f_6538(t7,t6);}}
-/* k6608 */
-static void C_fcall f_6610(C_word t0,C_word t1){
+/* k6536 */
+static void C_fcall f_6538(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);
+C_save_and_reclaim((void*)trf_6538,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6541,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
-/* k6611 in k6608 */
-static void C_ccall f_6613(C_word c,C_word t0,C_word t1){
+/* k6539 in k6536 */
+static void C_ccall f_6541(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[6],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6541,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6548,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-/* k6618 in k6611 in k6608 */
-static void C_ccall f_6620(C_word c,C_word t0,C_word t1){
+/* k6546 in k6539 in k6536 */
+static void C_ccall f_6548(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6548,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6552,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* k6622 in k6618 in k6611 in k6608 */
-static void C_ccall f_6624(C_word c,C_word t0,C_word t1){
+/* k6550 in k6546 in k6539 in k6536 */
+static void C_ccall f_6552(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* g13101311 */
+/* g12981299 */
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){
+/* k6500 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6502(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6502,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6503,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word)li132),tmp=(C_word)a,a+=8,tmp);
t3=((C_word*)t0)[2];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
-/* f_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){
+/* f_6503 in k6500 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6503(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12777,56 +12544,56 @@ 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);
+C_save_and_reclaim((void*)tr3,(void*)f_6503,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6507,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word*)t0)[6],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
t4=((C_word*)t0)[4];
t5=((C_word*)t0)[3];
if(C_truep(t4)){
-t6=(C_word)C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[167]));
+t6=C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[159]));
t7=t3;
-f_6579(t7,t6);}
+f_6507(t7,t6);}
else{
t6=C_SCHEME_UNDEFINED;
t7=t3;
-f_6579(t7,t6);}}
+f_6507(t7,t6);}}
-/* k6577 */
-static void C_fcall f_6579(C_word t0,C_word t1){
+/* k6505 */
+static void C_fcall f_6507(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[5],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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);
+C_save_and_reclaim((void*)trf_6507,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6510,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
t3=((C_word*)t0)[2];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
-/* k6580 in k6577 */
-static void C_ccall f_6582(C_word c,C_word t0,C_word t1){
+/* k6508 in k6505 */
+static void C_ccall f_6510(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[4],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);
+C_save_and_reclaim((void*)tr2,(void*)f_6510,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6517,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t3=((C_word*)t0)[3];
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* k6587 in k6580 in k6577 */
-static void C_ccall f_6589(C_word c,C_word t0,C_word t1){
+/* k6515 in k6508 in k6505 */
+static void C_ccall f_6517(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* g13031304 */
+/* g12911292 */
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){
+/* f_6483 in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6483(C_word c,C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12838,41 +12605,41 @@ 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);}
+C_save_and_reclaim((void*)tr3,(void*)f_6483,3,t0,t1,t2);}
t3=((C_word*)t0)[5];
t4=((C_word*)t0)[4];
if(C_truep(t3)){
-t5=(C_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 */
+t5=C_emit_eval_trace_info(((C_word*)t0)[3],t4,C_retrieve(lf[159]));
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11763,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 786 fn */
t7=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t7))(3,t7,t6,t2);}
else{
-t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11966,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
-/* eval.scm: 793 fn */
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11767,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 786 fn */
t6=((C_word*)t0)[2];
((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t2);}}
-/* f11966 */
-static void C_ccall f11966(C_word c,C_word t0,C_word t1){
+/* f11767 */
+static void C_ccall f11767(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* g12981299 */
+/* g12861287 */
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){
+/* f11763 */
+static void C_ccall f11763(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* g12981299 */
+/* g12861287 */
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){
+/* loop in k6459 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static C_word C_fcall f_6431(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -12882,13 +12649,13 @@ C_word t7;
C_word t8;
loop:
C_stack_check;
-if(C_truep((C_word)C_i_nullp(t1))){
+if(C_truep(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));
+if(C_truep(C_i_pairp(t1))){
+t3=C_slot(t1,C_fix(1));
+t4=C_fixnum_plus(t2,C_fix(1));
t7=t3;
t8=t4;
t1=t7;
@@ -12908,7 +12675,7 @@ 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);
+t9=*((C_word*)lf[162]+1);
((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,t2);}
/* k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
@@ -12924,19 +12691,19 @@ 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);
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3585,a[2]=((C_word*)t0)[15],a[3]=((C_word)li26),tmp=(C_word)a,a+=4,tmp);
t3=((C_word*)t0)[14];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-if(C_truep((C_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);
+if(C_truep(C_i_symbolp(((C_word*)t0)[15]))){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3597,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[13],a[6]=((C_word)li27),tmp=(C_word)a,a+=7,tmp);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3603,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[15],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[10],a[6]=((C_word)li33),tmp=(C_word)a,a+=7,tmp);
/* ##sys#call-with-values */
C_call_with_values(4,0,((C_word*)t0)[14],t2,t3);}
else{
t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3704,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[12],a[11]=((C_word*)t0)[8],a[12]=((C_word*)t0)[11],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[15],tmp=(C_word)a,a+=15,tmp);
/* eval.scm: 319 ##sys#number? */
-t3=*((C_word*)lf[169]+1);
+t3=*((C_word*)lf[161]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[15]);}}}
/* k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
@@ -12961,42 +12728,42 @@ 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));
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3711,a[2]=((C_word)li34),tmp=(C_word)a,a+=3,tmp));
case C_fix(0):
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3719,a[2]=((C_word)li36),tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3719,a[2]=((C_word)li35),tmp=(C_word)a,a+=3,tmp);
t4=((C_word*)t0)[13];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);
case C_fix(1):
t3=((C_word*)t0)[13];
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3727,a[2]=((C_word)li37),tmp=(C_word)a,a+=3,tmp));
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3727,a[2]=((C_word)li36),tmp=(C_word)a,a+=3,tmp));
case C_fix(2):
-t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3735,a[2]=((C_word)li38),tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3735,a[2]=((C_word)li37),tmp=(C_word)a,a+=3,tmp);
t4=((C_word*)t0)[13];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);
default:
-t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3737,a[2]=((C_word*)t0)[14],a[3]=((C_word)li39),tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3737,a[2]=((C_word*)t0)[14],a[3]=((C_word)li38),tmp=(C_word)a,a+=4,tmp);
t4=((C_word*)t0)[13];
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
else{
-if(C_truep((C_word)C_booleanp(((C_word*)t0)[14]))){
+if(C_truep(C_booleanp(((C_word*)t0)[14]))){
if(C_truep(((C_word*)t0)[14])){
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3748,a[2]=((C_word)li40),tmp=(C_word)a,a+=3,tmp);
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3748,a[2]=((C_word)li39),tmp=(C_word)a,a+=3,tmp);
t3=((C_word*)t0)[13];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3750,a[2]=((C_word)li41),tmp=(C_word)a,a+=3,tmp);
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3750,a[2]=((C_word)li40),tmp=(C_word)a,a+=3,tmp);
t3=((C_word*)t0)[13];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
else{
-t2=(C_word)C_charp(((C_word*)t0)[14]);
+t2=C_charp(((C_word*)t0)[14]);
t3=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3760,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],tmp=(C_word)a,a+=15,tmp);
if(C_truep(t2)){
t4=t3;
f_3760(t4,t2);}
else{
-t4=(C_word)C_eofp(((C_word*)t0)[14]);
+t4=C_eofp(((C_word*)t0)[14]);
t5=t3;
-f_3760(t5,(C_truep(t4)?t4:(C_word)C_i_stringp(((C_word*)t0)[14])));}}}}
+f_3760(t5,(C_truep(t4)?t4:C_i_stringp(((C_word*)t0)[14])));}}}}
/* k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
static void C_fcall f_3760(C_word t0,C_word t1){
@@ -13019,19 +12786,19 @@ 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);
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3761,a[2]=((C_word*)t0)[14],a[3]=((C_word)li41),tmp=(C_word)a,a+=4,tmp);
t3=((C_word*)t0)[13];
((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
else{
-if(C_truep((C_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))){
+if(C_truep(C_i_pairp(((C_word*)t0)[14]))){
+t2=C_slot(((C_word*)t0)[14],C_fix(0));
+if(C_truep(C_i_symbolp(t2))){
t3=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3780,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],a[14]=((C_word*)t0)[14],tmp=(C_word)a,a+=15,tmp);
t4=((C_word*)t0)[8];
t5=((C_word*)t0)[14];
t6=((C_word*)t0)[7];
if(C_truep(t4)){
-t7=(C_word)C_emit_syntax_trace_info(t5,t6,C_retrieve(lf[167]));
+t7=C_emit_syntax_trace_info(t5,t6,C_retrieve(lf[159]));
t8=t3;
f_3780(t8,t7);}
else{
@@ -13043,18 +12810,18 @@ 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 */
+t6=C_emit_syntax_trace_info(t4,t5,C_retrieve(lf[159]));
+/* eval.scm: 755 compile-call */
t7=((C_word*)((C_word*)t0)[2])[1];
-f_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]);}
+f_6457(t7,((C_word*)t0)[13],((C_word*)t0)[14],((C_word*)t0)[10],((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
else{
-/* eval.scm: 762 compile-call */
+/* eval.scm: 755 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]);}}}
+f_6457(t6,((C_word*)t0)[13],((C_word*)t0)[14],((C_word*)t0)[10],((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}}}
else{
/* eval.scm: 334 ##sys#syntax-error-hook */
-t2=*((C_word*)lf[50]+1);
-((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[13],lf[168],((C_word*)t0)[14]);}}}
+t2=*((C_word*)lf[47]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[13],lf[160],((C_word*)t0)[14]);}}}
/* k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
static void C_fcall f_3780(C_word t0,C_word t1){
@@ -13067,7 +12834,7 @@ 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);}
+((C_proc5)C_retrieve_symbol_proc(lf[158]))(5,*((C_word*)lf[158]+1),t2,((C_word*)t0)[14],((C_word*)t0)[12],C_SCHEME_FALSE);}
/* k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
static void C_ccall f_3783(C_word c,C_word t0,C_word t1){
@@ -13081,11 +12848,11 @@ 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]);
+t2=C_retrieve(lf[40]);
+t3=C_eqp(t1,((C_word*)t0)[14]);
if(C_truep(t3)){
t4=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3798,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[14],a[14]=((C_word*)t0)[13],tmp=(C_word)a,a+=15,tmp);
-t5=(C_word)C_slot(((C_word*)t0)[14],C_fix(0));
+t5=C_slot(((C_word*)t0)[14],C_fix(0));
/* eval.scm: 341 rename */
t6=((C_word*)((C_word*)t0)[4])[1];
f_3404(t6,t4,t5,((C_word*)t0)[12]);}
@@ -13189,286 +12956,275 @@ 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]);
+t2=C_eqp(t1,lf[52]);
if(C_truep(t2)){
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3807,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[14],tmp=(C_word)a,a+=4,tmp);
/* eval.scm: 347 ##sys#check-syntax */
-t4=*((C_word*)lf[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]);}
+t4=*((C_word*)lf[54]+1);
+((C_proc7)(void*)(*((C_word*)t4+1)))(7,t4,t3,lf[52],((C_word*)t0)[13],lf[55],C_SCHEME_FALSE,((C_word*)t0)[12]);}
else{
-t3=(C_word)C_eqp(t1,lf[59]);
-t4=(C_truep(t3)?t3:(C_word)C_eqp(t1,lf[60]));
+t3=C_eqp(t1,lf[56]);
+t4=(C_truep(t3)?t3:C_eqp(t1,lf[57]));
if(C_truep(t4)){
-t5=(C_word)C_i_cadr(((C_word*)t0)[13]);
+t5=C_i_cadr(((C_word*)t0)[13]);
t6=((C_word*)t0)[14];
-((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3885,a[2]=t5,a[3]=((C_word)li51),tmp=(C_word)a,a+=4,tmp));}
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3885,a[2]=t5,a[3]=((C_word)li50),tmp=(C_word)a,a+=4,tmp));}
else{
-t5=(C_word)C_eqp(t1,lf[61]);
+t5=C_eqp(t1,lf[58]);
if(C_truep(t5)){
-t6=(C_word)C_i_cadr(((C_word*)t0)[13]);
-if(C_truep(C_retrieve(lf[25]))){
+t6=C_i_cadr(((C_word*)t0)[13]);
+if(C_truep(C_retrieve(lf[22]))){
t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3901,a[2]=((C_word*)t0)[14],tmp=(C_word)a,a+=3,tmp);
/* eval.scm: 366 ##sys#hash-table-location */
-t8=*((C_word*)lf[24]+1);
-((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t7,C_retrieve(lf[25]),t6,C_SCHEME_TRUE);}
+t8=*((C_word*)lf[21]+1);
+((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t7,C_retrieve(lf[22]),t6,C_SCHEME_TRUE);}
else{
t7=((C_word*)t0)[14];
-((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3907,a[2]=t6,a[3]=((C_word)li53),tmp=(C_word)a,a+=4,tmp));}}
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3907,a[2]=t6,a[3]=((C_word)li52),tmp=(C_word)a,a+=4,tmp));}}
else{
-t6=(C_word)C_eqp(t1,lf[62]);
+t6=C_eqp(t1,lf[59]);
if(C_truep(t6)){
-t7=(C_word)C_i_cadr(((C_word*)t0)[13]);
+t7=C_i_cadr(((C_word*)t0)[13]);
/* eval.scm: 371 compile */
t8=((C_word*)((C_word*)t0)[11])[1];
f_3577(t8,((C_word*)t0)[14],t7,((C_word*)t0)[10],((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
else{
-t7=(C_word)C_eqp(t1,lf[63]);
+t7=C_eqp(t1,lf[60]);
if(C_truep(t7)){
-t8=(C_word)C_i_cadr(((C_word*)t0)[13]);
+t8=C_i_cadr(((C_word*)t0)[13]);
/* eval.scm: 374 compile */
t9=((C_word*)((C_word*)t0)[11])[1];
f_3577(t9,((C_word*)t0)[14],t8,((C_word*)t0)[10],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
else{
-t8=(C_word)C_eqp(t1,lf[64]);
+t8=C_eqp(t1,lf[61]);
if(C_truep(t8)){
t9=((C_word*)t0)[14];
-((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3941,a[2]=((C_word)li54),tmp=(C_word)a,a+=3,tmp));}
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3941,a[2]=((C_word)li53),tmp=(C_word)a,a+=3,tmp));}
else{
-t9=(C_word)C_eqp(t1,lf[65]);
+t9=C_eqp(t1,lf[62]);
if(C_truep(t9)){
t10=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3951,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[13],a[8]=((C_word*)t0)[14],tmp=(C_word)a,a+=9,tmp);
/* eval.scm: 379 ##sys#check-syntax */
-t11=*((C_word*)lf[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]);}
+t11=*((C_word*)lf[54]+1);
+((C_proc7)(void*)(*((C_word*)t11+1)))(7,t11,t10,lf[62],((C_word*)t0)[13],lf[64],C_SCHEME_FALSE,((C_word*)t0)[12]);}
else{
-t10=(C_word)C_eqp(t1,lf[68]);
-t11=(C_truep(t10)?t10:(C_word)C_eqp(t1,lf[69]));
+t10=C_eqp(t1,lf[65]);
+t11=(C_truep(t10)?t10:C_eqp(t1,lf[66]));
if(C_truep(t11)){
t12=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4011,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[13],tmp=(C_word)a,a+=9,tmp);
/* eval.scm: 388 ##sys#check-syntax */
-t13=*((C_word*)lf[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]);}
+t13=*((C_word*)lf[54]+1);
+((C_proc7)(void*)(*((C_word*)t13+1)))(7,t13,t12,lf[65],((C_word*)t0)[13],lf[69],C_SCHEME_FALSE,((C_word*)t0)[12]);}
else{
-t12=(C_word)C_eqp(t1,lf[73]);
-t13=(C_truep(t12)?t12:(C_word)C_eqp(t1,lf[74]));
+t12=C_eqp(t1,lf[70]);
+t13=(C_truep(t12)?t12:C_eqp(t1,lf[71]));
if(C_truep(t13)){
t14=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4123,a[2]=((C_word*)t0)[14],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[13],tmp=(C_word)a,a+=10,tmp);
/* eval.scm: 404 ##sys#check-syntax */
-t15=*((C_word*)lf[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]);}
+t15=*((C_word*)lf[54]+1);
+((C_proc7)(void*)(*((C_word*)t15+1)))(7,t15,t14,lf[70],((C_word*)t0)[13],lf[74],C_SCHEME_FALSE,((C_word*)t0)[12]);}
else{
-t14=(C_word)C_eqp(t1,lf[78]);
-t15=(C_truep(t14)?t14:(C_word)C_eqp(t1,lf[79]));
+t14=C_eqp(t1,lf[75]);
+t15=(C_truep(t14)?t14:C_eqp(t1,lf[76]));
if(C_truep(t15)){
t16=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4235,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[13],tmp=(C_word)a,a+=9,tmp);
/* eval.scm: 428 ##sys#check-syntax */
-t17=*((C_word*)lf[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]);}
+t17=*((C_word*)lf[54]+1);
+((C_proc7)(void*)(*((C_word*)t17+1)))(7,t17,t16,lf[75],((C_word*)t0)[13],lf[84],C_SCHEME_FALSE,((C_word*)t0)[12]);}
else{
-t16=(C_word)C_eqp(t1,lf[88]);
-t17=(C_truep(t16)?t16:(C_word)C_eqp(t1,lf[89]));
+t16=C_eqp(t1,lf[85]);
+t17=(C_truep(t16)?t16:C_eqp(t1,lf[86]));
if(C_truep(t17)){
t18=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4732,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[14],a[8]=((C_word*)t0)[11],a[9]=((C_word*)t0)[13],tmp=(C_word)a,a+=10,tmp);
/* eval.scm: 480 ##sys#check-syntax */
-t19=*((C_word*)lf[57]+1);
-((C_proc5)(void*)(*((C_word*)t19+1)))(5,t19,t18,lf[88],((C_word*)t0)[13],lf[91]);}
+t19=*((C_word*)lf[54]+1);
+((C_proc5)(void*)(*((C_word*)t19+1)))(5,t19,t18,lf[85],((C_word*)t0)[13],lf[88]);}
else{
-t18=(C_word)C_eqp(t1,lf[92]);
-t19=(C_truep(t18)?t18:(C_word)C_eqp(t1,lf[93]));
+t18=C_eqp(t1,lf[89]);
+t19=(C_truep(t18)?t18:C_eqp(t1,lf[90]));
if(C_truep(t19)){
t20=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4889,a[2]=((C_word*)t0)[14],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[13],tmp=(C_word)a,a+=8,tmp);
/* eval.scm: 495 ##sys#check-syntax */
-t21=*((C_word*)lf[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]);}
+t21=*((C_word*)lf[54]+1);
+((C_proc7)(void*)(*((C_word*)t21+1)))(7,t21,t20,lf[89],((C_word*)t0)[13],lf[98],C_SCHEME_FALSE,((C_word*)t0)[12]);}
else{
-t20=(C_word)C_eqp(t1,lf[102]);
+t20=C_eqp(t1,lf[99]);
if(C_truep(t20)){
t21=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5337,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[14],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
/* eval.scm: 590 ##sys#check-syntax */
-t22=*((C_word*)lf[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]);}
+t22=*((C_word*)lf[54]+1);
+((C_proc7)(void*)(*((C_word*)t22+1)))(7,t22,t21,lf[99],((C_word*)t0)[13],lf[101],C_SCHEME_FALSE,((C_word*)t0)[12]);}
else{
-t21=(C_word)C_eqp(t1,lf[105]);
+t21=C_eqp(t1,lf[102]);
if(C_truep(t21)){
t22=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5424,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[14],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
/* eval.scm: 605 ##sys#check-syntax */
-t23=*((C_word*)lf[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]));
+t23=*((C_word*)lf[54]+1);
+((C_proc7)(void*)(*((C_word*)t23+1)))(7,t23,t22,lf[102],((C_word*)t0)[13],lf[103],C_SCHEME_FALSE,((C_word*)t0)[12]);}
+else{
+t22=C_eqp(t1,lf[104]);
+if(C_truep(t22)){
+t23=C_i_cadr(((C_word*)t0)[13]);
+t24=C_i_caddr(((C_word*)t0)[13]);
+t25=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5551,a[2]=t24,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[14],a[9]=((C_word*)t0)[11],tmp=(C_word)a,a+=10,tmp);
+/* eval.scm: 625 rename */
+t26=((C_word*)((C_word*)t0)[4])[1];
+f_3404(t26,t25,t23,((C_word*)t0)[12]);}
+else{
+t23=C_eqp(t1,lf[109]);
if(C_truep(t23)){
-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]);
+/* eval.scm: 636 compile */
+t24=((C_word*)((C_word*)t0)[11])[1];
+f_3577(t24,((C_word*)t0)[14],lf[110],((C_word*)t0)[10],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
+else{
+t24=C_eqp(t1,lf[111]);
if(C_truep(t24)){
-/* 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]);}
+t25=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5598,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
+t26=C_i_cddr(((C_word*)t0)[13]);
+/* eval.scm: 640 ##sys#canonicalize-body */
+t27=*((C_word*)lf[80]+1);
+((C_proc5)(void*)(*((C_word*)t27+1)))(5,t27,t25,t26,((C_word*)t0)[12],C_SCHEME_FALSE);}
else{
-t25=(C_word)C_eqp(t1,lf[119]);
+t25=C_eqp(t1,lf[112]);
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);}
+t26=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5611,a[2]=((C_word*)t0)[14],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[13],tmp=(C_word)a,a+=8,tmp);
+t27=C_i_cadr(((C_word*)t0)[13]);
+/* eval.scm: 644 ##sys#strip-syntax */
+((C_proc3)C_retrieve_symbol_proc(lf[53]))(3,*((C_word*)lf[53]+1),t26,t27);}
else{
-t26=(C_word)C_eqp(t1,lf[120]);
+t26=C_eqp(t1,lf[119]);
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);}
+t27=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5868,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[14],a[8]=((C_word*)t0)[11],tmp=(C_word)a,a+=9,tmp);
+/* eval.scm: 689 rename */
+t28=((C_word*)((C_word*)t0)[4])[1];
+f_3404(t28,t27,lf[89],((C_word*)t0)[12]);}
else{
-t27=(C_word)C_eqp(t1,lf[127]);
+t27=C_eqp(t1,lf[120]);
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 */
+t28=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5897,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[13],tmp=(C_word)a,a+=9,tmp);
+/* eval.scm: 692 rename */
t29=((C_word*)((C_word*)t0)[4])[1];
-f_3404(t29,t28,lf[92],((C_word*)t0)[12]);}
+f_3404(t29,t28,lf[89],((C_word*)t0)[12]);}
else{
-t28=(C_word)C_eqp(t1,lf[128]);
+t28=C_eqp(t1,lf[121]);
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]);
+t29=C_SCHEME_END_OF_LIST;
+t30=(*a=C_VECTOR_TYPE|1,a[1]=t29,tmp=(C_word)a,a+=2,tmp);
+t31=C_SCHEME_FALSE;
+t32=(*a=C_VECTOR_TYPE|1,a[1]=t31,tmp=(C_word)a,a+=2,tmp);
+t33=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5914,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
+t34=C_i_cdr(((C_word*)t0)[13]);
+t35=C_SCHEME_UNDEFINED;
+t36=(*a=C_VECTOR_TYPE|1,a[1]=t35,tmp=(C_word)a,a+=2,tmp);
+t37=C_set_block_item(t36,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5991,a[2]=t30,a[3]=t36,a[4]=t32,a[5]=((C_word*)t0)[5],a[6]=((C_word)li123),tmp=(C_word)a,a+=7,tmp));
+t38=((C_word*)t36)[1];
+f_5991(t38,t33,t34);}
+else{
+t29=C_eqp(t1,lf[125]);
if(C_truep(t29)){
-t30=C_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]));
+t30=C_i_caddr(((C_word*)t0)[13]);
+t31=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6045,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
+t32=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6049,a[2]=t31,a[3]=t30,tmp=(C_word)a,a+=4,tmp);
+t33=C_i_cadr(((C_word*)t0)[13]);
+/* eval.scm: 709 ##sys#strip-syntax */
+((C_proc3)C_retrieve_symbol_proc(lf[53]))(3,*((C_word*)lf[53]+1),t32,t33);}
+else{
+t30=C_eqp(t1,lf[128]);
+t31=(C_truep(t30)?t30:C_eqp(t1,lf[129]));
+if(C_truep(t31)){
+t32=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6109,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
+t33=C_i_cadr(((C_word*)t0)[13]);
+/* eval.scm: 719 eval/meta */
+f_3526(t32,t33);}
+else{
+t32=C_eqp(t1,lf[131]);
if(C_truep(t32)){
-t33=(*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 */
+t33=C_i_cadr(((C_word*)t0)[13]);
+/* eval.scm: 723 compile */
+t34=((C_word*)((C_word*)t0)[11])[1];
+f_3577(t34,((C_word*)t0)[14],t33,((C_word*)t0)[10],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
+else{
+t33=C_eqp(t1,lf[132]);
+t34=(C_truep(t33)?t33:C_eqp(t1,lf[133]));
+if(C_truep(t34)){
+/* eval.scm: 726 compile */
t35=((C_word*)((C_word*)t0)[11])[1];
-f_3577(t35,((C_word*)t0)[14],t34,((C_word*)t0)[10],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
+f_3577(t35,((C_word*)t0)[14],lf[134],((C_word*)t0)[10],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
else{
-t34=(C_word)C_eqp(t1,lf[140]);
-t35=(C_truep(t34)?t34:(C_word)C_eqp(t1,lf[141]));
+t35=C_eqp(t1,lf[135]);
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]));
+t36=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6150,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[14],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
+if(C_truep(C_i_memq(lf[137],C_retrieve(lf[138])))){
+t37=C_i_cdr(((C_word*)t0)[13]);
+t38=C_SCHEME_UNDEFINED;
+t39=(*a=C_VECTOR_TYPE|1,a[1]=t38,tmp=(C_word)a,a+=2,tmp);
+t40=C_set_block_item(t39,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6165,a[2]=t39,a[3]=((C_word*)t0)[12],a[4]=((C_word)li128),tmp=(C_word)a,a+=5,tmp));
+t41=((C_word*)t39)[1];
+f_6165(t41,t36,t37);}
+else{
+/* eval.scm: 731 ##sys#warn */
+t37=*((C_word*)lf[140]+1);
+((C_proc4)(void*)(*((C_word*)t37+1)))(4,t37,t36,lf[141],((C_word*)t0)[13]);}}
+else{
+t36=C_eqp(t1,lf[142]);
+t37=(C_truep(t36)?t36:C_eqp(t1,lf[143]));
+if(C_truep(t37)){
+t38=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6214,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[14],a[8]=((C_word*)t0)[11],tmp=(C_word)a,a+=9,tmp);
+/* eval.scm: 735 rename */
+t39=((C_word*)((C_word*)t0)[4])[1];
+f_3404(t39,t38,lf[144],((C_word*)t0)[12]);}
+else{
+t38=C_eqp(t1,lf[50]);
+t39=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6231,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[10],a[6]=((C_word*)t0)[2],a[7]=t1,a[8]=((C_word*)t0)[13],a[9]=((C_word*)t0)[14],tmp=(C_word)a,a+=10,tmp);
if(C_truep(t38)){
-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]);
+t40=t39;
+f_6231(t40,t38);}
+else{
+t40=C_eqp(t1,lf[149]);
+if(C_truep(t40)){
+t41=t39;
+f_6231(t41,t40);}
+else{
+t41=C_eqp(t1,lf[150]);
if(C_truep(t41)){
-t42=t40;
-f_6300(t42,t41);}
+t42=t39;
+f_6231(t42,t41);}
else{
-t42=(C_word)C_eqp(t1,lf[158]);
+t42=C_eqp(t1,lf[151]);
if(C_truep(t42)){
-t43=t40;
-f_6300(t43,t42);}
+t43=t39;
+f_6231(t43,t42);}
else{
-t43=(C_word)C_eqp(t1,lf[159]);
+t43=C_eqp(t1,lf[152]);
if(C_truep(t43)){
-t44=t40;
-f_6300(t44,t43);}
+t44=t39;
+f_6231(t44,t43);}
else{
-t44=(C_word)C_eqp(t1,lf[160]);
+t44=C_eqp(t1,lf[153]);
if(C_truep(t44)){
-t45=t40;
-f_6300(t45,t44);}
+t45=t39;
+f_6231(t45,t44);}
else{
-t45=(C_word)C_eqp(t1,lf[161]);
+t45=C_eqp(t1,lf[154]);
if(C_truep(t45)){
-t46=t40;
-f_6300(t46,t45);}
+t46=t39;
+f_6231(t46,t45);}
else{
-t46=(C_word)C_eqp(t1,lf[162]);
+t46=C_eqp(t1,lf[155]);
if(C_truep(t46)){
-t47=t40;
-f_6300(t47,t46);}
+t47=t39;
+f_6231(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])));}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+t47=C_eqp(t1,lf[156]);
+t48=t39;
+f_6231(t48,(C_truep(t47)?t47:C_eqp(t1,lf[157])));}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
-/* 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){
+/* k6229 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_fcall f_6231(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13476,29 +13232,29 @@ 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]);}
+/* eval.scm: 742 ##sys#syntax-error-hook */
+t2=*((C_word*)lf[47]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[9],lf[145],((C_word*)t0)[8]);}
else{
-t2=(C_word)C_eqp(((C_word*)t0)[7],lf[154]);
+t2=C_eqp(((C_word*)t0)[7],lf[146]);
if(C_truep(t2)){
-t3=(C_word)C_i_cdr(((C_word*)t0)[8]);
-/* eval.scm: 752 compile-call */
+t3=C_i_cdr(((C_word*)t0)[8]);
+/* eval.scm: 745 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]);}
+f_6457(t4,((C_word*)t0)[9],t3,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
else{
-t3=(C_word)C_eqp(((C_word*)t0)[7],lf[155]);
+t3=C_eqp(((C_word*)t0)[7],lf[147]);
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]);}
+/* eval.scm: 749 ##sys#syntax-error-hook */
+t4=*((C_word*)lf[47]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[9],lf[148],((C_word*)t0)[8]);}
else{
-/* eval.scm: 758 compile-call */
+/* eval.scm: 751 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]);}}}}
+f_6457(t4,((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}}}}
-/* 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){
+/* k6212 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6214(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13506,29 +13262,29 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_6214,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6218,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
+t3=C_i_cdr(((C_word*)t0)[2]);
/* ##sys#append */
-t4=*((C_word*)lf[71]+1);
+t4=*((C_word*)lf[68]+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){
+/* k6216 in k6212 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6218(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6287,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
-/* eval.scm: 742 compile */
+C_save_and_reclaim((void*)tr2,(void*)f_6218,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+/* eval.scm: 735 compile */
t3=((C_word*)((C_word*)t0)[7])[1];
f_3577(t3,((C_word*)t0)[6],t2,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* loop1171 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_fcall f_6165(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13538,60 +13294,77 @@ 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 */
+C_save_and_reclaim((void*)trf_6165,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6173,a[2]=((C_word*)t0)[3],a[3]=((C_word)li127),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6180,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g11781179 */
t6=t3;
-f_6242(t6,t4,t5);}
+f_6173(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){
+/* k6178 in loop1171 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6180(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
-t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t2=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);}
+f_6165(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){
+/* g1178 in loop1171 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_fcall f_6173(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_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]);}
+C_save_and_reclaim((void*)trf_6173,NULL,3,t0,t1,t2);}
+/* eval.scm: 730 ##compiler#process-declaration */
+((C_proc4)C_retrieve_symbol_proc(lf[139]))(4,*((C_word*)lf[139]+1),t1,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k6148 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6150(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 739 compile */
+/* eval.scm: 732 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]);}
+f_3577(t2,((C_word*)t0)[6],lf[136],((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k6107 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6109(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 727 compile */
+/* eval.scm: 720 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]);}
+f_3577(t2,((C_word*)t0)[6],lf[130],((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k6047 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6049(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[7],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6049,2,t0,t1);}
+t2=C_SCHEME_UNDEFINED;
+t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6051,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word)li126),tmp=(C_word)a,a+=5,tmp));
+t5=((C_word*)t3)[1];
+f_6051(t5,((C_word*)t0)[2],t1);}
-/* loop in k3796 in k3781 in k3778 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){
+/* loop in k6047 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_fcall f_6051(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13599,18 +13372,18 @@ 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))){
+C_save_and_reclaim((void*)trf_6051,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_nullp(t2))){
t3=t1;
-((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[134]);}
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[126]);}
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);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6063,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li124),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6073,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word)li125),tmp=(C_word)a,a+=5,tmp);
/* ##sys#call-with-values */
C_call_with_values(4,0,t1,t3,t4);}}
-/* 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){
+/* a6072 in loop in k6047 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6073(C_word c,C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
@@ -13619,15 +13392,15 @@ 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 */
+C_save_and_reclaim((void*)tr4,(void*)f_6073,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6089,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t5=C_i_cdr(((C_word*)t0)[3]);
+/* eval.scm: 715 loop */
t6=((C_word*)((C_word*)t0)[2])[1];
-f_6124(t6,t4,t5);}
+f_6051(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){
+/* k6087 in a6072 in loop in k6047 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6089(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13635,14 +13408,14 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6089,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t3=C_a_i_cons(&a,2,((C_word*)t0)[3],t2);
t4=((C_word*)t0)[2];
-((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[69],t3));}
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_a_i_cons(&a,2,lf[66],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){
+/* a6062 in loop in k6047 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6063(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13650,23 +13423,23 @@ 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_save_and_reclaim((void*)tr2,(void*)f_6063,2,t0,t1);}
+t2=C_i_car(((C_word*)t0)[3]);
+/* eval.scm: 713 ##sys#do-the-right-thing */
+t3=*((C_word*)lf[127]+1);
((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t1,t2,C_SCHEME_FALSE,((C_word*)t0)[2]);}
-/* 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){
+/* k6043 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6045(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
-/* eval.scm: 716 compile */
+/* eval.scm: 708 compile */
t2=((C_word*)((C_word*)t0)[7])[1];
f_3577(t2,((C_word*)t0)[6],t1,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* loop1084 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_fcall f_5991(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13676,21 +13449,21 @@ 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 */
+C_save_and_reclaim((void*)trf_5991,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6018,a[2]=((C_word*)t0)[5],a[3]=((C_word)li122),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6025,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g11001101 */
t6=t3;
-f_6091(t6,t4,t5);}
+f_6018(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k6023 in loop1084 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6025(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13703,62 +13476,62 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_6025,2,t0,t1);}
+t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
-t3=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
+t3=C_i_setslot(((C_word*)((C_word*)t0)[6])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop10961109 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop10841097 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6064(t6,((C_word*)t0)[3],t5);}
+f_5991(t6,((C_word*)t0)[3],t5);}
else{
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t4=C_mutate(((C_word *)((C_word*)t0)[6])+1,t2);
-t5=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
-/* loop10961109 */
+t5=C_slot(((C_word*)t0)[5],C_fix(1));
+/* loop10841097 */
t6=((C_word*)((C_word*)t0)[4])[1];
-f_6064(t6,((C_word*)t0)[3],t5);}}
+f_5991(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){
+/* g1100 in loop1084 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_fcall f_6018(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)trf_6091,NULL,3,t0,t1,t2);}
-/* eval.scm: 704 eval/meta */
+C_save_and_reclaim((void*)trf_6018,NULL,3,t0,t1,t2);}
+/* eval.scm: 696 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){
+/* k5912 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_5914(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[9],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5914,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5917,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+C_apply(4,0,t2,C_retrieve(lf[123]),t1);}
-/* 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){
+/* k5915 in k5912 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_5917(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[8],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_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_save_and_reclaim((void*)tr2,(void*)f_5917,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5920,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
+/* eval.scm: 699 ##sys#lookup-runtime-requirements */
+t3=*((C_word*)lf[124]+1);
((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
-/* 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){
+/* k5918 in k5915 in k5912 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_5920(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13773,26 +13546,26 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5920,2,t0,t1);}
+if(C_truep(C_i_nullp(t1))){
+/* eval.scm: 700 compile */
t2=((C_word*)((C_word*)t0)[7])[1];
-f_3577(t2,((C_word*)t0)[6],lf[130],((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+f_3577(t2,((C_word*)t0)[6],lf[122],((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
else{
-t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_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);
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5937,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
t3=C_SCHEME_END_OF_LIST;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_FALSE;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
-t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6014,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5941,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
-t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6016,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li122),tmp=(C_word)a,a+=6,tmp));
+t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5943,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li121),tmp=(C_word)a,a+=6,tmp));
t11=((C_word*)t9)[1];
-f_6016(t11,t7,t1);}}
+f_5943(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){
+/* loop1113 in k5918 in k5915 in k5912 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_fcall f_5943(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13813,17 +13586,17 @@ 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);
+C_save_and_reclaim((void*)trf_5943,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=C_slot(t2,C_fix(0));
+t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=C_a_i_cons(&a,2,lf[52],t4);
+t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
-t7=(C_word)C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
+t7=C_i_setslot(((C_word*)((C_word*)t0)[4])[1],C_fix(1),t6);
t8=C_mutate(((C_word *)((C_word*)t0)[4])+1,t6);
-t9=(C_word)C_slot(t2,C_fix(1));
-/* loop11251138 */
+t9=C_slot(t2,C_fix(1));
+/* loop11131126 */
t15=t1;
t16=t9;
t1=t15;
@@ -13832,8 +13605,8 @@ 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 */
+t9=C_slot(t2,C_fix(1));
+/* loop11131126 */
t15=t1;
t16=t9;
t1=t15;
@@ -13844,31 +13617,31 @@ 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){
+/* k5939 in k5918 in k5915 in k5912 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_5941(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
/* ##sys#append */
-t2=*((C_word*)lf[71]+1);
+t2=*((C_word*)lf[68]+1);
((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
-/* 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){
+/* k5935 in k5918 in k5915 in k5912 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_5937(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_6010,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,lf[131],t1);
-/* eval.scm: 708 compile */
+C_save_and_reclaim((void*)tr2,(void*)f_5937,2,t0,t1);}
+t2=C_a_i_cons(&a,2,lf[123],t1);
+/* eval.scm: 700 compile */
t3=((C_word*)((C_word*)t0)[7])[1];
f_3577(t3,((C_word*)t0)[6],t2,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k5895 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_5897(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13876,15 +13649,15 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_5897,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5901,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=t1,tmp=(C_word)a,a+=10,tmp);
+t3=C_i_cddr(((C_word*)t0)[8]);
/* ##sys#append */
-t4=*((C_word*)lf[71]+1);
+t4=*((C_word*)lf[68]+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){
+/* k5899 in k5895 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_5901(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13892,15 +13665,15 @@ 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 */
+C_save_and_reclaim((void*)tr2,(void*)f_5901,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[9],t1);
+t3=C_i_cadr(((C_word*)t0)[8]);
+/* eval.scm: 692 compile */
t4=((C_word*)((C_word*)t0)[7])[1];
f_3577(t4,((C_word*)t0)[6],t2,((C_word*)t0)[5],t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k5866 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_5868(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13908,29 +13681,29 @@ 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]);
+C_save_and_reclaim((void*)tr2,(void*)f_5868,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5872,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
+t3=C_i_cdr(((C_word*)t0)[2]);
/* ##sys#append */
-t4=*((C_word*)lf[71]+1);
+t4=*((C_word*)lf[68]+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){
+/* k5870 in k5866 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_5872(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word ab[3],*a=ab;
C_check_for_interrupt;
if(!C_stack_probe(&a)){
-C_save_and_reclaim((void*)tr2,(void*)f_5945,2,t0,t1);}
-t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
-/* eval.scm: 697 compile */
+C_save_and_reclaim((void*)tr2,(void*)f_5872,2,t0,t1);}
+t2=C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+/* eval.scm: 689 compile */
t3=((C_word*)((C_word*)t0)[7])[1];
f_3577(t3,((C_word*)t0)[6],t2,((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
-/* 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){
+/* k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_5611(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13945,25 +13718,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_5611,2,t0,t1);}
+t2=C_i_caddr(((C_word*)t0)[7]);
+t3=C_eqp(C_SCHEME_TRUE,t2);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5617,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
if(C_truep(t3)){
t5=t4;
-f_5690(2,t5,t3);}
+f_5617(2,t5,t3);}
else{
t5=C_SCHEME_END_OF_LIST;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_FALSE;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
-t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_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);}}
+t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5755,a[2]=t4,a[3]=t6,a[4]=t8,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t10=C_i_caddr(((C_word*)t0)[7]);
+/* eval.scm: 659 ##sys#strip-syntax */
+((C_proc3)C_retrieve_symbol_proc(lf[53]))(3,*((C_word*)lf[53]+1),t9,t10);}}
-/* 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){
+/* k5753 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_5755(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -13972,15 +13745,15 @@ 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);}
+C_save_and_reclaim((void*)tr2,(void*)f_5755,2,t0,t1);}
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
-t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_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));
+t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5757,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word)li120),tmp=(C_word)a,a+=7,tmp));
t5=((C_word*)t3)[1];
-f_5830(t5,((C_word*)t0)[2],t1);}
+f_5757(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){
+/* loop978 in k5753 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_fcall f_5757(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
@@ -13990,21 +13763,21 @@ 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 */
+C_save_and_reclaim((void*)trf_5757,NULL,3,t0,t1,t2);}
+if(C_truep(C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5784,a[2]=((C_word*)t0)[5],a[3]=((C_word)li119),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5835,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+t5=C_slot(t2,C_fix(0));
+/* g994995 */
t6=t3;
-f_5857(t6,t4,t5);}
+f_5784(t6,t4,t5);}
else{
t3=((C_word*)((C_word*)t0)[2])[1];
t4=t1;
((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
-/* 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){
+/* k5833 in loop978 in k5753 in k5609 in k3796 in k3781 in k3778 in k3758 in k3702 in k3582 in compile in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_5835(C_word c,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
@@ -14017,25 +13790,25 @@ 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);
+C_save_and_reclaim((void*)tr2,(void*)f_5835,2,t0,t1);}
+t2=C_a_i_cons(&