/* Generated from irregex.scm by the CHICKEN compiler
   http://www.call-cc.org
   Version 5.2.0 (rev 317468e4)
   linux-unix-gnu-x86-64 [ 64bit dload ptables ]
   command line: irregex.scm -optimize-level 2 -include-path . -include-path ./ -inline -ignore-repository -feature chicken-bootstrap -no-warnings -specialize -consult-types-file ./types.db -explicit-use -no-trace -output-file irregex.c -emit-import-library chicken.irregex
   unit: irregex
   uses: library expand
*/
#include "chicken.h"

static C_PTABLE_ENTRY *create_ptable(void);
C_noret_decl(C_library_toplevel)
C_externimport void C_ccall C_library_toplevel(C_word c,C_word *av) C_noret;
C_noret_decl(C_expand_toplevel)
C_externimport void C_ccall C_expand_toplevel(C_word c,C_word *av) C_noret;

static C_TLS C_word lf[502];
static double C_possibly_force_alignment;
static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,31),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,118,101,99,116,111,114,45,99,111,112,121,32,118,41,0};
static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,28),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,63,32,120,41,0,0,0,0};
static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,42),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,110,117,109,45,115,117,98,109,97,116,99,104,101,115,32,120,41,0,0,0,0,0,0};
static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,33),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,110,97,109,101,115,32,120,41,0,0,0,0,0,0,0};
static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,41),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,110,101,119,45,109,97,116,99,104,101,115,32,105,114,120,41,0,0,0,0,0,0,0};
static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,42),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,114,101,115,101,116,45,109,97,116,99,104,101,115,33,32,109,41,0,0,0,0,0,0};
static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,40),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,99,111,112,121,45,109,97,116,99,104,101,115,32,109,41};
static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,41),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,109,97,116,99,104,45,100,97,116,97,63,32,111,98,106,41,0,0,0,0,0,0,0};
static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,48),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,109,97,116,99,104,45,110,117,109,45,115,117,98,109,97,116,99,104,101,115,32,109,41};
static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,39),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,109,97,116,99,104,45,110,97,109,101,115,32,109,41,0};
static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,51),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,109,97,116,99,104,45,115,116,97,114,116,45,99,104,117,110,107,32,109,32,46,32,111,112,116,41,0,0,0,0,0};
static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,51),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,109,97,116,99,104,45,115,116,97,114,116,45,105,110,100,101,120,32,109,32,46,32,111,112,116,41,0,0,0,0,0};
static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,49),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,109,97,116,99,104,45,101,110,100,45,99,104,117,110,107,32,109,32,46,32,111,112,116,41,0,0,0,0,0,0,0};
static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,49),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,109,97,116,99,104,45,101,110,100,45,105,110,100,101,120,32,109,32,46,32,111,112,116,41,0,0,0,0,0,0,0};
static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,16),40,108,112,32,108,115,32,117,110,107,110,111,119,110,63,41};
static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,60),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,109,97,116,99,104,45,110,117,109,101,114,105,99,45,105,110,100,101,120,32,108,111,99,97,116,105,111,110,32,109,32,111,112,116,41,0,0,0,0};
static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,48),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,109,97,116,99,104,45,118,97,108,105,100,45,105,110,100,101,120,63,32,109,32,110,41};
static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,49),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,109,97,116,99,104,45,115,117,98,115,116,114,105,110,103,32,109,32,46,32,111,112,116,41,0,0,0,0,0,0,0};
static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,48),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,109,97,116,99,104,45,115,117,98,99,104,117,110,107,32,109,32,46,32,111,112,116,41};
static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,12),40,102,95,56,53,50,49,32,99,110,107,41,0,0,0,0};
static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,12),40,102,95,56,53,48,52,32,99,110,107,41,0,0,0,0};
static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,99,110,107,32,114,101,115,41,0,0};
static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,28),40,102,95,56,52,48,51,32,99,110,107,49,32,115,116,97,114,116,32,99,110,107,50,32,101,110,100,41,0,0,0,0};
static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,59),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,109,97,107,101,45,105,114,114,101,103,101,120,45,99,104,117,110,107,101,114,32,103,101,116,45,110,101,120,116,32,103,101,116,45,115,116,114,32,46,32,111,41,0,0,0,0,0};
static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,10),40,108,112,32,115,116,97,114,116,41,0,0,0,0,0,0};
static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,49),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,99,104,117,110,107,101,114,45,112,114,101,118,45,99,104,97,114,32,99,110,107,32,115,116,97,114,116,32,101,110,100,41,0,0,0,0,0,0,0};
static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,43),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,99,104,117,110,107,101,114,45,110,101,120,116,45,99,104,97,114,32,99,110,107,32,115,114,99,41,0,0,0,0,0};
static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,8),40,115,99,97,110,32,105,41};
static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,44),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,116,114,105,110,103,45,115,99,97,110,45,99,104,97,114,32,115,116,114,32,99,32,46,32,111,41,0,0,0,0};
static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,7),40,108,112,32,108,115,41,0};
static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,11),40,97,57,48,52,56,32,115,32,97,41,0,0,0,0,0};
static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,48),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,116,114,105,110,103,45,99,97,116,45,114,101,118,101,114,115,101,32,115,116,114,105,110,103,45,108,105,115,116,41};
static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,10),40,108,112,32,105,32,114,101,115,41,0,0,0,0,0,0};
static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,27),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,122,101,114,111,45,116,111,32,110,41,0,0,0,0,0};
static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,7),40,108,112,32,108,115,41,0};
static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,30),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,102,105,110,100,32,112,114,101,100,32,108,115,41,0,0};
static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,4),40,108,112,41,0,0,0,0};
static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,25),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,108,97,115,116,32,108,115,41,0,0,0,0,0,0,0};
static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,14),40,108,112,32,104,101,97,100,32,116,97,105,108,41,0,0};
static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,29),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,97,110,121,32,112,114,101,100,32,108,115,41,0,0,0};
static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,14),40,108,112,32,104,101,97,100,32,116,97,105,108,41,0,0};
static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,31),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,101,118,101,114,121,32,112,114,101,100,32,108,115,41,0};
static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,11),40,108,112,32,108,115,32,114,101,115,41,0,0,0,0,0};
static C_char C_TLS li43[] C_aligned={C_lihdr(0,0,35),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,102,111,108,100,32,107,111,110,115,32,107,110,105,108,32,108,115,41,0,0,0,0,0};
static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,31),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,102,108,97,103,45,106,111,105,110,32,97,32,98,41,0};
static C_char C_TLS li45[] C_aligned={C_lihdr(0,0,32),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,102,108,97,103,45,99,108,101,97,114,32,97,32,98,41};
static C_char C_TLS li46[] C_aligned={C_lihdr(0,0,12),40,97,57,55,52,57,32,122,32,106,51,41,0,0,0,0};
static C_char C_TLS li47[] C_aligned={C_lihdr(0,0,12),40,97,57,55,52,51,32,121,32,106,50,41,0,0,0,0};
static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,11),40,97,57,55,48,57,32,120,32,106,41,0,0,0,0,0};
static C_char C_TLS li49[] C_aligned={C_lihdr(0,0,9),40,108,112,32,105,32,108,115,41,0,0,0,0,0,0,0};
static C_char C_TLS li50[] C_aligned={C_lihdr(0,0,8),40,115,107,105,112,32,105,41};
static C_char C_TLS li51[] C_aligned={C_lihdr(0,0,14),40,97,57,56,54,54,32,115,101,120,112,32,106,41,0,0};
static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,14),40,97,57,57,48,53,32,115,101,120,112,32,106,41,0,0};
static C_char C_TLS li53[] C_aligned={C_lihdr(0,0,9),40,99,111,108,108,101,99,116,41,0,0,0,0,0,0,0};
static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,17),40,115,99,97,110,32,102,114,111,109,32,105,32,114,101,115,41,0,0,0,0,0,0,0};
static C_char C_TLS li55[] C_aligned={C_lihdr(0,0,15),40,97,49,48,48,53,50,32,115,101,120,112,32,106,41,0};
static C_char C_TLS li56[] C_aligned={C_lihdr(0,0,15),40,97,49,48,48,55,48,32,115,101,120,112,32,106,41,0};
static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,8),40,115,99,97,110,32,106,41};
static C_char C_TLS li58[] C_aligned={C_lihdr(0,0,12),40,102,95,57,54,55,55,32,105,32,107,41,0,0,0,0};
static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,14),40,97,49,48,50,52,49,32,114,101,115,32,106,41,0,0};
static C_char C_TLS li60[] C_aligned={C_lihdr(0,0,50),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,119,105,116,104,45,114,101,97,100,45,102,114,111,109,45,115,116,114,105,110,103,32,115,116,114,32,105,32,112,114,111,99,41,0,0,0,0,0,0};
static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,11),40,108,112,32,108,115,32,114,101,115,41,0,0,0,0,0};
static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,39),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,121,109,98,111,108,45,108,105,115,116,45,62,102,108,97,103,115,32,108,115,41,0};
static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,39),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,109,97,121,98,101,45,115,116,114,105,110,103,45,62,115,114,101,32,111,98,106,41,0};
static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,12),40,99,97,115,101,100,45,99,104,97,114,41,0,0,0,0};
static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,49,52,53,57,32,103,49,52,55,49,41,0,0,0,0};
static C_char C_TLS li66[] C_aligned={C_lihdr(0,0,18),40,99,97,115,101,100,45,115,116,114,105,110,103,32,115,116,114,41,0,0,0,0,0,0};
static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,9),40,99,111,108,108,101,99,116,41,0,0,0,0,0,0,0};
static C_char C_TLS li68[] C_aligned={C_lihdr(0,0,6),40,108,112,32,105,41,0,0};
static C_char C_TLS li69[] C_aligned={C_lihdr(0,0,16),40,99,111,108,108,101,99,116,47,115,105,110,103,108,101,41};
static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,16),40,108,112,32,108,115,32,116,101,114,109,32,114,101,115,41};
static C_char C_TLS li71[] C_aligned={C_lihdr(0,0,15),40,99,111,108,108,101,99,116,47,116,101,114,109,115,41,0};
static C_char C_TLS li72[] C_aligned={C_lihdr(0,0,6),40,115,97,118,101,41,0,0};
static C_char C_TLS li73[] C_aligned={C_lihdr(0,0,14),40,97,49,49,49,55,50,32,115,114,101,32,106,41,0,0};
static C_char C_TLS li74[] C_aligned={C_lihdr(0,0,6),40,106,111,105,110,41,0,0};
static C_char C_TLS li75[] C_aligned={C_lihdr(0,0,9),40,110,101,119,45,114,101,115,41,0,0,0,0,0,0,0};
static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,21),40,108,112,50,32,106,32,102,108,97,103,115,32,105,110,118,101,114,116,63,41,0,0,0};
static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,14),40,97,49,49,57,51,50,32,115,114,101,32,106,41,0,0};
static C_char C_TLS li78[] C_aligned={C_lihdr(0,0,14),40,97,50,54,56,50,51,32,120,32,114,101,115,41,0,0};
static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,12),40,97,49,51,52,51,52,32,99,32,106,41,0,0,0,0};
static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,7),40,103,49,56,55,50,41,0};
static C_char C_TLS li81[] C_aligned={C_lihdr(0,0,13),40,97,49,51,55,54,52,32,99,104,32,106,41,0,0,0};
static C_char C_TLS li82[] C_aligned={C_lihdr(0,0,21),40,103,111,32,105,32,112,114,101,118,45,99,104,97,114,32,99,115,101,116,41,0,0,0};
static C_char C_TLS li83[] C_aligned={C_lihdr(0,0,9),40,99,111,108,108,101,99,116,41,0,0,0,0,0,0,0};
static C_char C_TLS li84[] C_aligned={C_lihdr(0,0,15),40,108,112,32,105,32,102,114,111,109,32,114,101,115,41,0};
static C_char C_TLS li85[] C_aligned={C_lihdr(0,0,13),40,97,49,50,53,55,55,32,99,104,32,106,41,0,0,0};
static C_char C_TLS li86[] C_aligned={C_lihdr(0,0,7),40,108,112,50,32,106,41,0};
static C_char C_TLS li87[] C_aligned={C_lihdr(0,0,14),40,97,49,50,56,48,56,32,115,114,101,32,106,41,0,0};
static C_char C_TLS li88[] C_aligned={C_lihdr(0,0,8),40,115,99,97,110,32,105,41};
static C_char C_TLS li89[] C_aligned={C_lihdr(0,0,24),40,108,112,32,105,32,102,114,111,109,32,102,108,97,103,115,32,114,101,115,32,115,116,41};
static C_char C_TLS li90[] C_aligned={C_lihdr(0,0,37),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,116,114,105,110,103,45,62,115,114,101,32,115,116,114,32,46,32,111,41,0,0,0};
static C_char C_TLS li91[] C_aligned={C_lihdr(0,0,8),40,115,99,97,110,32,105,41};
static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,51),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,116,114,105,110,103,45,112,97,114,115,101,45,104,101,120,45,101,115,99,97,112,101,32,115,116,114,32,105,32,101,110,100,41,0,0,0,0,0};
static C_char C_TLS li93[] C_aligned={C_lihdr(0,0,30),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,104,105,103,104,45,99,104,97,114,63,32,99,41,0,0};
static C_char C_TLS li94[] C_aligned={C_lihdr(0,0,6),40,98,121,116,101,41,0,0};
static C_char C_TLS li95[] C_aligned={C_lihdr(0,0,43),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,117,116,102,56,45,115,116,114,105,110,103,45,114,101,102,32,115,116,114,32,105,32,108,101,110,41,0,0,0,0,0};
static C_char C_TLS li96[] C_aligned={C_lihdr(0,0,49),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,117,116,102,56,45,108,111,119,101,115,116,45,100,105,103,105,116,45,111,102,45,108,101,110,103,116,104,32,108,101,110,41,0,0,0,0,0,0,0};
static C_char C_TLS li97[] C_aligned={C_lihdr(0,0,35),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,99,104,97,114,45,62,117,116,102,56,45,108,105,115,116,32,99,41,0,0,0,0,0};
static C_char C_TLS li98[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,48,54,53,32,103,50,48,55,55,41,0,0,0,0};
static C_char C_TLS li99[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,48,51,57,32,103,50,48,53,49,41,0,0,0,0};
static C_char C_TLS li100[] C_aligned={C_lihdr(0,0,56),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,117,110,105,99,111,100,101,45,114,97,110,103,101,45,104,101,108,112,101,114,32,111,110,101,32,108,115,32,112,114,101,102,105,120,32,114,101,115,41};
static C_char C_TLS li101[] C_aligned={C_lihdr(0,0,10),40,97,49,52,55,48,52,32,99,41,0,0,0,0,0,0};
static C_char C_TLS li102[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,49,48,49,32,103,50,49,49,51,41,0,0,0,0};
static C_char C_TLS li103[] C_aligned={C_lihdr(0,0,45),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,117,110,105,99,111,100,101,45,114,97,110,103,101,45,117,112,45,102,114,111,109,32,108,111,45,108,115,41,0,0,0};
static C_char C_TLS li104[] C_aligned={C_lihdr(0,0,10),40,97,49,52,56,52,51,32,99,41,0,0,0,0,0,0};
static C_char C_TLS li105[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,49,51,54,32,103,50,49,52,56,41,0,0,0,0};
static C_char C_TLS li106[] C_aligned={C_lihdr(0,0,43),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,117,110,105,99,111,100,101,45,114,97,110,103,101,45,117,112,45,116,111,32,104,105,45,108,115,41,0,0,0,0,0};
static C_char C_TLS li107[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,50,50,53,32,103,50,50,51,55,41,0,0,0,0};
static C_char C_TLS li108[] C_aligned={C_lihdr(0,0,9),40,103,50,50,48,56,32,105,41,0,0,0,0,0,0,0};
static C_char C_TLS li109[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,50,54,53,32,103,50,50,55,55,41,0,0,0,0};
static C_char C_TLS li110[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,50,48,50,32,103,50,50,49,52,41,0,0,0,0};
static C_char C_TLS li111[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,49,55,50,32,103,50,49,56,52,41,0,0,0,0};
static C_char C_TLS li112[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,51,48,51,32,103,50,51,49,53,41,0,0,0,0};
static C_char C_TLS li113[] C_aligned={C_lihdr(0,0,16),40,108,112,32,108,111,45,108,115,32,104,105,45,108,115,41};
static C_char C_TLS li114[] C_aligned={C_lihdr(0,0,20),40,108,112,32,108,115,32,97,108,116,115,32,108,111,45,99,115,101,116,41,0,0,0,0};
static C_char C_TLS li115[] C_aligned={C_lihdr(0,0,41),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,99,115,101,116,45,62,117,116,102,56,45,112,97,116,116,101,114,110,32,99,115,101,116,41,0,0,0,0,0,0,0};
static C_char C_TLS li116[] C_aligned={C_lihdr(0,0,31),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,32,120,32,46,32,111,41,0};
static C_char C_TLS li117[] C_aligned={C_lihdr(0,0,41),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,116,114,105,110,103,45,62,105,114,114,101,103,101,120,32,115,116,114,32,46,32,111,41,0,0,0,0,0,0,0};
static C_char C_TLS li118[] C_aligned={C_lihdr(0,0,44),40,97,50,51,50,56,51,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0,0};
static C_char C_TLS li119[] C_aligned={C_lihdr(0,0,9),40,114,101,99,32,115,114,101,41,0,0,0,0,0,0,0};
static C_char C_TLS li120[] C_aligned={C_lihdr(0,0,45),40,102,95,50,51,51,57,51,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li121[] C_aligned={C_lihdr(0,0,8),40,97,50,51,52,50,50,41};
static C_char C_TLS li122[] C_aligned={C_lihdr(0,0,45),40,102,95,50,51,52,49,55,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li123[] C_aligned={C_lihdr(0,0,8),40,97,50,51,54,49,53,41};
static C_char C_TLS li124[] C_aligned={C_lihdr(0,0,45),40,102,95,50,51,54,49,48,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li125[] C_aligned={C_lihdr(0,0,8),40,97,50,51,54,52,49,41};
static C_char C_TLS li126[] C_aligned={C_lihdr(0,0,45),40,102,95,50,51,54,51,54,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li127[] C_aligned={C_lihdr(0,0,8),40,97,50,51,54,55,54,41};
static C_char C_TLS li128[] C_aligned={C_lihdr(0,0,45),40,102,95,50,51,54,55,49,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li129[] C_aligned={C_lihdr(0,0,8),40,97,50,51,55,50,50,41};
static C_char C_TLS li130[] C_aligned={C_lihdr(0,0,45),40,102,95,50,51,55,49,55,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li131[] C_aligned={C_lihdr(0,0,8),40,97,50,51,55,51,56,41};
static C_char C_TLS li132[] C_aligned={C_lihdr(0,0,44),40,97,50,51,55,51,50,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0,0};
static C_char C_TLS li133[] C_aligned={C_lihdr(0,0,8),40,97,50,51,55,56,49,41};
static C_char C_TLS li134[] C_aligned={C_lihdr(0,0,44),40,97,50,51,55,55,53,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0,0};
static C_char C_TLS li135[] C_aligned={C_lihdr(0,0,45),40,102,95,50,51,56,54,57,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li136[] C_aligned={C_lihdr(0,0,8),40,97,50,51,57,48,53,41};
static C_char C_TLS li137[] C_aligned={C_lihdr(0,0,44),40,97,50,51,56,56,55,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0,0};
static C_char C_TLS li138[] C_aligned={C_lihdr(0,0,16),40,98,111,100,121,52,53,52,55,32,99,111,117,110,116,41};
static C_char C_TLS li139[] C_aligned={C_lihdr(0,0,8),40,97,50,51,57,52,53,41};
static C_char C_TLS li140[] C_aligned={C_lihdr(0,0,45),40,102,95,50,51,57,51,55,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li141[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,48,50,49,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li142[] C_aligned={C_lihdr(0,0,8),40,97,50,52,48,54,49,41};
static C_char C_TLS li143[] C_aligned={C_lihdr(0,0,44),40,97,50,52,48,51,57,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0,0};
static C_char C_TLS li144[] C_aligned={C_lihdr(0,0,16),40,98,111,100,121,52,54,48,53,32,99,111,117,110,116,41};
static C_char C_TLS li145[] C_aligned={C_lihdr(0,0,8),40,97,50,52,49,48,53,41};
static C_char C_TLS li146[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,48,57,54,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li147[] C_aligned={C_lihdr(0,0,8),40,97,50,52,50,54,54,41};
static C_char C_TLS li148[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,50,53,50,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li149[] C_aligned={C_lihdr(0,0,44),40,97,50,52,50,55,51,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0,0};
static C_char C_TLS li150[] C_aligned={C_lihdr(0,0,8),40,97,50,52,51,48,49,41};
static C_char C_TLS li151[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,50,56,55,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li152[] C_aligned={C_lihdr(0,0,44),40,97,50,52,51,48,56,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0,0};
static C_char C_TLS li153[] C_aligned={C_lihdr(0,0,11),40,102,95,50,52,51,55,48,32,120,41,0,0,0,0,0};
static C_char C_TLS li154[] C_aligned={C_lihdr(0,0,8),40,97,50,52,51,54,52,41};
static C_char C_TLS li155[] C_aligned={C_lihdr(0,0,9),40,97,56,54,57,50,32,120,41,0,0,0,0,0,0,0};
static C_char C_TLS li156[] C_aligned={C_lihdr(0,0,9),40,97,56,55,49,57,32,120,41,0,0,0,0,0,0,0};
static C_char C_TLS li157[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,51,50,53,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li158[] C_aligned={C_lihdr(0,0,44),40,97,50,52,51,56,54,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0,0};
static C_char C_TLS li159[] C_aligned={C_lihdr(0,0,8),40,97,50,52,52,50,50,41};
static C_char C_TLS li160[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,52,48,56,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li161[] C_aligned={C_lihdr(0,0,44),40,97,50,52,52,50,57,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0,0};
static C_char C_TLS li162[] C_aligned={C_lihdr(0,0,46),40,102,95,50,52,52,54,49,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,50,41,0,0};
static C_char C_TLS li163[] C_aligned={C_lihdr(0,0,8),40,97,50,52,53,50,52,41};
static C_char C_TLS li164[] C_aligned={C_lihdr(0,0,46),40,102,95,50,52,53,49,57,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,50,41,0,0};
static C_char C_TLS li165[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,53,54,54,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li166[] C_aligned={C_lihdr(0,0,24),40,108,112,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,106,32,108,101,110,41};
static C_char C_TLS li167[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,54,48,50,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li168[] C_aligned={C_lihdr(0,0,8),40,97,50,52,56,54,51,41};
static C_char C_TLS li169[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,56,49,54,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li170[] C_aligned={C_lihdr(0,0,8),40,97,50,52,57,53,56,41};
static C_char C_TLS li171[] C_aligned={C_lihdr(0,0,44),40,97,50,52,57,50,51,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0,0};
static C_char C_TLS li172[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,49,53,57,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li173[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,50,49,55,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li174[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,51,48,57,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li175[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,51,51,57,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li176[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,51,57,55,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li177[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,53,48,52,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li178[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,53,51,55,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li179[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,54,48,50,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li180[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,54,57,49,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li181[] C_aligned={C_lihdr(0,0,9),40,108,112,32,115,114,99,50,41,0,0,0,0,0,0,0};
static C_char C_TLS li182[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,56,49,51,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li183[] C_aligned={C_lihdr(0,0,9),40,108,112,32,115,114,99,50,41,0,0,0,0,0,0,0};
static C_char C_TLS li184[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,57,49,50,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li185[] C_aligned={C_lihdr(0,0,21),40,108,112,32,115,114,101,32,110,32,102,108,97,103,115,32,110,101,120,116,41,0,0,0};
static C_char C_TLS li186[] C_aligned={C_lihdr(0,0,8),40,103,114,111,119,32,105,41};
static C_char C_TLS li187[] C_aligned={C_lihdr(0,0,16),40,97,49,55,49,51,54,32,108,111,51,32,104,105,51,41};
static C_char C_TLS li188[] C_aligned={C_lihdr(0,0,18),40,108,112,50,32,108,115,32,110,32,108,111,50,32,104,105,50,41,0,0,0,0,0,0};
static C_char C_TLS li189[] C_aligned={C_lihdr(0,0,16),40,97,49,55,50,49,56,32,108,111,51,32,104,105,51,41};
static C_char C_TLS li190[] C_aligned={C_lihdr(0,0,18),40,108,112,50,32,108,115,32,110,32,108,111,50,32,104,105,50,41,0,0,0,0,0,0};
static C_char C_TLS li191[] C_aligned={C_lihdr(0,0,16),40,97,49,55,51,49,52,32,108,111,52,32,104,105,52,41};
static C_char C_TLS li192[] C_aligned={C_lihdr(0,0,16),40,97,49,55,51,48,48,32,108,111,51,32,104,105,51,41};
static C_char C_TLS li193[] C_aligned={C_lihdr(0,0,16),40,97,49,55,50,56,54,32,108,111,50,32,104,105,50,41};
static C_char C_TLS li194[] C_aligned={C_lihdr(0,0,16),40,97,49,55,52,51,51,32,108,111,50,32,104,105,50,41};
static C_char C_TLS li195[] C_aligned={C_lihdr(0,0,14),40,97,49,55,53,56,55,32,108,111,32,104,105,41,0,0};
static C_char C_TLS li196[] C_aligned={C_lihdr(0,0,16),40,97,49,55,54,50,54,32,108,111,50,32,104,105,50,41};
static C_char C_TLS li197[] C_aligned={C_lihdr(0,0,16),40,97,49,55,54,55,51,32,108,111,50,32,104,105,50,41};
static C_char C_TLS li198[] C_aligned={C_lihdr(0,0,16),40,97,49,55,55,52,55,32,108,111,50,32,104,105,50,41};
static C_char C_TLS li199[] C_aligned={C_lihdr(0,0,16),40,97,49,55,55,55,53,32,108,111,50,32,104,105,50,41};
static C_char C_TLS li200[] C_aligned={C_lihdr(0,0,12),40,103,51,48,49,53,32,99,101,108,108,41,0,0,0,0};
static C_char C_TLS li201[] C_aligned={C_lihdr(0,0,23),40,108,112,32,115,114,101,32,110,32,108,111,32,104,105,32,114,101,116,117,114,110,41,0};
static C_char C_TLS li202[] C_aligned={C_lihdr(0,0,11),40,103,50,54,49,51,32,110,102,97,41,0,0,0,0,0};
static C_char C_TLS li203[] C_aligned={C_lihdr(0,0,11),40,103,50,54,48,50,32,110,102,97,41,0,0,0,0,0};
static C_char C_TLS li204[] C_aligned={C_lihdr(0,0,9),40,114,101,99,32,115,114,101,41,0,0,0,0,0,0,0};
static C_char C_TLS li205[] C_aligned={C_lihdr(0,0,9),40,103,50,51,54,56,32,115,41,0,0,0,0,0,0,0};
static C_char C_TLS li206[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,51,54,50,32,103,50,51,55,52,41,0,0,0,0};
static C_char C_TLS li207[] C_aligned={C_lihdr(0,0,9),40,103,50,51,57,53,32,115,41,0,0,0,0,0,0,0};
static C_char C_TLS li208[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,51,56,57,32,103,50,52,48,49,41,0,0,0,0};
static C_char C_TLS li209[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,52,51,50,32,103,50,52,52,52,41,0,0,0,0};
static C_char C_TLS li210[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,52,53,56,32,103,50,52,55,48,41,0,0,0,0};
static C_char C_TLS li211[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,52,57,50,32,103,50,53,48,52,41,0,0,0,0};
static C_char C_TLS li212[] C_aligned={C_lihdr(0,0,22),40,97,100,106,117,115,116,32,115,114,101,32,117,116,102,56,63,32,99,105,63,41,0,0};
static C_char C_TLS li213[] C_aligned={C_lihdr(0,0,38),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,62,105,114,114,101,103,101,120,32,115,114,101,32,46,32,111,41,0,0};
static C_char C_TLS li214[] C_aligned={C_lihdr(0,0,32),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,101,109,112,116,121,63,32,115,114,101,41};
static C_char C_TLS li215[] C_aligned={C_lihdr(0,0,30),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,97,110,121,63,32,115,114,101,41,0,0};
static C_char C_TLS li216[] C_aligned={C_lihdr(0,0,31),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,114,101,112,101,97,116,101,114,63,41,0};
static C_char C_TLS li217[] C_aligned={C_lihdr(0,0,30),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,98,111,115,63,32,115,114,101,41,0,0};
static C_char C_TLS li218[] C_aligned={C_lihdr(0,0,35),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,115,101,97,114,99,104,101,114,63,32,115,114,101,41,0,0,0,0,0};
static C_char C_TLS li219[] C_aligned={C_lihdr(0,0,35),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,99,111,110,115,117,109,101,114,63,32,115,114,101,41,0,0,0,0,0};
static C_char C_TLS li220[] C_aligned={C_lihdr(0,0,41),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,104,97,115,45,115,117,98,109,97,116,99,104,101,115,63,32,115,114,101,41,0,0,0,0,0,0,0};
static C_char C_TLS li221[] C_aligned={C_lihdr(0,0,15),40,99,111,117,110,116,32,115,114,101,32,115,117,109,41,0};
static C_char C_TLS li222[] C_aligned={C_lihdr(0,0,42),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,99,111,117,110,116,45,115,117,98,109,97,116,99,104,101,115,32,115,114,101,41,0,0,0,0,0,0};
static C_char C_TLS li223[] C_aligned={C_lihdr(0,0,30),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,115,101,113,117,101,110,99,101,41,0,0};
static C_char C_TLS li224[] C_aligned={C_lihdr(0,0,31),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,97,108,116,101,114,110,97,116,101,41,0};
static C_char C_TLS li225[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,51,48,53,50,32,103,51,48,54,52,41,0,0,0,0};
static C_char C_TLS li226[] C_aligned={C_lihdr(0,0,42),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,115,116,114,105,112,45,115,117,98,109,97,116,99,104,101,115,32,115,114,101,41,0,0,0,0,0,0};
static C_char C_TLS li227[] C_aligned={C_lihdr(0,0,39),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,110,97,109,101,115,32,115,114,101,32,110,32,110,97,109,101,115,41,0};
static C_char C_TLS li228[] C_aligned={C_lihdr(0,0,47),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,115,101,113,117,101,110,99,101,45,110,97,109,101,115,32,108,115,32,110,32,110,97,109,101,115,41,0};
static C_char C_TLS li229[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,51,49,57,51,32,103,51,50,48,53,41,0,0,0,0};
static C_char C_TLS li230[] C_aligned={C_lihdr(0,0,44),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,114,101,109,111,118,101,45,105,110,105,116,105,97,108,45,98,111,115,32,115,114,101,41,0,0,0,0};
static C_char C_TLS li231[] C_aligned={C_lihdr(0,0,42),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,115,101,97,114,99,104,32,120,32,115,116,114,32,46,32,111,41,0,0,0,0,0,0};
static C_char C_TLS li232[] C_aligned={C_lihdr(0,0,54),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,115,101,97,114,99,104,47,99,104,117,110,107,101,100,32,120,32,99,110,107,32,115,114,99,32,46,32,111,41,0,0};
static C_char C_TLS li233[] C_aligned={C_lihdr(0,0,7),40,108,112,50,32,105,41,0};
static C_char C_TLS li234[] C_aligned={C_lihdr(0,0,11),40,108,112,49,32,115,114,99,32,105,41,0,0,0,0,0};
static C_char C_TLS li235[] C_aligned={C_lihdr(0,0,10),40,97,49,57,54,57,48,32,120,41,0,0,0,0,0,0};
static C_char C_TLS li236[] C_aligned={C_lihdr(0,0,13),40,108,112,50,32,105,32,115,116,97,116,101,41,0,0,0};
static C_char C_TLS li237[] C_aligned={C_lihdr(0,0,21),40,108,112,49,32,115,114,99,32,115,116,97,114,116,32,115,116,97,116,101,41,0,0,0};
static C_char C_TLS li238[] C_aligned={C_lihdr(0,0,8),40,97,49,57,49,53,50,41};
static C_char C_TLS li239[] C_aligned={C_lihdr(0,0,8),40,97,49,57,50,50,52,41};
static C_char C_TLS li240[] C_aligned={C_lihdr(0,0,19),40,108,112,32,115,114,99,50,32,115,116,114,32,105,32,101,110,100,41,0,0,0,0,0};
static C_char C_TLS li241[] C_aligned={C_lihdr(0,0,67),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,115,101,97,114,99,104,47,109,97,116,99,104,101,115,32,105,114,120,32,99,110,107,32,105,110,105,116,32,115,114,99,32,105,32,109,97,116,99,104,101,115,41,0,0,0,0,0};
static C_char C_TLS li242[] C_aligned={C_lihdr(0,0,43),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,109,97,116,99,104,32,105,114,120,32,115,116,114,32,46,32,111,41,0,0,0,0,0};
static C_char C_TLS li243[] C_aligned={C_lihdr(0,0,6),40,108,112,32,109,41,0,0};
static C_char C_TLS li244[] C_aligned={C_lihdr(0,0,8),40,97,49,57,53,52,53,41};
static C_char C_TLS li245[] C_aligned={C_lihdr(0,0,51),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,109,97,116,99,104,47,99,104,117,110,107,101,100,32,105,114,120,32,99,110,107,32,115,114,99,41,0,0,0,0,0};
static C_char C_TLS li246[] C_aligned={C_lihdr(0,0,39),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,109,97,116,99,104,63,32,46,32,97,114,103,115,41,0};
static C_char C_TLS li247[] C_aligned={C_lihdr(0,0,7),40,103,51,53,48,50,41,0};
static C_char C_TLS li248[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,51,53,48,49,32,103,51,53,48,56,41,0,0,0,0,0,0,0};
static C_char C_TLS li249[] C_aligned={C_lihdr(0,0,52),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,102,105,110,97,108,105,122,101,33,32,102,105,110,97,108,105,122,101,114,32,109,101,109,111,114,121,32,109,97,116,99,104,101,115,41,0,0,0,0};
static C_char C_TLS li250[] C_aligned={C_lihdr(0,0,7),40,103,51,54,53,55,41,0};
static C_char C_TLS li251[] C_aligned={C_lihdr(0,0,7),40,103,51,54,54,55,41,0};
static C_char C_TLS li252[] C_aligned={C_lihdr(0,0,19),40,102,111,114,45,101,97,99,104,45,108,111,111,112,51,54,54,54,41,0,0,0,0,0};
static C_char C_TLS li253[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,51,54,53,54,32,103,51,54,54,51,41,0,0,0,0,0,0,0};
static C_char C_TLS li254[] C_aligned={C_lihdr(0,0,10),40,97,50,48,50,55,48,32,120,41,0,0,0,0,0,0};
static C_char C_TLS li255[] C_aligned={C_lihdr(0,0,41),40,108,112,50,32,105,32,115,116,97,116,101,32,114,101,115,45,115,114,99,32,114,101,115,45,105,110,100,101,120,32,102,105,110,97,108,105,122,101,114,41,0,0,0,0,0,0,0};
static C_char C_TLS li256[] C_aligned={C_lihdr(0,0,49),40,108,112,49,32,115,114,99,32,115,116,97,114,116,32,115,116,97,116,101,32,114,101,115,45,115,114,99,32,114,101,115,45,105,110,100,101,120,32,102,105,110,97,108,105,122,101,114,41,0,0,0,0,0,0,0};
static C_char C_TLS li257[] C_aligned={C_lihdr(0,0,7),40,103,51,53,55,51,41,0};
static C_char C_TLS li258[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,51,53,55,50,32,103,51,53,55,57,41,0,0,0,0,0,0,0};
static C_char C_TLS li259[] C_aligned={C_lihdr(0,0,14),40,100,111,108,111,111,112,51,53,51,50,32,105,41,0,0};
static C_char C_TLS li260[] C_aligned={C_lihdr(0,0,79),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,100,102,97,45,109,97,116,99,104,47,108,111,110,103,101,115,116,32,100,102,97,32,99,110,107,32,115,114,99,32,115,116,97,114,116,32,101,110,100,45,115,114,99,32,101,110,100,32,109,97,116,99,104,101,115,32,105,110,100,101,120,41,0};
static C_char C_TLS li261[] C_aligned={C_lihdr(0,0,16),40,97,51,48,54,56,48,32,101,115,99,32,46,32,111,41};
static C_char C_TLS li262[] C_aligned={C_lihdr(0,0,36),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,110,102,97,45,103,101,116,45,101,112,115,105,108,111,110,115,32,105,41,0,0,0,0};
static C_char C_TLS li263[] C_aligned={C_lihdr(0,0,40),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,110,102,97,45,97,100,100,45,101,112,115,105,108,111,110,33,32,105,32,120,32,116,41};
static C_char C_TLS li264[] C_aligned={C_lihdr(0,0,24),40,110,101,119,45,115,116,97,116,101,45,110,117,109,98,101,114,32,115,116,97,116,101,41};
static C_char C_TLS li265[] C_aligned={C_lihdr(0,0,14),40,100,111,108,111,111,112,51,56,52,51,32,105,41,0,0};
static C_char C_TLS li266[] C_aligned={C_lihdr(0,0,24),40,97,100,100,45,115,116,97,116,101,33,32,110,50,32,116,114,97,110,115,45,108,115,41};
static C_char C_TLS li267[] C_aligned={C_lihdr(0,0,29),40,101,120,116,101,110,100,45,115,116,97,116,101,33,32,110,101,120,116,32,116,114,97,110,115,45,99,115,41,0,0,0};
static C_char C_TLS li268[] C_aligned={C_lihdr(0,0,25),40,97,100,100,45,99,104,97,114,45,115,116,97,116,101,33,32,110,101,120,116,32,99,104,41,0,0,0,0,0,0,0};
static C_char C_TLS li269[] C_aligned={C_lihdr(0,0,12),40,108,112,50,32,105,32,110,101,120,116,41,0,0,0,0};
static C_char C_TLS li270[] C_aligned={C_lihdr(0,0,12),40,103,51,57,55,57,32,99,101,108,108,41,0,0,0,0};
static C_char C_TLS li271[] C_aligned={C_lihdr(0,0,20),40,108,112,32,108,115,32,110,32,102,108,97,103,115,32,110,101,120,116,41,0,0,0,0};
static C_char C_TLS li272[] C_aligned={C_lihdr(0,0,14),40,100,111,108,111,111,112,51,57,56,57,32,105,41,0,0};
static C_char C_TLS li273[] C_aligned={C_lihdr(0,0,16),40,108,112,32,115,114,101,32,109,97,120,32,114,101,115,41};
static C_char C_TLS li274[] C_aligned={C_lihdr(0,0,41),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,62,110,102,97,32,115,114,101,32,105,110,105,116,45,102,108,97,103,115,41,0,0,0,0,0,0,0};
static C_char C_TLS li275[] C_aligned={C_lihdr(0,0,30),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,109,97,107,101,45,109,115,116,32,110,102,97,41,0,0};
static C_char C_TLS li276[] C_aligned={C_lihdr(0,0,30),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,109,115,116,45,99,111,112,121,32,109,115,116,41,0,0};
static C_char C_TLS li277[] C_aligned={C_lihdr(0,0,51),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,110,102,97,45,115,116,97,116,101,45,62,109,115,116,32,110,102,97,32,115,116,97,116,101,32,109,97,112,112,105,110,103,115,41,0,0,0,0,0};
static C_char C_TLS li278[] C_aligned={C_lihdr(0,0,7),40,103,52,48,52,55,41,0};
static C_char C_TLS li279[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,52,48,52,54,32,103,52,48,53,51,41,0,0,0,0,0,0,0};
static C_char C_TLS li280[] C_aligned={C_lihdr(0,0,49),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,109,115,116,45,97,100,100,33,32,110,102,97,32,109,115,116,32,115,116,97,116,101,32,109,97,112,112,105,110,103,115,41,0,0,0,0,0,0,0};
static C_char C_TLS li281[] C_aligned={C_lihdr(0,0,10),40,108,112,32,105,32,97,99,99,41,0,0,0,0,0,0};
static C_char C_TLS li282[] C_aligned={C_lihdr(0,0,40),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,109,115,116,45,102,111,108,100,32,109,115,116,32,107,111,110,115,32,107,110,105,108,41};
static C_char C_TLS li283[] C_aligned={C_lihdr(0,0,10),40,103,52,50,49,56,32,116,114,41,0,0,0,0,0,0};
static C_char C_TLS li284[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,52,50,49,50,32,103,52,50,50,52,41,0,0,0,0};
static C_char C_TLS li285[] C_aligned={C_lihdr(0,0,21),40,100,111,108,111,111,112,52,50,48,52,32,105,32,115,116,97,116,101,115,41,0,0,0};
static C_char C_TLS li286[] C_aligned={C_lihdr(0,0,21),40,108,112,32,105,32,115,116,97,116,101,115,32,105,110,100,101,120,101,115,41,0,0,0};
static C_char C_TLS li287[] C_aligned={C_lihdr(0,0,36),40,108,112,51,32,99,108,111,115,117,114,101,45,115,108,111,116,115,32,115,116,97,116,101,45,115,108,111,116,115,32,99,109,100,115,41,0,0,0,0};
static C_char C_TLS li288[] C_aligned={C_lihdr(0,0,26),40,108,112,50,32,115,116,97,116,101,45,115,117,109,109,97,114,121,32,116,32,99,109,100,115,41,0,0,0,0,0,0};
static C_char C_TLS li289[] C_aligned={C_lihdr(0,0,6),40,108,112,32,105,41,0,0};
static C_char C_TLS li290[] C_aligned={C_lihdr(0,0,15),40,108,112,32,100,102,97,45,115,116,97,116,101,115,41,0};
static C_char C_TLS li291[] C_aligned={C_lihdr(0,0,37),40,108,112,50,32,116,114,97,110,115,32,117,110,109,97,114,107,101,100,45,115,116,97,116,101,115,32,100,102,97,45,116,114,97,110,115,41,0,0,0};
static C_char C_TLS li292[] C_aligned={C_lihdr(0,0,20),40,103,52,50,54,55,32,105,110,116,101,114,115,101,99,116,105,111,110,41,0,0,0,0};
static C_char C_TLS li293[] C_aligned={C_lihdr(0,0,20),40,108,112,32,108,115,32,99,115,32,115,116,97,116,101,32,114,101,115,41,0,0,0,0};
static C_char C_TLS li294[] C_aligned={C_lihdr(0,0,24),40,97,50,50,54,51,51,32,115,116,32,109,97,112,112,105,110,103,115,32,114,101,115,41};
static C_char C_TLS li295[] C_aligned={C_lihdr(0,0,43),40,108,112,32,117,110,109,97,114,107,101,100,45,115,116,97,116,101,115,32,109,97,114,107,101,100,45,115,116,97,116,101,115,32,100,102,97,45,115,105,122,101,41,0,0,0,0,0};
static C_char C_TLS li296[] C_aligned={C_lihdr(0,0,32),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,110,102,97,45,62,100,102,97,32,110,102,97,32,111,41};
static C_char C_TLS li297[] C_aligned={C_lihdr(0,0,10),40,108,112,32,109,32,114,101,115,41,0,0,0,0,0,0};
static C_char C_TLS li298[] C_aligned={C_lihdr(0,0,12),40,100,111,108,111,111,112,52,49,52,55,41,0,0,0,0};
static C_char C_TLS li299[] C_aligned={C_lihdr(0,0,11),40,103,52,51,48,50,32,116,97,103,41,0,0,0,0,0};
static C_char C_TLS li300[] C_aligned={C_lihdr(0,0,17),40,108,112,50,32,116,114,97,110,115,32,115,116,97,99,107,41,0,0,0,0,0,0,0};
static C_char C_TLS li301[] C_aligned={C_lihdr(0,0,29),40,108,112,32,115,116,97,99,107,32,112,114,105,111,114,105,116,105,101,115,32,99,108,111,115,117,114,101,41,0,0,0};
static C_char C_TLS li302[] C_aligned={C_lihdr(0,0,17),40,97,50,50,57,50,49,32,115,116,32,109,32,114,101,115,41,0,0,0,0,0,0,0};
static C_char C_TLS li303[] C_aligned={C_lihdr(0,0,48),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,110,102,97,45,101,112,115,105,108,111,110,45,99,108,111,115,117,114,101,32,110,102,97,32,115,116,97,116,101,115,41};
static C_char C_TLS li304[] C_aligned={C_lihdr(0,0,10),40,97,50,51,48,52,53,32,99,41,0,0,0,0,0,0};
static C_char C_TLS li305[] C_aligned={C_lihdr(0,0,10),40,97,50,51,48,54,57,32,99,41,0,0,0,0,0,0};
static C_char C_TLS li306[] C_aligned={C_lihdr(0,0,16),40,108,112,50,32,115,49,32,115,50,32,99,109,100,115,41};
static C_char C_TLS li307[] C_aligned={C_lihdr(0,0,11),40,108,112,32,116,32,99,109,100,115,41,0,0,0,0,0};
static C_char C_TLS li308[] C_aligned={C_lihdr(0,0,79),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,116,97,103,45,115,101,116,45,99,111,109,109,97,110,100,115,45,102,111,114,45,99,108,111,115,117,114,101,32,110,102,97,32,111,114,105,103,45,115,116,97,116,101,32,99,108,111,115,117,114,101,32,99,111,112,121,45,99,109,100,115,41,0};
static C_char C_TLS li309[] C_aligned={C_lihdr(0,0,45),40,102,95,50,54,48,53,53,32,99,110,107,32,105,110,105,116,32,115,114,99,32,115,116,114,32,105,32,101,110,100,32,109,97,116,99,104,101,115,32,102,97,105,108,41,0,0,0};
static C_char C_TLS li310[] C_aligned={C_lihdr(0,0,47),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,99,115,101,116,45,62,112,114,111,99,101,100,117,114,101,32,99,115,101,116,32,110,101,120,116,41,0};
static C_char C_TLS li311[] C_aligned={C_lihdr(0,0,10),40,108,112,32,105,32,114,101,115,41,0,0,0,0,0,0};
static C_char C_TLS li312[] C_aligned={C_lihdr(0,0,32),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,99,115,101,116,45,62,112,108,105,115,116,32,99,115,41};
static C_char C_TLS li313[] C_aligned={C_lihdr(0,0,14),40,97,50,54,51,54,50,32,99,104,32,99,115,41,0,0};
static C_char C_TLS li314[] C_aligned={C_lihdr(0,0,32),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,116,114,105,110,103,45,62,99,115,101,116,32,115,41};
static C_char C_TLS li315[] C_aligned={C_lihdr(0,0,9),40,114,101,99,32,115,114,101,41,0,0,0,0,0,0,0};
static C_char C_TLS li316[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,53,50,49,49,32,103,53,50,50,51,41,0,0,0,0};
static C_char C_TLS li317[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,53,50,51,55,32,103,53,50,52,57,41,0,0,0,0};
static C_char C_TLS li318[] C_aligned={C_lihdr(0,0,14),40,97,50,54,53,54,54,32,120,32,114,101,115,41,0,0};
static C_char C_TLS li319[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,53,50,54,53,32,103,53,50,55,55,41,0,0,0,0};
static C_char C_TLS li320[] C_aligned={C_lihdr(0,0,11),40,108,112,32,108,115,32,114,101,115,41,0,0,0,0,0};
static C_char C_TLS li321[] C_aligned={C_lihdr(0,0,11),40,108,112,32,108,115,32,114,101,115,41,0,0,0,0,0};
static C_char C_TLS li322[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,53,50,57,50,32,103,53,51,48,52,41,0,0,0,0};
static C_char C_TLS li323[] C_aligned={C_lihdr(0,0,12),40,108,112,32,115,114,101,32,99,105,63,41,0,0,0,0};
static C_char C_TLS li324[] C_aligned={C_lihdr(0,0,33),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,62,99,115,101,116,32,115,114,101,32,111,41,0,0,0,0,0,0,0};
static C_char C_TLS li325[] C_aligned={C_lihdr(0,0,16),40,108,112,32,108,111,119,101,114,32,117,112,112,101,114,41};
static C_char C_TLS li326[] C_aligned={C_lihdr(0,0,40),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,99,115,101,116,45,99,111,110,116,97,105,110,115,63,32,99,115,101,116,32,99,104,41};
static C_char C_TLS li327[] C_aligned={C_lihdr(0,0,37),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,99,104,97,114,45,114,97,110,103,101,115,45,117,110,105,111,110,32,98,41,0,0,0};
static C_char C_TLS li328[] C_aligned={C_lihdr(0,0,21),40,117,110,105,111,110,45,114,97,110,103,101,32,97,32,98,32,114,101,115,41,0,0,0};
static C_char C_TLS li329[] C_aligned={C_lihdr(0,0,32),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,99,115,101,116,45,117,110,105,111,110,32,97,32,98,41};
static C_char C_TLS li330[] C_aligned={C_lihdr(0,0,14),40,100,105,102,102,32,97,32,98,32,114,101,115,41,0,0};
static C_char C_TLS li331[] C_aligned={C_lihdr(0,0,37),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,99,115,101,116,45,100,105,102,102,101,114,101,110,99,101,32,97,32,98,41,0,0,0};
static C_char C_TLS li332[] C_aligned={C_lihdr(0,0,19),40,105,110,116,101,114,115,101,99,116,32,97,32,98,32,114,101,115,41,0,0,0,0,0};
static C_char C_TLS li333[] C_aligned={C_lihdr(0,0,39),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,99,115,101,116,45,105,110,116,101,114,115,101,99,116,105,111,110,32,97,32,98,41,0};
static C_char C_TLS li334[] C_aligned={C_lihdr(0,0,35),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,99,115,101,116,45,99,111,109,112,108,101,109,101,110,116,32,97,41,0,0,0,0,0};
static C_char C_TLS li335[] C_aligned={C_lihdr(0,0,11),40,108,112,32,108,115,32,114,101,115,41,0,0,0,0,0};
static C_char C_TLS li336[] C_aligned={C_lihdr(0,0,41),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,99,115,101,116,45,99,97,115,101,45,105,110,115,101,110,115,105,116,105,118,101,32,97,41,0,0,0,0,0,0,0};
static C_char C_TLS li337[] C_aligned={C_lihdr(0,0,15),40,102,95,50,55,56,48,56,32,105,32,97,99,99,41,0};
static C_char C_TLS li338[] C_aligned={C_lihdr(0,0,14),40,108,112,32,115,114,99,32,105,32,97,99,99,41,0,0};
static C_char C_TLS li339[] C_aligned={C_lihdr(0,0,57),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,102,111,108,100,47,102,97,115,116,32,105,114,120,32,107,111,110,115,32,107,110,105,108,32,115,116,114,32,46,32,111,41,0,0,0,0,0,0,0};
static C_char C_TLS li340[] C_aligned={C_lihdr(0,0,15),40,107,111,110,115,50,32,105,32,109,32,97,99,99,41,0};
static C_char C_TLS li341[] C_aligned={C_lihdr(0,0,46),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,102,111,108,100,32,105,114,120,32,107,111,110,115,32,46,32,97,114,103,115,41,0,0};
static C_char C_TLS li342[] C_aligned={C_lihdr(0,0,19),40,102,95,50,56,48,50,56,32,115,114,99,32,105,32,97,99,99,41,0,0,0,0,0};
static C_char C_TLS li343[] C_aligned={C_lihdr(0,0,16),40,108,112,32,115,116,97,114,116,32,105,32,97,99,99,41};
static C_char C_TLS li344[] C_aligned={C_lihdr(0,0,71),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,102,111,108,100,47,99,104,117,110,107,101,100,47,102,97,115,116,32,105,114,120,32,107,111,110,115,32,107,110,105,108,32,99,110,107,32,115,116,97,114,116,32,46,32,111,41,0};
static C_char C_TLS li345[] C_aligned={C_lihdr(0,0,17),40,107,111,110,115,50,32,115,32,105,32,109,32,97,99,99,41,0,0,0,0,0,0,0};
static C_char C_TLS li346[] C_aligned={C_lihdr(0,0,54),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,102,111,108,100,47,99,104,117,110,107,101,100,32,105,114,120,32,107,111,110,115,32,46,32,97,114,103,115,41,0,0};
static C_char C_TLS li347[] C_aligned={C_lihdr(0,0,45),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,114,101,112,108,97,99,101,32,105,114,120,32,115,116,114,32,46,32,111,41,0,0,0};
static C_char C_TLS li348[] C_aligned={C_lihdr(0,0,16),40,97,50,56,49,53,48,32,105,32,109,32,97,99,99,41};
static C_char C_TLS li349[] C_aligned={C_lihdr(0,0,14),40,97,50,56,50,50,50,32,105,32,97,99,99,41,0,0};
static C_char C_TLS li350[] C_aligned={C_lihdr(0,0,49),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,114,101,112,108,97,99,101,47,97,108,108,32,105,114,120,32,115,116,114,32,46,32,111,41,0,0,0,0,0,0,0};
static C_char C_TLS li351[] C_aligned={C_lihdr(0,0,9),40,103,53,54,49,52,32,120,41,0,0,0,0,0,0,0};
static C_char C_TLS li352[] C_aligned={C_lihdr(0,0,11),40,108,112,32,108,115,32,114,101,115,41,0,0,0,0,0};
static C_char C_TLS li353[] C_aligned={C_lihdr(0,0,42),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,97,112,112,108,121,45,109,97,116,99,104,32,109,32,108,115,41,0,0,0,0,0,0};
static C_char C_TLS li354[] C_aligned={C_lihdr(0,0,14),40,97,50,56,52,57,53,32,105,32,109,32,97,41,0,0};
static C_char C_TLS li355[] C_aligned={C_lihdr(0,0,12),40,97,50,56,53,48,53,32,105,32,97,41,0,0,0,0};
static C_char C_TLS li356[] C_aligned={C_lihdr(0,0,45),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,101,120,116,114,97,99,116,32,105,114,120,32,115,116,114,32,46,32,111,41,0,0,0};
static C_char C_TLS li357[] C_aligned={C_lihdr(0,0,14),40,97,50,56,53,51,54,32,105,32,109,32,97,41,0,0};
static C_char C_TLS li358[] C_aligned={C_lihdr(0,0,21),40,108,112,32,108,115,32,114,101,115,32,119,97,115,45,99,104,97,114,63,41,0,0,0};
static C_char C_TLS li359[] C_aligned={C_lihdr(0,0,12),40,97,50,56,54,49,49,32,105,32,97,41,0,0,0,0};
static C_char C_TLS li360[] C_aligned={C_lihdr(0,0,43),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,115,112,108,105,116,32,105,114,120,32,115,116,114,32,46,32,111,41,0,0,0,0,0};
static C_char C_TLS li361[] C_aligned={C_lihdr(0,0,8),40,115,99,97,110,32,105,41};
static C_char C_TLS li362[] C_aligned={C_lihdr(0,0,44),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,116,114,105,110,103,45,115,99,97,110,45,99,104,97,114,32,115,116,114,32,99,32,46,32,111,41,0,0,0,0};
static C_char C_TLS li363[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,108,115,32,114,101,115,41,0,0,0};
static C_char C_TLS li364[] C_aligned={C_lihdr(0,0,35),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,113,117,111,116,101,32,115,116,114,41,0,0,0,0,0};
static C_char C_TLS li365[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,53,57,49,51,32,103,53,57,50,53,41,0,0,0,0};
static C_char C_TLS li366[] C_aligned={C_lihdr(0,0,10),40,97,50,56,57,52,51,32,120,41,0,0,0,0,0,0};
static C_char C_TLS li367[] C_aligned={C_lihdr(0,0,11),40,108,112,50,32,105,32,114,101,115,41,0,0,0,0,0};
static C_char C_TLS li368[] C_aligned={C_lihdr(0,0,15),40,108,112,49,32,108,115,32,101,109,112,116,121,63,41,0};
static C_char C_TLS li369[] C_aligned={C_lihdr(0,0,32),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,105,114,114,101,103,101,120,45,111,112,116,32,108,115,41};
static C_char C_TLS li370[] C_aligned={C_lihdr(0,0,7),40,108,112,32,108,115,41,0};
static C_char C_TLS li371[] C_aligned={C_lihdr(0,0,33),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,99,115,101,116,45,62,115,116,114,105,110,103,32,108,115,41,0,0,0,0,0,0,0};
static C_char C_TLS li372[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,54,48,49,51,32,103,54,48,50,48,41,0,0,0,0,0,0,0};
static C_char C_TLS li373[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,54,48,51,50,32,103,54,48,51,57,41,0,0,0,0,0,0,0};
static C_char C_TLS li374[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,54,48,52,57,32,103,54,48,53,54,41,0,0,0,0,0,0,0};
static C_char C_TLS li375[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,54,48,54,56,32,103,54,48,55,53,41,0,0,0,0,0,0,0};
static C_char C_TLS li376[] C_aligned={C_lihdr(0,0,9),40,103,54,48,57,48,32,120,41,0,0,0,0,0,0,0};
static C_char C_TLS li377[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,54,48,56,57,32,103,54,48,57,54,41,0,0,0,0,0,0,0};
static C_char C_TLS li378[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,54,49,50,55,32,103,54,49,51,52,41,0,0,0,0,0,0,0};
static C_char C_TLS li379[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,54,49,56,50,32,103,54,49,56,57,41,0,0,0,0,0,0,0};
static C_char C_TLS li380[] C_aligned={C_lihdr(0,0,6),40,108,112,32,120,41,0,0};
static C_char C_TLS li381[] C_aligned={C_lihdr(0,0,33),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,115,114,101,45,62,115,116,114,105,110,103,32,111,98,106,41,0,0,0,0,0,0,0};
static C_char C_TLS li382[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,50,32,114,101,115,116,32,115,41,0,0};
static C_char C_TLS li383[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,99,115,32,100,105,114,41,0,0,0};
static C_char C_TLS li384[] C_aligned={C_lihdr(0,0,29),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,103,108,111,98,45,62,115,114,101,32,115,41,0,0,0};
static C_char C_TLS li385[] C_aligned={C_lihdr(0,0,10),40,97,51,48,56,52,50,32,120,41,0,0,0,0,0,0};
static C_char C_TLS li386[] C_aligned={C_lihdr(0,0,22),40,97,51,48,56,52,53,32,115,114,99,49,32,105,32,115,114,99,50,32,106,41,0,0};
static C_char C_TLS li387[] C_aligned={C_lihdr(0,0,14),40,97,51,48,56,55,57,32,109,32,111,117,116,41,0,0};
static C_char C_TLS li388[] 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(f33512)
static void C_ccall f33512(C_word c,C_word *av) C_noret;
C_noret_decl(f33516)
static void C_ccall f33516(C_word c,C_word *av) C_noret;
C_noret_decl(f_10001)
static void C_ccall f_10001(C_word c,C_word *av) C_noret;
C_noret_decl(f_10020)
static void C_ccall f_10020(C_word c,C_word *av) C_noret;
C_noret_decl(f_10053)
static void C_ccall f_10053(C_word c,C_word *av) C_noret;
C_noret_decl(f_10071)
static void C_ccall f_10071(C_word c,C_word *av) C_noret;
C_noret_decl(f_10091)
static void C_ccall f_10091(C_word c,C_word *av) C_noret;
C_noret_decl(f_10171)
static void C_fcall f_10171(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_10181)
static void C_fcall f_10181(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10184)
static void C_ccall f_10184(C_word c,C_word *av) C_noret;
C_noret_decl(f_10191)
static void C_ccall f_10191(C_word c,C_word *av) C_noret;
C_noret_decl(f_10194)
static void C_ccall f_10194(C_word c,C_word *av) C_noret;
C_noret_decl(f_10242)
static void C_ccall f_10242(C_word c,C_word *av) C_noret;
C_noret_decl(f_10263)
static void C_fcall f_10263(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10269)
static void C_fcall f_10269(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_10287)
static void C_fcall f_10287(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10298)
static void C_fcall f_10298(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10386)
static void C_ccall f_10386(C_word c,C_word *av) C_noret;
C_noret_decl(f_10398)
static void C_ccall f_10398(C_word c,C_word *av) C_noret;
C_noret_decl(f_10402)
static void C_ccall f_10402(C_word c,C_word *av) C_noret;
C_noret_decl(f_10408)
static void C_ccall f_10408(C_word c,C_word *av) C_noret;
C_noret_decl(f_10413)
static void C_fcall f_10413(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_10416)
static C_word C_fcall f_10416(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_10438)
static void C_fcall f_10438(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_10455)
static void C_ccall f_10455(C_word c,C_word *av) C_noret;
C_noret_decl(f_10458)
static void C_ccall f_10458(C_word c,C_word *av) C_noret;
C_noret_decl(f_10460)
static void C_fcall f_10460(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_10494)
static void C_fcall f_10494(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10508)
static void C_ccall f_10508(C_word c,C_word *av) C_noret;
C_noret_decl(f_10512)
static void C_ccall f_10512(C_word c,C_word *av) C_noret;
C_noret_decl(f_10514)
static void C_fcall f_10514(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10521)
static void C_ccall f_10521(C_word c,C_word *av) C_noret;
C_noret_decl(f_10530)
static void C_fcall f_10530(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10550)
static void C_ccall f_10550(C_word c,C_word *av) C_noret;
C_noret_decl(f_10554)
static void C_ccall f_10554(C_word c,C_word *av) C_noret;
C_noret_decl(f_10558)
static void C_ccall f_10558(C_word c,C_word *av) C_noret;
C_noret_decl(f_10586)
static void C_fcall f_10586(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10590)
static void C_ccall f_10590(C_word c,C_word *av) C_noret;
C_noret_decl(f_10593)
static void C_fcall f_10593(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10596)
static void C_fcall f_10596(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10599)
static void C_ccall f_10599(C_word c,C_word *av) C_noret;
C_noret_decl(f_10604)
static void C_fcall f_10604(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_10607)
static C_word C_fcall f_10607(C_word *a,C_word t0);
C_noret_decl(f_10677)
static void C_ccall f_10677(C_word c,C_word *av) C_noret;
C_noret_decl(f_10693)
static void C_ccall f_10693(C_word c,C_word *av) C_noret;
C_noret_decl(f_10769)
static void C_ccall f_10769(C_word c,C_word *av) C_noret;
C_noret_decl(f_10780)
static void C_ccall f_10780(C_word c,C_word *av) C_noret;
C_noret_decl(f_10794)
static void C_ccall f_10794(C_word c,C_word *av) C_noret;
C_noret_decl(f_10816)
static void C_ccall f_10816(C_word c,C_word *av) C_noret;
C_noret_decl(f_10819)
static void C_fcall f_10819(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10831)
static void C_ccall f_10831(C_word c,C_word *av) C_noret;
C_noret_decl(f_10891)
static void C_ccall f_10891(C_word c,C_word *av) C_noret;
C_noret_decl(f_10920)
static void C_fcall f_10920(C_word t0,C_word t1) C_noret;
C_noret_decl(f_11051)
static void C_ccall f_11051(C_word c,C_word *av) C_noret;
C_noret_decl(f_11057)
static void C_ccall f_11057(C_word c,C_word *av) C_noret;
C_noret_decl(f_11072)
static void C_ccall f_11072(C_word c,C_word *av) C_noret;
C_noret_decl(f_11143)
static void C_ccall f_11143(C_word c,C_word *av) C_noret;
C_noret_decl(f_11173)
static void C_ccall f_11173(C_word c,C_word *av) C_noret;
C_noret_decl(f_11183)
static void C_fcall f_11183(C_word t0,C_word t1) C_noret;
C_noret_decl(f_11205)
static void C_ccall f_11205(C_word c,C_word *av) C_noret;
C_noret_decl(f_11240)
static void C_ccall f_11240(C_word c,C_word *av) C_noret;
C_noret_decl(f_11255)
static void C_ccall f_11255(C_word c,C_word *av) C_noret;
C_noret_decl(f_11281)
static void C_ccall f_11281(C_word c,C_word *av) C_noret;
C_noret_decl(f_11304)
static void C_ccall f_11304(C_word c,C_word *av) C_noret;
C_noret_decl(f_11327)
static void C_ccall f_11327(C_word c,C_word *av) C_noret;
C_noret_decl(f_11369)
static void C_ccall f_11369(C_word c,C_word *av) C_noret;
C_noret_decl(f_11392)
static void C_ccall f_11392(C_word c,C_word *av) C_noret;
C_noret_decl(f_11395)
static void C_ccall f_11395(C_word c,C_word *av) C_noret;
C_noret_decl(f_11421)
static void C_ccall f_11421(C_word c,C_word *av) C_noret;
C_noret_decl(f_11425)
static void C_ccall f_11425(C_word c,C_word *av) C_noret;
C_noret_decl(f_11429)
static void C_ccall f_11429(C_word c,C_word *av) C_noret;
C_noret_decl(f_11481)
static void C_ccall f_11481(C_word c,C_word *av) C_noret;
C_noret_decl(f_11506)
static void C_ccall f_11506(C_word c,C_word *av) C_noret;
C_noret_decl(f_11509)
static void C_ccall f_11509(C_word c,C_word *av) C_noret;
C_noret_decl(f_11539)
static void C_ccall f_11539(C_word c,C_word *av) C_noret;
C_noret_decl(f_11543)
static void C_ccall f_11543(C_word c,C_word *av) C_noret;
C_noret_decl(f_11558)
static void C_ccall f_11558(C_word c,C_word *av) C_noret;
C_noret_decl(f_11561)
static void C_ccall f_11561(C_word c,C_word *av) C_noret;
C_noret_decl(f_11582)
static void C_ccall f_11582(C_word c,C_word *av) C_noret;
C_noret_decl(f_11586)
static void C_ccall f_11586(C_word c,C_word *av) C_noret;
C_noret_decl(f_11609)
static void C_ccall f_11609(C_word c,C_word *av) C_noret;
C_noret_decl(f_11640)
static void C_fcall f_11640(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_11643)
static C_word C_fcall f_11643(C_word t0,C_word t1);
C_noret_decl(f_11652)
static C_word C_fcall f_11652(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_11796)
static void C_ccall f_11796(C_word c,C_word *av) C_noret;
C_noret_decl(f_11827)
static void C_ccall f_11827(C_word c,C_word *av) C_noret;
C_noret_decl(f_11918)
static void C_ccall f_11918(C_word c,C_word *av) C_noret;
C_noret_decl(f_11933)
static void C_ccall f_11933(C_word c,C_word *av) C_noret;
C_noret_decl(f_11953)
static void C_ccall f_11953(C_word c,C_word *av) C_noret;
C_noret_decl(f_11957)
static void C_ccall f_11957(C_word c,C_word *av) C_noret;
C_noret_decl(f_11976)
static void C_fcall f_11976(C_word t0,C_word t1) C_noret;
C_noret_decl(f_11985)
static void C_ccall f_11985(C_word c,C_word *av) C_noret;
C_noret_decl(f_12001)
static void C_ccall f_12001(C_word c,C_word *av) C_noret;
C_noret_decl(f_12004)
static void C_ccall f_12004(C_word c,C_word *av) C_noret;
C_noret_decl(f_12007)
static void C_ccall f_12007(C_word c,C_word *av) C_noret;
C_noret_decl(f_12010)
static void C_ccall f_12010(C_word c,C_word *av) C_noret;
C_noret_decl(f_12019)
static void C_fcall f_12019(C_word t0,C_word t1) C_noret;
C_noret_decl(f_12129)
static void C_ccall f_12129(C_word c,C_word *av) C_noret;
C_noret_decl(f_12205)
static void C_ccall f_12205(C_word c,C_word *av) C_noret;
C_noret_decl(f_12232)
static void C_ccall f_12232(C_word c,C_word *av) C_noret;
C_noret_decl(f_12255)
static void C_ccall f_12255(C_word c,C_word *av) C_noret;
C_noret_decl(f_12282)
static void C_ccall f_12282(C_word c,C_word *av) C_noret;
C_noret_decl(f_12309)
static void C_ccall f_12309(C_word c,C_word *av) C_noret;
C_noret_decl(f_12340)
static void C_ccall f_12340(C_word c,C_word *av) C_noret;
C_noret_decl(f_12375)
static void C_ccall f_12375(C_word c,C_word *av) C_noret;
C_noret_decl(f_12398)
static void C_ccall f_12398(C_word c,C_word *av) C_noret;
C_noret_decl(f_12421)
static void C_ccall f_12421(C_word c,C_word *av) C_noret;
C_noret_decl(f_12452)
static void C_ccall f_12452(C_word c,C_word *av) C_noret;
C_noret_decl(f_12475)
static void C_ccall f_12475(C_word c,C_word *av) C_noret;
C_noret_decl(f_12498)
static void C_ccall f_12498(C_word c,C_word *av) C_noret;
C_noret_decl(f_12521)
static void C_ccall f_12521(C_word c,C_word *av) C_noret;
C_noret_decl(f_12544)
static void C_ccall f_12544(C_word c,C_word *av) C_noret;
C_noret_decl(f_12567)
static void C_ccall f_12567(C_word c,C_word *av) C_noret;
C_noret_decl(f_12578)
static void C_ccall f_12578(C_word c,C_word *av) C_noret;
C_noret_decl(f_12598)
static void C_ccall f_12598(C_word c,C_word *av) C_noret;
C_noret_decl(f_12602)
static void C_ccall f_12602(C_word c,C_word *av) C_noret;
C_noret_decl(f_12626)
static void C_fcall f_12626(C_word t0,C_word t1) C_noret;
C_noret_decl(f_12629)
static void C_ccall f_12629(C_word c,C_word *av) C_noret;
C_noret_decl(f_12632)
static void C_ccall f_12632(C_word c,C_word *av) C_noret;
C_noret_decl(f_12667)
static void C_ccall f_12667(C_word c,C_word *av) C_noret;
C_noret_decl(f_12671)
static void C_ccall f_12671(C_word c,C_word *av) C_noret;
C_noret_decl(f_12698)
static void C_ccall f_12698(C_word c,C_word *av) C_noret;
C_noret_decl(f_12706)
static void C_fcall f_12706(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_12766)
static void C_ccall f_12766(C_word c,C_word *av) C_noret;
C_noret_decl(f_12809)
static void C_ccall f_12809(C_word c,C_word *av) C_noret;
C_noret_decl(f_12821)
static void C_ccall f_12821(C_word c,C_word *av) C_noret;
C_noret_decl(f_12830)
static void C_ccall f_12830(C_word c,C_word *av) C_noret;
C_noret_decl(f_12850)
static void C_ccall f_12850(C_word c,C_word *av) C_noret;
C_noret_decl(f_12854)
static void C_ccall f_12854(C_word c,C_word *av) C_noret;
C_noret_decl(f_12858)
static void C_ccall f_12858(C_word c,C_word *av) C_noret;
C_noret_decl(f_12910)
static void C_ccall f_12910(C_word c,C_word *av) C_noret;
C_noret_decl(f_12926)
static void C_ccall f_12926(C_word c,C_word *av) C_noret;
C_noret_decl(f_12990)
static void C_ccall f_12990(C_word c,C_word *av) C_noret;
C_noret_decl(f_13016)
static void C_ccall f_13016(C_word c,C_word *av) C_noret;
C_noret_decl(f_13045)
static void C_ccall f_13045(C_word c,C_word *av) C_noret;
C_noret_decl(f_13073)
static void C_ccall f_13073(C_word c,C_word *av) C_noret;
C_noret_decl(f_13094)
static void C_ccall f_13094(C_word c,C_word *av) C_noret;
C_noret_decl(f_13112)
static void C_ccall f_13112(C_word c,C_word *av) C_noret;
C_noret_decl(f_13226)
static void C_fcall f_13226(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_13245)
static void C_ccall f_13245(C_word c,C_word *av) C_noret;
C_noret_decl(f_13257)
static void C_ccall f_13257(C_word c,C_word *av) C_noret;
C_noret_decl(f_13260)
static void C_ccall f_13260(C_word c,C_word *av) C_noret;
C_noret_decl(f_13291)
static void C_ccall f_13291(C_word c,C_word *av) C_noret;
C_noret_decl(f_13294)
static void C_ccall f_13294(C_word c,C_word *av) C_noret;
C_noret_decl(f_13335)
static void C_fcall f_13335(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_13370)
static void C_ccall f_13370(C_word c,C_word *av) C_noret;
C_noret_decl(f_13380)
static void C_ccall f_13380(C_word c,C_word *av) C_noret;
C_noret_decl(f_13387)
static void C_ccall f_13387(C_word c,C_word *av) C_noret;
C_noret_decl(f_13408)
static void C_fcall f_13408(C_word t0,C_word t1) C_noret;
C_noret_decl(f_13418)
static void C_ccall f_13418(C_word c,C_word *av) C_noret;
C_noret_decl(f_13435)
static void C_ccall f_13435(C_word c,C_word *av) C_noret;
C_noret_decl(f_13452)
static void C_ccall f_13452(C_word c,C_word *av) C_noret;
C_noret_decl(f_13463)
static void C_ccall f_13463(C_word c,C_word *av) C_noret;
C_noret_decl(f_13464)
static C_word C_fcall f_13464(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_13485)
static void C_fcall f_13485(C_word t0,C_word t1) C_noret;
C_noret_decl(f_13497)
static void C_fcall f_13497(C_word t0,C_word t1) C_noret;
C_noret_decl(f_13507)
static void C_ccall f_13507(C_word c,C_word *av) C_noret;
C_noret_decl(f_13610)
static void C_ccall f_13610(C_word c,C_word *av) C_noret;
C_noret_decl(f_13619)
static void C_fcall f_13619(C_word t0,C_word t1) C_noret;
C_noret_decl(f_13625)
static void C_ccall f_13625(C_word c,C_word *av) C_noret;
C_noret_decl(f_13628)
static void C_ccall f_13628(C_word c,C_word *av) C_noret;
C_noret_decl(f_13638)
static void C_ccall f_13638(C_word c,C_word *av) C_noret;
C_noret_decl(f_13645)
static void C_ccall f_13645(C_word c,C_word *av) C_noret;
C_noret_decl(f_13649)
static void C_ccall f_13649(C_word c,C_word *av) C_noret;
C_noret_decl(f_13693)
static void C_ccall f_13693(C_word c,C_word *av) C_noret;
C_noret_decl(f_13732)
static void C_fcall f_13732(C_word t0,C_word t1) C_noret;
C_noret_decl(f_13742)
static void C_ccall f_13742(C_word c,C_word *av) C_noret;
C_noret_decl(f_13746)
static void C_ccall f_13746(C_word c,C_word *av) C_noret;
C_noret_decl(f_13750)
static void C_ccall f_13750(C_word c,C_word *av) C_noret;
C_noret_decl(f_13765)
static void C_ccall f_13765(C_word c,C_word *av) C_noret;
C_noret_decl(f_13773)
static void C_ccall f_13773(C_word c,C_word *av) C_noret;
C_noret_decl(f_13777)
static void C_ccall f_13777(C_word c,C_word *av) C_noret;
C_noret_decl(f_13796)
static void C_ccall f_13796(C_word c,C_word *av) C_noret;
C_noret_decl(f_13849)
static void C_fcall f_13849(C_word t0,C_word t1) C_noret;
C_noret_decl(f_13863)
static void C_ccall f_13863(C_word c,C_word *av) C_noret;
C_noret_decl(f_13867)
static void C_ccall f_13867(C_word c,C_word *av) C_noret;
C_noret_decl(f_13871)
static void C_ccall f_13871(C_word c,C_word *av) C_noret;
C_noret_decl(f_13881)
static void C_ccall f_13881(C_word c,C_word *av) C_noret;
C_noret_decl(f_13939)
static void C_ccall f_13939(C_word c,C_word *av) C_noret;
C_noret_decl(f_13960)
static void C_fcall f_13960(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_13963)
static C_word C_fcall f_13963(C_word t0,C_word t1);
C_noret_decl(f_14155)
static void C_fcall f_14155(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_14193)
static void C_fcall f_14193(C_word t0,C_word t1) C_noret;
C_noret_decl(f_14269)
static void C_fcall f_14269(C_word t0,C_word t1) C_noret;
C_noret_decl(f_14410)
static void C_ccall f_14410(C_word c,C_word *av) C_noret;
C_noret_decl(f_14413)
static void C_ccall f_14413(C_word c,C_word *av) C_noret;
C_noret_decl(f_14434)
static void C_ccall f_14434(C_word c,C_word *av) C_noret;
C_noret_decl(f_14439)
static void C_fcall f_14439(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_14471)
static void C_ccall f_14471(C_word c,C_word *av) C_noret;
C_noret_decl(f_14496)
static void C_ccall f_14496(C_word c,C_word *av) C_noret;
C_noret_decl(f_14500)
static void C_ccall f_14500(C_word c,C_word *av) C_noret;
C_noret_decl(f_14511)
static void C_ccall f_14511(C_word c,C_word *av) C_noret;
C_noret_decl(f_14519)
static void C_ccall f_14519(C_word c,C_word *av) C_noret;
C_noret_decl(f_14545)
static void C_fcall f_14545(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_14575)
static void C_ccall f_14575(C_word c,C_word *av) C_noret;
C_noret_decl(f_14585)
static void C_ccall f_14585(C_word c,C_word *av) C_noret;
C_noret_decl(f_14593)
static void C_ccall f_14593(C_word c,C_word *av) C_noret;
C_noret_decl(f_14609)
static void C_ccall f_14609(C_word c,C_word *av) C_noret;
C_noret_decl(f_14611)
static void C_fcall f_14611(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_14647)
static void C_fcall f_14647(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_14683)
static void C_fcall f_14683(C_word t0,C_word t1) C_noret;
C_noret_decl(f_14703)
static void C_ccall f_14703(C_word c,C_word *av) C_noret;
C_noret_decl(f_14705)
static void C_ccall f_14705(C_word c,C_word *av) C_noret;
C_noret_decl(f_14737)
static void C_ccall f_14737(C_word c,C_word *av) C_noret;
C_noret_decl(f_14744)
static void C_ccall f_14744(C_word c,C_word *av) C_noret;
C_noret_decl(f_14750)
static void C_ccall f_14750(C_word c,C_word *av) C_noret;
C_noret_decl(f_14766)
static void C_ccall f_14766(C_word c,C_word *av) C_noret;
C_noret_decl(f_14768)
static void C_fcall f_14768(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_14808)
static void C_ccall f_14808(C_word c,C_word *av) C_noret;
C_noret_decl(f_14814)
static void C_ccall f_14814(C_word c,C_word *av) C_noret;
C_noret_decl(f_14822)
static void C_fcall f_14822(C_word t0,C_word t1) C_noret;
C_noret_decl(f_14842)
static void C_ccall f_14842(C_word c,C_word *av) C_noret;
C_noret_decl(f_14844)
static void C_ccall f_14844(C_word c,C_word *av) C_noret;
C_noret_decl(f_14876)
static void C_ccall f_14876(C_word c,C_word *av) C_noret;
C_noret_decl(f_14883)
static void C_ccall f_14883(C_word c,C_word *av) C_noret;
C_noret_decl(f_14889)
static void C_ccall f_14889(C_word c,C_word *av) C_noret;
C_noret_decl(f_14905)
static void C_ccall f_14905(C_word c,C_word *av) C_noret;
C_noret_decl(f_14907)
static void C_fcall f_14907(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_14947)
static void C_ccall f_14947(C_word c,C_word *av) C_noret;
C_noret_decl(f_14953)
static void C_ccall f_14953(C_word c,C_word *av) C_noret;
C_noret_decl(f_14972)
static void C_ccall f_14972(C_word c,C_word *av) C_noret;
C_noret_decl(f_14981)
static void C_fcall f_14981(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_14993)
static void C_fcall f_14993(C_word t0,C_word t1) C_noret;
C_noret_decl(f_15005)
static void C_ccall f_15005(C_word c,C_word *av) C_noret;
C_noret_decl(f_15011)
static void C_ccall f_15011(C_word c,C_word *av) C_noret;
C_noret_decl(f_15013)
static void C_fcall f_15013(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15061)
static void C_ccall f_15061(C_word c,C_word *av) C_noret;
C_noret_decl(f_15069)
static void C_ccall f_15069(C_word c,C_word *av) C_noret;
C_noret_decl(f_15076)
static void C_ccall f_15076(C_word c,C_word *av) C_noret;
C_noret_decl(f_15082)
static void C_ccall f_15082(C_word c,C_word *av) C_noret;
C_noret_decl(f_15114)
static void C_ccall f_15114(C_word c,C_word *av) C_noret;
C_noret_decl(f_15116)
static void C_fcall f_15116(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15166)
static void C_ccall f_15166(C_word c,C_word *av) C_noret;
C_noret_decl(f_15184)
static void C_fcall f_15184(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15209)
static void C_ccall f_15209(C_word c,C_word *av) C_noret;
C_noret_decl(f_15252)
static void C_ccall f_15252(C_word c,C_word *av) C_noret;
C_noret_decl(f_15254)
static void C_fcall f_15254(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15343)
static void C_ccall f_15343(C_word c,C_word *av) C_noret;
C_noret_decl(f_15345)
static void C_fcall f_15345(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15400)
static void C_fcall f_15400(C_word t0,C_word t1) C_noret;
C_noret_decl(f_15408)
static void C_ccall f_15408(C_word c,C_word *av) C_noret;
C_noret_decl(f_15410)
static void C_fcall f_15410(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_15424)
static void C_ccall f_15424(C_word c,C_word *av) C_noret;
C_noret_decl(f_15428)
static void C_ccall f_15428(C_word c,C_word *av) C_noret;
C_noret_decl(f_15446)
static void C_ccall f_15446(C_word c,C_word *av) C_noret;
C_noret_decl(f_15455)
static void C_fcall f_15455(C_word t0,C_word t1) C_noret;
C_noret_decl(f_15470)
static void C_ccall f_15470(C_word c,C_word *av) C_noret;
C_noret_decl(f_15522)
static void C_fcall f_15522(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_15525)
static void C_fcall f_15525(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15582)
static void C_fcall f_15582(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15593)
static void C_ccall f_15593(C_word c,C_word *av) C_noret;
C_noret_decl(f_15595)
static void C_fcall f_15595(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15620)
static void C_ccall f_15620(C_word c,C_word *av) C_noret;
C_noret_decl(f_15643)
static void C_fcall f_15643(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15654)
static void C_ccall f_15654(C_word c,C_word *av) C_noret;
C_noret_decl(f_15656)
static void C_fcall f_15656(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15681)
static void C_ccall f_15681(C_word c,C_word *av) C_noret;
C_noret_decl(f_15697)
static void C_fcall f_15697(C_word t0,C_word t1) C_noret;
C_noret_decl(f_15706)
static void C_ccall f_15706(C_word c,C_word *av) C_noret;
C_noret_decl(f_15712)
static void C_ccall f_15712(C_word c,C_word *av) C_noret;
C_noret_decl(f_15722)
static void C_ccall f_15722(C_word c,C_word *av) C_noret;
C_noret_decl(f_15729)
static void C_ccall f_15729(C_word c,C_word *av) C_noret;
C_noret_decl(f_15764)
static void C_ccall f_15764(C_word c,C_word *av) C_noret;
C_noret_decl(f_15766)
static void C_fcall f_15766(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15791)
static void C_ccall f_15791(C_word c,C_word *av) C_noret;
C_noret_decl(f_15820)
static void C_ccall f_15820(C_word c,C_word *av) C_noret;
C_noret_decl(f_15822)
static void C_fcall f_15822(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15847)
static void C_ccall f_15847(C_word c,C_word *av) C_noret;
C_noret_decl(f_15905)
static void C_fcall f_15905(C_word t0,C_word t1) C_noret;
C_noret_decl(f_15915)
static void C_ccall f_15915(C_word c,C_word *av) C_noret;
C_noret_decl(f_15918)
static void C_ccall f_15918(C_word c,C_word *av) C_noret;
C_noret_decl(f_15920)
static void C_fcall f_15920(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15967)
static void C_ccall f_15967(C_word c,C_word *av) C_noret;
C_noret_decl(f_15974)
static void C_ccall f_15974(C_word c,C_word *av) C_noret;
C_noret_decl(f_16028)
static void C_ccall f_16028(C_word c,C_word *av) C_noret;
C_noret_decl(f_16095)
static void C_ccall f_16095(C_word c,C_word *av) C_noret;
C_noret_decl(f_16103)
static void C_ccall f_16103(C_word c,C_word *av) C_noret;
C_noret_decl(f_16105)
static void C_ccall f_16105(C_word c,C_word *av) C_noret;
C_noret_decl(f_16109)
static void C_ccall f_16109(C_word c,C_word *av) C_noret;
C_noret_decl(f_16112)
static void C_ccall f_16112(C_word c,C_word *av) C_noret;
C_noret_decl(f_16115)
static void C_ccall f_16115(C_word c,C_word *av) C_noret;
C_noret_decl(f_16118)
static void C_ccall f_16118(C_word c,C_word *av) C_noret;
C_noret_decl(f_16124)
static void C_ccall f_16124(C_word c,C_word *av) C_noret;
C_noret_decl(f_16127)
static void C_ccall f_16127(C_word c,C_word *av) C_noret;
C_noret_decl(f_16130)
static void C_ccall f_16130(C_word c,C_word *av) C_noret;
C_noret_decl(f_16133)
static void C_ccall f_16133(C_word c,C_word *av) C_noret;
C_noret_decl(f_16136)
static void C_ccall f_16136(C_word c,C_word *av) C_noret;
C_noret_decl(f_16151)
static void C_ccall f_16151(C_word c,C_word *av) C_noret;
C_noret_decl(f_16165)
static void C_ccall f_16165(C_word c,C_word *av) C_noret;
C_noret_decl(f_16170)
static void C_fcall f_16170(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_16196)
static void C_ccall f_16196(C_word c,C_word *av) C_noret;
C_noret_decl(f_16200)
static void C_fcall f_16200(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_16238)
static void C_ccall f_16238(C_word c,C_word *av) C_noret;
C_noret_decl(f_16255)
static void C_fcall f_16255(C_word t0,C_word t1) C_noret;
C_noret_decl(f_16298)
static void C_fcall f_16298(C_word t0,C_word t1) C_noret;
C_noret_decl(f_16405)
static void C_ccall f_16405(C_word c,C_word *av) C_noret;
C_noret_decl(f_16428)
static void C_fcall f_16428(C_word t0,C_word t1) C_noret;
C_noret_decl(f_16506)
static C_word C_fcall f_16506(C_word t0);
C_noret_decl(f_16551)
static void C_ccall f_16551(C_word c,C_word *av) C_noret;
C_noret_decl(f_16568)
static void C_fcall f_16568(C_word t0,C_word t1) C_noret;
C_noret_decl(f_16640)
static void C_ccall f_16640(C_word c,C_word *av) C_noret;
C_noret_decl(f_16644)
static void C_ccall f_16644(C_word c,C_word *av) C_noret;
C_noret_decl(f_16681)
static void C_fcall f_16681(C_word t0,C_word t1) C_noret;
C_noret_decl(f_16757)
static void C_ccall f_16757(C_word c,C_word *av) C_noret;
C_noret_decl(f_16761)
static void C_ccall f_16761(C_word c,C_word *av) C_noret;
C_noret_decl(f_16798)
static void C_fcall f_16798(C_word t0,C_word t1) C_noret;
C_noret_decl(f_16811)
static void C_ccall f_16811(C_word c,C_word *av) C_noret;
C_noret_decl(f_16874)
static void C_ccall f_16874(C_word c,C_word *av) C_noret;
C_noret_decl(f_16900)
static void C_ccall f_16900(C_word c,C_word *av) C_noret;
C_noret_decl(f_16913)
static void C_fcall f_16913(C_word t0,C_word t1) C_noret;
C_noret_decl(f_16919)
static void C_ccall f_16919(C_word c,C_word *av) C_noret;
C_noret_decl(f_16940)
static void C_ccall f_16940(C_word c,C_word *av) C_noret;
C_noret_decl(f_16946)
static void C_fcall f_16946(C_word t0,C_word t1) C_noret;
C_noret_decl(f_16976)
static void C_ccall f_16976(C_word c,C_word *av) C_noret;
C_noret_decl(f_17013)
static void C_ccall f_17013(C_word c,C_word *av) C_noret;
C_noret_decl(f_17016)
static void C_ccall f_17016(C_word c,C_word *av) C_noret;
C_noret_decl(f_17023)
static void C_ccall f_17023(C_word c,C_word *av) C_noret;
C_noret_decl(f_17025)
static void C_fcall f_17025(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_17028)
static void C_fcall f_17028(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_17068)
static void C_fcall f_17068(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17084)
static void C_ccall f_17084(C_word c,C_word *av) C_noret;
C_noret_decl(f_17097)
static void C_fcall f_17097(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17104)
static void C_fcall f_17104(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
C_noret_decl(f_17137)
static void C_ccall f_17137(C_word c,C_word *av) C_noret;
C_noret_decl(f_17167)
static void C_ccall f_17167(C_word c,C_word *av) C_noret;
C_noret_decl(f_17182)
static void C_fcall f_17182(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
C_noret_decl(f_17219)
static void C_ccall f_17219(C_word c,C_word *av) C_noret;
C_noret_decl(f_17235)
static void C_ccall f_17235(C_word c,C_word *av) C_noret;
C_noret_decl(f_17239)
static void C_ccall f_17239(C_word c,C_word *av) C_noret;
C_noret_decl(f_17252)
static void C_ccall f_17252(C_word c,C_word *av) C_noret;
C_noret_decl(f_17275)
static void C_ccall f_17275(C_word c,C_word *av) C_noret;
C_noret_decl(f_17278)
static void C_ccall f_17278(C_word c,C_word *av) C_noret;
C_noret_decl(f_17285)
static void C_fcall f_17285(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17287)
static void C_ccall f_17287(C_word c,C_word *av) C_noret;
C_noret_decl(f_17301)
static void C_ccall f_17301(C_word c,C_word *av) C_noret;
C_noret_decl(f_17315)
static void C_ccall f_17315(C_word c,C_word *av) C_noret;
C_noret_decl(f_17340)
static void C_ccall f_17340(C_word c,C_word *av) C_noret;
C_noret_decl(f_17344)
static void C_ccall f_17344(C_word c,C_word *av) C_noret;
C_noret_decl(f_17421)
static void C_fcall f_17421(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17434)
static void C_ccall f_17434(C_word c,C_word *av) C_noret;
C_noret_decl(f_17470)
static void C_ccall f_17470(C_word c,C_word *av) C_noret;
C_noret_decl(f_17479)
static void C_fcall f_17479(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17579)
static void C_ccall f_17579(C_word c,C_word *av) C_noret;
C_noret_decl(f_17588)
static void C_ccall f_17588(C_word c,C_word *av) C_noret;
C_noret_decl(f_17606)
static void C_fcall f_17606(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17609)
static void C_fcall f_17609(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17627)
static void C_ccall f_17627(C_word c,C_word *av) C_noret;
C_noret_decl(f_17674)
static void C_ccall f_17674(C_word c,C_word *av) C_noret;
C_noret_decl(f_17748)
static void C_ccall f_17748(C_word c,C_word *av) C_noret;
C_noret_decl(f_17776)
static void C_ccall f_17776(C_word c,C_word *av) C_noret;
C_noret_decl(f_17801)
static void C_fcall f_17801(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17820)
static void C_fcall f_17820(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17841)
static void C_fcall f_17841(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17851)
static void C_fcall f_17851(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_17859)
static void C_ccall f_17859(C_word c,C_word *av) C_noret;
C_noret_decl(f_18090)
static void C_ccall f_18090(C_word c,C_word *av) C_noret;
C_noret_decl(f_18113)
static void C_ccall f_18113(C_word c,C_word *av) C_noret;
C_noret_decl(f_18122)
static C_word C_fcall f_18122(C_word *a,C_word t0);
C_noret_decl(f_18145)
static C_word C_fcall f_18145(C_word *a,C_word t0);
C_noret_decl(f_18168)
static void C_ccall f_18168(C_word c,C_word *av) C_noret;
C_noret_decl(f_18241)
static void C_fcall f_18241(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_18266)
static void C_ccall f_18266(C_word c,C_word *av) C_noret;
C_noret_decl(f_18301)
static void C_fcall f_18301(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_18324)
static void C_ccall f_18324(C_word c,C_word *av) C_noret;
C_noret_decl(f_18328)
static void C_ccall f_18328(C_word c,C_word *av) C_noret;
C_noret_decl(f_18349)
static void C_fcall f_18349(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_18451)
static void C_fcall f_18451(C_word t0,C_word t1) C_noret;
C_noret_decl(f_18635)
static void C_fcall f_18635(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_18657)
static void C_ccall f_18657(C_word c,C_word *av) C_noret;
C_noret_decl(f_18663)
static void C_ccall f_18663(C_word c,C_word *av) C_noret;
C_noret_decl(f_18667)
static void C_ccall f_18667(C_word c,C_word *av) C_noret;
C_noret_decl(f_18684)
static void C_fcall f_18684(C_word t0,C_word t1) C_noret;
C_noret_decl(f_18717)
static void C_ccall f_18717(C_word c,C_word *av) C_noret;
C_noret_decl(f_18754)
static void C_ccall f_18754(C_word c,C_word *av) C_noret;
C_noret_decl(f_18756)
static void C_fcall f_18756(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_18781)
static void C_ccall f_18781(C_word c,C_word *av) C_noret;
C_noret_decl(f_18849)
static void C_ccall f_18849(C_word c,C_word *av) C_noret;
C_noret_decl(f_18851)
static void C_ccall f_18851(C_word c,C_word *av) C_noret;
C_noret_decl(f_18855)
static void C_ccall f_18855(C_word c,C_word *av) C_noret;
C_noret_decl(f_18864)
static void C_fcall f_18864(C_word t0,C_word t1) C_noret;
C_noret_decl(f_18870)
static void C_ccall f_18870(C_word c,C_word *av) C_noret;
C_noret_decl(f_18873)
static void C_ccall f_18873(C_word c,C_word *av) C_noret;
C_noret_decl(f_18941)
static void C_ccall f_18941(C_word c,C_word *av) C_noret;
C_noret_decl(f_18945)
static void C_ccall f_18945(C_word c,C_word *av) C_noret;
C_noret_decl(f_18948)
static void C_ccall f_18948(C_word c,C_word *av) C_noret;
C_noret_decl(f_18951)
static void C_ccall f_18951(C_word c,C_word *av) C_noret;
C_noret_decl(f_18954)
static void C_ccall f_18954(C_word c,C_word *av) C_noret;
C_noret_decl(f_18984)
static void C_fcall f_18984(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_19003)
static void C_ccall f_19003(C_word c,C_word *av) C_noret;
C_noret_decl(f_19028)
static void C_ccall f_19028(C_word c,C_word *av) C_noret;
C_noret_decl(f_19045)
static void C_fcall f_19045(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_19049)
static void C_ccall f_19049(C_word c,C_word *av) C_noret;
C_noret_decl(f_19054)
static void C_fcall f_19054(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_19061)
static void C_ccall f_19061(C_word c,C_word *av) C_noret;
C_noret_decl(f_19084)
static void C_ccall f_19084(C_word c,C_word *av) C_noret;
C_noret_decl(f_19094)
static void C_ccall f_19094(C_word c,C_word *av) C_noret;
C_noret_decl(f_19115)
static void C_ccall f_19115(C_word c,C_word *av) C_noret;
C_noret_decl(f_19133)
static void C_ccall f_19133(C_word c,C_word *av) C_noret;
C_noret_decl(f_19139)
static void C_ccall f_19139(C_word c,C_word *av) C_noret;
C_noret_decl(f_19153)
static void C_ccall f_19153(C_word c,C_word *av) C_noret;
C_noret_decl(f_19159)
static void C_fcall f_19159(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
C_noret_decl(f_19166)
static void C_ccall f_19166(C_word c,C_word *av) C_noret;
C_noret_decl(f_19196)
static void C_ccall f_19196(C_word c,C_word *av) C_noret;
C_noret_decl(f_19209)
static void C_ccall f_19209(C_word c,C_word *av) C_noret;
C_noret_decl(f_19216)
static void C_ccall f_19216(C_word c,C_word *av) C_noret;
C_noret_decl(f_19223)
static void C_ccall f_19223(C_word c,C_word *av) C_noret;
C_noret_decl(f_19225)
static void C_ccall f_19225(C_word c,C_word *av) C_noret;
C_noret_decl(f_19233)
static void C_ccall f_19233(C_word c,C_word *av) C_noret;
C_noret_decl(f_19237)
static void C_ccall f_19237(C_word c,C_word *av) C_noret;
C_noret_decl(f_19246)
static void C_fcall f_19246(C_word t0,C_word t1) C_noret;
C_noret_decl(f_19252)
static void C_ccall f_19252(C_word c,C_word *av) C_noret;
C_noret_decl(f_19255)
static void C_ccall f_19255(C_word c,C_word *av) C_noret;
C_noret_decl(f_19323)
static void C_ccall f_19323(C_word c,C_word *av) C_noret;
C_noret_decl(f_19327)
static void C_ccall f_19327(C_word c,C_word *av) C_noret;
C_noret_decl(f_19330)
static void C_ccall f_19330(C_word c,C_word *av) C_noret;
C_noret_decl(f_19345)
static void C_ccall f_19345(C_word c,C_word *av) C_noret;
C_noret_decl(f_19368)
static void C_ccall f_19368(C_word c,C_word *av) C_noret;
C_noret_decl(f_19379)
static void C_ccall f_19379(C_word c,C_word *av) C_noret;
C_noret_decl(f_19415)
static void C_ccall f_19415(C_word c,C_word *av) C_noret;
C_noret_decl(f_19425)
static void C_ccall f_19425(C_word c,C_word *av) C_noret;
C_noret_decl(f_19431)
static void C_ccall f_19431(C_word c,C_word *av) C_noret;
C_noret_decl(f_19437)
static void C_ccall f_19437(C_word c,C_word *av) C_noret;
C_noret_decl(f_19447)
static void C_ccall f_19447(C_word c,C_word *av) C_noret;
C_noret_decl(f_19449)
static void C_fcall f_19449(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_19459)
static void C_fcall f_19459(C_word t0,C_word t1) C_noret;
C_noret_decl(f_19478)
static void C_ccall f_19478(C_word c,C_word *av) C_noret;
C_noret_decl(f_19491)
static void C_ccall f_19491(C_word c,C_word *av) C_noret;
C_noret_decl(f_19523)
static void C_ccall f_19523(C_word c,C_word *av) C_noret;
C_noret_decl(f_19546)
static void C_ccall f_19546(C_word c,C_word *av) C_noret;
C_noret_decl(f_19551)
static void C_ccall f_19551(C_word c,C_word *av) C_noret;
C_noret_decl(f_19558)
static void C_ccall f_19558(C_word c,C_word *av) C_noret;
C_noret_decl(f_19609)
static void C_fcall f_19609(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_19616)
static void C_ccall f_19616(C_word c,C_word *av) C_noret;
C_noret_decl(f_19619)
static void C_ccall f_19619(C_word c,C_word *av) C_noret;
C_noret_decl(f_19624)
static void C_fcall f_19624(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_19676)
static void C_ccall f_19676(C_word c,C_word *av) C_noret;
C_noret_decl(f_19691)
static void C_ccall f_19691(C_word c,C_word *av) C_noret;
C_noret_decl(f_19727)
static void C_ccall f_19727(C_word c,C_word *av) C_noret;
C_noret_decl(f_19737)
static void C_ccall f_19737(C_word c,C_word *av) C_noret;
C_noret_decl(f_19747)
static void C_fcall f_19747(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_19749)
static C_word C_fcall f_19749(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_19807)
static void C_fcall f_19807(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_19835)
static void C_ccall f_19835(C_word c,C_word *av) C_noret;
C_noret_decl(f_19839)
static void C_ccall f_19839(C_word c,C_word *av) C_noret;
C_noret_decl(f_19844)
static void C_fcall f_19844(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_19864)
static void C_ccall f_19864(C_word c,C_word *av) C_noret;
C_noret_decl(f_19866)
static void C_fcall f_19866(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_19891)
static void C_ccall f_19891(C_word c,C_word *av) C_noret;
C_noret_decl(f_19903)
static void C_fcall f_19903(C_word t0,C_word t1) C_noret;
C_noret_decl(f_19906)
static void C_ccall f_19906(C_word c,C_word *av) C_noret;
C_noret_decl(f_19919)
static void C_fcall f_19919(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_19923)
static void C_ccall f_19923(C_word c,C_word *av) C_noret;
C_noret_decl(f_19926)
static void C_ccall f_19926(C_word c,C_word *av) C_noret;
C_noret_decl(f_19931)
static void C_fcall f_19931(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_19941)
static void C_fcall f_19941(C_word t0,C_word t1) C_noret;
C_noret_decl(f_19944)
static void C_ccall f_19944(C_word c,C_word *av) C_noret;
C_noret_decl(f_19954)
static void C_ccall f_19954(C_word c,C_word *av) C_noret;
C_noret_decl(f_19989)
static void C_ccall f_19989(C_word c,C_word *av) C_noret;
C_noret_decl(f_20041)
static void C_ccall f_20041(C_word c,C_word *av) C_noret;
C_noret_decl(f_20053)
static void C_fcall f_20053(C_word t0,C_word t1) C_noret;
C_noret_decl(f_20077)
static void C_ccall f_20077(C_word c,C_word *av) C_noret;
C_noret_decl(f_20078)
static C_word C_fcall f_20078(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_20107)
static void C_ccall f_20107(C_word c,C_word *av) C_noret;
C_noret_decl(f_20108)
static C_word C_fcall f_20108(C_word t0,C_word t1);
C_noret_decl(f_20142)
static C_word C_fcall f_20142(C_word t0,C_word t1);
C_noret_decl(f_20165)
static void C_fcall f_20165(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_20201)
static void C_fcall f_20201(C_word t0,C_word t1) C_noret;
C_noret_decl(f_20204)
static void C_ccall f_20204(C_word c,C_word *av) C_noret;
C_noret_decl(f_20243)
static void C_fcall f_20243(C_word t0,C_word t1) C_noret;
C_noret_decl(f_20246)
static void C_ccall f_20246(C_word c,C_word *av) C_noret;
C_noret_decl(f_20271)
static void C_ccall f_20271(C_word c,C_word *av) C_noret;
C_noret_decl(f_20311)
static C_word C_fcall f_20311(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_20339)
static void C_fcall f_20339(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_20464)
static C_word C_fcall f_20464(C_word t0,C_word t1);
C_noret_decl(f_20498)
static C_word C_fcall f_20498(C_word *a,C_word t0,C_word t1,C_word t2,C_word t3);
C_noret_decl(f_20639)
static void C_fcall f_20639(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_20643)
static void C_ccall f_20643(C_word c,C_word *av) C_noret;
C_noret_decl(f_20646)
static void C_ccall f_20646(C_word c,C_word *av) C_noret;
C_noret_decl(f_20648)
static void C_fcall f_20648(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
C_noret_decl(f_20651)
static void C_fcall f_20651(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_20661)
static void C_fcall f_20661(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_20665)
static void C_fcall f_20665(C_word t0,C_word t1) C_noret;
C_noret_decl(f_20674)
static void C_ccall f_20674(C_word c,C_word *av) C_noret;
C_noret_decl(f_20677)
static void C_ccall f_20677(C_word c,C_word *av) C_noret;
C_noret_decl(f_20686)
static void C_fcall f_20686(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_20722)
static void C_fcall f_20722(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_20733)
static void C_ccall f_20733(C_word c,C_word *av) C_noret;
C_noret_decl(f_20739)
static void C_fcall f_20739(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_20756)
static void C_ccall f_20756(C_word c,C_word *av) C_noret;
C_noret_decl(f_20789)
static void C_ccall f_20789(C_word c,C_word *av) C_noret;
C_noret_decl(f_20795)
static void C_ccall f_20795(C_word c,C_word *av) C_noret;
C_noret_decl(f_20802)
static void C_ccall f_20802(C_word c,C_word *av) C_noret;
C_noret_decl(f_20813)
static void C_ccall f_20813(C_word c,C_word *av) C_noret;
C_noret_decl(f_20827)
static void C_fcall f_20827(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_20845)
static void C_ccall f_20845(C_word c,C_word *av) C_noret;
C_noret_decl(f_20870)
static void C_ccall f_20870(C_word c,C_word *av) C_noret;
C_noret_decl(f_20897)
static void C_ccall f_20897(C_word c,C_word *av) C_noret;
C_noret_decl(f_20928)
static void C_ccall f_20928(C_word c,C_word *av) C_noret;
C_noret_decl(f_20935)
static void C_ccall f_20935(C_word c,C_word *av) C_noret;
C_noret_decl(f_20947)
static void C_ccall f_20947(C_word c,C_word *av) C_noret;
C_noret_decl(f_20977)
static void C_ccall f_20977(C_word c,C_word *av) C_noret;
C_noret_decl(f_20991)
static void C_fcall f_20991(C_word t0,C_word t1) C_noret;
C_noret_decl(f_20994)
static void C_ccall f_20994(C_word c,C_word *av) C_noret;
C_noret_decl(f_21000)
static void C_ccall f_21000(C_word c,C_word *av) C_noret;
C_noret_decl(f_21014)
static void C_ccall f_21014(C_word c,C_word *av) C_noret;
C_noret_decl(f_21038)
static void C_fcall f_21038(C_word t0,C_word t1) C_noret;
C_noret_decl(f_21041)
static void C_ccall f_21041(C_word c,C_word *av) C_noret;
C_noret_decl(f_21048)
static void C_ccall f_21048(C_word c,C_word *av) C_noret;
C_noret_decl(f_21065)
static void C_ccall f_21065(C_word c,C_word *av) C_noret;
C_noret_decl(f_21081)
static void C_ccall f_21081(C_word c,C_word *av) C_noret;
C_noret_decl(f_21084)
static void C_ccall f_21084(C_word c,C_word *av) C_noret;
C_noret_decl(f_21087)
static void C_ccall f_21087(C_word c,C_word *av) C_noret;
C_noret_decl(f_21093)
static void C_ccall f_21093(C_word c,C_word *av) C_noret;
C_noret_decl(f_21103)
static void C_ccall f_21103(C_word c,C_word *av) C_noret;
C_noret_decl(f_21114)
static void C_ccall f_21114(C_word c,C_word *av) C_noret;
C_noret_decl(f_21118)
static void C_ccall f_21118(C_word c,C_word *av) C_noret;
C_noret_decl(f_21122)
static void C_ccall f_21122(C_word c,C_word *av) C_noret;
C_noret_decl(f_21130)
static void C_ccall f_21130(C_word c,C_word *av) C_noret;
C_noret_decl(f_21138)
static void C_ccall f_21138(C_word c,C_word *av) C_noret;
C_noret_decl(f_21153)
static void C_ccall f_21153(C_word c,C_word *av) C_noret;
C_noret_decl(f_21159)
static void C_ccall f_21159(C_word c,C_word *av) C_noret;
C_noret_decl(f_21173)
static void C_ccall f_21173(C_word c,C_word *av) C_noret;
C_noret_decl(f_21187)
static void C_ccall f_21187(C_word c,C_word *av) C_noret;
C_noret_decl(f_21193)
static void C_ccall f_21193(C_word c,C_word *av) C_noret;
C_noret_decl(f_21196)
static void C_ccall f_21196(C_word c,C_word *av) C_noret;
C_noret_decl(f_21223)
static void C_ccall f_21223(C_word c,C_word *av) C_noret;
C_noret_decl(f_21227)
static void C_ccall f_21227(C_word c,C_word *av) C_noret;
C_noret_decl(f_21247)
static void C_ccall f_21247(C_word c,C_word *av) C_noret;
C_noret_decl(f_21253)
static void C_ccall f_21253(C_word c,C_word *av) C_noret;
C_noret_decl(f_21256)
static void C_ccall f_21256(C_word c,C_word *av) C_noret;
C_noret_decl(f_21259)
static void C_ccall f_21259(C_word c,C_word *av) C_noret;
C_noret_decl(f_21275)
static void C_ccall f_21275(C_word c,C_word *av) C_noret;
C_noret_decl(f_21283)
static void C_ccall f_21283(C_word c,C_word *av) C_noret;
C_noret_decl(f_21295)
static void C_ccall f_21295(C_word c,C_word *av) C_noret;
C_noret_decl(f_21325)
static void C_ccall f_21325(C_word c,C_word *av) C_noret;
C_noret_decl(f_21331)
static void C_ccall f_21331(C_word c,C_word *av) C_noret;
C_noret_decl(f_21334)
static void C_ccall f_21334(C_word c,C_word *av) C_noret;
C_noret_decl(f_21337)
static void C_ccall f_21337(C_word c,C_word *av) C_noret;
C_noret_decl(f_21353)
static void C_ccall f_21353(C_word c,C_word *av) C_noret;
C_noret_decl(f_21361)
static void C_ccall f_21361(C_word c,C_word *av) C_noret;
C_noret_decl(f_21369)
static void C_ccall f_21369(C_word c,C_word *av) C_noret;
C_noret_decl(f_21373)
static void C_ccall f_21373(C_word c,C_word *av) C_noret;
C_noret_decl(f_21392)
static void C_fcall f_21392(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_21410)
static void C_ccall f_21410(C_word c,C_word *av) C_noret;
C_noret_decl(f_21538)
static void C_ccall f_21538(C_word c,C_word *av) C_noret;
C_noret_decl(f_21544)
static void C_ccall f_21544(C_word c,C_word *av) C_noret;
C_noret_decl(f_21547)
static void C_ccall f_21547(C_word c,C_word *av) C_noret;
C_noret_decl(f_21555)
static void C_fcall f_21555(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_21594)
static void C_fcall f_21594(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_21629)
static void C_fcall f_21629(C_word t0,C_word t1) C_noret;
C_noret_decl(f_21636)
static void C_ccall f_21636(C_word c,C_word *av) C_noret;
C_noret_decl(f_21662)
static void C_ccall f_21662(C_word c,C_word *av) C_noret;
C_noret_decl(f_21758)
static void C_fcall f_21758(C_word t0,C_word t1) C_noret;
C_noret_decl(f_21762)
static void C_ccall f_21762(C_word c,C_word *av) C_noret;
C_noret_decl(f_21775)
static void C_ccall f_21775(C_word c,C_word *av) C_noret;
C_noret_decl(f_21787)
static void C_fcall f_21787(C_word t0,C_word t1) C_noret;
C_noret_decl(f_21791)
static void C_ccall f_21791(C_word c,C_word *av) C_noret;
C_noret_decl(f_21798)
static void C_ccall f_21798(C_word c,C_word *av) C_noret;
C_noret_decl(f_21804)
static void C_fcall f_21804(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_21808)
static void C_ccall f_21808(C_word c,C_word *av) C_noret;
C_noret_decl(f_21811)
static void C_ccall f_21811(C_word c,C_word *av) C_noret;
C_noret_decl(f_21813)
static void C_fcall f_21813(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_21820)
static void C_fcall f_21820(C_word t0,C_word t1) C_noret;
C_noret_decl(f_21827)
static C_word C_fcall f_21827(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_21862)
static void C_ccall f_21862(C_word c,C_word *av) C_noret;
C_noret_decl(f_21875)
static void C_fcall f_21875(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_21976)
static void C_ccall f_21976(C_word c,C_word *av) C_noret;
C_noret_decl(f_21982)
static void C_fcall f_21982(C_word t0,C_word t1) C_noret;
C_noret_decl(f_21988)
static void C_fcall f_21988(C_word t0,C_word t1) C_noret;
C_noret_decl(f_22041)
static void C_fcall f_22041(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_22112)
static void C_fcall f_22112(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_22165)
static void C_fcall f_22165(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_22174)
static void C_fcall f_22174(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_22194)
static void C_ccall f_22194(C_word c,C_word *av) C_noret;
C_noret_decl(f_22223)
static C_word C_fcall f_22223(C_word t0,C_word t1);
C_noret_decl(f_22247)
static void C_fcall f_22247(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_22254)
static void C_ccall f_22254(C_word c,C_word *av) C_noret;
C_noret_decl(f_22257)
static void C_ccall f_22257(C_word c,C_word *av) C_noret;
C_noret_decl(f_22260)
static void C_ccall f_22260(C_word c,C_word *av) C_noret;
C_noret_decl(f_22263)
static void C_ccall f_22263(C_word c,C_word *av) C_noret;
C_noret_decl(f_22279)
static void C_fcall f_22279(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_22296)
static void C_ccall f_22296(C_word c,C_word *av) C_noret;
C_noret_decl(f_22331)
static void C_ccall f_22331(C_word c,C_word *av) C_noret;
C_noret_decl(f_22335)
static void C_fcall f_22335(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_22363)
static void C_ccall f_22363(C_word c,C_word *av) C_noret;
C_noret_decl(f_22366)
static void C_fcall f_22366(C_word t0,C_word t1) C_noret;
C_noret_decl(f_22372)
static void C_ccall f_22372(C_word c,C_word *av) C_noret;
C_noret_decl(f_22458)
static void C_ccall f_22458(C_word c,C_word *av) C_noret;
C_noret_decl(f_22461)
static void C_ccall f_22461(C_word c,C_word *av) C_noret;
C_noret_decl(f_22466)
static void C_fcall f_22466(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_22476)
static void C_ccall f_22476(C_word c,C_word *av) C_noret;
C_noret_decl(f_22479)
static void C_ccall f_22479(C_word c,C_word *av) C_noret;
C_noret_decl(f_22499)
static void C_fcall f_22499(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_22507)
static void C_fcall f_22507(C_word t0,C_word t1) C_noret;
C_noret_decl(f_22540)
static void C_ccall f_22540(C_word c,C_word *av) C_noret;
C_noret_decl(f_22542)
static void C_fcall f_22542(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_22567)
static void C_ccall f_22567(C_word c,C_word *av) C_noret;
C_noret_decl(f_22580)
static void C_fcall f_22580(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_22619)
static void C_ccall f_22619(C_word c,C_word *av) C_noret;
C_noret_decl(f_22634)
static void C_ccall f_22634(C_word c,C_word *av) C_noret;
C_noret_decl(f_22655)
static void C_fcall f_22655(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
C_noret_decl(f_22673)
static void C_ccall f_22673(C_word c,C_word *av) C_noret;
C_noret_decl(f_22682)
static void C_ccall f_22682(C_word c,C_word *av) C_noret;
C_noret_decl(f_22696)
static void C_fcall f_22696(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_22700)
static void C_ccall f_22700(C_word c,C_word *av) C_noret;
C_noret_decl(f_22703)
static void C_ccall f_22703(C_word c,C_word *av) C_noret;
C_noret_decl(f_22709)
static void C_ccall f_22709(C_word c,C_word *av) C_noret;
C_noret_decl(f_22712)
static void C_fcall f_22712(C_word t0,C_word t1) C_noret;
C_noret_decl(f_22715)
static void C_ccall f_22715(C_word c,C_word *av) C_noret;
C_noret_decl(f_22732)
static void C_ccall f_22732(C_word c,C_word *av) C_noret;
C_noret_decl(f_22804)
static void C_ccall f_22804(C_word c,C_word *av) C_noret;
C_noret_decl(f_22808)
static void C_ccall f_22808(C_word c,C_word *av) C_noret;
C_noret_decl(f_22812)
static void C_ccall f_22812(C_word c,C_word *av) C_noret;
C_noret_decl(f_22814)
static void C_fcall f_22814(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_22837)
static void C_fcall f_22837(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_22866)
static void C_fcall f_22866(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_22870)
static void C_fcall f_22870(C_word t0,C_word t1) C_noret;
C_noret_decl(f_22894)
static void C_fcall f_22894(C_word t0,C_word t1) C_noret;
C_noret_decl(f_22922)
static void C_ccall f_22922(C_word c,C_word *av) C_noret;
C_noret_decl(f_22932)
static void C_fcall f_22932(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_22942)
static void C_ccall f_22942(C_word c,C_word *av) C_noret;
C_noret_decl(f_22947)
static void C_fcall f_22947(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_22962)
static void C_fcall f_22962(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_22982)
static void C_fcall f_22982(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_23005)
static void C_fcall f_23005(C_word t0,C_word t1) C_noret;
C_noret_decl(f_23037)
static void C_ccall f_23037(C_word c,C_word *av) C_noret;
C_noret_decl(f_23044)
static void C_ccall f_23044(C_word c,C_word *av) C_noret;
C_noret_decl(f_23046)
static void C_ccall f_23046(C_word c,C_word *av) C_noret;
C_noret_decl(f_23070)
static void C_ccall f_23070(C_word c,C_word *av) C_noret;
C_noret_decl(f_23114)
static void C_fcall f_23114(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_23127)
static void C_fcall f_23127(C_word t0,C_word t1) C_noret;
C_noret_decl(f_23141)
static void C_fcall f_23141(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_23168)
static void C_fcall f_23168(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_23249)
static void C_ccall f_23249(C_word c,C_word *av) C_noret;
C_noret_decl(f_23265)
static void C_ccall f_23265(C_word c,C_word *av) C_noret;
C_noret_decl(f_23275)
static void C_ccall f_23275(C_word c,C_word *av) C_noret;
C_noret_decl(f_23284)
static void C_ccall f_23284(C_word c,C_word *av) C_noret;
C_noret_decl(f_23324)
static void C_fcall f_23324(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
C_noret_decl(f_23327)
static void C_fcall f_23327(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_23350)
static void C_ccall f_23350(C_word c,C_word *av) C_noret;
C_noret_decl(f_23366)
static void C_fcall f_23366(C_word t0,C_word t1) C_noret;
C_noret_decl(f_23373)
static void C_ccall f_23373(C_word c,C_word *av) C_noret;
C_noret_decl(f_23393)
static void C_ccall f_23393(C_word c,C_word *av) C_noret;
C_noret_decl(f_23413)
static void C_ccall f_23413(C_word c,C_word *av) C_noret;
C_noret_decl(f_23416)
static void C_ccall f_23416(C_word c,C_word *av) C_noret;
C_noret_decl(f_23417)
static void C_ccall f_23417(C_word c,C_word *av) C_noret;
C_noret_decl(f_23423)
static void C_ccall f_23423(C_word c,C_word *av) C_noret;
C_noret_decl(f_23439)
static void C_ccall f_23439(C_word c,C_word *av) C_noret;
C_noret_decl(f_23567)
static void C_ccall f_23567(C_word c,C_word *av) C_noret;
C_noret_decl(f_23586)
static void C_ccall f_23586(C_word c,C_word *av) C_noret;
C_noret_decl(f_23609)
static void C_ccall f_23609(C_word c,C_word *av) C_noret;
C_noret_decl(f_23610)
static void C_ccall f_23610(C_word c,C_word *av) C_noret;
C_noret_decl(f_23616)
static void C_ccall f_23616(C_word c,C_word *av) C_noret;
C_noret_decl(f_23635)
static void C_ccall f_23635(C_word c,C_word *av) C_noret;
C_noret_decl(f_23636)
static void C_ccall f_23636(C_word c,C_word *av) C_noret;
C_noret_decl(f_23642)
static void C_ccall f_23642(C_word c,C_word *av) C_noret;
C_noret_decl(f_23664)
static void C_ccall f_23664(C_word c,C_word *av) C_noret;
C_noret_decl(f_23670)
static void C_ccall f_23670(C_word c,C_word *av) C_noret;
C_noret_decl(f_23671)
static void C_ccall f_23671(C_word c,C_word *av) C_noret;
C_noret_decl(f_23677)
static void C_ccall f_23677(C_word c,C_word *av) C_noret;
C_noret_decl(f_23709)
static void C_ccall f_23709(C_word c,C_word *av) C_noret;
C_noret_decl(f_23715)
static void C_ccall f_23715(C_word c,C_word *av) C_noret;
C_noret_decl(f_23717)
static void C_ccall f_23717(C_word c,C_word *av) C_noret;
C_noret_decl(f_23723)
static void C_ccall f_23723(C_word c,C_word *av) C_noret;
C_noret_decl(f_23733)
static void C_ccall f_23733(C_word c,C_word *av) C_noret;
C_noret_decl(f_23739)
static void C_ccall f_23739(C_word c,C_word *av) C_noret;
C_noret_decl(f_23763)
static void C_ccall f_23763(C_word c,C_word *av) C_noret;
C_noret_decl(f_23769)
static void C_ccall f_23769(C_word c,C_word *av) C_noret;
C_noret_decl(f_23776)
static void C_ccall f_23776(C_word c,C_word *av) C_noret;
C_noret_decl(f_23782)
static void C_ccall f_23782(C_word c,C_word *av) C_noret;
C_noret_decl(f_23865)
static void C_fcall f_23865(C_word t0,C_word t1) C_noret;
C_noret_decl(f_23868)
static void C_fcall f_23868(C_word t0,C_word t1) C_noret;
C_noret_decl(f_23869)
static void C_ccall f_23869(C_word c,C_word *av) C_noret;
C_noret_decl(f_23882)
static void C_ccall f_23882(C_word c,C_word *av) C_noret;
C_noret_decl(f_23888)
static void C_ccall f_23888(C_word c,C_word *av) C_noret;
C_noret_decl(f_23901)
static void C_ccall f_23901(C_word c,C_word *av) C_noret;
C_noret_decl(f_23906)
static void C_ccall f_23906(C_word c,C_word *av) C_noret;
C_noret_decl(f_23937)
static void C_ccall f_23937(C_word c,C_word *av) C_noret;
C_noret_decl(f_23941)
static void C_ccall f_23941(C_word c,C_word *av) C_noret;
C_noret_decl(f_23946)
static void C_ccall f_23946(C_word c,C_word *av) C_noret;
C_noret_decl(f_24017)
static void C_fcall f_24017(C_word t0,C_word t1) C_noret;
C_noret_decl(f_24020)
static void C_fcall f_24020(C_word t0,C_word t1) C_noret;
C_noret_decl(f_24021)
static void C_ccall f_24021(C_word c,C_word *av) C_noret;
C_noret_decl(f_24034)
static void C_ccall f_24034(C_word c,C_word *av) C_noret;
C_noret_decl(f_24040)
static void C_ccall f_24040(C_word c,C_word *av) C_noret;
C_noret_decl(f_24050)
static void C_ccall f_24050(C_word c,C_word *av) C_noret;
C_noret_decl(f_24062)
static void C_ccall f_24062(C_word c,C_word *av) C_noret;
C_noret_decl(f_24075)
static void C_ccall f_24075(C_word c,C_word *av) C_noret;
C_noret_decl(f_24096)
static void C_ccall f_24096(C_word c,C_word *av) C_noret;
C_noret_decl(f_24106)
static void C_ccall f_24106(C_word c,C_word *av) C_noret;
C_noret_decl(f_24110)
static void C_ccall f_24110(C_word c,C_word *av) C_noret;
C_noret_decl(f_24116)
static void C_ccall f_24116(C_word c,C_word *av) C_noret;
C_noret_decl(f_24188)
static void C_ccall f_24188(C_word c,C_word *av) C_noret;
C_noret_decl(f_24238)
static void C_ccall f_24238(C_word c,C_word *av) C_noret;
C_noret_decl(f_24251)
static void C_ccall f_24251(C_word c,C_word *av) C_noret;
C_noret_decl(f_24252)
static void C_ccall f_24252(C_word c,C_word *av) C_noret;
C_noret_decl(f_24259)
static void C_ccall f_24259(C_word c,C_word *av) C_noret;
C_noret_decl(f_24267)
static void C_ccall f_24267(C_word c,C_word *av) C_noret;
C_noret_decl(f_24274)
static void C_ccall f_24274(C_word c,C_word *av) C_noret;
C_noret_decl(f_24286)
static void C_ccall f_24286(C_word c,C_word *av) C_noret;
C_noret_decl(f_24287)
static void C_ccall f_24287(C_word c,C_word *av) C_noret;
C_noret_decl(f_24294)
static void C_ccall f_24294(C_word c,C_word *av) C_noret;
C_noret_decl(f_24302)
static void C_ccall f_24302(C_word c,C_word *av) C_noret;
C_noret_decl(f_24309)
static void C_ccall f_24309(C_word c,C_word *av) C_noret;
C_noret_decl(f_24324)
static void C_ccall f_24324(C_word c,C_word *av) C_noret;
C_noret_decl(f_24325)
static void C_ccall f_24325(C_word c,C_word *av) C_noret;
C_noret_decl(f_24329)
static void C_ccall f_24329(C_word c,C_word *av) C_noret;
C_noret_decl(f_24335)
static void C_ccall f_24335(C_word c,C_word *av) C_noret;
C_noret_decl(f_24342)
static void C_ccall f_24342(C_word c,C_word *av) C_noret;
C_noret_decl(f_24351)
static void C_ccall f_24351(C_word c,C_word *av) C_noret;
C_noret_decl(f_24361)
static void C_ccall f_24361(C_word c,C_word *av) C_noret;
C_noret_decl(f_24365)
static void C_ccall f_24365(C_word c,C_word *av) C_noret;
C_noret_decl(f_24370)
static void C_ccall f_24370(C_word c,C_word *av) C_noret;
C_noret_decl(f_24387)
static void C_ccall f_24387(C_word c,C_word *av) C_noret;
C_noret_decl(f_24396)
static void C_ccall f_24396(C_word c,C_word *av) C_noret;
C_noret_decl(f_24407)
static void C_ccall f_24407(C_word c,C_word *av) C_noret;
C_noret_decl(f_24408)
static void C_ccall f_24408(C_word c,C_word *av) C_noret;
C_noret_decl(f_24412)
static void C_ccall f_24412(C_word c,C_word *av) C_noret;
C_noret_decl(f_24423)
static void C_ccall f_24423(C_word c,C_word *av) C_noret;
C_noret_decl(f_24430)
static void C_ccall f_24430(C_word c,C_word *av) C_noret;
C_noret_decl(f_24442)
static void C_ccall f_24442(C_word c,C_word *av) C_noret;
C_noret_decl(f_24445)
static void C_ccall f_24445(C_word c,C_word *av) C_noret;
C_noret_decl(f_24448)
static void C_ccall f_24448(C_word c,C_word *av) C_noret;
C_noret_decl(f_24457)
static void C_fcall f_24457(C_word t0,C_word t1) C_noret;
C_noret_decl(f_24460)
static void C_ccall f_24460(C_word c,C_word *av) C_noret;
C_noret_decl(f_24461)
static void C_ccall f_24461(C_word c,C_word *av) C_noret;
C_noret_decl(f_24518)
static void C_ccall f_24518(C_word c,C_word *av) C_noret;
C_noret_decl(f_24519)
static void C_ccall f_24519(C_word c,C_word *av) C_noret;
C_noret_decl(f_24525)
static void C_ccall f_24525(C_word c,C_word *av) C_noret;
C_noret_decl(f_24561)
static void C_ccall f_24561(C_word c,C_word *av) C_noret;
C_noret_decl(f_24566)
static void C_ccall f_24566(C_word c,C_word *av) C_noret;
C_noret_decl(f_24598)
static void C_ccall f_24598(C_word c,C_word *av) C_noret;
C_noret_decl(f_24601)
static void C_fcall f_24601(C_word t0,C_word t1) C_noret;
C_noret_decl(f_24602)
static void C_ccall f_24602(C_word c,C_word *av) C_noret;
C_noret_decl(f_24606)
static void C_ccall f_24606(C_word c,C_word *av) C_noret;
C_noret_decl(f_24624)
static void C_fcall f_24624(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_24637)
static void C_ccall f_24637(C_word c,C_word *av) C_noret;
C_noret_decl(f_24651)
static void C_ccall f_24651(C_word c,C_word *av) C_noret;
C_noret_decl(f_24655)
static void C_ccall f_24655(C_word c,C_word *av) C_noret;
C_noret_decl(f_24669)
static void C_ccall f_24669(C_word c,C_word *av) C_noret;
C_noret_decl(f_24675)
static void C_ccall f_24675(C_word c,C_word *av) C_noret;
C_noret_decl(f_24688)
static void C_ccall f_24688(C_word c,C_word *av) C_noret;
C_noret_decl(f_24695)
static void C_ccall f_24695(C_word c,C_word *av) C_noret;
C_noret_decl(f_24702)
static void C_ccall f_24702(C_word c,C_word *av) C_noret;
C_noret_decl(f_24724)
static void C_ccall f_24724(C_word c,C_word *av) C_noret;
C_noret_decl(f_24728)
static void C_ccall f_24728(C_word c,C_word *av) C_noret;
C_noret_decl(f_24815)
static void C_ccall f_24815(C_word c,C_word *av) C_noret;
C_noret_decl(f_24816)
static void C_ccall f_24816(C_word c,C_word *av) C_noret;
C_noret_decl(f_24864)
static void C_ccall f_24864(C_word c,C_word *av) C_noret;
C_noret_decl(f_24924)
static void C_ccall f_24924(C_word c,C_word *av) C_noret;
C_noret_decl(f_24959)
static void C_ccall f_24959(C_word c,C_word *av) C_noret;
C_noret_decl(f_25159)
static void C_ccall f_25159(C_word c,C_word *av) C_noret;
C_noret_decl(f_25179)
static void C_ccall f_25179(C_word c,C_word *av) C_noret;
C_noret_decl(f_25188)
static void C_ccall f_25188(C_word c,C_word *av) C_noret;
C_noret_decl(f_25194)
static void C_ccall f_25194(C_word c,C_word *av) C_noret;
C_noret_decl(f_25200)
static void C_ccall f_25200(C_word c,C_word *av) C_noret;
C_noret_decl(f_25217)
static void C_ccall f_25217(C_word c,C_word *av) C_noret;
C_noret_decl(f_25254)
static void C_ccall f_25254(C_word c,C_word *av) C_noret;
C_noret_decl(f_25263)
static void C_ccall f_25263(C_word c,C_word *av) C_noret;
C_noret_decl(f_25269)
static void C_ccall f_25269(C_word c,C_word *av) C_noret;
C_noret_decl(f_25275)
static void C_ccall f_25275(C_word c,C_word *av) C_noret;
C_noret_decl(f_25309)
static void C_ccall f_25309(C_word c,C_word *av) C_noret;
C_noret_decl(f_25339)
static void C_ccall f_25339(C_word c,C_word *av) C_noret;
C_noret_decl(f_25349)
static void C_fcall f_25349(C_word t0,C_word t1) C_noret;
C_noret_decl(f_25380)
static void C_ccall f_25380(C_word c,C_word *av) C_noret;
C_noret_decl(f_25397)
static void C_ccall f_25397(C_word c,C_word *av) C_noret;
C_noret_decl(f_25404)
static void C_fcall f_25404(C_word t0,C_word t1) C_noret;
C_noret_decl(f_25413)
static void C_fcall f_25413(C_word t0,C_word t1) C_noret;
C_noret_decl(f_25432)
static void C_ccall f_25432(C_word c,C_word *av) C_noret;
C_noret_decl(f_25449)
static void C_ccall f_25449(C_word c,C_word *av) C_noret;
C_noret_decl(f_25456)
static void C_ccall f_25456(C_word c,C_word *av) C_noret;
C_noret_decl(f_25477)
static void C_ccall f_25477(C_word c,C_word *av) C_noret;
C_noret_decl(f_25497)
static void C_ccall f_25497(C_word c,C_word *av) C_noret;
C_noret_decl(f_25504)
static void C_ccall f_25504(C_word c,C_word *av) C_noret;
C_noret_decl(f_25511)
static void C_fcall f_25511(C_word t0,C_word t1) C_noret;
C_noret_decl(f_25530)
static void C_ccall f_25530(C_word c,C_word *av) C_noret;
C_noret_decl(f_25537)
static void C_ccall f_25537(C_word c,C_word *av) C_noret;
C_noret_decl(f_25544)
static void C_fcall f_25544(C_word t0,C_word t1) C_noret;
C_noret_decl(f_25567)
static void C_ccall f_25567(C_word c,C_word *av) C_noret;
C_noret_decl(f_25588)
static void C_ccall f_25588(C_word c,C_word *av) C_noret;
C_noret_decl(f_25595)
static void C_ccall f_25595(C_word c,C_word *av) C_noret;
C_noret_decl(f_25602)
static void C_ccall f_25602(C_word c,C_word *av) C_noret;
C_noret_decl(f_25609)
static void C_fcall f_25609(C_word t0,C_word t1) C_noret;
C_noret_decl(f_25618)
static void C_fcall f_25618(C_word t0,C_word t1) C_noret;
C_noret_decl(f_25638)
static void C_ccall f_25638(C_word c,C_word *av) C_noret;
C_noret_decl(f_25654)
static void C_ccall f_25654(C_word c,C_word *av) C_noret;
C_noret_decl(f_25671)
static void C_ccall f_25671(C_word c,C_word *av) C_noret;
C_noret_decl(f_25691)
static void C_ccall f_25691(C_word c,C_word *av) C_noret;
C_noret_decl(f_25695)
static void C_ccall f_25695(C_word c,C_word *av) C_noret;
C_noret_decl(f_25698)
static void C_ccall f_25698(C_word c,C_word *av) C_noret;
C_noret_decl(f_25704)
static void C_fcall f_25704(C_word t0,C_word t1) C_noret;
C_noret_decl(f_25749)
static void C_ccall f_25749(C_word c,C_word *av) C_noret;
C_noret_decl(f_25813)
static void C_ccall f_25813(C_word c,C_word *av) C_noret;
C_noret_decl(f_25830)
static void C_ccall f_25830(C_word c,C_word *av) C_noret;
C_noret_decl(f_25832)
static void C_fcall f_25832(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_25842)
static void C_ccall f_25842(C_word c,C_word *av) C_noret;
C_noret_decl(f_25848)
static void C_ccall f_25848(C_word c,C_word *av) C_noret;
C_noret_decl(f_25854)
static void C_ccall f_25854(C_word c,C_word *av) C_noret;
C_noret_decl(f_25870)
static void C_ccall f_25870(C_word c,C_word *av) C_noret;
C_noret_decl(f_25876)
static void C_ccall f_25876(C_word c,C_word *av) C_noret;
C_noret_decl(f_25898)
static void C_ccall f_25898(C_word c,C_word *av) C_noret;
C_noret_decl(f_25912)
static void C_ccall f_25912(C_word c,C_word *av) C_noret;
C_noret_decl(f_25929)
static void C_ccall f_25929(C_word c,C_word *av) C_noret;
C_noret_decl(f_25931)
static void C_fcall f_25931(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_25941)
static void C_ccall f_25941(C_word c,C_word *av) C_noret;
C_noret_decl(f_25947)
static void C_ccall f_25947(C_word c,C_word *av) C_noret;
C_noret_decl(f_25953)
static void C_ccall f_25953(C_word c,C_word *av) C_noret;
C_noret_decl(f_25969)
static void C_ccall f_25969(C_word c,C_word *av) C_noret;
C_noret_decl(f_26027)
static void C_ccall f_26027(C_word c,C_word *av) C_noret;
C_noret_decl(f_26053)
static void C_fcall f_26053(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_26055)
static void C_ccall f_26055(C_word c,C_word *av) C_noret;
C_noret_decl(f_26068)
static void C_ccall f_26068(C_word c,C_word *av) C_noret;
C_noret_decl(f_26087)
static void C_ccall f_26087(C_word c,C_word *av) C_noret;
C_noret_decl(f_26096)
static void C_ccall f_26096(C_word c,C_word *av) C_noret;
C_noret_decl(f_26102)
static void C_ccall f_26102(C_word c,C_word *av) C_noret;
C_noret_decl(f_26108)
static void C_ccall f_26108(C_word c,C_word *av) C_noret;
C_noret_decl(f_26114)
static void C_ccall f_26114(C_word c,C_word *av) C_noret;
C_noret_decl(f_26266)
static void C_fcall f_26266(C_word t0,C_word t1) C_noret;
C_noret_decl(f_26278)
static void C_fcall f_26278(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_26328)
static void C_fcall f_26328(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_26346)
static void C_ccall f_26346(C_word c,C_word *av) C_noret;
C_noret_decl(f_26357)
static void C_fcall f_26357(C_word t0,C_word t1) C_noret;
C_noret_decl(f_26363)
static void C_ccall f_26363(C_word c,C_word *av) C_noret;
C_noret_decl(f_26375)
static void C_ccall f_26375(C_word c,C_word *av) C_noret;
C_noret_decl(f_26377)
static void C_fcall f_26377(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_26387)
static void C_fcall f_26387(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_26390)
static void C_fcall f_26390(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_26416)
static void C_ccall f_26416(C_word c,C_word *av) C_noret;
C_noret_decl(f_26437)
static void C_ccall f_26437(C_word c,C_word *av) C_noret;
C_noret_decl(f_26441)
static void C_ccall f_26441(C_word c,C_word *av) C_noret;
C_noret_decl(f_26454)
static void C_ccall f_26454(C_word c,C_word *av) C_noret;
C_noret_decl(f_26456)
static void C_fcall f_26456(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_26481)
static void C_ccall f_26481(C_word c,C_word *av) C_noret;
C_noret_decl(f_26505)
static void C_ccall f_26505(C_word c,C_word *av) C_noret;
C_noret_decl(f_26518)
static void C_ccall f_26518(C_word c,C_word *av) C_noret;
C_noret_decl(f_26520)
static void C_fcall f_26520(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_26545)
static void C_ccall f_26545(C_word c,C_word *av) C_noret;
C_noret_decl(f_26567)
static void C_ccall f_26567(C_word c,C_word *av) C_noret;
C_noret_decl(f_26575)
static void C_ccall f_26575(C_word c,C_word *av) C_noret;
C_noret_decl(f_26588)
static void C_ccall f_26588(C_word c,C_word *av) C_noret;
C_noret_decl(f_26590)
static void C_fcall f_26590(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_26615)
static void C_ccall f_26615(C_word c,C_word *av) C_noret;
C_noret_decl(f_26635)
static void C_ccall f_26635(C_word c,C_word *av) C_noret;
C_noret_decl(f_26645)
static void C_ccall f_26645(C_word c,C_word *av) C_noret;
C_noret_decl(f_26660)
static void C_ccall f_26660(C_word c,C_word *av) C_noret;
C_noret_decl(f_26673)
static void C_ccall f_26673(C_word c,C_word *av) C_noret;
C_noret_decl(f_26675)
static void C_fcall f_26675(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_26700)
static void C_ccall f_26700(C_word c,C_word *av) C_noret;
C_noret_decl(f_26822)
static void C_ccall f_26822(C_word c,C_word *av) C_noret;
C_noret_decl(f_26824)
static void C_ccall f_26824(C_word c,C_word *av) C_noret;
C_noret_decl(f_26842)
static void C_ccall f_26842(C_word c,C_word *av) C_noret;
C_noret_decl(f_26844)
static void C_fcall f_26844(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_26877)
static void C_fcall f_26877(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_26929)
static C_word C_fcall f_26929(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_26965)
static void C_ccall f_26965(C_word c,C_word *av) C_noret;
C_noret_decl(f_26973)
static void C_ccall f_26973(C_word c,C_word *av) C_noret;
C_noret_decl(f_26977)
static void C_ccall f_26977(C_word c,C_word *av) C_noret;
C_noret_decl(f_26979)
static void C_fcall f_26979(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_26993)
static void C_ccall f_26993(C_word c,C_word *av) C_noret;
C_noret_decl(f_26997)
static void C_ccall f_26997(C_word c,C_word *av) C_noret;
C_noret_decl(f_27001)
static void C_ccall f_27001(C_word c,C_word *av) C_noret;
C_noret_decl(f_27014)
static void C_ccall f_27014(C_word c,C_word *av) C_noret;
C_noret_decl(f_27018)
static void C_ccall f_27018(C_word c,C_word *av) C_noret;
C_noret_decl(f_27022)
static void C_ccall f_27022(C_word c,C_word *av) C_noret;
C_noret_decl(f_27160)
static void C_fcall f_27160(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_27168)
static void C_ccall f_27168(C_word c,C_word *av) C_noret;
C_noret_decl(f_27172)
static void C_ccall f_27172(C_word c,C_word *av) C_noret;
C_noret_decl(f_27174)
static void C_fcall f_27174(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_27188)
static void C_ccall f_27188(C_word c,C_word *av) C_noret;
C_noret_decl(f_27201)
static void C_ccall f_27201(C_word c,C_word *av) C_noret;
C_noret_decl(f_27205)
static void C_ccall f_27205(C_word c,C_word *av) C_noret;
C_noret_decl(f_27251)
static void C_fcall f_27251(C_word t0,C_word t1) C_noret;
C_noret_decl(f_27254)
static void C_fcall f_27254(C_word t0,C_word t1) C_noret;
C_noret_decl(f_27261)
static void C_fcall f_27261(C_word t0,C_word t1) C_noret;
C_noret_decl(f_27356)
static void C_ccall f_27356(C_word c,C_word *av) C_noret;
C_noret_decl(f_27364)
static void C_ccall f_27364(C_word c,C_word *av) C_noret;
C_noret_decl(f_27368)
static void C_ccall f_27368(C_word c,C_word *av) C_noret;
C_noret_decl(f_27370)
static void C_fcall f_27370(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_27387)
static void C_ccall f_27387(C_word c,C_word *av) C_noret;
C_noret_decl(f_27482)
static void C_fcall f_27482(C_word t0,C_word t1) C_noret;
C_noret_decl(f_27490)
static void C_ccall f_27490(C_word c,C_word *av) C_noret;
C_noret_decl(f_27492)
static void C_fcall f_27492(C_word t0,C_word t1) C_noret;
C_noret_decl(f_27500)
static void C_ccall f_27500(C_word c,C_word *av) C_noret;
C_noret_decl(f_27502)
static void C_fcall f_27502(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_27516)
static void C_ccall f_27516(C_word c,C_word *av) C_noret;
C_noret_decl(f_27522)
static void C_fcall f_27522(C_word t0,C_word t1) C_noret;
C_noret_decl(f_27531)
static void C_ccall f_27531(C_word c,C_word *av) C_noret;
C_noret_decl(f_27535)
static void C_ccall f_27535(C_word c,C_word *av) C_noret;
C_noret_decl(f_27539)
static void C_ccall f_27539(C_word c,C_word *av) C_noret;
C_noret_decl(f_27543)
static void C_ccall f_27543(C_word c,C_word *av) C_noret;
C_noret_decl(f_27567)
static void C_ccall f_27567(C_word c,C_word *av) C_noret;
C_noret_decl(f_27577)
static void C_ccall f_27577(C_word c,C_word *av) C_noret;
C_noret_decl(f_27586)
static void C_ccall f_27586(C_word c,C_word *av) C_noret;
C_noret_decl(f_27590)
static void C_ccall f_27590(C_word c,C_word *av) C_noret;
C_noret_decl(f_27594)
static void C_ccall f_27594(C_word c,C_word *av) C_noret;
C_noret_decl(f_27598)
static void C_ccall f_27598(C_word c,C_word *av) C_noret;
C_noret_decl(f_27608)
static void C_ccall f_27608(C_word c,C_word *av) C_noret;
C_noret_decl(f_27623)
static void C_ccall f_27623(C_word c,C_word *av) C_noret;
C_noret_decl(f_27627)
static void C_ccall f_27627(C_word c,C_word *av) C_noret;
C_noret_decl(f_27630)
static void C_ccall f_27630(C_word c,C_word *av) C_noret;
C_noret_decl(f_27633)
static void C_ccall f_27633(C_word c,C_word *av) C_noret;
C_noret_decl(f_27642)
static void C_fcall f_27642(C_word t0,C_word t1) C_noret;
C_noret_decl(f_27645)
static void C_fcall f_27645(C_word t0,C_word t1) C_noret;
C_noret_decl(f_27654)
static void C_ccall f_27654(C_word c,C_word *av) C_noret;
C_noret_decl(f_27657)
static void C_ccall f_27657(C_word c,C_word *av) C_noret;
C_noret_decl(f_27665)
static void C_fcall f_27665(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_27678)
static void C_ccall f_27678(C_word c,C_word *av) C_noret;
C_noret_decl(f_27693)
static void C_ccall f_27693(C_word c,C_word *av) C_noret;
C_noret_decl(f_27696)
static void C_ccall f_27696(C_word c,C_word *av) C_noret;
C_noret_decl(f_27808)
static void C_ccall f_27808(C_word c,C_word *av) C_noret;
C_noret_decl(f_27825)
static void C_ccall f_27825(C_word c,C_word *av) C_noret;
C_noret_decl(f_27829)
static void C_ccall f_27829(C_word c,C_word *av) C_noret;
C_noret_decl(f_27830)
static void C_ccall f_27830(C_word c,C_word *av) C_noret;
C_noret_decl(f_27838)
static void C_ccall f_27838(C_word c,C_word *av) C_noret;
C_noret_decl(f_27853)
static void C_ccall f_27853(C_word c,C_word *av) C_noret;
C_noret_decl(f_27857)
static void C_ccall f_27857(C_word c,C_word *av) C_noret;
C_noret_decl(f_27860)
static void C_ccall f_27860(C_word c,C_word *av) C_noret;
C_noret_decl(f_27869)
static void C_ccall f_27869(C_word c,C_word *av) C_noret;
C_noret_decl(f_27875)
static void C_ccall f_27875(C_word c,C_word *av) C_noret;
C_noret_decl(f_27883)
static void C_fcall f_27883(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_27896)
static void C_ccall f_27896(C_word c,C_word *av) C_noret;
C_noret_decl(f_27946)
static void C_ccall f_27946(C_word c,C_word *av) C_noret;
C_noret_decl(f_27956)
static void C_ccall f_27956(C_word c,C_word *av) C_noret;
C_noret_decl(f_27970)
static void C_ccall f_27970(C_word c,C_word *av) C_noret;
C_noret_decl(f_27973)
static void C_ccall f_27973(C_word c,C_word *av) C_noret;
C_noret_decl(f_27976)
static void C_ccall f_27976(C_word c,C_word *av) C_noret;
C_noret_decl(f_28028)
static void C_ccall f_28028(C_word c,C_word *av) C_noret;
C_noret_decl(f_28035)
static void C_ccall f_28035(C_word c,C_word *av) C_noret;
C_noret_decl(f_28039)
static void C_ccall f_28039(C_word c,C_word *av) C_noret;
C_noret_decl(f_28040)
static void C_ccall f_28040(C_word c,C_word *av) C_noret;
C_noret_decl(f_28048)
static void C_ccall f_28048(C_word c,C_word *av) C_noret;
C_noret_decl(f_28063)
static void C_ccall f_28063(C_word c,C_word *av) C_noret;
C_noret_decl(f_28067)
static void C_ccall f_28067(C_word c,C_word *av) C_noret;
C_noret_decl(f_28070)
static void C_ccall f_28070(C_word c,C_word *av) C_noret;
C_noret_decl(f_28084)
static void C_ccall f_28084(C_word c,C_word *av) C_noret;
C_noret_decl(f_28088)
static void C_ccall f_28088(C_word c,C_word *av) C_noret;
C_noret_decl(f_28092)
static void C_ccall f_28092(C_word c,C_word *av) C_noret;
C_noret_decl(f_28100)
static void C_ccall f_28100(C_word c,C_word *av) C_noret;
C_noret_decl(f_28142)
static void C_ccall f_28142(C_word c,C_word *av) C_noret;
C_noret_decl(f_28146)
static void C_ccall f_28146(C_word c,C_word *av) C_noret;
C_noret_decl(f_28151)
static void C_ccall f_28151(C_word c,C_word *av) C_noret;
C_noret_decl(f_28175)
static void C_ccall f_28175(C_word c,C_word *av) C_noret;
C_noret_decl(f_28188)
static void C_ccall f_28188(C_word c,C_word *av) C_noret;
C_noret_decl(f_28206)
static void C_ccall f_28206(C_word c,C_word *av) C_noret;
C_noret_decl(f_28213)
static void C_ccall f_28213(C_word c,C_word *av) C_noret;
C_noret_decl(f_28221)
static void C_ccall f_28221(C_word c,C_word *av) C_noret;
C_noret_decl(f_28223)
static void C_ccall f_28223(C_word c,C_word *av) C_noret;
C_noret_decl(f_28244)
static void C_ccall f_28244(C_word c,C_word *av) C_noret;
C_noret_decl(f_28256)
static void C_fcall f_28256(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_28262)
static void C_fcall f_28262(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_28289)
static void C_ccall f_28289(C_word c,C_word *av) C_noret;
C_noret_decl(f_28314)
static void C_ccall f_28314(C_word c,C_word *av) C_noret;
C_noret_decl(f_28340)
static void C_ccall f_28340(C_word c,C_word *av) C_noret;
C_noret_decl(f_28404)
static void C_ccall f_28404(C_word c,C_word *av) C_noret;
C_noret_decl(f_28436)
static void C_fcall f_28436(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_28466)
static void C_ccall f_28466(C_word c,C_word *av) C_noret;
C_noret_decl(f_28487)
static void C_ccall f_28487(C_word c,C_word *av) C_noret;
C_noret_decl(f_28491)
static void C_ccall f_28491(C_word c,C_word *av) C_noret;
C_noret_decl(f_28496)
static void C_ccall f_28496(C_word c,C_word *av) C_noret;
C_noret_decl(f_28504)
static void C_ccall f_28504(C_word c,C_word *av) C_noret;
C_noret_decl(f_28506)
static void C_ccall f_28506(C_word c,C_word *av) C_noret;
C_noret_decl(f_28522)
static void C_ccall f_28522(C_word c,C_word *av) C_noret;
C_noret_decl(f_28526)
static void C_ccall f_28526(C_word c,C_word *av) C_noret;
C_noret_decl(f_28532)
static void C_fcall f_28532(C_word t0,C_word t1) C_noret;
C_noret_decl(f_28537)
static void C_ccall f_28537(C_word c,C_word *av) C_noret;
C_noret_decl(f_28564)
static void C_ccall f_28564(C_word c,C_word *av) C_noret;
C_noret_decl(f_28612)
static void C_ccall f_28612(C_word c,C_word *av) C_noret;
C_noret_decl(f_28620)
static void C_fcall f_28620(C_word t0,C_word t1) C_noret;
C_noret_decl(f_28622)
static void C_fcall f_28622(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_28663)
static void C_ccall f_28663(C_word c,C_word *av) C_noret;
C_noret_decl(f_28703)
static void C_ccall f_28703(C_word c,C_word *av) C_noret;
C_noret_decl(f_28737)
static void C_ccall f_28737(C_word c,C_word *av) C_noret;
C_noret_decl(f_28750)
static void C_fcall f_28750(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_28780)
static void C_ccall f_28780(C_word c,C_word *av) C_noret;
C_noret_decl(f_28788)
static void C_ccall f_28788(C_word c,C_word *av) C_noret;
C_noret_decl(f_28792)
static void C_ccall f_28792(C_word c,C_word *av) C_noret;
C_noret_decl(f_28794)
static void C_fcall f_28794(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_28813)
static void C_ccall f_28813(C_word c,C_word *av) C_noret;
C_noret_decl(f_28837)
static void C_ccall f_28837(C_word c,C_word *av) C_noret;
C_noret_decl(f_28854)
static void C_ccall f_28854(C_word c,C_word *av) C_noret;
C_noret_decl(f_28861)
static void C_ccall f_28861(C_word c,C_word *av) C_noret;
C_noret_decl(f_28884)
static void C_ccall f_28884(C_word c,C_word *av) C_noret;
C_noret_decl(f_28905)
static void C_ccall f_28905(C_word c,C_word *av) C_noret;
C_noret_decl(f_28907)
static void C_fcall f_28907(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_28917)
static void C_fcall f_28917(C_word t0,C_word t1) C_noret;
C_noret_decl(f_28944)
static void C_ccall f_28944(C_word c,C_word *av) C_noret;
C_noret_decl(f_28974)
static void C_ccall f_28974(C_word c,C_word *av) C_noret;
C_noret_decl(f_28979)
static void C_fcall f_28979(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_28991)
static void C_fcall f_28991(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_29011)
static void C_ccall f_29011(C_word c,C_word *av) C_noret;
C_noret_decl(f_29046)
static void C_ccall f_29046(C_word c,C_word *av) C_noret;
C_noret_decl(f_29054)
static void C_ccall f_29054(C_word c,C_word *av) C_noret;
C_noret_decl(f_29090)
static void C_ccall f_29090(C_word c,C_word *av) C_noret;
C_noret_decl(f_29104)
static void C_fcall f_29104(C_word t0,C_word t1) C_noret;
C_noret_decl(f_29108)
static void C_ccall f_29108(C_word c,C_word *av) C_noret;
C_noret_decl(f_29111)
static void C_ccall f_29111(C_word c,C_word *av) C_noret;
C_noret_decl(f_29116)
static void C_fcall f_29116(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29126)
static void C_ccall f_29126(C_word c,C_word *av) C_noret;
C_noret_decl(f_29137)
static void C_ccall f_29137(C_word c,C_word *av) C_noret;
C_noret_decl(f_29140)
static void C_ccall f_29140(C_word c,C_word *av) C_noret;
C_noret_decl(f_29147)
static void C_ccall f_29147(C_word c,C_word *av) C_noret;
C_noret_decl(f_29159)
static void C_ccall f_29159(C_word c,C_word *av) C_noret;
C_noret_decl(f_29174)
static void C_ccall f_29174(C_word c,C_word *av) C_noret;
C_noret_decl(f_29184)
static void C_ccall f_29184(C_word c,C_word *av) C_noret;
C_noret_decl(f_29188)
static void C_ccall f_29188(C_word c,C_word *av) C_noret;
C_noret_decl(f_29191)
static void C_ccall f_29191(C_word c,C_word *av) C_noret;
C_noret_decl(f_29196)
static void C_fcall f_29196(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29219)
static void C_fcall f_29219(C_word t0,C_word t1) C_noret;
C_noret_decl(f_29222)
static void C_ccall f_29222(C_word c,C_word *av) C_noret;
C_noret_decl(f_29229)
static void C_ccall f_29229(C_word c,C_word *av) C_noret;
C_noret_decl(f_29234)
static void C_fcall f_29234(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29244)
static void C_ccall f_29244(C_word c,C_word *av) C_noret;
C_noret_decl(f_29264)
static void C_fcall f_29264(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29274)
static void C_ccall f_29274(C_word c,C_word *av) C_noret;
C_noret_decl(f_29316)
static void C_ccall f_29316(C_word c,C_word *av) C_noret;
C_noret_decl(f_29323)
static void C_ccall f_29323(C_word c,C_word *av) C_noret;
C_noret_decl(f_29328)
static void C_fcall f_29328(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29338)
static void C_ccall f_29338(C_word c,C_word *av) C_noret;
C_noret_decl(f_29358)
static void C_ccall f_29358(C_word c,C_word *av) C_noret;
C_noret_decl(f_29361)
static void C_ccall f_29361(C_word c,C_word *av) C_noret;
C_noret_decl(f_29364)
static void C_ccall f_29364(C_word c,C_word *av) C_noret;
C_noret_decl(f_29373)
static void C_ccall f_29373(C_word c,C_word *av) C_noret;
C_noret_decl(f_29378)
static void C_fcall f_29378(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29388)
static void C_ccall f_29388(C_word c,C_word *av) C_noret;
C_noret_decl(f_29412)
static void C_ccall f_29412(C_word c,C_word *av) C_noret;
C_noret_decl(f_29415)
static void C_ccall f_29415(C_word c,C_word *av) C_noret;
C_noret_decl(f_29416)
static void C_fcall f_29416(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29420)
static void C_ccall f_29420(C_word c,C_word *av) C_noret;
C_noret_decl(f_29432)
static void C_ccall f_29432(C_word c,C_word *av) C_noret;
C_noret_decl(f_29437)
static void C_fcall f_29437(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29447)
static void C_ccall f_29447(C_word c,C_word *av) C_noret;
C_noret_decl(f_29471)
static void C_fcall f_29471(C_word t0,C_word t1) C_noret;
C_noret_decl(f_29474)
static void C_ccall f_29474(C_word c,C_word *av) C_noret;
C_noret_decl(f_29485)
static void C_ccall f_29485(C_word c,C_word *av) C_noret;
C_noret_decl(f_29492)
static void C_ccall f_29492(C_word c,C_word *av) C_noret;
C_noret_decl(f_29497)
static void C_fcall f_29497(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29507)
static void C_ccall f_29507(C_word c,C_word *av) C_noret;
C_noret_decl(f_29541)
static void C_fcall f_29541(C_word t0,C_word t1) C_noret;
C_noret_decl(f_29544)
static void C_ccall f_29544(C_word c,C_word *av) C_noret;
C_noret_decl(f_29547)
static void C_ccall f_29547(C_word c,C_word *av) C_noret;
C_noret_decl(f_29554)
static void C_ccall f_29554(C_word c,C_word *av) C_noret;
C_noret_decl(f_29558)
static void C_ccall f_29558(C_word c,C_word *av) C_noret;
C_noret_decl(f_29571)
static void C_ccall f_29571(C_word c,C_word *av) C_noret;
C_noret_decl(f_29584)
static void C_ccall f_29584(C_word c,C_word *av) C_noret;
C_noret_decl(f_29587)
static void C_ccall f_29587(C_word c,C_word *av) C_noret;
C_noret_decl(f_29594)
static void C_ccall f_29594(C_word c,C_word *av) C_noret;
C_noret_decl(f_29605)
static void C_fcall f_29605(C_word t0,C_word t1) C_noret;
C_noret_decl(f_29614)
static void C_fcall f_29614(C_word t0,C_word t1) C_noret;
C_noret_decl(f_29617)
static void C_ccall f_29617(C_word c,C_word *av) C_noret;
C_noret_decl(f_29620)
static void C_ccall f_29620(C_word c,C_word *av) C_noret;
C_noret_decl(f_29627)
static void C_ccall f_29627(C_word c,C_word *av) C_noret;
C_noret_decl(f_29652)
static void C_ccall f_29652(C_word c,C_word *av) C_noret;
C_noret_decl(f_29690)
static void C_ccall f_29690(C_word c,C_word *av) C_noret;
C_noret_decl(f_29693)
static void C_ccall f_29693(C_word c,C_word *av) C_noret;
C_noret_decl(f_29696)
static void C_ccall f_29696(C_word c,C_word *av) C_noret;
C_noret_decl(f_29703)
static void C_ccall f_29703(C_word c,C_word *av) C_noret;
C_noret_decl(f_29708)
static void C_fcall f_29708(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29718)
static void C_ccall f_29718(C_word c,C_word *av) C_noret;
C_noret_decl(f_29754)
static void C_ccall f_29754(C_word c,C_word *av) C_noret;
C_noret_decl(f_29918)
static void C_ccall f_29918(C_word c,C_word *av) C_noret;
C_noret_decl(f_29931)
static void C_ccall f_29931(C_word c,C_word *av) C_noret;
C_noret_decl(f_29940)
static void C_ccall f_29940(C_word c,C_word *av) C_noret;
C_noret_decl(f_29951)
static void C_ccall f_29951(C_word c,C_word *av) C_noret;
C_noret_decl(f_29955)
static void C_ccall f_29955(C_word c,C_word *av) C_noret;
C_noret_decl(f_29957)
static void C_fcall f_29957(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_29988)
static void C_ccall f_29988(C_word c,C_word *av) C_noret;
C_noret_decl(f_30035)
static void C_ccall f_30035(C_word c,C_word *av) C_noret;
C_noret_decl(f_30055)
static void C_ccall f_30055(C_word c,C_word *av) C_noret;
C_noret_decl(f_30065)
static void C_fcall f_30065(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_30092)
static void C_ccall f_30092(C_word c,C_word *av) C_noret;
C_noret_decl(f_30114)
static void C_fcall f_30114(C_word t0,C_word t1) C_noret;
C_noret_decl(f_30216)
static void C_ccall f_30216(C_word c,C_word *av) C_noret;
C_noret_decl(f_30681)
static void C_ccall f_30681(C_word c,C_word *av) C_noret;
C_noret_decl(f_30843)
static void C_ccall f_30843(C_word c,C_word *av) C_noret;
C_noret_decl(f_30846)
static void C_ccall f_30846(C_word c,C_word *av) C_noret;
C_noret_decl(f_30880)
static void C_ccall f_30880(C_word c,C_word *av) C_noret;
C_noret_decl(f_30884)
static void C_ccall f_30884(C_word c,C_word *av) C_noret;
C_noret_decl(f_30887)
static void C_ccall f_30887(C_word c,C_word *av) C_noret;
C_noret_decl(f_30890)
static void C_ccall f_30890(C_word c,C_word *av) C_noret;
C_noret_decl(f_30893)
static void C_ccall f_30893(C_word c,C_word *av) C_noret;
C_noret_decl(f_30896)
static void C_ccall f_30896(C_word c,C_word *av) C_noret;
C_noret_decl(f_7492)
static void C_ccall f_7492(C_word c,C_word *av) C_noret;
C_noret_decl(f_7495)
static void C_ccall f_7495(C_word c,C_word *av) C_noret;
C_noret_decl(f_7497)
static void C_fcall f_7497(C_word t0,C_word t1) C_noret;
C_noret_decl(f_7501)
static void C_ccall f_7501(C_word c,C_word *av) C_noret;
C_noret_decl(f_7504)
static void C_ccall f_7504(C_word c,C_word *av) C_noret;
C_noret_decl(f_7510)
static void C_ccall f_7510(C_word c,C_word *av) C_noret;
C_noret_decl(f_7552)
static void C_ccall f_7552(C_word c,C_word *av) C_noret;
C_noret_decl(f_7570)
static void C_ccall f_7570(C_word c,C_word *av) C_noret;
C_noret_decl(f_7579)
static void C_fcall f_7579(C_word t0,C_word t1) C_noret;
C_noret_decl(f_7587)
static void C_ccall f_7587(C_word c,C_word *av) C_noret;
C_noret_decl(f_7600)
static void C_ccall f_7600(C_word c,C_word *av) C_noret;
C_noret_decl(f_7602)
static void C_fcall f_7602(C_word t0,C_word t1) C_noret;
C_noret_decl(f_7609)
static void C_ccall f_7609(C_word c,C_word *av) C_noret;
C_noret_decl(f_7611)
static void C_fcall f_7611(C_word t0,C_word t1) C_noret;
C_noret_decl(f_7625)
static void C_ccall f_7625(C_word c,C_word *av) C_noret;
C_noret_decl(f_7643)
static void C_ccall f_7643(C_word c,C_word *av) C_noret;
C_noret_decl(f_7649)
static void C_ccall f_7649(C_word c,C_word *av) C_noret;
C_noret_decl(f_7674)
static void C_ccall f_7674(C_word c,C_word *av) C_noret;
C_noret_decl(f_7720)
static void C_ccall f_7720(C_word c,C_word *av) C_noret;
C_noret_decl(f_7733)
static void C_ccall f_7733(C_word c,C_word *av) C_noret;
C_noret_decl(f_7735)
static void C_ccall f_7735(C_word c,C_word *av) C_noret;
C_noret_decl(f_7739)
static void C_ccall f_7739(C_word c,C_word *av) C_noret;
C_noret_decl(f_7760)
static void C_ccall f_7760(C_word c,C_word *av) C_noret;
C_noret_decl(f_7764)
static void C_ccall f_7764(C_word c,C_word *av) C_noret;
C_noret_decl(f_7789)
static void C_ccall f_7789(C_word c,C_word *av) C_noret;
C_noret_decl(f_7793)
static void C_ccall f_7793(C_word c,C_word *av) C_noret;
C_noret_decl(f_7818)
static void C_ccall f_7818(C_word c,C_word *av) C_noret;
C_noret_decl(f_7822)
static void C_ccall f_7822(C_word c,C_word *av) C_noret;
C_noret_decl(f_7911)
static void C_fcall f_7911(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_7979)
static void C_fcall f_7979(C_word t0,C_word t1) C_noret;
C_noret_decl(f_8021)
static void C_ccall f_8021(C_word c,C_word *av) C_noret;
C_noret_decl(f_8023)
static void C_fcall f_8023(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_8093)
static void C_ccall f_8093(C_word c,C_word *av) C_noret;
C_noret_decl(f_8095)
static void C_ccall f_8095(C_word c,C_word *av) C_noret;
C_noret_decl(f_8099)
static void C_ccall f_8099(C_word c,C_word *av) C_noret;
C_noret_decl(f_8156)
static void C_ccall f_8156(C_word c,C_word *av) C_noret;
C_noret_decl(f_8158)
static void C_ccall f_8158(C_word c,C_word *av) C_noret;
C_noret_decl(f_8162)
static void C_ccall f_8162(C_word c,C_word *av) C_noret;
C_noret_decl(f_8239)
static void C_ccall f_8239(C_word c,C_word *av) C_noret;
C_noret_decl(f_8243)
static void C_ccall f_8243(C_word c,C_word *av) C_noret;
C_noret_decl(f_8329)
static void C_ccall f_8329(C_word c,C_word *av) C_noret;
C_noret_decl(f_8363)
static void C_ccall f_8363(C_word c,C_word *av) C_noret;
C_noret_decl(f_8369)
static void C_fcall f_8369(C_word t0,C_word t1) C_noret;
C_noret_decl(f_8403)
static void C_ccall f_8403(C_word c,C_word *av) C_noret;
C_noret_decl(f_8417)
static void C_ccall f_8417(C_word c,C_word *av) C_noret;
C_noret_decl(f_8424)
static void C_ccall f_8424(C_word c,C_word *av) C_noret;
C_noret_decl(f_8430)
static void C_fcall f_8430(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_8448)
static void C_ccall f_8448(C_word c,C_word *av) C_noret;
C_noret_decl(f_8452)
static void C_ccall f_8452(C_word c,C_word *av) C_noret;
C_noret_decl(f_8456)
static void C_ccall f_8456(C_word c,C_word *av) C_noret;
C_noret_decl(f_8463)
static void C_ccall f_8463(C_word c,C_word *av) C_noret;
C_noret_decl(f_8471)
static void C_ccall f_8471(C_word c,C_word *av) C_noret;
C_noret_decl(f_8475)
static void C_ccall f_8475(C_word c,C_word *av) C_noret;
C_noret_decl(f_8479)
static void C_ccall f_8479(C_word c,C_word *av) C_noret;
C_noret_decl(f_8483)
static void C_ccall f_8483(C_word c,C_word *av) C_noret;
C_noret_decl(f_8487)
static void C_ccall f_8487(C_word c,C_word *av) C_noret;
C_noret_decl(f_8491)
static void C_ccall f_8491(C_word c,C_word *av) C_noret;
C_noret_decl(f_8495)
static void C_ccall f_8495(C_word c,C_word *av) C_noret;
C_noret_decl(f_8504)
static void C_ccall f_8504(C_word c,C_word *av) C_noret;
C_noret_decl(f_8512)
static void C_ccall f_8512(C_word c,C_word *av) C_noret;
C_noret_decl(f_8521)
static void C_ccall f_8521(C_word c,C_word *av) C_noret;
C_noret_decl(f_8579)
static void C_fcall f_8579(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_8583)
static void C_ccall f_8583(C_word c,C_word *av) C_noret;
C_noret_decl(f_8597)
static void C_fcall f_8597(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_8601)
static void C_ccall f_8601(C_word c,C_word *av) C_noret;
C_noret_decl(f_8614)
static void C_ccall f_8614(C_word c,C_word *av) C_noret;
C_noret_decl(f_8625)
static void C_ccall f_8625(C_word c,C_word *av) C_noret;
C_noret_decl(f_8627)
static void C_fcall f_8627(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 *av) C_noret;
C_noret_decl(f_8647)
static void C_ccall f_8647(C_word c,C_word *av) C_noret;
C_noret_decl(f_8654)
static void C_ccall f_8654(C_word c,C_word *av) C_noret;
C_noret_decl(f_8693)
static void C_ccall f_8693(C_word c,C_word *av) C_noret;
C_noret_decl(f_8720)
static void C_ccall f_8720(C_word c,C_word *av) C_noret;
C_noret_decl(f_8748)
static void C_ccall f_8748(C_word c,C_word *av) C_noret;
C_noret_decl(f_8761)
static void C_fcall f_8761(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_8804)
static void C_fcall f_8804(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_8861)
static void C_fcall f_8861(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_8899)
static void C_fcall f_8899(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_8902)
static void C_fcall f_8902(C_word t0,C_word t1) C_noret;
C_noret_decl(f_8910)
static void C_ccall f_8910(C_word c,C_word *av) C_noret;
C_noret_decl(f_8923)
static void C_ccall f_8923(C_word c,C_word *av) C_noret;
C_noret_decl(f_8942)
static void C_ccall f_8942(C_word c,C_word *av) C_noret;
C_noret_decl(f_9039)
static void C_fcall f_9039(C_word t0,C_word t1) C_noret;
C_noret_decl(f_9047)
static void C_ccall f_9047(C_word c,C_word *av) C_noret;
C_noret_decl(f_9049)
static void C_ccall f_9049(C_word c,C_word *av) C_noret;
C_noret_decl(f_9063)
static void C_ccall f_9063(C_word c,C_word *av) C_noret;
C_noret_decl(f_9068)
static C_word C_fcall f_9068(C_word t0,C_word t1,C_word t2);
C_noret_decl(f_9089)
static void C_fcall f_9089(C_word t0,C_word t1) C_noret;
C_noret_decl(f_9105)
static void C_fcall f_9105(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9126)
static void C_fcall f_9126(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_9132)
static void C_fcall f_9132(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_9145)
static void C_ccall f_9145(C_word c,C_word *av) C_noret;
C_noret_decl(f_9187)
static void C_fcall f_9187(C_word t0,C_word t1) C_noret;
C_noret_decl(f_9202)
static C_word C_fcall f_9202(C_word t0);
C_noret_decl(f_9225)
static void C_fcall f_9225(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_9241)
static void C_fcall f_9241(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9254)
static void C_ccall f_9254(C_word c,C_word *av) C_noret;
C_noret_decl(f_9268)
static void C_fcall f_9268(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_9286)
static void C_fcall f_9286(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9302)
static void C_ccall f_9302(C_word c,C_word *av) C_noret;
C_noret_decl(f_9313)
static void C_fcall f_9313(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9319)
static void C_fcall f_9319(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9337)
static void C_ccall f_9337(C_word c,C_word *av) C_noret;
C_noret_decl(f_9643)
static void C_ccall f_9643(C_word c,C_word *av) C_noret;
C_noret_decl(f_9652)
static void C_ccall f_9652(C_word c,C_word *av) C_noret;
C_noret_decl(f_9670)
static void C_fcall f_9670(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9677)
static void C_fcall f_9677(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9704)
static void C_fcall f_9704(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9710)
static void C_ccall f_9710(C_word c,C_word *av) C_noret;
C_noret_decl(f_9724)
static void C_ccall f_9724(C_word c,C_word *av) C_noret;
C_noret_decl(f_9744)
static void C_ccall f_9744(C_word c,C_word *av) C_noret;
C_noret_decl(f_9750)
static void C_ccall f_9750(C_word c,C_word *av) C_noret;
C_noret_decl(f_9767)
static void C_ccall f_9767(C_word c,C_word *av) C_noret;
C_noret_decl(f_9771)
static void C_ccall f_9771(C_word c,C_word *av) C_noret;
C_noret_decl(f_9818)
static void C_fcall f_9818(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_9867)
static void C_ccall f_9867(C_word c,C_word *av) C_noret;
C_noret_decl(f_9895)
static void C_fcall f_9895(C_word t0,C_word t1) C_noret;
C_noret_decl(f_9906)
static void C_ccall f_9906(C_word c,C_word *av) C_noret;
C_noret_decl(f_9952)
static void C_fcall f_9952(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_9955)
static void C_fcall f_9955(C_word t0,C_word t1) C_noret;
C_noret_decl(f_9969)
static void C_ccall f_9969(C_word c,C_word *av) C_noret;
C_noret_decl(f_9994)
static void C_ccall f_9994(C_word c,C_word *av) C_noret;
C_noret_decl(C_irregex_toplevel)
C_externexport void C_ccall C_irregex_toplevel(C_word c,C_word *av) C_noret;

C_noret_decl(trf_10171)
static void C_ccall trf_10171(C_word c,C_word *av) C_noret;
static void C_ccall trf_10171(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_10171(t0,t1,t2);}

C_noret_decl(trf_10181)
static void C_ccall trf_10181(C_word c,C_word *av) C_noret;
static void C_ccall trf_10181(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_10181(t0,t1);}

C_noret_decl(trf_10263)
static void C_ccall trf_10263(C_word c,C_word *av) C_noret;
static void C_ccall trf_10263(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_10263(t0,t1);}

C_noret_decl(trf_10269)
static void C_ccall trf_10269(C_word c,C_word *av) C_noret;
static void C_ccall trf_10269(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_10269(t0,t1,t2,t3);}

C_noret_decl(trf_10287)
static void C_ccall trf_10287(C_word c,C_word *av) C_noret;
static void C_ccall trf_10287(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_10287(t0,t1);}

C_noret_decl(trf_10298)
static void C_ccall trf_10298(C_word c,C_word *av) C_noret;
static void C_ccall trf_10298(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_10298(t0,t1);}

C_noret_decl(trf_10413)
static void C_ccall trf_10413(C_word c,C_word *av) C_noret;
static void C_ccall trf_10413(C_word c,C_word *av){
C_word t0=av[6];
C_word t1=av[5];
C_word t2=av[4];
C_word t3=av[3];
C_word t4=av[2];
C_word t5=av[1];
C_word t6=av[0];
f_10413(t0,t1,t2,t3,t4,t5,t6);}

C_noret_decl(trf_10438)
static void C_ccall trf_10438(C_word c,C_word *av) C_noret;
static void C_ccall trf_10438(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_10438(t0,t1,t2);}

C_noret_decl(trf_10460)
static void C_ccall trf_10460(C_word c,C_word *av) C_noret;
static void C_ccall trf_10460(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_10460(t0,t1,t2);}

C_noret_decl(trf_10494)
static void C_ccall trf_10494(C_word c,C_word *av) C_noret;
static void C_ccall trf_10494(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_10494(t0,t1);}

C_noret_decl(trf_10514)
static void C_ccall trf_10514(C_word c,C_word *av) C_noret;
static void C_ccall trf_10514(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_10514(t0,t1);}

C_noret_decl(trf_10530)
static void C_ccall trf_10530(C_word c,C_word *av) C_noret;
static void C_ccall trf_10530(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_10530(t0,t1);}

C_noret_decl(trf_10586)
static void C_ccall trf_10586(C_word c,C_word *av) C_noret;
static void C_ccall trf_10586(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_10586(t0,t1);}

C_noret_decl(trf_10593)
static void C_ccall trf_10593(C_word c,C_word *av) C_noret;
static void C_ccall trf_10593(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_10593(t0,t1);}

C_noret_decl(trf_10596)
static void C_ccall trf_10596(C_word c,C_word *av) C_noret;
static void C_ccall trf_10596(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_10596(t0,t1);}

C_noret_decl(trf_10604)
static void C_ccall trf_10604(C_word c,C_word *av) C_noret;
static void C_ccall trf_10604(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_10604(t0,t1,t2,t3,t4);}

C_noret_decl(trf_10819)
static void C_ccall trf_10819(C_word c,C_word *av) C_noret;
static void C_ccall trf_10819(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_10819(t0,t1);}

C_noret_decl(trf_10920)
static void C_ccall trf_10920(C_word c,C_word *av) C_noret;
static void C_ccall trf_10920(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_10920(t0,t1);}

C_noret_decl(trf_11183)
static void C_ccall trf_11183(C_word c,C_word *av) C_noret;
static void C_ccall trf_11183(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_11183(t0,t1);}

C_noret_decl(trf_11640)
static void C_ccall trf_11640(C_word c,C_word *av) C_noret;
static void C_ccall trf_11640(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_11640(t0,t1,t2,t3,t4);}

C_noret_decl(trf_11976)
static void C_ccall trf_11976(C_word c,C_word *av) C_noret;
static void C_ccall trf_11976(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_11976(t0,t1);}

C_noret_decl(trf_12019)
static void C_ccall trf_12019(C_word c,C_word *av) C_noret;
static void C_ccall trf_12019(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_12019(t0,t1);}

C_noret_decl(trf_12626)
static void C_ccall trf_12626(C_word c,C_word *av) C_noret;
static void C_ccall trf_12626(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_12626(t0,t1);}

C_noret_decl(trf_12706)
static void C_ccall trf_12706(C_word c,C_word *av) C_noret;
static void C_ccall trf_12706(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_12706(t0,t1,t2);}

C_noret_decl(trf_13226)
static void C_ccall trf_13226(C_word c,C_word *av) C_noret;
static void C_ccall trf_13226(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_13226(t0,t1,t2,t3);}

C_noret_decl(trf_13335)
static void C_ccall trf_13335(C_word c,C_word *av) C_noret;
static void C_ccall trf_13335(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_13335(t0,t1,t2,t3,t4);}

C_noret_decl(trf_13408)
static void C_ccall trf_13408(C_word c,C_word *av) C_noret;
static void C_ccall trf_13408(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_13408(t0,t1);}

C_noret_decl(trf_13485)
static void C_ccall trf_13485(C_word c,C_word *av) C_noret;
static void C_ccall trf_13485(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_13485(t0,t1);}

C_noret_decl(trf_13497)
static void C_ccall trf_13497(C_word c,C_word *av) C_noret;
static void C_ccall trf_13497(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_13497(t0,t1);}

C_noret_decl(trf_13619)
static void C_ccall trf_13619(C_word c,C_word *av) C_noret;
static void C_ccall trf_13619(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_13619(t0,t1);}

C_noret_decl(trf_13732)
static void C_ccall trf_13732(C_word c,C_word *av) C_noret;
static void C_ccall trf_13732(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_13732(t0,t1);}

C_noret_decl(trf_13849)
static void C_ccall trf_13849(C_word c,C_word *av) C_noret;
static void C_ccall trf_13849(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_13849(t0,t1);}

C_noret_decl(trf_13960)
static void C_ccall trf_13960(C_word c,C_word *av) C_noret;
static void C_ccall trf_13960(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_13960(t0,t1,t2,t3);}

C_noret_decl(trf_14155)
static void C_ccall trf_14155(C_word c,C_word *av) C_noret;
static void C_ccall trf_14155(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_14155(t0,t1,t2);}

C_noret_decl(trf_14193)
static void C_ccall trf_14193(C_word c,C_word *av) C_noret;
static void C_ccall trf_14193(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_14193(t0,t1);}

C_noret_decl(trf_14269)
static void C_ccall trf_14269(C_word c,C_word *av) C_noret;
static void C_ccall trf_14269(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_14269(t0,t1);}

C_noret_decl(trf_14439)
static void C_ccall trf_14439(C_word c,C_word *av) C_noret;
static void C_ccall trf_14439(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_14439(t0,t1,t2,t3);}

C_noret_decl(trf_14545)
static void C_ccall trf_14545(C_word c,C_word *av) C_noret;
static void C_ccall trf_14545(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_14545(t0,t1,t2,t3,t4);}

C_noret_decl(trf_14611)
static void C_ccall trf_14611(C_word c,C_word *av) C_noret;
static void C_ccall trf_14611(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_14611(t0,t1,t2);}

C_noret_decl(trf_14647)
static void C_ccall trf_14647(C_word c,C_word *av) C_noret;
static void C_ccall trf_14647(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_14647(t0,t1,t2);}

C_noret_decl(trf_14683)
static void C_ccall trf_14683(C_word c,C_word *av) C_noret;
static void C_ccall trf_14683(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_14683(t0,t1);}

C_noret_decl(trf_14768)
static void C_ccall trf_14768(C_word c,C_word *av) C_noret;
static void C_ccall trf_14768(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_14768(t0,t1,t2);}

C_noret_decl(trf_14822)
static void C_ccall trf_14822(C_word c,C_word *av) C_noret;
static void C_ccall trf_14822(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_14822(t0,t1);}

C_noret_decl(trf_14907)
static void C_ccall trf_14907(C_word c,C_word *av) C_noret;
static void C_ccall trf_14907(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_14907(t0,t1,t2);}

C_noret_decl(trf_14981)
static void C_ccall trf_14981(C_word c,C_word *av) C_noret;
static void C_ccall trf_14981(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_14981(t0,t1,t2);}

C_noret_decl(trf_14993)
static void C_ccall trf_14993(C_word c,C_word *av) C_noret;
static void C_ccall trf_14993(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_14993(t0,t1);}

C_noret_decl(trf_15013)
static void C_ccall trf_15013(C_word c,C_word *av) C_noret;
static void C_ccall trf_15013(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_15013(t0,t1,t2);}

C_noret_decl(trf_15116)
static void C_ccall trf_15116(C_word c,C_word *av) C_noret;
static void C_ccall trf_15116(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_15116(t0,t1,t2);}

C_noret_decl(trf_15184)
static void C_ccall trf_15184(C_word c,C_word *av) C_noret;
static void C_ccall trf_15184(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_15184(t0,t1,t2);}

C_noret_decl(trf_15254)
static void C_ccall trf_15254(C_word c,C_word *av) C_noret;
static void C_ccall trf_15254(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_15254(t0,t1,t2);}

C_noret_decl(trf_15345)
static void C_ccall trf_15345(C_word c,C_word *av) C_noret;
static void C_ccall trf_15345(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_15345(t0,t1,t2);}

C_noret_decl(trf_15400)
static void C_ccall trf_15400(C_word c,C_word *av) C_noret;
static void C_ccall trf_15400(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_15400(t0,t1);}

C_noret_decl(trf_15410)
static void C_ccall trf_15410(C_word c,C_word *av) C_noret;
static void C_ccall trf_15410(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_15410(t0,t1,t2,t3,t4);}

C_noret_decl(trf_15455)
static void C_ccall trf_15455(C_word c,C_word *av) C_noret;
static void C_ccall trf_15455(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_15455(t0,t1);}

C_noret_decl(trf_15522)
static void C_ccall trf_15522(C_word c,C_word *av) C_noret;
static void C_ccall trf_15522(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_15522(t0,t1,t2,t3,t4);}

C_noret_decl(trf_15525)
static void C_ccall trf_15525(C_word c,C_word *av) C_noret;
static void C_ccall trf_15525(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_15525(t0,t1,t2);}

C_noret_decl(trf_15582)
static void C_ccall trf_15582(C_word c,C_word *av) C_noret;
static void C_ccall trf_15582(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_15582(t0,t1,t2);}

C_noret_decl(trf_15595)
static void C_ccall trf_15595(C_word c,C_word *av) C_noret;
static void C_ccall trf_15595(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_15595(t0,t1,t2);}

C_noret_decl(trf_15643)
static void C_ccall trf_15643(C_word c,C_word *av) C_noret;
static void C_ccall trf_15643(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_15643(t0,t1,t2);}

C_noret_decl(trf_15656)
static void C_ccall trf_15656(C_word c,C_word *av) C_noret;
static void C_ccall trf_15656(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_15656(t0,t1,t2);}

C_noret_decl(trf_15697)
static void C_ccall trf_15697(C_word c,C_word *av) C_noret;
static void C_ccall trf_15697(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_15697(t0,t1);}

C_noret_decl(trf_15766)
static void C_ccall trf_15766(C_word c,C_word *av) C_noret;
static void C_ccall trf_15766(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_15766(t0,t1,t2);}

C_noret_decl(trf_15822)
static void C_ccall trf_15822(C_word c,C_word *av) C_noret;
static void C_ccall trf_15822(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_15822(t0,t1,t2);}

C_noret_decl(trf_15905)
static void C_ccall trf_15905(C_word c,C_word *av) C_noret;
static void C_ccall trf_15905(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_15905(t0,t1);}

C_noret_decl(trf_15920)
static void C_ccall trf_15920(C_word c,C_word *av) C_noret;
static void C_ccall trf_15920(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_15920(t0,t1,t2);}

C_noret_decl(trf_16170)
static void C_ccall trf_16170(C_word c,C_word *av) C_noret;
static void C_ccall trf_16170(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_16170(t0,t1,t2);}

C_noret_decl(trf_16200)
static void C_ccall trf_16200(C_word c,C_word *av) C_noret;
static void C_ccall trf_16200(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_16200(t0,t1,t2);}

C_noret_decl(trf_16255)
static void C_ccall trf_16255(C_word c,C_word *av) C_noret;
static void C_ccall trf_16255(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_16255(t0,t1);}

C_noret_decl(trf_16298)
static void C_ccall trf_16298(C_word c,C_word *av) C_noret;
static void C_ccall trf_16298(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_16298(t0,t1);}

C_noret_decl(trf_16428)
static void C_ccall trf_16428(C_word c,C_word *av) C_noret;
static void C_ccall trf_16428(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_16428(t0,t1);}

C_noret_decl(trf_16568)
static void C_ccall trf_16568(C_word c,C_word *av) C_noret;
static void C_ccall trf_16568(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_16568(t0,t1);}

C_noret_decl(trf_16681)
static void C_ccall trf_16681(C_word c,C_word *av) C_noret;
static void C_ccall trf_16681(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_16681(t0,t1);}

C_noret_decl(trf_16798)
static void C_ccall trf_16798(C_word c,C_word *av) C_noret;
static void C_ccall trf_16798(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_16798(t0,t1);}

C_noret_decl(trf_16913)
static void C_ccall trf_16913(C_word c,C_word *av) C_noret;
static void C_ccall trf_16913(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_16913(t0,t1);}

C_noret_decl(trf_16946)
static void C_ccall trf_16946(C_word c,C_word *av) C_noret;
static void C_ccall trf_16946(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_16946(t0,t1);}

C_noret_decl(trf_17025)
static void C_ccall trf_17025(C_word c,C_word *av) C_noret;
static void C_ccall trf_17025(C_word c,C_word *av){
C_word t0=av[6];
C_word t1=av[5];
C_word t2=av[4];
C_word t3=av[3];
C_word t4=av[2];
C_word t5=av[1];
C_word t6=av[0];
f_17025(t0,t1,t2,t3,t4,t5,t6);}

C_noret_decl(trf_17028)
static void C_ccall trf_17028(C_word c,C_word *av) C_noret;
static void C_ccall trf_17028(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_17028(t0,t1,t2);}

C_noret_decl(trf_17068)
static void C_ccall trf_17068(C_word c,C_word *av) C_noret;
static void C_ccall trf_17068(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_17068(t0,t1);}

C_noret_decl(trf_17097)
static void C_ccall trf_17097(C_word c,C_word *av) C_noret;
static void C_ccall trf_17097(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_17097(t0,t1);}

C_noret_decl(trf_17104)
static void C_ccall trf_17104(C_word c,C_word *av) C_noret;
static void C_ccall trf_17104(C_word c,C_word *av){
C_word t0=av[5];
C_word t1=av[4];
C_word t2=av[3];
C_word t3=av[2];
C_word t4=av[1];
C_word t5=av[0];
f_17104(t0,t1,t2,t3,t4,t5);}

C_noret_decl(trf_17182)
static void C_ccall trf_17182(C_word c,C_word *av) C_noret;
static void C_ccall trf_17182(C_word c,C_word *av){
C_word t0=av[5];
C_word t1=av[4];
C_word t2=av[3];
C_word t3=av[2];
C_word t4=av[1];
C_word t5=av[0];
f_17182(t0,t1,t2,t3,t4,t5);}

C_noret_decl(trf_17285)
static void C_ccall trf_17285(C_word c,C_word *av) C_noret;
static void C_ccall trf_17285(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_17285(t0,t1);}

C_noret_decl(trf_17421)
static void C_ccall trf_17421(C_word c,C_word *av) C_noret;
static void C_ccall trf_17421(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_17421(t0,t1);}

C_noret_decl(trf_17479)
static void C_ccall trf_17479(C_word c,C_word *av) C_noret;
static void C_ccall trf_17479(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_17479(t0,t1);}

C_noret_decl(trf_17606)
static void C_ccall trf_17606(C_word c,C_word *av) C_noret;
static void C_ccall trf_17606(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_17606(t0,t1);}

C_noret_decl(trf_17609)
static void C_ccall trf_17609(C_word c,C_word *av) C_noret;
static void C_ccall trf_17609(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_17609(t0,t1);}

C_noret_decl(trf_17801)
static void C_ccall trf_17801(C_word c,C_word *av) C_noret;
static void C_ccall trf_17801(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_17801(t0,t1);}

C_noret_decl(trf_17820)
static void C_ccall trf_17820(C_word c,C_word *av) C_noret;
static void C_ccall trf_17820(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_17820(t0,t1);}

C_noret_decl(trf_17841)
static void C_ccall trf_17841(C_word c,C_word *av) C_noret;
static void C_ccall trf_17841(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_17841(t0,t1);}

C_noret_decl(trf_17851)
static void C_ccall trf_17851(C_word c,C_word *av) C_noret;
static void C_ccall trf_17851(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_17851(t0,t1,t2);}

C_noret_decl(trf_18241)
static void C_ccall trf_18241(C_word c,C_word *av) C_noret;
static void C_ccall trf_18241(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_18241(t0,t1,t2);}

C_noret_decl(trf_18301)
static void C_ccall trf_18301(C_word c,C_word *av) C_noret;
static void C_ccall trf_18301(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_18301(t0,t1,t2,t3);}

C_noret_decl(trf_18349)
static void C_ccall trf_18349(C_word c,C_word *av) C_noret;
static void C_ccall trf_18349(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_18349(t0,t1,t2,t3);}

C_noret_decl(trf_18451)
static void C_ccall trf_18451(C_word c,C_word *av) C_noret;
static void C_ccall trf_18451(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_18451(t0,t1);}

C_noret_decl(trf_18635)
static void C_ccall trf_18635(C_word c,C_word *av) C_noret;
static void C_ccall trf_18635(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_18635(t0,t1,t2,t3);}

C_noret_decl(trf_18684)
static void C_ccall trf_18684(C_word c,C_word *av) C_noret;
static void C_ccall trf_18684(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_18684(t0,t1);}

C_noret_decl(trf_18756)
static void C_ccall trf_18756(C_word c,C_word *av) C_noret;
static void C_ccall trf_18756(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_18756(t0,t1,t2);}

C_noret_decl(trf_18864)
static void C_ccall trf_18864(C_word c,C_word *av) C_noret;
static void C_ccall trf_18864(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_18864(t0,t1);}

C_noret_decl(trf_18984)
static void C_ccall trf_18984(C_word c,C_word *av) C_noret;
static void C_ccall trf_18984(C_word c,C_word *av){
C_word t0=av[6];
C_word t1=av[5];
C_word t2=av[4];
C_word t3=av[3];
C_word t4=av[2];
C_word t5=av[1];
C_word t6=av[0];
f_18984(t0,t1,t2,t3,t4,t5,t6);}

C_noret_decl(trf_19045)
static void C_ccall trf_19045(C_word c,C_word *av) C_noret;
static void C_ccall trf_19045(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_19045(t0,t1,t2,t3);}

C_noret_decl(trf_19054)
static void C_ccall trf_19054(C_word c,C_word *av) C_noret;
static void C_ccall trf_19054(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_19054(t0,t1,t2);}

C_noret_decl(trf_19159)
static void C_ccall trf_19159(C_word c,C_word *av) C_noret;
static void C_ccall trf_19159(C_word c,C_word *av){
C_word t0=av[5];
C_word t1=av[4];
C_word t2=av[3];
C_word t3=av[2];
C_word t4=av[1];
C_word t5=av[0];
f_19159(t0,t1,t2,t3,t4,t5);}

C_noret_decl(trf_19246)
static void C_ccall trf_19246(C_word c,C_word *av) C_noret;
static void C_ccall trf_19246(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_19246(t0,t1);}

C_noret_decl(trf_19449)
static void C_ccall trf_19449(C_word c,C_word *av) C_noret;
static void C_ccall trf_19449(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_19449(t0,t1,t2);}

C_noret_decl(trf_19459)
static void C_ccall trf_19459(C_word c,C_word *av) C_noret;
static void C_ccall trf_19459(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_19459(t0,t1);}

C_noret_decl(trf_19609)
static void C_ccall trf_19609(C_word c,C_word *av) C_noret;
static void C_ccall trf_19609(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_19609(t0,t1,t2,t3,t4);}

C_noret_decl(trf_19624)
static void C_ccall trf_19624(C_word c,C_word *av) C_noret;
static void C_ccall trf_19624(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_19624(t0,t1,t2,t3);}

C_noret_decl(trf_19747)
static void C_ccall trf_19747(C_word c,C_word *av) C_noret;
static void C_ccall trf_19747(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_19747(t0,t1,t2,t3);}

C_noret_decl(trf_19807)
static void C_ccall trf_19807(C_word c,C_word *av) C_noret;
static void C_ccall trf_19807(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_19807(t0,t1,t2);}

C_noret_decl(trf_19844)
static void C_ccall trf_19844(C_word c,C_word *av) C_noret;
static void C_ccall trf_19844(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_19844(t0,t1,t2);}

C_noret_decl(trf_19866)
static void C_ccall trf_19866(C_word c,C_word *av) C_noret;
static void C_ccall trf_19866(C_word c,C_word *av){
C_word t0=av[8];
C_word t1=av[7];
C_word t2=av[6];
C_word t3=av[5];
C_word t4=av[4];
C_word t5=av[3];
C_word t6=av[2];
C_word t7=av[1];
C_word t8=av[0];
f_19866(t0,t1,t2,t3,t4,t5,t6,t7,t8);}

C_noret_decl(trf_19903)
static void C_ccall trf_19903(C_word c,C_word *av) C_noret;
static void C_ccall trf_19903(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_19903(t0,t1);}

C_noret_decl(trf_19919)
static void C_ccall trf_19919(C_word c,C_word *av) C_noret;
static void C_ccall trf_19919(C_word c,C_word *av){
C_word t0=av[7];
C_word t1=av[6];
C_word t2=av[5];
C_word t3=av[4];
C_word t4=av[3];
C_word t5=av[2];
C_word t6=av[1];
C_word t7=av[0];
f_19919(t0,t1,t2,t3,t4,t5,t6,t7);}

C_noret_decl(trf_19931)
static void C_ccall trf_19931(C_word c,C_word *av) C_noret;
static void C_ccall trf_19931(C_word c,C_word *av){
C_word t0=av[6];
C_word t1=av[5];
C_word t2=av[4];
C_word t3=av[3];
C_word t4=av[2];
C_word t5=av[1];
C_word t6=av[0];
f_19931(t0,t1,t2,t3,t4,t5,t6);}

C_noret_decl(trf_19941)
static void C_ccall trf_19941(C_word c,C_word *av) C_noret;
static void C_ccall trf_19941(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_19941(t0,t1);}

C_noret_decl(trf_20053)
static void C_ccall trf_20053(C_word c,C_word *av) C_noret;
static void C_ccall trf_20053(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_20053(t0,t1);}

C_noret_decl(trf_20165)
static void C_ccall trf_20165(C_word c,C_word *av) C_noret;
static void C_ccall trf_20165(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_20165(t0,t1,t2);}

C_noret_decl(trf_20201)
static void C_ccall trf_20201(C_word c,C_word *av) C_noret;
static void C_ccall trf_20201(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_20201(t0,t1);}

C_noret_decl(trf_20243)
static void C_ccall trf_20243(C_word c,C_word *av) C_noret;
static void C_ccall trf_20243(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_20243(t0,t1);}

C_noret_decl(trf_20339)
static void C_ccall trf_20339(C_word c,C_word *av) C_noret;
static void C_ccall trf_20339(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_20339(t0,t1,t2);}

C_noret_decl(trf_20639)
static void C_ccall trf_20639(C_word c,C_word *av) C_noret;
static void C_ccall trf_20639(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_20639(t0,t1,t2);}

C_noret_decl(trf_20648)
static void C_ccall trf_20648(C_word c,C_word *av) C_noret;
static void C_ccall trf_20648(C_word c,C_word *av){
C_word t0=av[5];
C_word t1=av[4];
C_word t2=av[3];
C_word t3=av[2];
C_word t4=av[1];
C_word t5=av[0];
f_20648(t0,t1,t2,t3,t4,t5);}

C_noret_decl(trf_20651)
static void C_ccall trf_20651(C_word c,C_word *av) C_noret;
static void C_ccall trf_20651(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_20651(t0,t1,t2);}

C_noret_decl(trf_20661)
static void C_ccall trf_20661(C_word c,C_word *av) C_noret;
static void C_ccall trf_20661(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_20661(t0,t1,t2,t3);}

C_noret_decl(trf_20665)
static void C_ccall trf_20665(C_word c,C_word *av) C_noret;
static void C_ccall trf_20665(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_20665(t0,t1);}

C_noret_decl(trf_20686)
static void C_ccall trf_20686(C_word c,C_word *av) C_noret;
static void C_ccall trf_20686(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_20686(t0,t1,t2);}

C_noret_decl(trf_20722)
static void C_ccall trf_20722(C_word c,C_word *av) C_noret;
static void C_ccall trf_20722(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_20722(t0,t1,t2,t3);}

C_noret_decl(trf_20739)
static void C_ccall trf_20739(C_word c,C_word *av) C_noret;
static void C_ccall trf_20739(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_20739(t0,t1,t2,t3);}

C_noret_decl(trf_20827)
static void C_ccall trf_20827(C_word c,C_word *av) C_noret;
static void C_ccall trf_20827(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_20827(t0,t1,t2,t3);}

C_noret_decl(trf_20991)
static void C_ccall trf_20991(C_word c,C_word *av) C_noret;
static void C_ccall trf_20991(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_20991(t0,t1);}

C_noret_decl(trf_21038)
static void C_ccall trf_21038(C_word c,C_word *av) C_noret;
static void C_ccall trf_21038(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_21038(t0,t1);}

C_noret_decl(trf_21392)
static void C_ccall trf_21392(C_word c,C_word *av) C_noret;
static void C_ccall trf_21392(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_21392(t0,t1,t2);}

C_noret_decl(trf_21555)
static void C_ccall trf_21555(C_word c,C_word *av) C_noret;
static void C_ccall trf_21555(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_21555(t0,t1,t2);}

C_noret_decl(trf_21594)
static void C_ccall trf_21594(C_word c,C_word *av) C_noret;
static void C_ccall trf_21594(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_21594(t0,t1,t2,t3,t4);}

C_noret_decl(trf_21629)
static void C_ccall trf_21629(C_word c,C_word *av) C_noret;
static void C_ccall trf_21629(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_21629(t0,t1);}

C_noret_decl(trf_21758)
static void C_ccall trf_21758(C_word c,C_word *av) C_noret;
static void C_ccall trf_21758(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_21758(t0,t1);}

C_noret_decl(trf_21787)
static void C_ccall trf_21787(C_word c,C_word *av) C_noret;
static void C_ccall trf_21787(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_21787(t0,t1);}

C_noret_decl(trf_21804)
static void C_ccall trf_21804(C_word c,C_word *av) C_noret;
static void C_ccall trf_21804(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_21804(t0,t1,t2,t3);}

C_noret_decl(trf_21813)
static void C_ccall trf_21813(C_word c,C_word *av) C_noret;
static void C_ccall trf_21813(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_21813(t0,t1,t2,t3,t4);}

C_noret_decl(trf_21820)
static void C_ccall trf_21820(C_word c,C_word *av) C_noret;
static void C_ccall trf_21820(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_21820(t0,t1);}

C_noret_decl(trf_21875)
static void C_ccall trf_21875(C_word c,C_word *av) C_noret;
static void C_ccall trf_21875(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_21875(t0,t1,t2);}

C_noret_decl(trf_21982)
static void C_ccall trf_21982(C_word c,C_word *av) C_noret;
static void C_ccall trf_21982(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_21982(t0,t1);}

C_noret_decl(trf_21988)
static void C_ccall trf_21988(C_word c,C_word *av) C_noret;
static void C_ccall trf_21988(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_21988(t0,t1);}

C_noret_decl(trf_22041)
static void C_ccall trf_22041(C_word c,C_word *av) C_noret;
static void C_ccall trf_22041(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_22041(t0,t1,t2,t3);}

C_noret_decl(trf_22112)
static void C_ccall trf_22112(C_word c,C_word *av) C_noret;
static void C_ccall trf_22112(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_22112(t0,t1,t2);}

C_noret_decl(trf_22165)
static void C_ccall trf_22165(C_word c,C_word *av) C_noret;
static void C_ccall trf_22165(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_22165(t0,t1,t2,t3);}

C_noret_decl(trf_22174)
static void C_ccall trf_22174(C_word c,C_word *av) C_noret;
static void C_ccall trf_22174(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_22174(t0,t1,t2,t3);}

C_noret_decl(trf_22247)
static void C_ccall trf_22247(C_word c,C_word *av) C_noret;
static void C_ccall trf_22247(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_22247(t0,t1,t2);}

C_noret_decl(trf_22279)
static void C_ccall trf_22279(C_word c,C_word *av) C_noret;
static void C_ccall trf_22279(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_22279(t0,t1,t2,t3,t4);}

C_noret_decl(trf_22335)
static void C_ccall trf_22335(C_word c,C_word *av) C_noret;
static void C_ccall trf_22335(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_22335(t0,t1,t2,t3,t4);}

C_noret_decl(trf_22366)
static void C_ccall trf_22366(C_word c,C_word *av) C_noret;
static void C_ccall trf_22366(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_22366(t0,t1);}

C_noret_decl(trf_22466)
static void C_ccall trf_22466(C_word c,C_word *av) C_noret;
static void C_ccall trf_22466(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_22466(t0,t1,t2,t3);}

C_noret_decl(trf_22499)
static void C_ccall trf_22499(C_word c,C_word *av) C_noret;
static void C_ccall trf_22499(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_22499(t0,t1,t2);}

C_noret_decl(trf_22507)
static void C_ccall trf_22507(C_word c,C_word *av) C_noret;
static void C_ccall trf_22507(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_22507(t0,t1);}

C_noret_decl(trf_22542)
static void C_ccall trf_22542(C_word c,C_word *av) C_noret;
static void C_ccall trf_22542(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_22542(t0,t1,t2);}

C_noret_decl(trf_22580)
static void C_ccall trf_22580(C_word c,C_word *av) C_noret;
static void C_ccall trf_22580(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_22580(t0,t1,t2,t3,t4);}

C_noret_decl(trf_22655)
static void C_ccall trf_22655(C_word c,C_word *av) C_noret;
static void C_ccall trf_22655(C_word c,C_word *av){
C_word t0=av[5];
C_word t1=av[4];
C_word t2=av[3];
C_word t3=av[2];
C_word t4=av[1];
C_word t5=av[0];
f_22655(t0,t1,t2,t3,t4,t5);}

C_noret_decl(trf_22696)
static void C_ccall trf_22696(C_word c,C_word *av) C_noret;
static void C_ccall trf_22696(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_22696(t0,t1,t2);}

C_noret_decl(trf_22712)
static void C_ccall trf_22712(C_word c,C_word *av) C_noret;
static void C_ccall trf_22712(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_22712(t0,t1);}

C_noret_decl(trf_22814)
static void C_ccall trf_22814(C_word c,C_word *av) C_noret;
static void C_ccall trf_22814(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_22814(t0,t1,t2,t3,t4);}

C_noret_decl(trf_22837)
static void C_ccall trf_22837(C_word c,C_word *av) C_noret;
static void C_ccall trf_22837(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_22837(t0,t1,t2,t3);}

C_noret_decl(trf_22866)
static void C_ccall trf_22866(C_word c,C_word *av) C_noret;
static void C_ccall trf_22866(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_22866(t0,t1,t2);}

C_noret_decl(trf_22870)
static void C_ccall trf_22870(C_word c,C_word *av) C_noret;
static void C_ccall trf_22870(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_22870(t0,t1);}

C_noret_decl(trf_22894)
static void C_ccall trf_22894(C_word c,C_word *av) C_noret;
static void C_ccall trf_22894(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_22894(t0,t1);}

C_noret_decl(trf_22932)
static void C_ccall trf_22932(C_word c,C_word *av) C_noret;
static void C_ccall trf_22932(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_22932(t0,t1,t2);}

C_noret_decl(trf_22947)
static void C_ccall trf_22947(C_word c,C_word *av) C_noret;
static void C_ccall trf_22947(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_22947(t0,t1,t2,t3,t4);}

C_noret_decl(trf_22962)
static void C_ccall trf_22962(C_word c,C_word *av) C_noret;
static void C_ccall trf_22962(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_22962(t0,t1,t2,t3);}

C_noret_decl(trf_22982)
static void C_ccall trf_22982(C_word c,C_word *av) C_noret;
static void C_ccall trf_22982(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_22982(t0,t1,t2,t3,t4);}

C_noret_decl(trf_23005)
static void C_ccall trf_23005(C_word c,C_word *av) C_noret;
static void C_ccall trf_23005(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_23005(t0,t1);}

C_noret_decl(trf_23114)
static void C_ccall trf_23114(C_word c,C_word *av) C_noret;
static void C_ccall trf_23114(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_23114(t0,t1,t2);}

C_noret_decl(trf_23127)
static void C_ccall trf_23127(C_word c,C_word *av) C_noret;
static void C_ccall trf_23127(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_23127(t0,t1);}

C_noret_decl(trf_23141)
static void C_ccall trf_23141(C_word c,C_word *av) C_noret;
static void C_ccall trf_23141(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_23141(t0,t1,t2,t3,t4);}

C_noret_decl(trf_23168)
static void C_ccall trf_23168(C_word c,C_word *av) C_noret;
static void C_ccall trf_23168(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_23168(t0,t1,t2,t3,t4);}

C_noret_decl(trf_23324)
static void C_ccall trf_23324(C_word c,C_word *av) C_noret;
static void C_ccall trf_23324(C_word c,C_word *av){
C_word t0=av[5];
C_word t1=av[4];
C_word t2=av[3];
C_word t3=av[2];
C_word t4=av[1];
C_word t5=av[0];
f_23324(t0,t1,t2,t3,t4,t5);}

C_noret_decl(trf_23327)
static void C_ccall trf_23327(C_word c,C_word *av) C_noret;
static void C_ccall trf_23327(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_23327(t0,t1,t2);}

C_noret_decl(trf_23366)
static void C_ccall trf_23366(C_word c,C_word *av) C_noret;
static void C_ccall trf_23366(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_23366(t0,t1);}

C_noret_decl(trf_23865)
static void C_ccall trf_23865(C_word c,C_word *av) C_noret;
static void C_ccall trf_23865(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_23865(t0,t1);}

C_noret_decl(trf_23868)
static void C_ccall trf_23868(C_word c,C_word *av) C_noret;
static void C_ccall trf_23868(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_23868(t0,t1);}

C_noret_decl(trf_24017)
static void C_ccall trf_24017(C_word c,C_word *av) C_noret;
static void C_ccall trf_24017(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_24017(t0,t1);}

C_noret_decl(trf_24020)
static void C_ccall trf_24020(C_word c,C_word *av) C_noret;
static void C_ccall trf_24020(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_24020(t0,t1);}

C_noret_decl(trf_24457)
static void C_ccall trf_24457(C_word c,C_word *av) C_noret;
static void C_ccall trf_24457(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_24457(t0,t1);}

C_noret_decl(trf_24601)
static void C_ccall trf_24601(C_word c,C_word *av) C_noret;
static void C_ccall trf_24601(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_24601(t0,t1);}

C_noret_decl(trf_24624)
static void C_ccall trf_24624(C_word c,C_word *av) C_noret;
static void C_ccall trf_24624(C_word c,C_word *av){
C_word t0=av[7];
C_word t1=av[6];
C_word t2=av[5];
C_word t3=av[4];
C_word t4=av[3];
C_word t5=av[2];
C_word t6=av[1];
C_word t7=av[0];
f_24624(t0,t1,t2,t3,t4,t5,t6,t7);}

C_noret_decl(trf_25349)
static void C_ccall trf_25349(C_word c,C_word *av) C_noret;
static void C_ccall trf_25349(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_25349(t0,t1);}

C_noret_decl(trf_25404)
static void C_ccall trf_25404(C_word c,C_word *av) C_noret;
static void C_ccall trf_25404(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_25404(t0,t1);}

C_noret_decl(trf_25413)
static void C_ccall trf_25413(C_word c,C_word *av) C_noret;
static void C_ccall trf_25413(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_25413(t0,t1);}

C_noret_decl(trf_25511)
static void C_ccall trf_25511(C_word c,C_word *av) C_noret;
static void C_ccall trf_25511(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_25511(t0,t1);}

C_noret_decl(trf_25544)
static void C_ccall trf_25544(C_word c,C_word *av) C_noret;
static void C_ccall trf_25544(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_25544(t0,t1);}

C_noret_decl(trf_25609)
static void C_ccall trf_25609(C_word c,C_word *av) C_noret;
static void C_ccall trf_25609(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_25609(t0,t1);}

C_noret_decl(trf_25618)
static void C_ccall trf_25618(C_word c,C_word *av) C_noret;
static void C_ccall trf_25618(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_25618(t0,t1);}

C_noret_decl(trf_25704)
static void C_ccall trf_25704(C_word c,C_word *av) C_noret;
static void C_ccall trf_25704(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_25704(t0,t1);}

C_noret_decl(trf_25832)
static void C_ccall trf_25832(C_word c,C_word *av) C_noret;
static void C_ccall trf_25832(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_25832(t0,t1,t2);}

C_noret_decl(trf_25931)
static void C_ccall trf_25931(C_word c,C_word *av) C_noret;
static void C_ccall trf_25931(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_25931(t0,t1,t2);}

C_noret_decl(trf_26053)
static void C_ccall trf_26053(C_word c,C_word *av) C_noret;
static void C_ccall trf_26053(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_26053(t0,t1,t2);}

C_noret_decl(trf_26266)
static void C_ccall trf_26266(C_word c,C_word *av) C_noret;
static void C_ccall trf_26266(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_26266(t0,t1);}

C_noret_decl(trf_26278)
static void C_ccall trf_26278(C_word c,C_word *av) C_noret;
static void C_ccall trf_26278(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_26278(t0,t1,t2,t3);}

C_noret_decl(trf_26328)
static void C_ccall trf_26328(C_word c,C_word *av) C_noret;
static void C_ccall trf_26328(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_26328(t0,t1,t2,t3);}

C_noret_decl(trf_26357)
static void C_ccall trf_26357(C_word c,C_word *av) C_noret;
static void C_ccall trf_26357(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_26357(t0,t1);}

C_noret_decl(trf_26377)
static void C_ccall trf_26377(C_word c,C_word *av) C_noret;
static void C_ccall trf_26377(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_26377(t0,t1,t2);}

C_noret_decl(trf_26387)
static void C_ccall trf_26387(C_word c,C_word *av) C_noret;
static void C_ccall trf_26387(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_26387(t0,t1,t2,t3);}

C_noret_decl(trf_26390)
static void C_ccall trf_26390(C_word c,C_word *av) C_noret;
static void C_ccall trf_26390(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_26390(t0,t1,t2);}

C_noret_decl(trf_26456)
static void C_ccall trf_26456(C_word c,C_word *av) C_noret;
static void C_ccall trf_26456(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_26456(t0,t1,t2);}

C_noret_decl(trf_26520)
static void C_ccall trf_26520(C_word c,C_word *av) C_noret;
static void C_ccall trf_26520(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_26520(t0,t1,t2);}

C_noret_decl(trf_26590)
static void C_ccall trf_26590(C_word c,C_word *av) C_noret;
static void C_ccall trf_26590(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_26590(t0,t1,t2);}

C_noret_decl(trf_26675)
static void C_ccall trf_26675(C_word c,C_word *av) C_noret;
static void C_ccall trf_26675(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_26675(t0,t1,t2);}

C_noret_decl(trf_26844)
static void C_ccall trf_26844(C_word c,C_word *av) C_noret;
static void C_ccall trf_26844(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_26844(t0,t1,t2);}

C_noret_decl(trf_26877)
static void C_ccall trf_26877(C_word c,C_word *av) C_noret;
static void C_ccall trf_26877(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_26877(t0,t1,t2,t3);}

C_noret_decl(trf_26979)
static void C_ccall trf_26979(C_word c,C_word *av) C_noret;
static void C_ccall trf_26979(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_26979(t0,t1,t2,t3,t4);}

C_noret_decl(trf_27160)
static void C_ccall trf_27160(C_word c,C_word *av) C_noret;
static void C_ccall trf_27160(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_27160(t0,t1,t2);}

C_noret_decl(trf_27174)
static void C_ccall trf_27174(C_word c,C_word *av) C_noret;
static void C_ccall trf_27174(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_27174(t0,t1,t2,t3,t4);}

C_noret_decl(trf_27251)
static void C_ccall trf_27251(C_word c,C_word *av) C_noret;
static void C_ccall trf_27251(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_27251(t0,t1);}

C_noret_decl(trf_27254)
static void C_ccall trf_27254(C_word c,C_word *av) C_noret;
static void C_ccall trf_27254(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_27254(t0,t1);}

C_noret_decl(trf_27261)
static void C_ccall trf_27261(C_word c,C_word *av) C_noret;
static void C_ccall trf_27261(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_27261(t0,t1);}

C_noret_decl(trf_27370)
static void C_ccall trf_27370(C_word c,C_word *av) C_noret;
static void C_ccall trf_27370(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_27370(t0,t1,t2,t3,t4);}

C_noret_decl(trf_27482)
static void C_ccall trf_27482(C_word c,C_word *av) C_noret;
static void C_ccall trf_27482(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_27482(t0,t1);}

C_noret_decl(trf_27492)
static void C_ccall trf_27492(C_word c,C_word *av) C_noret;
static void C_ccall trf_27492(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_27492(t0,t1);}

C_noret_decl(trf_27502)
static void C_ccall trf_27502(C_word c,C_word *av) C_noret;
static void C_ccall trf_27502(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_27502(t0,t1,t2,t3);}

C_noret_decl(trf_27522)
static void C_ccall trf_27522(C_word c,C_word *av) C_noret;
static void C_ccall trf_27522(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_27522(t0,t1);}

C_noret_decl(trf_27642)
static void C_ccall trf_27642(C_word c,C_word *av) C_noret;
static void C_ccall trf_27642(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_27642(t0,t1);}

C_noret_decl(trf_27645)
static void C_ccall trf_27645(C_word c,C_word *av) C_noret;
static void C_ccall trf_27645(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_27645(t0,t1);}

C_noret_decl(trf_27665)
static void C_ccall trf_27665(C_word c,C_word *av) C_noret;
static void C_ccall trf_27665(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_27665(t0,t1,t2,t3,t4);}

C_noret_decl(trf_27883)
static void C_ccall trf_27883(C_word c,C_word *av) C_noret;
static void C_ccall trf_27883(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_27883(t0,t1,t2,t3,t4);}

C_noret_decl(trf_28256)
static void C_ccall trf_28256(C_word c,C_word *av) C_noret;
static void C_ccall trf_28256(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_28256(t0,t1,t2);}

C_noret_decl(trf_28262)
static void C_ccall trf_28262(C_word c,C_word *av) C_noret;
static void C_ccall trf_28262(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_28262(t0,t1,t2,t3);}

C_noret_decl(trf_28436)
static void C_ccall trf_28436(C_word c,C_word *av) C_noret;
static void C_ccall trf_28436(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_28436(t0,t1,t2);}

C_noret_decl(trf_28532)
static void C_ccall trf_28532(C_word c,C_word *av) C_noret;
static void C_ccall trf_28532(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_28532(t0,t1);}

C_noret_decl(trf_28620)
static void C_ccall trf_28620(C_word c,C_word *av) C_noret;
static void C_ccall trf_28620(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_28620(t0,t1);}

C_noret_decl(trf_28622)
static void C_ccall trf_28622(C_word c,C_word *av) C_noret;
static void C_ccall trf_28622(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_28622(t0,t1,t2,t3,t4);}

C_noret_decl(trf_28750)
static void C_ccall trf_28750(C_word c,C_word *av) C_noret;
static void C_ccall trf_28750(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_28750(t0,t1,t2);}

C_noret_decl(trf_28794)
static void C_ccall trf_28794(C_word c,C_word *av) C_noret;
static void C_ccall trf_28794(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_28794(t0,t1,t2,t3);}

C_noret_decl(trf_28907)
static void C_ccall trf_28907(C_word c,C_word *av) C_noret;
static void C_ccall trf_28907(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_28907(t0,t1,t2);}

C_noret_decl(trf_28917)
static void C_ccall trf_28917(C_word c,C_word *av) C_noret;
static void C_ccall trf_28917(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_28917(t0,t1);}

C_noret_decl(trf_28979)
static void C_ccall trf_28979(C_word c,C_word *av) C_noret;
static void C_ccall trf_28979(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_28979(t0,t1,t2,t3);}

C_noret_decl(trf_28991)
static void C_ccall trf_28991(C_word c,C_word *av) C_noret;
static void C_ccall trf_28991(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_28991(t0,t1,t2,t3);}

C_noret_decl(trf_29104)
static void C_ccall trf_29104(C_word c,C_word *av) C_noret;
static void C_ccall trf_29104(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_29104(t0,t1);}

C_noret_decl(trf_29116)
static void C_ccall trf_29116(C_word c,C_word *av) C_noret;
static void C_ccall trf_29116(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_29116(t0,t1,t2);}

C_noret_decl(trf_29196)
static void C_ccall trf_29196(C_word c,C_word *av) C_noret;
static void C_ccall trf_29196(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_29196(t0,t1,t2);}

C_noret_decl(trf_29219)
static void C_ccall trf_29219(C_word c,C_word *av) C_noret;
static void C_ccall trf_29219(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_29219(t0,t1);}

C_noret_decl(trf_29234)
static void C_ccall trf_29234(C_word c,C_word *av) C_noret;
static void C_ccall trf_29234(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_29234(t0,t1,t2);}

C_noret_decl(trf_29264)
static void C_ccall trf_29264(C_word c,C_word *av) C_noret;
static void C_ccall trf_29264(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_29264(t0,t1,t2);}

C_noret_decl(trf_29328)
static void C_ccall trf_29328(C_word c,C_word *av) C_noret;
static void C_ccall trf_29328(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_29328(t0,t1,t2);}

C_noret_decl(trf_29378)
static void C_ccall trf_29378(C_word c,C_word *av) C_noret;
static void C_ccall trf_29378(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_29378(t0,t1,t2);}

C_noret_decl(trf_29416)
static void C_ccall trf_29416(C_word c,C_word *av) C_noret;
static void C_ccall trf_29416(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_29416(t0,t1,t2);}

C_noret_decl(trf_29437)
static void C_ccall trf_29437(C_word c,C_word *av) C_noret;
static void C_ccall trf_29437(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_29437(t0,t1,t2);}

C_noret_decl(trf_29471)
static void C_ccall trf_29471(C_word c,C_word *av) C_noret;
static void C_ccall trf_29471(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_29471(t0,t1);}

C_noret_decl(trf_29497)
static void C_ccall trf_29497(C_word c,C_word *av) C_noret;
static void C_ccall trf_29497(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_29497(t0,t1,t2);}

C_noret_decl(trf_29541)
static void C_ccall trf_29541(C_word c,C_word *av) C_noret;
static void C_ccall trf_29541(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_29541(t0,t1);}

C_noret_decl(trf_29605)
static void C_ccall trf_29605(C_word c,C_word *av) C_noret;
static void C_ccall trf_29605(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_29605(t0,t1);}

C_noret_decl(trf_29614)
static void C_ccall trf_29614(C_word c,C_word *av) C_noret;
static void C_ccall trf_29614(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_29614(t0,t1);}

C_noret_decl(trf_29708)
static void C_ccall trf_29708(C_word c,C_word *av) C_noret;
static void C_ccall trf_29708(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_29708(t0,t1,t2);}

C_noret_decl(trf_29957)
static void C_ccall trf_29957(C_word c,C_word *av) C_noret;
static void C_ccall trf_29957(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_29957(t0,t1,t2,t3);}

C_noret_decl(trf_30065)
static void C_ccall trf_30065(C_word c,C_word *av) C_noret;
static void C_ccall trf_30065(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_30065(t0,t1,t2,t3);}

C_noret_decl(trf_30114)
static void C_ccall trf_30114(C_word c,C_word *av) C_noret;
static void C_ccall trf_30114(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_30114(t0,t1);}

C_noret_decl(trf_7497)
static void C_ccall trf_7497(C_word c,C_word *av) C_noret;
static void C_ccall trf_7497(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_7497(t0,t1);}

C_noret_decl(trf_7579)
static void C_ccall trf_7579(C_word c,C_word *av) C_noret;
static void C_ccall trf_7579(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_7579(t0,t1);}

C_noret_decl(trf_7602)
static void C_ccall trf_7602(C_word c,C_word *av) C_noret;
static void C_ccall trf_7602(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_7602(t0,t1);}

C_noret_decl(trf_7611)
static void C_ccall trf_7611(C_word c,C_word *av) C_noret;
static void C_ccall trf_7611(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_7611(t0,t1);}

C_noret_decl(trf_7911)
static void C_ccall trf_7911(C_word c,C_word *av) C_noret;
static void C_ccall trf_7911(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_7911(t0,t1,t2,t3);}

C_noret_decl(trf_7979)
static void C_ccall trf_7979(C_word c,C_word *av) C_noret;
static void C_ccall trf_7979(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_7979(t0,t1);}

C_noret_decl(trf_8023)
static void C_ccall trf_8023(C_word c,C_word *av) C_noret;
static void C_ccall trf_8023(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_8023(t0,t1,t2,t3);}

C_noret_decl(trf_8369)
static void C_ccall trf_8369(C_word c,C_word *av) C_noret;
static void C_ccall trf_8369(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_8369(t0,t1);}

C_noret_decl(trf_8430)
static void C_ccall trf_8430(C_word c,C_word *av) C_noret;
static void C_ccall trf_8430(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_8430(t0,t1,t2,t3);}

C_noret_decl(trf_8579)
static void C_ccall trf_8579(C_word c,C_word *av) C_noret;
static void C_ccall trf_8579(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_8579(t0,t1,t2);}

C_noret_decl(trf_8597)
static void C_ccall trf_8597(C_word c,C_word *av) C_noret;
static void C_ccall trf_8597(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_8597(t0,t1,t2,t3);}

C_noret_decl(trf_8627)
static void C_ccall trf_8627(C_word c,C_word *av) C_noret;
static void C_ccall trf_8627(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_8627(t0,t1,t2);}

C_noret_decl(trf_8761)
static void C_ccall trf_8761(C_word c,C_word *av) C_noret;
static void C_ccall trf_8761(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_8761(t0,t1,t2);}

C_noret_decl(trf_8804)
static void C_ccall trf_8804(C_word c,C_word *av) C_noret;
static void C_ccall trf_8804(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_8804(t0,t1,t2);}

C_noret_decl(trf_8861)
static void C_ccall trf_8861(C_word c,C_word *av) C_noret;
static void C_ccall trf_8861(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_8861(t0,t1,t2);}

C_noret_decl(trf_8899)
static void C_ccall trf_8899(C_word c,C_word *av) C_noret;
static void C_ccall trf_8899(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_8899(t0,t1,t2,t3,t4);}

C_noret_decl(trf_8902)
static void C_ccall trf_8902(C_word c,C_word *av) C_noret;
static void C_ccall trf_8902(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_8902(t0,t1);}

C_noret_decl(trf_9039)
static void C_ccall trf_9039(C_word c,C_word *av) C_noret;
static void C_ccall trf_9039(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_9039(t0,t1);}

C_noret_decl(trf_9089)
static void C_ccall trf_9089(C_word c,C_word *av) C_noret;
static void C_ccall trf_9089(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_9089(t0,t1);}

C_noret_decl(trf_9105)
static void C_ccall trf_9105(C_word c,C_word *av) C_noret;
static void C_ccall trf_9105(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_9105(t0,t1,t2,t3);}

C_noret_decl(trf_9126)
static void C_ccall trf_9126(C_word c,C_word *av) C_noret;
static void C_ccall trf_9126(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_9126(t0,t1,t2);}

C_noret_decl(trf_9132)
static void C_ccall trf_9132(C_word c,C_word *av) C_noret;
static void C_ccall trf_9132(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_9132(t0,t1,t2);}

C_noret_decl(trf_9187)
static void C_ccall trf_9187(C_word c,C_word *av) C_noret;
static void C_ccall trf_9187(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_9187(t0,t1);}

C_noret_decl(trf_9225)
static void C_ccall trf_9225(C_word c,C_word *av) C_noret;
static void C_ccall trf_9225(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_9225(t0,t1,t2);}

C_noret_decl(trf_9241)
static void C_ccall trf_9241(C_word c,C_word *av) C_noret;
static void C_ccall trf_9241(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_9241(t0,t1,t2,t3);}

C_noret_decl(trf_9268)
static void C_ccall trf_9268(C_word c,C_word *av) C_noret;
static void C_ccall trf_9268(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_9268(t0,t1,t2);}

C_noret_decl(trf_9286)
static void C_ccall trf_9286(C_word c,C_word *av) C_noret;
static void C_ccall trf_9286(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_9286(t0,t1,t2,t3);}

C_noret_decl(trf_9313)
static void C_ccall trf_9313(C_word c,C_word *av) C_noret;
static void C_ccall trf_9313(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_9313(t0,t1,t2,t3);}

C_noret_decl(trf_9319)
static void C_ccall trf_9319(C_word c,C_word *av) C_noret;
static void C_ccall trf_9319(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_9319(t0,t1,t2,t3);}

C_noret_decl(trf_9670)
static void C_ccall trf_9670(C_word c,C_word *av) C_noret;
static void C_ccall trf_9670(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_9670(t0,t1,t2,t3);}

C_noret_decl(trf_9677)
static void C_ccall trf_9677(C_word c,C_word *av) C_noret;
static void C_ccall trf_9677(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_9677(t0,t1,t2,t3);}

C_noret_decl(trf_9704)
static void C_ccall trf_9704(C_word c,C_word *av) C_noret;
static void C_ccall trf_9704(C_word c,C_word *av){
C_word t0=av[3];
C_word t1=av[2];
C_word t2=av[1];
C_word t3=av[0];
f_9704(t0,t1,t2,t3);}

C_noret_decl(trf_9818)
static void C_ccall trf_9818(C_word c,C_word *av) C_noret;
static void C_ccall trf_9818(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_9818(t0,t1,t2);}

C_noret_decl(trf_9895)
static void C_ccall trf_9895(C_word c,C_word *av) C_noret;
static void C_ccall trf_9895(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_9895(t0,t1);}

C_noret_decl(trf_9952)
static void C_ccall trf_9952(C_word c,C_word *av) C_noret;
static void C_ccall trf_9952(C_word c,C_word *av){
C_word t0=av[4];
C_word t1=av[3];
C_word t2=av[2];
C_word t3=av[1];
C_word t4=av[0];
f_9952(t0,t1,t2,t3,t4);}

C_noret_decl(trf_9955)
static void C_ccall trf_9955(C_word c,C_word *av) C_noret;
static void C_ccall trf_9955(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_9955(t0,t1);}

/* f33512 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f33512(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f33512,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[124],t1);
/* irregex-core.scm:832: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10413(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* f33516 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f33516(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f33516,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[125],t1);
/* irregex-core.scm:832: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10413(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k9999 in scan */
static void C_ccall f_10001(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_10001,c,av);}
/* irregex-core.scm:662: string-cat-reverse */
f_9039(((C_word*)t0)[2],t1);}

/* k10018 in scan */
static void C_ccall f_10020(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_10020,c,av);}
/* irregex-core.scm:663: scan */
t2=((C_word*)((C_word*)t0)[2])[1];
f_9952(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* a10052 */
static void C_ccall f_10053(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_10053,c,av);}
/* irregex-core.scm:668: read */
t4=((C_word*)((C_word*)t0)[2])[1];
f_9677(t4,t1,t3,((C_word*)t0)[3]);}

/* a10070 */
static void C_ccall f_10071(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,3)))){
C_save_and_reclaim((void *)f_10071,c,av);}
a=C_alloc(5);
t4=C_eqp(t2,lf[79]);
if(C_truep(t4)){
/* irregex-core.scm:672: k */
t5=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t5;
av2[1]=t1;
av2[2]=C_make_character(32);
av2[3]=t3;
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}
else{
t5=C_eqp(t2,lf[80]);
if(C_truep(t5)){
/* irregex-core.scm:672: k */
t6=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t6;
av2[1]=t1;
av2[2]=C_make_character(10);
av2[3]=t3;
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}
else{
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10091,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
if(C_truep(C_i_numberp(t2))){
/* ##sys#number->string */
t7=*((C_word*)lf[81]+1);{
C_word *av2=av;
av2[0]=t7;
av2[1]=t6;
av2[2]=t2;
av2[3]=C_fix(10);
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}
else{
/* irregex-core.scm:677: scheme#symbol->string */
t7=*((C_word*)lf[82]+1);{
C_word *av2=av;
av2[0]=t7;
av2[1]=t6;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t7+1)))(3,av2);}}}}}

/* k10089 in a10070 */
static void C_ccall f_10091(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_10091,c,av);}
/* irregex-core.scm:672: k */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=C_i_string_ref(t1,C_fix(0));
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* scan */
static void C_fcall f_10171(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,2)))){
C_save_and_reclaim_args((void *)trf_10171,3,t0,t1,t2);}
a=C_alloc(8);
t3=C_fixnum_greater_or_equal_p(t2,((C_word*)((C_word*)t0)[2])[1]);
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10181,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
if(C_truep(t3)){
t5=t4;
f_10181(t5,t3);}
else{
t5=C_i_string_ref(((C_word*)t0)[4],t2);
t6=C_u_i_char_whitespacep(t5);
t7=t4;
f_10181(t7,(C_truep(t6)?t6:C_u_i_memq(t5,lf[86])));}}

/* k10179 in scan */
static void C_fcall f_10181(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,4)))){
C_save_and_reclaim_args((void *)trf_10181,2,t0,t1);}
a=C_alloc(5);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10184,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);
/* irregex-core.scm:695: scheme#substring */
t3=*((C_word*)lf[46]+1);{
C_word av2[5];
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[5];
av2[3]=((C_word*)t0)[6];
av2[4]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}
else{
/* irregex-core.scm:697: scan */
t2=((C_word*)((C_word*)t0)[7])[1];
f_10171(t2,((C_word*)t0)[3],C_fixnum_plus(((C_word*)t0)[4],C_fix(1)));}}

/* k10182 in k10179 in scan */
static void C_ccall f_10184(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_10184,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10191,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);
/* irregex-core.scm:696: scheme#string->number */
t3=*((C_word*)lf[85]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k10189 in k10182 in k10179 in scan */
static void C_ccall f_10191(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,3)))){
C_save_and_reclaim((void *)f_10191,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10194,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)){
/* irregex-core.scm:696: k */
t3=((C_word*)t0)[2];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[3];
av2[2]=t1;
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}
else{
/* irregex-core.scm:696: scheme#string->symbol */
t3=*((C_word*)lf[84]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}}

/* k10192 in k10189 in k10182 in k10179 in scan */
static void C_ccall f_10194(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_10194,c,av);}
/* irregex-core.scm:696: k */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=t1;
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* a10241 in chicken.irregex#with-read-from-string in k7718 in k7493 in k7490 */
static void C_ccall f_10242(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_10242,c,av);}
t4=C_eqp(t2,lf[87]);
if(C_truep(t4)){
/* irregex-core.scm:700: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t5;
av2[1]=t1;
av2[2]=lf[88];
av2[3]=((C_word*)t0)[2];
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}
else{
/* irregex-core.scm:701: proc */
t5=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t5;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}}

/* chicken.irregex#symbol-list->flags in k7718 in k7493 in k7490 */
static void C_fcall f_10263(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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,4)))){
C_save_and_reclaim_args((void *)trf_10263,2,t1,t2);}
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_10269,a[2]=t4,a[3]=((C_word)li61),tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
f_10269(t6,t1,t2,C_fix(0));}

/* lp in chicken.irregex#symbol-list->flags in k7718 in k7493 in k7490 */
static void C_fcall f_10269(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,0,2)))){
C_save_and_reclaim_args((void *)trf_10269,4,t0,t1,t2,t3);}
a=C_alloc(13);
t4=C_i_pairp(t2);
if(C_truep(C_i_not(t4))){
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t5=C_i_cdr(t2);
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10287,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
t7=C_u_i_car(t2);
t8=C_eqp(t7,lf[90]);
t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10298,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t5,a[5]=t3,a[6]=t7,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
if(C_truep(t8)){
t10=t9;
f_10298(t10,t8);}
else{
t10=C_eqp(t7,lf[99]);
t11=t9;
f_10298(t11,(C_truep(t10)?t10:C_eqp(t7,lf[100])));}}}

/* k10285 in lp in chicken.irregex#symbol-list->flags in k7718 in k7493 in k7490 */
static void C_fcall f_10287(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,3)))){
C_save_and_reclaim_args((void *)trf_10287,2,t0,t1);}
/* irregex-core.scm:717: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10269(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* k10296 in lp in chicken.irregex#symbol-list->flags in k7718 in k7493 in k7490 */
static void C_fcall f_10298(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,3)))){
C_save_and_reclaim_args((void *)trf_10298,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:717: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10269(t2,((C_word*)t0)[3],((C_word*)t0)[4],C_fixnum_or(((C_word*)t0)[5],C_fix(2)));}
else{
t2=C_eqp(((C_word*)t0)[6],lf[91]);
t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[6],lf[92]));
if(C_truep(t3)){
/* irregex-core.scm:717: lp */
t4=((C_word*)((C_word*)t0)[2])[1];
f_10269(t4,((C_word*)t0)[3],((C_word*)t0)[4],C_fixnum_or(((C_word*)t0)[5],C_fix(4)));}
else{
t4=C_eqp(((C_word*)t0)[6],lf[93]);
t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[6],lf[94]));
if(C_truep(t5)){
t6=((C_word*)t0)[7];
f_10287(t6,C_fixnum_or(((C_word*)t0)[5],C_fix(8)));}
else{
t6=C_eqp(((C_word*)t0)[6],lf[95]);
t7=(C_truep(t6)?t6:C_eqp(((C_word*)t0)[6],lf[96]));
if(C_truep(t7)){
t8=((C_word*)t0)[7];
f_10287(t8,C_fixnum_or(((C_word*)t0)[5],C_fix(16)));}
else{
t8=C_eqp(((C_word*)t0)[6],lf[97]);
t9=(C_truep(t8)?t8:C_eqp(((C_word*)t0)[6],lf[98]));
if(C_truep(t9)){
t10=((C_word*)t0)[7];
f_10287(t10,C_fixnum_or(((C_word*)t0)[5],C_fix(32)));}
else{
/* irregex-core.scm:717: lp */
t10=((C_word*)((C_word*)t0)[2])[1];
f_10269(t10,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5]);}}}}}}

/* chicken.irregex#maybe-string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10386(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_10386,c,av);}
if(C_truep(C_i_stringp(t2))){
/* irregex-core.scm:729: string->sre */
t3=*((C_word*)lf[102]+1);{
C_word *av2=av;
av2[0]=t3;
av2[1]=t1;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}
else{
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10398(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c<3) C_bad_min_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-3)*C_SIZEOF_PAIR +5,c,4)))){
C_save_and_reclaim((void*)f_10398,c,av);}
a=C_alloc((c-3)*C_SIZEOF_PAIR+5);
t3=C_build_rest(&a,c,3,av);
C_word t4;
C_word t5;
C_word t6;
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10402,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
t5=C_i_stringp(t2);
if(C_truep(C_i_not(t5))){
/* irregex-core.scm:732: chicken.base#error */
t6=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t6;
av2[1]=t4;
av2[2]=lf[197];
av2[3]=lf[198];
av2[4]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(5,av2);}}
else{
t6=t4;{
C_word *av2=av;
av2[0]=t6;
av2[1]=C_SCHEME_UNDEFINED;
f_10402(2,av2);}}}

/* k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10402(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_10402,c,av);}
a=C_alloc(5);
t2=C_i_string_length(((C_word*)t0)[2]);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10408,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:734: symbol-list->flags */
f_10263(t3,((C_word*)t0)[4]);}

/* k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10408(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,7)))){
C_save_and_reclaim((void *)f_10408,c,av);}
a=C_alloc(8);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_10413,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=((C_word)li89),tmp=(C_word)a,a+=6,tmp));
t5=((C_word*)t3)[1];
f_10413(t5,((C_word*)t0)[4],C_fix(0),C_fix(0),t1,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}

/* lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_10413(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
C_word tmp;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word t26;
C_word t27;
C_word t28;
C_word t29;
C_word t30;
C_word t31;
C_word t32;
C_word t33;
C_word t34;
C_word t35;
C_word t36;
C_word t37;
C_word t38;
C_word t39;
C_word t40;
C_word t41;
C_word t42;
C_word t43;
C_word t44;
C_word t45;
C_word t46;
C_word t47;
C_word t48;
C_word t49;
C_word t50;
C_word t51;
C_word t52;
C_word t53;
C_word t54;
C_word t55;
C_word t56;
C_word t57;
C_word t58;
C_word t59;
C_word t60;
C_word t61;
C_word t62;
C_word t63;
C_word t64;
C_word t65;
C_word t66;
C_word t67;
C_word t68;
C_word t69;
C_word t70;
C_word t71;
C_word t72;
C_word t73;
C_word t74;
C_word t75;
C_word t76;
C_word t77;
C_word t78;
C_word t79;
C_word t80;
C_word t81;
C_word t82;
C_word t83;
C_word t84;
C_word t85;
C_word t86;
C_word t87;
C_word t88;
C_word t89;
C_word t90;
C_word t91;
C_word t92;
C_word t93;
C_word t94;
C_word t95;
C_word t96;
C_word t97;
C_word t98;
C_word t99;
C_word t100;
C_word t101;
C_word t102;
C_word t103;
C_word t104;
C_word t105;
C_word t106;
C_word t107;
C_word t108;
C_word t109;
C_word t110;
C_word t111;
C_word t112;
C_word t113;
C_word t114;
C_word t115;
C_word t116;
C_word t117;
C_word t118;
C_word t119;
C_word t120;
C_word t121;
C_word t122;
C_word t123;
C_word t124;
C_word t125;
C_word t126;
C_word t127;
C_word t128;
C_word t129;
C_word t130;
C_word t131;
C_word t132;
C_word t133;
C_word t134;
C_word t135;
C_word t136;
C_word t137;
C_word t138;
C_word t139;
C_word t140;
C_word t141;
C_word t142;
C_word t143;
C_word t144;
C_word t145;
C_word t146;
C_word t147;
C_word t148;
C_word t149;
C_word t150;
C_word t151;
C_word t152;
C_word t153;
C_word t154;
C_word t155;
C_word t156;
C_word t157;
C_word t158;
C_word t159;
C_word t160;
C_word t161;
C_word t162;
C_word t163;
C_word t164;
C_word t165;
C_word t166;
C_word t167;
C_word t168;
C_word t169;
C_word t170;
C_word t171;
C_word t172;
C_word t173;
C_word t174;
C_word t175;
C_word t176;
C_word t177;
C_word t178;
C_word t179;
C_word t180;
C_word t181;
C_word t182;
C_word t183;
C_word t184;
C_word t185;
C_word t186;
C_word t187;
C_word t188;
C_word t189;
C_word t190;
C_word t191;
C_word t192;
C_word t193;
C_word t194;
C_word t195;
C_word t196;
C_word t197;
C_word t198;
C_word t199;
C_word t200;
C_word t201;
C_word t202;
C_word t203;
C_word t204;
C_word t205;
C_word t206;
C_word t207;
C_word t208;
C_word t209;
C_word t210;
C_word t211;
C_word t212;
C_word t213;
C_word t214;
C_word t215;
C_word t216;
C_word t217;
C_word t218;
C_word t219;
C_word t220;
C_word t221;
C_word t222;
C_word t223;
C_word t224;
C_word t225;
C_word t226;
C_word t227;
C_word t228;
C_word t229;
C_word t230;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(105,0,6)))){
C_save_and_reclaim_args((void *)trf_10413,7,t0,t1,t2,t3,t4,t5,t6);}
a=C_alloc(105);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
t11=C_SCHEME_UNDEFINED;
t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
t13=C_SCHEME_UNDEFINED;
t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
t15=C_SCHEME_UNDEFINED;
t16=C_SCHEME_UNDEFINED;
t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
t18=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10416,a[2]=t4,a[3]=((C_word)li64),tmp=(C_word)a,a+=4,tmp));
t19=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10438,a[2]=t4,a[3]=t8,a[4]=((C_word)li66),tmp=(C_word)a,a+=5,tmp));
t20=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10494,a[2]=t2,a[3]=t3,a[4]=t5,a[5]=t10,a[6]=((C_word*)t0)[2],a[7]=((C_word)li67),tmp=(C_word)a,a+=8,tmp));
t21=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_10514,a[2]=t4,a[3]=t3,a[4]=t5,a[5]=t10,a[6]=((C_word*)t0)[2],a[7]=t8,a[8]=t2,a[9]=((C_word)li69),tmp=(C_word)a,a+=10,tmp));
t22=t15=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10586,a[2]=t4,a[3]=t12,a[4]=((C_word)li71),tmp=(C_word)a,a+=5,tmp);
t23=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10819,a[2]=t4,a[3]=t6,a[4]=t12,a[5]=((C_word)li72),tmp=(C_word)a,a+=6,tmp));
if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[3]))){
if(C_truep(C_i_pairp(t6))){
/* irregex-core.scm:827: chicken.base#error */
t24=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t24;
av2[1]=t1;
av2[2]=lf[123];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t24+1)))(4,av2);}}
else{
/* irregex-core.scm:828: collect/terms */
t24=t15;
f_10586(t24,t1);}}
else{
t24=C_i_string_ref(((C_word*)t0)[2],t2);
switch(t24){
case C_make_character(46):
t25=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t26=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t27=C_fixnum_and(t4,C_fix(8));
t28=C_eqp(C_fix(8),t27);
if(C_truep(t28)){
t29=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f33512,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t25,a[5]=t26,a[6]=t4,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:834: collect */
t30=((C_word*)t12)[1];
f_10494(t30,t29);}
else{
t29=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f33516,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t25,a[5]=t26,a[6]=t4,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:834: collect */
t30=((C_word*)t12)[1];
f_10494(t30,t29);}
case C_make_character(63):
t25=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10891,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=t4,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:837: collect/single */
t26=((C_word*)t14)[1];
f_10514(t26,t25);
default:
t25=C_eqp(t24,C_make_character(43));
t26=(C_truep(t25)?t25:C_eqp(t24,C_make_character(42)));
if(C_truep(t26)){
t27=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_11051,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=t4,a[7]=t6,a[8]=t24,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:858: collect/single */
t28=((C_word*)t14)[1];
f_10514(t28,t27);}
else{
switch(t24){
case C_make_character(40):
t27=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
if(C_truep(C_i_integer_greater_or_equalp(t27,((C_word*)t0)[3]))){
/* irregex-core.scm:873: chicken.base#error */
t28=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t28;
av2[1]=t1;
av2[2]=lf[140];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t28+1)))(4,av2);}}
else{
t28=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t29=C_i_string_ref(((C_word*)t0)[2],t28);
if(C_truep(C_i_not(C_u_i_memq(t29,lf[141])))){
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t32=C_fixnum_or(t4,C_fix(1));
t33=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11143,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t30,a[5]=t31,a[6]=t32,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:875: save */
t34=((C_word*)t17)[1];
f_10819(t34,t33);}
else{
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
if(C_truep(C_i_integer_greater_or_equalp(t30,((C_word*)t0)[3]))){
/* irregex-core.scm:877: chicken.base#error */
t31=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t31;
av2[1]=t1;
av2[2]=lf[142];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t31+1)))(4,av2);}}
else{
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t32=C_i_string_ref(((C_word*)t0)[2],t31);
t33=C_eqp(t32,C_make_character(42));
if(C_truep(t33)){
t34=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t35=C_i_string_ref(((C_word*)t0)[2],t34);
t36=C_eqp(C_make_character(39),t35);
if(C_truep(t36)){
t37=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
t38=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_11173,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=t6,a[7]=t12,a[8]=((C_word)li73),tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:880: with-read-from-string */
f_9670(t1,((C_word*)t0)[2],t37,t38);}
else{
/* irregex-core.scm:885: chicken.base#error */
t37=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t37;
av2[1]=t1;
av2[2]=lf[144];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t37+1)))(4,av2);}}}
else{
t34=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t35=C_i_string_ref(((C_word*)t0)[2],t34);
switch(t35){
case C_make_character(35):
t36=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11240,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t4,a[6]=t6,a[7]=t12,tmp=(C_word)a,a+=8,tmp);
t37=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
/* irregex-core.scm:889: string-scan-char */
t38=lf[54];{
C_word av2[5];
av2[0]=t38;
av2[1]=t36;
av2[2]=((C_word*)t0)[2];
av2[3]=C_make_character(41);
av2[4]=t37;
((C_proc)(void*)(*((C_word*)t38+1)))(5,av2);}
case C_make_character(58):
t36=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
t37=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
t38=C_fixnum_not(C_fix(1));
t39=C_fixnum_and(t4,t38);
t40=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11281,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t36,a[5]=t37,a[6]=t39,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:892: save */
t41=((C_word*)t17)[1];
f_10819(t41,t40);
case C_make_character(61):
t36=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
t37=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
t38=C_fixnum_not(C_fix(1));
t39=C_fixnum_and(t4,t38);
t40=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11304,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t36,a[5]=t37,a[6]=t39,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:895: save */
t41=((C_word*)t17)[1];
f_10819(t41,t40);
case C_make_character(33):
t36=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
t37=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
t38=C_fixnum_not(C_fix(1));
t39=C_fixnum_and(t4,t38);
t40=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11327,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t36,a[5]=t37,a[6]=t39,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:898: save */
t41=((C_word*)t17)[1];
f_10819(t41,t40);
case C_make_character(60):
t36=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
if(C_truep(C_i_integer_greater_or_equalp(t36,((C_word*)t0)[3]))){
/* irregex-core.scm:902: chicken.base#error */
t37=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t37;
av2[1]=t1;
av2[2]=lf[147];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t37+1)))(4,av2);}}
else{
t37=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
t38=C_i_string_ref(((C_word*)t0)[2],t37);
switch(t38){
case C_make_character(61):
t39=C_a_i_fixnum_plus(&a,2,t2,C_fix(4));
t40=C_a_i_fixnum_plus(&a,2,t2,C_fix(4));
t41=C_fixnum_not(C_fix(1));
t42=C_fixnum_and(t4,t41);
t43=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11369,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t39,a[5]=t40,a[6]=t42,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:907: save */
t44=((C_word*)t17)[1];
f_10819(t44,t43);
case C_make_character(33):
t39=C_a_i_fixnum_plus(&a,2,t2,C_fix(4));
t40=C_a_i_fixnum_plus(&a,2,t2,C_fix(4));
t41=C_fixnum_not(C_fix(1));
t42=C_fixnum_and(t4,t41);
t43=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11392,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t39,a[5]=t40,a[6]=t42,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:910: save */
t44=((C_word*)t17)[1];
f_10819(t44,t43);
default:
t39=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11395,a[2]=t4,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t17,a[6]=t2,a[7]=((C_word*)t0)[2],tmp=(C_word)a,a+=8,tmp);
t40=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
t41=C_i_string_ref(((C_word*)t0)[2],t40);
if(C_truep(C_u_i_char_alphabeticp(t41))){
t42=C_a_i_fixnum_plus(&a,2,t2,C_fix(4));
/* irregex-core.scm:914: string-scan-char */
t43=lf[54];{
C_word av2[5];
av2[0]=t43;
av2[1]=t39;
av2[2]=((C_word*)t0)[2];
av2[3]=C_make_character(62);
av2[4]=t42;
((C_proc)(void*)(*((C_word*)t43+1)))(5,av2);}}
else{
t42=t39;{
C_word av2[2];
av2[0]=t42;
av2[1]=C_SCHEME_FALSE;
f_11395(2,av2);}}}}
case C_make_character(62):
t36=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
t37=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
t38=C_fixnum_not(C_fix(1));
t39=C_fixnum_and(t4,t38);
t40=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11481,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t36,a[5]=t37,a[6]=t39,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:923: save */
t41=((C_word*)t17)[1];
f_10819(t41,t40);
case C_make_character(40):
t36=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
if(C_truep(C_i_integer_greater_or_equalp(t36,((C_word*)t0)[3]))){
/* irregex-core.scm:931: chicken.base#error */
t37=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t37;
av2[1]=t1;
av2[2]=lf[152];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t37+1)))(4,av2);}}
else{
t37=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
t38=C_i_string_ref(((C_word*)t0)[2],t37);
if(C_truep(C_u_i_char_numericp(t38))){
t39=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11506,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=((C_word*)t0)[4],a[6]=t17,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
t40=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
/* irregex-core.scm:933: string-scan-char */
t41=lf[54];{
C_word av2[5];
av2[0]=t41;
av2[1]=t39;
av2[2]=((C_word*)t0)[2];
av2[3]=C_make_character(41);
av2[4]=t40;
((C_proc)(void*)(*((C_word*)t41+1)))(5,av2);}}
else{
t39=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
t40=C_i_string_ref(((C_word*)t0)[2],t39);
if(C_truep(C_u_i_char_alphabeticp(t40))){
t41=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11558,a[2]=t4,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t17,a[6]=t2,a[7]=((C_word*)t0)[2],tmp=(C_word)a,a+=8,tmp);
t42=C_a_i_fixnum_plus(&a,2,t2,C_fix(3));
/* irregex-core.scm:940: string-scan-char */
t43=lf[54];{
C_word av2[5];
av2[0]=t43;
av2[1]=t41;
av2[2]=((C_word*)t0)[2];
av2[3]=C_make_character(41);
av2[4]=t42;
((C_proc)(void*)(*((C_word*)t43+1)))(5,av2);}}
else{
t41=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t42=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t43=C_fixnum_not(C_fix(1));
t44=C_fixnum_and(t4,t43);
t45=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11609,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t41,a[5]=t42,a[6]=t44,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:946: save */
t46=((C_word*)t17)[1];
f_10819(t46,t45);}}}
case C_make_character(123):
/* irregex-core.scm:948: chicken.base#error */
t36=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t36;
av2[1]=t1;
av2[2]=lf[155];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t36+1)))(4,av2);}
default:
t36=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t37=C_SCHEME_UNDEFINED;
t38=(*a=C_VECTOR_TYPE|1,a[1]=t37,tmp=(C_word)a,a+=2,tmp);
t39=C_set_block_item(t38,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_11640,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[2],a[5]=t2,a[6]=t38,a[7]=((C_word*)t0)[4],a[8]=t6,a[9]=t12,a[10]=((C_word)li76),tmp=(C_word)a,a+=11,tmp));
t40=((C_word*)t38)[1];
f_11640(t40,t1,t36,t4,C_SCHEME_FALSE);}}}}}
case C_make_character(41):
if(C_truep(C_i_nullp(t6))){
/* irregex-core.scm:988: chicken.base#error */
t27=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t27;
av2[1]=t1;
av2[2]=lf[160];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t27+1)))(4,av2);}}
else{
t27=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t28=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t29=C_i_caar(t6);
t30=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11918,a[2]=t6,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t27,a[6]=t28,a[7]=t29,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:992: collect/terms */
t31=t15;
f_10586(t31,t30);}
case C_make_character(91):
t27=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11933,a[2]=((C_word*)t0)[4],a[3]=t4,a[4]=t6,a[5]=t12,a[6]=((C_word)li77),tmp=(C_word)a,a+=7,tmp);
t28=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11957,a[2]=t1,a[3]=t27,tmp=(C_word)a,a+=4,tmp);
t29=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t30=C_i_string_length(((C_word*)t0)[2]);
t31=C_fixnum_lessp(t29,t30);
t32=(C_truep(t31)?C_eqp(C_make_character(94),C_i_string_ref(((C_word*)t0)[2],t29)):C_SCHEME_FALSE);
t33=C_fixnum_and(t4,C_fix(32));
t34=C_eqp(C_fix(32),t33);
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|9,a[1]=(C_word)f_13335,a[2]=t30,a[3]=((C_word*)t0)[2],a[4]=t36,a[5]=t4,a[6]=t32,a[7]=t29,a[8]=t34,a[9]=((C_word)li82),tmp=(C_word)a,a+=10,tmp));
if(C_truep(t32)){
t38=C_fixnum_plus(t29,C_fix(1));
t39=C_fixnum_and(t4,C_fix(4));
t40=C_eqp(C_fix(4),t39);
if(C_truep(t40)){
t41=C_a_i_cons(&a,2,C_make_character(10),C_make_character(10));
t42=C_a_i_vector1(&a,1,t41);
/* irregex-core.scm:1287: go */
t43=((C_word*)t36)[1];
f_13335(t43,t28,t38,C_SCHEME_FALSE,t42);}
else{
t41=C_a_i_vector(&a,0);
/* irregex-core.scm:1287: go */
t42=((C_word*)t36)[1];
f_13335(t42,t28,t38,C_SCHEME_FALSE,t41);}}
else{
t38=C_a_i_vector(&a,0);
/* irregex-core.scm:1292: go */
t39=((C_word*)t36)[1];
f_13335(t39,t28,t29,C_SCHEME_FALSE,t38);}
case C_make_character(123):
t27=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t28=C_i_integer_greater_or_equalp(t27,((C_word*)t0)[3]);
t29=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_11976,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t3,a[6]=t4,a[7]=t5,a[8]=t6,a[9]=((C_word*)t0)[2],a[10]=t14,tmp=(C_word)a,a+=11,tmp);
if(C_truep(t28)){
t30=t29;
f_11976(t30,t28);}
else{
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t31=C_i_string_ref(((C_word*)t0)[2],t30);
t32=C_u_i_char_numericp(t31);
if(C_truep(t32)){
t33=t29;
f_11976(t33,C_i_not(t32));}
else{
t33=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t34=C_i_string_ref(((C_word*)t0)[2],t33);
t35=t29;
f_11976(t35,C_i_not(C_eqp(C_make_character(44),t34)));}}
case C_make_character(92):
t27=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
if(C_truep(C_i_integer_greater_or_equalp(t27,((C_word*)t0)[3]))){
/* irregex-core.scm:1035: chicken.base#error */
t28=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t28;
av2[1]=t1;
av2[2]=lf[177];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t28+1)))(4,av2);}}
else{
t28=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t29=C_i_string_ref(((C_word*)t0)[2],t28);
switch(t29){
case C_make_character(100):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12205,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t30,a[5]=t31,a[6]=t4,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1040: collect */
t33=((C_word*)t12)[1];
f_10494(t33,t32);
case C_make_character(68):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=C_a_i_list(&a,2,lf[179],lf[178]);
t33=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12232,a[2]=t32,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t30,a[6]=t31,a[7]=t4,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1042: collect */
t34=((C_word*)t12)[1];
f_10494(t34,t33);
case C_make_character(115):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12255,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t30,a[5]=t31,a[6]=t4,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1044: collect */
t33=((C_word*)t12)[1];
f_10494(t33,t32);
case C_make_character(83):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=C_a_i_list(&a,2,lf[179],lf[79]);
t33=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12282,a[2]=t32,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t30,a[6]=t31,a[7]=t4,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1046: collect */
t34=((C_word*)t12)[1];
f_10494(t34,t33);
case C_make_character(119):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=C_a_i_list(&a,1,lf[180]);
t33=C_a_i_list(&a,3,lf[103],lf[181],t32);
t34=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12309,a[2]=t33,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t30,a[6]=t31,a[7]=t4,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1049: collect */
t35=((C_word*)t12)[1];
f_10494(t35,t34);
case C_make_character(87):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=C_a_i_list(&a,1,lf[182]);
t33=C_a_i_list(&a,3,lf[103],lf[181],t32);
t34=C_a_i_list(&a,2,lf[179],t33);
t35=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12340,a[2]=t34,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t30,a[6]=t31,a[7]=t4,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1052: collect */
t36=((C_word*)t12)[1];
f_10494(t36,t35);
case C_make_character(98):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=C_a_i_list(&a,3,lf[103],lf[183],lf[184]);
t33=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12375,a[2]=t32,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t30,a[6]=t31,a[7]=t4,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1055: collect */
t34=((C_word*)t12)[1];
f_10494(t34,t33);
case C_make_character(66):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12398,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t30,a[5]=t31,a[6]=t4,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1057: collect */
t33=((C_word*)t12)[1];
f_10494(t33,t32);
case C_make_character(65):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12421,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t30,a[5]=t31,a[6]=t4,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1059: collect */
t33=((C_word*)t12)[1];
f_10494(t33,t32);
case C_make_character(90):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=C_a_i_list(&a,2,lf[131],C_make_character(10));
t33=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12452,a[2]=t32,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t30,a[6]=t31,a[7]=t4,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1062: collect */
t34=((C_word*)t12)[1];
f_10494(t34,t33);
case C_make_character(122):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12475,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t30,a[5]=t31,a[6]=t4,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1064: collect */
t33=((C_word*)t12)[1];
f_10494(t33,t32);
case C_make_character(82):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12498,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t30,a[5]=t31,a[6]=t4,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1066: collect */
t33=((C_word*)t12)[1];
f_10494(t33,t32);
case C_make_character(75):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12521,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t30,a[5]=t31,a[6]=t4,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1068: collect */
t33=((C_word*)t12)[1];
f_10494(t33,t32);
case C_make_character(60):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12544,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t30,a[5]=t31,a[6]=t4,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1071: collect */
t33=((C_word*)t12)[1];
f_10494(t33,t32);
case C_make_character(62):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12567,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t30,a[5]=t31,a[6]=t4,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1073: collect */
t33=((C_word*)t12)[1];
f_10494(t33,t32);
case C_make_character(120):
t30=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12578,a[2]=((C_word*)t0)[4],a[3]=t4,a[4]=t6,a[5]=t12,a[6]=((C_word)li85),tmp=(C_word)a,a+=7,tmp);
t31=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12602,a[2]=t1,a[3]=t30,tmp=(C_word)a,a+=4,tmp);
t32=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
/* irregex-core.scm:1078: string-parse-hex-escape */
f_13226(t31,((C_word*)t0)[2],t32,((C_word*)t0)[3]);
case C_make_character(107):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_i_string_ref(((C_word*)t0)[2],t30);
if(C_truep(C_i_not(C_u_i_memq(t31,lf[189])))){
/* irregex-core.scm:1082: chicken.base#error */
t32=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t32;
av2[1]=t1;
av2[2]=lf[190];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t32+1)))(4,av2);}}
else{
t32=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12626,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[4],a[6]=t6,a[7]=t12,a[8]=t2,tmp=(C_word)a,a+=9,tmp);
switch(t31){
case C_make_character(60):
t33=t32;
f_12626(t33,C_make_character(62));
case C_make_character(123):
t33=t32;
f_12626(t33,C_make_character(125));
case C_make_character(40):
t33=t32;
f_12626(t33,C_make_character(41));
default:
t33=C_eqp(t31,C_make_character(91));
t34=t32;
f_12626(t34,(C_truep(t33)?C_make_character(93):t31));}}
case C_make_character(81):
t30=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12698,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=t6,a[7]=((C_word*)t0)[2],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1097: collect */
t31=((C_word*)t12)[1];
f_10494(t31,t30);
case C_make_character(39):
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12809,a[2]=((C_word*)t0)[4],a[3]=t4,a[4]=t6,a[5]=t12,a[6]=((C_word)li87),tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:1114: with-read-from-string */
f_9670(t1,((C_word*)t0)[2],t30,t31);
default:
if(C_truep(C_u_i_char_numericp(t29))){
t30=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_12830,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=t6,a[7]=t12,a[8]=t2,a[9]=((C_word*)t0)[2],tmp=(C_word)a,a+=10,tmp);
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=C_a_i_list(&a,1,t31);
t33=C_i_string_length(((C_word*)t0)[2]);
t34=C_i_pairp(t32);
t35=(C_truep(t34)?C_u_i_car(t32):C_fix(0));
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|5,a[1]=(C_word)f_8861,a[2]=t33,a[3]=((C_word*)t0)[2],a[4]=t37,a[5]=((C_word)li88),tmp=(C_word)a,a+=6,tmp));
t39=((C_word*)t37)[1];
f_8861(t39,t30,t35);}
else{
if(C_truep(C_u_i_char_alphabeticp(t29))){
t30=C_i_assq(t29,lf[168]);
if(C_truep(t30)){
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t32=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t33=C_i_cdr(t30);
t34=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12910,a[2]=t33,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t31,a[6]=t32,a[7]=t4,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1141: collect */
t35=((C_word*)t12)[1];
f_10494(t35,t34);}
else{
/* irregex-core.scm:1142: chicken.base#error */
t31=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t31;
av2[1]=t1;
av2[2]=lf[194];
av2[3]=((C_word*)t0)[2];
av2[4]=t29;
((C_proc)(void*)(*((C_word*)t31+1)))(5,av2);}}}
else{
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t32=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12926,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t30,a[5]=t31,a[6]=t4,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1144: collect */
t33=((C_word*)t12)[1];
f_10494(t33,t32);}}}}
case C_make_character(124):
t27=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t28=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t29=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12990,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t27,a[5]=t28,a[6]=t4,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1146: collect */
t30=((C_word*)t12)[1];
f_10494(t30,t29);
case C_make_character(94):
t27=C_fixnum_and(t4,C_fix(4));
t28=C_eqp(C_fix(4),t27);
t29=(C_truep(t28)?lf[195]:lf[186]);
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t32=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13016,a[2]=t29,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t30,a[6]=t31,a[7]=t4,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1149: collect */
t33=((C_word*)t12)[1];
f_10494(t33,t32);
case C_make_character(36):
t27=C_fixnum_and(t4,C_fix(4));
t28=C_eqp(C_fix(4),t27);
t29=(C_truep(t28)?lf[196]:lf[187]);
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t31=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t32=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13045,a[2]=t29,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t30,a[6]=t31,a[7]=t4,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1152: collect */
t33=((C_word*)t12)[1];
f_10494(t33,t32);
case C_make_character(32):
t27=C_fixnum_and(t4,C_fix(16));
t28=C_eqp(C_fix(16),t27);
if(C_truep(t28)){
t29=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t31=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13073,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t29,a[5]=t30,a[6]=t4,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1155: collect */
t32=((C_word*)t12)[1];
f_10494(t32,t31);}
else{
t29=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:1156: lp */
t225=t1;
t226=t29;
t227=t3;
t228=t4;
t229=t5;
t230=t6;
t1=t225;
t2=t226;
t3=t227;
t4=t228;
t5=t229;
t6=t230;
goto loop;}
case C_make_character(35):
t27=C_fixnum_and(t4,C_fix(16));
t28=C_eqp(C_fix(16),t27);
if(C_truep(t28)){
t29=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13094,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t4,a[6]=t6,a[7]=t12,tmp=(C_word)a,a+=8,tmp);
t30=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:1159: string-scan-char */
t31=lf[54];{
C_word av2[5];
av2[0]=t31;
av2[1]=t29;
av2[2]=((C_word*)t0)[2];
av2[3]=C_make_character(10);
av2[4]=t30;
((C_proc)(void*)(*((C_word*)t31+1)))(5,av2);}}
else{
t29=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:1162: lp */
t225=t1;
t226=t29;
t227=t3;
t228=t4;
t229=t5;
t230=t6;
t1=t225;
t2=t226;
t3=t227;
t4=t228;
t5=t229;
t6=t230;
goto loop;}
default:
t27=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:1164: lp */
t225=t1;
t226=t27;
t227=t3;
t228=t4;
t229=t5;
t230=t6;
t1=t225;
t2=t226;
t3=t227;
t4=t228;
t5=t229;
t6=t230;
goto loop;}}}}}

/* cased-char in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static C_word C_fcall f_10416(C_word *a,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_stack_overflow_check;{}
t2=C_fixnum_and(((C_word*)t0)[2],C_fix(2));
t3=C_eqp(C_fix(2),t2);
t4=(C_truep(t3)?C_u_i_char_alphabeticp(t1):C_SCHEME_FALSE);
if(C_truep(t4)){
t5=C_u_i_char_upper_casep(t1);
t6=(C_truep(t5)?C_u_i_char_downcase(t1):C_u_i_char_upcase(t1));
return(C_a_i_list(&a,3,lf[103],t1,t6));}
else{
return(t1);}}

/* cased-string in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_10438(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,0,2)))){
C_save_and_reclaim_args((void *)trf_10438,3,t0,t1,t2);}
a=C_alloc(11);
t3=C_fixnum_and(((C_word*)t0)[2],C_fix(2));
t4=C_eqp(C_fix(2),t3);
if(C_truep(t4)){
t5=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t6=t5;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=((C_word*)t7)[1];
t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10455,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t7,a[5]=t8,tmp=(C_word)a,a+=6,tmp);
/* ##sys#string->list */
t10=*((C_word*)lf[105]+1);{
C_word av2[3];
av2[0]=t10;
av2[1]=t9;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t10+1)))(3,av2);}}
else{
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}}

/* k10453 in cased-string in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10455(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,3)))){
C_save_and_reclaim((void *)f_10455,c,av);}
a=C_alloc(12);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10458,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10460,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t4,a[5]=((C_word*)t0)[5],a[6]=((C_word)li65),tmp=(C_word)a,a+=7,tmp));
t6=((C_word*)t4)[1];
f_10460(t6,t2,t1);}

/* k10456 in k10453 in cased-string in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10458(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_10458,c,av);}
a=C_alloc(3);
/* irregex-core.scm:746: sre-sequence */
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=(
/* irregex-core.scm:746: sre-sequence */
  f_18122(C_a_i(&a,3),t1)
);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* map-loop1459 in k10453 in cased-string in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_10460(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,2)))){
C_save_and_reclaim_args((void *)trf_10460,3,t0,t1,t2);}
a=C_alloc(12);
if(C_truep(C_i_pairp(t2))){
t3=(
/* irregex-core.scm:746: g1465 */
  f_10416(C_a_i(&a,9),((C_word*)((C_word*)t0)[2])[1],C_slot(t2,C_fix(0)))
);
t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
t5=C_i_setslot(((C_word*)((C_word*)t0)[3])[1],C_fix(1),t4);
t6=C_mutate(((C_word *)((C_word*)t0)[3])+1,t4);
t8=t1;
t9=C_slot(t2,C_fix(1));
t1=t8;
t2=t9;
goto loop;}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[5],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* collect in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_10494(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,4)))){
C_save_and_reclaim_args((void *)trf_10494,2,t0,t1);}
a=C_alloc(8);
t2=C_eqp(((C_word*)t0)[2],((C_word*)t0)[3]);
if(C_truep(t2)){
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10508,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10512,a[2]=((C_word*)t0)[5],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:750: scheme#substring */
t5=*((C_word*)lf[46]+1);{
C_word av2[5];
av2[0]=t5;
av2[1]=t4;
av2[2]=((C_word*)t0)[6];
av2[3]=((C_word*)t0)[3];
av2[4]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}}

/* k10506 in collect in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10508(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_10508,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,t1,((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k10510 in collect in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10512(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_10512,c,av);}
/* irregex-core.scm:750: cased-string */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10438(t2,((C_word*)t0)[3],t1);}

/* collect/single in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_10514(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(17,0,3)))){
C_save_and_reclaim_args((void *)trf_10514,2,t0,t1);}
a=C_alloc(17);
t2=C_fixnum_and(((C_word*)t0)[2],C_fix(32));
t3=C_eqp(C_fix(32),t2);
t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_10521,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]=t3,a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
t5=(C_truep(t3)?C_fixnum_greaterp(((C_word*)t0)[8],C_fix(1)):C_SCHEME_FALSE);
if(C_truep(t5)){
t6=C_fixnum_difference(((C_word*)t0)[8],C_fix(1));
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14155,a[2]=((C_word*)t0)[6],a[3]=t8,a[4]=((C_word)li68),tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
f_14155(t10,t4,t6);}
else{
t6=t4;{
C_word av2[2];
av2[0]=t6;
av2[1]=C_fixnum_difference(((C_word*)t0)[8],C_fix(1));
f_10521(2,av2);}}}

/* k10519 in collect/single in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10521(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(21,c,4)))){
C_save_and_reclaim((void *)f_10521,c,av);}
a=C_alloc(21);
if(C_truep(C_fixnum_lessp(t1,((C_word*)t0)[2]))){
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}
else{
t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10530,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10558,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
if(C_truep(((C_word*)t0)[8])){
/* irregex-core.scm:763: utf8-string-ref */
f_13960(t3,((C_word*)t0)[6],t1,C_fixnum_difference(((C_word*)t0)[9],t1));}
else{
/* irregex-core.scm:762: cased-char */
t4=t2;
f_10530(t4,(
/* irregex-core.scm:762: cased-char */
  f_10416(C_a_i(&a,9),((C_word*)((C_word*)t0)[7])[1],C_i_string_ref(((C_word*)t0)[6],t1))
));}}}

/* k10528 in k10519 in collect/single in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_10530(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,0,4)))){
C_save_and_reclaim_args((void *)trf_10530,2,t0,t1);}
a=C_alloc(9);
t2=C_eqp(((C_word*)t0)[2],((C_word*)t0)[3]);
if(C_truep(t2)){
t3=((C_word*)t0)[4];{
C_word av2[2];
av2[0]=t3;
av2[1]=C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10550,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10554,a[2]=((C_word*)t0)[6],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:770: scheme#substring */
t5=*((C_word*)lf[46]+1);{
C_word av2[5];
av2[0]=t5;
av2[1]=t4;
av2[2]=((C_word*)t0)[7];
av2[3]=((C_word*)t0)[3];
av2[4]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}}

/* k10548 in k10528 in k10519 in collect/single in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10550(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,1)))){
C_save_and_reclaim((void *)f_10550,c,av);}
a=C_alloc(6);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* k10552 in k10528 in k10519 in collect/single in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10554(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_10554,c,av);}
/* irregex-core.scm:770: cased-string */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10438(t2,((C_word*)t0)[3],t1);}

/* k10556 in k10519 in collect/single in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10558(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,1)))){
C_save_and_reclaim((void *)f_10558,c,av);}
a=C_alloc(9);
/* irregex-core.scm:762: cased-char */
t2=((C_word*)t0)[2];
f_10530(t2,(
/* irregex-core.scm:762: cased-char */
  f_10416(C_a_i(&a,9),((C_word*)((C_word*)t0)[3])[1],t1)
));}

/* collect/terms in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_10586(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,0,2)))){
C_save_and_reclaim_args((void *)trf_10586,2,t0,t1);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10590,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:776: collect */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10494(t3,t2);}

/* k10588 in collect/terms in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10590(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,2)))){
C_save_and_reclaim((void *)f_10590,c,av);}
a=C_alloc(8);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10593,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
if(C_truep(C_i_pairp(t1))){
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10816,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:779: last */
f_9187(t3,t1);}
else{
t3=t2;
f_10593(t3,C_SCHEME_FALSE);}}

/* k10591 in k10588 in collect/terms in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_10593(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,0,2)))){
C_save_and_reclaim_args((void *)trf_10593,2,t0,t1);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10596,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);
t3=(C_truep(t1)?C_u_i_memq(C_i_car(t1),lf[121]):C_SCHEME_FALSE);
if(C_truep(t3)){
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10794,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:785: ##sys#fast-reverse */
t5=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
if(C_truep(t1)){
t4=C_i_car(t1);
t5=t2;
f_10596(t5,C_a_i_list1(&a,1,t4));}
else{
t4=t2;
f_10596(t4,C_SCHEME_FALSE);}}}

/* k10594 in k10591 in k10588 in collect/terms in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_10596(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,2)))){
C_save_and_reclaim_args((void *)trf_10596,2,t0,t1);}
a=C_alloc(8);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10599,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
if(C_truep(((C_word*)t0)[4])){
t3=C_i_car(((C_word*)t0)[4]);
if(C_truep((C_truep(C_eqp(t3,lf[119]))?C_SCHEME_TRUE:(C_truep(C_eqp(t3,lf[120]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10769,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:789: ##sys#fast-reverse */
t5=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10780,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:790: ##sys#fast-reverse */
t5=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}}
else{
t3=t2;{
C_word av2[2];
av2[0]=t3;
av2[1]=((C_word*)t0)[5];
f_10599(2,av2);}}}

/* k10597 in k10594 in k10591 in k10588 in collect/terms in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10599(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,5)))){
C_save_and_reclaim((void *)f_10599,c,av);}
a=C_alloc(8);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_10604,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=((C_word)li70),tmp=(C_word)a,a+=6,tmp));
t5=((C_word*)t3)[1];
f_10604(t5,((C_word*)t0)[4],t1,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}

/* lp in k10597 in k10594 in k10591 in k10588 in collect/terms in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_10604(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(31,0,4)))){
C_save_and_reclaim_args((void *)trf_10604,5,t0,t1,t2,t3,t4);}
a=C_alloc(31);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10607,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
if(C_truep(C_i_nullp(t2))){
t6=(
/* irregex-core.scm:797: shift */
  f_10607(C_a_i(&a,6),t5)
);
t7=(
/* irregex-core.scm:797: sre-alternate */
  f_18145(C_a_i(&a,3),t6)
);
t8=C_fixnum_and(((C_word*)t0)[2],C_fix(1));
t9=C_eqp(C_fix(1),t8);
t10=(C_truep(t9)?C_a_i_list2(&a,2,lf[108],t7):t7);
if(C_truep(((C_word*)t0)[3])){
t11=C_i_car(((C_word*)t0)[3]);
t12=C_eqp(lf[109],t11);
if(C_truep(t12)){
t13=C_i_pairp(t10);
if(C_truep(C_i_not(t13))){
t14=t1;{
C_word av2[2];
av2[0]=t14;
av2[1]=lf[110];
((C_proc)(void*)(*((C_word*)t14+1)))(2,av2);}}
else{
t14=C_i_car(t10);
if(C_truep((C_truep(C_eqp(t14,lf[111]))?C_SCHEME_TRUE:(C_truep(C_eqp(t14,lf[112]))?C_SCHEME_TRUE:(C_truep(C_eqp(t14,lf[113]))?C_SCHEME_TRUE:(C_truep(C_eqp(t14,lf[114]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))){
t15=t1;{
C_word av2[2];
av2[0]=t15;
av2[1]=t10;
((C_proc)(void*)(*((C_word*)t15+1)))(2,av2);}}
else{
t15=C_eqp(lf[115],C_u_i_car(t10));
if(C_truep(t15)){
t16=C_i_cadr(t10);
t17=C_u_i_cdr(t10);
t18=(
/* irregex-core.scm:812: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(t17))
);
t19=t1;{
C_word av2[2];
av2[0]=t19;
av2[1]=C_a_i_list(&a,3,lf[109],t16,t18);
((C_proc)(void*)(*((C_word*)t19+1)))(2,av2);}}
else{
t16=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10677,a[2]=t10,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:814: scheme#cadadr */
t17=*((C_word*)lf[117]+1);{
C_word av2[3];
av2[0]=t17;
av2[1]=t16;
av2[2]=t10;
((C_proc)(void*)(*((C_word*)t17+1)))(3,av2);}}}}}
else{
t13=C_a_i_list(&a,1,t10);
/* irregex-core.scm:817: ##sys#append */
t14=*((C_word*)lf[118]+1);{
C_word av2[4];
av2[0]=t14;
av2[1]=t1;
av2[2]=((C_word*)t0)[3];
av2[3]=t13;
((C_proc)(void*)(*((C_word*)t14+1)))(4,av2);}}}
else{
t11=t1;{
C_word av2[2];
av2[0]=t11;
av2[1]=t10;
((C_proc)(void*)(*((C_word*)t11+1)))(2,av2);}}}
else{
t6=C_i_car(t2);
t7=C_eqp(lf[103],t6);
if(C_truep(t7)){
t8=C_u_i_cdr(t2);
t9=(
/* irregex-core.scm:819: shift */
  f_10607(C_a_i(&a,6),t5)
);
/* irregex-core.scm:819: lp */
t20=t1;
t21=t8;
t22=C_SCHEME_END_OF_LIST;
t23=t9;
t1=t20;
t2=t21;
t3=t22;
t4=t23;
goto loop;}
else{
t8=C_u_i_cdr(t2);
t9=C_u_i_car(t2);
t10=C_a_i_cons(&a,2,t9,t3);
/* irregex-core.scm:820: lp */
t20=t1;
t21=t8;
t22=t10;
t23=t4;
t1=t20;
t2=t21;
t3=t22;
t4=t23;
goto loop;}}}

/* shift in lp in k10597 in k10594 in k10591 in k10588 in collect/terms in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static C_word C_fcall f_10607(C_word *a,C_word t0){
C_word tmp;
C_word t1;
C_word t2;
C_stack_overflow_check;{}
t1=(
/* irregex-core.scm:794: sre-sequence */
  f_18122(C_a_i(&a,3),((C_word*)t0)[2])
);
return(C_a_i_cons(&a,2,t1,((C_word*)t0)[3]));}

/* k10675 in lp in k10597 in k10594 in k10591 in k10588 in collect/terms in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10677(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_10677,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10693,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:815: scheme#cddadr */
t3=*((C_word*)lf[116]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k10691 in k10675 in lp in k10597 in k10594 in k10591 in k10588 in collect/terms in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10693(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,c,1)))){
C_save_and_reclaim((void *)f_10693,c,av);}
a=C_alloc(18);
t2=(
/* irregex-core.scm:815: sre-sequence */
  f_18122(C_a_i(&a,3),t1)
);
t3=(
/* irregex-core.scm:816: sre-alternate */
  f_18145(C_a_i(&a,3),C_i_cddr(((C_word*)t0)[2]))
);
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_a_i_list(&a,4,lf[109],((C_word*)t0)[4],t2,t3);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* k10767 in k10594 in k10591 in k10588 in collect/terms in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10769(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_10769,c,av);}
/* irregex-core.scm:789: ##sys#fast-reverse */
t2=*((C_word*)lf[69]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=C_i_cddr(t1);
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k10778 in k10594 in k10591 in k10588 in collect/terms in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10780(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_10780,c,av);}
/* irregex-core.scm:790: ##sys#fast-reverse */
t2=*((C_word*)lf[69]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=C_i_cdr(t1);
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k10792 in k10591 in k10588 in collect/terms in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10794(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,1)))){
C_save_and_reclaim((void *)f_10794,c,av);}
a=C_alloc(6);
t2=C_i_cadr(t1);
t3=((C_word*)t0)[2];
f_10596(t3,C_a_i_list2(&a,2,lf[120],t2));}

/* k10814 in k10588 in collect/terms in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10816(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_10816,c,av);}
t2=((C_word*)t0)[2];
f_10593(t2,C_u_i_memq(t1,lf[122]));}

/* save in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_10819(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_10819,2,t0,t1);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10831,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:822: collect */
t3=((C_word*)((C_word*)t0)[4])[1];
f_10494(t3,t2);}

/* k10829 in save in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10831(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,1)))){
C_save_and_reclaim((void *)f_10831,c,av);}
a=C_alloc(6);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_a_i_cons(&a,2,t2,((C_word*)t0)[4]);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* k10889 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_10891(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(28,c,4)))){
C_save_and_reclaim((void *)f_10891,c,av);}
a=C_alloc(28);
if(C_truep(C_i_nullp(t1))){
/* irregex-core.scm:839: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[126];
av2[3]=((C_word*)t0)[3];
av2[4]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(5,av2);}}
else{
t2=C_i_car(t1);
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[4],C_fix(1));
t4=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[4],C_fix(1));
t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10920,a[2]=t1,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[2],a[5]=t3,a[6]=t4,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
if(C_truep(C_i_pairp(t2))){
t6=C_u_i_car(t2);
t7=C_eqp(t6,lf[127]);
if(C_truep(t7)){
t8=C_u_i_cdr(t2);
t9=t5;
f_10920(t9,C_a_i_cons(&a,2,lf[128],t8));}
else{
t8=C_eqp(t6,lf[129]);
if(C_truep(t8)){
t9=C_u_i_cdr(t2);
t10=C_a_i_cons(&a,2,C_SCHEME_FALSE,t9);
t11=C_a_i_cons(&a,2,C_fix(1),t10);
t12=t5;
f_10920(t12,C_a_i_cons(&a,2,lf[130],t11));}
else{
t9=C_eqp(t6,lf[131]);
if(C_truep(t9)){
t10=C_u_i_cdr(t2);
t11=t5;
f_10920(t11,C_a_i_cons(&a,2,lf[132],t10));}
else{
t10=C_eqp(t6,lf[133]);
if(C_truep(t10)){
t11=C_u_i_cdr(t2);
t12=t5;
f_10920(t12,C_a_i_cons(&a,2,lf[130],t11));}
else{
t11=C_eqp(t6,lf[134]);
if(C_truep(t11)){
t12=C_i_cadr(t2);
t13=C_u_i_cdr(t2);
t14=C_a_i_cons(&a,2,t12,t13);
t15=t5;
f_10920(t15,C_a_i_cons(&a,2,lf[130],t14));}
else{
t12=C_eqp(t6,lf[135]);
if(C_truep(t12)){
t13=C_i_cadr(t2);
t14=C_u_i_cdr(t2);
t15=C_u_i_cdr(t14);
t16=C_a_i_cons(&a,2,C_SCHEME_FALSE,t15);
t17=C_a_i_cons(&a,2,t13,t16);
t18=t5;
f_10920(t18,C_a_i_cons(&a,2,lf[130],t17));}
else{
t13=t5;
f_10920(t13,C_a_i_list(&a,2,lf[131],t2));}}}}}}}
else{
t6=t5;
f_10920(t6,C_a_i_list(&a,2,lf[131],t2));}}}

/* k10918 in k10889 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_10920(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,6)))){
C_save_and_reclaim_args((void *)trf_10920,2,t0,t1);}
a=C_alloc(3);
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=C_a_i_cons(&a,2,t1,t2);
/* irregex-core.scm:841: lp */
t4=((C_word*)((C_word*)t0)[3])[1];
f_10413(t4,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t3,((C_word*)t0)[8]);}

/* k11049 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11051(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,2)))){
C_save_and_reclaim((void *)f_11051,c,av);}
a=C_alloc(12);
t2=C_i_pairp(t1);
t3=(C_truep(t2)?C_u_i_car(t1):lf[110]);
t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_11057,a[2]=t3,a[3]=((C_word*)t0)[2],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],tmp=(C_word)a,a+=10,tmp);
t5=C_a_i_string(&a,1,((C_word*)t0)[8]);
/* irregex-core.scm:860: scheme#string->symbol */
t6=*((C_word*)lf[84]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t6;
av2[1]=t4;
av2[2]=t5;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k11055 in k11049 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11057(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,4)))){
C_save_and_reclaim((void *)f_11057,c,av);}
a=C_alloc(11);
t2=(
/* irregex-core.scm:862: sre-repeater? */
  f_16506(((C_word*)t0)[2])
);
if(C_truep(t2)){
/* irregex-core.scm:863: chicken.base#error */
t3=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[3];
av2[2]=lf[137];
av2[3]=((C_word*)t0)[4];
av2[4]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}
else{
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_11072,a[2]=((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)[2],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);
/* irregex-core.scm:864: sre-empty? */
t4=lf[139];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[2];
f_16238(3,av2);}}}

/* k11070 in k11055 in k11049 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11072(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(19,c,6)))){
C_save_and_reclaim((void *)f_11072,c,av);}
a=C_alloc(19);
if(C_truep(t1)){
/* irregex-core.scm:865: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[138];
av2[3]=((C_word*)t0)[3];
av2[4]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(5,av2);}}
else{
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[5],C_fix(1));
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[5],C_fix(1));
t4=C_a_i_list2(&a,2,((C_word*)t0)[6],((C_word*)t0)[7]);
t5=C_i_cdr(((C_word*)t0)[4]);
t6=C_a_i_cons(&a,2,t4,t5);
/* irregex-core.scm:867: lp */
t7=((C_word*)((C_word*)t0)[8])[1];
f_10413(t7,((C_word*)t0)[2],t2,t3,((C_word*)t0)[9],t6,((C_word*)t0)[10]);}}

/* k11141 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11143(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_11143,c,av);}
/* irregex-core.scm:875: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10413(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],C_SCHEME_END_OF_LIST,t1);}

/* a11172 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11173(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,2)))){
C_save_and_reclaim((void *)f_11173,c,av);}
a=C_alloc(10);
t4=C_fixnum_greater_or_equal_p(t3,((C_word*)t0)[2]);
t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_11183,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,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(t4)){
t6=t5;
f_11183(t6,t4);}
else{
t6=C_i_string_ref(((C_word*)t0)[3],t3);
t7=t5;
f_11183(t7,C_i_not(C_eqp(C_make_character(41),t6)));}}

/* k11181 in a11172 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_11183(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,0,3)))){
C_save_and_reclaim_args((void *)trf_11183,2,t0,t1);}
a=C_alloc(9);
if(C_truep(t1)){
/* irregex-core.scm:883: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[143];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}
else{
t2=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
t3=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_11205,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[2],a[5]=t2,a[6]=t3,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:884: collect */
t5=((C_word*)((C_word*)t0)[9])[1];
f_10494(t5,t4);}}

/* k11203 in k11181 in a11172 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11205(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_11205,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:884: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k11238 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11240(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,2)))){
C_save_and_reclaim((void *)f_11240,c,av);}
a=C_alloc(8);
t2=C_fixnum_plus(t1,((C_word*)t0)[2]);
t3=C_fixnum_plus(t1,C_fix(1));
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11255,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=t3,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:890: collect */
t5=((C_word*)((C_word*)t0)[7])[1];
f_10494(t5,t4);}

/* k11253 in k11238 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11255(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_11255,c,av);}
/* irregex-core.scm:890: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10413(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t1,((C_word*)t0)[7]);}

/* k11279 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11281(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_11281,c,av);}
/* irregex-core.scm:892: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10413(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],C_SCHEME_END_OF_LIST,t1);}

/* k11302 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11304(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_11304,c,av);}
/* irregex-core.scm:894: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10413(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],lf[145],t1);}

/* k11325 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11327(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_11327,c,av);}
/* irregex-core.scm:897: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10413(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],lf[146],t1);}

/* k11367 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11369(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_11369,c,av);}
/* irregex-core.scm:906: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10413(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],lf[148],t1);}

/* k11390 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11392(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_11392,c,av);}
/* irregex-core.scm:909: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10413(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],lf[149],t1);}

/* k11393 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11395(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(16,c,4)))){
C_save_and_reclaim((void *)f_11395,c,av);}
a=C_alloc(16);
if(C_truep(t1)){
t2=C_fixnum_plus(t1,C_fix(1));
t3=C_fixnum_plus(t1,C_fix(1));
t4=C_fixnum_not(C_fix(1));
t5=C_fixnum_and(((C_word*)t0)[2],t4);
t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11425,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=t3,a[6]=t5,a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11429,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
t8=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[6],C_fix(3));
/* irregex-core.scm:917: scheme#substring */
t9=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t9;
av2[1]=t7;
av2[2]=((C_word*)t0)[7];
av2[3]=t8;
av2[4]=t1;
((C_proc)(void*)(*((C_word*)t9+1)))(5,av2);}}
else{
/* irregex-core.scm:920: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[4];
av2[2]=lf[150];
av2[3]=((C_word*)t0)[7];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}}

/* k11419 in k11423 in k11393 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11421(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_11421,c,av);}
/* irregex-core.scm:916: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10413(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t1);}

/* k11423 in k11393 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11425(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,2)))){
C_save_and_reclaim((void *)f_11425,c,av);}
a=C_alloc(14);
t2=C_a_i_list(&a,2,t1,lf[120]);
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11421,a[2]=((C_word*)t0)[2],a[3]=((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);
/* irregex-core.scm:919: save */
t4=((C_word*)((C_word*)t0)[7])[1];
f_10819(t4,t3);}

/* k11427 in k11393 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11429(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_11429,c,av);}
/* irregex-core.scm:917: scheme#string->symbol */
t2=*((C_word*)lf[84]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k11479 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11481(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_11481,c,av);}
/* irregex-core.scm:922: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10413(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],lf[151],t1);}

/* k11504 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11506(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(16,c,4)))){
C_save_and_reclaim((void *)f_11506,c,av);}
a=C_alloc(16);
t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11509,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11543,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
t4=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[7],C_fix(3));
/* irregex-core.scm:934: scheme#substring */
t5=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t5;
av2[1]=t3;
av2[2]=((C_word*)t0)[3];
av2[3]=t4;
av2[4]=t1;
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}

/* k11507 in k11504 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11509(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(24,c,3)))){
C_save_and_reclaim((void *)f_11509,c,av);}
a=C_alloc(24);
if(C_truep(C_i_not(t1))){
/* irregex-core.scm:936: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[153];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}
else{
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[4],C_fix(1));
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[4],C_fix(1));
t4=C_fixnum_not(C_fix(1));
t5=C_fixnum_and(((C_word*)t0)[5],t4);
t6=C_a_i_list(&a,2,t1,lf[109]);
t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11539,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=t3,a[6]=t5,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:938: save */
t8=((C_word*)((C_word*)t0)[7])[1];
f_10819(t8,t7);}}

/* k11537 in k11507 in k11504 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11539(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_11539,c,av);}
/* irregex-core.scm:937: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10413(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t1);}

/* k11541 in k11504 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11543(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_11543,c,av);}
/* irregex-core.scm:934: scheme#string->number */
t2=*((C_word*)lf[85]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k11556 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11558(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,4)))){
C_save_and_reclaim((void *)f_11558,c,av);}
a=C_alloc(15);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11561,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11586,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
t4=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[6],C_fix(3));
/* irregex-core.scm:941: scheme#substring */
t5=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t5;
av2[1]=t3;
av2[2]=((C_word*)t0)[7];
av2[3]=t4;
av2[4]=t1;
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}

/* k11559 in k11556 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11561(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(24,c,2)))){
C_save_and_reclaim((void *)f_11561,c,av);}
a=C_alloc(24);
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(1));
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(1));
t4=C_fixnum_not(C_fix(1));
t5=C_fixnum_and(((C_word*)t0)[3],t4);
t6=C_a_i_list(&a,2,t1,lf[109]);
t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11582,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t2,a[5]=t3,a[6]=t5,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:943: save */
t8=((C_word*)((C_word*)t0)[6])[1];
f_10819(t8,t7);}

/* k11580 in k11559 in k11556 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11582(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_11582,c,av);}
/* irregex-core.scm:942: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10413(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t1);}

/* k11584 in k11556 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11586(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_11586,c,av);}
/* irregex-core.scm:941: scheme#string->symbol */
t2=*((C_word*)lf[84]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k11607 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11609(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_11609,c,av);}
/* irregex-core.scm:945: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10413(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],lf[154],t1);}

/* lp2 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_11640(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word t26;
C_word t27;
C_word t28;
C_word t29;
C_word t30;
C_word t31;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(38,0,4)))){
C_save_and_reclaim_args((void *)trf_11640,5,t0,t1,t2,t3,t4);}
a=C_alloc(38);
t5=C_SCHEME_UNDEFINED;
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11643,a[2]=t4,a[3]=t3,a[4]=((C_word)li74),tmp=(C_word)a,a+=5,tmp);
t9=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11652,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word)li75),tmp=(C_word)a,a+=5,tmp));
if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[3]))){
/* irregex-core.scm:962: chicken.base#error */
t10=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t10;
av2[1]=t1;
av2[2]=lf[158];
av2[3]=((C_word*)t0)[4];
av2[4]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t10+1)))(5,av2);}}
else{
t10=C_i_string_ref(((C_word*)t0)[4],t2);
switch(t10){
case C_make_character(105):
t11=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t12=(
/* irregex-core.scm:966: join */
  f_11643(t5,C_fix(2))
);
/* irregex-core.scm:966: lp2 */
t28=t1;
t29=t11;
t30=t12;
t31=t4;
t1=t28;
t2=t29;
t3=t30;
t4=t31;
goto loop;
case C_make_character(109):
t11=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t12=(
/* irregex-core.scm:968: join */
  f_11643(t5,C_fix(4))
);
/* irregex-core.scm:968: lp2 */
t28=t1;
t29=t11;
t30=t12;
t31=t4;
t1=t28;
t2=t29;
t3=t30;
t4=t31;
goto loop;
case C_make_character(120):
t11=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t12=(
/* irregex-core.scm:970: join */
  f_11643(t5,C_fix(16))
);
/* irregex-core.scm:970: lp2 */
t28=t1;
t29=t11;
t30=t12;
t31=t4;
t1=t28;
t2=t29;
t3=t30;
t4=t31;
goto loop;
case C_make_character(117):
t11=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t12=(
/* irregex-core.scm:973: join */
  f_11643(t5,C_fix(32))
);
/* irregex-core.scm:973: lp2 */
t28=t1;
t29=t11;
t30=t12;
t31=t4;
t1=t28;
t2=t29;
t3=t30;
t4=t31;
goto loop;
case C_make_character(45):
t11=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:976: lp2 */
t28=t1;
t29=t11;
t30=t3;
t31=C_i_not(t4);
t1=t28;
t2=t29;
t3=t30;
t4=t31;
goto loop;
case C_make_character(41):
t11=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t12=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t13=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_11796,a[2]=t7,a[3]=((C_word*)t0)[7],a[4]=t1,a[5]=t11,a[6]=t12,a[7]=t3,a[8]=((C_word*)t0)[8],tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:978: collect */
t14=((C_word*)((C_word*)t0)[9])[1];
f_10494(t14,t13);
case C_make_character(58):
t11=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t12=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t13=(
/* irregex-core.scm:981: new-res */
  f_11652(C_a_i(&a,6),((C_word*)t7)[1],C_SCHEME_END_OF_LIST)
);
t14=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_11827,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[7],a[5]=t1,a[6]=t11,a[7]=t12,a[8]=t3,a[9]=t13,tmp=(C_word)a,a+=10,tmp);
/* irregex-core.scm:982: collect */
t15=((C_word*)((C_word*)t0)[9])[1];
f_10494(t15,t14);
default:
/* irregex-core.scm:984: chicken.base#error */
t11=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t11;
av2[1]=t1;
av2[2]=lf[159];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t11+1)))(4,av2);}}}}

/* join in lp2 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static C_word C_fcall f_11643(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_stack_overflow_check;{}
if(C_truep(((C_word*)t0)[2])){
t2=lf[64];
t3=lf[64];
return(C_fixnum_and(((C_word*)t0)[3],C_fixnum_not(t1)));}
else{
t2=lf[63];
t3=lf[63];
return((C_truep(t1)?C_fixnum_or(((C_word*)t0)[3],t1):((C_word*)t0)[3]));}}

/* new-res in lp2 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static C_word C_fcall f_11652(C_word *a,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_stack_overflow_check;{}
t2=C_fixnum_and(((C_word*)t0)[2],C_fix(32));
t3=C_eqp(C_fix(32),t2);
t4=C_fixnum_and(((C_word*)t0)[3],C_fix(32));
t5=C_eqp(C_fix(32),t4);
t6=C_eqp(t3,t5);
return((C_truep(t6)?t1:(C_truep(t5)?C_a_i_cons(&a,2,lf[156],t1):C_a_i_cons(&a,2,lf[157],t1))));}

/* k11794 in lp2 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11796(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,6)))){
C_save_and_reclaim((void *)f_11796,c,av);}
a=C_alloc(6);
t2=(
/* irregex-core.scm:978: new-res */
  f_11652(C_a_i(&a,6),((C_word*)((C_word*)t0)[2])[1],t1)
);
/* irregex-core.scm:978: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k11825 in lp2 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11827(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,6)))){
C_save_and_reclaim((void *)f_11827,c,av);}
a=C_alloc(6);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[3]);
/* irregex-core.scm:981: lp */
t4=((C_word*)((C_word*)t0)[4])[1];
f_10413(t4,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8],((C_word*)t0)[9],t3);}

/* k11916 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11918(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_11918,c,av);}
a=C_alloc(3);
t2=C_i_cdar(((C_word*)t0)[2]);
t3=C_a_i_cons(&a,2,t1,t2);
/* irregex-core.scm:989: lp */
t4=((C_word*)((C_word*)t0)[3])[1];
f_10413(t4,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t3,C_u_i_cdr(((C_word*)t0)[2]));}

/* a11932 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11933(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_11933,c,av);}
a=C_alloc(9);
t4=C_fixnum_plus(t3,C_fix(1));
t5=C_fixnum_plus(t3,C_fix(1));
t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_11953,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t4,a[6]=t5,a[7]=((C_word*)t0)[3],a[8]=((C_word*)t0)[4],tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:997: collect */
t7=((C_word*)((C_word*)t0)[5])[1];
f_10494(t7,t6);}

/* k11951 in a11932 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11953(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_11953,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:997: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k11955 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11957(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_11957,c,av);}{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=0;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=t1;
C_apply(4,av2);}}

/* k11974 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_11976(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,6)))){
C_save_and_reclaim_args((void *)trf_11976,2,t0,t1);}
a=C_alloc(8);
if(C_truep(t1)){
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(1));
/* irregex-core.scm:1004: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],t2,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);}
else{
t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11985,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[2],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1006: collect/single */
t3=((C_word*)((C_word*)t0)[10])[1];
f_10514(t3,t2);}}

/* k11983 in k11974 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_11985(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,4)))){
C_save_and_reclaim((void *)f_11985,c,av);}
a=C_alloc(15);
if(C_truep(C_i_nullp(t1))){
/* irregex-core.scm:1009: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[174];
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}
else{
t2=C_i_car(t1);
t3=C_u_i_cdr(t1);
t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_12001,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
t5=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[6],C_fix(1));
/* irregex-core.scm:1013: string-scan-char */
t6=lf[54];{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t6;
av2[1]=t4;
av2[2]=((C_word*)t0)[7];
av2[3]=C_make_character(125);
av2[4]=t5;
((C_proc)(void*)(*((C_word*)t6+1)))(5,av2);}}}

/* k11999 in k11983 in k11974 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12001(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(17,c,4)))){
C_save_and_reclaim((void *)f_12001,c,av);}
a=C_alloc(17);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12004,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|2,a[1]=(C_word)f_12129,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
t4=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[8],C_fix(1));
/* irregex-core.scm:1014: scheme#substring */
t5=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t5;
av2[1]=t3;
av2[2]=((C_word*)t0)[9];
av2[3]=t4;
av2[4]=t1;
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}

/* k12002 in k11999 in k11983 in k11974 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12004(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,2)))){
C_save_and_reclaim((void *)f_12004,c,av);}
a=C_alloc(10);
t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_12007,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);
/* irregex-core.scm:1016: scheme#string->number */
t3=*((C_word*)lf[85]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=C_i_car(t1);
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k12005 in k12002 in k11999 in k11983 in k11974 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12007(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_12007,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_12010,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);
if(C_truep(C_i_pairp(C_u_i_cdr(((C_word*)t0)[3])))){
/* irregex-core.scm:1018: scheme#string->number */
t3=*((C_word*)lf[85]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=C_i_cadr(((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
f_12010(2,av2);}}}

/* k12008 in k12005 in k12002 in k11999 in k11983 in k11974 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12010(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,2)))){
C_save_and_reclaim((void *)f_12010,c,av);}
a=C_alloc(12);
t2=C_i_not(((C_word*)t0)[2]);
t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12019,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[6],a[7]=((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(t2)){
t4=t3;
f_12019(t4,t2);}
else{
if(C_truep(C_i_pairp(C_u_i_cdr(((C_word*)t0)[4])))){
t4=C_i_cadr(((C_word*)t0)[4]);
t5=C_i_equalp(lf[176],t4);
t6=C_i_not(t5);
t7=t3;
f_12019(t7,(C_truep(t6)?C_i_not(t1):C_SCHEME_FALSE));}
else{
t4=t3;
f_12019(t4,C_SCHEME_FALSE);}}}

/* k12017 in k12008 in k12005 in k12002 in k11999 in k11983 in k11974 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_12019(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(25,0,6)))){
C_save_and_reclaim_args((void *)trf_12019,2,t0,t1);}
a=C_alloc(25);
if(C_truep(t1)){
/* irregex-core.scm:1024: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[175];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}
else{
if(C_truep(C_i_nullp(C_u_i_cdr(((C_word*)t0)[3])))){
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[4],C_fix(1));
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[4],C_fix(1));
t4=C_a_i_list(&a,3,lf[134],((C_word*)t0)[5],((C_word*)t0)[6]);
t5=C_a_i_cons(&a,2,t4,((C_word*)t0)[7]);
/* irregex-core.scm:1026: lp */
t6=((C_word*)((C_word*)t0)[8])[1];
f_10413(t6,((C_word*)t0)[2],t2,t3,((C_word*)t0)[9],t5,((C_word*)t0)[10]);}
else{
if(C_truep(((C_word*)t0)[11])){
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[4],C_fix(1));
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[4],C_fix(1));
t4=C_a_i_list(&a,4,lf[133],((C_word*)t0)[5],((C_word*)t0)[11],((C_word*)t0)[6]);
t5=C_a_i_cons(&a,2,t4,((C_word*)t0)[7]);
/* irregex-core.scm:1028: lp */
t6=((C_word*)((C_word*)t0)[8])[1];
f_10413(t6,((C_word*)t0)[2],t2,t3,((C_word*)t0)[9],t5,((C_word*)t0)[10]);}
else{
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[4],C_fix(1));
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[4],C_fix(1));
t4=C_a_i_list(&a,3,lf[135],((C_word*)t0)[5],((C_word*)t0)[6]);
t5=C_a_i_cons(&a,2,t4,((C_word*)t0)[7]);
/* irregex-core.scm:1030: lp */
t6=((C_word*)((C_word*)t0)[8])[1];
f_10413(t6,((C_word*)t0)[2],t2,t3,((C_word*)t0)[9],t5,((C_word*)t0)[10]);}}}}

/* k12127 in k11999 in k11983 in k11974 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12129(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,5)))){
C_save_and_reclaim((void *)f_12129,c,av);}
a=C_alloc(8);
t2=C_i_string_length(t1);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8899,a[2]=t1,a[3]=t2,a[4]=t4,a[5]=((C_word)li84),tmp=(C_word)a,a+=6,tmp));
t6=((C_word*)t4)[1];
f_8899(t6,((C_word*)t0)[2],C_fix(0),C_fix(0),C_SCHEME_END_OF_LIST);}

/* k12203 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12205(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12205,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[178],t1);
/* irregex-core.scm:1040: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10413(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12230 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12232(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12232,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1042: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12253 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12255(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12255,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[79],t1);
/* irregex-core.scm:1044: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10413(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12280 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12282(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12282,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1046: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12307 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12309(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12309,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1048: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12338 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12340(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12340,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1051: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12373 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12375(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12375,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1054: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12396 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12398(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12398,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[185],t1);
/* irregex-core.scm:1057: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10413(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12419 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12421(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12421,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[186],t1);
/* irregex-core.scm:1059: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10413(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12450 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12452(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,6)))){
C_save_and_reclaim((void *)f_12452,c,av);}
a=C_alloc(6);
t2=C_a_i_cons(&a,2,lf[187],t1);
t3=C_a_i_cons(&a,2,((C_word*)t0)[2],t2);
/* irregex-core.scm:1061: lp */
t4=((C_word*)((C_word*)t0)[3])[1];
f_10413(t4,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t3,((C_word*)t0)[8]);}

/* k12473 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12475(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12475,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[187],t1);
/* irregex-core.scm:1064: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10413(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12496 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12498(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12498,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[80],t1);
/* irregex-core.scm:1066: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10413(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12519 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12521(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12521,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[188],t1);
/* irregex-core.scm:1068: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10413(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12542 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12544(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12544,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[183],t1);
/* irregex-core.scm:1071: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10413(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12565 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12567(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12567,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[184],t1);
/* irregex-core.scm:1073: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10413(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* a12577 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12578(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_12578,c,av);}
a=C_alloc(9);
t4=C_fixnum_plus(t3,C_fix(1));
t5=C_fixnum_plus(t3,C_fix(1));
t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12598,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t4,a[6]=t5,a[7]=((C_word*)t0)[3],a[8]=((C_word*)t0)[4],tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1077: collect */
t7=((C_word*)((C_word*)t0)[5])[1];
f_10494(t7,t6);}

/* k12596 in a12577 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12598(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12598,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1077: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12600 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12602(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_12602,c,av);}{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=0;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=t1;
C_apply(4,av2);}}

/* k12624 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_12626(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,0,4)))){
C_save_and_reclaim_args((void *)trf_12626,2,t0,t1);}
a=C_alloc(14);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12629,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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_a_i_fixnum_plus(&a,2,((C_word*)t0)[8],C_fix(2));
/* irregex-core.scm:1084: string-scan-char */
t4=lf[54];{
C_word av2[5];
av2[0]=t4;
av2[1]=t2;
av2[2]=((C_word*)t0)[4];
av2[3]=t1;
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}

/* k12627 in k12624 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12629(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,4)))){
C_save_and_reclaim((void *)f_12629,c,av);}
a=C_alloc(14);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12632,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);
if(C_truep(t1)){
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[8],C_fix(3));
/* irregex-core.scm:1085: scheme#substring */
t4=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t4;
av2[1]=t2;
av2[2]=((C_word*)t0)[4];
av2[3]=t3;
av2[4]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
f_12632(2,av2);}}}

/* k12630 in k12627 in k12624 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12632(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,3)))){
C_save_and_reclaim((void *)f_12632,c,av);}
a=C_alloc(10);
t2=C_fixnum_and(((C_word*)t0)[2],C_fix(2));
t3=C_eqp(C_fix(2),t2);
t4=(C_truep(t3)?lf[191]:lf[192]);
if(C_truep(C_i_not(((C_word*)t0)[3]))){
/* irregex-core.scm:1091: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t5;
av2[1]=((C_word*)t0)[4];
av2[2]=lf[193];
av2[3]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}
else{
t5=C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
t6=C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
t7=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_12671,a[2]=t4,a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[4],a[5]=t5,a[6]=t6,a[7]=((C_word*)t0)[2],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
/* irregex-core.scm:1093: scheme#string->symbol */
t8=*((C_word*)lf[84]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t8;
av2[1]=t7;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t8+1)))(3,av2);}}}

/* k12665 in k12669 in k12630 in k12627 in k12624 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12667(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12667,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1092: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12669 in k12630 in k12627 in k12624 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12671(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,2)))){
C_save_and_reclaim((void *)f_12671,c,av);}
a=C_alloc(15);
t2=C_a_i_list(&a,2,((C_word*)t0)[2],t1);
t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12667,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],tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1094: collect */
t4=((C_word*)((C_word*)t0)[9])[1];
f_10494(t4,t3);}

/* k12696 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12698(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,c,3)))){
C_save_and_reclaim((void *)f_12698,c,av);}
a=C_alloc(18);
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(2));
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_12706,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=t4,a[10]=((C_word)li86),tmp=(C_word)a,a+=11,tmp));
t6=((C_word*)t4)[1];
f_12706(t6,((C_word*)t0)[8],t2);}

/* lp2 in k12696 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_12706(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(29,0,6)))){
C_save_and_reclaim_args((void *)trf_12706,3,t0,t1,t2);}
a=C_alloc(29);
if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[2]))){
/* irregex-core.scm:1101: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,t1,t2,C_fixnum_plus(((C_word*)t0)[4],C_fix(2)),((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}
else{
t3=C_i_string_ref(((C_word*)t0)[8],t2);
t4=C_eqp(C_make_character(92),t3);
if(C_truep(t4)){
t5=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
if(C_truep(C_i_integer_greater_or_equalp(t5,((C_word*)t0)[2]))){
t6=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:1105: lp */
t7=((C_word*)((C_word*)t0)[3])[1];
f_10413(t7,t1,t6,C_fixnum_plus(((C_word*)t0)[4],C_fix(2)),((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}
else{
t6=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t7=C_i_string_ref(((C_word*)t0)[8],t6);
t8=C_eqp(C_make_character(69),t7);
if(C_truep(t8)){
t9=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t10=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t11=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12766,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=t9,a[6]=t10,a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1108: scheme#substring */
t12=*((C_word*)lf[46]+1);{
C_word av2[5];
av2[0]=t12;
av2[1]=t11;
av2[2]=((C_word*)t0)[8];
av2[3]=C_fixnum_plus(((C_word*)t0)[4],C_fix(2));
av2[4]=t2;
((C_proc)(void*)(*((C_word*)t12+1)))(5,av2);}}
else{
t9=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
/* irregex-core.scm:1110: lp2 */
t13=t1;
t14=t9;
t1=t13;
t2=t14;
goto loop;}}}
else{
t5=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:1112: lp2 */
t13=t1;
t14=t5;
t1=t13;
t2=t14;
goto loop;}}}

/* k12764 in lp2 in k12696 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12766(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12766,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:1107: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* a12808 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12809(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,2)))){
C_save_and_reclaim((void *)f_12809,c,av);}
a=C_alloc(8);
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12821,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t3,a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1116: collect */
t5=((C_word*)((C_word*)t0)[5])[1];
f_10494(t5,t4);}

/* k12819 in a12808 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12821(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12821,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1116: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12828 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12830(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(17,c,4)))){
C_save_and_reclaim((void *)f_12830,c,av);}
a=C_alloc(17);
t2=(C_truep(t1)?t1:((C_word*)t0)[2]);
t3=C_fixnum_and(((C_word*)t0)[3],C_fix(2));
t4=C_eqp(C_fix(2),t3);
t5=(C_truep(t4)?lf[191]:lf[192]);
t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12854,a[2]=t5,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t2,a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12858,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
t8=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[8],C_fix(1));
/* irregex-core.scm:1134: scheme#substring */
t9=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t9;
av2[1]=t7;
av2[2]=((C_word*)t0)[9];
av2[3]=t8;
av2[4]=t2;
((C_proc)(void*)(*((C_word*)t9+1)))(5,av2);}}

/* k12848 in k12852 in k12828 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12850(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12850,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1136: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12852 in k12828 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12854(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,2)))){
C_save_and_reclaim((void *)f_12854,c,av);}
a=C_alloc(14);
t2=C_a_i_list(&a,2,((C_word*)t0)[2],t1);
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12850,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);
/* irregex-core.scm:1135: collect */
t4=((C_word*)((C_word*)t0)[8])[1];
f_10494(t4,t3);}

/* k12856 in k12828 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12858(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_12858,c,av);}
/* irregex-core.scm:1133: scheme#string->number */
t2=*((C_word*)lf[85]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k12908 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12910(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12910,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1140: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12924 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12926(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_12926,c,av);}
/* irregex-core.scm:1144: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10413(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t1,((C_word*)t0)[7]);}

/* k12988 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_12990(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_12990,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[103],t1);
/* irregex-core.scm:1146: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10413(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k13014 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13016(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_13016,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1149: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k13043 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13045(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,6)))){
C_save_and_reclaim((void *)f_13045,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1152: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10413(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k13071 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13073(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_13073,c,av);}
/* irregex-core.scm:1155: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10413(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t1,((C_word*)t0)[7]);}

/* k13092 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13094(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,2)))){
C_save_and_reclaim((void *)f_13094,c,av);}
a=C_alloc(13);
t2=(C_truep(t1)?t1:C_a_i_fixnum_difference(&a,2,((C_word*)t0)[2],C_fix(1)));
t3=C_fixnum_plus(t2,C_fix(1));
t4=C_fixnum_plus(t2,C_fix(1));
t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13112,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=t4,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1161: collect */
t6=((C_word*)((C_word*)t0)[7])[1];
f_10494(t6,t5);}

/* k13110 in k13092 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13112(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_13112,c,av);}
/* irregex-core.scm:1161: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10413(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t1,((C_word*)t0)[7]);}

/* chicken.irregex#string-parse-hex-escape in k7718 in k7493 in k7490 */
static void C_fcall f_13226(C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(21,0,4)))){
C_save_and_reclaim_args((void *)trf_13226,4,t1,t2,t3,t4);}
a=C_alloc(21);
if(C_truep(C_fixnum_greater_or_equal_p(t3,t4))){
/* irregex-core.scm:1184: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t5;
av2[1]=t1;
av2[2]=lf[199];
av2[3]=t2;
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}
else{
t5=C_i_string_ref(t2,t3);
t6=C_eqp(C_make_character(123),t5);
if(C_truep(t6)){
t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13245,a[2]=t1,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
t8=C_a_i_fixnum_plus(&a,2,t3,C_fix(1));
t9=C_a_i_list(&a,1,t8);
t10=C_i_string_length(t2);
t11=C_i_pairp(t9);
t12=(C_truep(t11)?C_u_i_car(t9):C_fix(0));
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_8804,a[2]=t10,a[3]=t2,a[4]=t14,a[5]=((C_word)li91),tmp=(C_word)a,a+=6,tmp));
t16=((C_word*)t14)[1];
f_8804(t16,t7,t12);}
else{
t7=C_a_i_fixnum_plus(&a,2,t3,C_fix(1));
if(C_truep(C_fixnum_greater_or_equal_p(t7,t4))){
/* irregex-core.scm:1195: chicken.base#error */
t8=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t8;
av2[1]=t1;
av2[2]=lf[202];
av2[3]=t2;
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t8+1)))(5,av2);}}
else{
t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13291,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t9=C_a_i_fixnum_plus(&a,2,t3,C_fix(2));
/* irregex-core.scm:1197: scheme#substring */
t10=*((C_word*)lf[46]+1);{
C_word av2[5];
av2[0]=t10;
av2[1]=t8;
av2[2]=t2;
av2[3]=t3;
av2[4]=t9;
((C_proc)(void*)(*((C_word*)t10+1)))(5,av2);}}}}}

/* k13243 in chicken.irregex#string-parse-hex-escape in k7718 in k7493 in k7490 */
static void C_ccall f_13245(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,4)))){
C_save_and_reclaim((void *)f_13245,c,av);}
a=C_alloc(9);
if(C_truep(C_i_not(t1))){
/* irregex-core.scm:1188: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[200];
av2[3]=((C_word*)t0)[3];
av2[4]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(5,av2);}}
else{
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13257,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[4],C_fix(1));
/* irregex-core.scm:1189: scheme#substring */
t4=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t4;
av2[1]=t2;
av2[2]=((C_word*)t0)[3];
av2[3]=t3;
av2[4]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}}

/* k13255 in k13243 in chicken.irregex#string-parse-hex-escape in k7718 in k7493 in k7490 */
static void C_ccall f_13257(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,3)))){
C_save_and_reclaim((void *)f_13257,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13260,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1190: scheme#string->number */
t3=*((C_word*)lf[85]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=t1;
av2[3]=C_fix(16);
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* k13258 in k13255 in k13243 in chicken.irregex#string-parse-hex-escape in k7718 in k7493 in k7490 */
static void C_ccall f_13260(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,3)))){
C_save_and_reclaim((void *)f_13260,c,av);}
a=C_alloc(6);
if(C_truep(t1)){
t2=C_make_character(C_unfix(t1));
t3=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_a_i_list2(&a,2,t2,((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
/* irregex-core.scm:1193: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[201];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}}

/* k13289 in chicken.irregex#string-parse-hex-escape in k7718 in k7493 in k7490 */
static void C_ccall f_13291(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,3)))){
C_save_and_reclaim((void *)f_13291,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13294,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1198: scheme#string->number */
t3=*((C_word*)lf[85]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=t1;
av2[3]=C_fix(16);
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* k13292 in k13289 in chicken.irregex#string-parse-hex-escape in k7718 in k7493 in k7490 */
static void C_ccall f_13294(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,3)))){
C_save_and_reclaim((void *)f_13294,c,av);}
a=C_alloc(11);
if(C_truep(t1)){
t2=C_make_character(C_unfix(t1));
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(2));
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_a_i_list2(&a,2,t2,t3);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
/* irregex-core.scm:1201: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=lf[203];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}}

/* go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_13335(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word t26;
C_word t27;
C_word t28;
C_word t29;
C_word t30;
C_word t31;
C_word t32;
C_word t33;
C_word t34;
C_word t35;
C_word t36;
C_word t37;
C_word t38;
C_word t39;
C_word t40;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(25,0,5)))){
C_save_and_reclaim_args((void *)trf_13335,5,t0,t1,t2,t3,t4);}
a=C_alloc(25);
if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[2]))){
/* irregex-core.scm:1209: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word av2[6];
av2[0]=t5;
av2[1]=t1;
av2[2]=lf[161];
av2[3]=((C_word*)t0)[3];
av2[4]=t2;
av2[5]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t5+1)))(6,av2);}}
else{
t5=C_i_string_ref(((C_word*)t0)[3],t2);
switch(t5){
case C_make_character(93):
t6=C_i_vector_length(t4);
t7=C_eqp(t6,C_fix(0));
if(C_truep(t7)){
t8=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13370,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t8,tmp=(C_word)a,a+=5,tmp);
t10=C_a_i_cons(&a,2,C_make_character(93),C_make_character(93));
t11=C_a_i_vector1(&a,1,t10);
/* irregex-core.scm:3779: cset-union */
t12=lf[162];{
C_word av2[4];
av2[0]=t12;
av2[1]=t9;
av2[2]=t4;
av2[3]=t11;
f_26965(4,av2);}}
else{
t8=C_fixnum_and(((C_word*)t0)[5],C_fix(2));
t9=C_eqp(C_fix(2),t8);
t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13380,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
if(C_truep(t9)){
/* irregex-core.scm:1217: cset-case-insensitive */
f_27492(t10,t4);}
else{
t11=t10;{
C_word av2[2];
av2[0]=t11;
av2[1]=t4;
f_13380(2,av2);}}}
case C_make_character(45):
t6=C_eqp(t2,((C_word*)t0)[7]);
t7=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_13408,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t5,a[6]=t4,a[7]=t3,a[8]=((C_word*)t0)[3],a[9]=((C_word*)t0)[2],a[10]=((C_word*)t0)[8],tmp=(C_word)a,a+=11,tmp);
if(C_truep(t6)){
t8=t7;
f_13408(t8,t6);}
else{
t8=C_fixnum_plus(((C_word*)t0)[7],C_fix(1));
t9=C_eqp(t2,t8);
t10=(C_truep(t9)?C_eqp(C_make_character(94),C_i_string_ref(((C_word*)t0)[3],((C_word*)t0)[7])):C_SCHEME_FALSE);
if(C_truep(t10)){
t11=t7;
f_13408(t11,t10);}
else{
t11=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t12=t7;
f_13408(t12,C_eqp(C_make_character(93),C_i_string_ref(((C_word*)t0)[3],t11)));}}
case C_make_character(91):
t6=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t7=C_i_string_ref(((C_word*)t0)[3],t6);
t8=C_eqp(C_make_character(94),t7);
t9=(C_truep(t8)?C_a_i_fixnum_plus(&a,2,t2,C_fix(2)):C_a_i_fixnum_plus(&a,2,t2,C_fix(1)));
t10=C_i_string_ref(((C_word*)t0)[3],t9);
t11=C_eqp(t10,C_make_character(58));
if(C_truep(t11)){
t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13610,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t4,a[6]=t8,a[7]=t9,tmp=(C_word)a,a+=8,tmp);
t13=C_a_i_fixnum_plus(&a,2,t9,C_fix(1));
/* irregex-core.scm:1251: string-scan-char */
t14=lf[54];{
C_word av2[5];
av2[0]=t14;
av2[1]=t12;
av2[2]=((C_word*)t0)[3];
av2[3]=C_make_character(58);
av2[4]=t13;
((C_proc)(void*)(*((C_word*)t14+1)))(5,av2);}}
else{
t12=C_eqp(t10,C_make_character(61));
t13=(C_truep(t12)?t12:C_eqp(t10,C_make_character(46)));
if(C_truep(t13)){
/* irregex-core.scm:1260: chicken.base#error */
t14=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t14;
av2[1]=t1;
av2[2]=lf[173];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t14+1)))(4,av2);}}
else{
t14=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t15=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13693,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t14,tmp=(C_word)a,a+=5,tmp);
t16=C_a_i_cons(&a,2,C_make_character(91),C_make_character(91));
t17=C_a_i_vector1(&a,1,t16);
/* irregex-core.scm:3779: cset-union */
t18=lf[162];{
C_word av2[4];
av2[0]=t18;
av2[1]=t15;
av2[2]=t4;
av2[3]=t17;
f_26965(4,av2);}}}
case C_make_character(92):
t6=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t7=C_i_string_ref(((C_word*)t0)[3],t6);
t8=C_eqp(t7,C_make_character(100));
t9=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13732,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t4,a[6]=t7,a[7]=((C_word*)t0)[3],a[8]=((C_word*)t0)[2],tmp=(C_word)a,a+=9,tmp);
if(C_truep(t8)){
t10=t9;
f_13732(t10,t8);}
else{
t10=C_eqp(t7,C_make_character(68));
if(C_truep(t10)){
t11=t9;
f_13732(t11,t10);}
else{
t11=C_eqp(t7,C_make_character(115));
if(C_truep(t11)){
t12=t9;
f_13732(t12,t11);}
else{
t12=C_eqp(t7,C_make_character(83));
if(C_truep(t12)){
t13=t9;
f_13732(t13,t12);}
else{
t13=C_eqp(t7,C_make_character(119));
t14=t9;
f_13732(t14,(C_truep(t13)?t13:C_eqp(t7,C_make_character(87))));}}}}
default:
t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13849,a[2]=t5,a[3]=t2,a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=t4,a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)t0)[8])){
t7=C_fix(C_character_code(t5));
t8=t6;
f_13849(t8,C_and(C_fixnum_less_or_equal_p(C_fix(128),t7),C_fixnum_less_or_equal_p(t7,C_fix(255))));}
else{
t7=t6;
f_13849(t7,C_SCHEME_FALSE);}}}}

/* k13368 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13370(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_13370,c,av);}
/* irregex-core.scm:1214: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13335(t2,((C_word*)t0)[3],((C_word*)t0)[4],C_make_character(93),t1);}

/* k13378 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13380(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_13380,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13387,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
if(C_truep(((C_word*)t0)[4])){
/* irregex-core.scm:1218: cset-complement */
f_27482(t2,t1);}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=t1;
f_13387(2,av2);}}}

/* k13385 in k13378 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13387(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,4)))){
C_save_and_reclaim((void *)f_13387,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_26822,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_26824,a[2]=((C_word)li78),tmp=(C_word)a,a+=3,tmp);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_26842,a[2]=t2,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3728: scheme#vector->list */
t5=*((C_word*)lf[163]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t5;
av2[1]=t4;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k13406 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_13408(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(30,0,4)))){
C_save_and_reclaim_args((void *)trf_13408,2,t0,t1);}
a=C_alloc(30);
if(C_truep(t1)){
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(1));
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13418,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
t4=C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[5]);
t5=C_a_i_vector1(&a,1,t4);
/* irregex-core.scm:3779: cset-union */
t6=lf[162];{
C_word av2[4];
av2[0]=t6;
av2[1]=t3;
av2[2]=((C_word*)t0)[6];
av2[3]=t5;
f_26965(4,av2);}}
else{
if(C_truep(C_i_not(((C_word*)t0)[7]))){
/* irregex-core.scm:1227: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word av2[3];
av2[0]=t2;
av2[1]=((C_word*)t0)[4];
av2[2]=lf[166];
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}
else{
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(1));
t3=C_i_string_ref(((C_word*)t0)[8],t2);
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13435,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],a[5]=((C_word)li79),tmp=(C_word)a,a+=6,tmp);
t5=C_eqp(C_make_character(92),t3);
t6=(C_truep(t5)?C_i_assq(t3,lf[168]):C_SCHEME_FALSE);
t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13463,a[2]=((C_word*)t0)[4],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
if(C_truep(t6)){
t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13464,a[2]=((C_word*)t0)[2],a[3]=((C_word)li80),tmp=(C_word)a,a+=4,tmp);
t9=(
/* irregex-core.scm:1235: g1872 */
  f_13464(C_a_i(&a,6),t8,t6)
);{
C_word av2[4];
av2[0]=0;
av2[1]=((C_word*)t0)[4];
av2[2]=t4;
av2[3]=t9;
C_apply(4,av2);}}
else{
t8=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_13485,a[2]=((C_word*)t0)[2],a[3]=t7,a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=t3,a[7]=((C_word*)t0)[4],a[8]=t4,a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
t9=C_eqp(C_make_character(92),t3);
if(C_truep(t9)){
t10=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(2));
t11=t8;
f_13485(t11,C_eqp(C_i_string_ref(((C_word*)t0)[8],t10),C_make_character(120)));}
else{
t10=t8;
f_13485(t10,C_SCHEME_FALSE);}}}}}

/* k13416 in k13406 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13418(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_13418,c,av);}
/* irregex-core.scm:1225: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13335(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* a13434 in k13406 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13435(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,4)))){
C_save_and_reclaim((void *)f_13435,c,av);}
a=C_alloc(10);
if(C_truep(C_i_char_lessp(t2,((C_word*)t0)[2]))){
/* irregex-core.scm:1233: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t4;
av2[1]=t1;
av2[2]=lf[167];
av2[3]=((C_word*)t0)[2];
av2[4]=t2;
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}
else{
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13452,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
t5=C_a_i_cons(&a,2,((C_word*)t0)[2],t2);
t6=C_a_i_vector1(&a,1,t5);
/* irregex-core.scm:1234: cset-union */
t7=lf[162];{
C_word *av2=av;
av2[0]=t7;
av2[1]=t4;
av2[2]=((C_word*)t0)[4];
av2[3]=t6;
f_26965(4,av2);}}}

/* k13450 in a13434 in k13406 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13452(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_13452,c,av);}
/* irregex-core.scm:1234: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13335(t2,((C_word*)t0)[3],((C_word*)t0)[4],C_SCHEME_FALSE,t1);}

/* k13461 in k13406 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13463(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_13463,c,av);}{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=0;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=t1;
C_apply(4,av2);}}

/* g1872 in k13406 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static C_word C_fcall f_13464(C_word *a,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_stack_overflow_check;{}
t2=C_i_cdr(t1);
t3=C_fixnum_plus(((C_word*)t0)[2],C_fix(3));
return(C_a_i_list2(&a,2,t2,t3));}

/* k13483 in k13406 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_13485(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,4)))){
C_save_and_reclaim_args((void *)trf_13485,2,t0,t1);}
a=C_alloc(7);
if(C_truep(t1)){
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(3));
/* irregex-core.scm:1240: string-parse-hex-escape */
f_13226(((C_word*)t0)[3],((C_word*)t0)[4],t2,((C_word*)t0)[5]);}
else{
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13497,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
if(C_truep(((C_word*)t0)[9])){
t3=C_fix(C_character_code(((C_word*)t0)[6]));
t4=t2;
f_13497(t4,C_and(C_fixnum_less_or_equal_p(C_fix(128),t3),C_fixnum_less_or_equal_p(t3,C_fix(255))));}
else{
t3=t2;
f_13497(t3,C_SCHEME_FALSE);}}}

/* k13495 in k13483 in k13406 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_13497(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,0,4)))){
C_save_and_reclaim_args((void *)trf_13497,2,t0,t1);}
a=C_alloc(11);
if(C_truep(t1)){
t2=C_fix(C_character_code(((C_word*)t0)[2]));
t3=C_i_vector_ref(lf[170],t2);
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13507,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_a_i_fixnum_plus(&a,2,((C_word*)t0)[3],C_fix(1));
/* irregex-core.scm:1243: utf8-string-ref */
f_13960(t4,((C_word*)t0)[6],t5,t3);}
else{
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[3],C_fix(2));
t3=C_a_i_list2(&a,2,((C_word*)t0)[2],t2);{
C_word av2[4];
av2[0]=0;
av2[1]=((C_word*)t0)[4];
av2[2]=((C_word*)t0)[5];
av2[3]=t3;
C_apply(4,av2);}}}

/* k13505 in k13495 in k13483 in k13406 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13507(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,3)))){
C_save_and_reclaim((void *)f_13507,c,av);}
a=C_alloc(6);
t2=C_fixnum_plus(C_fixnum_plus(((C_word*)t0)[2],C_fix(1)),((C_word*)t0)[3]);
t3=C_a_i_list2(&a,2,t1,t2);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=0;
av2[1]=((C_word*)t0)[4];
av2[2]=((C_word*)t0)[5];
av2[3]=t3;
C_apply(4,av2);}}

/* k13608 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13610(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_13610,c,av);}
a=C_alloc(9);
t2=C_i_not(t1);
t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13619,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);
if(C_truep(t2)){
t4=t3;
f_13619(t4,t2);}
else{
t4=C_fixnum_plus(t1,C_fix(1));
t5=C_i_string_ref(((C_word*)t0)[3],t4);
t6=t3;
f_13619(t6,C_i_not(C_eqp(C_make_character(93),t5)));}}

/* k13617 in k13608 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_13619(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,0,4)))){
C_save_and_reclaim_args((void *)trf_13619,2,t0,t1);}
a=C_alloc(18);
if(C_truep(t1)){
/* irregex-core.scm:1253: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[171];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}
else{
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13625,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13645,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13649,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
t5=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[8],C_fix(1));
/* irregex-core.scm:1256: scheme#substring */
t6=*((C_word*)lf[46]+1);{
C_word av2[5];
av2[0]=t6;
av2[1]=t4;
av2[2]=((C_word*)t0)[3];
av2[3]=t5;
av2[4]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t6+1)))(5,av2);}}}

/* k13623 in k13617 in k13608 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13625(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_13625,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13628,a[2]=((C_word*)t0)[2],a[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)[6])){
/* irregex-core.scm:1257: cset-complement */
f_27482(t2,t1);}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=t1;
f_13628(2,av2);}}}

/* k13626 in k13623 in k13617 in k13608 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13628(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,3)))){
C_save_and_reclaim((void *)f_13628,c,av);}
a=C_alloc(10);
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13638,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1258: cset-union */
t4=lf[162];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[5];
av2[3]=t1;
f_26965(4,av2);}}

/* k13636 in k13626 in k13623 in k13617 in k13608 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13638(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_13638,c,av);}
/* irregex-core.scm:1258: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13335(t2,((C_word*)t0)[3],((C_word*)t0)[4],C_SCHEME_FALSE,t1);}

/* k13643 in k13617 in k13608 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13645(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_13645,c,av);}
/* irregex-core.scm:1254: sre->cset */
f_26377(((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}

/* k13647 in k13617 in k13608 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13649(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_13649,c,av);}
/* irregex-core.scm:1255: scheme#string->symbol */
t2=*((C_word*)lf[84]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k13691 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13693(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_13693,c,av);}
/* irregex-core.scm:1262: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13335(t2,((C_word*)t0)[3],((C_word*)t0)[4],C_make_character(91),t1);}

/* k13730 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_13732(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(20,0,4)))){
C_save_and_reclaim_args((void *)trf_13732,2,t0,t1);}
a=C_alloc(20);
if(C_truep(t1)){
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13742,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13746,a[2]=t3,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13750,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
t6=C_a_i_string(&a,2,C_make_character(92),((C_word*)t0)[6]);
/* irregex-core.scm:1269: string->sre */
t7=*((C_word*)lf[102]+1);{
C_word av2[3];
av2[0]=t7;
av2[1]=t5;
av2[2]=t6;
((C_proc)(void*)(*((C_word*)t7+1)))(3,av2);}}
else{
t2=C_eqp(((C_word*)t0)[6],C_make_character(120));
if(C_truep(t2)){
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13765,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=((C_word)li81),tmp=(C_word)a,a+=5,tmp);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13777,a[2]=((C_word*)t0)[4],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
t5=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(2));
/* irregex-core.scm:1274: string-parse-hex-escape */
f_13226(t4,((C_word*)t0)[7],t5,((C_word*)t0)[8]);}
else{
t3=C_i_assq(((C_word*)t0)[6],lf[168]);
t4=(C_truep(t3)?C_i_cdr(t3):((C_word*)t0)[6]);
t5=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(2));
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13796,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t5,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
t7=C_a_i_cons(&a,2,t4,t4);
t8=C_a_i_vector1(&a,1,t7);
/* irregex-core.scm:3779: cset-union */
t9=lf[162];{
C_word av2[4];
av2[0]=t9;
av2[1]=t6;
av2[2]=((C_word*)t0)[5];
av2[3]=t8;
f_26965(4,av2);}}}}

/* k13740 in k13730 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13742(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_13742,c,av);}
/* irregex-core.scm:1267: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13335(t2,((C_word*)t0)[3],((C_word*)t0)[4],C_SCHEME_FALSE,t1);}

/* k13744 in k13730 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13746(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_13746,c,av);}
/* irregex-core.scm:1268: cset-union */
t2=lf[162];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=t1;
f_26965(4,av2);}}

/* k13748 in k13730 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13750(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_13750,c,av);}
/* irregex-core.scm:1269: sre->cset */
f_26377(((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}

/* a13764 in k13730 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13765(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,3)))){
C_save_and_reclaim((void *)f_13765,c,av);}
a=C_alloc(11);
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13773,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
t5=C_a_i_cons(&a,2,t2,t2);
t6=C_a_i_vector1(&a,1,t5);
/* irregex-core.scm:3779: cset-union */
t7=lf[162];{
C_word *av2=av;
av2[0]=t7;
av2[1]=t4;
av2[2]=((C_word*)t0)[3];
av2[3]=t6;
f_26965(4,av2);}}

/* k13771 in a13764 in k13730 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13773(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_13773,c,av);}
/* irregex-core.scm:1273: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13335(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* k13775 in k13730 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13777(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_13777,c,av);}{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=0;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=t1;
C_apply(4,av2);}}

/* k13794 in k13730 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13796(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_13796,c,av);}
/* irregex-core.scm:1278: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13335(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* k13847 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_13849(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(16,0,4)))){
C_save_and_reclaim_args((void *)trf_13849,2,t0,t1);}
a=C_alloc(16);
if(C_truep(t1)){
t2=C_fix(C_character_code(((C_word*)t0)[2]));
t3=C_i_vector_ref(lf[170],t2);
t4=C_fixnum_plus(((C_word*)t0)[3],t3);
t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13863,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t4,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[3],a[8]=t3,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1283: utf8-string-ref */
f_13960(t5,((C_word*)t0)[7],((C_word*)t0)[3],t3);}
else{
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[3],C_fix(1));
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13881,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t2,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
t4=C_a_i_cons(&a,2,((C_word*)t0)[2],((C_word*)t0)[2]);
t5=C_a_i_vector1(&a,1,t4);
/* irregex-core.scm:3779: cset-union */
t6=lf[162];{
C_word av2[4];
av2[0]=t6;
av2[1]=t3;
av2[2]=((C_word*)t0)[6];
av2[3]=t5;
f_26965(4,av2);}}}

/* k13861 in k13847 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13863(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,4)))){
C_save_and_reclaim((void *)f_13863,c,av);}
a=C_alloc(10);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13867,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13871,a[2]=t2,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1284: utf8-string-ref */
f_13960(t3,((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);}

/* k13865 in k13861 in k13847 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13867(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_13867,c,av);}
/* irregex-core.scm:1282: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13335(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* k13869 in k13861 in k13847 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13871(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,3)))){
C_save_and_reclaim((void *)f_13871,c,av);}
a=C_alloc(5);
t2=C_a_i_cons(&a,2,t1,t1);
t3=C_a_i_vector1(&a,1,t2);
/* irregex-core.scm:3779: cset-union */
t4=lf[162];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=t3;
f_26965(4,av2);}}

/* k13879 in k13847 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_13881(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_13881,c,av);}
/* irregex-core.scm:1285: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13335(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* chicken.irregex#high-char? in k7718 in k7493 in k7490 */
static void C_ccall f_13939(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_13939,c,av);}
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_fixnum_less_or_equal_p(C_fix(128),C_fix(C_character_code(t2)));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* chicken.irregex#utf8-string-ref in k7718 in k7493 in k7490 */
static void C_fcall f_13960(C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word t26;
C_word t27;
C_word t28;
C_word t29;
C_word t30;
C_word t31;
C_word t32;
C_word t33;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,0,5)))){
C_save_and_reclaim_args((void *)trf_13960,4,t1,t2,t3,t4);}
a=C_alloc(9);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13963,a[2]=t2,a[3]=((C_word)li94),tmp=(C_word)a,a+=4,tmp);
switch(t4){
case C_fix(1):
t6=t1;{
C_word av2[2];
av2[0]=t6;
av2[1]=C_i_string_ref(t2,t3);
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}
case C_fix(2):
t6=(
/* irregex-core.scm:1346: byte */
  f_13963(t5,t3)
);
t7=C_fixnum_and(t6,C_fix(31));
t8=C_fixnum_shift_left(t7,C_fix(6));
t9=(
/* irregex-core.scm:1347: byte */
  f_13963(t5,C_fixnum_plus(t3,C_fix(1)))
);
t10=C_fixnum_and(t9,C_fix(63));
t11=C_a_i_fixnum_plus(&a,2,t8,t10);
t12=t1;{
C_word av2[2];
av2[0]=t12;
av2[1]=C_make_character(C_unfix(t11));
((C_proc)(void*)(*((C_word*)t12+1)))(2,av2);}
case C_fix(3):
t6=(
/* irregex-core.scm:1350: byte */
  f_13963(t5,t3)
);
t7=C_fixnum_and(t6,C_fix(15));
t8=C_fixnum_shift_left(t7,C_fix(12));
t9=(
/* irregex-core.scm:1351: byte */
  f_13963(t5,C_fixnum_plus(t3,C_fix(1)))
);
t10=C_fixnum_and(t9,C_fix(63));
t11=C_fixnum_shift_left(t10,C_fix(6));
t12=(
/* irregex-core.scm:1352: byte */
  f_13963(t5,C_fixnum_plus(t3,C_fix(2)))
);
t13=C_fixnum_and(t12,C_fix(63));
t14=C_fixnum_plus(C_fixnum_plus(t8,t11),t13);
t15=t1;{
C_word av2[2];
av2[0]=t15;
av2[1]=C_make_character(C_unfix(t14));
((C_proc)(void*)(*((C_word*)t15+1)))(2,av2);}
case C_fix(4):
t6=(
/* irregex-core.scm:1355: byte */
  f_13963(t5,t3)
);
t7=C_fixnum_and(t6,C_fix(7));
t8=C_fixnum_shift_left(t7,C_fix(18));
t9=(
/* irregex-core.scm:1356: byte */
  f_13963(t5,C_fixnum_plus(t3,C_fix(1)))
);
t10=C_fixnum_and(t9,C_fix(63));
t11=C_fixnum_shift_left(t10,C_fix(12));
t12=(
/* irregex-core.scm:1357: byte */
  f_13963(t5,C_fixnum_plus(t3,C_fix(2)))
);
t13=C_fixnum_and(t12,C_fix(63));
t14=C_fixnum_shift_left(t13,C_fix(6));
t15=(
/* irregex-core.scm:1358: byte */
  f_13963(t5,C_fixnum_plus(t3,C_fix(3)))
);
t16=C_fixnum_and(t15,C_fix(63));
t17=C_fixnum_plus(C_fixnum_plus(C_fixnum_plus(t8,t11),t14),t16);
t18=t1;{
C_word av2[2];
av2[0]=t18;
av2[1]=C_make_character(C_unfix(t17));
((C_proc)(void*)(*((C_word*)t18+1)))(2,av2);}
default:
/* irregex-core.scm:1360: chicken.base#error */
t6=*((C_word*)lf[30]+1);{
C_word av2[6];
av2[0]=t6;
av2[1]=t1;
av2[2]=lf[205];
av2[3]=t2;
av2[4]=t4;
av2[5]=t3;
((C_proc)(void*)(*((C_word*)t6+1)))(6,av2);}}}

/* byte in chicken.irregex#utf8-string-ref in k7718 in k7493 in k7490 */
static C_word C_fcall f_13963(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_stack_overflow_check;{}
t2=C_i_string_ref(((C_word*)t0)[2],t1);
return(C_fix(C_character_code(t2)));}

/* lp in collect/single in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_14155(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_14155,3,t0,t1,t2);}
a=C_alloc(5);
t3=C_eqp(t2,C_fix(0));
if(C_truep(t3)){
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=C_fix(0);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=C_i_string_ref(((C_word*)t0)[2],t2);
t5=C_fix(C_character_code(t4));
t6=C_fixnum_lessp(t5,C_fix(128));
t7=(C_truep(t6)?t6:C_fixnum_greater_or_equal_p(t5,C_fix(192)));
if(C_truep(t7)){
t8=t1;{
C_word av2[2];
av2[0]=t8;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t8+1)))(2,av2);}}
else{
t8=C_a_i_fixnum_difference(&a,2,t2,C_fix(1));
/* irregex-core.scm:1369: lp */
t10=t1;
t11=t8;
t1=t10;
t2=t11;
goto loop;}}}

/* chicken.irregex#utf8-lowest-digit-of-length in k7718 in k7493 in k7490 */
static void C_fcall f_14193(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,3)))){
C_save_and_reclaim_args((void *)trf_14193,2,t1,t2);}
switch(t2){
case C_fix(1):
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_fix(0);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}
case C_fix(2):
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_fix(192);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}
case C_fix(3):
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_fix(224);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}
case C_fix(4):
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_fix(240);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}
default:
/* irregex-core.scm:1374: chicken.base#error */
t3=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t3;
av2[1]=t1;
av2[2]=lf[207];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}}

/* chicken.irregex#char->utf8-list in k7718 in k7493 in k7490 */
static void C_fcall f_14269(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,3)))){
C_save_and_reclaim_args((void *)trf_14269,2,t1,t2);}
a=C_alloc(12);
t3=C_fix(C_character_code(t2));
if(C_truep(C_fixnum_less_or_equal_p(t3,C_fix(127)))){
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=C_a_i_list1(&a,1,t3);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
if(C_truep(C_fixnum_less_or_equal_p(t3,C_fix(2047)))){
t4=C_fixnum_shift_right(t3,C_fix(6));
t5=C_fixnum_or(C_fix(192),t4);
t6=C_fixnum_and(t3,C_fix(63));
t7=C_fixnum_or(C_fix(128),t6);
t8=t1;{
C_word av2[2];
av2[0]=t8;
av2[1]=C_a_i_list2(&a,2,t5,t7);
((C_proc)(void*)(*((C_word*)t8+1)))(2,av2);}}
else{
if(C_truep(C_fixnum_less_or_equal_p(t3,C_fix(65535)))){
t4=C_fixnum_shift_right(t3,C_fix(12));
t5=C_fixnum_or(C_fix(224),t4);
t6=C_fixnum_shift_right(t3,C_fix(6));
t7=C_fixnum_and(t6,C_fix(63));
t8=C_fixnum_or(C_fix(128),t7);
t9=C_fixnum_and(t3,C_fix(63));
t10=C_fixnum_or(C_fix(128),t9);
t11=t1;{
C_word av2[2];
av2[0]=t11;
av2[1]=C_a_i_list3(&a,3,t5,t8,t10);
((C_proc)(void*)(*((C_word*)t11+1)))(2,av2);}}
else{
if(C_truep(C_fixnum_less_or_equal_p(t3,C_fix(2097151)))){
t4=C_fixnum_shift_right(t3,C_fix(18));
t5=C_fixnum_or(C_fix(240),t4);
t6=C_fixnum_shift_right(t3,C_fix(12));
t7=C_fixnum_and(t6,C_fix(63));
t8=C_fixnum_or(C_fix(128),t7);
t9=C_fixnum_shift_right(t3,C_fix(6));
t10=C_fixnum_and(t9,C_fix(63));
t11=C_fixnum_or(C_fix(128),t10);
t12=C_fixnum_and(t3,C_fix(63));
t13=C_fixnum_or(C_fix(128),t12);
t14=t1;{
C_word av2[2];
av2[0]=t14;
av2[1]=C_a_i_list4(&a,4,t5,t8,t11,t13);
((C_proc)(void*)(*((C_word*)t14+1)))(2,av2);}}
else{
/* irregex-core.scm:1397: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t4;
av2[1]=t1;
av2[2]=lf[209];
av2[3]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}}}}}

/* k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_14410(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_14410,c,av);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14413,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);
/* irregex-core.scm:1401: char->utf8-list */
f_14269(t2,((C_word*)t0)[8]);}

/* k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_14413(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(36,c,4)))){
C_save_and_reclaim((void *)f_14413,c,av);}
a=C_alloc(36);
t2=C_eqp(C_u_i_length(((C_word*)t0)[2]),C_u_i_length(t1));
if(C_truep(C_i_not(t2))){
t3=C_i_length(((C_word*)t0)[2]);
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14972,a[2]=((C_word*)t0)[3],a[3]=((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);
t5=C_i_car(((C_word*)t0)[2]);
t6=C_make_character(C_unfix(t5));
t7=C_u_i_car(((C_word*)t0)[2]);
t8=C_fixnum_less_or_equal_p(t7,C_fix(127));
t9=(C_truep(t8)?C_a_i_list(&a,3,lf[52],t6,C_make_character(127)):C_a_i_list(&a,3,lf[52],t6,C_make_character(255)));
t10=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t11=t10;
t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
t13=((C_word*)t12)[1];
t14=C_u_i_cdr(((C_word*)t0)[2]);
t15=C_i_check_list_2(t14,lf[211]);
t16=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15252,a[2]=t9,a[3]=t3,a[4]=t1,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
t17=C_SCHEME_UNDEFINED;
t18=(*a=C_VECTOR_TYPE|1,a[1]=t17,tmp=(C_word)a,a+=2,tmp);
t19=C_set_block_item(t18,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15254,a[2]=t12,a[3]=t18,a[4]=t13,a[5]=((C_word)li111),tmp=(C_word)a,a+=6,tmp));
t20=((C_word*)t18)[1];
f_15254(t20,t16,t14);}
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_14439,a[2]=t4,a[3]=((C_word)li113),tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
f_14439(t6,((C_word*)t0)[8],((C_word*)t0)[2],t1);}}

/* k14432 in k14970 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_14434(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,4)))){
C_save_and_reclaim((void *)f_14434,c,av);}
a=C_alloc(12);
t2=C_a_i_list2(&a,2,((C_word*)t0)[2],t1);
t3=(
/* irregex-core.scm:1403: sre-alternate */
  f_18145(C_a_i(&a,3),t2)
);
t4=C_a_i_cons(&a,2,t3,((C_word*)t0)[3]);
/* irregex-core.scm:1517: lp */
t5=((C_word*)((C_word*)t0)[4])[1];
f_15410(t5,((C_word*)t0)[5],((C_word*)t0)[6],t4,((C_word*)t0)[7]);}

/* lp in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_fcall f_14439(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,3)))){
C_save_and_reclaim_args((void *)trf_14439,4,t0,t1,t2,t3);}
a=C_alloc(6);
t4=C_i_car(t2);
t5=C_i_car(t3);
t6=C_eqp(t4,t5);
if(C_truep(t6)){
t7=C_u_i_car(t2);
t8=C_make_character(C_unfix(t7));
if(C_truep(C_i_nullp(C_u_i_cdr(t2)))){
t9=C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
/* irregex-core.scm:1408: sre-sequence */
t10=t1;{
C_word av2[2];
av2[0]=t10;
av2[1]=(
/* irregex-core.scm:1408: sre-sequence */
  f_18122(C_a_i(&a,3),t9)
);
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}
else{
t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14471,a[2]=t8,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1411: lp */
t12=t9;
t13=C_u_i_cdr(t2);
t14=C_u_i_cdr(t3);
t1=t12;
t2=t13;
t3=t14;
goto loop;}}
else{
t7=C_fixnum_plus(C_u_i_car(t2),C_fix(1));
t8=C_u_i_car(t3);
t9=C_eqp(t7,t8);
if(C_truep(t9)){
t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14496,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1413: unicode-range-up-from */
f_14683(t10,t2);}
else{
t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14511,a[2]=t2,a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1416: unicode-range-up-from */
f_14683(t10,t2);}}}

/* k14469 in lp in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_14471(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,1)))){
C_save_and_reclaim((void *)f_14471,c,av);}
a=C_alloc(9);
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);
/* irregex-core.scm:1408: sre-sequence */
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=(
/* irregex-core.scm:1408: sre-sequence */
  f_18122(C_a_i(&a,3),t3)
);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* k14494 in lp in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_14496(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_14496,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14500,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1414: unicode-range-up-to */
f_14822(t2,((C_word*)t0)[3]);}

/* k14498 in k14494 in lp in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_14500(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,1)))){
C_save_and_reclaim((void *)f_14500,c,av);}
a=C_alloc(9);
t2=C_a_i_list2(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1413: sre-alternate */
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=(
/* irregex-core.scm:1413: sre-alternate */
  f_18145(C_a_i(&a,3),t2)
);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* k14509 in lp in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_14511(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(28,c,3)))){
C_save_and_reclaim((void *)f_14511,c,av);}
a=C_alloc(28);
t2=C_i_car(((C_word*)t0)[2]);
t3=C_fixnum_plus(t2,C_fix(1));
t4=C_make_character(C_unfix(t3));
t5=C_i_car(((C_word*)t0)[3]);
t6=C_fixnum_difference(t5,C_fix(1));
t7=C_make_character(C_unfix(t6));
t8=(C_truep(C_u_i_char_equalp(t4,t7))?t4:C_a_i_list(&a,3,lf[52],t4,t7));
t9=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t10=t9;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
t12=((C_word*)t11)[1];
t13=C_u_i_cdr(((C_word*)t0)[2]);
t14=C_i_check_list_2(t13,lf[211]);
t15=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15343,a[2]=t8,a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
t16=C_SCHEME_UNDEFINED;
t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
t18=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15345,a[2]=t11,a[3]=t17,a[4]=t12,a[5]=((C_word)li112),tmp=(C_word)a,a+=6,tmp));
t19=((C_word*)t17)[1];
f_15345(t19,t15,t13);}

/* k14517 in k15341 in k14509 in lp in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_14519(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,1)))){
C_save_and_reclaim((void *)f_14519,c,av);}
a=C_alloc(12);
t2=C_a_i_list3(&a,3,((C_word*)t0)[2],((C_word*)t0)[3],t1);
/* irregex-core.scm:1416: sre-alternate */
t3=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t3;
av2[1]=(
/* irregex-core.scm:1416: sre-alternate */
  f_18145(C_a_i(&a,3),t2)
);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* chicken.irregex#unicode-range-helper in k7718 in k7493 in k7490 */
static void C_fcall f_14545(C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(28,0,3)))){
C_save_and_reclaim_args((void *)trf_14545,5,t1,t2,t3,t4,t5);}
a=C_alloc(28);
if(C_truep(C_i_nullp(t3))){
t6=t1;{
C_word av2[2];
av2[0]=t6;
av2[1]=t5;
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
t6=C_i_cdr(t3);
t7=C_u_i_car(t3);
t8=C_a_i_cons(&a,2,t7,t4);
t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14575,a[2]=t5,a[3]=t1,a[4]=t2,a[5]=t6,a[6]=t8,tmp=(C_word)a,a+=7,tmp);
t10=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t11=t10;
t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
t13=((C_word*)t12)[1];
t14=C_i_check_list_2(t4,lf[211]);
t15=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14585,a[2]=t3,a[3]=t9,a[4]=t2,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|5,a[1]=(C_word)f_14647,a[2]=t12,a[3]=t17,a[4]=t13,a[5]=((C_word)li99),tmp=(C_word)a,a+=6,tmp));
t19=((C_word*)t17)[1];
f_14647(t19,t15,t4);}}

/* k14573 in chicken.irregex#unicode-range-helper in k7718 in k7493 in k7490 */
static void C_ccall f_14575(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,5)))){
C_save_and_reclaim((void *)f_14575,c,av);}
a=C_alloc(6);
t2=(
/* irregex-core.scm:1427: sre-sequence */
  f_18122(C_a_i(&a,3),t1)
);
t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[2]);
/* irregex-core.scm:1423: unicode-range-helper */
f_14545(((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t3);}

/* k14583 in chicken.irregex#unicode-range-helper in k7718 in k7493 in k7490 */
static void C_ccall f_14585(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_14585,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14593,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1429: one */
t3=((C_word*)t0)[4];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=C_u_i_car(((C_word*)t0)[2]);
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k14591 in k14583 in chicken.irregex#unicode-range-helper in k7718 in k7493 in k7490 */
static void C_ccall f_14593(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,c,3)))){
C_save_and_reclaim((void *)f_14593,c,av);}
a=C_alloc(18);
t2=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t3=t2;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=((C_word*)t4)[1];
t6=C_u_i_cdr(((C_word*)t0)[2]);
t7=C_i_check_list_2(t6,lf[211]);
t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14609,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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|5,a[1]=(C_word)f_14611,a[2]=t4,a[3]=t10,a[4]=t5,a[5]=((C_word)li98),tmp=(C_word)a,a+=6,tmp));
t12=((C_word*)t10)[1];
f_14611(t12,t8,t6);}

/* k14607 in k14591 in k14583 in chicken.irregex#unicode-range-helper in k7718 in k7493 in k7490 */
static void C_ccall f_14609(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,3)))){
C_save_and_reclaim((void *)f_14609,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1428: ##sys#append */
t3=*((C_word*)lf[118]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* map-loop2065 in k14591 in k14583 in chicken.irregex#unicode-range-helper in k7718 in k7493 in k7490 */
static void C_fcall f_14611(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,2)))){
C_save_and_reclaim_args((void *)trf_14611,3,t0,t1,t2);}
a=C_alloc(12);
if(C_truep(C_i_pairp(t2))){
t3=C_a_i_list(&a,3,lf[52],C_make_character(128),C_make_character(255));
t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
t5=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t4);
t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t4);
t8=t1;
t9=C_slot(t2,C_fix(1));
t1=t8;
t2=t9;
goto loop;}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[4],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* map-loop2039 in chicken.irregex#unicode-range-helper in k7718 in k7493 in k7490 */
static void C_fcall f_14647(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,2)))){
C_save_and_reclaim_args((void *)trf_14647,3,t0,t1,t2);}
a=C_alloc(3);
if(C_truep(C_i_pairp(t2))){
t3=C_slot(t2,C_fix(0));
t4=C_make_character(C_unfix(t3));
t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
t6=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t5);
t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
t9=t1;
t10=C_slot(t2,C_fix(1));
t1=t9;
t2=t10;
goto loop;}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[4],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* chicken.irregex#unicode-range-up-from in k7718 in k7493 in k7490 */
static void C_fcall f_14683(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,0,3)))){
C_save_and_reclaim_args((void *)trf_14683,2,t1,t2);}
a=C_alloc(13);
t3=C_i_car(t2);
t4=C_make_character(C_unfix(t3));
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14703,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14705,a[2]=t2,a[3]=((C_word)li101),tmp=(C_word)a,a+=4,tmp);
t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14814,a[2]=t5,a[3]=t6,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1443: ##sys#fast-reverse */
t8=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t8;
av2[1]=t7;
av2[2]=C_u_i_cdr(t2);
((C_proc)(void*)(*((C_word*)t8+1)))(3,av2);}}

/* k14701 in chicken.irregex#unicode-range-up-from in k7718 in k7493 in k7490 */
static void C_ccall f_14703(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,1)))){
C_save_and_reclaim((void *)f_14703,c,av);}
a=C_alloc(12);
t2=(
/* irregex-core.scm:1439: sre-alternate */
  f_18145(C_a_i(&a,3),t1)
);
t3=C_a_i_list2(&a,2,((C_word*)t0)[2],t2);
/* irregex-core.scm:1437: sre-sequence */
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=(
/* irregex-core.scm:1437: sre-sequence */
  f_18122(C_a_i(&a,3),t3)
);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* a14704 in chicken.irregex#unicode-range-up-from in k7718 in k7493 in k7490 */
static void C_ccall f_14705(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,1)))){
C_save_and_reclaim((void *)f_14705,c,av);}
a=C_alloc(9);
t3=C_i_car(((C_word*)t0)[2]);
t4=C_fixnum_plus(t3,C_fix(1));
t5=C_make_character(C_unfix(t4));
t6=t1;{
C_word *av2=av;
av2[0]=t6;
av2[1]=C_a_i_list(&a,3,lf[52],t5,C_make_character(255));
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}

/* k14735 in k14812 in chicken.irregex#unicode-range-up-from in k7718 in k7493 in k7490 */
static void C_ccall f_14737(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,5)))){
C_save_and_reclaim((void *)f_14737,c,av);}
a=C_alloc(6);
t2=(
/* irregex-core.scm:1446: sre-sequence */
  f_18122(C_a_i(&a,3),t1)
);
t3=C_a_i_list1(&a,1,t2);
/* irregex-core.scm:1440: unicode-range-helper */
f_14545(((C_word*)t0)[2],((C_word*)t0)[3],((C_word*)t0)[4],C_SCHEME_END_OF_LIST,t3);}

/* k14742 in k14812 in chicken.irregex#unicode-range-up-from in k7718 in k7493 in k7490 */
static void C_ccall f_14744(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,3)))){
C_save_and_reclaim((void *)f_14744,c,av);}
a=C_alloc(12);
t2=C_i_check_list_2(t1,lf[211]);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14750,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,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_14768,a[2]=((C_word*)t0)[4],a[3]=t5,a[4]=((C_word*)t0)[5],a[5]=((C_word)li102),tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
f_14768(t7,t3,t1);}

/* k14748 in k14742 in k14812 in chicken.irregex#unicode-range-up-from in k7718 in k7493 in k7490 */
static void C_ccall f_14750(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_14750,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14766,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1449: last */
f_9187(t2,((C_word*)t0)[3]);}

/* k14764 in k14748 in k14742 in k14812 in chicken.irregex#unicode-range-up-from in k7718 in k7493 in k7490 */
static void C_ccall f_14766(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,3)))){
C_save_and_reclaim((void *)f_14766,c,av);}
a=C_alloc(12);
t2=C_make_character(C_unfix(t1));
t3=C_a_i_list(&a,3,lf[52],t2,C_make_character(255));
t4=C_a_i_list(&a,1,t3);
/* irregex-core.scm:1447: scheme#append */
t5=*((C_word*)lf[73]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t5;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}

/* map-loop2101 in k14742 in k14812 in chicken.irregex#unicode-range-up-from in k7718 in k7493 in k7490 */
static void C_fcall f_14768(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,2)))){
C_save_and_reclaim_args((void *)trf_14768,3,t0,t1,t2);}
a=C_alloc(3);
if(C_truep(C_i_pairp(t2))){
t3=C_slot(t2,C_fix(0));
t4=C_make_character(C_unfix(t3));
t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
t6=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t5);
t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
t9=t1;
t10=C_slot(t2,C_fix(1));
t1=t9;
t2=t10;
goto loop;}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[4],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k14806 in k14812 in chicken.irregex#unicode-range-up-from in k7718 in k7493 in k7490 */
static void C_ccall f_14808(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_14808,c,av);}
/* irregex-core.scm:1448: ##sys#fast-reverse */
t2=*((C_word*)lf[69]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=C_i_cdr(t1);
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k14812 in chicken.irregex#unicode-range-up-from in k7718 in k7493 in k7490 */
static void C_ccall f_14814(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(19,c,2)))){
C_save_and_reclaim((void *)f_14814,c,av);}
a=C_alloc(19);
t2=C_i_cdr(t1);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14737,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t4=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t5=t4;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=((C_word*)t6)[1];
t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14744,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=t6,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14808,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1448: ##sys#fast-reverse */
t10=*((C_word*)lf[69]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t10;
av2[1]=t9;
av2[2]=C_u_i_cdr(((C_word*)t0)[4]);
((C_proc)(void*)(*((C_word*)t10+1)))(3,av2);}}

/* chicken.irregex#unicode-range-up-to in k7718 in k7493 in k7490 */
static void C_fcall f_14822(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,0,3)))){
C_save_and_reclaim_args((void *)trf_14822,2,t1,t2);}
a=C_alloc(13);
t3=C_i_car(t2);
t4=C_make_character(C_unfix(t3));
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14842,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14844,a[2]=t2,a[3]=((C_word)li104),tmp=(C_word)a,a+=4,tmp);
t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14953,a[2]=t5,a[3]=t6,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1459: ##sys#fast-reverse */
t8=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t8;
av2[1]=t7;
av2[2]=C_u_i_cdr(t2);
((C_proc)(void*)(*((C_word*)t8+1)))(3,av2);}}

/* k14840 in chicken.irregex#unicode-range-up-to in k7718 in k7493 in k7490 */
static void C_ccall f_14842(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,1)))){
C_save_and_reclaim((void *)f_14842,c,av);}
a=C_alloc(12);
t2=(
/* irregex-core.scm:1455: sre-alternate */
  f_18145(C_a_i(&a,3),t1)
);
t3=C_a_i_list2(&a,2,((C_word*)t0)[2],t2);
/* irregex-core.scm:1453: sre-sequence */
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=(
/* irregex-core.scm:1453: sre-sequence */
  f_18122(C_a_i(&a,3),t3)
);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* a14843 in chicken.irregex#unicode-range-up-to in k7718 in k7493 in k7490 */
static void C_ccall f_14844(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,1)))){
C_save_and_reclaim((void *)f_14844,c,av);}
a=C_alloc(9);
t3=C_i_car(((C_word*)t0)[2]);
t4=C_fixnum_difference(t3,C_fix(1));
t5=C_make_character(C_unfix(t4));
t6=t1;{
C_word *av2=av;
av2[0]=t6;
av2[1]=C_a_i_list(&a,3,lf[52],C_make_character(128),t5);
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}

/* k14874 in k14951 in chicken.irregex#unicode-range-up-to in k7718 in k7493 in k7490 */
static void C_ccall f_14876(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,5)))){
C_save_and_reclaim((void *)f_14876,c,av);}
a=C_alloc(6);
t2=(
/* irregex-core.scm:1462: sre-sequence */
  f_18122(C_a_i(&a,3),t1)
);
t3=C_a_i_list1(&a,1,t2);
/* irregex-core.scm:1456: unicode-range-helper */
f_14545(((C_word*)t0)[2],((C_word*)t0)[3],((C_word*)t0)[4],C_SCHEME_END_OF_LIST,t3);}

/* k14881 in k14951 in chicken.irregex#unicode-range-up-to in k7718 in k7493 in k7490 */
static void C_ccall f_14883(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,3)))){
C_save_and_reclaim((void *)f_14883,c,av);}
a=C_alloc(12);
t2=C_i_check_list_2(t1,lf[211]);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14889,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,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_14907,a[2]=((C_word*)t0)[4],a[3]=t5,a[4]=((C_word*)t0)[5],a[5]=((C_word)li105),tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
f_14907(t7,t3,t1);}

/* k14887 in k14881 in k14951 in chicken.irregex#unicode-range-up-to in k7718 in k7493 in k7490 */
static void C_ccall f_14889(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_14889,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14905,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1466: last */
f_9187(t2,((C_word*)t0)[3]);}

/* k14903 in k14887 in k14881 in k14951 in chicken.irregex#unicode-range-up-to in k7718 in k7493 in k7490 */
static void C_ccall f_14905(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,3)))){
C_save_and_reclaim((void *)f_14905,c,av);}
a=C_alloc(12);
t2=C_make_character(C_unfix(t1));
t3=C_a_i_list(&a,3,lf[52],C_make_character(128),t2);
t4=C_a_i_list(&a,1,t3);
/* irregex-core.scm:1463: scheme#append */
t5=*((C_word*)lf[73]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t5;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}

/* map-loop2136 in k14881 in k14951 in chicken.irregex#unicode-range-up-to in k7718 in k7493 in k7490 */
static void C_fcall f_14907(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,2)))){
C_save_and_reclaim_args((void *)trf_14907,3,t0,t1,t2);}
a=C_alloc(3);
if(C_truep(C_i_pairp(t2))){
t3=C_slot(t2,C_fix(0));
t4=C_make_character(C_unfix(t3));
t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
t6=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t5);
t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
t9=t1;
t10=C_slot(t2,C_fix(1));
t1=t9;
t2=t10;
goto loop;}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[4],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k14945 in k14951 in chicken.irregex#unicode-range-up-to in k7718 in k7493 in k7490 */
static void C_ccall f_14947(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_14947,c,av);}
/* irregex-core.scm:1464: ##sys#fast-reverse */
t2=*((C_word*)lf[69]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=C_i_cdr(t1);
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k14951 in chicken.irregex#unicode-range-up-to in k7718 in k7493 in k7490 */
static void C_ccall f_14953(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(19,c,2)))){
C_save_and_reclaim((void *)f_14953,c,av);}
a=C_alloc(19);
t2=C_i_cdr(t1);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14876,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t4=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t5=t4;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=((C_word*)t6)[1];
t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14883,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=t6,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14947,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1464: ##sys#fast-reverse */
t10=*((C_word*)lf[69]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t10;
av2[1]=t9;
av2[2]=C_u_i_cdr(((C_word*)t0)[4]);
((C_proc)(void*)(*((C_word*)t10+1)))(3,av2);}}

/* k14970 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_14972(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_14972,c,av);}
a=C_alloc(11);
t2=(
/* irregex-core.scm:1470: sre-alternate */
  f_18145(C_a_i(&a,3),t1)
);
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14434,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],tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1404: unicode-range-up-to */
f_14822(t3,((C_word*)t0)[7]);}

/* g2208 in k15250 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_fcall f_14981(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,2)))){
C_save_and_reclaim_args((void *)trf_14981,3,t0,t1,t2);}
a=C_alloc(10);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14993,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15069,a[2]=t3,a[3]=t2,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1483: utf8-lowest-digit-of-length */
f_14193(t4,C_fixnum_plus(C_fixnum_plus(t2,((C_word*)t0)[2]),C_fix(1)));}

/* k14991 in g2208 in k15250 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_fcall f_14993(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,0,2)))){
C_save_and_reclaim_args((void *)trf_14993,2,t0,t1);}
a=C_alloc(11);
t2=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t3=t2;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=((C_word*)t4)[1];
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15005,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:1487: zero-to */
f_9089(t6,C_fixnum_plus(((C_word*)t0)[3],((C_word*)t0)[4]));}

/* k15003 in k14991 in g2208 in k15250 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15005(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,3)))){
C_save_and_reclaim((void *)f_15005,c,av);}
a=C_alloc(12);
t2=C_i_check_list_2(t1,lf[211]);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15011,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,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_15013,a[2]=((C_word*)t0)[4],a[3]=t5,a[4]=((C_word*)t0)[5],a[5]=((C_word)li107),tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
f_15013(t7,t3,t1);}

/* k15009 in k15003 in k14991 in g2208 in k15250 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15011(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,1)))){
C_save_and_reclaim((void *)f_15011,c,av);}
a=C_alloc(6);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1481: sre-sequence */
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=(
/* irregex-core.scm:1481: sre-sequence */
  f_18122(C_a_i(&a,3),t2)
);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* map-loop2225 in k15003 in k14991 in g2208 in k15250 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_fcall f_15013(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,2)))){
C_save_and_reclaim_args((void *)trf_15013,3,t0,t1,t2);}
a=C_alloc(12);
if(C_truep(C_i_pairp(t2))){
t3=C_a_i_list(&a,3,lf[52],C_make_character(128),C_make_character(255));
t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
t5=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t4);
t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t4);
t8=t1;
t9=C_slot(t2,C_fix(1));
t1=t8;
t2=t9;
goto loop;}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[4],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k15059 in k15067 in g2208 in k15250 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15061(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,1)))){
C_save_and_reclaim((void *)f_15061,c,av);}
a=C_alloc(9);
t2=C_make_character(C_unfix(t1));
t3=((C_word*)t0)[2];
f_14993(t3,C_a_i_list(&a,3,lf[52],((C_word*)t0)[3],t2));}

/* k15067 in g2208 in k15250 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15069(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,3)))){
C_save_and_reclaim((void *)f_15069,c,av);}
a=C_alloc(13);
t2=C_make_character(C_unfix(t1));
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15061,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
t4=C_fixnum_plus(C_fixnum_plus(((C_word*)t0)[3],((C_word*)t0)[4]),C_fix(1));
switch(t4){
case C_fix(1):
t5=((C_word*)t0)[2];
f_14993(t5,C_a_i_list(&a,3,lf[52],t2,C_make_character(127)));
case C_fix(2):
t5=((C_word*)t0)[2];
f_14993(t5,C_a_i_list(&a,3,lf[52],t2,C_make_character(223)));
case C_fix(3):
t5=((C_word*)t0)[2];
f_14993(t5,C_a_i_list(&a,3,lf[52],t2,C_make_character(239)));
case C_fix(4):
t5=((C_word*)t0)[2];
f_14993(t5,C_a_i_list(&a,3,lf[52],t2,C_make_character(247)));
default:
/* irregex-core.scm:1379: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t5;
av2[1]=t3;
av2[2]=lf[215];
av2[3]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}}

/* k15074 in k15250 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15076(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,3)))){
C_save_and_reclaim((void *)f_15076,c,av);}
a=C_alloc(14);
t2=C_i_check_list_2(t1,lf[211]);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15082,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=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15184,a[2]=((C_word*)t0)[5],a[3]=t5,a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word)li110),tmp=(C_word)a,a+=7,tmp));
t7=((C_word*)t5)[1];
f_15184(t7,t3,t1);}

/* k15080 in k15074 in k15250 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15082(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_15082,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,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]=t1,tmp=(C_word)a,a+=6,tmp);
t3=C_i_car(((C_word*)t0)[2]);
t4=C_fixnum_difference(t3,C_fix(1));
t5=C_make_character(C_unfix(t4));
t6=C_fix(C_character_code(t5));
/* irregex-core.scm:1492: utf8-lowest-digit-of-length */
f_14193(t2,C_i_vector_ref(lf[170],t6));}

/* k15112 in k15164 in k15080 in k15074 in k15250 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15114(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,4)))){
C_save_and_reclaim((void *)f_15114,c,av);}
a=C_alloc(9);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
t3=(
/* irregex-core.scm:1490: sre-sequence */
  f_18122(C_a_i(&a,3),t2)
);
t4=C_a_i_list1(&a,1,t3);
/* irregex-core.scm:1471: scheme#append */
t5=*((C_word*)lf[73]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t5;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}

/* map-loop2265 in k15164 in k15080 in k15074 in k15250 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_fcall f_15116(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,2)))){
C_save_and_reclaim_args((void *)trf_15116,3,t0,t1,t2);}
a=C_alloc(12);
if(C_truep(C_i_pairp(t2))){
t3=C_a_i_list(&a,3,lf[52],C_make_character(128),C_make_character(255));
t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
t5=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t4);
t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t4);
t8=t1;
t9=C_slot(t2,C_fix(1));
t1=t8;
t2=t9;
goto loop;}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[4],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k15164 in k15080 in k15074 in k15250 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15166(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(28,c,3)))){
C_save_and_reclaim((void *)f_15166,c,av);}
a=C_alloc(28);
t2=C_make_character(C_unfix(t1));
t3=C_fixnum_difference(C_u_i_car(((C_word*)t0)[2]),C_fix(1));
t4=C_make_character(C_unfix(t3));
t5=C_a_i_list(&a,3,lf[52],t2,t4);
t6=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t7=t6;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
t9=((C_word*)t8)[1];
t10=C_u_i_cdr(((C_word*)t0)[2]);
t11=C_i_check_list_2(t10,lf[211]);
t12=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15114,a[2]=t5,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],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_15116,a[2]=t8,a[3]=t14,a[4]=t9,a[5]=((C_word)li109),tmp=(C_word)a,a+=6,tmp));
t16=((C_word*)t14)[1];
f_15116(t16,t12,t10);}

/* map-loop2202 in k15074 in k15250 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_fcall f_15184(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_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_15184,3,t0,t1,t2);}
a=C_alloc(6);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15209,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);
/* irregex-core.scm:1479: g2208 */
t4=((C_word*)t0)[4];
f_14981(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[5],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k15207 in map-loop2202 in k15074 in k15250 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15209(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_15209,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
t3=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=((C_word*)((C_word*)t0)[3])[1];
f_15184(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* k15250 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15252(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(36,c,3)))){
C_save_and_reclaim((void *)f_15252,c,av);}
a=C_alloc(36);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
t3=(
/* irregex-core.scm:1473: sre-sequence */
  f_18122(C_a_i(&a,3),t2)
);
t4=C_a_i_list1(&a,1,t3);
t5=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t6=t5;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=((C_word*)t7)[1];
t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14981,a[2]=((C_word*)t0)[3],a[3]=((C_word)li108),tmp=(C_word)a,a+=4,tmp);
t10=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15076,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t4,a[5]=t7,a[6]=t9,a[7]=t8,tmp=(C_word)a,a+=8,tmp);
t11=C_i_length(((C_word*)t0)[4]);
t12=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[3],C_fix(1));
t13=C_s_a_u_i_integer_minus(&a,2,t11,t12);
/* irregex-core.scm:1488: zero-to */
f_9089(t10,t13);}

/* map-loop2172 in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_fcall f_15254(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,2)))){
C_save_and_reclaim_args((void *)trf_15254,3,t0,t1,t2);}
a=C_alloc(12);
if(C_truep(C_i_pairp(t2))){
t3=C_a_i_list(&a,3,lf[52],C_make_character(128),C_make_character(255));
t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
t5=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t4);
t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t4);
t8=t1;
t9=C_slot(t2,C_fix(1));
t1=t8;
t2=t9;
goto loop;}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[4],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k15341 in k14509 in lp in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15343(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_15343,c,av);}
a=C_alloc(11);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
t3=(
/* irregex-core.scm:1503: sre-sequence */
  f_18122(C_a_i(&a,3),t2)
);
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14519,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1418: unicode-range-up-to */
f_14822(t4,((C_word*)t0)[5]);}

/* map-loop2303 in k14509 in lp in k14411 in k14408 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_fcall f_15345(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,2)))){
C_save_and_reclaim_args((void *)trf_15345,3,t0,t1,t2);}
a=C_alloc(12);
if(C_truep(C_i_pairp(t2))){
t3=C_a_i_list(&a,3,lf[52],C_make_character(128),C_make_character(255));
t4=C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
t5=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t4);
t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t4);
t8=t1;
t9=C_slot(t2,C_fix(1));
t1=t8;
t2=t9;
goto loop;}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[4],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_fcall f_15400(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,2)))){
C_save_and_reclaim_args((void *)trf_15400,2,t1,t2);}
a=C_alloc(3);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15408,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1510: cset->plist */
f_26266(t3,t2);}

/* k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15408(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,5)))){
C_save_and_reclaim((void *)f_15408,c,av);}
a=C_alloc(6);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_15410,a[2]=t3,a[3]=((C_word)li114),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_15410(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}

/* lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_fcall f_15410(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,2)))){
C_save_and_reclaim_args((void *)trf_15410,5,t0,t1,t2,t3,t4);}
a=C_alloc(7);
if(C_truep(C_i_nullp(t2))){
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15424,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15428,a[2]=t4,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1512: ##sys#fast-reverse */
t7=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t7;
av2[1]=t6;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t7+1)))(3,av2);}}
else{
t5=C_i_car(t2);
t6=C_fix(C_character_code(t5));
t7=C_fixnum_less_or_equal_p(C_fix(128),t6);
t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15455,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=t1,a[6]=t4,tmp=(C_word)a,a+=7,tmp);
if(C_truep(t7)){
t9=t8;
f_15455(t9,t7);}
else{
t9=C_i_cadr(t2);
t10=t8;
f_15455(t10,C_fixnum_less_or_equal_p(C_fix(128),C_fix(C_character_code(t9))));}}}

/* k15422 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15424(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_15424,c,av);}
a=C_alloc(3);
/* irregex-core.scm:1512: sre-alternate */
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=(
/* irregex-core.scm:1512: sre-alternate */
  f_18145(C_a_i(&a,3),t1)
);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k15426 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15428(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,3)))){
C_save_and_reclaim((void *)f_15428,c,av);}
a=C_alloc(4);
if(C_truep(C_i_nullp(((C_word*)t0)[2]))){
/* irregex-core.scm:1512: scheme#append */
t2=*((C_word*)lf[73]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=t1;
av2[3]=C_SCHEME_END_OF_LIST;
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}
else{
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15446,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1515: ##sys#fast-reverse */
t3=*((C_word*)lf[69]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}}

/* k15444 in k15426 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15446(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,3)))){
C_save_and_reclaim((void *)f_15446,c,av);}
a=C_alloc(6);
t2=C_a_i_cons(&a,2,lf[52],t1);
t3=C_a_i_list1(&a,1,t2);
/* irregex-core.scm:1512: scheme#append */
t4=*((C_word*)lf[73]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}

/* k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_fcall f_15455(C_word t0,C_word t1){
C_word 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;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(16,0,4)))){
C_save_and_reclaim_args((void *)trf_15455,2,t0,t1);}
a=C_alloc(16);
if(C_truep(t1)){
t2=C_i_cddr(((C_word*)t0)[2]);
t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15470,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t2,a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
t4=C_u_i_car(((C_word*)t0)[2]);
t5=C_u_i_cdr(((C_word*)t0)[2]);
t6=C_u_i_car(t5);
t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14410,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]=t3,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1400: char->utf8-list */
f_14269(t7,t4);}
else{
t2=C_i_cddr(((C_word*)t0)[2]);
t3=C_u_i_cdr(((C_word*)t0)[2]);
t4=C_u_i_car(t3);
t5=C_u_i_car(((C_word*)t0)[2]);
t6=C_a_i_cons(&a,2,t5,((C_word*)t0)[6]);
t7=C_a_i_cons(&a,2,t4,t6);
/* irregex-core.scm:1520: lp */
t8=((C_word*)((C_word*)t0)[4])[1];
f_15410(t8,((C_word*)t0)[5],t2,((C_word*)t0)[3],t7);}}

/* k15468 in k15453 in lp in k15406 in chicken.irregex#cset->utf8-pattern in k7718 in k7493 in k7490 */
static void C_ccall f_15470(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,4)))){
C_save_and_reclaim((void *)f_15470,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:1517: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_15410(t3,((C_word*)t0)[4],((C_word*)t0)[5],t2,((C_word*)t0)[6]);}

/* adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_15522(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word t26;
C_word t27;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(29,0,4)))){
C_save_and_reclaim_args((void *)trf_15522,5,t0,t1,t2,t3,t4);}
a=C_alloc(29);
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15525,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t4,a[5]=((C_word)li204),tmp=(C_word)a,a+=6,tmp);
if(C_truep(C_i_pairp(t2))){
t6=C_u_i_car(t2);
t7=C_eqp(t6,lf[156]);
if(C_truep(t7)){
t8=(
/* irregex-core.scm:1530: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(t2))
);
/* irregex-core.scm:1530: adjust */
t24=t1;
t25=t8;
t26=C_SCHEME_TRUE;
t27=t4;
t1=t24;
t2=t25;
t3=t26;
t4=t27;
goto loop;}
else{
t8=C_eqp(t6,lf[157]);
if(C_truep(t8)){
t9=(
/* irregex-core.scm:1531: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(t2))
);
/* irregex-core.scm:1531: adjust */
t24=t1;
t25=t9;
t26=C_SCHEME_FALSE;
t27=t4;
t1=t24;
t2=t25;
t3=t26;
t4=t27;
goto loop;}
else{
t9=C_eqp(t6,lf[225]);
if(C_truep(t9)){
t10=C_u_i_car(t2);
t11=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t12=t11;
t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
t14=((C_word*)t13)[1];
t15=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15582,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word)li205),tmp=(C_word)a,a+=5,tmp);
t16=C_u_i_cdr(t2);
t17=C_i_check_list_2(t16,lf[211]);
t18=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15593,a[2]=t1,a[3]=t10,tmp=(C_word)a,a+=4,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|6,a[1]=(C_word)f_15595,a[2]=t13,a[3]=t20,a[4]=t15,a[5]=t14,a[6]=((C_word)li206),tmp=(C_word)a,a+=7,tmp));
t22=((C_word*)t20)[1];
f_15595(t22,t18,t16);}
else{
t10=C_eqp(t6,lf[226]);
if(C_truep(t10)){
t11=C_u_i_car(t2);
t12=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t13=t12;
t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
t15=((C_word*)t14)[1];
t16=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15643,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word)li207),tmp=(C_word)a,a+=5,tmp);
t17=C_u_i_cdr(t2);
t18=C_i_check_list_2(t17,lf[211]);
t19=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15654,a[2]=t1,a[3]=t11,tmp=(C_word)a,a+=4,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(t21,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15656,a[2]=t14,a[3]=t21,a[4]=t16,a[5]=t15,a[6]=((C_word)li208),tmp=(C_word)a,a+=7,tmp));
t23=((C_word*)t21)[1];
f_15656(t23,t19,t17);}
else{
t11=C_eqp(t6,lf[52]);
t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15697,a[2]=t3,a[3]=t1,a[4]=t2,a[5]=t4,a[6]=t6,a[7]=t5,tmp=(C_word)a,a+=8,tmp);
if(C_truep(t11)){
t13=t12;
f_15697(t13,t11);}
else{
t13=C_eqp(t6,lf[179]);
if(C_truep(t13)){
t14=t12;
f_15697(t14,t13);}
else{
t14=C_eqp(t6,lf[234]);
t15=t12;
f_15697(t15,(C_truep(t14)?t14:C_eqp(t6,lf[247])));}}}}}}}
else{
t6=C_eqp(t2,lf[124]);
if(C_truep(t6)){
t7=t1;{
C_word av2[2];
av2[0]=t7;
av2[1]=lf[274];
((C_proc)(void*)(*((C_word*)t7+1)))(2,av2);}}
else{
t7=C_eqp(t2,lf[125]);
if(C_truep(t7)){
t8=t1;{
C_word av2[2];
av2[0]=t8;
av2[1]=lf[275];
((C_proc)(void*)(*((C_word*)t8+1)))(2,av2);}}
else{
t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15905,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
if(C_truep(t3)){
t9=C_charp(t2);
t10=t8;
f_15905(t10,(C_truep(t9)?C_fixnum_less_or_equal_p(C_fix(128),C_fix(C_character_code(t2))):C_SCHEME_FALSE));}
else{
t9=t8;
f_15905(t9,C_SCHEME_FALSE);}}}}}

/* rec in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_15525(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,4)))){
C_save_and_reclaim_args((void *)trf_15525,3,t0,t1,t2);}
/* irregex-core.scm:1526: adjust */
t3=((C_word*)((C_word*)t0)[2])[1];
f_15522(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[4]);}

/* g2368 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_15582(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,4)))){
C_save_and_reclaim_args((void *)trf_15582,3,t0,t1,t2);}
/* irregex-core.scm:1533: adjust */
t3=((C_word*)((C_word*)t0)[2])[1];
f_15522(t3,t1,t2,((C_word*)t0)[3],C_SCHEME_FALSE);}

/* k15591 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15593(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_15593,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* map-loop2362 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_15595(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_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_15595,3,t0,t1,t2);}
a=C_alloc(6);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15620,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);
/* irregex-core.scm:1533: g2368 */
t4=((C_word*)t0)[4];
f_15582(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[5],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k15618 in map-loop2362 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15620(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_15620,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
t3=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=((C_word*)((C_word*)t0)[3])[1];
f_15595(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* g2395 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_15643(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,4)))){
C_save_and_reclaim_args((void *)trf_15643,3,t0,t1,t2);}
/* irregex-core.scm:1535: adjust */
t3=((C_word*)((C_word*)t0)[2])[1];
f_15522(t3,t1,t2,((C_word*)t0)[3],C_SCHEME_TRUE);}

/* k15652 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15654(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_15654,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* map-loop2389 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_15656(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_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_15656,3,t0,t1,t2);}
a=C_alloc(6);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15681,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);
/* irregex-core.scm:1535: g2395 */
t4=((C_word*)t0)[4];
f_15643(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[5],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k15679 in map-loop2389 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15681(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_15681,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
t3=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=((C_word*)((C_word*)t0)[3])[1];
f_15656(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* k15695 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_15697(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(20,0,3)))){
C_save_and_reclaim_args((void *)trf_15697,2,t0,t1);}
a=C_alloc(20);
if(C_truep(t1)){
if(C_truep(C_i_not(((C_word*)t0)[2]))){
t2=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t2;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}
else{
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15706,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);
/* irregex-core.scm:1539: sre->cset */
f_26377(t2,((C_word*)t0)[4],C_a_i_list(&a,1,((C_word*)t0)[5]));}}
else{
t2=C_eqp(((C_word*)t0)[6],lf[127]);
if(C_truep(t2)){
t3=(
/* irregex-core.scm:1546: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[4]))
);
t4=C_eqp(t3,lf[124]);
if(C_truep(t4)){
t5=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t5;
av2[1]=lf[272];
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t5=C_eqp(t3,lf[125]);
if(C_truep(t5)){
t6=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t6;
av2[1]=lf[273];
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
t6=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t7=t6;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
t9=((C_word*)t8)[1];
t10=C_u_i_cdr(((C_word*)t0)[4]);
t11=C_i_check_list_2(t10,lf[211]);
t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15764,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
t13=C_SCHEME_UNDEFINED;
t14=(*a=C_VECTOR_TYPE|1,a[1]=t13,tmp=(C_word)a,a+=2,tmp);
t15=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15766,a[2]=t8,a[3]=t14,a[4]=((C_word*)t0)[7],a[5]=t9,a[6]=((C_word)li209),tmp=(C_word)a,a+=7,tmp));
t16=((C_word*)t14)[1];
f_15766(t16,t12,t10);}}}
else{
t3=C_u_i_car(((C_word*)t0)[4]);
t4=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t5=t4;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=((C_word*)t6)[1];
t8=C_u_i_cdr(((C_word*)t0)[4]);
t9=C_i_check_list_2(t8,lf[211]);
t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15820,a[2]=((C_word*)t0)[3],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
t11=C_SCHEME_UNDEFINED;
t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
t13=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15822,a[2]=t6,a[3]=t12,a[4]=((C_word*)t0)[7],a[5]=t7,a[6]=((C_word)li210),tmp=(C_word)a,a+=7,tmp));
t14=((C_word*)t12)[1];
f_15822(t14,t10,t8);}}}

/* k15704 in k15695 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15706(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_15706,c,av);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15712,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);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15729,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1540: cset->plist */
f_26266(t3,t1);}

/* k15710 in k15704 in k15695 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15712(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_15712,c,av);}
a=C_alloc(3);
if(C_truep(t1)){
if(C_truep(((C_word*)t0)[2])){
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15722,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1542: cset->utf8-pattern */
f_15400(t2,((C_word*)t0)[4]);}
else{
/* irregex-core.scm:1543: cset->utf8-pattern */
f_15400(((C_word*)t0)[3],((C_word*)t0)[4]);}}
else{
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k15720 in k15710 in k15704 in k15695 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15722(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,1)))){
C_save_and_reclaim((void *)f_15722,c,av);}
a=C_alloc(6);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_list2(&a,2,lf[225],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k15727 in k15704 in k15695 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15729(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_15729,c,av);}
/* irregex-core.scm:1540: any */
f_9225(((C_word*)t0)[2],lf[204],t1);}

/* k15762 in k15695 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15764(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_15764,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,lf[127],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* map-loop2432 in k15695 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_15766(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_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_15766,3,t0,t1,t2);}
a=C_alloc(6);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15791,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);
/* irregex-core.scm:1550: g2438 */
t4=((C_word*)t0)[4];
f_15525(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[5],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k15789 in map-loop2432 in k15695 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15791(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_15791,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
t3=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=((C_word*)((C_word*)t0)[3])[1];
f_15766(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* k15818 in k15695 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15820(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_15820,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* map-loop2458 in k15695 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_15822(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_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_15822,3,t0,t1,t2);}
a=C_alloc(6);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15847,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);
/* irregex-core.scm:1552: g2464 */
t4=((C_word*)t0)[4];
f_15525(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[5],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k15845 in map-loop2458 in k15695 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15847(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_15847,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
t3=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=((C_word*)((C_word*)t0)[3])[1];
f_15822(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* k15903 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_15905(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,2)))){
C_save_and_reclaim_args((void *)trf_15905,2,t0,t1);}
a=C_alloc(10);
if(C_truep(t1)){
t2=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t3=t2;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=((C_word*)t4)[1];
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15915,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1559: char->utf8-list */
f_14269(t6,((C_word*)t0)[3]);}
else{
t2=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k15913 in k15903 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15915(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,3)))){
C_save_and_reclaim((void *)f_15915,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15918,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15920,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=((C_word*)t0)[4],a[5]=((C_word)li211),tmp=(C_word)a,a+=6,tmp));
t6=((C_word*)t4)[1];
f_15920(t6,t2,t1);}

/* k15916 in k15913 in k15903 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15918(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_15918,c,av);}
a=C_alloc(3);
/* irregex-core.scm:1559: sre-sequence */
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=(
/* irregex-core.scm:1559: sre-sequence */
  f_18122(C_a_i(&a,3),t1)
);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* map-loop2492 in k15913 in k15903 in adjust in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_15920(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,2)))){
C_save_and_reclaim_args((void *)trf_15920,3,t0,t1,t2);}
a=C_alloc(3);
if(C_truep(C_i_pairp(t2))){
t3=C_slot(t2,C_fix(0));
t4=C_make_character(C_unfix(t3));
t5=C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
t6=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t5);
t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
t9=t1;
t10=C_slot(t2,C_fix(1));
t1=t9;
t2=t10;
goto loop;}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[4],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* chicken.irregex#irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15967(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c<3) C_bad_min_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-3)*C_SIZEOF_PAIR +5,c,2)))){
C_save_and_reclaim((void*)f_15967,c,av);}
a=C_alloc((c-3)*C_SIZEOF_PAIR+5);
t3=C_build_rest(&a,c,3,av);
C_word t4;
C_word t5;
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15974,a[2]=t1,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1576: irregex? */
t5=*((C_word*)lf[5]+1);{
C_word *av2=av;
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k15972 in chicken.irregex#irregex in k7718 in k7493 in k7490 */
static void C_ccall f_15974(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,4)))){
C_save_and_reclaim((void *)f_15974,c,av);}
a=C_alloc(5);
if(C_truep(t1)){
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}
else{
if(C_truep(C_i_nullp(((C_word*)t0)[4]))){
t2=lf[218];
t3=C_slot(t2,C_fix(0));
if(C_truep(C_i_equalp(t3,((C_word*)t0)[3]))){
t4=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_slot(t2,C_fix(1));
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=C_slot(t2,C_fix(2));
if(C_truep(C_i_equalp(t4,((C_word*)t0)[3]))){
t5=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t5;
av2[1]=C_slot(t2,C_fix(3));
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t5=C_slot(t2,C_fix(4));
if(C_truep(C_i_equalp(t5,((C_word*)t0)[3]))){
t6=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t6;
av2[1]=C_slot(t2,C_fix(5));
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
t6=C_slot(t2,C_fix(6));
if(C_truep(C_i_equalp(t6,((C_word*)t0)[3]))){
t7=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t7;
av2[1]=C_slot(t2,C_fix(7));
((C_proc)(void*)(*((C_word*)t7+1)))(2,av2);}}
else{
t7=C_slot(t2,C_fix(8));
if(C_truep(C_i_equalp(t7,((C_word*)t0)[3]))){
t8=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t8;
av2[1]=C_slot(t2,C_fix(9));
((C_proc)(void*)(*((C_word*)t8+1)))(2,av2);}}
else{
t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16028,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
if(C_truep(C_i_stringp(((C_word*)t0)[3]))){
/* irregex-core.scm:1581: string->irregex */
t9=*((C_word*)lf[219]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t9;
av2[1]=t8;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t9+1)))(3,av2);}}
else{
/* irregex-core.scm:1582: sre->irregex */
t9=*((C_word*)lf[220]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t9;
av2[1]=t8;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t9+1)))(3,av2);}}}}}}}}
else{
if(C_truep(C_i_stringp(((C_word*)t0)[3]))){{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=0;
av2[1]=((C_word*)t0)[2];
av2[2]=*((C_word*)lf[219]+1);
av2[3]=((C_word*)t0)[3];
av2[4]=((C_word*)t0)[4];
C_apply(5,av2);}}
else{{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=0;
av2[1]=((C_word*)t0)[2];
av2[2]=*((C_word*)lf[220]+1);
av2[3]=((C_word*)t0)[3];
av2[4]=((C_word*)t0)[4];
C_apply(5,av2);}}}}}

/* k16026 in k15972 in chicken.irregex#irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16028(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_16028,c,av);}
t2=C_slot(((C_word*)t0)[2],C_fix(10));
t3=C_i_setslot(((C_word*)t0)[2],t2,((C_word*)t0)[3]);
t4=C_fixnum_plus(t2,C_fix(1));
t5=C_i_setslot(((C_word*)t0)[2],t4,t1);
t6=C_fixnum_plus(t2,C_fix(2));
t7=C_fixnum_modulo(t6,C_fix(10));
t8=C_i_set_i_slot(((C_word*)t0)[2],C_fix(10),t7);
t9=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t9;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t9+1)))(2,av2);}}

/* chicken.irregex#string->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16095(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c<3) C_bad_min_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-3)*C_SIZEOF_PAIR +4,c,4)))){
C_save_and_reclaim((void*)f_16095,c,av);}
a=C_alloc((c-3)*C_SIZEOF_PAIR+4);
t3=C_build_rest(&a,c,3,av);
C_word t4;
C_word t5;
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16103,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=0;
av2[1]=t4;
av2[2]=*((C_word*)lf[102]+1);
av2[3]=t2;
av2[4]=t3;
C_apply(5,av2);}}

/* k16101 in chicken.irregex#string->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16103(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_16103,c,av);}{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=0;
av2[1]=((C_word*)t0)[2];
av2[2]=*((C_word*)lf[220]+1);
av2[3]=t1;
av2[4]=((C_word*)t0)[3];
C_apply(5,av2);}}

/* chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16105(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c<3) C_bad_min_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-3)*C_SIZEOF_PAIR +5,c,2)))){
C_save_and_reclaim((void*)f_16105,c,av);}
a=C_alloc((c-3)*C_SIZEOF_PAIR+5);
t3=C_build_rest(&a,c,3,av);
C_word t4;
C_word t5;
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16109,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1592: symbol-list->flags */
f_10263(t4,t3);}

/* k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16109(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,5)))){
C_save_and_reclaim((void *)f_16109,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16112,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
t3=C_fixnum_and(t1,C_fix(32));
t4=C_eqp(C_fix(32),t3);
t5=C_fixnum_and(t1,C_fix(2));
t6=C_eqp(C_fix(2),t5);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15522,a[2]=t8,a[3]=((C_word)li212),tmp=(C_word)a,a+=4,tmp));
t10=((C_word*)t8)[1];
f_15522(t10,t2,((C_word*)t0)[4],t4,t6);}

/* k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16112(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_16112,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16115,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);
/* irregex-core.scm:1596: sre-searcher? */
t3=lf[271];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=t1;
f_16640(3,av2);}}

/* k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16115(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,2)))){
C_save_and_reclaim((void *)f_16115,c,av);}
a=C_alloc(7);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16118,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);
if(C_truep(t1)){
/* irregex-core.scm:1597: sre-remove-initial-bos */
t3=lf[270];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[5];
f_18667(3,av2);}}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=((C_word*)t0)[5];
f_16118(2,av2);}}}

/* k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16118(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(27,c,3)))){
C_save_and_reclaim((void *)f_16118,c,av);}
a=C_alloc(27);
t2=(C_truep(C_u_i_memq(lf[221],((C_word*)t0)[2]))?C_fix(1):(C_truep(C_u_i_memq(lf[222],((C_word*)t0)[2]))?C_fix(50):C_fix(10)));
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16124,a[2]=((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]=t2,tmp=(C_word)a,a+=8,tmp);
if(C_truep(C_u_i_memq(lf[269],((C_word*)t0)[2]))){
t4=t3;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
f_16124(2,av2);}}
else{
if(C_truep(((C_word*)t0)[3])){
t4=t3;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_SCHEME_TRUE;
f_16124(2,av2);}}
else{
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16196,a[2]=t2,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
t5=C_a_i_list(&a,2,lf[127],lf[124]);
t6=C_a_i_list(&a,3,lf[115],t5,t1);
/* irregex-core.scm:1605: sre->nfa */
f_20639(t4,t6,((C_word*)t0)[5]);}}}

/* k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16124(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,3)))){
C_save_and_reclaim((void *)f_16124,c,av);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16127,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);
if(C_truep(t1)){
/* irregex-core.scm:1609: sre->nfa */
f_20639(t2,((C_word*)t0)[6],((C_word*)t0)[4]);}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
f_16127(2,av2);}}}

/* k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16127(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,3)))){
C_save_and_reclaim((void *)f_16127,c,av);}
a=C_alloc(12);
t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16130,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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(t1)){
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16170,a[2]=((C_word*)t0)[8],a[3]=((C_word)li202),tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1609: g2613 */
t4=t3;
f_16170(t4,t2,t1);}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
f_16130(2,av2);}}}

/* k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16130(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_16130,c,av);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16133,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);
/* irregex-core.scm:1613: sre-count-submatches */
f_16913(t2,((C_word*)t0)[7]);}

/* k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16133(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,4)))){
C_save_and_reclaim((void *)f_16133,c,av);}
a=C_alloc(10);
t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16136,a[2]=((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);
/* irregex-core.scm:1614: sre-names */
f_18349(t2,((C_word*)t0)[8],C_fix(1),C_SCHEME_END_OF_LIST);}

/* k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16136(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,4)))){
C_save_and_reclaim((void *)f_16136,c,av);}
a=C_alloc(14);
t2=C_a_i_list(&a,1,t1);
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_17013,a[2]=((C_word*)t0)[2],a[3]=((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);
if(C_truep(C_i_pairp(t2))){
t4=t3;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_u_i_car(t2);
f_17013(2,av2);}}
else{
/* irregex-core.scm:1710: sre-names */
f_18349(t3,((C_word*)t0)[9],C_fix(1),C_SCHEME_END_OF_LIST);}}

/* k16149 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16151(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,1)))){
C_save_and_reclaim((void *)f_16151,c,av);}
a=C_alloc(9);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_record8(&a,8,lf[6],C_SCHEME_FALSE,C_SCHEME_FALSE,t1,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6]);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16165(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(21,c,4)))){
C_save_and_reclaim((void *)f_16165,c,av);}
a=C_alloc(21);
t2=(C_truep(t1)?C_fixnum_or(((C_word*)t0)[2],C_fix(2)):((C_word*)t0)[2]);
if(C_truep(((C_word*)t0)[3])){
t3=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_a_i_record8(&a,8,lf[6],((C_word*)t0)[3],((C_word*)t0)[5],C_SCHEME_FALSE,t2,((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16151,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)[8],tmp=(C_word)a,a+=7,tmp);
t4=C_a_i_list(&a,2,((C_word*)t0)[9],((C_word*)t0)[8]);
t5=C_SCHEME_UNDEFINED;
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_23275,a[2]=t6,a[3]=t4,a[4]=t3,a[5]=((C_word*)t0)[10],tmp=(C_word)a,a+=6,tmp);
t8=C_i_pairp(t4);
t9=(C_truep(t8)?C_i_pairp(C_u_i_cdr(t4)):C_SCHEME_FALSE);
if(C_truep(t9)){
t10=t7;{
C_word *av2=av;
av2[0]=t10;
av2[1]=C_i_cadr(t4);
f_23275(2,av2);}}
else{
/* irregex-core.scm:3104: sre-names */
f_18349(t7,((C_word*)t0)[10],C_fix(1),C_SCHEME_END_OF_LIST);}}}

/* g2613 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_16170(C_word 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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,3)))){
C_save_and_reclaim_args((void *)trf_16170,3,t0,t1,t2);}
a=C_alloc(8);
t3=C_i_vector_length(t2);
t4=C_a_i_fixnum_quotient_checked(&a,2,t3,C_fix(4));
t5=C_fixnum_times(((C_word*)t0)[2],t4);
/* irregex-core.scm:1611: nfa->dfa */
f_22247(t1,t2,C_a_i_list(&a,1,t5));}

/* k16194 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_16196(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,3)))){
C_save_and_reclaim((void *)f_16196,c,av);}
a=C_alloc(4);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16200,a[2]=((C_word*)t0)[2],a[3]=((C_word)li203),tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1603: g2602 */
t3=t2;
f_16200(t3,((C_word*)t0)[3],t1);}
else{
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
f_16124(2,av2);}}}

/* g2602 in k16194 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_16200(C_word 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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,3)))){
C_save_and_reclaim_args((void *)trf_16200,3,t0,t1,t2);}
a=C_alloc(8);
t3=C_i_vector_length(t2);
t4=C_a_i_fixnum_quotient_checked(&a,2,t3,C_fix(4));
t5=C_fixnum_times(((C_word*)t0)[2],t4);
/* irregex-core.scm:1607: nfa->dfa */
f_22247(t1,t2,C_a_i_list(&a,1,t5));}

/* chicken.irregex#sre-empty? in k7718 in k7493 in k7490 */
static void C_ccall f_16238(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_16238,c,av);}
a=C_alloc(5);
if(C_truep(C_i_pairp(t2))){
t3=C_u_i_car(t2);
t4=C_eqp(t3,lf[127]);
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16255,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
if(C_truep(t4)){
t6=t5;
f_16255(t6,t4);}
else{
t6=C_eqp(t3,lf[131]);
if(C_truep(t6)){
t7=t5;
f_16255(t7,t6);}
else{
t7=C_eqp(t3,lf[111]);
if(C_truep(t7)){
t8=t5;
f_16255(t8,t7);}
else{
t8=C_eqp(t3,lf[113]);
if(C_truep(t8)){
t9=t5;
f_16255(t9,t8);}
else{
t9=C_eqp(t3,lf[112]);
t10=t5;
f_16255(t10,(C_truep(t9)?t9:C_eqp(t3,lf[114])));}}}}}
else{
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_u_i_memq(t2,lf[276]);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k16253 in chicken.irregex#sre-empty? in k7718 in k7493 in k7490 */
static void C_fcall f_16255(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,0,3)))){
C_save_and_reclaim_args((void *)trf_16255,2,t0,t1);}
a=C_alloc(4);
if(C_truep(t1)){
t2=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t2;
av2[1]=C_SCHEME_TRUE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}
else{
t2=C_eqp(((C_word*)t0)[3],lf[133]);
if(C_truep(t2)){
t3=C_i_cadr(((C_word*)t0)[4]);
t4=C_i_numberp(t3);
t5=C_i_not(t4);
if(C_truep(t5)){
t6=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t6;
av2[1]=t5;
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
t6=C_u_i_cdr(((C_word*)t0)[4]);
t7=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t7;
av2[1]=C_i_zerop(C_u_i_car(t6));
((C_proc)(void*)(*((C_word*)t7+1)))(2,av2);}}}
else{
t3=C_eqp(((C_word*)t0)[3],lf[103]);
if(C_truep(t3)){
/* irregex-core.scm:1635: any */
f_9225(((C_word*)t0)[2],lf[139],C_u_i_cdr(((C_word*)t0)[4]));}
else{
t4=C_eqp(((C_word*)t0)[3],lf[227]);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16298,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
if(C_truep(t4)){
if(C_truep(t4)){
/* irregex-core.scm:1637: every */
f_9268(((C_word*)t0)[2],lf[139],C_u_i_cdr(((C_word*)t0)[4]));}
else{
t6=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t6;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}}
else{
t6=C_eqp(((C_word*)t0)[3],lf[115]);
if(C_truep(t6)){
if(C_truep(t6)){
/* irregex-core.scm:1637: every */
f_9268(((C_word*)t0)[2],lf[139],C_u_i_cdr(((C_word*)t0)[4]));}
else{
t7=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t7;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t7+1)))(2,av2);}}}
else{
t7=C_eqp(((C_word*)t0)[3],lf[245]);
if(C_truep(t7)){
t8=t5;
f_16298(t8,t7);}
else{
t8=C_eqp(((C_word*)t0)[3],lf[108]);
if(C_truep(t8)){
t9=t5;
f_16298(t9,t8);}
else{
t9=C_eqp(((C_word*)t0)[3],lf[119]);
if(C_truep(t9)){
t10=t5;
f_16298(t10,t9);}
else{
t10=C_eqp(((C_word*)t0)[3],lf[120]);
if(C_truep(t10)){
t11=t5;
f_16298(t11,t10);}
else{
t11=C_eqp(((C_word*)t0)[3],lf[129]);
t12=t5;
f_16298(t12,(C_truep(t11)?t11:C_eqp(((C_word*)t0)[3],lf[239])));}}}}}}}}}}

/* k16296 in k16253 in chicken.irregex#sre-empty? in k7718 in k7493 in k7490 */
static void C_fcall f_16298(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,3)))){
C_save_and_reclaim_args((void *)trf_16298,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:1637: every */
f_9268(((C_word*)t0)[2],lf[139],C_u_i_cdr(((C_word*)t0)[3]));}
else{
t2=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* chicken.irregex#sre-any? in k7718 in k7493 in k7490 */
static void C_ccall f_16405(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_16405,c,av);}
a=C_alloc(5);
t3=C_eqp(t2,lf[124]);
if(C_truep(t3)){
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
if(C_truep(C_i_pairp(t2))){
t4=C_u_i_car(t2);
t5=C_eqp(t4,lf[115]);
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16428,a[2]=t2,a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
if(C_truep(t5)){
t7=t6;
f_16428(t7,t5);}
else{
t7=C_eqp(t4,lf[227]);
if(C_truep(t7)){
t8=t6;
f_16428(t8,t7);}
else{
t8=C_eqp(t4,lf[245]);
if(C_truep(t8)){
t9=t6;
f_16428(t9,t8);}
else{
t9=C_eqp(t4,lf[108]);
if(C_truep(t9)){
t10=t6;
f_16428(t10,t9);}
else{
t10=C_eqp(t4,lf[119]);
t11=t6;
f_16428(t11,(C_truep(t10)?t10:C_eqp(t4,lf[120])));}}}}}
else{
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}}

/* k16426 in chicken.irregex#sre-any? in k7718 in k7493 in k7490 */
static void C_fcall f_16428(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,3)))){
C_save_and_reclaim_args((void *)trf_16428,2,t0,t1);}
if(C_truep(t1)){
if(C_truep(C_i_pairp(C_u_i_cdr(((C_word*)t0)[2])))){
t2=C_i_cddr(((C_word*)t0)[2]);
if(C_truep(C_i_nullp(t2))){
t3=C_u_i_cdr(((C_word*)t0)[2]);
/* irregex-core.scm:1646: sre-any? */
t4=lf[277];{
C_word av2[3];
av2[0]=t4;
av2[1]=((C_word*)t0)[3];
av2[2]=C_u_i_car(t3);
f_16405(3,av2);}}
else{
t3=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}
else{
t2=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}
else{
t2=C_eqp(((C_word*)t0)[4],lf[103]);
if(C_truep(t2)){
/* irregex-core.scm:1647: every */
f_9268(((C_word*)t0)[3],lf[277],C_u_i_cdr(((C_word*)t0)[2]));}
else{
t3=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}}

/* chicken.irregex#sre-repeater? in k7718 in k7493 in k7490 */
static C_word C_fcall f_16506(C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_stack_overflow_check;
loop:{}
if(C_truep(C_i_pairp(t1))){
t2=C_u_i_car(t1);
t3=C_u_i_memq(t2,lf[278]);
if(C_truep(t3)){
return(t3);}
else{
t4=C_u_i_car(t1);
if(C_truep((C_truep(C_eqp(t4,lf[245]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[108]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[119]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[120]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[115]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[227]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))))){
if(C_truep(C_i_pairp(C_u_i_cdr(t1)))){
t5=C_i_cddr(t1);
if(C_truep(C_i_nullp(t5))){
t6=C_u_i_cdr(t1);
t8=C_u_i_car(t6);
t1=t8;
goto loop;}
else{
return(C_SCHEME_FALSE);}}
else{
return(C_SCHEME_FALSE);}}
else{
return(C_SCHEME_FALSE);}}}
else{
return(C_SCHEME_FALSE);}}

/* chicken.irregex#sre-bos? in k7718 in k7493 in k7490 */
static void C_ccall f_16551(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_16551,c,av);}
a=C_alloc(5);
if(C_truep(C_i_pairp(t2))){
t3=C_u_i_car(t2);
t4=C_eqp(t3,lf[115]);
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16568,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
if(C_truep(t4)){
t6=t5;
f_16568(t6,t4);}
else{
t6=C_eqp(t3,lf[227]);
if(C_truep(t6)){
t7=t5;
f_16568(t7,t6);}
else{
t7=C_eqp(t3,lf[245]);
if(C_truep(t7)){
t8=t5;
f_16568(t8,t7);}
else{
t8=C_eqp(t3,lf[108]);
if(C_truep(t8)){
t9=t5;
f_16568(t9,t8);}
else{
t9=C_eqp(t3,lf[119]);
t10=t5;
f_16568(t10,(C_truep(t9)?t9:C_eqp(t3,lf[120])));}}}}}
else{
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_eqp(lf[186],t2);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k16566 in chicken.irregex#sre-bos? in k7718 in k7493 in k7490 */
static void C_fcall f_16568(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,3)))){
C_save_and_reclaim_args((void *)trf_16568,2,t0,t1);}
if(C_truep(t1)){
if(C_truep(C_i_pairp(C_u_i_cdr(((C_word*)t0)[2])))){
/* irregex-core.scm:1662: sre-bos? */
t2=lf[279];{
C_word av2[3];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=C_i_cadr(((C_word*)t0)[2]);
f_16551(3,av2);}}
else{
t2=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}
else{
t2=C_eqp(((C_word*)t0)[4],lf[103]);
if(C_truep(t2)){
/* irregex-core.scm:1663: every */
f_9268(((C_word*)t0)[3],lf[279],C_u_i_cdr(((C_word*)t0)[2]));}
else{
t3=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}}

/* chicken.irregex#sre-searcher? in k7718 in k7493 in k7490 */
static void C_ccall f_16640(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_16640,c,av);}
a=C_alloc(4);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16644,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1669: sre-bos? */
t4=lf[279];{
C_word *av2=av;
av2[0]=t4;
av2[1]=t3;
av2[2]=t2;
f_16551(3,av2);}}

/* k16642 in chicken.irregex#sre-searcher? in k7718 in k7493 in k7490 */
static void C_ccall f_16644(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_16644,c,av);}
a=C_alloc(5);
if(C_truep(t1)){
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}
else{
if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
t2=C_u_i_car(((C_word*)t0)[3]);
t3=C_eqp(t2,lf[127]);
t4=(C_truep(t3)?t3:C_eqp(t2,lf[129]));
if(C_truep(t4)){
t5=(
/* irregex-core.scm:1672: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[3]))
);
/* irregex-core.scm:1672: sre-any? */
t6=lf[277];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t6;
av2[1]=((C_word*)t0)[2];
av2[2]=t5;
f_16405(3,av2);}}
else{
t5=C_eqp(t2,lf[115]);
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16681,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
if(C_truep(t5)){
t7=t6;
f_16681(t7,t5);}
else{
t7=C_eqp(t2,lf[227]);
if(C_truep(t7)){
t8=t6;
f_16681(t8,t7);}
else{
t8=C_eqp(t2,lf[245]);
if(C_truep(t8)){
t9=t6;
f_16681(t9,t8);}
else{
t9=C_eqp(t2,lf[108]);
if(C_truep(t9)){
t10=t6;
f_16681(t10,t9);}
else{
t10=C_eqp(t2,lf[119]);
t11=t6;
f_16681(t11,(C_truep(t10)?t10:C_eqp(t2,lf[120])));}}}}}}
else{
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}}

/* k16679 in k16642 in chicken.irregex#sre-searcher? in k7718 in k7493 in k7490 */
static void C_fcall f_16681(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,3)))){
C_save_and_reclaim_args((void *)trf_16681,2,t0,t1);}
if(C_truep(t1)){
if(C_truep(C_i_pairp(C_u_i_cdr(((C_word*)t0)[2])))){
/* irregex-core.scm:1674: sre-searcher? */
t2=lf[271];{
C_word av2[3];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=C_i_cadr(((C_word*)t0)[2]);
f_16640(3,av2);}}
else{
t2=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}
else{
t2=C_eqp(((C_word*)t0)[4],lf[103]);
if(C_truep(t2)){
/* irregex-core.scm:1675: every */
f_9268(((C_word*)t0)[3],lf[271],C_u_i_cdr(((C_word*)t0)[2]));}
else{
t3=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}}

/* chicken.irregex#sre-consumer? in k7718 in k7493 in k7490 */
static void C_ccall f_16757(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_16757,c,av);}
a=C_alloc(4);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16761,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1680: sre-bos? */
t4=lf[279];{
C_word *av2=av;
av2[0]=t4;
av2[1]=t3;
av2[2]=t2;
f_16551(3,av2);}}

/* k16759 in chicken.irregex#sre-consumer? in k7718 in k7493 in k7490 */
static void C_ccall f_16761(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_16761,c,av);}
a=C_alloc(5);
if(C_truep(t1)){
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}
else{
if(C_truep(C_i_pairp(((C_word*)t0)[3]))){
t2=C_u_i_car(((C_word*)t0)[3]);
t3=C_eqp(t2,lf[127]);
t4=(C_truep(t3)?t3:C_eqp(t2,lf[129]));
if(C_truep(t4)){
t5=(
/* irregex-core.scm:1683: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[3]))
);
/* irregex-core.scm:1683: sre-any? */
t6=lf[277];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t6;
av2[1]=((C_word*)t0)[2];
av2[2]=t5;
f_16405(3,av2);}}
else{
t5=C_eqp(t2,lf[115]);
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16798,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
if(C_truep(t5)){
t7=t6;
f_16798(t7,t5);}
else{
t7=C_eqp(t2,lf[227]);
if(C_truep(t7)){
t8=t6;
f_16798(t8,t7);}
else{
t8=C_eqp(t2,lf[245]);
if(C_truep(t8)){
t9=t6;
f_16798(t9,t8);}
else{
t9=C_eqp(t2,lf[108]);
if(C_truep(t9)){
t10=t6;
f_16798(t10,t9);}
else{
t10=C_eqp(t2,lf[119]);
t11=t6;
f_16798(t11,(C_truep(t10)?t10:C_eqp(t2,lf[120])));}}}}}}
else{
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}}

/* k16796 in k16759 in chicken.irregex#sre-consumer? in k7718 in k7493 in k7490 */
static void C_fcall f_16798(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,3)))){
C_save_and_reclaim_args((void *)trf_16798,2,t0,t1);}
a=C_alloc(3);
if(C_truep(t1)){
if(C_truep(C_i_pairp(C_u_i_cdr(((C_word*)t0)[2])))){
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16811,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1685: last */
f_9187(t2,((C_word*)t0)[2]);}
else{
t2=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}
else{
t2=C_eqp(((C_word*)t0)[4],lf[103]);
if(C_truep(t2)){
/* irregex-core.scm:1686: every */
f_9268(((C_word*)t0)[3],lf[253],C_u_i_cdr(((C_word*)t0)[2]));}
else{
t3=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}}

/* k16809 in k16796 in k16759 in chicken.irregex#sre-consumer? in k7718 in k7493 in k7490 */
static void C_ccall f_16811(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_16811,c,av);}
/* irregex-core.scm:1685: sre-consumer? */
t2=lf[253];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
f_16757(3,av2);}}

/* chicken.irregex#sre-has-submatches? in k7718 in k7493 in k7490 */
static void C_ccall f_16874(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,3)))){
C_save_and_reclaim((void *)f_16874,c,av);}
a=C_alloc(3);
if(C_truep(C_i_pairp(t2))){
t3=C_u_i_car(t2);
t4=C_u_i_memq(t3,lf[281]);
if(C_truep(t4)){
t5=t1;{
C_word *av2=av;
av2[0]=t5;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t5=C_eqp(lf[235],C_u_i_car(t2));
if(C_truep(t5)){
t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16900,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1693: string->sre */
t7=*((C_word*)lf[102]+1);{
C_word *av2=av;
av2[0]=t7;
av2[1]=t6;
av2[2]=C_i_cadr(t2);
((C_proc)(void*)(*((C_word*)t7+1)))(3,av2);}}
else{
/* irregex-core.scm:1694: any */
f_9225(t1,lf[280],C_u_i_cdr(t2));}}}
else{
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k16898 in chicken.irregex#sre-has-submatches? in k7718 in k7493 in k7490 */
static void C_ccall f_16900(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_16900,c,av);}
/* irregex-core.scm:1693: sre-has-submatches? */
t2=lf[280];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
f_16874(3,av2);}}

/* chicken.irregex#sre-count-submatches in k7718 in k7493 in k7490 */
static void C_fcall f_16913(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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,4)))){
C_save_and_reclaim_args((void *)trf_16913,2,t1,t2);}
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_16919,a[2]=t4,a[3]=((C_word)li221),tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];{
C_word av2[4];
av2[0]=t6;
av2[1]=t1;
av2[2]=t2;
av2[3]=C_fix(0);
f_16919(4,av2);}}

/* count in chicken.irregex#sre-count-submatches in k7718 in k7493 in k7490 */
static void C_ccall f_16919(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,2)))){
C_save_and_reclaim((void *)f_16919,c,av);}
a=C_alloc(14);
if(C_truep(C_i_pairp(t2))){
t4=C_u_i_car(t2);
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16940,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
t6=C_eqp(t4,lf[245]);
t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16946,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,a[6]=t4,a[7]=t5,tmp=(C_word)a,a+=8,tmp);
if(C_truep(t6)){
t8=t7;
f_16946(t8,t6);}
else{
t8=C_eqp(t4,lf[108]);
if(C_truep(t8)){
t9=t7;
f_16946(t9,t8);}
else{
t9=C_eqp(t4,lf[119]);
t10=t7;
f_16946(t10,(C_truep(t9)?t9:C_eqp(t4,lf[120])));}}}
else{
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k16938 in count in chicken.irregex#sre-count-submatches in k7718 in k7493 in k7490 */
static void C_ccall f_16940(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_16940,c,av);}
/* irregex-core.scm:1699: fold */
f_9313(((C_word*)t0)[2],((C_word*)((C_word*)t0)[3])[1],C_fixnum_plus(((C_word*)t0)[4],t1),C_u_i_cdr(((C_word*)t0)[5]));}

/* k16944 in count in chicken.irregex#sre-count-submatches in k7718 in k7493 in k7490 */
static void C_fcall f_16946(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(29,0,4)))){
C_save_and_reclaim_args((void *)trf_16946,2,t0,t1);}
a=C_alloc(29);
if(C_truep(t1)){
/* irregex-core.scm:1699: fold */
f_9313(((C_word*)t0)[2],((C_word*)((C_word*)t0)[3])[1],C_fixnum_plus(((C_word*)t0)[4],C_fix(1)),C_u_i_cdr(((C_word*)t0)[5]));}
else{
t2=C_eqp(((C_word*)t0)[6],lf[244]);
if(C_truep(t2)){
t3=C_fixnum_plus(C_i_cadr(((C_word*)t0)[5]),C_i_caddr(((C_word*)t0)[5]));
/* irregex-core.scm:1699: fold */
f_9313(((C_word*)t0)[2],((C_word*)((C_word*)t0)[3])[1],C_fixnum_plus(((C_word*)t0)[4],t3),C_u_i_cdr(((C_word*)t0)[5]));}
else{
t3=C_eqp(((C_word*)t0)[6],lf[235]);
if(C_truep(t3)){
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16976,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1704: string->sre */
t5=*((C_word*)lf[102]+1);{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=C_i_cadr(((C_word*)t0)[5]);
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
t4=C_s_a_i_plus(&a,2,((C_word*)t0)[4],C_fix(0));
/* irregex-core.scm:1699: fold */
f_9313(((C_word*)t0)[2],((C_word*)((C_word*)t0)[3])[1],t4,C_u_i_cdr(((C_word*)t0)[5]));}}}}

/* k16974 in k16944 in count in chicken.irregex#sre-count-submatches in k7718 in k7493 in k7490 */
static void C_ccall f_16976(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_16976,c,av);}
/* irregex-core.scm:1704: sre-count-submatches */
f_16913(((C_word*)t0)[2],t1);}

/* k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17013(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,2)))){
C_save_and_reclaim((void *)f_17013,c,av);}
a=C_alloc(15);
t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_17016,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((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|2,a[1]=(C_word)f_18113,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1711: sre-count-submatches */
f_16913(t3,((C_word*)t0)[10]);}

/* k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17016(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(19,c,7)))){
C_save_and_reclaim((void *)f_17016,c,av);}
a=C_alloc(19);
t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_17023,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);
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_17025,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[10],a[5]=((C_word)li201),tmp=(C_word)a,a+=6,tmp));
t6=((C_word*)t4)[1];
f_17025(t6,t2,((C_word*)t0)[11],C_fix(1),C_fix(0),C_fix(0),*((C_word*)lf[266]+1));}

/* k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17023(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_17023,c,av);}
a=C_alloc(11);
t2=C_i_vector_set(((C_word*)t0)[2],C_fix(0),t1);
t3=(C_truep(((C_word*)t0)[3])?C_fixnum_or(C_fix(0),C_fix(1)):C_fix(0));
t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_16165,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[2],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);
/* irregex-core.scm:1618: sre-consumer? */
t5=lf[253];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t5;
av2[1]=t4;
av2[2]=((C_word*)t0)[10];
f_16757(3,av2);}}

/* lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_17025(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
C_word tmp;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(19,0,6)))){
C_save_and_reclaim_args((void *)trf_17025,7,t0,t1,t2,t3,t4,t5,t6);}
a=C_alloc(19);
t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17028,a[2]=t4,a[3]=t5,a[4]=t6,a[5]=((C_word)li186),tmp=(C_word)a,a+=6,tmp);
if(C_truep(C_i_pairp(t2))){
if(C_truep(C_i_stringp(C_u_i_car(t2)))){
/* irregex-core.scm:1720: grow */
t8=t7;
f_17028(t8,t1,C_fix(1));}
else{
t8=C_u_i_car(t2);
t9=C_eqp(t8,lf[52]);
t10=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_17068,a[2]=t7,a[3]=t1,a[4]=t8,a[5]=((C_word*)t0)[2],a[6]=t3,a[7]=t4,a[8]=t5,a[9]=t6,a[10]=t2,a[11]=((C_word*)t0)[3],a[12]=((C_word*)t0)[4],tmp=(C_word)a,a+=13,tmp);
if(C_truep(t9)){
t11=t10;
f_17068(t11,t9);}
else{
t11=C_eqp(t8,lf[179]);
if(C_truep(t11)){
t12=t10;
f_17068(t12,t11);}
else{
t12=C_eqp(t8,lf[234]);
t13=t10;
f_17068(t13,(C_truep(t12)?t12:C_eqp(t8,lf[247])));}}}}
else{
if(C_truep(C_charp(t2))){
/* irregex-core.scm:1835: grow */
t8=t7;
f_17028(t8,t1,C_fix(1));}
else{
if(C_truep(C_i_stringp(t2))){
/* irregex-core.scm:1837: grow */
t8=t7;
f_17028(t8,t1,C_block_size(t2));}
else{
if(C_truep((C_truep(C_eqp(t2,lf[124]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[125]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
/* irregex-core.scm:1839: grow */
t8=t7;
f_17028(t8,t1,C_fix(1));}
else{
if(C_truep((C_truep(C_eqp(t2,lf[110]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[186]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[187]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[195]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[196]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[183]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[184]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[185]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[264]))?C_SCHEME_TRUE:C_SCHEME_FALSE))))))))))){
/* irregex-core.scm:1841: return */
t8=t6;{
C_word av2[4];
av2[0]=t8;
av2[1]=t1;
av2[2]=t4;
av2[3]=t5;
((C_proc)(void*)(*((C_word*)t8+1)))(4,av2);}}
else{
t8=C_i_assq(t2,lf[248]);
if(C_truep(t8)){
t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_18090,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t3,a[5]=t4,a[6]=t5,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
t10=C_i_cdr(t8);
if(C_truep(C_i_closurep(t10))){
/* irregex-core.scm:1845: g3019 */
t11=C_u_i_cdr(t8);{
C_word av2[2];
av2[0]=t11;
av2[1]=t9;
((C_proc)(void*)(*((C_word*)t11+1)))(2,av2);}}
else{
/* irregex-core.scm:1845: lp */
t14=t1;
t15=C_u_i_cdr(t8);
t16=t3;
t17=t4;
t18=t5;
t19=t6;
t1=t14;
t2=t15;
t3=t16;
t4=t17;
t5=t18;
t6=t19;
goto loop;}}
else{
/* irregex-core.scm:1847: chicken.base#error */
t9=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t9;
av2[1]=t1;
av2[2]=lf[261];
av2[3]=lf[265];
av2[4]=t2;
((C_proc)(void*)(*((C_word*)t9+1)))(5,av2);}}}}}}}}

/* grow in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_17028(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_unlikely(!C_demand(C_calculate_demand(0,0,3)))){
C_save_and_reclaim_args((void *)trf_17028,3,t0,t1,t2);}
t3=C_fixnum_plus(((C_word*)t0)[2],t2);
if(C_truep(((C_word*)t0)[3])){
/* irregex-core.scm:1716: return */
t4=((C_word*)t0)[4];{
C_word av2[4];
av2[0]=t4;
av2[1]=t1;
av2[2]=t3;
av2[3]=C_fixnum_plus(((C_word*)t0)[3],t2);
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}
else{
/* irregex-core.scm:1716: return */
t4=((C_word*)t0)[4];{
C_word av2[4];
av2[0]=t4;
av2[1]=t1;
av2[2]=t3;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}}

/* k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_17068(C_word t0,C_word t1){
C_word 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;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,2)))){
C_save_and_reclaim_args((void *)trf_17068,2,t0,t1);}
a=C_alloc(12);
if(C_truep(t1)){
/* irregex-core.scm:1723: grow */
t2=((C_word*)t0)[2];
f_17028(t2,((C_word*)t0)[3],C_fix(1));}
else{
t2=C_eqp(((C_word*)t0)[4],lf[235]);
if(C_truep(t2)){
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17084,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1725: string->sre */
t4=*((C_word*)lf[102]+1);{
C_word av2[3];
av2[0]=t4;
av2[1]=t3;
av2[2]=C_i_cadr(((C_word*)t0)[10]);
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t3=C_eqp(((C_word*)t0)[4],lf[115]);
t4=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_17097,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[3],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[4],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[12],tmp=(C_word)a,a+=12,tmp);
if(C_truep(t3)){
t5=t4;
f_17097(t5,t3);}
else{
t5=C_eqp(((C_word*)t0)[4],lf[227]);
if(C_truep(t5)){
t6=t4;
f_17097(t6,t5);}
else{
t6=C_eqp(((C_word*)t0)[4],lf[225]);
if(C_truep(t6)){
t7=t4;
f_17097(t7,t6);}
else{
t7=C_eqp(((C_word*)t0)[4],lf[226]);
t8=t4;
f_17097(t8,(C_truep(t7)?t7:C_eqp(((C_word*)t0)[4],lf[239])));}}}}}}

/* k17082 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17084(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_17084,c,av);}
/* irregex-core.scm:1725: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_17025(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}

/* k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_17097(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,6)))){
C_save_and_reclaim_args((void *)trf_17097,2,t0,t1);}
a=C_alloc(12);
if(C_truep(t1)){
t2=C_u_i_cdr(((C_word*)t0)[2]);
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_17104,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)li188),tmp=(C_word)a,a+=8,tmp));
t6=((C_word*)t4)[1];
f_17104(t6,((C_word*)t0)[7],t2,((C_word*)t0)[8],C_fix(0),C_fix(0));}
else{
t2=C_eqp(((C_word*)t0)[9],lf[103]);
if(C_truep(t2)){
t3=C_u_i_cdr(((C_word*)t0)[2]);
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17182,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)[6],a[7]=((C_word)li190),tmp=(C_word)a,a+=8,tmp));
t7=((C_word*)t5)[1];
f_17182(t7,((C_word*)t0)[7],t3,((C_word*)t0)[8],C_SCHEME_FALSE,C_fix(0));}
else{
t3=C_eqp(((C_word*)t0)[9],lf[109]);
if(C_truep(t3)){
t4=C_i_nullp(C_u_i_cdr(((C_word*)t0)[2]));
t5=(C_truep(t4)?t4:C_i_nullp(C_i_cddr(((C_word*)t0)[2])));
if(C_truep(t5)){
/* irregex-core.scm:1749: return */
t6=((C_word*)t0)[5];{
C_word av2[4];
av2[0]=t6;
av2[1]=((C_word*)t0)[7];
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}
else{
t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17275,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[3],a[8]=((C_word*)t0)[4],tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1751: sre-count-submatches */
f_16913(t6,C_u_i_car(((C_word*)t0)[2]));}}
else{
t4=C_eqp(((C_word*)t0)[9],lf[244]);
if(C_truep(t4)){
t5=(
/* irregex-core.scm:1770: sre-sequence */
  f_18122(C_a_i(&a,3),C_i_cdddr(((C_word*)t0)[2]))
);
t6=C_i_cadr(((C_word*)t0)[2]);
/* irregex-core.scm:1770: lp */
t7=((C_word*)((C_word*)t0)[6])[1];
f_17025(t7,((C_word*)t0)[7],t5,C_fixnum_plus(((C_word*)t0)[8],t6),((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5]);}
else{
t5=C_eqp(((C_word*)t0)[9],lf[245]);
t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_17421,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[3],a[9]=((C_word*)t0)[4],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
if(C_truep(t5)){
t7=t6;
f_17421(t7,t5);}
else{
t7=C_eqp(((C_word*)t0)[9],lf[108]);
if(C_truep(t7)){
t8=t6;
f_17421(t8,t7);}
else{
t8=C_eqp(((C_word*)t0)[9],lf[119]);
t9=t6;
f_17421(t9,(C_truep(t8)?t8:C_eqp(((C_word*)t0)[9],lf[120])));}}}}}}}

/* lp2 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_17104(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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,6)))){
C_save_and_reclaim_args((void *)trf_17104,6,t0,t1,t2,t3,t4,t5);}
a=C_alloc(8);
if(C_truep(C_i_nullp(t2))){
t6=C_fixnum_plus(((C_word*)t0)[2],t4);
if(C_truep(((C_word*)t0)[3])){
if(C_truep(t5)){
/* irregex-core.scm:1729: return */
t7=((C_word*)t0)[4];{
C_word av2[4];
av2[0]=t7;
av2[1]=t1;
av2[2]=t6;
av2[3]=C_fixnum_plus(((C_word*)t0)[3],t5);
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}
else{
/* irregex-core.scm:1729: return */
t7=((C_word*)t0)[4];{
C_word av2[4];
av2[0]=t7;
av2[1]=t1;
av2[2]=t6;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}}
else{
/* irregex-core.scm:1729: return */
t7=((C_word*)t0)[4];{
C_word av2[4];
av2[0]=t7;
av2[1]=t1;
av2[2]=t6;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}}
else{
t6=C_i_car(t2);
t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17137,a[2]=t2,a[3]=t3,a[4]=t4,a[5]=t5,a[6]=((C_word*)t0)[5],a[7]=((C_word)li187),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1730: lp */
t8=((C_word*)((C_word*)t0)[6])[1];
f_17025(t8,t1,t6,t3,C_fix(0),C_fix(0),t7);}}

/* a17136 in lp2 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17137(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,2)))){
C_save_and_reclaim((void *)f_17137,c,av);}
a=C_alloc(10);
t4=C_i_cdr(((C_word*)t0)[2]);
t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_17167,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word*)t0)[5],a[6]=t3,a[7]=((C_word*)t0)[6],a[8]=t1,a[9]=t4,tmp=(C_word)a,a+=10,tmp);
/* irregex-core.scm:1733: sre-count-submatches */
f_16913(t5,C_u_i_car(((C_word*)t0)[2]));}

/* k17165 in a17136 in lp2 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17167(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_17167,c,av);}
t2=C_fixnum_plus(((C_word*)t0)[2],t1);
t3=C_fixnum_plus(((C_word*)t0)[3],((C_word*)t0)[4]);
if(C_truep(((C_word*)t0)[5])){
if(C_truep(((C_word*)t0)[6])){
/* irregex-core.scm:1732: lp2 */
t4=((C_word*)((C_word*)t0)[7])[1];
f_17104(t4,((C_word*)t0)[8],((C_word*)t0)[9],t2,t3,C_fixnum_plus(((C_word*)t0)[5],((C_word*)t0)[6]));}
else{
/* irregex-core.scm:1732: lp2 */
t4=((C_word*)((C_word*)t0)[7])[1];
f_17104(t4,((C_word*)t0)[8],((C_word*)t0)[9],t2,t3,C_SCHEME_FALSE);}}
else{
/* irregex-core.scm:1732: lp2 */
t4=((C_word*)((C_word*)t0)[7])[1];
f_17104(t4,((C_word*)t0)[8],((C_word*)t0)[9],t2,t3,C_SCHEME_FALSE);}}

/* lp2 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_17182(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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,6)))){
C_save_and_reclaim_args((void *)trf_17182,6,t0,t1,t2,t3,t4,t5);}
a=C_alloc(8);
if(C_truep(C_i_nullp(t2))){
t6=(C_truep(t4)?C_fixnum_plus(((C_word*)t0)[2],t4):C_fixnum_plus(((C_word*)t0)[2],C_fix(1)));
if(C_truep(((C_word*)t0)[3])){
if(C_truep(t5)){
/* irregex-core.scm:1739: return */
t7=((C_word*)t0)[4];{
C_word av2[4];
av2[0]=t7;
av2[1]=t1;
av2[2]=t6;
av2[3]=C_fixnum_plus(((C_word*)t0)[3],t5);
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}
else{
/* irregex-core.scm:1739: return */
t7=((C_word*)t0)[4];{
C_word av2[4];
av2[0]=t7;
av2[1]=t1;
av2[2]=t6;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}}
else{
/* irregex-core.scm:1739: return */
t7=((C_word*)t0)[4];{
C_word av2[4];
av2[0]=t7;
av2[1]=t1;
av2[2]=t6;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}}
else{
t6=C_i_car(t2);
t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17219,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=t4,a[7]=((C_word)li189),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1740: lp */
t8=((C_word*)((C_word*)t0)[6])[1];
f_17025(t8,t1,t6,t3,C_fix(0),C_fix(0),t7);}}

/* a17218 in lp2 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17219(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,2)))){
C_save_and_reclaim((void *)f_17219,c,av);}
a=C_alloc(10);
t4=C_i_cdr(((C_word*)t0)[2]);
t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_17252,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t4,a[6]=((C_word*)t0)[5],a[7]=t3,a[8]=((C_word*)t0)[6],a[9]=t2,tmp=(C_word)a,a+=10,tmp);
/* irregex-core.scm:1743: sre-count-submatches */
f_16913(t5,C_u_i_car(((C_word*)t0)[2]));}

/* k17233 in k17250 in a17218 in lp2 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_17235(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,5)))){
C_save_and_reclaim((void *)f_17235,c,av);}
a=C_alloc(7);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17239,a[2]=((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);
if(C_truep(((C_word*)t0)[6])){
if(C_truep(((C_word*)t0)[7])){
/* irregex-core.scm:1745: scheme#max */
t3=*((C_word*)lf[254]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[6];
av2[3]=((C_word*)t0)[7];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}
else{
/* irregex-core.scm:1742: lp2 */
t3=((C_word*)((C_word*)t0)[2])[1];
f_17182(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1,C_SCHEME_FALSE);}}
else{
/* irregex-core.scm:1742: lp2 */
t3=((C_word*)((C_word*)t0)[2])[1];
f_17182(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1,C_SCHEME_FALSE);}}

/* k17237 in k17233 in k17250 in a17218 in lp2 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_17239(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_17239,c,av);}
/* irregex-core.scm:1742: lp2 */
t2=((C_word*)((C_word*)t0)[2])[1];
f_17182(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t1);}

/* k17250 in a17218 in lp2 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17252(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,3)))){
C_save_and_reclaim((void *)f_17252,c,av);}
a=C_alloc(8);
t2=C_fixnum_plus(((C_word*)t0)[2],t1);
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17235,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],tmp=(C_word)a,a+=8,tmp);
if(C_truep(((C_word*)t0)[8])){
/* irregex-core.scm:1744: scheme#min */
t4=*((C_word*)lf[255]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[8];
av2[3]=((C_word*)t0)[9];
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}
else{
t4=t3;{
C_word *av2=av;
av2[0]=t4;
av2[1]=((C_word*)t0)[9];
f_17235(2,av2);}}}

/* k17273 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17275(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,2)))){
C_save_and_reclaim((void *)f_17275,c,av);}
a=C_alloc(10);
t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_17278,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);
/* irregex-core.scm:1752: sre-count-submatches */
f_16913(t2,C_i_cadr(((C_word*)t0)[2]));}

/* k17276 in k17273 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17278(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_17278,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_17285,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);
t3=C_i_cadr(((C_word*)t0)[2]);
t4=C_i_numberp(t3);
if(C_truep(t4)){
t5=t2;
f_17285(t5,(C_truep(t4)?lf[110]:C_u_i_car(C_u_i_cdr(((C_word*)t0)[2]))));}
else{
t5=C_u_i_cdr(((C_word*)t0)[2]);
t6=C_i_symbolp(C_u_i_car(t5));
t7=t2;
f_17285(t7,(C_truep(t6)?lf[110]:C_u_i_car(C_u_i_cdr(((C_word*)t0)[2]))));}}

/* k17283 in k17276 in k17273 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_17285(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,0,6)))){
C_save_and_reclaim_args((void *)trf_17285,2,t0,t1);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17287,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word)li193),tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1753: lp */
t3=((C_word*)((C_word*)t0)[7])[1];
f_17025(t3,((C_word*)t0)[8],t1,((C_word*)t0)[3],((C_word*)t0)[9],((C_word*)t0)[10],t2);}

/* a17286 in k17283 in k17276 in k17273 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_17287(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,6)))){
C_save_and_reclaim((void *)f_17287,c,av);}
a=C_alloc(11);
t4=C_i_caddr(((C_word*)t0)[2]);
t5=C_fixnum_plus(((C_word*)t0)[3],((C_word*)t0)[4]);
t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_17301,a[2]=((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]=t3,a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word)li192),tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:1758: lp */
t7=((C_word*)((C_word*)t0)[7])[1];
f_17025(t7,t1,t4,t5,C_fix(0),C_fix(0),t6);}

/* a17300 in a17286 in k17283 in k17276 in k17273 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_17301(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,6)))){
C_save_and_reclaim((void *)f_17301,c,av);}
a=C_alloc(8);
t4=C_i_cdddr(((C_word*)t0)[2]);
t5=C_i_pairp(t4);
t6=(C_truep(t5)?C_i_cadddr(((C_word*)t0)[2]):lf[110]);
t7=C_fixnum_plus(C_fixnum_plus(((C_word*)t0)[3],((C_word*)t0)[4]),((C_word*)t0)[5]);
t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17315,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t3,a[5]=((C_word*)t0)[8],a[6]=t2,a[7]=((C_word)li191),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1760: lp */
t9=((C_word*)((C_word*)t0)[9])[1];
f_17025(t9,t1,t6,t7,C_fix(0),C_fix(0),t8);}

/* a17314 in a17300 in a17286 in k17283 in k17276 in k17273 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in ... */
static void C_ccall f_17315(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,3)))){
C_save_and_reclaim((void *)f_17315,c,av);}
a=C_alloc(8);
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17344,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t3,a[6]=((C_word*)t0)[5],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1765: scheme#min */
t5=*((C_word*)lf[255]+1);{
C_word *av2=av;
av2[0]=t5;
av2[1]=t4;
av2[2]=((C_word*)t0)[6];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}

/* k17338 in k17342 in a17314 in a17300 in a17286 in k17283 in k17276 in k17273 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in ... */
static void C_ccall f_17340(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_17340,c,av);}
/* irregex-core.scm:1765: return */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=C_fixnum_plus(((C_word*)t0)[5],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k17342 in a17314 in a17300 in a17286 in k17283 in k17276 in k17273 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in ... */
static void C_ccall f_17344(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,3)))){
C_save_and_reclaim((void *)f_17344,c,av);}
a=C_alloc(6);
t2=C_fixnum_plus(((C_word*)t0)[2],t1);
if(C_truep(((C_word*)t0)[3])){
if(C_truep(((C_word*)t0)[4])){
if(C_truep(((C_word*)t0)[5])){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17340,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t2,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:1767: scheme#max */
t4=*((C_word*)lf[254]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}
else{
/* irregex-core.scm:1765: return */
t3=((C_word*)t0)[6];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[7];
av2[2]=t2;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}}
else{
/* irregex-core.scm:1765: return */
t3=((C_word*)t0)[6];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[7];
av2[2]=t2;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}}
else{
/* irregex-core.scm:1765: return */
t3=((C_word*)t0)[6];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[7];
av2[2]=t2;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}}

/* k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_17421(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,0,6)))){
C_save_and_reclaim_args((void *)trf_17421,2,t0,t1);}
a=C_alloc(11);
if(C_truep(t1)){
t2=C_eqp(lf[108],C_u_i_car(((C_word*)t0)[2]));
t3=(C_truep(t2)?(
/* irregex-core.scm:1772: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[2]))
):(
/* irregex-core.scm:1772: sre-sequence */
  f_18122(C_a_i(&a,3),C_i_cddr(((C_word*)t0)[2]))
));
t4=C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17434,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=((C_word)li194),tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:1772: lp */
t6=((C_word*)((C_word*)t0)[6])[1];
f_17025(t6,((C_word*)t0)[7],t3,t4,((C_word*)t0)[8],((C_word*)t0)[9],t5);}
else{
t2=C_eqp(((C_word*)t0)[10],lf[192]);
t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[10],lf[191]));
if(C_truep(t3)){
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17470,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[5],tmp=(C_word)a,a+=8,tmp);
t5=C_i_cadr(((C_word*)t0)[2]);
if(C_truep(C_i_numberp(t5))){
t6=t4;{
C_word av2[2];
av2[0]=t6;
av2[1]=C_u_i_car(C_u_i_cdr(((C_word*)t0)[2]));
f_17470(2,av2);}}
else{
t6=C_u_i_cdr(((C_word*)t0)[2]);
t7=C_i_assq(C_u_i_car(t6),((C_word*)t0)[11]);
if(C_truep(t7)){
t8=t4;{
C_word av2[2];
av2[0]=t8;
av2[1]=C_i_cdr(t7);
f_17470(2,av2);}}
else{
t8=C_u_i_cdr(((C_word*)t0)[2]);
/* irregex-core.scm:1782: chicken.base#error */
t9=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t9;
av2[1]=t4;
av2[2]=lf[259];
av2[3]=C_u_i_car(t8);
((C_proc)(void*)(*((C_word*)t9+1)))(4,av2);}}}}
else{
t4=C_eqp(((C_word*)t0)[10],lf[127]);
t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[10],lf[128]));
if(C_truep(t5)){
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17579,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
t7=(
/* irregex-core.scm:1794: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[2]))
);
t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17588,a[2]=((C_word)li195),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1794: lp */
t9=((C_word*)((C_word*)t0)[6])[1];
f_17025(t9,t6,t7,((C_word*)t0)[3],((C_word*)t0)[8],((C_word*)t0)[9],t8);}
else{
t6=C_eqp(((C_word*)t0)[10],lf[133]);
t7=(C_truep(t6)?t6:C_eqp(((C_word*)t0)[10],lf[130]));
if(C_truep(t7)){
t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17606,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)[2],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[3],tmp=(C_word)a,a+=9,tmp);
t9=C_i_cadr(((C_word*)t0)[2]);
if(C_truep(C_i_numberp(t9))){
t10=C_i_caddr(((C_word*)t0)[2]);
if(C_truep(C_i_numberp(t10))){
t11=C_u_i_cdr(((C_word*)t0)[2]);
t12=C_u_i_car(t11);
t13=C_u_i_cdr(((C_word*)t0)[2]);
t14=C_u_i_cdr(t13);
t15=t8;
f_17606(t15,C_fixnum_greaterp(t12,C_u_i_car(t14)));}
else{
t11=t8;
f_17606(t11,C_SCHEME_FALSE);}}
else{
t10=t8;
f_17606(t10,C_SCHEME_FALSE);}}
else{
t8=C_eqp(((C_word*)t0)[10],lf[129]);
if(C_truep(t8)){
t9=(
/* irregex-core.scm:1813: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[2]))
);
t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17748,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[8],a[4]=((C_word)li198),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1813: lp */
t11=((C_word*)((C_word*)t0)[6])[1];
f_17025(t11,((C_word*)t0)[7],t9,((C_word*)t0)[3],((C_word*)t0)[8],((C_word*)t0)[9],t10);}
else{
t9=C_eqp(((C_word*)t0)[10],lf[131]);
t10=(C_truep(t9)?t9:C_eqp(((C_word*)t0)[10],lf[132]));
if(C_truep(t10)){
t11=(
/* irregex-core.scm:1817: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[2]))
);
t12=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17776,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[8],a[5]=((C_word)li199),tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:1817: lp */
t13=((C_word*)((C_word*)t0)[6])[1];
f_17025(t13,((C_word*)t0)[7],t11,((C_word*)t0)[3],((C_word*)t0)[8],((C_word*)t0)[9],t12);}
else{
t11=C_eqp(((C_word*)t0)[10],lf[134]);
t12=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_17801,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[10],tmp=(C_word)a,a+=10,tmp);
if(C_truep(t11)){
t13=t12;
f_17801(t13,t11);}
else{
t13=C_eqp(((C_word*)t0)[10],lf[263]);
if(C_truep(t13)){
t14=t12;
f_17801(t14,t13);}
else{
t14=C_eqp(((C_word*)t0)[10],lf[135]);
t15=t12;
f_17801(t15,(C_truep(t14)?t14:C_eqp(((C_word*)t0)[10],lf[260])));}}}}}}}}}

/* a17433 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17434(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,3)))){
C_save_and_reclaim((void *)f_17434,c,av);}
a=C_alloc(3);
t4=C_a_i_cons(&a,2,t2,t3);
t5=C_i_vector_set(((C_word*)t0)[2],((C_word*)t0)[3],t4);
/* irregex-core.scm:1777: return */
t6=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t6;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}

/* k17468 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17470(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_17470,c,av);}
a=C_alloc(9);
t2=C_i_not(C_i_integerp(t1));
t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17479,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);
if(C_truep(t2)){
t4=t3;
f_17479(t4,t2);}
else{
t4=C_block_size(((C_word*)t0)[4]);
t5=t3;
f_17479(t5,C_i_not(C_and(C_fixnum_lessp(C_fix(0),t1),C_fixnum_lessp(t1,t4))));}}

/* k17477 in k17468 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_17479(C_word t0,C_word t1){
C_word 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;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,4)))){
C_save_and_reclaim_args((void *)trf_17479,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:1786: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[256];
av2[3]=lf[257];
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(5,av2);}}
else{
t2=C_i_vector_ref(((C_word*)t0)[4],((C_word*)t0)[5]);
if(C_truep(C_i_not(t2))){
/* irregex-core.scm:1788: chicken.base#error */
t3=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t3;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[256];
av2[3]=lf[258];
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}
else{
t3=C_i_vector_ref(((C_word*)t0)[4],((C_word*)t0)[5]);
t4=C_i_car(t3);
t5=C_i_vector_ref(((C_word*)t0)[4],((C_word*)t0)[5]);
t6=C_i_cdr(t5);
t7=C_fixnum_plus(((C_word*)t0)[6],t4);
if(C_truep(((C_word*)t0)[7])){
if(C_truep(t6)){
/* irregex-core.scm:1792: return */
t8=((C_word*)t0)[8];{
C_word av2[4];
av2[0]=t8;
av2[1]=((C_word*)t0)[2];
av2[2]=t7;
av2[3]=C_fixnum_plus(((C_word*)t0)[7],t6);
((C_proc)(void*)(*((C_word*)t8+1)))(4,av2);}}
else{
/* irregex-core.scm:1792: return */
t8=((C_word*)t0)[8];{
C_word av2[4];
av2[0]=t8;
av2[1]=((C_word*)t0)[2];
av2[2]=t7;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t8+1)))(4,av2);}}}
else{
/* irregex-core.scm:1792: return */
t8=((C_word*)t0)[8];{
C_word av2[4];
av2[0]=t8;
av2[1]=((C_word*)t0)[2];
av2[2]=t7;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t8+1)))(4,av2);}}}}}

/* k17577 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17579(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_17579,c,av);}
/* irregex-core.scm:1795: return */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* a17587 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17588(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_17588,c,av);}
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* k17604 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_17606(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,0,2)))){
C_save_and_reclaim_args((void *)trf_17606,2,t0,t1);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17609,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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(t1)){
t3=t2;
f_17609(t3,t1);}
else{
t3=C_u_i_cdr(((C_word*)t0)[6]);
t4=C_i_not(C_u_i_car(t3));
t5=t2;
f_17609(t5,(C_truep(t4)?C_i_caddr(((C_word*)t0)[6]):C_SCHEME_FALSE));}}

/* k17607 in k17604 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_17609(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,6)))){
C_save_and_reclaim_args((void *)trf_17609,2,t0,t1);}
a=C_alloc(10);
if(C_truep(t1)){
/* irregex-core.scm:1802: return */
t2=((C_word*)t0)[2];{
C_word av2[4];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}
else{
if(C_truep(C_i_caddr(((C_word*)t0)[6]))){
t2=C_u_i_cdr(((C_word*)t0)[6]);
t3=C_u_i_cdr(t2);
t4=(
/* irregex-core.scm:1805: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(t3))
);
t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17627,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],a[6]=((C_word)li196),tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:1805: lp */
t6=((C_word*)((C_word*)t0)[7])[1];
f_17025(t6,((C_word*)t0)[3],t4,((C_word*)t0)[8],C_fix(0),C_fix(0),t5);}
else{
t2=(
/* irregex-core.scm:1809: sre-sequence */
  f_18122(C_a_i(&a,3),C_i_cdddr(((C_word*)t0)[6]))
);
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17674,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],a[5]=((C_word)li197),tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:1809: lp */
t4=((C_word*)((C_word*)t0)[7])[1];
f_17025(t4,((C_word*)t0)[3],t2,((C_word*)t0)[8],C_fix(0),C_fix(0),t3);}}}

/* a17626 in k17607 in k17604 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_17627(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_17627,c,av);}
t4=C_i_cadr(((C_word*)t0)[2]);
t5=C_fixnum_times(t4,t2);
t6=C_fixnum_plus(((C_word*)t0)[3],t5);
if(C_truep(((C_word*)t0)[4])){
if(C_truep(t3)){
t7=C_i_caddr(((C_word*)t0)[2]);
t8=C_fixnum_times(t7,t3);
/* irregex-core.scm:1807: return */
t9=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t9;
av2[1]=t1;
av2[2]=t6;
av2[3]=C_fixnum_plus(((C_word*)t0)[4],t8);
((C_proc)(void*)(*((C_word*)t9+1)))(4,av2);}}
else{
/* irregex-core.scm:1807: return */
t7=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t7;
av2[1]=t1;
av2[2]=t6;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}}
else{
/* irregex-core.scm:1807: return */
t7=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t7;
av2[1]=t1;
av2[2]=t6;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}}

/* a17673 in k17607 in k17604 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_17674(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_17674,c,av);}
t4=C_i_cadr(((C_word*)t0)[2]);
t5=C_fixnum_times(t4,t2);
/* irregex-core.scm:1811: return */
t6=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t6;
av2[1]=t1;
av2[2]=C_fixnum_plus(((C_word*)t0)[4],t5);
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}

/* a17747 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17748(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_17748,c,av);}
/* irregex-core.scm:1815: return */
t4=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t4;
av2[1]=t1;
av2[2]=C_fixnum_plus(((C_word*)t0)[3],t2);
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}

/* a17775 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_17776(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_17776,c,av);}
if(C_truep(((C_word*)t0)[2])){
if(C_truep(t3)){
/* irregex-core.scm:1819: return */
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=t1;
av2[2]=((C_word*)t0)[4];
av2[3]=C_fixnum_plus(((C_word*)t0)[2],t3);
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}
else{
/* irregex-core.scm:1819: return */
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=t1;
av2[2]=((C_word*)t0)[4];
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}}
else{
/* irregex-core.scm:1819: return */
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=t1;
av2[2]=((C_word*)t0)[4];
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}}

/* k17799 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_17801(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,2)))){
C_save_and_reclaim_args((void *)trf_17801,2,t0,t1);}
a=C_alloc(12);
if(C_truep(t1)){
t2=C_i_cadr(((C_word*)t0)[2]);
t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17820,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],tmp=(C_word)a,a+=9,tmp);
t4=C_u_i_car(((C_word*)t0)[2]);
if(C_truep((C_truep(C_eqp(t4,lf[135]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[260]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
t5=C_u_i_cdr(((C_word*)t0)[2]);
t6=C_u_i_cdr(t5);
t7=t3;
f_17820(t7,C_a_i_cons(&a,2,C_SCHEME_FALSE,t6));}
else{
t5=C_u_i_cdr(((C_word*)t0)[2]);
t6=C_u_i_car(t5);
t7=C_u_i_cdr(((C_word*)t0)[2]);
t8=C_u_i_cdr(t7);
t9=t3;
f_17820(t9,C_a_i_cons(&a,2,t6,t8));}}
else{
t2=C_eqp(((C_word*)t0)[9],lf[111]);
t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17841,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[2],a[7]=((C_word*)t0)[3],a[8]=((C_word*)t0)[5],tmp=(C_word)a,a+=9,tmp);
if(C_truep(t2)){
t4=t3;
f_17841(t4,t2);}
else{
t4=C_eqp(((C_word*)t0)[9],lf[112]);
if(C_truep(t4)){
t5=t3;
f_17841(t5,t4);}
else{
t5=C_eqp(((C_word*)t0)[9],lf[113]);
t6=t3;
f_17841(t6,(C_truep(t5)?t5:C_eqp(((C_word*)t0)[9],lf[114])));}}}}

/* k17818 in k17799 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_17820(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,6)))){
C_save_and_reclaim_args((void *)trf_17820,2,t0,t1);}
a=C_alloc(6);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
t3=C_a_i_cons(&a,2,lf[133],t2);
/* irregex-core.scm:1821: lp */
t4=((C_word*)((C_word*)t0)[3])[1];
f_17025(t4,((C_word*)t0)[4],t3,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);}

/* k17839 in k17799 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_17841(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,0,4)))){
C_save_and_reclaim_args((void *)trf_17841,2,t0,t1);}
a=C_alloc(9);
if(C_truep(t1)){
/* irregex-core.scm:1826: return */
t2=((C_word*)t0)[2];{
C_word av2[4];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}
else{
t2=C_i_assq(C_u_i_car(((C_word*)t0)[6]),lf[248]);
if(C_truep(t2)){
t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17851,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[2],a[7]=((C_word*)t0)[6],a[8]=((C_word)li200),tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1828: g3015 */
t4=t3;
f_17851(t4,((C_word*)t0)[3],t2);}
else{
/* irregex-core.scm:1833: chicken.base#error */
t3=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t3;
av2[1]=((C_word*)t0)[3];
av2[2]=lf[261];
av2[3]=lf[262];
av2[4]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}}}

/* g3015 in k17839 in k17799 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_fcall f_17851(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_unlikely(!C_demand(C_calculate_demand(8,0,3)))){
C_save_and_reclaim_args((void *)trf_17851,3,t0,t1,t2);}
a=C_alloc(8);
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17859,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_word av2[4];
av2[0]=0;
av2[1]=t3;
av2[2]=C_i_cdr(t2);
av2[3]=C_i_cdr(((C_word*)t0)[7]);
C_apply(4,av2);}}

/* k17857 in g3015 in k17839 in k17799 in k17419 in k17095 in k17066 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_17859(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_17859,c,av);}
/* irregex-core.scm:1831: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_17025(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}

/* k18088 in lp in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_18090(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,6)))){
C_save_and_reclaim((void *)f_18090,c,av);}
/* irregex-core.scm:1845: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_17025(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}

/* k18111 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_18113(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_18113,c,av);}
/* irregex-core.scm:1711: scheme#make-vector */
t2=*((C_word*)lf[4]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=C_fixnum_plus(C_fix(1),t1);
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* chicken.irregex#sre-sequence in k7718 in k7493 in k7490 */
static C_word C_fcall f_18122(C_word *a,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_stack_overflow_check;{}
if(C_truep(C_i_nullp(t1))){
return(lf[110]);}
else{
t2=C_i_cdr(t1);
t3=C_i_nullp(t2);
return((C_truep(t3)?C_u_i_car(t1):C_a_i_cons(&a,2,lf[115],t1)));}}

/* chicken.irregex#sre-alternate in k7718 in k7493 in k7490 */
static C_word C_fcall f_18145(C_word *a,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_stack_overflow_check;{}
if(C_truep(C_i_nullp(t1))){
return(lf[282]);}
else{
t2=C_i_cdr(t1);
t3=C_i_nullp(t2);
return((C_truep(t3)?C_u_i_car(t1):C_a_i_cons(&a,2,lf[103],t1)));}}

/* chicken.irregex#sre-strip-submatches in k7718 in k7493 in k7490 */
static void C_ccall f_18168(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word *a;
loop:
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,3)))){
av[0]=t0;
av[1]=t1;
av[2]=t2;
C_save_and_reclaim((void *)f_18168,c,av);}
a=C_alloc(13);
t3=C_i_pairp(t2);
if(C_truep(C_i_not(t3))){
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=C_i_car(t2);
t5=C_eqp(t4,lf[245]);
t6=(C_truep(t5)?t5:C_eqp(t4,lf[108]));
if(C_truep(t6)){
t7=(
/* irregex-core.scm:1872: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(t2))
);
/* irregex-core.scm:1872: sre-strip-submatches */
t19=t1;
t20=t7;
t1=t19;
t2=t20;
c=3;
goto loop;}
else{
t7=C_eqp(t4,lf[119]);
t8=(C_truep(t7)?t7:C_eqp(t4,lf[120]));
if(C_truep(t8)){
t9=(
/* irregex-core.scm:1873: sre-sequence */
  f_18122(C_a_i(&a,3),C_i_cddr(t2))
);
/* irregex-core.scm:1873: sre-strip-submatches */
t19=t1;
t20=t9;
t1=t19;
t2=t20;
c=3;
goto loop;}
else{
t9=C_eqp(t4,lf[244]);
if(C_truep(t9)){
t10=(
/* irregex-core.scm:1874: sre-sequence */
  f_18122(C_a_i(&a,3),C_i_cdddr(t2))
);
/* irregex-core.scm:1874: sre-strip-submatches */
t19=t1;
t20=t10;
t1=t19;
t2=t20;
c=3;
goto loop;}
else{
t10=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t11=t10;
t12=(*a=C_VECTOR_TYPE|1,a[1]=t11,tmp=(C_word)a,a+=2,tmp);
t13=((C_word*)t12)[1];
t14=lf[283];
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|5,a[1]=(C_word)f_18241,a[2]=t12,a[3]=t16,a[4]=t13,a[5]=((C_word)li225),tmp=(C_word)a,a+=6,tmp));
t18=((C_word*)t16)[1];
f_18241(t18,t1,t2);}}}}}

/* map-loop3052 in chicken.irregex#sre-strip-submatches in k7718 in k7493 in k7490 */
static void C_fcall f_18241(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_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_18241,3,t0,t1,t2);}
a=C_alloc(6);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18266,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);
/* irregex-core.scm:1875: g3058 */
t4=lf[283];{
C_word av2[3];
av2[0]=t4;
av2[1]=t3;
av2[2]=C_slot(t2,C_fix(0));
f_18168(3,av2);}}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[4],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k18264 in map-loop3052 in chicken.irregex#sre-strip-submatches in k7718 in k7493 in k7490 */
static void C_ccall f_18266(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_18266,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
t3=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=((C_word*)((C_word*)t0)[3])[1];
f_18241(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* lp in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_18301(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,0,3)))){
C_save_and_reclaim_args((void *)trf_18301,4,t0,t1,t2,t3);}
a=C_alloc(9);
if(C_truep(C_i_nullp(t2))){
/* irregex-core.scm:1883: ##sys#fast-reverse */
t4=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t4;
av2[1]=t1;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t4=C_i_car(t2);
if(C_truep(C_i_stringp(t4))){
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18324,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18328,a[2]=t5,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* ##sys#string->list */
t7=*((C_word*)lf[105]+1);{
C_word av2[3];
av2[0]=t7;
av2[1]=t6;
av2[2]=C_u_i_car(t2);
((C_proc)(void*)(*((C_word*)t7+1)))(3,av2);}}
else{
t5=C_u_i_cdr(t2);
t6=C_u_i_car(t2);
t7=C_a_i_cons(&a,2,t6,t3);
/* irregex-core.scm:1887: lp */
t9=t1;
t10=t5;
t11=t7;
t1=t9;
t2=t10;
t3=t11;
goto loop;}}}

/* k18322 in lp in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_18324(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_18324,c,av);}
/* irregex-core.scm:1885: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_18301(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4]);}

/* k18326 in lp in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_18328(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_18328,c,av);}
/* irregex-core.scm:1885: scheme#append */
t2=*((C_word*)lf[73]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
av2[3]=C_u_i_cdr(((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* chicken.irregex#sre-names in k7718 in k7493 in k7490 */
static void C_fcall f_18349(C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word t26;
C_word t27;
C_word t28;
C_word t29;
C_word t30;
C_word t31;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,0,4)))){
C_save_and_reclaim_args((void *)trf_18349,4,t1,t2,t3,t4);}
a=C_alloc(9);
t5=C_i_pairp(t2);
if(C_truep(C_i_not(t5))){
t6=t1;{
C_word av2[2];
av2[0]=t6;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
t6=C_i_car(t2);
t7=C_eqp(t6,lf[245]);
t8=(C_truep(t7)?t7:C_eqp(t6,lf[108]));
if(C_truep(t8)){
t9=(
/* irregex-core.scm:1894: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(t2))
);
/* irregex-core.scm:1894: sre-names */
t28=t1;
t29=t9;
t30=C_fixnum_plus(t3,C_fix(1));
t31=t4;
t1=t28;
t2=t29;
t3=t30;
t4=t31;
goto loop;}
else{
t9=C_eqp(t6,lf[119]);
t10=(C_truep(t9)?t9:C_eqp(t6,lf[120]));
if(C_truep(t10)){
t11=(
/* irregex-core.scm:1896: sre-sequence */
  f_18122(C_a_i(&a,3),C_i_cddr(t2))
);
t12=C_fixnum_plus(t3,C_fix(1));
t13=C_i_cadr(t2);
t14=C_a_i_cons(&a,2,t13,t3);
t15=C_a_i_cons(&a,2,t14,t4);
/* irregex-core.scm:1896: sre-names */
t28=t1;
t29=t11;
t30=t12;
t31=t15;
t1=t28;
t2=t29;
t3=t30;
t4=t31;
goto loop;}
else{
t11=C_eqp(t6,lf[244]);
if(C_truep(t11)){
t12=(
/* irregex-core.scm:1900: sre-sequence */
  f_18122(C_a_i(&a,3),C_i_cdddr(t2))
);
t13=C_i_cadr(t2);
/* irregex-core.scm:1900: sre-names */
t28=t1;
t29=t12;
t30=C_fixnum_plus(t3,t13);
t31=t4;
t1=t28;
t2=t29;
t3=t30;
t4=t31;
goto loop;}
else{
t12=C_eqp(t6,lf[115]);
t13=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18451,a[2]=t1,a[3]=t2,a[4]=t3,a[5]=t4,a[6]=t6,tmp=(C_word)a,a+=7,tmp);
if(C_truep(t12)){
t14=t13;
f_18451(t14,t12);}
else{
t14=C_eqp(t6,lf[227]);
if(C_truep(t14)){
t15=t13;
f_18451(t15,t14);}
else{
t15=C_eqp(t6,lf[103]);
if(C_truep(t15)){
t16=t13;
f_18451(t16,t15);}
else{
t16=C_eqp(t6,lf[127]);
if(C_truep(t16)){
t17=t13;
f_18451(t17,t16);}
else{
t17=C_eqp(t6,lf[129]);
if(C_truep(t17)){
t18=t13;
f_18451(t18,t17);}
else{
t18=C_eqp(t6,lf[131]);
if(C_truep(t18)){
t19=t13;
f_18451(t19,t18);}
else{
t19=C_eqp(t6,lf[128]);
if(C_truep(t19)){
t20=t13;
f_18451(t20,t19);}
else{
t20=C_eqp(t6,lf[132]);
if(C_truep(t20)){
t21=t13;
f_18451(t21,t20);}
else{
t21=C_eqp(t6,lf[225]);
if(C_truep(t21)){
t22=t13;
f_18451(t22,t21);}
else{
t22=C_eqp(t6,lf[226]);
if(C_truep(t22)){
t23=t13;
f_18451(t23,t22);}
else{
t23=C_eqp(t6,lf[239]);
if(C_truep(t23)){
t24=t13;
f_18451(t24,t23);}
else{
t24=C_eqp(t6,lf[111]);
if(C_truep(t24)){
t25=t13;
f_18451(t25,t24);}
else{
t25=C_eqp(t6,lf[113]);
if(C_truep(t25)){
t26=t13;
f_18451(t26,t25);}
else{
t26=C_eqp(t6,lf[112]);
t27=t13;
f_18451(t27,(C_truep(t26)?t26:C_eqp(t6,lf[114])));}}}}}}}}}}}}}}}}}}

/* k18449 in chicken.irregex#sre-names in k7718 in k7493 in k7490 */
static void C_fcall f_18451(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,4)))){
C_save_and_reclaim_args((void *)trf_18451,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:1903: sre-sequence-names */
f_18635(((C_word*)t0)[2],C_u_i_cdr(((C_word*)t0)[3]),((C_word*)t0)[4],((C_word*)t0)[5]);}
else{
t2=C_eqp(((C_word*)t0)[6],lf[134]);
t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[6],lf[135]));
if(C_truep(t3)){
/* irregex-core.scm:1905: sre-sequence-names */
f_18635(((C_word*)t0)[2],C_i_cddr(((C_word*)t0)[3]),((C_word*)t0)[4],((C_word*)t0)[5]);}
else{
t4=C_eqp(((C_word*)t0)[6],lf[133]);
t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[6],lf[130]));
if(C_truep(t5)){
/* irregex-core.scm:1907: sre-sequence-names */
f_18635(((C_word*)t0)[2],C_i_cdddr(((C_word*)t0)[3]),((C_word*)t0)[4],((C_word*)t0)[5]);}
else{
t6=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t6;
av2[1]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}}}}

/* chicken.irregex#sre-sequence-names in k7718 in k7493 in k7490 */
static void C_fcall f_18635(C_word 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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,2)))){
C_save_and_reclaim_args((void *)trf_18635,4,t1,t2,t3,t4);}
a=C_alloc(7);
if(C_truep(C_i_nullp(t2))){
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t5=C_i_cdr(t2);
t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18663,a[2]=t3,a[3]=t1,a[4]=t5,a[5]=t2,a[6]=t4,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:1915: sre-count-submatches */
f_16913(t6,C_u_i_car(t2));}}

/* k18655 in k18661 in chicken.irregex#sre-sequence-names in k7718 in k7493 in k7490 */
static void C_ccall f_18657(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_18657,c,av);}
/* irregex-core.scm:1914: sre-sequence-names */
f_18635(((C_word*)t0)[2],((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* k18661 in chicken.irregex#sre-sequence-names in k7718 in k7493 in k7490 */
static void C_ccall f_18663(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,4)))){
C_save_and_reclaim((void *)f_18663,c,av);}
a=C_alloc(5);
t2=C_fixnum_plus(((C_word*)t0)[2],t1);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18657,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1916: sre-names */
f_18349(t3,C_u_i_car(((C_word*)t0)[5]),((C_word*)t0)[2],((C_word*)t0)[6]);}

/* chicken.irregex#sre-remove-initial-bos in k7718 in k7493 in k7490 */
static void C_ccall f_18667(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_18667,c,av);}
a=C_alloc(5);
if(C_truep(C_i_pairp(t2))){
t3=C_u_i_car(t2);
t4=C_eqp(t3,lf[115]);
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18684,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
if(C_truep(t4)){
t6=t5;
f_18684(t6,t4);}
else{
t6=C_eqp(t3,lf[227]);
if(C_truep(t6)){
t7=t5;
f_18684(t7,t6);}
else{
t7=C_eqp(t3,lf[245]);
if(C_truep(t7)){
t8=t5;
f_18684(t8,t7);}
else{
t8=C_eqp(t3,lf[108]);
if(C_truep(t8)){
t9=t5;
f_18684(t9,t8);}
else{
t9=C_eqp(t3,lf[119]);
if(C_truep(t9)){
t10=t5;
f_18684(t10,t9);}
else{
t10=C_eqp(t3,lf[120]);
if(C_truep(t10)){
t11=t5;
f_18684(t11,t10);}
else{
t11=C_eqp(t3,lf[127]);
t12=t5;
f_18684(t12,(C_truep(t11)?t11:C_eqp(t3,lf[129])));}}}}}}}
else{
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k18682 in chicken.irregex#sre-remove-initial-bos in k7718 in k7493 in k7490 */
static void C_fcall f_18684(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(16,0,3)))){
C_save_and_reclaim_args((void *)trf_18684,2,t0,t1);}
a=C_alloc(16);
if(C_truep(t1)){
t2=C_i_pairp(C_u_i_cdr(((C_word*)t0)[2]));
if(C_truep(C_i_not(t2))){
t3=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t3;
av2[1]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
t3=C_i_cadr(((C_word*)t0)[2]);
t4=C_eqp(lf[186],t3);
if(C_truep(t4)){
t5=C_u_i_car(((C_word*)t0)[2]);
t6=C_u_i_cdr(((C_word*)t0)[2]);
t7=C_u_i_cdr(t6);
t8=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t8;
av2[1]=C_a_i_cons(&a,2,t5,t7);
((C_proc)(void*)(*((C_word*)t8+1)))(2,av2);}}
else{
t5=C_u_i_car(((C_word*)t0)[2]);
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18717,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t5,tmp=(C_word)a,a+=5,tmp);
t7=C_u_i_cdr(((C_word*)t0)[2]);
/* irregex-core.scm:1930: sre-remove-initial-bos */
t8=lf[270];{
C_word av2[3];
av2[0]=t8;
av2[1]=t6;
av2[2]=C_u_i_car(t7);
f_18667(3,av2);}}}}
else{
t2=C_eqp(((C_word*)t0)[4],lf[103]);
if(C_truep(t2)){
t3=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,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*)t5)[1];
t7=lf[270];
t8=C_u_i_cdr(((C_word*)t0)[2]);
t9=C_i_check_list_2(t8,lf[211]);
t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18754,a[2]=((C_word*)t0)[3],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_18756,a[2]=t5,a[3]=t12,a[4]=t6,a[5]=((C_word)li229),tmp=(C_word)a,a+=6,tmp));
t14=((C_word*)t12)[1];
f_18756(t14,t10,t8);}
else{
t3=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t3;
av2[1]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}}

/* k18715 in k18682 in chicken.irregex#sre-remove-initial-bos in k7718 in k7493 in k7490 */
static void C_ccall f_18717(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,1)))){
C_save_and_reclaim((void *)f_18717,c,av);}
a=C_alloc(6);
t2=C_i_cddr(((C_word*)t0)[2]);
t3=C_a_i_cons(&a,2,t1,t2);
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* k18752 in k18682 in chicken.irregex#sre-remove-initial-bos in k7718 in k7493 in k7490 */
static void C_ccall f_18754(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_18754,c,av);}
a=C_alloc(3);
/* irregex-core.scm:1932: sre-alternate */
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=(
/* irregex-core.scm:1932: sre-alternate */
  f_18145(C_a_i(&a,3),t1)
);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* map-loop3193 in k18682 in chicken.irregex#sre-remove-initial-bos in k7718 in k7493 in k7490 */
static void C_fcall f_18756(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_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_18756,3,t0,t1,t2);}
a=C_alloc(6);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18781,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);
/* irregex-core.scm:1932: g3199 */
t4=lf[270];{
C_word av2[3];
av2[0]=t4;
av2[1]=t3;
av2[2]=C_slot(t2,C_fix(0));
f_18667(3,av2);}}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[4],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k18779 in map-loop3193 in k18682 in chicken.irregex#sre-remove-initial-bos in k7718 in k7493 in k7490 */
static void C_ccall f_18781(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_18781,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
t3=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=((C_word*)((C_word*)t0)[3])[1];
f_18756(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_18849(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word t26;
C_word t27;
C_word t28;
C_word t29;
C_word t30;
C_word t31;
C_word t32;
C_word t33;
C_word t34;
C_word t35;
C_word t36;
C_word t37;
C_word t38;
C_word t39;
C_word t40;
C_word t41;
C_word t42;
C_word t43;
C_word t44;
C_word t45;
C_word t46;
C_word t47;
C_word t48;
C_word t49;
C_word t50;
C_word t51;
C_word t52;
C_word t53;
C_word t54;
C_word t55;
C_word t56;
C_word t57;
C_word t58;
C_word t59;
C_word t60;
C_word t61;
C_word t62;
C_word t63;
C_word t64;
C_word t65;
C_word t66;
C_word t67;
C_word t68;
C_word t69;
C_word t70;
C_word t71;
C_word t72;
C_word t73;
C_word t74;
C_word t75;
C_word t76;
C_word t77;
C_word t78;
C_word t79;
C_word t80;
C_word t81;
C_word t82;
C_word t83;
C_word t84;
C_word t85;
C_word t86;
C_word t87;
C_word t88;
C_word t89;
C_word t90;
C_word t91;
C_word t92;
C_word t93;
C_word t94;
C_word t95;
C_word t96;
C_word t97;
C_word t98;
C_word t99;
C_word t100;
C_word t101;
C_word t102;
C_word t103;
C_word t104;
C_word t105;
C_word t106;
C_word t107;
C_word t108;
C_word t109;
C_word t110;
C_word t111;
C_word t112;
C_word t113;
C_word t114;
C_word t115;
C_word t116;
C_word t117;
C_word t118;
C_word t119;
C_word t120;
C_word t121;
C_word t122;
C_word t123;
C_word t124;
C_word t125;
C_word t126;
C_word t127;
C_word t128;
C_word t129;
C_word t130;
C_word t131;
C_word t132;
C_word t133;
C_word t134;
C_word t135;
C_word t136;
C_word t137;
C_word t138;
C_word t139;
C_word t140;
C_word t141;
C_word t142;
C_word t143;
C_word t144;
C_word t145;
C_word t146;
C_word t147;
C_word t148;
C_word t149;
C_word t150;
C_word t151;
C_word t152;
C_word t153;
C_word t154;
C_word t155;
C_word t156;
C_word t157;
C_word t158;
C_word t159;
C_word t160;
C_word t161;
C_word t162;
C_word t163;
C_word t164;
C_word t165;
C_word t166;
C_word t167;
C_word t168;
C_word t169;
C_word t170;
C_word t171;
C_word t172;
C_word t173;
C_word t174;
C_word t175;
C_word t176;
C_word t177;
C_word t178;
C_word t179;
C_word t180;
C_word t181;
C_word t182;
C_word t183;
C_word t184;
C_word t185;
C_word t186;
C_word t187;
C_word t188;
C_word t189;
C_word t190;
C_word t191;
C_word t192;
C_word t193;
C_word t194;
C_word t195;
C_word t196;
C_word t197;
C_word t198;
C_word t199;
C_word t200;
C_word t201;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(1655,c,10)))){
C_save_and_reclaim((void *)f_18849,c,av);}
a=C_alloc(1655);
t2=C_mutate(&lf[285] /* (set! chicken.irregex#irregex-basic-string-chunker ...) */,t1);
t3=C_mutate((C_word*)lf[286]+1 /* (set! chicken.irregex#irregex-search ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18851,a[2]=((C_word)li231),tmp=(C_word)a,a+=3,tmp));
t4=C_mutate((C_word*)lf[287]+1 /* (set! chicken.irregex#irregex-search/chunked ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18941,a[2]=((C_word)li232),tmp=(C_word)a,a+=3,tmp));
t5=C_mutate(&lf[292] /* (set! chicken.irregex#irregex-search/matches ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18984,a[2]=((C_word)li241),tmp=(C_word)a,a+=3,tmp));
t6=C_mutate((C_word*)lf[298]+1 /* (set! chicken.irregex#irregex-match ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19233,a[2]=((C_word)li242),tmp=(C_word)a,a+=3,tmp));
t7=C_mutate((C_word*)lf[299]+1 /* (set! chicken.irregex#irregex-match/chunked ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19323,a[2]=((C_word)li245),tmp=(C_word)a,a+=3,tmp));
t8=C_mutate((C_word*)lf[304]+1 /* (set! chicken.irregex#irregex-match? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19551,a[2]=((C_word)li246),tmp=(C_word)a,a+=3,tmp));
t9=C_mutate(&lf[305] /* (set! chicken.irregex#finalize! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19747,a[2]=((C_word)li249),tmp=(C_word)a,a+=3,tmp));
t10=C_mutate(&lf[295] /* (set! chicken.irregex#dfa-match/longest ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19866,a[2]=((C_word)li260),tmp=(C_word)a,a+=3,tmp));
t11=C_a_i_cons(&a,2,lf[124],lf[53]);
t12=C_a_i_string(&a,1,C_make_character(10));
t13=C_a_i_list(&a,1,t12);
t14=C_a_i_list(&a,4,lf[125],lf[247],lf[53],t13);
t15=C_a_i_list(&a,6,lf[307],lf[52],C_make_character(97),C_make_character(122),C_make_character(65),C_make_character(90));
t16=C_a_i_cons(&a,2,lf[308],lf[307]);
t17=C_a_i_list(&a,8,lf[181],lf[52],C_make_character(97),C_make_character(122),C_make_character(65),C_make_character(90),C_make_character(48),C_make_character(57));
t18=C_a_i_cons(&a,2,lf[309],lf[181]);
t19=C_a_i_cons(&a,2,lf[310],lf[181]);
t20=C_a_i_list(&a,4,lf[311],lf[52],C_make_character(97),C_make_character(122));
t21=C_a_i_cons(&a,2,lf[312],lf[311]);
t22=C_a_i_list(&a,4,lf[313],lf[52],C_make_character(65),C_make_character(90));
t23=C_a_i_cons(&a,2,lf[314],lf[313]);
t24=C_a_i_list(&a,4,lf[178],lf[52],C_make_character(48),C_make_character(57));
t25=C_a_i_cons(&a,2,lf[315],lf[178]);
t26=C_a_i_cons(&a,2,lf[316],lf[178]);
t27=C_a_i_list(&a,25,lf[317],lf[103],C_make_character(33),C_make_character(34),C_make_character(35),C_make_character(37),C_make_character(38),C_make_character(39),C_make_character(40),C_make_character(41),C_make_character(42),C_make_character(44),C_make_character(45),C_make_character(46),C_make_character(47),C_make_character(58),C_make_character(59),C_make_character(63),C_make_character(64),C_make_character(91),C_make_character(92),C_make_character(93),C_make_character(95),C_make_character(123),C_make_character(125));
t28=C_a_i_cons(&a,2,lf[318],lf[317]);
t29=C_a_i_list(&a,13,lf[319],lf[103],lf[181],lf[317],C_make_character(36),C_make_character(43),C_make_character(60),C_make_character(61),C_make_character(62),C_make_character(94),C_make_character(96),C_make_character(124),C_make_character(126));
t30=C_a_i_cons(&a,2,lf[320],lf[319]);
t31=C_a_i_list(&a,4,lf[321],lf[103],C_make_character(32),C_make_character(9));
t32=C_a_i_list(&a,4,lf[322],lf[103],lf[321],C_make_character(10));
t33=C_a_i_cons(&a,2,lf[79],lf[322]);
t34=C_a_i_cons(&a,2,lf[323],lf[322]);
t35=C_a_i_list(&a,4,lf[324],lf[103],lf[319],lf[322]);
t36=C_a_i_cons(&a,2,lf[325],lf[324]);
t37=C_a_i_list(&a,4,lf[326],lf[52],C_make_character(0),C_make_character(31));
t38=C_a_i_cons(&a,2,lf[327],lf[326]);
t39=C_a_i_list(&a,5,lf[52],C_make_character(97),C_make_character(102),C_make_character(65),C_make_character(70));
t40=C_a_i_list(&a,4,lf[328],lf[103],lf[178],t39);
t41=C_a_i_cons(&a,2,lf[329],lf[328]);
t42=C_a_i_list(&a,4,lf[330],lf[52],C_make_character(0),C_make_character(127));
t43=C_a_i_list(&a,6,lf[331],lf[52],C_make_character(0),C_make_character(9),C_make_character(11),C_make_character(127));
t44=C_a_i_list(&a,3,lf[115],C_make_character(13),C_make_character(10));
t45=C_a_i_list(&a,3,lf[52],C_make_character(10),C_make_character(13));
t46=C_a_i_list(&a,4,lf[80],lf[103],t44,t45);
t47=C_a_i_list(&a,3,lf[103],lf[181],C_make_character(95));
t48=C_a_i_list(&a,2,lf[129],t47);
t49=C_a_i_list(&a,5,lf[231],lf[115],lf[183],t48,lf[184]);
t50=C_a_i_list(&a,4,lf[332],lf[52],C_make_character(128),C_make_character(193));
t51=C_a_i_list(&a,3,lf[52],C_make_character(194),C_make_character(223));
t52=C_a_i_list(&a,4,lf[333],lf[115],t51,lf[332]);
t53=C_a_i_list(&a,3,lf[52],C_make_character(224),C_make_character(239));
t54=C_a_i_list(&a,5,lf[334],lf[115],t53,lf[332],lf[332]);
t55=C_a_i_list(&a,3,lf[52],C_make_character(240),C_make_character(247));
t56=C_a_i_list(&a,6,lf[335],lf[115],t55,lf[332],lf[332],lf[332]);
t57=C_a_i_list(&a,6,lf[274],lf[103],lf[330],lf[333],lf[334],lf[335]);
t58=C_a_i_list(&a,6,lf[275],lf[103],lf[331],lf[333],lf[334],lf[335]);
t59=C_a_i_list(&a,3,lf[103],C_make_character(43),C_make_character(45));
t60=C_a_i_list(&a,2,lf[131],t59);
t61=C_a_i_list(&a,2,lf[129],lf[178]);
t62=C_a_i_list(&a,4,lf[336],lf[115],t60,t61);
t63=C_a_i_list(&a,3,lf[103],C_make_character(43),C_make_character(45));
t64=C_a_i_list(&a,2,lf[131],t63);
t65=C_a_i_list(&a,2,lf[129],lf[178]);
t66=C_a_i_list(&a,2,lf[129],lf[178]);
t67=C_a_i_list(&a,3,lf[131],C_make_character(46),t66);
t68=C_a_i_list(&a,3,lf[103],C_make_character(101),C_make_character(69));
t69=C_a_i_list(&a,3,lf[131],t68,lf[336]);
t70=C_a_i_list(&a,6,lf[337],lf[115],t64,t65,t67,t69);
t71=C_a_i_list(&a,1,lf[338]);
t72=C_a_i_list(&a,4,lf[339],lf[103],lf[308],t71);
t73=C_a_i_list(&a,1,lf[340]);
t74=C_a_i_list(&a,5,lf[341],lf[103],lf[339],lf[316],t73);
t75=C_a_i_list(&a,2,lf[127],lf[341]);
t76=C_a_i_list(&a,3,lf[115],lf[339],t75);
t77=C_a_i_list(&a,1,lf[342]);
t78=C_a_i_list(&a,2,lf[127],lf[341]);
t79=C_a_i_list(&a,3,lf[131],lf[339],t78);
t80=C_a_i_list(&a,3,lf[115],t77,t79);
t81=C_a_i_list(&a,2,lf[127],lf[343]);
t82=C_a_i_list(&a,3,lf[115],lf[344],t81);
t83=C_a_i_list(&a,5,lf[345],lf[103],t76,t80,t82);
t84=C_a_i_list(&a,2,lf[127],lf[79]);
t85=C_a_i_list(&a,2,lf[127],lf[125]);
t86=C_a_i_list(&a,5,lf[127],t84,lf[346],t85,lf[80]);
t87=C_a_i_list(&a,2,lf[129],lf[79]);
t88=C_a_i_list(&a,4,lf[347],lf[115],t86,t87);
t89=C_a_i_list(&a,3,lf[348],C_make_character(92),C_make_character(34));
t90=C_a_i_list(&a,5,lf[349],lf[115],C_make_character(34),t89,C_make_character(34));
t91=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_30681,a[2]=((C_word)li261),tmp=(C_word)a,a+=3,tmp);
t92=C_a_i_cons(&a,2,lf[348],t91);
t93=C_a_i_list(&a,2,lf[52],lf[350]);
t94=C_a_i_list(&a,2,lf[131],t93);
t95=C_a_i_list(&a,2,lf[131],lf[178]);
t96=C_a_i_list(&a,5,lf[351],lf[115],t94,t95,lf[178]);
t97=C_a_i_list(&a,4,lf[134],C_fix(3),C_make_character(46),lf[351]);
t98=C_a_i_list(&a,4,lf[352],lf[115],lf[351],t97);
t99=C_a_i_list(&a,4,lf[133],C_fix(0),C_fix(4),lf[328]);
t100=C_a_i_list(&a,2,lf[131],C_make_character(58));
t101=C_a_i_list(&a,4,lf[133],C_fix(0),C_fix(4),lf[328]);
t102=C_a_i_list(&a,6,lf[133],C_fix(1),C_fix(7),C_make_character(58),t100,t101);
t103=C_a_i_list(&a,4,lf[353],lf[115],t99,t102);
t104=C_a_i_list(&a,4,lf[354],lf[103],lf[352],lf[353]);
t105=C_a_i_list(&a,4,lf[103],lf[181],C_make_character(95),C_make_character(45));
t106=C_a_i_list(&a,3,lf[355],lf[129],t105);
t107=C_a_i_list(&a,3,lf[129],C_make_character(46),lf[355]);
t108=C_a_i_list(&a,4,lf[356],lf[115],lf[355],t107);
t109=C_a_i_list(&a,3,lf[134],C_fix(2),lf[308]);
t110=C_a_i_list(&a,15,lf[103],lf[357],lf[358],lf[359],lf[360],lf[361],lf[362],lf[363],lf[364],lf[365],lf[366],lf[367],lf[368],lf[369],t109);
t111=C_a_i_list(&a,3,lf[370],lf[226],t110);
t112=C_a_i_list(&a,3,lf[129],lf[355],C_make_character(46));
t113=C_a_i_list(&a,4,lf[371],lf[115],t112,lf[370]);
t114=C_a_i_list(&a,6,lf[103],lf[181],C_make_character(95),C_make_character(45),C_make_character(46),C_make_character(43));
t115=C_a_i_list(&a,3,lf[372],lf[129],t114);
t116=C_a_i_list(&a,5,lf[373],lf[115],lf[372],C_make_character(64),lf[356]);
t117=C_a_i_list(&a,4,lf[115],lf[374],lf[328],lf[328]);
t118=C_a_i_list(&a,14,lf[375],lf[103],lf[310],C_make_character(95),C_make_character(45),C_make_character(43),C_make_character(92),C_make_character(61),C_make_character(126),C_make_character(46),C_make_character(44),C_make_character(38),C_make_character(59),t117);
t119=C_a_i_list(&a,4,lf[115],lf[376],lf[328],lf[328]);
t120=C_a_i_list(&a,11,lf[377],lf[103],lf[310],C_make_character(95),C_make_character(45),C_make_character(43),C_make_character(92),C_make_character(61),C_make_character(126),C_make_character(38),t119);
t121=C_a_i_list(&a,2,lf[131],lf[378]);
t122=C_a_i_list(&a,3,lf[103],lf[371],lf[352]);
t123=C_a_i_list(&a,2,lf[129],lf[178]);
t124=C_a_i_list(&a,3,lf[131],lf[379],t123);
t125=C_a_i_list(&a,3,lf[103],lf[375],lf[380]);
t126=C_a_i_list(&a,2,lf[127],t125);
t127=C_a_i_list(&a,2,lf[127],lf[375]);
t128=C_a_i_list(&a,3,lf[131],lf[381],t127);
t129=C_a_i_list(&a,2,lf[127],lf[375]);
t130=C_a_i_list(&a,3,lf[131],t129,lf[377]);
t131=C_a_i_list(&a,3,lf[131],lf[382],t130);
t132=C_a_i_list(&a,5,lf[131],lf[383],t126,t128,t131);
t133=C_a_i_list(&a,8,lf[384],lf[226],lf[385],t121,lf[386],t122,t124,t132);
t134=C_a_i_list(&a,31,t42,t43,t46,t49,t50,t52,t54,t56,t57,t58,t62,t70,t72,t74,t83,t88,t90,t92,t96,t98,t103,t104,t106,t108,t111,t113,t115,t116,t118,t120,t133);
t135=C_a_i_cons(&a,2,t41,t134);
t136=C_a_i_cons(&a,2,t40,t135);
t137=C_a_i_cons(&a,2,t38,t136);
t138=C_a_i_cons(&a,2,t37,t137);
t139=C_a_i_cons(&a,2,t36,t138);
t140=C_a_i_cons(&a,2,t35,t139);
t141=C_a_i_cons(&a,2,t34,t140);
t142=C_a_i_cons(&a,2,t33,t141);
t143=C_a_i_cons(&a,2,t32,t142);
t144=C_a_i_cons(&a,2,t31,t143);
t145=C_a_i_cons(&a,2,t30,t144);
t146=C_a_i_cons(&a,2,t29,t145);
t147=C_a_i_cons(&a,2,t28,t146);
t148=C_a_i_cons(&a,2,t27,t147);
t149=C_a_i_cons(&a,2,t26,t148);
t150=C_a_i_cons(&a,2,t25,t149);
t151=C_a_i_cons(&a,2,t24,t150);
t152=C_a_i_cons(&a,2,t23,t151);
t153=C_a_i_cons(&a,2,t22,t152);
t154=C_a_i_cons(&a,2,t21,t153);
t155=C_a_i_cons(&a,2,t20,t154);
t156=C_a_i_cons(&a,2,t19,t155);
t157=C_a_i_cons(&a,2,t18,t156);
t158=C_a_i_cons(&a,2,t17,t157);
t159=C_a_i_cons(&a,2,t16,t158);
t160=C_a_i_cons(&a,2,t15,t159);
t161=C_a_i_cons(&a,2,t14,t160);
t162=C_a_i_cons(&a,2,t11,t161);
t163=C_mutate(&lf[248] /* (set! chicken.irregex#sre-named-definitions ...) */,t162);
t164=C_mutate(&lf[387] /* (set! chicken.irregex#nfa-get-epsilons ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20464,a[2]=((C_word)li262),tmp=(C_word)a,a+=3,tmp));
t165=C_mutate(&lf[388] /* (set! chicken.irregex#nfa-add-epsilon! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20498,a[2]=((C_word)li263),tmp=(C_word)a,a+=3,tmp));
t166=C_mutate(&lf[268] /* (set! chicken.irregex#sre->nfa ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20639,a[2]=((C_word)li274),tmp=(C_word)a,a+=3,tmp));
t167=C_mutate(&lf[395] /* (set! chicken.irregex#make-mst ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21758,a[2]=((C_word)li275),tmp=(C_word)a,a+=3,tmp));
t168=C_mutate(&lf[396] /* (set! chicken.irregex#mst-copy ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21787,a[2]=((C_word)li276),tmp=(C_word)a,a+=3,tmp));
t169=C_mutate(&lf[397] /* (set! chicken.irregex#nfa-state->mst ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21804,a[2]=((C_word)li277),tmp=(C_word)a,a+=3,tmp));
t170=C_mutate(&lf[398] /* (set! chicken.irregex#mst-add! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21813,a[2]=((C_word)li280),tmp=(C_word)a,a+=3,tmp));
t171=C_mutate(&lf[399] /* (set! chicken.irregex#mst-fold ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22165,a[2]=((C_word)li282),tmp=(C_word)a,a+=3,tmp));
t172=C_mutate(&lf[267] /* (set! chicken.irregex#nfa->dfa ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22247,a[2]=((C_word)li296),tmp=(C_word)a,a+=3,tmp));
t173=C_mutate(&lf[402] /* (set! chicken.irregex#nfa-epsilon-closure ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22932,a[2]=((C_word)li303),tmp=(C_word)a,a+=3,tmp));
t174=C_mutate(&lf[401] /* (set! chicken.irregex#tag-set-commands-for-closure ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22947,a[2]=((C_word)li308),tmp=(C_word)a,a+=3,tmp));
t175=C_mutate(&lf[223] /* (set! chicken.irregex#sre-cset->procedure ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26053,a[2]=((C_word)li310),tmp=(C_word)a,a+=3,tmp));
t176=C_mutate(&lf[216] /* (set! chicken.irregex#cset->plist ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26266,a[2]=((C_word)li312),tmp=(C_word)a,a+=3,tmp));
t177=C_mutate(&lf[390] /* (set! chicken.irregex#string->cset ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26357,a[2]=((C_word)li314),tmp=(C_word)a,a+=3,tmp));
t178=C_mutate(&lf[172] /* (set! chicken.irregex#sre->cset ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26377,a[2]=((C_word)li324),tmp=(C_word)a,a+=3,tmp));
t179=C_mutate(&lf[296] /* (set! chicken.irregex#cset-contains? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26844,a[2]=((C_word)li326),tmp=(C_word)a,a+=3,tmp));
t180=C_mutate(&lf[407] /* (set! chicken.irregex#char-ranges-union ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26929,a[2]=((C_word)li327),tmp=(C_word)a,a+=3,tmp));
t181=C_mutate(&lf[162] /* (set! chicken.irregex#cset-union ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26965,a[2]=((C_word)li329),tmp=(C_word)a,a+=3,tmp));
t182=C_mutate(&lf[403] /* (set! chicken.irregex#cset-difference ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27160,a[2]=((C_word)li331),tmp=(C_word)a,a+=3,tmp));
t183=C_mutate(&lf[404] /* (set! chicken.irregex#cset-intersection ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27356,a[2]=((C_word)li333),tmp=(C_word)a,a+=3,tmp));
t184=C_mutate(&lf[164] /* (set! chicken.irregex#cset-complement ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27482,a[2]=((C_word)li334),tmp=(C_word)a,a+=3,tmp));
t185=C_mutate(&lf[165] /* (set! chicken.irregex#cset-case-insensitive ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27492,a[2]=((C_word)li336),tmp=(C_word)a,a+=3,tmp));
t186=C_mutate(&lf[409] /* (set! chicken.irregex#irregex-fold/fast ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27623,a[2]=((C_word)li339),tmp=(C_word)a,a+=3,tmp));
t187=C_mutate((C_word*)lf[414]+1 /* (set! chicken.irregex#irregex-fold ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27825,a[2]=((C_word)li341),tmp=(C_word)a,a+=3,tmp));
t188=C_mutate(&lf[416] /* (set! chicken.irregex#irregex-fold/chunked/fast ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27853,a[2]=((C_word)li344),tmp=(C_word)a,a+=3,tmp));
t189=C_mutate((C_word*)lf[419]+1 /* (set! chicken.irregex#irregex-fold/chunked ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28035,a[2]=((C_word)li346),tmp=(C_word)a,a+=3,tmp));
t190=C_mutate((C_word*)lf[421]+1 /* (set! chicken.irregex#irregex-replace ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28063,a[2]=((C_word)li347),tmp=(C_word)a,a+=3,tmp));
t191=C_mutate((C_word*)lf[425]+1 /* (set! chicken.irregex#irregex-replace/all ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28142,a[2]=((C_word)li350),tmp=(C_word)a,a+=3,tmp));
t192=C_mutate(&lf[422] /* (set! chicken.irregex#irregex-apply-match ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28256,a[2]=((C_word)li353),tmp=(C_word)a,a+=3,tmp));
t193=C_mutate((C_word*)lf[432]+1 /* (set! chicken.irregex#irregex-extract ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28487,a[2]=((C_word)li356),tmp=(C_word)a,a+=3,tmp));
t194=C_mutate((C_word*)lf[435]+1 /* (set! chicken.irregex#irregex-split ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28522,a[2]=((C_word)li360),tmp=(C_word)a,a+=3,tmp));
t195=C_mutate(&lf[54] /* (set! chicken.irregex#string-scan-char ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28737,a[2]=((C_word)li362),tmp=(C_word)a,a+=3,tmp));
t196=C_mutate((C_word*)lf[439]+1 /* (set! chicken.irregex#irregex-quote ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28780,a[2]=((C_word)li364),tmp=(C_word)a,a+=3,tmp));
t197=C_mutate((C_word*)lf[442]+1 /* (set! chicken.irregex#irregex-opt ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28837,a[2]=((C_word)li369),tmp=(C_word)a,a+=3,tmp));
t198=C_mutate(&lf[446] /* (set! chicken.irregex#cset->string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29104,a[2]=((C_word)li371),tmp=(C_word)a,a+=3,tmp));
t199=C_mutate((C_word*)lf[451]+1 /* (set! chicken.irregex#sre->string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29184,a[2]=((C_word)li381),tmp=(C_word)a,a+=3,tmp));
t200=C_mutate((C_word*)lf[485]+1 /* (set! chicken.irregex#glob->sre ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29940,a[2]=((C_word)li384),tmp=(C_word)a,a+=3,tmp));
t201=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t201;
av2[1]=C_SCHEME_UNDEFINED;
((C_proc)(void*)(*((C_word*)t201+1)))(2,av2);}}

/* chicken.irregex#irregex-search in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_18851(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c<4) C_bad_min_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-4)*C_SIZEOF_PAIR +6,c,4)))){
C_save_and_reclaim((void*)f_18851,c,av);}
a=C_alloc((c-4)*C_SIZEOF_PAIR+6);
t4=C_build_rest(&a,c,4,av);
C_word t5;
C_word t6;
C_word t7;
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18855,a[2]=t4,a[3]=t3,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
t6=C_i_stringp(t3);
if(C_truep(C_i_not(t6))){
/* irregex-core.scm:1950: chicken.base#error */
t7=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t7;
av2[1]=t5;
av2[2]=lf[288];
av2[3]=lf[291];
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t7+1)))(5,av2);}}
else{
t7=t5;{
C_word *av2=av;
av2[0]=t7;
av2[1]=C_SCHEME_UNDEFINED;
f_18855(2,av2);}}}

/* k18853 in chicken.irregex#irregex-search in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_18855(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_18855,c,av);}
a=C_alloc(6);
t2=C_i_pairp(((C_word*)t0)[2]);
t3=(C_truep(t2)?C_u_i_car(((C_word*)t0)[2]):C_SCHEME_FALSE);
t4=(C_truep(t3)?t3:C_fix(0));
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18864,a[2]=((C_word*)t0)[3],a[3]=t4,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)[2]))){
t6=C_i_pairp(C_u_i_cdr(((C_word*)t0)[2]));
t7=t5;
f_18864(t7,(C_truep(t6)?C_i_cadr(((C_word*)t0)[2]):C_SCHEME_FALSE));}
else{
t6=t5;
f_18864(t6,C_SCHEME_FALSE);}}

/* k18862 in k18853 in chicken.irregex#irregex-search in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_18864(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,4)))){
C_save_and_reclaim_args((void *)trf_18864,2,t0,t1);}
a=C_alloc(7);
t2=(C_truep(t1)?t1:C_i_string_length(((C_word*)t0)[2]));
t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18870,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
if(C_truep(C_i_integerp(((C_word*)t0)[3]))){
t4=C_i_exactp(((C_word*)t0)[3]);
if(C_truep(C_i_not(t4))){
/* irregex-core.scm:1954: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t5;
av2[1]=t3;
av2[2]=lf[288];
av2[3]=lf[290];
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}
else{
t5=t3;{
C_word av2[2];
av2[0]=t5;
av2[1]=C_SCHEME_UNDEFINED;
f_18870(2,av2);}}}
else{
/* irregex-core.scm:1954: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t4;
av2[1]=t3;
av2[2]=lf[288];
av2[3]=lf[290];
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}}

/* k18868 in k18862 in k18853 in chicken.irregex#irregex-search in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_18870(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,4)))){
C_save_and_reclaim((void *)f_18870,c,av);}
a=C_alloc(7);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18873,a[2]=((C_word*)t0)[2],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_i_integerp(((C_word*)t0)[4]))){
t3=C_i_exactp(((C_word*)t0)[4]);
if(C_truep(C_i_not(t3))){
/* irregex-core.scm:1956: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t4;
av2[1]=t2;
av2[2]=lf[288];
av2[3]=lf[289];
av2[4]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}
else{
t4=t2;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_SCHEME_UNDEFINED;
f_18873(2,av2);}}}
else{
/* irregex-core.scm:1956: chicken.base#error */
t3=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=lf[288];
av2[3]=lf[289];
av2[4]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}}

/* k18871 in k18868 in k18862 in k18853 in chicken.irregex#irregex-search in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_18873(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,5)))){
C_save_and_reclaim((void *)f_18873,c,av);}
a=C_alloc(9);
t2=C_a_i_list3(&a,3,((C_word*)t0)[2],((C_word*)t0)[3],((C_word*)t0)[4]);
/* irregex-core.scm:1957: irregex-search/chunked */
t3=*((C_word*)lf[287]+1);{
C_word *av2;
if(c >= 6) {
  av2=av;
} else {
  av2=C_alloc(6);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[5];
av2[2]=((C_word*)t0)[6];
av2[3]=lf[285];
av2[4]=t2;
av2[5]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(6,av2);}}

/* chicken.irregex#irregex-search/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_18941(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5;
C_word *a;
if(c<5) C_bad_min_argc_2(c,5,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-5)*C_SIZEOF_PAIR +6,c,2)))){
C_save_and_reclaim((void*)f_18941,c,av);}
a=C_alloc((c-5)*C_SIZEOF_PAIR+6);
t5=C_build_rest(&a,c,5,av);
C_word t6;
C_word t7;
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18945,a[2]=t3,a[3]=t4,a[4]=t1,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:1963: irregex */
t7=*((C_word*)lf[217]+1);{
C_word *av2=av;
av2[0]=t7;
av2[1]=t6;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t7+1)))(3,av2);}}

/* k18943 in chicken.irregex#irregex-search/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_18945(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,2)))){
C_save_and_reclaim((void *)f_18945,c,av);}
a=C_alloc(7);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18948,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);
/* irregex-core.scm:1964: irregex-new-matches */
f_7579(t2,t1);}

/* k18946 in k18943 in chicken.irregex#irregex-search/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_18948(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,2)))){
C_save_and_reclaim((void *)f_18948,c,av);}
a=C_alloc(7);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18951,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);
if(C_truep(C_i_pairp(((C_word*)t0)[6]))){
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_u_i_car(((C_word*)t0)[6]);
f_18951(2,av2);}}
else{
/* irregex-core.scm:1965: g3251 */
t3=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}}

/* k18949 in k18946 in k18943 in chicken.irregex#irregex-search/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_18951(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,4)))){
C_save_and_reclaim((void *)f_18951,c,av);}
a=C_alloc(8);
t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_18954,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
if(C_truep(C_i_not(C_i_integerp(t1)))){
/* irregex-core.scm:1966: chicken.base#error */
t3=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=lf[288];
av2[3]=lf[293];
av2[4]=t1;
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_SCHEME_UNDEFINED;
f_18954(2,av2);}}}

/* k18952 in k18949 in k18946 in k18943 in chicken.irregex#irregex-search/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_18954(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,7)))){
C_save_and_reclaim((void *)f_18954,c,av);}
a=C_alloc(3);
t2=C_i_setslot(((C_word*)t0)[2],C_fix(3),((C_word*)t0)[3]);
t3=C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)t0)[5]);
/* irregex-core.scm:1968: irregex-search/matches */
f_18984(((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[3],t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[2]);}

/* chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_18984(C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7){
C_word tmp;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(20,0,9)))){
C_save_and_reclaim_args((void *)trf_18984,7,t1,t2,t3,t4,t5,t6,t7);}
a=C_alloc(20);
t8=C_i_check_structure_2(t2,lf[6],lf[294]);
if(C_truep(C_slot(t2,C_fix(1)))){
t9=C_slot(t2,C_fix(4));
t10=C_fixnum_and(t9,C_fix(1));
t11=C_eqp(C_fix(1),t10);
if(C_truep(t11)){
t12=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19003,a[2]=t7,a[3]=t5,a[4]=t6,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:1978: dfa-match/longest */
f_19866(t12,C_slot(t2,C_fix(1)),t3,t5,t6,C_SCHEME_FALSE,C_SCHEME_FALSE,t7,C_fix(0));}
else{
t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19028,a[2]=t2,a[3]=t3,a[4]=t7,a[5]=t1,a[6]=t5,a[7]=t6,tmp=(C_word)a,a+=8,tmp);
t13=C_slot(t2,C_fix(2));
t14=C_i_vector_ref(t3,C_fix(1));
t15=C_i_vector_ref(t3,C_fix(2));
t16=C_i_vector_ref(t3,C_fix(3));
t17=C_i_vector_ref(t3,C_fix(0));
t18=C_i_vector_ref(t13,C_fix(0));
t19=C_i_cadr(t18);
t20=C_i_cadr(t19);
t21=C_i_vector_ref(t13,t20);
t22=C_SCHEME_UNDEFINED;
t23=(*a=C_VECTOR_TYPE|1,a[1]=t22,tmp=(C_word)a,a+=2,tmp);
t24=C_set_block_item(t23,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_19609,a[2]=t7,a[3]=t13,a[4]=t23,a[5]=t15,a[6]=t17,a[7]=t16,a[8]=t14,a[9]=((C_word)li237),tmp=(C_word)a,a+=10,tmp));
t25=((C_word*)t23)[1];
f_19609(t25,t12,t5,t6,t21);}}
else{
t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19115,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t10=C_i_check_structure_2(t2,lf[6],lf[297]);
t11=C_slot(t2,C_fix(3));
t12=C_i_vector_ref(t3,C_fix(1));
t13=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_19133,a[2]=t3,a[3]=t2,a[4]=t11,a[5]=t9,a[6]=t4,a[7]=t5,a[8]=t6,a[9]=t7,tmp=(C_word)a,a+=10,tmp);
/* irregex-core.scm:2011: g3319 */
t14=t12;{
C_word av2[3];
av2[0]=t14;
av2[1]=t13;
av2[2]=t5;
((C_proc)(void*)(*((C_word*)t14+1)))(3,av2);}}}

/* k19001 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19003(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_19003,c,av);}
if(C_truep(t1)){
t2=C_slot(((C_word*)t0)[2],C_fix(1));
t3=C_i_vector_set(t2,C_fix(0),((C_word*)t0)[3]);
t4=C_slot(((C_word*)t0)[2],C_fix(1));
t5=C_i_vector_set(t4,C_fix(1),((C_word*)t0)[4]);
t6=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t6;
av2[1]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
t2=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k19026 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19028(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,4)))){
C_save_and_reclaim((void *)f_19028,c,av);}
a=C_alloc(12);
if(C_truep(t1)){
t2=C_slot(((C_word*)t0)[2],C_fix(1));
t3=C_i_vector_ref(((C_word*)t0)[3],C_fix(2));
t4=C_i_vector_ref(((C_word*)t0)[3],C_fix(3));
t5=C_i_vector_ref(((C_word*)t0)[3],C_fix(0));
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_19045,a[2]=((C_word*)t0)[4],a[3]=t7,a[4]=t3,a[5]=t5,a[6]=t2,a[7]=((C_word*)t0)[3],a[8]=t4,a[9]=((C_word)li234),tmp=(C_word)a,a+=10,tmp));
t9=((C_word*)t7)[1];
f_19045(t9,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}
else{
t2=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* lp1 in k19026 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19045(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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,0,2)))){
C_save_and_reclaim_args((void *)trf_19045,4,t0,t1,t2,t3);}
a=C_alloc(11);
t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_19049,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]=t1,a[10]=t3,tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:1991: get-end */
t5=((C_word*)t0)[8];{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k19047 in lp1 in k19026 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19049(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,3)))){
C_save_and_reclaim((void *)f_19049,c,av);}
a=C_alloc(14);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_19054,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]=t3,a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word)li233),tmp=(C_word)a,a+=12,tmp));
t5=((C_word*)t3)[1];
f_19054(t5,((C_word*)t0)[9],((C_word*)t0)[10]);}

/* lp2 in k19047 in lp1 in k19026 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19054(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_unlikely(!C_demand(C_calculate_demand(11,0,9)))){
C_save_and_reclaim_args((void *)trf_19054,3,t0,t1,t2);}
a=C_alloc(11);
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_19061,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t1,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:1994: dfa-match/longest */
f_19866(t3,((C_word*)t0)[9],((C_word*)t0)[10],((C_word*)t0)[3],t2,C_SCHEME_FALSE,C_SCHEME_FALSE,((C_word*)t0)[2],C_fix(0));}

/* k19059 in lp2 in k19047 in lp1 in k19026 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19061(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_19061,c,av);}
a=C_alloc(5);
if(C_truep(t1)){
t2=C_slot(((C_word*)t0)[2],C_fix(1));
t3=C_i_vector_set(t2,C_fix(0),((C_word*)t0)[3]);
t4=C_slot(((C_word*)t0)[2],C_fix(1));
t5=C_i_vector_set(t4,C_fix(1),((C_word*)t0)[4]);
t6=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t6;
av2[1]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
if(C_truep(C_fixnum_greater_or_equal_p(((C_word*)t0)[4],((C_word*)t0)[6]))){
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19084,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1999: get-next */
t3=((C_word*)t0)[9];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}
else{
/* irregex-core.scm:2002: lp2 */
t2=((C_word*)((C_word*)t0)[10])[1];
f_19054(t2,((C_word*)t0)[5],C_fixnum_plus(((C_word*)t0)[4],C_fix(1)));}}}

/* k19082 in k19059 in lp2 in k19047 in lp1 in k19026 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19084(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_19084,c,av);}
a=C_alloc(5);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19094,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2000: get-start */
t3=((C_word*)t0)[4];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}
else{
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k19092 in k19082 in k19059 in lp2 in k19047 in lp1 in k19026 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19094(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_19094,c,av);}
/* irregex-core.scm:2000: lp1 */
t2=((C_word*)((C_word*)t0)[2])[1];
f_19045(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* k19113 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19115(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_19115,c,av);}
if(C_truep(t1)){
t2=C_i_set_i_slot(t1,C_fix(4),C_SCHEME_FALSE);
t3=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t3;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k19131 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19133(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_19133,c,av);}
a=C_alloc(11);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(3));
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_19139,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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);
/* irregex-core.scm:2011: g3321 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[7];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k19137 in k19131 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19139(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,9)))){
C_save_and_reclaim((void *)f_19139,c,av);}
a=C_alloc(11);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(0));
t3=C_slot(((C_word*)t0)[3],C_fix(4));
t4=C_fixnum_and(t3,C_fix(1));
t5=C_eqp(C_fix(1),t4);
if(C_truep(t5)){
t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19153,a[2]=((C_word)li238),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2016: matcher */
t7=((C_word*)t0)[4];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t7;
av2[1]=((C_word*)t0)[5];
av2[2]=((C_word*)t0)[2];
av2[3]=((C_word*)t0)[6];
av2[4]=((C_word*)t0)[7];
av2[5]=((C_word*)t0)[8];
av2[6]=((C_word*)t0)[9];
av2[7]=t1;
av2[8]=((C_word*)t0)[10];
av2[9]=t6;
((C_proc)(void*)(*((C_word*)t7+1)))(10,av2);}}
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|8,a[1]=(C_word)f_19159,a[2]=((C_word*)t0)[10],a[3]=t7,a[4]=((C_word*)t0)[2],a[5]=t2,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[6],a[8]=((C_word)li240),tmp=(C_word)a,a+=9,tmp));
t9=((C_word*)t7)[1];
f_19159(t9,((C_word*)t0)[5],((C_word*)t0)[7],((C_word*)t0)[8],((C_word*)t0)[9],t1);}}

/* a19152 in k19137 in k19131 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19153(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_19153,c,av);}
t2=t1;{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* lp in k19137 in k19131 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19159(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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,0,9)))){
C_save_and_reclaim_args((void *)trf_19159,6,t0,t1,t2,t3,t4,t5);}
a=C_alloc(14);
t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_19166,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t4,a[5]=t1,a[6]=t5,a[7]=((C_word*)t0)[3],a[8]=t3,a[9]=((C_word*)t0)[4],a[10]=((C_word*)t0)[5],tmp=(C_word)a,a+=11,tmp);
t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19225,a[2]=((C_word)li239),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2022: matcher */
t8=((C_word*)t0)[6];{
C_word av2[10];
av2[0]=t8;
av2[1]=t6;
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[7];
av2[4]=t2;
av2[5]=t3;
av2[6]=t4;
av2[7]=t5;
av2[8]=((C_word*)t0)[2];
av2[9]=t7;
((C_proc)(void*)(*((C_word*)t8+1)))(10,av2);}}

/* k19164 in lp in k19137 in k19131 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19166(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,5)))){
C_save_and_reclaim((void *)f_19166,c,av);}
a=C_alloc(5);
if(C_truep(t1)){
t2=C_slot(((C_word*)t0)[2],C_fix(1));
t3=C_i_vector_set(t2,C_fix(0),((C_word*)t0)[3]);
t4=C_slot(((C_word*)t0)[2],C_fix(1));
t5=C_i_vector_set(t4,C_fix(1),((C_word*)t0)[4]);
t6=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t6;
av2[1]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
if(C_truep(C_fixnum_lessp(((C_word*)t0)[4],((C_word*)t0)[6]))){
/* irregex-core.scm:2027: lp */
t2=((C_word*)((C_word*)t0)[7])[1];
f_19159(t2,((C_word*)t0)[5],((C_word*)t0)[3],((C_word*)t0)[8],C_fixnum_plus(((C_word*)t0)[4],C_fix(1)),((C_word*)t0)[6]);}
else{
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19196,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2029: get-next */
t3=((C_word*)t0)[10];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}}}

/* k19194 in k19164 in lp in k19137 in k19131 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19196(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_19196,c,av);}
a=C_alloc(6);
if(C_truep(t1)){
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19209,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);
/* irregex-core.scm:2031: g3340 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t2=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k19207 in k19194 in k19164 in lp in k19137 in k19131 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19209(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,2)))){
C_save_and_reclaim((void *)f_19209,c,av);}
a=C_alloc(7);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19216,a[2]=((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);
/* irregex-core.scm:2031: g3342 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k19214 in k19207 in k19194 in k19164 in lp in k19137 in k19131 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19216(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,2)))){
C_save_and_reclaim((void *)f_19216,c,av);}
a=C_alloc(7);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(3));
t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19223,a[2]=((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);
/* irregex-core.scm:2031: g3344 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k19221 in k19214 in k19207 in k19194 in k19164 in lp in k19137 in k19131 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19223(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_19223,c,av);}
/* irregex-core.scm:2031: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_19159(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t1);}

/* a19224 in lp in k19137 in k19131 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19225(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_19225,c,av);}
t2=t1;{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* chicken.irregex#irregex-match in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19233(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c<4) C_bad_min_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-4)*C_SIZEOF_PAIR +6,c,4)))){
C_save_and_reclaim((void*)f_19233,c,av);}
a=C_alloc((c-4)*C_SIZEOF_PAIR+6);
t4=C_build_rest(&a,c,4,av);
C_word t5;
C_word t6;
C_word t7;
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19237,a[2]=t4,a[3]=t3,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
t6=C_i_stringp(t3);
if(C_truep(C_i_not(t6))){
/* irregex-core.scm:2038: chicken.base#error */
t7=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t7;
av2[1]=t5;
av2[2]=lf[300];
av2[3]=lf[303];
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t7+1)))(5,av2);}}
else{
t7=t5;{
C_word *av2=av;
av2[0]=t7;
av2[1]=C_SCHEME_UNDEFINED;
f_19237(2,av2);}}}

/* k19235 in chicken.irregex#irregex-match in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19237(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_19237,c,av);}
a=C_alloc(6);
t2=C_i_pairp(((C_word*)t0)[2]);
t3=(C_truep(t2)?C_u_i_car(((C_word*)t0)[2]):C_SCHEME_FALSE);
t4=(C_truep(t3)?t3:C_fix(0));
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19246,a[2]=((C_word*)t0)[3],a[3]=t4,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)[2]))){
t6=C_i_pairp(C_u_i_cdr(((C_word*)t0)[2]));
t7=t5;
f_19246(t7,(C_truep(t6)?C_i_cadr(((C_word*)t0)[2]):C_SCHEME_FALSE));}
else{
t6=t5;
f_19246(t6,C_SCHEME_FALSE);}}

/* k19244 in k19235 in chicken.irregex#irregex-match in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19246(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,4)))){
C_save_and_reclaim_args((void *)trf_19246,2,t0,t1);}
a=C_alloc(7);
t2=(C_truep(t1)?t1:C_i_string_length(((C_word*)t0)[2]));
t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19252,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
if(C_truep(C_i_integerp(((C_word*)t0)[3]))){
t4=C_i_exactp(((C_word*)t0)[3]);
if(C_truep(C_i_not(t4))){
/* irregex-core.scm:2042: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t5;
av2[1]=t3;
av2[2]=lf[300];
av2[3]=lf[302];
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}
else{
t5=t3;{
C_word av2[2];
av2[0]=t5;
av2[1]=C_SCHEME_UNDEFINED;
f_19252(2,av2);}}}
else{
/* irregex-core.scm:2042: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t4;
av2[1]=t3;
av2[2]=lf[300];
av2[3]=lf[302];
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}}

/* k19250 in k19244 in k19235 in chicken.irregex#irregex-match in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19252(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(16,c,4)))){
C_save_and_reclaim((void *)f_19252,c,av);}
a=C_alloc(16);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19255,a[2]=((C_word*)t0)[2],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_i_integerp(((C_word*)t0)[4]))){
t3=C_i_exactp(((C_word*)t0)[4]);
if(C_truep(C_i_not(t3))){
/* irregex-core.scm:2044: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t4;
av2[1]=t2;
av2[2]=lf[300];
av2[3]=lf[301];
av2[4]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}
else{
t4=C_a_i_list3(&a,3,((C_word*)t0)[2],((C_word*)t0)[3],((C_word*)t0)[4]);
/* irregex-core.scm:2045: irregex-match/chunked */
t5=*((C_word*)lf[299]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t5;
av2[1]=((C_word*)t0)[5];
av2[2]=((C_word*)t0)[6];
av2[3]=lf[285];
av2[4]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}}
else{
/* irregex-core.scm:2044: chicken.base#error */
t3=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=lf[300];
av2[3]=lf[301];
av2[4]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}}

/* k19253 in k19250 in k19244 in k19235 in chicken.irregex#irregex-match in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19255(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,4)))){
C_save_and_reclaim((void *)f_19255,c,av);}
a=C_alloc(9);
t2=C_a_i_list3(&a,3,((C_word*)t0)[2],((C_word*)t0)[3],((C_word*)t0)[4]);
/* irregex-core.scm:2045: irregex-match/chunked */
t3=*((C_word*)lf[299]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[5];
av2[2]=((C_word*)t0)[6];
av2[3]=lf[285];
av2[4]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}

/* chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19323(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5;
C_word t6;
C_word *a;
if(c!=5) C_bad_argc_2(c,5,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_19323,c,av);}
a=C_alloc(5);
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19327,a[2]=t3,a[3]=t4,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2050: irregex */
t6=*((C_word*)lf[217]+1);{
C_word *av2=av;
av2[0]=t6;
av2[1]=t5;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19327(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_19327,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19330,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);
/* irregex-core.scm:2051: irregex-new-matches */
f_7579(t2,t1);}

/* k19328 in k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19330(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,2)))){
C_save_and_reclaim((void *)f_19330,c,av);}
a=C_alloc(13);
t2=C_i_setslot(t1,C_fix(3),((C_word*)t0)[2]);
if(C_truep(C_slot(((C_word*)t0)[3],C_fix(1)))){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19345,a[2]=((C_word*)t0)[2],a[3]=t1,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)[3],C_fix(1));
t5=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19415,a[2]=t3,a[3]=t4,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[4],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:2056: g3378 */
t7=t5;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t7;
av2[1]=t6;
av2[2]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t7+1)))(3,av2);}}
else{
t3=C_slot(((C_word*)t0)[3],C_fix(3));
t4=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19425,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t3,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:2067: g3398 */
t6=t4;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t6;
av2[1]=t5;
av2[2]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}}

/* k19343 in k19328 in k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19345(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_19345,c,av);}
a=C_alloc(6);
if(C_truep(t1)){
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(3));
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19379,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);
t4=C_slot(((C_word*)t0)[3],C_fix(1));
/* irregex-core.scm:2058: g3381 */
t5=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t5;
av2[1]=t3;
av2[2]=C_slot(t4,C_fix(2));
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
t2=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k19366 in k19377 in k19343 in k19328 in k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19368(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_19368,c,av);}
t2=C_i_vector_set(((C_word*)t0)[2],C_fix(1),t1);
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* k19377 in k19343 in k19328 in k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19379(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_19379,c,av);}
a=C_alloc(5);
t2=C_slot(((C_word*)t0)[2],C_fix(1));
t3=C_fixnum_times(C_fix(0),C_fix(4));
t4=C_slot(t2,C_fixnum_plus(C_fix(3),t3));
t5=C_eqp(t1,t4);
if(C_truep(t5)){
t6=C_slot(((C_word*)t0)[2],C_fix(1));
t7=C_i_vector_set(t6,C_fix(0),((C_word*)t0)[3]);
t8=C_slot(((C_word*)t0)[2],C_fix(1));
t9=C_i_vector_ref(((C_word*)t0)[4],C_fix(2));
t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19368,a[2]=t8,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2062: g3392 */
t11=t9;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t11;
av2[1]=t10;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t11+1)))(3,av2);}}
else{
t6=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t6;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}}

/* k19413 in k19328 in k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19415(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_19415,c,av);}
/* irregex-core.scm:2056: dfa-match/longest */
f_19866(((C_word*)t0)[2],((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1,C_SCHEME_FALSE,C_SCHEME_FALSE,((C_word*)t0)[6],C_fix(0));}

/* k19423 in k19328 in k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19425(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,2)))){
C_save_and_reclaim((void *)f_19425,c,av);}
a=C_alloc(8);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19431,a[2]=((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);
/* irregex-core.scm:2067: g3401 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k19429 in k19423 in k19328 in k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19431(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_19431,c,av);}
a=C_alloc(9);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(3));
t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19437,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[2],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);
/* irregex-core.scm:2067: g3404 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k19435 in k19429 in k19423 in k19328 in k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19437(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,9)))){
C_save_and_reclaim((void *)f_19437,c,av);}
a=C_alloc(10);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],((C_word*)t0)[3]);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19447,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19546,a[2]=((C_word)li244),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2072: matcher */
t5=((C_word*)t0)[6];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t5;
av2[1]=t3;
av2[2]=((C_word*)t0)[4];
av2[3]=t2;
av2[4]=((C_word*)t0)[2];
av2[5]=((C_word*)t0)[7];
av2[6]=((C_word*)t0)[3];
av2[7]=t1;
av2[8]=((C_word*)t0)[8];
av2[9]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(10,av2);}}

/* k19445 in k19435 in k19429 in k19423 in k19328 in k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19447(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,3)))){
C_save_and_reclaim((void *)f_19447,c,av);}
a=C_alloc(7);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_19449,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=((C_word)li243),tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
f_19449(t5,((C_word*)t0)[3],t1);}

/* lp in k19445 in k19435 in k19429 in k19423 in k19328 in k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19449(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,2)))){
C_save_and_reclaim_args((void *)trf_19449,3,t0,t1,t2);}
a=C_alloc(10);
if(C_truep(t2)){
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19459,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
t4=C_i_vector_ref(((C_word*)t0)[3],C_fix(0));
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19523,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
t6=C_slot(t2,C_fix(1));
/* irregex-core.scm:2075: g3415 */
t7=t4;{
C_word av2[3];
av2[0]=t7;
av2[1]=t5;
av2[2]=C_slot(t6,C_fix(2));
((C_proc)(void*)(*((C_word*)t7+1)))(3,av2);}}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k19457 in lp in k19445 in k19435 in k19429 in k19423 in k19328 in k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19459(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,0,2)))){
C_save_and_reclaim_args((void *)trf_19459,2,t0,t1);}
a=C_alloc(4);
if(C_truep(t1)){
t2=C_i_set_i_slot(((C_word*)t0)[2],C_fix(4),C_SCHEME_FALSE);
t3=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t3;
av2[1]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
if(C_truep(C_slot(((C_word*)t0)[2],C_fix(4)))){
t2=C_slot(((C_word*)t0)[2],C_fix(4));
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19478,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2083: g3428 */
t4=t2;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t2=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}}

/* k19476 in k19457 in lp in k19445 in k19435 in k19429 in k19423 in k19328 in k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19478(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_19478,c,av);}
/* irregex-core.scm:2083: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_19449(t2,((C_word*)t0)[3],t1);}

/* k19489 in k19521 in lp in k19445 in k19435 in k19429 in k19423 in k19328 in k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19491(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_19491,c,av);}
t2=C_slot(((C_word*)t0)[2],C_fix(1));
t3=C_fixnum_times(C_fix(0),C_fix(4));
t4=((C_word*)t0)[3];
f_19459(t4,C_eqp(t1,C_slot(t2,C_fixnum_plus(C_fix(3),t3))));}

/* k19521 in lp in k19445 in k19435 in k19429 in k19423 in k19328 in k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19523(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_19523,c,av);}
a=C_alloc(4);
if(C_truep(C_i_not(t1))){
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(3));
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19491,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
t4=C_slot(((C_word*)t0)[3],C_fix(1));
/* irregex-core.scm:2077: g3421 */
t5=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t5;
av2[1]=t3;
av2[2]=C_slot(t4,C_fix(2));
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
t2=((C_word*)t0)[4];
f_19459(t2,C_SCHEME_FALSE);}}

/* a19545 in k19435 in k19429 in k19423 in k19328 in k19325 in chicken.irregex#irregex-match/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19546(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_19546,c,av);}
t2=t1;{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* chicken.irregex#irregex-match? in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19551(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-2)*C_SIZEOF_PAIR +3,c,3)))){
C_save_and_reclaim((void*)f_19551,c,av);}
a=C_alloc((c-2)*C_SIZEOF_PAIR+3);
t2=C_build_rest(&a,c,2,av);
C_word t3;
C_word t4;
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19558,a[2]=t1,tmp=(C_word)a,a+=3,tmp);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=0;
av2[1]=t3;
av2[2]=*((C_word*)lf[298]+1);
av2[3]=t2;
C_apply(4,av2);}}

/* k19556 in chicken.irregex#irregex-match? in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19558(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_19558,c,av);}
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=(C_truep(t1)?C_SCHEME_TRUE:C_SCHEME_FALSE);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* lp1 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19609(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,2)))){
C_save_and_reclaim_args((void *)trf_19609,5,t0,t1,t2,t3,t4);}
a=C_alloc(12);
if(C_truep(t2)){
t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_19616,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]=t1,a[9]=t3,a[10]=t4,a[11]=((C_word*)t0)[7],tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:2114: get-str */
t6=((C_word*)t0)[8];{
C_word av2[3];
av2[0]=t6;
av2[1]=t5;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}
else{
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}}

/* k19614 in lp1 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19616(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,2)))){
C_save_and_reclaim((void *)f_19616,c,av);}
a=C_alloc(12);
t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_19619,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],tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:2115: get-end */
t3=((C_word*)t0)[11];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k19617 in k19614 in lp1 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19619(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,4)))){
C_save_and_reclaim((void *)f_19619,c,av);}
a=C_alloc(14);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_19624,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=t3,a[7]=((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)li236),tmp=(C_word)a,a+=12,tmp));
t5=((C_word*)t3)[1];
f_19624(t5,((C_word*)t0)[9],((C_word*)t0)[10],((C_word*)t0)[11]);}

/* lp2 in k19617 in k19614 in lp1 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19624(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,3)))){
C_save_and_reclaim_args((void *)trf_19624,4,t0,t1,t2,t3);}
a=C_alloc(10);
if(C_truep(C_i_car(t3))){
t4=C_slot(((C_word*)t0)[2],C_fix(1));
t5=C_i_vector_set(t4,C_fix(2),((C_word*)t0)[3]);
t6=C_slot(((C_word*)t0)[2],C_fix(1));
t7=C_i_vector_set(t6,C_fix(3),t2);
t8=t1;{
C_word av2[2];
av2[0]=t8;
av2[1]=C_SCHEME_TRUE;
((C_proc)(void*)(*((C_word*)t8+1)))(2,av2);}}
else{
if(C_truep(C_fixnum_lessp(t2,((C_word*)t0)[4]))){
t4=C_i_string_ref(((C_word*)t0)[5],t2);
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19676,a[2]=t2,a[3]=((C_word*)t0)[6],a[4]=t1,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19691,a[2]=t4,a[3]=((C_word)li235),tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2126: find */
f_9126(t5,t6,C_i_cdr(t3));}
else{
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19727,a[2]=((C_word*)t0)[8],a[3]=t1,a[4]=t3,a[5]=((C_word*)t0)[9],tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:2133: get-next */
t5=((C_word*)t0)[10];{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}}}

/* k19674 in lp2 in k19617 in k19614 in lp1 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19676(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,3)))){
C_save_and_reclaim((void *)f_19676,c,av);}
a=C_alloc(5);
if(C_truep(t1)){
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(1));
t3=C_i_cadr(t1);
/* irregex-core.scm:2131: lp2 */
t4=((C_word*)((C_word*)t0)[3])[1];
f_19624(t4,((C_word*)t0)[4],t2,C_i_vector_ref(((C_word*)t0)[5],t3));}
else{
t2=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* a19690 in lp2 in k19617 in k19614 in lp1 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19691(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_19691,c,av);}
t3=C_i_car(t2);
t4=C_eqp(((C_word*)t0)[2],t3);
if(C_truep(t4)){
t5=t1;{
C_word *av2=av;
av2[0]=t5;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t5=C_charp(C_u_i_car(t2));
if(C_truep(C_i_not(t5))){
/* irregex-core.scm:2129: cset-contains? */
f_26844(t1,C_u_i_car(t2),((C_word*)t0)[2]);}
else{
t6=t1;{
C_word *av2=av;
av2[0]=t6;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}}}

/* k19725 in lp2 in k19617 in k19614 in lp1 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19727(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_19727,c,av);}
a=C_alloc(6);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19737,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);
/* irregex-core.scm:2134: get-start */
t3=((C_word*)t0)[5];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}
else{
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k19735 in k19725 in lp2 in k19617 in k19614 in lp1 in chicken.irregex#irregex-search/matches in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19737(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_19737,c,av);}
/* irregex-core.scm:2134: lp1 */
t2=((C_word*)((C_word*)t0)[2])[1];
f_19609(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5]);}

/* chicken.irregex#finalize! in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19747(C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,3)))){
C_save_and_reclaim_args((void *)trf_19747,4,t1,t2,t3,t4);}
a=C_alloc(12);
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19749,a[2]=t3,a[3]=t4,a[4]=((C_word)li247),tmp=(C_word)a,a+=5,tmp);
t6=C_i_check_list_2(t2,lf[306]);
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_19807,a[2]=t5,a[3]=t8,a[4]=((C_word)li248),tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
f_19807(t10,t1,t2);}

/* g3502 in chicken.irregex#finalize! in k18847 in k7718 in k7493 in k7490 */
static C_word C_fcall f_19749(C_word *a,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_stack_overflow_check;{}
t2=C_i_car(t1);
t3=C_i_vector_ref(((C_word*)t0)[2],C_u_i_cdr(t1));
t4=C_i_vector_ref(t3,t2);
t5=C_slot(((C_word*)t0)[3],C_fix(1));
t6=C_a_i_fixnum_times(&a,2,t2,C_fix(2));
t7=C_s_a_u_i_integer_plus(&a,2,C_fix(4),t6);
t8=(C_truep(t4)?C_i_vector_set(t5,t7,C_i_car(t4)):C_i_vector_set(t5,t7,C_SCHEME_FALSE));
t9=C_slot(((C_word*)t0)[3],C_fix(1));
t10=C_a_i_fixnum_times(&a,2,t2,C_fix(2));
t11=C_s_a_u_i_integer_plus(&a,2,C_fix(5),t10);
return((C_truep(t4)?C_i_vector_set(t9,t11,C_i_cdr(t4)):C_i_vector_set(t9,t11,C_SCHEME_FALSE)));}

/* for-each-loop3501 in chicken.irregex#finalize! in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19807(C_word 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;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(20,0,2)))){
C_save_and_reclaim_args((void *)trf_19807,3,t0,t1,t2);}
a=C_alloc(20);
if(C_truep(C_i_pairp(t2))){
t3=(
/* irregex-core.scm:2137: g3502 */
  f_19749(C_a_i(&a,20),((C_word*)t0)[2],C_slot(t2,C_fix(0)))
);
t5=t1;
t6=C_slot(t2,C_fix(1));
t1=t5;
t2=t6;
goto loop;}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k19833 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19835(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,2)))){
C_save_and_reclaim((void *)f_19835,c,av);}
a=C_alloc(10);
t2=C_a_i_fixnum_times(&a,2,t1,C_fix(2));
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19839,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2149: scheme#make-vector */
t4=*((C_word*)lf[4]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k19837 in k19833 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19839(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,3)))){
C_save_and_reclaim((void *)f_19839,c,av);}
a=C_alloc(9);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_19844,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t3,a[5]=((C_word*)t0)[3],a[6]=((C_word)li259),tmp=(C_word)a,a+=7,tmp));
t5=((C_word*)t3)[1];
f_19844(t5,((C_word*)t0)[4],C_fix(0));}

/* doloop3532 in k19837 in k19833 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19844(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,3)))){
C_save_and_reclaim_args((void *)trf_19844,3,t0,t1,t2);}
a=C_alloc(6);
t3=C_eqp(t2,((C_word*)t0)[2]);
if(C_truep(t3)){
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19864,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:2152: scheme#make-vector */
t5=*((C_word*)lf[4]+1);{
C_word av2[4];
av2[0]=t5;
av2[1]=t4;
av2[2]=((C_word*)t0)[5];
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}}

/* k19862 in doloop3532 in k19837 in k19833 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19864(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_19864,c,av);}
a=C_alloc(5);
t2=C_i_vector_set(((C_word*)t0)[2],((C_word*)t0)[3],t1);
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[3],C_fix(1));
t4=((C_word*)((C_word*)t0)[4])[1];
f_19844(t4,((C_word*)t0)[5],t3);}

/* chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19866(C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7,C_word t8,C_word t9){
C_word tmp;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(20,0,2)))){
C_save_and_reclaim_args((void *)trf_19866,9,t1,t2,t3,t4,t5,t6,t7,t8,t9);}
a=C_alloc(20);
t10=C_i_vector_ref(t3,C_fix(1));
t11=C_i_vector_ref(t3,C_fix(2));
t12=C_i_vector_ref(t3,C_fix(3));
t13=C_i_vector_ref(t3,C_fix(0));
t14=C_i_vector_ref(t2,C_fix(0));
t15=C_i_car(t14);
t16=C_i_not(C_i_zerop(t15));
t17=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_19891,a[2]=t14,a[3]=t2,a[4]=t4,a[5]=t5,a[6]=t11,a[7]=t9,a[8]=t8,a[9]=t6,a[10]=t13,a[11]=t16,a[12]=t7,a[13]=t12,a[14]=t10,a[15]=t1,tmp=(C_word)a,a+=16,tmp);
t18=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19835,a[2]=t15,a[3]=t17,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2148: irregex-match-num-submatches */
t19=*((C_word*)lf[17]+1);{
C_word av2[3];
av2[0]=t19;
av2[1]=t18;
av2[2]=t8;
((C_proc)(void*)(*((C_word*)t19+1)))(3,av2);}}

/* k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19891(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(19,c,2)))){
C_save_and_reclaim((void *)f_19891,c,av);}
a=C_alloc(19);
t2=C_i_cadr(((C_word*)t0)[2]);
t3=C_i_cadr(t2);
t4=C_i_vector_ref(((C_word*)t0)[3],t3);
t5=C_i_car(t4);
t6=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_19903,a[2]=t5,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[3],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]=t4,a[18]=t2,tmp=(C_word)a,a+=19,tmp);
if(C_truep(((C_word*)t0)[7])){
t7=C_slot(((C_word*)t0)[8],C_fix(1));
t8=C_fixnum_times(((C_word*)t0)[7],C_fix(4));
t9=C_fixnum_plus(C_fix(2),t8);
t10=C_i_vector_set(t7,t9,C_SCHEME_FALSE);
t11=C_slot(((C_word*)t0)[8],C_fix(1));
t12=C_fixnum_times(((C_word*)t0)[7],C_fix(4));
t13=t6;
f_19903(t13,C_i_vector_set(t11,C_fixnum_plus(C_fix(3),t12),C_SCHEME_FALSE));}
else{
t7=t6;
f_19903(t7,C_SCHEME_UNDEFINED);}}

/* k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19903(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(31,0,3)))){
C_save_and_reclaim_args((void *)trf_19903,2,t0,t1);}
a=C_alloc(31);
t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_19906,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],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)[12])){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20311,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word)li257),tmp=(C_word)a,a+=6,tmp);
t4=C_i_cddr(((C_word*)t0)[18]);
t5=C_i_cdr(t4);
t6=C_i_check_list_2(t5,lf[306]);
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_20339,a[2]=t3,a[3]=t8,a[4]=((C_word)li258),tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
f_20339(t10,t2,t5);}
else{
t3=t2;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_UNDEFINED;
f_19906(2,av2);}}}

/* k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19906(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(17,c,8)))){
C_save_and_reclaim((void *)f_19906,c,av);}
a=C_alloc(17);
t2=(C_truep(((C_word*)t0)[2])?((C_word*)t0)[3]:C_SCHEME_FALSE);
t3=(C_truep(((C_word*)t0)[2])?((C_word*)t0)[4]:C_SCHEME_FALSE);
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|14,a[1]=(C_word)f_19919,a[2]=t5,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)li256),tmp=(C_word)a,a+=15,tmp));
t7=((C_word*)t5)[1];
f_19919(t7,((C_word*)t0)[16],((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[17],t2,t3,((C_word*)t0)[2]);}

/* lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19919(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7){
C_word tmp;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(20,0,2)))){
C_save_and_reclaim_args((void *)trf_19919,8,t0,t1,t2,t3,t4,t5,t6,t7);}
a=C_alloc(20);
t8=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_19923,a[2]=((C_word*)t0)[2],a[3]=((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],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[10],a[12]=t1,a[13]=t3,a[14]=t4,a[15]=t5,a[16]=t6,a[17]=t7,a[18]=((C_word*)t0)[11],a[19]=((C_word*)t0)[12],tmp=(C_word)a,a+=20,tmp);
/* irregex-core.scm:2183: get-str */
t9=((C_word*)t0)[13];{
C_word av2[3];
av2[0]=t9;
av2[1]=t8;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t9+1)))(3,av2);}}

/* k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19923(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(19,c,2)))){
C_save_and_reclaim((void *)f_19923,c,av);}
a=C_alloc(19);
t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_19926,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((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]=((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);
t3=C_eqp(((C_word*)t0)[7],((C_word*)t0)[8]);
if(C_truep(t3)){
t4=t2;{
C_word *av2=av;
av2[0]=t4;
av2[1]=((C_word*)t0)[18];
f_19926(2,av2);}}
else{
/* irregex-core.scm:2184: get-end */
t4=((C_word*)t0)[19];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t2;
av2[2]=((C_word*)t0)[7];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}}

/* k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19926(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,c,7)))){
C_save_and_reclaim((void *)f_19926,c,av);}
a=C_alloc(18);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_set_block_item(t3,0,(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_19931,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]=t3,a[14]=((C_word*)t0)[12],a[15]=((C_word)li255),tmp=(C_word)a,a+=16,tmp));
t5=((C_word*)t3)[1];
f_19931(t5,((C_word*)t0)[13],((C_word*)t0)[14],((C_word*)t0)[15],((C_word*)t0)[16],((C_word*)t0)[17],((C_word*)t0)[18]);}

/* lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19931(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6){
C_word tmp;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,0,3)))){
C_save_and_reclaim_args((void *)trf_19931,7,t0,t1,t2,t3,t4,t5,t6);}
a=C_alloc(18);
if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[2]))){
t7=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_19941,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t3,a[5]=t4,a[6]=t5,a[7]=t6,a[8]=((C_word*)t0)[4],a[9]=((C_word*)t0)[5],a[10]=((C_word*)t0)[6],a[11]=((C_word*)t0)[7],a[12]=((C_word*)t0)[8],a[13]=((C_word*)t0)[9],a[14]=((C_word*)t0)[10],tmp=(C_word)a,a+=15,tmp);
t8=(C_truep(((C_word*)t0)[5])?t4:C_SCHEME_FALSE);
if(C_truep(t8)){
t9=C_slot(((C_word*)t0)[6],C_fix(1));
t10=C_fixnum_times(((C_word*)t0)[5],C_fix(4));
t11=C_fixnum_plus(C_fix(2),t10);
t12=C_i_vector_set(t9,t11,t4);
t13=C_slot(((C_word*)t0)[6],C_fix(1));
t14=C_fixnum_times(((C_word*)t0)[5],C_fix(4));
t15=t7;
f_19941(t15,C_i_vector_set(t13,C_fixnum_plus(C_fix(3),t14),t5));}
else{
t9=t7;
f_19941(t9,C_SCHEME_UNDEFINED);}}
else{
t7=C_i_string_ref(((C_word*)t0)[11],t2);
t8=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_20041,a[2]=((C_word*)t0)[12],a[3]=t2,a[4]=((C_word*)t0)[13],a[5]=t1,a[6]=((C_word*)t0)[8],a[7]=t4,a[8]=t5,a[9]=((C_word*)t0)[14],a[10]=((C_word*)t0)[7],a[11]=t6,a[12]=((C_word*)t0)[6],a[13]=((C_word*)t0)[5],tmp=(C_word)a,a+=14,tmp);
t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20271,a[2]=t7,a[3]=((C_word)li254),tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2205: find */
f_9126(t8,t9,C_i_cdr(t3));}}

/* k19939 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_19941(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,2)))){
C_save_and_reclaim_args((void *)trf_19941,2,t0,t1);}
a=C_alloc(12);
t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_19944,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],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);
t3=C_eqp(((C_word*)t0)[12],((C_word*)t0)[13]);
if(C_truep(C_i_not(t3))){
/* irregex-core.scm:2196: get-next */
t4=((C_word*)t0)[14];{
C_word av2[3];
av2[0]=t4;
av2[1]=t2;
av2[2]=((C_word*)t0)[12];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t4=t2;{
C_word av2[2];
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
f_19944(2,av2);}}}

/* k19942 in k19939 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19944(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,4)))){
C_save_and_reclaim((void *)f_19944,c,av);}
a=C_alloc(9);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19954,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);
/* irregex-core.scm:2198: get-start */
t3=((C_word*)t0)[8];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}
else{
if(C_truep(((C_word*)t0)[9])){
t2=C_slot(((C_word*)t0)[10],C_fix(1));
t3=C_fixnum_times(((C_word*)t0)[9],C_fix(4));
t4=C_fixnum_plus(C_fix(2),t3);
if(C_truep(C_slot(t2,t4))){
t5=C_i_not(((C_word*)t0)[7]);
t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19989,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
if(C_truep(t5)){
t7=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t7;
av2[1]=(C_truep(t5)?C_SCHEME_TRUE:C_SCHEME_FALSE);
((C_proc)(void*)(*((C_word*)t7+1)))(2,av2);}}
else{
/* irregex-core.scm:2201: finalize! */
f_19747(t6,((C_word*)t0)[7],((C_word*)t0)[11],((C_word*)t0)[10]);}}
else{
t5=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t5;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}}
else{
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}}

/* k19952 in k19942 in k19939 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19954(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,7)))){
C_save_and_reclaim((void *)f_19954,c,av);}
/* irregex-core.scm:2198: lp1 */
t2=((C_word*)((C_word*)t0)[2])[1];
f_19919(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);}

/* k19987 in k19942 in k19939 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_19989(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_19989,c,av);}
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=(C_truep(t1)?C_SCHEME_TRUE:C_SCHEME_FALSE);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k20039 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20041(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(17,c,4)))){
C_save_and_reclaim((void *)f_20041,c,av);}
a=C_alloc(17);
if(C_truep(t1)){
t2=C_i_cadr(t1);
t3=C_i_vector_ref(((C_word*)t0)[2],t2);
t4=C_i_car(t3);
t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_20053,a[2]=t4,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],a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
if(C_truep(((C_word*)t0)[9])){
t6=C_i_cddr(t1);
t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_20077,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],a[5]=t6,a[6]=t5,tmp=(C_word)a,a+=7,tmp);
if(C_truep(((C_word*)t0)[11])){
if(C_truep(C_i_not(t4))){
/* irregex-core.scm:2220: finalize! */
f_19747(t7,((C_word*)t0)[11],((C_word*)t0)[10],((C_word*)t0)[12]);}
else{
t8=t7;{
C_word *av2=av;
av2[0]=t8;
av2[1]=C_SCHEME_UNDEFINED;
f_20077(2,av2);}}}
else{
t8=t7;{
C_word *av2=av;
av2[0]=t8;
av2[1]=C_SCHEME_UNDEFINED;
f_20077(2,av2);}}}
else{
t6=t5;
f_20053(t6,C_SCHEME_UNDEFINED);}}
else{
if(C_truep(((C_word*)t0)[7])){
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20201,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[12],tmp=(C_word)a,a+=6,tmp);
if(C_truep(((C_word*)t0)[13])){
t3=C_slot(((C_word*)t0)[12],C_fix(1));
t4=C_fixnum_times(((C_word*)t0)[13],C_fix(4));
t5=C_fixnum_plus(C_fix(2),t4);
t6=C_i_vector_set(t3,t5,((C_word*)t0)[7]);
t7=C_slot(((C_word*)t0)[12],C_fix(1));
t8=C_fixnum_times(((C_word*)t0)[13],C_fix(4));
t9=t2;
f_20201(t9,C_i_vector_set(t7,C_fixnum_plus(C_fix(3),t8),((C_word*)t0)[8]));}
else{
t3=t2;
f_20201(t3,C_SCHEME_UNDEFINED);}}
else{
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20243,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[12],tmp=(C_word)a,a+=6,tmp);
if(C_truep(((C_word*)t0)[13])){
t3=C_slot(((C_word*)t0)[12],C_fix(1));
t4=C_fixnum_times(((C_word*)t0)[13],C_fix(4));
t5=t2;
f_20243(t5,C_slot(t3,C_fixnum_plus(C_fix(2),t4)));}
else{
t3=t2;
f_20243(t3,C_SCHEME_FALSE);}}}}

/* k20051 in k20039 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_20053(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,6)))){
C_save_and_reclaim_args((void *)trf_20053,2,t0,t1);}
a=C_alloc(10);
if(C_truep(((C_word*)t0)[2])){
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[3],C_fix(1));
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[3],C_fix(1));
/* irregex-core.scm:2233: lp2 */
t4=((C_word*)((C_word*)t0)[4])[1];
f_19931(t4,((C_word*)t0)[5],t2,((C_word*)t0)[6],((C_word*)t0)[7],t3,((C_word*)t0)[2]);}
else{
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[3],C_fix(1));
/* irregex-core.scm:2234: lp2 */
t3=((C_word*)((C_word*)t0)[4])[1];
f_19931(t3,((C_word*)t0)[5],t2,((C_word*)t0)[6],((C_word*)t0)[8],((C_word*)t0)[9],C_SCHEME_FALSE);}}

/* k20075 in k20039 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20077(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,c,3)))){
C_save_and_reclaim((void *)f_20077,c,av);}
a=C_alloc(18);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20078,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word)li250),tmp=(C_word)a,a+=6,tmp);
t3=C_i_cdr(((C_word*)t0)[5]);
t4=C_i_check_list_2(t3,lf[306]);
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20107,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],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|4,a[1]=(C_word)f_20165,a[2]=t2,a[3]=t7,a[4]=((C_word)li253),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
f_20165(t9,t5,t3);}

/* g3657 in k20075 in k20039 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static C_word C_fcall f_20078(C_word *a,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_stack_overflow_check;{}
t2=C_i_cdr(t1);
t3=C_i_vector_ref(((C_word*)t0)[2],t2);
t4=C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
t5=C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
return(C_i_vector_set(t3,C_u_i_car(t1),t5));}

/* k20105 in k20075 in k20039 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20107(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,2)))){
C_save_and_reclaim((void *)f_20107,c,av);}
a=C_alloc(8);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20108,a[2]=((C_word*)t0)[2],a[3]=((C_word)li251),tmp=(C_word)a,a+=4,tmp);
t3=C_u_i_car(((C_word*)t0)[3]);
t4=C_i_check_list_2(t3,lf[306]);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20142,a[2]=t2,a[3]=((C_word)li252),tmp=(C_word)a,a+=4,tmp);
t6=((C_word*)t0)[4];
f_20053(t6,(
  f_20142(t5,t3)
));}

/* g3667 in k20105 in k20075 in k20039 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static C_word C_fcall f_20108(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_stack_overflow_check;{}
t2=C_i_vector_ref(t1,C_fix(0));
t3=C_i_vector_ref(t1,C_fix(1));
t4=C_i_vector_ref(((C_word*)t0)[2],t3);
t5=C_i_vector_ref(t1,C_fix(2));
return(C_i_vector_set(C_i_vector_ref(((C_word*)t0)[2],t5),t2,C_i_vector_ref(t4,t2)));}

/* for-each-loop3666 in k20105 in k20075 in k20039 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static C_word C_fcall f_20142(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_stack_overflow_check;
loop:{}
if(C_truep(C_i_pairp(t1))){
t2=(
/* irregex-core.scm:2226: g3667 */
  f_20108(((C_word*)t0)[2],C_slot(t1,C_fix(0)))
);
t4=C_slot(t1,C_fix(1));
t1=t4;
goto loop;}
else{
t2=C_SCHEME_UNDEFINED;
return(t2);}}

/* for-each-loop3656 in k20075 in k20039 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_20165(C_word 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;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,2)))){
C_save_and_reclaim_args((void *)trf_20165,3,t0,t1,t2);}
a=C_alloc(3);
if(C_truep(C_i_pairp(t2))){
t3=(
/* irregex-core.scm:2221: g3657 */
  f_20078(C_a_i(&a,3),((C_word*)t0)[2],C_slot(t2,C_fix(0)))
);
t5=t1;
t6=C_slot(t2,C_fix(1));
t1=t5;
t2=t6;
goto loop;}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k20199 in k20039 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_20201(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,4)))){
C_save_and_reclaim_args((void *)trf_20201,2,t0,t1);}
a=C_alloc(3);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20204,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
if(C_truep(((C_word*)t0)[3])){
/* irregex-core.scm:2240: finalize! */
f_19747(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5]);}
else{
t3=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_TRUE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k20202 in k20199 in k20039 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20204(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_20204,c,av);}
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_TRUE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k20241 in k20039 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_20243(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,4)))){
C_save_and_reclaim_args((void *)trf_20243,2,t0,t1);}
a=C_alloc(3);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20246,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
if(C_truep(((C_word*)t0)[3])){
/* irregex-core.scm:2243: finalize! */
f_19747(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5]);}
else{
t3=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_TRUE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}
else{
t2=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k20244 in k20241 in k20039 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20246(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_20246,c,av);}
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_TRUE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* a20270 in lp2 in k19924 in k19921 in lp1 in k19904 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20271(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_20271,c,av);}
t3=C_i_car(t2);
t4=C_eqp(((C_word*)t0)[2],t3);
if(C_truep(t4)){
t5=t1;{
C_word *av2=av;
av2[0]=t5;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t5=C_charp(C_u_i_car(t2));
if(C_truep(C_i_not(t5))){
/* irregex-core.scm:2208: cset-contains? */
f_26844(t1,C_u_i_car(t2),((C_word*)t0)[2]);}
else{
t6=t1;{
C_word *av2=av;
av2[0]=t6;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}}}

/* g3573 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static C_word C_fcall f_20311(C_word *a,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_stack_overflow_check;{}
t2=C_i_cdr(t1);
t3=C_i_vector_ref(((C_word*)t0)[2],t2);
t4=C_u_i_car(t1);
t5=C_a_i_cons(&a,2,((C_word*)t0)[3],((C_word*)t0)[4]);
return(C_i_vector_set(t3,t4,t5));}

/* for-each-loop3572 in k19901 in k19889 in chicken.irregex#dfa-match/longest in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_20339(C_word 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;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,2)))){
C_save_and_reclaim_args((void *)trf_20339,3,t0,t1,t2);}
a=C_alloc(3);
if(C_truep(C_i_pairp(t2))){
t3=(
/* irregex-core.scm:2173: g3573 */
  f_20311(C_a_i(&a,3),((C_word*)t0)[2],C_slot(t2,C_fix(0)))
);
t5=t1;
t6=C_slot(t2,C_fix(1));
t1=t5;
t2=t6;
goto loop;}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* chicken.irregex#nfa-get-epsilons in k18847 in k7718 in k7493 in k7490 */
static C_word C_fcall f_20464(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_stack_overflow_check;{}
t3=C_eqp(t2,C_fix(0));
if(C_truep(t3)){
return(C_SCHEME_END_OF_LIST);}
else{
t4=C_fixnum_times(t2,C_fix(4));
return(C_i_vector_ref(t1,C_fixnum_plus(t4,C_fix(1))));}}

/* chicken.irregex#nfa-add-epsilon! in k18847 in k7718 in k7493 in k7490 */
static C_word C_fcall f_20498(C_word *a,C_word 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_stack_overflow_check;{}
t5=(
/* irregex-core.scm:2399: nfa-get-epsilons */
  f_20464(t1,t2)
);
t6=C_i_assq(t3,t5);
if(C_truep(C_i_not(t6))){
t7=C_a_i_cons(&a,2,t3,t4);
t8=C_a_i_cons(&a,2,t7,t5);
t9=C_fixnum_times(t2,C_fix(4));
return(C_i_vector_set(t1,C_fixnum_plus(t9,C_fix(1)),t8));}
else{
t7=C_SCHEME_UNDEFINED;
return(t7);}}

/* chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_20639(C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,3)))){
C_save_and_reclaim_args((void *)trf_20639,3,t1,t2,t3);}
a=C_alloc(10);
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20643,a[2]=t1,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
t5=C_a_i_fixnum_times(&a,2,C_fix(128),C_fix(4));
/* irregex-core.scm:2425: scheme#make-vector */
t6=*((C_word*)lf[4]+1);{
C_word av2[4];
av2[0]=t6;
av2[1]=t4;
av2[2]=t5;
av2[3]=C_SCHEME_END_OF_LIST;
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}

/* k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20643(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,c,5)))){
C_save_and_reclaim((void *)f_20643,c,av);}
a=C_alloc(18);
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_20646,a[2]=t3,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);
t5=C_a_i_list1(&a,1,((C_word*)t0)[3]);
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_21594,a[2]=t3,a[3]=t7,a[4]=((C_word)li273),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
f_21594(t9,t4,t5,C_fix(0),C_SCHEME_END_OF_LIST);}

/* k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20646(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,6)))){
C_save_and_reclaim((void *)f_20646,c,av);}
a=C_alloc(15);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_20648,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t1,a[5]=((C_word)li271),tmp=(C_word)a,a+=6,tmp));
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21538,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t6=C_a_i_list1(&a,1,((C_word*)t0)[4]);
/* irregex-core.scm:2642: lp */
t7=((C_word*)t3)[1];
f_20648(t7,t5,t6,C_fix(1),((C_word*)t0)[5],C_fix(0));}

/* lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_20648(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word t26;
C_word t27;
C_word t28;
C_word t29;
C_word t30;
C_word t31;
C_word t32;
C_word t33;
C_word t34;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(40,0,5)))){
C_save_and_reclaim_args((void *)trf_20648,6,t0,t1,t2,t3,t4,t5);}
a=C_alloc(40);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
t10=C_SCHEME_UNDEFINED;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
t12=C_SCHEME_UNDEFINED;
t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
t14=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20651,a[2]=t3,a[3]=((C_word)li264),tmp=(C_word)a,a+=4,tmp));
t15=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20661,a[2]=((C_word*)t0)[2],a[3]=((C_word)li266),tmp=(C_word)a,a+=4,tmp));
t16=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20722,a[2]=t9,a[3]=t7,a[4]=((C_word)li267),tmp=(C_word)a,a+=5,tmp));
t17=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20739,a[2]=t4,a[3]=t11,a[4]=((C_word)li268),tmp=(C_word)a,a+=5,tmp));
if(C_truep(C_i_nullp(t2))){
t18=t1;{
C_word av2[2];
av2[0]=t18;
av2[1]=t5;
((C_proc)(void*)(*((C_word*)t18+1)))(2,av2);}}
else{
t18=C_i_car(t2);
t19=C_eqp(lf[110],t18);
t20=(C_truep(t19)?t19:C_i_equalp(lf[389],C_u_i_car(t2)));
if(C_truep(t20)){
t21=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20789,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t9,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:2473: lp */
t30=t21;
t31=C_u_i_cdr(t2);
t32=t3;
t33=t4;
t34=t5;
t1=t30;
t2=t31;
t3=t32;
t4=t33;
t5=t34;
goto loop;}
else{
if(C_truep(C_i_stringp(C_u_i_car(t2)))){
t21=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20813,a[2]=t2,a[3]=t13,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2480: lp */
t30=t21;
t31=C_u_i_cdr(t2);
t32=t3;
t33=t4;
t34=t5;
t1=t30;
t2=t31;
t3=t32;
t4=t33;
t5=t34;
goto loop;}
else{
if(C_truep(C_charp(C_u_i_car(t2)))){
t21=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20870,a[2]=t13,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2490: lp */
t30=t21;
t31=C_u_i_cdr(t2);
t32=t3;
t33=t4;
t34=t5;
t1=t30;
t2=t31;
t3=t32;
t4=t33;
t5=t34;
goto loop;}
else{
if(C_truep(C_i_symbolp(C_u_i_car(t2)))){
t21=C_i_assq(C_u_i_car(t2),lf[248]);
if(C_truep(t21)){
t22=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_20897,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=t3,a[6]=t4,a[7]=t5,tmp=(C_word)a,a+=8,tmp);
t23=C_i_cdr(t21);
if(C_truep(C_i_closurep(t23))){
/* irregex-core.scm:2494: g3876 */
t24=C_u_i_cdr(t21);{
C_word av2[2];
av2[0]=t24;
av2[1]=t22;
((C_proc)(void*)(*((C_word*)t24+1)))(2,av2);}}
else{
t24=C_u_i_cdr(t21);
t25=C_u_i_cdr(t2);
t26=C_a_i_cons(&a,2,t24,t25);
/* irregex-core.scm:2494: lp */
t30=t1;
t31=t26;
t32=t3;
t33=t4;
t34=t5;
t1=t30;
t2=t31;
t3=t32;
t4=t33;
t5=t34;
goto loop;}}
else{
t22=t1;{
C_word av2[2];
av2[0]=t22;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t22+1)))(2,av2);}}}
else{
if(C_truep(C_i_pairp(C_u_i_car(t2)))){
t21=C_i_caar(t2);
if(C_truep(C_i_stringp(t21))){
t22=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_20928,a[2]=t11,a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=t3,a[7]=t4,a[8]=t5,tmp=(C_word)a,a+=9,tmp);
t23=C_fixnum_and(t4,C_fix(2));
t24=C_eqp(C_fix(2),t23);
if(C_truep(t24)){
t25=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20947,a[2]=t22,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2505: string->cset */
f_26357(t25,C_i_caar(t2));}
else{
/* irregex-core.scm:2506: string->cset */
f_26357(t22,C_i_caar(t2));}}
else{
t22=C_i_caar(t2);
t23=C_eqp(t22,lf[115]);
t24=(C_truep(t23)?t23:C_eqp(t22,lf[227]));
if(C_truep(t24)){
t25=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_20977,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t3,a[5]=t4,a[6]=t5,tmp=(C_word)a,a+=7,tmp);
t26=C_u_i_car(t2);
/* irregex-core.scm:2512: scheme#append */
t27=*((C_word*)lf[73]+1);{
C_word av2[4];
av2[0]=t27;
av2[1]=t25;
av2[2]=C_u_i_cdr(t26);
av2[3]=C_u_i_cdr(t2);
((C_proc)(void*)(*((C_word*)t27+1)))(4,av2);}}
else{
t25=C_eqp(t22,lf[225]);
t26=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_20991,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=t7,a[6]=t4,a[7]=t3,a[8]=t5,a[9]=t22,a[10]=t11,a[11]=t9,a[12]=((C_word*)t0)[2],a[13]=((C_word*)t0)[4],tmp=(C_word)a,a+=14,tmp);
if(C_truep(t25)){
t27=t26;
f_20991(t27,t25);}
else{
t27=C_eqp(t22,lf[226]);
if(C_truep(t27)){
t28=t26;
f_20991(t28,t27);}
else{
t28=C_eqp(t22,lf[156]);
t29=t26;
f_20991(t29,(C_truep(t28)?t28:C_eqp(t22,lf[157])));}}}}}
else{
t21=t1;{
C_word av2[2];
av2[0]=t21;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t21+1)))(2,av2);}}}}}}}}

/* new-state-number in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_20651(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,3)))){
C_save_and_reclaim_args((void *)trf_20651,3,t0,t1,t2);}
/* irregex-core.scm:2450: scheme#max */
t3=*((C_word*)lf[254]+1);{
C_word av2[4];
av2[0]=t3;
av2[1]=t1;
av2[2]=((C_word*)t0)[2];
av2[3]=C_fixnum_plus(C_fix(1),t2);
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* add-state! in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_20661(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,0,3)))){
C_save_and_reclaim_args((void *)trf_20661,4,t0,t1,t2,t3);}
a=C_alloc(15);
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20665,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
t5=C_fixnum_times(t2,C_fix(4));
t6=C_i_vector_length(((C_word*)((C_word*)t0)[2])[1]);
if(C_truep(C_fixnum_greater_or_equal_p(t5,t6))){
t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20674,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
t8=C_i_vector_length(((C_word*)((C_word*)t0)[2])[1]);
t9=C_a_i_fixnum_times(&a,2,C_fix(2),t8);
/* irregex-core.scm:2453: scheme#make-vector */
t10=*((C_word*)lf[4]+1);{
C_word av2[4];
av2[0]=t10;
av2[1]=t7;
av2[2]=t9;
av2[3]=C_SCHEME_END_OF_LIST;
((C_proc)(void*)(*((C_word*)t10+1)))(4,av2);}}
else{
t7=t4;
f_20665(t7,C_SCHEME_UNDEFINED);}}

/* k20663 in add-state! in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_20665(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,1)))){
C_save_and_reclaim_args((void *)trf_20665,2,t0,t1);}
t2=((C_word*)((C_word*)t0)[2])[1];
t3=C_fixnum_times(((C_word*)t0)[3],C_fix(4));
t4=C_i_vector_set(t2,t3,((C_word*)t0)[4]);
t5=((C_word*)t0)[5];{
C_word av2[2];
av2[0]=t5;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}

/* k20672 in add-state! in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20674(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,c,3)))){
C_save_and_reclaim((void *)f_20674,c,av);}
a=C_alloc(18);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20677,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
t3=C_i_vector_length(((C_word*)((C_word*)t0)[2])[1]);
t4=C_a_i_fixnum_difference(&a,2,t3,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|5,a[1]=(C_word)f_20686,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t6,a[5]=((C_word)li265),tmp=(C_word)a,a+=6,tmp));
t8=((C_word*)t6)[1];
f_20686(t8,t2,t4);}

/* k20675 in k20672 in add-state! in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20677(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_20677,c,av);}
t2=C_mutate(((C_word *)((C_word*)t0)[2])+1,((C_word*)t0)[3]);
t3=((C_word*)t0)[4];
f_20665(t3,t2);}

/* doloop3843 in k20672 in add-state! in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_20686(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_20686,3,t0,t1,t2);}
a=C_alloc(5);
if(C_truep(C_fixnum_lessp(t2,C_fix(0)))){
t3=C_SCHEME_UNDEFINED;
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t3=C_i_vector_ref(((C_word*)((C_word*)t0)[2])[1],t2);
t4=C_i_vector_set(((C_word*)t0)[3],t2,t3);
t5=C_a_i_fixnum_difference(&a,2,t2,C_fix(1));
t7=t1;
t8=t5;
t1=t7;
t2=t8;
goto loop;}}

/* extend-state! in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_20722(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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_20722,4,t0,t1,t2,t3);}
a=C_alloc(6);
if(C_truep(t2)){
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20733,a[2]=t3,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:2462: new-state-number */
t5=((C_word*)((C_word*)t0)[3])[1];
f_20651(t5,t4,t2);}
else{
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k20731 in extend-state! in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20733(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,3)))){
C_save_and_reclaim((void *)f_20733,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],((C_word*)t0)[3]);
/* irregex-core.scm:2462: add-state! */
t3=((C_word*)((C_word*)t0)[4])[1];
f_20661(t3,((C_word*)t0)[5],t1,t2);}

/* add-char-state! in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_20739(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,0,3)))){
C_save_and_reclaim_args((void *)trf_20739,4,t0,t1,t2,t3);}
a=C_alloc(15);
t4=C_u_i_char_upper_casep(t3);
t5=(C_truep(t4)?C_u_i_char_downcase(t3):C_u_i_char_upcase(t3));
t6=C_fixnum_and(((C_word*)t0)[2],C_fix(2));
t7=C_eqp(C_fix(2),t6);
if(C_truep(t7)){
t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20756,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t9=C_a_i_cons(&a,2,t3,t3);
t10=C_a_i_vector1(&a,1,t9);
t11=C_a_i_cons(&a,2,t5,t5);
t12=C_a_i_vector1(&a,1,t11);
/* irregex-core.scm:2466: cset-union */
t13=lf[162];{
C_word av2[4];
av2[0]=t13;
av2[1]=t8;
av2[2]=t10;
av2[3]=t12;
f_26965(4,av2);}}
else{
t8=C_a_i_cons(&a,2,t3,t3);
t9=C_a_i_vector1(&a,1,t8);
/* irregex-core.scm:2467: extend-state! */
t10=((C_word*)((C_word*)t0)[3])[1];
f_20722(t10,t1,t2,t9);}}

/* k20754 in add-char-state! in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20756(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_20756,c,av);}
/* irregex-core.scm:2466: extend-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20722(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* k20787 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20789(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_20789,c,av);}
a=C_alloc(9);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20795,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_20802,a[2]=((C_word*)t0)[4],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2475: new-state-number */
t4=((C_word*)((C_word*)t0)[5])[1];
f_20651(t4,t3,t1);}
else{
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k20793 in k20787 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20795(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,1)))){
C_save_and_reclaim((void *)f_20795,c,av);}
a=C_alloc(6);
t2=(
/* irregex-core.scm:2476: nfa-add-epsilon! */
  f_20498(C_a_i(&a,6),((C_word*)((C_word*)t0)[2])[1],t1,((C_word*)t0)[3],C_SCHEME_FALSE)
);
t3=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t3;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* k20800 in k20787 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20802(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_20802,c,av);}
/* irregex-core.scm:2475: add-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20661(t2,((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* k20811 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20813(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,4)))){
C_save_and_reclaim((void *)f_20813,c,av);}
a=C_alloc(13);
if(C_truep(t1)){
t2=C_i_string_length(C_u_i_car(((C_word*)t0)[2]));
t3=C_a_i_fixnum_difference(&a,2,t2,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|5,a[1]=(C_word)f_20827,a[2]=t5,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word)li269),tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
f_20827(t7,((C_word*)t0)[4],t3,t1);}
else{
t2=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* lp2 in k20811 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_20827(C_word t0,C_word 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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,3)))){
C_save_and_reclaim_args((void *)trf_20827,4,t0,t1,t2,t3);}
a=C_alloc(5);
if(C_truep(C_fixnum_lessp(t2,C_fix(0)))){
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=C_fixnum_difference(t2,C_fix(1));
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20845,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
t6=C_i_car(((C_word*)t0)[3]);
/* irregex-core.scm:2487: add-char-state! */
t7=((C_word*)((C_word*)t0)[4])[1];
f_20739(t7,t5,t3,C_i_string_ref(t6,t2));}}

/* k20843 in lp2 in k20811 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20845(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_20845,c,av);}
/* irregex-core.scm:2486: lp2 */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20827(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* k20868 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20870(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_20870,c,av);}
/* irregex-core.scm:2490: add-char-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20739(t2,((C_word*)t0)[3],t1,C_u_i_car(((C_word*)t0)[4]));}

/* k20895 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20897(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,5)))){
C_save_and_reclaim((void *)f_20897,c,av);}
a=C_alloc(3);
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=C_a_i_cons(&a,2,t1,t2);
/* irregex-core.scm:2494: lp */
t4=((C_word*)((C_word*)t0)[3])[1];
f_20648(t4,((C_word*)t0)[4],t3,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}

/* k20926 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20928(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,5)))){
C_save_and_reclaim((void *)f_20928,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20935,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2507: lp */
t3=((C_word*)((C_word*)t0)[4])[1];
f_20648(t3,t2,C_u_i_cdr(((C_word*)t0)[5]),((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);}

/* k20933 in k20926 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20935(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_20935,c,av);}
/* irregex-core.scm:2507: extend-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20722(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4]);}

/* k20945 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20947(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_20947,c,av);}
/* irregex-core.scm:2505: cset-case-insensitive */
f_27492(((C_word*)t0)[2],t1);}

/* k20975 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20977(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_20977,c,av);}
/* irregex-core.scm:2512: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20648(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_20991(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,0,5)))){
C_save_and_reclaim_args((void *)trf_20991,2,t0,t1);}
a=C_alloc(14);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_20994,a[2]=((C_word*)t0)[2],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);
/* irregex-core.scm:2514: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_20648(t3,t2,C_u_i_cdr(((C_word*)t0)[2]),((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[8]);}
else{
t2=C_eqp(((C_word*)t0)[9],lf[52]);
t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_21038,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[11],a[11]=((C_word*)t0)[5],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],tmp=(C_word)a,a+=14,tmp);
if(C_truep(t2)){
t4=t3;
f_21038(t4,t2);}
else{
t4=C_eqp(((C_word*)t0)[9],lf[247]);
if(C_truep(t4)){
t5=t3;
f_21038(t5,t4);}
else{
t5=C_eqp(((C_word*)t0)[9],lf[234]);
t6=t3;
f_21038(t6,(C_truep(t5)?t5:C_eqp(((C_word*)t0)[9],lf[179])));}}}}

/* k20992 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_20994(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,3)))){
C_save_and_reclaim((void *)f_20994,c,av);}
a=C_alloc(7);
t2=C_i_caar(((C_word*)t0)[2]);
t3=(C_truep((C_truep(C_eqp(t2,lf[225]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[156]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))?lf[64]:lf[63]);
t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21000,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);
t5=C_u_i_car(((C_word*)t0)[2]);
t6=C_u_i_car(t5);
if(C_truep((C_truep(C_eqp(t6,lf[225]))?C_SCHEME_TRUE:(C_truep(C_eqp(t6,lf[226]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
/* irregex-core.scm:2514: g3903 */
t7=t3;{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t7;
av2[1]=t4;
av2[2]=((C_word*)t0)[6];
av2[3]=C_fix(2);
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}
else{
/* irregex-core.scm:2514: g3903 */
t7=t3;{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t7;
av2[1]=t4;
av2[2]=((C_word*)t0)[6];
av2[3]=C_fix(32);
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}}

/* k20998 in k20992 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21000(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,2)))){
C_save_and_reclaim((void *)f_21000,c,av);}
a=C_alloc(7);
if(C_truep(((C_word*)t0)[2])){
t2=C_i_cdar(((C_word*)t0)[3]);
t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21014,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t2,a[5]=t1,a[6]=((C_word*)t0)[2],tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:2523: new-state-number */
t4=((C_word*)((C_word*)t0)[6])[1];
f_20651(t4,t3,((C_word*)t0)[2]);}
else{
t2=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k21012 in k20998 in k20992 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21014(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_21014,c,av);}
/* irregex-core.scm:2523: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20648(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_21038(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,5)))){
C_save_and_reclaim_args((void *)trf_21038,2,t0,t1);}
a=C_alloc(12);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_21041,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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_u_i_car(((C_word*)t0)[5]);
t4=C_fixnum_and(((C_word*)t0)[7],C_fix(2));
t5=C_eqp(C_fix(2),t4);
/* irregex-core.scm:2525: sre->cset */
f_26377(t2,t3,C_a_i_list(&a,1,t5));}
else{
t2=C_eqp(((C_word*)t0)[9],lf[103]);
if(C_truep(t2)){
t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_21065,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:2530: lp */
t4=((C_word*)((C_word*)t0)[4])[1];
f_20648(t4,t3,C_u_i_cdr(((C_word*)t0)[5]),((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);}
else{
t3=C_eqp(((C_word*)t0)[9],lf[131]);
if(C_truep(t3)){
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21153,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:2554: lp */
t5=((C_word*)((C_word*)t0)[4])[1];
f_20648(t5,t4,C_u_i_cdr(((C_word*)t0)[5]),((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);}
else{
t4=C_eqp(((C_word*)t0)[9],lf[129]);
t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[9],lf[127]));
if(C_truep(t5)){
t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21187,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[11],tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:2563: lp */
t7=((C_word*)((C_word*)t0)[4])[1];
f_20648(t7,t6,C_u_i_cdr(((C_word*)t0)[5]),((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);}
else{
t6=C_eqp(((C_word*)t0)[9],lf[245]);
t7=(C_truep(t6)?t6:C_eqp(((C_word*)t0)[9],lf[108]));
if(C_truep(t7)){
t8=C_i_assq(C_u_i_car(((C_word*)t0)[5]),((C_word*)t0)[13]);
t9=C_i_cdr(t8);
t10=C_fixnum_shift_left(t9,C_fix(1));
t11=C_fixnum_plus(t10,C_fix(1));
t12=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_21247,a[2]=((C_word*)t0)[12],a[3]=t10,a[4]=t11,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[4],a[10]=((C_word*)t0)[7],tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:2608: lp */
t13=((C_word*)((C_word*)t0)[4])[1];
f_20648(t13,t12,C_u_i_cdr(((C_word*)t0)[5]),((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);}
else{
t8=C_eqp(((C_word*)t0)[9],lf[119]);
t9=(C_truep(t8)?t8:C_eqp(((C_word*)t0)[9],lf[120]));
if(C_truep(t9)){
t10=C_i_assq(C_u_i_car(((C_word*)t0)[5]),((C_word*)t0)[13]);
t11=C_i_cdr(t10);
t12=C_fixnum_shift_left(t11,C_fix(1));
t13=C_fixnum_plus(t12,C_fix(1));
t14=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_21325,a[2]=((C_word*)t0)[12],a[3]=t12,a[4]=t13,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[4],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[5],tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:2621: lp */
t15=((C_word*)((C_word*)t0)[4])[1];
f_20648(t15,t14,C_u_i_cdr(((C_word*)t0)[5]),((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);}
else{
t10=C_i_caar(((C_word*)t0)[5]);
t11=C_i_assq(t10,lf[248]);
if(C_truep(t11)){
t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21392,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[8],a[7]=((C_word)li270),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:2632: g3979 */
t13=t12;
f_21392(t13,((C_word*)t0)[3],t11);}
else{
t12=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t12;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t12+1)))(2,av2);}}}}}}}}}

/* k21039 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21041(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,5)))){
C_save_and_reclaim((void *)f_21041,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21048,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2527: lp */
t3=((C_word*)((C_word*)t0)[4])[1];
f_20648(t3,t2,C_u_i_cdr(((C_word*)t0)[5]),((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);}

/* k21046 in k21039 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21048(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_21048,c,av);}
/* irregex-core.scm:2527: extend-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20722(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4]);}

/* k21063 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21065(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(17,c,2)))){
C_save_and_reclaim((void *)f_21065,c,av);}
a=C_alloc(17);
if(C_truep(t1)){
t2=C_i_cdar(((C_word*)t0)[2]);
if(C_truep(C_i_nullp(t2))){
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21081,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2535: new-state-number */
t4=((C_word*)((C_word*)t0)[5])[1];
f_20651(t4,t3,t1);}
else{
t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_21084,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=t1,a[9]=((C_word*)t0)[2],tmp=(C_word)a,a+=10,tmp);
t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21138,a[2]=((C_word*)t0)[7],a[3]=t3,a[4]=((C_word*)t0)[8],a[5]=t1,a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:2538: scheme#cddar */
t5=*((C_word*)lf[392]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t5;
av2[1]=t4;
av2[2]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}}
else{
t2=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k21079 in k21063 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21081(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_21081,c,av);}
/* irregex-core.scm:2535: add-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20661(t2,((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* k21082 in k21063 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21084(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,2)))){
C_save_and_reclaim((void *)f_21084,c,av);}
a=C_alloc(15);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21087,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);
if(C_truep(t1)){
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21122,a[2]=((C_word*)t0)[6],a[3]=t2,a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[5],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:2543: scheme#cadar */
t4=*((C_word*)lf[391]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[9];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
f_21087(2,av2);}}}

/* k21085 in k21082 in k21063 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21087(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,2)))){
C_save_and_reclaim((void *)f_21087,c,av);}
a=C_alloc(10);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21093,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|3,a[1]=(C_word)f_21103,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2548: new-state-number */
t4=((C_word*)((C_word*)t0)[6])[1];
f_20651(t4,t3,t1);}
else{
t2=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k21091 in k21085 in k21082 in k21063 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21093(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,1)))){
C_save_and_reclaim((void *)f_21093,c,av);}
a=C_alloc(12);
t2=(
/* irregex-core.scm:2550: nfa-add-epsilon! */
  f_20498(C_a_i(&a,6),((C_word*)((C_word*)t0)[2])[1],t1,((C_word*)t0)[3],C_SCHEME_FALSE)
);
t3=(
/* irregex-core.scm:2551: nfa-add-epsilon! */
  f_20498(C_a_i(&a,6),((C_word*)((C_word*)t0)[2])[1],t1,((C_word*)t0)[4],C_SCHEME_FALSE)
);
t4=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t4;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* k21101 in k21085 in k21082 in k21063 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21103(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_21103,c,av);}
/* irregex-core.scm:2548: add-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20661(t2,((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* k21112 in k21120 in k21082 in k21063 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21114(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_21114,c,av);}
/* irregex-core.scm:2543: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20648(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k21116 in k21120 in k21082 in k21063 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21118(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_21118,c,av);}
/* irregex-core.scm:2544: new-state-number */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20651(t2,((C_word*)t0)[3],t1);}

/* k21120 in k21082 in k21063 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21122(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,3)))){
C_save_and_reclaim((void *)f_21122,c,av);}
a=C_alloc(14);
t2=C_a_i_list1(&a,1,t1);
t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21114,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],tmp=(C_word)a,a+=7,tmp);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21118,a[2]=((C_word*)t0)[6],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2544: scheme#max */
t5=*((C_word*)lf[254]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t5;
av2[1]=t4;
av2[2]=((C_word*)t0)[7];
av2[3]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}

/* k21128 in k21136 in k21063 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21130(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_21130,c,av);}
/* irregex-core.scm:2538: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20648(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k21136 in k21063 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21138(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,2)))){
C_save_and_reclaim((void *)f_21138,c,av);}
a=C_alloc(13);
t2=(
/* irregex-core.scm:2538: sre-alternate */
  f_18145(C_a_i(&a,3),t1)
);
t3=C_a_i_list1(&a,1,t2);
t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21130,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],tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:2539: new-state-number */
t5=((C_word*)((C_word*)t0)[6])[1];
f_20651(t5,t4,((C_word*)t0)[5]);}

/* k21151 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21153(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,2)))){
C_save_and_reclaim((void *)f_21153,c,av);}
a=C_alloc(12);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21159,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
t3=C_i_cdar(((C_word*)t0)[4]);
t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21173,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=t3,a[5]=((C_word*)t0)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:2558: new-state-number */
t5=((C_word*)((C_word*)t0)[7])[1];
f_20651(t5,t4,t1);}
else{
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k21157 in k21151 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21159(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,1)))){
C_save_and_reclaim((void *)f_21159,c,av);}
a=C_alloc(6);
if(C_truep(t1)){
t2=(
/* irregex-core.scm:2560: nfa-add-epsilon! */
  f_20498(C_a_i(&a,6),((C_word*)((C_word*)t0)[2])[1],t1,((C_word*)t0)[3],C_SCHEME_FALSE)
);
t3=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t3;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
t2=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t2;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k21171 in k21151 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21173(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_21173,c,av);}
/* irregex-core.scm:2558: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20648(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k21185 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21187(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,2)))){
C_save_and_reclaim((void *)f_21187,c,av);}
a=C_alloc(14);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21193,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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|5,a[1]=(C_word)f_21227,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);
/* irregex-core.scm:2567: new-state-number */
t4=((C_word*)((C_word*)t0)[7])[1];
f_20651(t4,t3,t1);}
else{
t2=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k21191 in k21185 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21193(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,2)))){
C_save_and_reclaim((void *)f_21193,c,av);}
a=C_alloc(13);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21196,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);
t3=C_i_cdar(((C_word*)t0)[2]);
t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21223,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=t3,a[5]=((C_word*)t0)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:2570: new-state-number */
t5=((C_word*)((C_word*)t0)[7])[1];
f_20651(t5,t4,t1);}

/* k21194 in k21191 in k21185 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21196(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,1)))){
C_save_and_reclaim((void *)f_21196,c,av);}
a=C_alloc(12);
if(C_truep(t1)){
t2=C_i_caar(((C_word*)t0)[2]);
t3=C_eqp(lf[127],t2);
if(C_truep(t3)){
t4=(
/* irregex-core.scm:2575: nfa-add-epsilon! */
  f_20498(C_a_i(&a,6),((C_word*)((C_word*)t0)[3])[1],t1,((C_word*)t0)[4],C_SCHEME_FALSE)
);
t5=(
/* irregex-core.scm:2577: nfa-add-epsilon! */
  f_20498(C_a_i(&a,6),((C_word*)((C_word*)t0)[3])[1],((C_word*)t0)[4],t1,C_SCHEME_FALSE)
);
t6=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t6;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
t4=(
/* irregex-core.scm:2577: nfa-add-epsilon! */
  f_20498(C_a_i(&a,6),((C_word*)((C_word*)t0)[3])[1],((C_word*)t0)[4],t1,C_SCHEME_FALSE)
);
t5=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t5;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}}
else{
t2=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t2;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k21221 in k21191 in k21185 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21223(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_21223,c,av);}
/* irregex-core.scm:2570: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20648(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k21225 in k21185 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21227(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_21227,c,av);}
/* irregex-core.scm:2566: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20648(t2,((C_word*)t0)[3],lf[393],t1,((C_word*)t0)[4],((C_word*)t0)[5]);}

/* k21245 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21247(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(16,c,2)))){
C_save_and_reclaim((void *)f_21247,c,av);}
a=C_alloc(16);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_21253,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],tmp=(C_word)a,a+=12,tmp);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21295,a[2]=((C_word*)t0)[6],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2610: new-state-number */
t4=((C_word*)((C_word*)t0)[7])[1];
f_20651(t4,t3,t1);}
else{
t2=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k21251 in k21245 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21253(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(23,c,2)))){
C_save_and_reclaim((void *)f_21253,c,av);}
a=C_alloc(23);
t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_21256,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);
t3=(
/* irregex-core.scm:2611: sre-sequence */
  f_18122(C_a_i(&a,3),C_i_cdar(((C_word*)t0)[9]))
);
t4=C_a_i_list1(&a,1,t3);
t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21283,a[2]=((C_word*)t0)[10],a[3]=t2,a[4]=t4,a[5]=((C_word*)t0)[11],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:2612: new-state-number */
t6=((C_word*)((C_word*)t0)[8])[1];
f_20651(t6,t5,t1);}

/* k21254 in k21251 in k21245 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21256(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,2)))){
C_save_and_reclaim((void *)f_21256,c,av);}
a=C_alloc(13);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_21259,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);
if(C_truep(t1)){
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21275,a[2]=((C_word*)t0)[8],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2613: new-state-number */
t4=((C_word*)((C_word*)t0)[9])[1];
f_20651(t4,t3,t1);}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
f_21259(2,av2);}}}

/* k21257 in k21254 in k21251 in k21245 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21259(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,1)))){
C_save_and_reclaim((void *)f_21259,c,av);}
a=C_alloc(12);
if(C_truep(t1)){
t2=(
/* irregex-core.scm:2615: nfa-add-epsilon! */
  f_20498(C_a_i(&a,6),((C_word*)((C_word*)t0)[2])[1],t1,((C_word*)t0)[3],((C_word*)t0)[4])
);
t3=(
/* irregex-core.scm:2616: nfa-add-epsilon! */
  f_20498(C_a_i(&a,6),((C_word*)((C_word*)t0)[2])[1],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7])
);
t4=((C_word*)t0)[8];{
C_word *av2=av;
av2[0]=t4;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t2=((C_word*)t0)[8];{
C_word *av2=av;
av2[0]=t2;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k21273 in k21254 in k21251 in k21245 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21275(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_21275,c,av);}
/* irregex-core.scm:2613: add-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20661(t2,((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* k21281 in k21251 in k21245 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21283(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_21283,c,av);}
/* irregex-core.scm:2611: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20648(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k21293 in k21245 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21295(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_21295,c,av);}
/* irregex-core.scm:2610: add-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20661(t2,((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* k21323 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21325(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(16,c,2)))){
C_save_and_reclaim((void *)f_21325,c,av);}
a=C_alloc(16);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_21331,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],tmp=(C_word)a,a+=12,tmp);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21373,a[2]=((C_word*)t0)[6],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2623: new-state-number */
t4=((C_word*)((C_word*)t0)[7])[1];
f_20651(t4,t3,t1);}
else{
t2=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k21329 in k21323 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21331(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(17,c,2)))){
C_save_and_reclaim((void *)f_21331,c,av);}
a=C_alloc(17);
t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_21334,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);
t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21369,a[2]=((C_word*)t0)[9],a[3]=t2,a[4]=((C_word*)t0)[10],a[5]=t1,a[6]=((C_word*)t0)[8],tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:2624: scheme#cddar */
t4=*((C_word*)lf[392]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k21332 in k21329 in k21323 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21334(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,2)))){
C_save_and_reclaim((void *)f_21334,c,av);}
a=C_alloc(13);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_21337,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);
if(C_truep(t1)){
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21353,a[2]=((C_word*)t0)[8],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2626: new-state-number */
t4=((C_word*)((C_word*)t0)[9])[1];
f_20651(t4,t3,t1);}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
f_21337(2,av2);}}}

/* k21335 in k21332 in k21329 in k21323 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21337(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,1)))){
C_save_and_reclaim((void *)f_21337,c,av);}
a=C_alloc(12);
if(C_truep(t1)){
t2=(
/* irregex-core.scm:2628: nfa-add-epsilon! */
  f_20498(C_a_i(&a,6),((C_word*)((C_word*)t0)[2])[1],t1,((C_word*)t0)[3],((C_word*)t0)[4])
);
t3=(
/* irregex-core.scm:2629: nfa-add-epsilon! */
  f_20498(C_a_i(&a,6),((C_word*)((C_word*)t0)[2])[1],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7])
);
t4=((C_word*)t0)[8];{
C_word *av2=av;
av2[0]=t4;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t2=((C_word*)t0)[8];{
C_word *av2=av;
av2[0]=t2;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k21351 in k21332 in k21329 in k21323 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21353(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_21353,c,av);}
/* irregex-core.scm:2626: add-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20661(t2,((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* k21359 in k21367 in k21329 in k21323 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21361(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_21361,c,av);}
/* irregex-core.scm:2624: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20648(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k21367 in k21329 in k21323 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21369(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,2)))){
C_save_and_reclaim((void *)f_21369,c,av);}
a=C_alloc(13);
t2=(
/* irregex-core.scm:2624: sre-sequence */
  f_18122(C_a_i(&a,3),t1)
);
t3=C_a_i_list1(&a,1,t2);
t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21361,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],tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:2625: new-state-number */
t5=((C_word*)((C_word*)t0)[6])[1];
f_20651(t5,t4,((C_word*)t0)[5]);}

/* k21371 in k21323 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21373(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_21373,c,av);}
/* irregex-core.scm:2623: add-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20661(t2,((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* g3979 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_21392(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,3)))){
C_save_and_reclaim_args((void *)trf_21392,3,t0,t1,t2);}
a=C_alloc(8);
t3=C_i_cdr(t2);
if(C_truep(C_i_closurep(t3))){
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21410,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_word av2[4];
av2[0]=0;
av2[1]=t4;
av2[2]=C_u_i_cdr(t2);
av2[3]=C_i_cdar(((C_word*)t0)[2]);
C_apply(4,av2);}}
else{
/* irregex-core.scm:2638: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t4;
av2[1]=t1;
av2[2]=lf[394];
av2[3]=C_i_caar(((C_word*)t0)[2]);
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}}

/* k21408 in g3979 in k21036 in k20989 in lp in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21410(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,5)))){
C_save_and_reclaim((void *)f_21410,c,av);}
a=C_alloc(3);
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=C_a_i_cons(&a,2,t1,t2);
/* irregex-core.scm:2636: lp */
t4=((C_word*)((C_word*)t0)[3])[1];
f_20648(t4,((C_word*)t0)[4],t3,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}

/* k21536 in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21538(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_21538,c,av);}
a=C_alloc(4);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21544,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t3=C_fixnum_plus(t1,C_fix(1));
/* irregex-core.scm:2644: scheme#make-vector */
t4=*((C_word*)lf[4]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t2;
av2[2]=C_fixnum_times(C_fix(4),t3);
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k21542 in k21536 in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21544(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(17,c,3)))){
C_save_and_reclaim((void *)f_21544,c,av);}
a=C_alloc(17);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21547,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t3=C_block_size(t1);
t4=C_a_i_fixnum_difference(&a,2,t3,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|5,a[1]=(C_word)f_21555,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t6,a[5]=((C_word)li272),tmp=(C_word)a,a+=6,tmp));
t8=((C_word*)t6)[1];
f_21555(t8,t2,t4);}

/* k21545 in k21542 in k21536 in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21547(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_21547,c,av);}
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* doloop3989 in k21542 in k21536 in k20644 in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_21555(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_21555,3,t0,t1,t2);}
a=C_alloc(5);
if(C_truep(C_fixnum_lessp(t2,C_fix(0)))){
t3=C_SCHEME_UNDEFINED;
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t3=C_i_vector_ref(((C_word*)((C_word*)t0)[2])[1],t2);
t4=C_i_vector_set(((C_word*)t0)[3],t2,t3);
t5=C_a_i_fixnum_difference(&a,2,t2,C_fix(1));
t7=t1;
t8=t5;
t1=t7;
t2=t8;
goto loop;}}

/* lp in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_21594(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,4)))){
C_save_and_reclaim_args((void *)trf_21594,5,t0,t1,t2,t3,t4);}
a=C_alloc(7);
t5=C_i_pairp(t2);
if(C_truep(C_i_not(t5))){
t6=C_fixnum_shift_left(t3,C_fix(1));
t7=C_i_vector_set(((C_word*)((C_word*)t0)[2])[1],C_fix(0),t6);
t8=C_i_vector_set(((C_word*)((C_word*)t0)[2])[1],C_fix(1),C_fix(-1));
t9=t1;{
C_word av2[2];
av2[0]=t9;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t9+1)))(2,av2);}}
else{
t6=C_i_car(t2);
if(C_truep(C_i_pairp(t6))){
t7=C_i_caar(t2);
t8=C_eqp(t7,lf[245]);
t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21629,a[2]=t3,a[3]=t2,a[4]=t4,a[5]=((C_word*)t0)[3],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
if(C_truep(t8)){
t10=t9;
f_21629(t10,t8);}
else{
t10=C_eqp(t7,lf[108]);
if(C_truep(t10)){
t11=t9;
f_21629(t11,t10);}
else{
t11=C_eqp(t7,lf[119]);
t12=t9;
f_21629(t12,(C_truep(t11)?t11:C_eqp(t7,lf[120])));}}}
else{
/* irregex-core.scm:2446: lp */
t13=t1;
t14=C_u_i_cdr(t2);
t15=t3;
t16=t4;
t1=t13;
t2=t14;
t3=t15;
t4=t16;
goto loop;}}}

/* k21627 in lp in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_21629(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,3)))){
C_save_and_reclaim_args((void *)trf_21629,2,t0,t1);}
a=C_alloc(7);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21636,a[2]=((C_word*)t0)[2],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_u_i_car(((C_word*)t0)[3]);
/* irregex-core.scm:2443: scheme#append */
t4=*((C_word*)lf[73]+1);{
C_word av2[4];
av2[0]=t4;
av2[1]=t2;
av2[2]=C_u_i_cdr(t3);
av2[3]=C_u_i_cdr(((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}
else{
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21662,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:2445: scheme#append */
t3=*((C_word*)lf[73]+1);{
C_word av2[4];
av2[0]=t3;
av2[1]=t2;
av2[2]=C_u_i_car(((C_word*)t0)[3]);
av2[3]=C_u_i_cdr(((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}}

/* k21634 in k21627 in lp in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21636(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,4)))){
C_save_and_reclaim((void *)f_21636,c,av);}
a=C_alloc(6);
t2=C_fixnum_plus(((C_word*)t0)[2],C_fix(1));
t3=C_u_i_car(((C_word*)t0)[3]);
t4=C_a_i_cons(&a,2,t3,((C_word*)t0)[2]);
t5=C_a_i_cons(&a,2,t4,((C_word*)t0)[4]);
/* irregex-core.scm:2443: lp */
t6=((C_word*)((C_word*)t0)[5])[1];
f_21594(t6,((C_word*)t0)[6],t1,t2,t5);}

/* k21660 in k21627 in lp in k20641 in chicken.irregex#sre->nfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21662(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_21662,c,av);}
/* irregex-core.scm:2445: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21594(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4],((C_word*)t0)[5]);}

/* chicken.irregex#make-mst in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_21758(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,0,3)))){
C_save_and_reclaim_args((void *)trf_21758,2,t1,t2);}
a=C_alloc(14);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21762,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
t4=C_i_vector_length(t2);
t5=C_a_i_fixnum_quotient_checked(&a,2,t4,C_fix(4));
t6=C_s_a_u_i_integer_plus(&a,2,t5,C_fix(3));
/* irregex-core.scm:2715: scheme#make-vector */
t7=*((C_word*)lf[4]+1);{
C_word av2[4];
av2[0]=t7;
av2[1]=t3;
av2[2]=t6;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}

/* k21760 in chicken.irregex#make-mst in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21762(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,3)))){
C_save_and_reclaim((void *)f_21762,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21775,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2716: scheme#make-vector */
t3=*((C_word*)lf[4]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=C_i_vector_ref(((C_word*)t0)[3],C_fix(0));
av2[3]=C_SCHEME_END_OF_LIST;
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* k21773 in k21760 in chicken.irregex#make-mst in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21775(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_21775,c,av);}
t2=C_i_vector_set(((C_word*)t0)[2],C_fix(0),t1);
t3=C_i_vector_set(((C_word*)t0)[2],C_fix(1),C_fix(0));
t4=C_i_vector_set(((C_word*)t0)[2],C_fix(2),C_fix(0));
t5=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t5;
av2[1]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}

/* chicken.irregex#mst-copy in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_21787(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,0,2)))){
C_save_and_reclaim_args((void *)trf_21787,2,t1,t2);}
a=C_alloc(4);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21791,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2723: vector-copy */
f_7497(t3,t2);}

/* k21789 in chicken.irregex#mst-copy in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21791(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_21791,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21798,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2724: vector-copy */
f_7497(t2,C_i_vector_ref(((C_word*)t0)[3],C_fix(0)));}

/* k21796 in k21789 in chicken.irregex#mst-copy in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21798(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_21798,c,av);}
t2=C_i_vector_set(((C_word*)t0)[2],C_fix(0),t1);
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* chicken.irregex#nfa-state->mst in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_21804(C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_21804,4,t1,t2,t3,t4);}
a=C_alloc(6);
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21808,a[2]=t1,a[3]=t2,a[4]=t3,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:2728: make-mst */
f_21758(t5,t2);}

/* k21806 in chicken.irregex#nfa-state->mst in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21808(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,5)))){
C_save_and_reclaim((void *)f_21808,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21811,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2729: mst-add! */
f_21813(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4],((C_word*)t0)[5]);}

/* k21809 in k21806 in chicken.irregex#nfa-state->mst in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21811(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_21811,c,av);}
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* chicken.irregex#mst-add! in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_21813(C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,2)))){
C_save_and_reclaim_args((void *)trf_21813,5,t1,t2,t3,t4,t5);}
a=C_alloc(10);
t6=C_i_vector_ref(t3,C_fix(2));
t7=t6;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21820,a[2]=t3,a[3]=t4,a[4]=t5,a[5]=t8,a[6]=t2,a[7]=t1,tmp=(C_word)a,a+=8,tmp);
t10=C_fixnum_plus(t4,C_fix(3));
t11=C_i_vector_ref(t3,t10);
if(C_truep(C_i_not(t11))){
t12=C_fixnum_plus(((C_word*)t8)[1],t4);
t13=C_set_block_item(t8,0,t12);
t14=C_i_vector_ref(t3,C_fix(1));
t15=t9;
f_21820(t15,C_i_vector_set(t3,C_fix(1),C_fixnum_plus(t14,C_fix(1))));}
else{
t12=t9;
f_21820(t12,C_SCHEME_UNDEFINED);}}

/* k21818 in chicken.irregex#mst-add! in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_21820(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,0,3)))){
C_save_and_reclaim_args((void *)trf_21820,2,t0,t1);}
a=C_alloc(18);
t2=C_i_vector_set(((C_word*)t0)[2],C_fixnum_plus(((C_word*)t0)[3],C_fix(3)),((C_word*)t0)[4]);
t3=C_i_vector_ref(((C_word*)t0)[2],C_fix(0));
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21827,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=((C_word)li278),tmp=(C_word)a,a+=5,tmp);
t5=C_i_check_list_2(((C_word*)t0)[4],lf[306]);
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21862,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[2],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_21875,a[2]=t4,a[3]=t8,a[4]=((C_word)li279),tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
f_21875(t10,t6,((C_word*)t0)[4]);}

/* g4047 in k21818 in chicken.irregex#mst-add! in k18847 in k7718 in k7493 in k7490 */
static C_word C_fcall f_21827(C_word *a,C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_stack_overflow_check;{}
t2=C_i_car(t1);
t3=C_u_i_cdr(t1);
t4=C_i_vector_ref(((C_word*)t0)[2],t2);
t5=C_i_memq(t3,t4);
if(C_truep(C_i_not(t5))){
t6=C_fixnum_plus(((C_word*)((C_word*)t0)[3])[1],t2);
t7=C_mutate(((C_word *)((C_word*)t0)[3])+1,t6);
t8=C_a_i_cons(&a,2,t3,t4);
return(C_i_vector_set(((C_word*)t0)[2],t2,t8));}
else{
t6=C_SCHEME_UNDEFINED;
return(t6);}}

/* k21860 in k21818 in chicken.irregex#mst-add! in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21862(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,1)))){
C_save_and_reclaim((void *)f_21862,c,av);}
a=C_alloc(10);
t2=C_i_vector_length(((C_word*)t0)[2]);
t3=C_a_i_fixnum_quotient_checked(&a,2,t2,C_fix(4));
t4=C_s_a_i_modulo(&a,2,((C_word*)((C_word*)t0)[3])[1],t3);
t5=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t5;
av2[1]=C_i_vector_set(((C_word*)t0)[5],C_fix(2),t4);
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}

/* for-each-loop4046 in k21818 in chicken.irregex#mst-add! in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_21875(C_word 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;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,2)))){
C_save_and_reclaim_args((void *)trf_21875,3,t0,t1,t2);}
a=C_alloc(3);
if(C_truep(C_i_pairp(t2))){
t3=(
/* irregex-core.scm:2740: g4047 */
  f_21827(C_a_i(&a,3),((C_word*)t0)[2],C_slot(t2,C_fix(0)))
);
t5=t1;
t6=C_slot(t2,C_fix(1));
t1=t5;
t2=t6;
goto loop;}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k21974 in k22868 in g4302 in lp2 in lp in k22810 in k22806 in k22802 in chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_21976(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(17,c,2)))){
C_save_and_reclaim((void *)f_21976,c,av);}
a=C_alloc(17);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=t2;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_21982,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=t4,a[7]=((C_word*)t0)[5],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],tmp=(C_word)a,a+=15,tmp);
t6=C_fixnum_plus(((C_word*)t0)[3],C_fix(3));
t7=C_i_vector_ref(((C_word*)t0)[2],t6);
if(C_truep(C_i_not(t7))){
t8=C_fixnum_plus(((C_word*)t4)[1],((C_word*)t0)[3]);
t9=C_set_block_item(t4,0,t8);
t10=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t11=t5;
f_21982(t11,C_i_vector_set(((C_word*)t0)[2],C_fix(1),C_fixnum_plus(t10,C_fix(1))));}
else{
t8=t5;
f_21982(t8,C_SCHEME_UNDEFINED);}}

/* k21980 in k21974 in k22868 in g4302 in lp2 in lp in k22810 in k22806 in k22802 in chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_21982(C_word t0,C_word t1){
C_word 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;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,0,2)))){
C_save_and_reclaim_args((void *)trf_21982,2,t0,t1);}
a=C_alloc(14);
t2=C_i_vector_set(((C_word*)t0)[2],C_fixnum_plus(((C_word*)t0)[3],C_fix(3)),((C_word*)t0)[4]);
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_21988,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[4],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_i_memq(((C_word*)t0)[11],((C_word*)t0)[12]);
if(C_truep(C_i_not(t4))){
t5=C_fixnum_plus(((C_word*)((C_word*)t0)[6])[1],((C_word*)t0)[13]);
t6=C_mutate(((C_word *)((C_word*)t0)[6])+1,t5);
t7=C_a_i_cons(&a,2,((C_word*)t0)[11],((C_word*)t0)[12]);
t8=t3;
f_21988(t8,C_i_vector_set(((C_word*)t0)[14],((C_word*)t0)[13],t7));}
else{
t5=t3;
f_21988(t5,C_SCHEME_UNDEFINED);}}

/* k21986 in k21980 in k21974 in k22868 in g4302 in lp2 in lp in k22810 in k22806 in k22802 in chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_21988(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(16,0,3)))){
C_save_and_reclaim_args((void *)trf_21988,2,t0,t1);}
a=C_alloc(16);
t2=C_i_vector_length(((C_word*)t0)[2]);
t3=C_a_i_fixnum_quotient_checked(&a,2,t2,C_fix(4));
t4=C_s_a_i_modulo(&a,2,((C_word*)((C_word*)t0)[3])[1],t3);
t5=C_i_vector_set(((C_word*)t0)[4],C_fix(2),t4);
t6=C_i_cdr(((C_word*)t0)[5]);
t7=C_a_i_cons(&a,2,((C_word*)t0)[6],((C_word*)t0)[7]);
t8=C_a_i_cons(&a,2,t7,((C_word*)t0)[8]);
/* irregex-core.scm:3008: lp2 */
t9=((C_word*)((C_word*)t0)[9])[1];
f_22837(t9,((C_word*)t0)[10],t6,t8);}

/* lp in k22868 in g4302 in lp2 in lp in k22810 in k22806 in k22802 in chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22041(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,3)))){
C_save_and_reclaim_args((void *)trf_22041,4,t0,t1,t2,t3);}
a=C_alloc(6);
if(C_truep(C_i_nullp(t2))){
t4=C_a_i_cons(&a,2,((C_word*)t0)[2],((C_word*)t0)[3]);
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=C_a_i_cons(&a,2,t4,t3);
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t4=C_i_caar(t2);
t5=C_eqp(t4,((C_word*)t0)[2]);
if(C_truep(t5)){
t6=C_a_i_cons(&a,2,((C_word*)t0)[2],((C_word*)t0)[3]);
t7=C_u_i_cdr(t2);
t8=C_a_i_cons(&a,2,t6,t7);
/* irregex-core.scm:2771: scheme#append */
t9=*((C_word*)lf[73]+1);{
C_word av2[4];
av2[0]=t9;
av2[1]=t1;
av2[2]=t3;
av2[3]=t8;
((C_proc)(void*)(*((C_word*)t9+1)))(4,av2);}}
else{
t6=C_u_i_cdr(t2);
t7=C_u_i_car(t2);
t8=C_a_i_cons(&a,2,t7,t3);
/* irregex-core.scm:2772: lp */
t10=t1;
t11=t6;
t12=t8;
t1=t10;
t2=t11;
t3=t12;
goto loop;}}}

/* lp in lp in k22361 in lp2 in k22329 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22112(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_22112,3,t0,t1,t2);}
a=C_alloc(5);
t3=C_eqp(t2,((C_word*)t0)[2]);
if(C_truep(t3)){
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=C_i_vector_ref(((C_word*)t0)[3],t2);
t5=C_i_not(t4);
t6=C_i_vector_ref(((C_word*)t0)[4],t2);
t7=C_i_not(t6);
t8=C_eqp(t5,t7);
if(C_truep(t8)){
t9=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:2793: lp */
t11=t1;
t12=t9;
t1=t11;
t2=t12;
goto loop;}
else{
t9=t1;{
C_word av2[2];
av2[0]=t9;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t9+1)))(2,av2);}}}}

/* chicken.irregex#mst-fold in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22165(C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,0,4)))){
C_save_and_reclaim_args((void *)trf_22165,4,t1,t2,t3,t4);}
a=C_alloc(9);
t5=C_i_vector_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|6,a[1]=(C_word)f_22174,a[2]=t5,a[3]=t2,a[4]=t7,a[5]=t3,a[6]=((C_word)li281),tmp=(C_word)a,a+=7,tmp));
t9=((C_word*)t7)[1];
f_22174(t9,t1,C_fix(3),t4);}

/* lp in chicken.irregex#mst-fold in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22174(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,0,4)))){
C_save_and_reclaim_args((void *)trf_22174,4,t0,t1,t2,t3);}
a=C_alloc(15);
t4=C_eqp(t2,((C_word*)t0)[2]);
if(C_truep(t4)){
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t5=C_i_vector_ref(((C_word*)t0)[3],t2);
t6=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_22194,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
if(C_truep(t5)){
t8=C_a_i_fixnum_difference(&a,2,t2,C_fix(3));
/* irregex-core.scm:2802: kons */
t9=((C_word*)t0)[5];{
C_word av2[5];
av2[0]=t9;
av2[1]=t7;
av2[2]=t8;
av2[3]=t5;
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t9+1)))(5,av2);}}
else{
/* irregex-core.scm:2802: lp */
t10=t1;
t11=t6;
t12=t3;
t1=t10;
t2=t11;
t3=t12;
goto loop;}}}

/* k22192 in lp in chicken.irregex#mst-fold in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22194(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_22194,c,av);}
/* irregex-core.scm:2802: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_22174(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* doloop4147 in g4302 in lp2 in lp in k22810 in k22806 in k22802 in chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static C_word C_fcall f_22223(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_stack_overflow_check;
loop:{}
t2=C_i_memq(t1,((C_word*)t0)[2]);
if(C_truep(C_i_not(t2))){
return(t1);}
else{
t4=C_fixnum_plus(t1,C_fix(1));
t1=t4;
goto loop;}}

/* chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22247(C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,0,4)))){
C_save_and_reclaim_args((void *)trf_22247,3,t1,t2,t3);}
a=C_alloc(15);
t4=C_i_pairp(t3);
t5=(C_truep(t4)?C_u_i_car(t3):C_SCHEME_FALSE);
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_22254,a[2]=t2,a[3]=t5,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
t7=C_i_vector_length(t2);
t8=C_a_i_fixnum_quotient_checked(&a,2,t7,C_fix(4));
t9=C_s_a_u_i_integer_minus(&a,2,t8,C_fix(1));
/* irregex-core.scm:2851: nfa-state->mst */
f_21804(t6,t2,t9,C_SCHEME_END_OF_LIST);}

/* k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22254(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,3)))){
C_save_and_reclaim((void *)f_22254,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_22257,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);
/* irregex-core.scm:2852: nfa-epsilon-closure */
f_22932(t2,((C_word*)t0)[2],t1);}

/* k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22257(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,5)))){
C_save_and_reclaim((void *)f_22257,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_22260,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);
/* irregex-core.scm:2855: tag-set-commands-for-closure */
f_22947(t2,((C_word*)t0)[2],((C_word*)t0)[5],t1,C_SCHEME_END_OF_LIST);}

/* k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22260(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,2)))){
C_save_and_reclaim((void *)f_22260,c,av);}
a=C_alloc(7);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_22263,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);
/* irregex-core.scm:2856: make-mst */
f_21758(t2,((C_word*)t0)[3]);}

/* k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22263(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(36,c,5)))){
C_save_and_reclaim((void *)f_22263,c,av);}
a=C_alloc(36);
t2=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,((C_word*)t0)[2]);
t3=C_a_i_cons(&a,2,C_SCHEME_FALSE,t2);
t4=C_a_i_cons(&a,2,((C_word*)t0)[3],t3);
t5=C_a_i_list(&a,1,t4);
t6=C_a_i_list3(&a,3,t1,C_SCHEME_FALSE,t5);
t7=C_a_i_list1(&a,1,((C_word*)t0)[3]);
t8=C_a_i_list1(&a,1,t6);
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_22279,a[2]=t6,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t10,a[6]=((C_word)li295),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
f_22279(t12,((C_word*)t0)[6],t7,t8,C_fix(0));}

/* lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22279(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,0,5)))){
C_save_and_reclaim_args((void *)trf_22279,5,t0,t1,t2,t3,t4);}
a=C_alloc(13);
if(C_truep(C_i_nullp(t2))){
t5=C_u_i_cdr(((C_word*)t0)[2]);
t6=C_i_vector_ref(((C_word*)t0)[3],C_fix(1));
t7=C_fixnum_plus(t6,C_fix(1));
t8=C_i_setslot(t5,C_fix(0),t7);
t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22296,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2867: ##sys#fast-reverse */
t10=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t10;
av2[1]=t9;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t10+1)))(3,av2);}}
else{
t5=(C_truep(((C_word*)t0)[4])?C_fixnum_greaterp(t4,((C_word*)t0)[4]):C_SCHEME_FALSE);
if(C_truep(t5)){
t6=t1;{
C_word av2[2];
av2[0]=t6;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
t6=C_i_car(t2);
if(C_truep(C_i_assoc(t6,t3))){
/* irregex-core.scm:2871: lp */
t11=t1;
t12=C_u_i_cdr(t2);
t13=t3;
t14=t4;
t1=t11;
t2=t12;
t3=t13;
t4=t14;
goto loop;}
else{
t7=C_u_i_car(t2);
t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_22331,a[2]=t2,a[3]=t7,a[4]=t3,a[5]=((C_word*)t0)[5],a[6]=t4,a[7]=((C_word*)t0)[3],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22634,a[2]=((C_word*)t0)[3],a[3]=((C_word)li294),tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2932: mst-fold */
f_22165(t8,t7,t9,C_SCHEME_END_OF_LIST);}}}}

/* k22294 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22296(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,5)))){
C_save_and_reclaim((void *)f_22296,c,av);}
a=C_alloc(10);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22458,a[2]=((C_word*)t0)[2],a[3]=t1,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_22580,a[2]=t4,a[3]=((C_word)li286),tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
f_22580(t6,t2,C_fix(0),t1,C_SCHEME_END_OF_LIST);}

/* k22329 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22331(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,5)))){
C_save_and_reclaim((void *)f_22331,c,av);}
a=C_alloc(11);
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_22335,a[2]=((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)li291),tmp=(C_word)a,a+=9,tmp));
t6=((C_word*)t4)[1];
f_22335(t6,((C_word*)t0)[8],t1,t2,C_SCHEME_END_OF_LIST);}

/* lp2 in k22329 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22335(C_word t0,C_word 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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,4)))){
C_save_and_reclaim_args((void *)trf_22335,5,t0,t1,t2,t3,t4);}
a=C_alloc(12);
if(C_truep(C_i_nullp(t2))){
t5=C_i_vector_ref(((C_word*)t0)[2],C_fix(3));
t6=C_a_i_list3(&a,3,((C_word*)t0)[2],t5,t4);
t7=C_a_i_cons(&a,2,t6,((C_word*)t0)[3]);
/* irregex-core.scm:2879: lp */
t8=((C_word*)((C_word*)t0)[4])[1];
f_22279(t8,t1,t3,t7,C_fixnum_plus(((C_word*)t0)[5],C_fix(1)));}
else{
t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_22363,a[2]=t2,a[3]=t3,a[4]=t4,a[5]=((C_word*)t0)[6],a[6]=t1,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[3],tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:2882: nfa-epsilon-closure */
f_22932(t5,((C_word*)t0)[7],C_i_cdar(t2));}}

/* k22361 in lp2 in k22329 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22363(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(23,c,3)))){
C_save_and_reclaim((void *)f_22363,c,av);}
a=C_alloc(23);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_22366,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=C_i_vector_ref(t1,C_fix(2));
t4=C_fixnum_times(t3,C_fix(4));
t5=C_fixnum_plus(t4,C_fix(2));
t6=C_i_vector_ref(((C_word*)t0)[7],t5);
t7=C_i_assoc(t1,t6);
t8=(C_truep(t7)?C_i_cdr(t7):C_SCHEME_FALSE);
if(C_truep(t8)){
t9=t2;
f_22366(t9,t8);}
else{
t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_23265,a[2]=t1,a[3]=((C_word*)t0)[7],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t10=C_i_vector_ref(((C_word*)t0)[7],C_fix(0));
t11=C_i_vector_ref(t1,C_fix(0));
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_23114,a[2]=t13,a[3]=t10,a[4]=t11,a[5]=t1,a[6]=((C_word)li290),tmp=(C_word)a,a+=7,tmp));
t15=((C_word*)t13)[1];
f_23114(t15,t9,((C_word*)t0)[8]);}}

/* k22364 in k22361 in lp2 in k22329 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22366(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,5)))){
C_save_and_reclaim_args((void *)trf_22366,2,t0,t1);}
a=C_alloc(10);
t2=(C_truep(t1)?C_i_cdr(t1):C_SCHEME_END_OF_LIST);
t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_22372,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t2,a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],tmp=(C_word)a,a+=10,tmp);
/* irregex-core.scm:2888: tag-set-commands-for-closure */
f_22947(t3,((C_word*)t0)[8],C_i_cdar(((C_word*)t0)[3]),((C_word*)t0)[2],t2);}

/* k22370 in k22364 in k22361 in lp2 in k22329 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22372(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,4)))){
C_save_and_reclaim((void *)f_22372,c,av);}
a=C_alloc(15);
t2=(C_truep(((C_word*)t0)[2])?C_i_car(((C_word*)t0)[2]):((C_word*)t0)[3]);
t3=C_u_i_cdr(((C_word*)t0)[4]);
t4=(C_truep(((C_word*)t0)[2])?((C_word*)t0)[5]:C_a_i_cons(&a,2,t2,((C_word*)t0)[5]));
t5=C_i_caar(((C_word*)t0)[4]);
t6=C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
t7=C_a_i_cons(&a,2,t5,t6);
t8=C_a_i_cons(&a,2,t2,t7);
t9=C_a_i_cons(&a,2,t8,((C_word*)t0)[7]);
/* irregex-core.scm:2891: lp2 */
t10=((C_word*)((C_word*)t0)[8])[1];
f_22335(t10,((C_word*)t0)[9],t3,t4,t9);}

/* k22456 in k22294 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22458(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_22458,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_22461,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2909: scheme#make-vector */
t3=*((C_word*)lf[4]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=C_i_length(((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k22459 in k22456 in k22294 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22461(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,4)))){
C_save_and_reclaim((void *)f_22461,c,av);}
a=C_alloc(8);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_22466,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=((C_word)li285),tmp=(C_word)a,a+=6,tmp));
t5=((C_word*)t3)[1];
f_22466(t5,((C_word*)t0)[3],C_fix(0),((C_word*)t0)[4]);}

/* doloop4204 in k22459 in k22456 in k22294 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22466(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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,2)))){
C_save_and_reclaim_args((void *)trf_22466,4,t0,t1,t2,t3);}
a=C_alloc(8);
if(C_truep(C_i_nullp(t3))){
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_22476,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=t1,a[7]=t3,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:2913: scheme#cadar */
t5=*((C_word*)lf[391]+1);{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}}

/* k22474 in doloop4204 in k22459 in k22456 in k22294 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22476(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_22476,c,av);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_22479,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);
/* irregex-core.scm:2914: scheme#caddar */
t3=*((C_word*)lf[400]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[7];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k22477 in k22474 in doloop4204 in k22459 in k22456 in k22294 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22479(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(26,c,3)))){
C_save_and_reclaim((void *)f_22479,c,av);}
a=C_alloc(26);
t2=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t3=t2;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=((C_word*)t4)[1];
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22499,a[2]=((C_word*)t0)[2],a[3]=((C_word)li283),tmp=(C_word)a,a+=4,tmp);
t7=C_i_check_list_2(t1,lf[211]);
t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_22540,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],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);
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_22542,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=t5,a[6]=((C_word)li284),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
f_22542(t12,t8,t1);}

/* g4218 in k22477 in k22474 in doloop4204 in k22459 in k22456 in k22294 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22499(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_22499,3,t0,t1,t2);}
a=C_alloc(5);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_22507,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
if(C_truep(C_i_cadr(t2))){
t4=C_u_i_cdr(t2);
t5=C_u_i_car(t4);
t6=C_i_vector_length(t5);
t7=C_eqp(t6,C_fix(1));
if(C_truep(t7)){
t8=C_i_vector_ref(t5,C_fix(0));
t9=C_i_car(t8);
t10=C_i_vector_ref(t5,C_fix(0));
t11=C_i_char_equalp(t9,C_i_cdr(t10));
t12=t3;
f_22507(t12,(C_truep(t11)?C_i_car(C_i_vector_ref(t5,C_fix(0))):t5));}
else{
t8=t3;
f_22507(t8,(C_truep(C_SCHEME_FALSE)?C_i_car(C_i_vector_ref(t5,C_fix(0))):t5));}}
else{
t4=t3;
f_22507(t4,C_SCHEME_FALSE);}}

/* k22505 in g4218 in k22477 in k22474 in doloop4204 in k22459 in k22456 in k22294 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22507(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,1)))){
C_save_and_reclaim_args((void *)trf_22507,2,t0,t1);}
a=C_alloc(6);
t2=C_i_assoc(C_u_i_car(((C_word*)t0)[2]),((C_word*)t0)[3]);
t3=C_i_cdr(t2);
t4=C_i_cddr(((C_word*)t0)[2]);
t5=C_a_i_cons(&a,2,t3,t4);
t6=((C_word*)t0)[4];{
C_word av2[2];
av2[0]=t6;
av2[1]=C_a_i_cons(&a,2,t1,t5);
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}

/* k22538 in k22477 in k22474 in doloop4204 in k22459 in k22456 in k22294 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22540(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,3)))){
C_save_and_reclaim((void *)f_22540,c,av);}
a=C_alloc(8);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
t3=C_i_vector_set(((C_word*)t0)[3],((C_word*)t0)[4],t2);
t4=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[4],C_fix(1));
t5=((C_word*)((C_word*)t0)[5])[1];
f_22466(t5,((C_word*)t0)[6],t4,C_u_i_cdr(((C_word*)t0)[7]));}

/* map-loop4212 in k22477 in k22474 in doloop4204 in k22459 in k22456 in k22294 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22542(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_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_22542,3,t0,t1,t2);}
a=C_alloc(6);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_22567,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);
/* irregex-core.scm:2918: g4218 */
t4=((C_word*)t0)[4];
f_22499(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[5],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k22565 in map-loop4212 in k22477 in k22474 in doloop4204 in k22459 in k22456 in k22294 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22567(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_22567,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
t3=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=((C_word*)((C_word*)t0)[3])[1];
f_22542(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* lp in k22294 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22580(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,4)))){
C_save_and_reclaim_args((void *)trf_22580,5,t0,t1,t2,t3,t4);}
a=C_alloc(6);
if(C_truep(C_i_nullp(t3))){
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t5=C_fixnum_plus(t2,C_fix(1));
t6=C_i_cdr(t3);
t7=C_i_caar(t3);
t8=C_a_i_cons(&a,2,t7,t2);
t9=C_a_i_cons(&a,2,t8,t4);
/* irregex-core.scm:2907: lp */
t11=t1;
t12=t5;
t13=t6;
t14=t9;
t1=t11;
t2=t12;
t3=t13;
t4=t14;
goto loop;}}

/* k22617 in lp in a22633 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22619(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,5)))){
C_save_and_reclaim((void *)f_22619,c,av);}
a=C_alloc(10);
t2=C_i_vector_length(t1);
t3=C_eqp(t2,C_fix(0));
t4=C_i_not(t3);
t5=(C_truep(t4)?t1:C_SCHEME_FALSE);
if(C_truep(t5)){
t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_22696,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word)li292),tmp=(C_word)a,a+=10,tmp);
/* irregex-core.scm:2939: g4267 */
t7=t6;
f_22696(t7,((C_word*)t0)[9],t5);}
else{
t6=C_u_i_cdr(((C_word*)t0)[2]);
t7=C_u_i_car(((C_word*)t0)[2]);
t8=C_a_i_cons(&a,2,t7,((C_word*)t0)[7]);
/* irregex-core.scm:2974: lp */
t9=((C_word*)((C_word*)t0)[3])[1];
f_22655(t9,((C_word*)t0)[9],t6,((C_word*)t0)[8],((C_word*)t0)[4],t8);}}

/* a22633 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22634(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
if(c!=5) C_bad_argc_2(c,5,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,6)))){
C_save_and_reclaim((void *)f_22634,c,av);}
a=C_alloc(8);
t5=C_eqp(t2,C_fix(0));
t6=(C_truep(t5)?C_SCHEME_END_OF_LIST:C_i_vector_ref(((C_word*)t0)[2],C_fixnum_times(t2,C_fix(4))));
if(C_truep(C_i_nullp(t6))){
t7=t1;{
C_word *av2=av;
av2[0]=t7;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t7+1)))(2,av2);}}
else{
t7=C_i_car(t6);
t8=C_u_i_cdr(t6);
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_22655,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t10,a[5]=((C_word)li293),tmp=(C_word)a,a+=6,tmp));
t12=((C_word*)t10)[1];
f_22655(t12,t1,t4,t7,t8,C_SCHEME_END_OF_LIST);}}

/* lp in a22633 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22655(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,5)))){
C_save_and_reclaim_args((void *)trf_22655,6,t0,t1,t2,t3,t4,t5);}
a=C_alloc(10);
if(C_truep(C_i_nullp(t2))){
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_22673,a[2]=t3,a[3]=t1,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2946: nfa-state->mst */
f_21804(t6,((C_word*)t0)[2],t4,((C_word*)t0)[3]);}
else{
t6=C_i_caar(t2);
if(C_truep(C_i_equalp(t3,t6))){
t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_22682,a[2]=t1,a[3]=t2,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2950: mst-add! */
f_21813(t7,((C_word*)t0)[2],C_i_cdar(t2),t4,((C_word*)t0)[3]);}
else{
t7=C_i_caar(t2);
t8=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_22619,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=t4,a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[3],a[7]=t5,a[8]=t3,a[9]=t1,tmp=(C_word)a,a+=10,tmp);
/* irregex-core.scm:2930: cset-intersection */
t9=lf[404];{
C_word av2[4];
av2[0]=t9;
av2[1]=t8;
av2[2]=t3;
av2[3]=t7;
f_27356(4,av2);}}}}

/* k22671 in lp in a22633 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22673(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,1)))){
C_save_and_reclaim((void *)f_22673,c,av);}
a=C_alloc(6);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_a_i_cons(&a,2,t2,((C_word*)t0)[4]);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* k22680 in lp in a22633 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22682(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_22682,c,av);}
/* irregex-core.scm:2951: scheme#append */
t2=*((C_word*)lf[73]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* g4267 in k22617 in lp in a22633 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22696(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_unlikely(!C_demand(C_calculate_demand(11,0,3)))){
C_save_and_reclaim_args((void *)trf_22696,3,t0,t1,t2);}
a=C_alloc(11);
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_22700,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)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:2954: cset-difference */
f_27160(t3,((C_word*)t0)[8],C_i_caar(((C_word*)t0)[2]));}

/* k22698 in g4267 in k22617 in lp in a22633 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22700(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,3)))){
C_save_and_reclaim((void *)f_22700,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_22703,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);
/* irregex-core.scm:2955: cset-difference */
f_27160(t2,C_i_caar(((C_word*)t0)[2]),((C_word*)t0)[10]);}

/* k22701 in k22698 in g4267 in k22617 in lp in a22633 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22703(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,2)))){
C_save_and_reclaim((void *)f_22703,c,av);}
a=C_alloc(13);
t2=C_i_cdar(((C_word*)t0)[2]);
t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_22709,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)[2],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]=t1,a[12]=((C_word*)t0)[10],tmp=(C_word)a,a+=13,tmp);
t4=C_i_vector_length(t1);
t5=C_eqp(t4,C_fix(0));
if(C_truep(C_i_not(t5))){
/* irregex-core.scm:2959: mst-copy */
f_21787(t3,t2);}
else{
t6=t3;{
C_word *av2=av;
av2[0]=t6;
av2[1]=C_SCHEME_FALSE;
f_22709(2,av2);}}}

/* k22707 in k22701 in k22698 in g4267 in k22617 in lp in a22633 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22709(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(17,c,2)))){
C_save_and_reclaim((void *)f_22709,c,av);}
a=C_alloc(17);
t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_22712,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],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);
if(C_truep(t1)){
t3=C_a_i_cons(&a,2,((C_word*)t0)[11],t1);
t4=t2;
f_22712(t4,C_a_i_cons(&a,2,t3,((C_word*)t0)[12]));}
else{
t3=t2;
f_22712(t3,((C_word*)t0)[12]);}}

/* k22710 in k22707 in k22701 in k22698 in g4267 in k22617 in lp in a22633 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22712(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,5)))){
C_save_and_reclaim_args((void *)trf_22712,2,t0,t1);}
a=C_alloc(10);
t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_22715,a[2]=((C_word*)t0)[2],a[3]=((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);
/* irregex-core.scm:2963: mst-add! */
f_21813(t2,((C_word*)t0)[9],((C_word*)t0)[4],((C_word*)t0)[8],((C_word*)t0)[10]);}

/* k22713 in k22710 in k22707 in k22701 in k22698 in g4267 in k22617 in lp in a22633 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22715(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,5)))){
C_save_and_reclaim((void *)f_22715,c,av);}
a=C_alloc(7);
t2=C_i_vector_length(((C_word*)t0)[2]);
t3=C_eqp(t2,C_fix(0));
if(C_truep(t3)){
t4=C_a_i_cons(&a,2,((C_word*)t0)[3],((C_word*)t0)[4]);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22732,a[2]=((C_word*)t0)[5],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2970: scheme#append */
t6=*((C_word*)lf[73]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t6;
av2[1]=t5;
av2[2]=C_u_i_cdr(((C_word*)t0)[6]);
av2[3]=((C_word*)t0)[7];
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}
else{
t4=C_u_i_cdr(((C_word*)t0)[6]);
t5=C_a_i_cons(&a,2,((C_word*)t0)[3],((C_word*)t0)[4]);
t6=C_a_i_cons(&a,2,t5,((C_word*)t0)[7]);
/* irregex-core.scm:2971: lp */
t7=((C_word*)((C_word*)t0)[8])[1];
f_22655(t7,((C_word*)t0)[5],t4,((C_word*)t0)[2],((C_word*)t0)[9],t6);}}

/* k22730 in k22713 in k22710 in k22707 in k22701 in k22698 in g4267 in k22617 in lp in a22633 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22732(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_22732,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k22802 in chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22804(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,3)))){
C_save_and_reclaim((void *)f_22804,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_22808,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);
t3=C_i_vector_length(((C_word*)t0)[2]);
t4=C_a_i_fixnum_quotient_checked(&a,2,t3,C_fix(4));
/* irregex-core.scm:2985: scheme#make-vector */
t5=*((C_word*)lf[4]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t5;
av2[1]=t2;
av2[2]=t4;
av2[3]=C_fix(0);
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}

/* k22806 in k22802 in chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22808(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_22808,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_22812,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);
/* irregex-core.scm:2986: mst-copy */
f_21787(t2,((C_word*)t0)[5]);}

/* k22810 in k22806 in k22802 in chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22812(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,5)))){
C_save_and_reclaim((void *)f_22812,c,av);}
a=C_alloc(7);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_22814,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word)li301),tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
f_22814(t5,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* lp in k22810 in k22806 in k22802 in chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22814(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,4)))){
C_save_and_reclaim_args((void *)trf_22814,5,t0,t1,t2,t3,t4);}
a=C_alloc(12);
if(C_truep(C_i_nullp(t2))){
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t5=C_i_caar(t2);
t6=C_u_i_car(t2);
t7=C_u_i_cdr(t6);
t8=(
/* irregex-core.scm:2991: nfa-get-epsilons */
  f_20464(((C_word*)t0)[2],t5)
);
t9=C_u_i_cdr(t2);
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|9,a[1]=(C_word)f_22837,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t4,a[5]=t5,a[6]=((C_word*)t0)[2],a[7]=t11,a[8]=t7,a[9]=((C_word)li300),tmp=(C_word)a,a+=10,tmp));
t13=((C_word*)t11)[1];
f_22837(t13,t1,t8,t9);}}

/* lp2 in lp in k22810 in k22806 in k22802 in chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22837(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,0,4)))){
C_save_and_reclaim_args((void *)trf_22837,4,t0,t1,t2,t3);}
a=C_alloc(18);
if(C_truep(C_i_nullp(t2))){
/* irregex-core.scm:2994: lp */
t4=((C_word*)((C_word*)t0)[2])[1];
f_22814(t4,t1,t3,((C_word*)t0)[3],((C_word*)t0)[4]);}
else{
t4=C_i_caar(t2);
t5=C_i_vector_ref(((C_word*)t0)[3],t4);
if(C_truep(C_fixnum_greaterp(((C_word*)t0)[5],t5))){
t6=C_i_vector_set(((C_word*)t0)[3],t4,((C_word*)t0)[5]);
t7=C_i_cdar(t2);
if(C_truep(t7)){
t8=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_22866,a[2]=((C_word*)t0)[4],a[3]=t4,a[4]=((C_word*)t0)[6],a[5]=t2,a[6]=t3,a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word)li299),tmp=(C_word)a,a+=10,tmp);
/* irregex-core.scm:3001: g4302 */
t9=t8;
f_22866(t9,t1,t7);}
else{
t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_22894,a[2]=t2,a[3]=t4,a[4]=((C_word*)t0)[8],a[5]=t3,a[6]=((C_word*)t0)[7],a[7]=t1,tmp=(C_word)a,a+=8,tmp);
t9=C_fixnum_plus(t4,C_fix(3));
t10=C_i_vector_ref(((C_word*)t0)[4],t9);
if(C_truep(C_i_not(t10))){
t11=C_i_vector_ref(((C_word*)t0)[4],C_fix(2));
t12=C_fixnum_plus(t11,t4);
t13=C_i_vector_length(((C_word*)t0)[6]);
t14=C_a_i_fixnum_quotient_checked(&a,2,t13,C_fix(4));
t15=C_s_a_i_modulo(&a,2,t12,t14);
t16=C_i_vector_set(((C_word*)t0)[4],C_fix(2),t15);
t17=C_i_vector_ref(((C_word*)t0)[4],C_fix(1));
t18=C_fixnum_plus(t17,C_fix(1));
t19=C_i_vector_set(((C_word*)t0)[4],C_fix(1),t18);
t20=t8;
f_22894(t20,C_i_vector_set(((C_word*)t0)[4],C_fixnum_plus(t4,C_fix(3)),((C_word*)t0)[8]));}
else{
t11=t8;
f_22894(t11,C_i_vector_set(((C_word*)t0)[4],C_fixnum_plus(t4,C_fix(3)),((C_word*)t0)[8]));}}}
else{
/* irregex-core.scm:3013: lp2 */
t21=t1;
t22=C_u_i_cdr(t2);
t23=t3;
t1=t21;
t2=t22;
t3=t23;
goto loop;}}}

/* g4302 in lp2 in lp in k22810 in k22806 in k22802 in chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22866(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,0,2)))){
C_save_and_reclaim_args((void *)trf_22866,3,t0,t1,t2);}
a=C_alloc(15);
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_22870,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]=t1,a[10]=((C_word*)t0)[8],tmp=(C_word)a,a+=11,tmp);
t4=C_i_vector_ref(((C_word*)t0)[4],C_fix(1));
t5=C_i_vector_ref(((C_word*)t0)[2],C_fix(0));
t6=C_i_vector_ref(t5,t2);
t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22223,a[2]=t6,a[3]=((C_word)li298),tmp=(C_word)a,a+=4,tmp);
t8=(
  f_22223(t7,C_fix(0))
);
if(C_truep(C_fixnum_greaterp(t8,t4))){
t9=C_i_vector_set(((C_word*)t0)[4],C_fix(1),t8);
t10=t3;
f_22870(t10,t8);}
else{
t9=t3;
f_22870(t9,t8);}}

/* k22868 in g4302 in lp2 in lp in k22810 in k22806 in k22802 in chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22870(C_word t0,C_word t1){
C_word 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;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(21,0,4)))){
C_save_and_reclaim_args((void *)trf_22870,2,t0,t1);}
a=C_alloc(21);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(0));
t3=C_i_vector_ref(t2,((C_word*)t0)[3]);
t4=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_21976,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],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[9],a[9]=t1,a[10]=t3,a[11]=((C_word*)t0)[3],a[12]=t2,tmp=(C_word)a,a+=13,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_22041,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t6,a[5]=((C_word)li297),tmp=(C_word)a,a+=6,tmp));
t8=((C_word*)t6)[1];
f_22041(t8,t4,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);}

/* k22892 in lp2 in lp in k22810 in k22806 in k22802 in chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22894(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,3)))){
C_save_and_reclaim_args((void *)trf_22894,2,t0,t1);}
a=C_alloc(6);
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=C_a_i_cons(&a,2,((C_word*)t0)[3],((C_word*)t0)[4]);
t4=C_a_i_cons(&a,2,t3,((C_word*)t0)[5]);
/* irregex-core.scm:3012: lp2 */
t5=((C_word*)((C_word*)t0)[6])[1];
f_22837(t5,((C_word*)t0)[7],t2,t4);}

/* a22921 in chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22922(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5;
C_word t6;
C_word *a;
if(c!=5) C_bad_argc_2(c,5,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,1)))){
C_save_and_reclaim((void *)f_22922,c,av);}
a=C_alloc(6);
t5=C_a_i_cons(&a,2,t2,t3);
t6=t1;{
C_word *av2=av;
av2[0]=t6;
av2[1]=C_a_i_cons(&a,2,t5,t4);
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}

/* chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22932(C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,0,5)))){
C_save_and_reclaim_args((void *)trf_22932,3,t1,t2,t3);}
a=C_alloc(13);
t4=C_i_vector_ref(t3,C_fix(2));
t5=C_fixnum_times(t4,C_fix(4));
t6=C_fixnum_plus(t5,C_fix(3));
t7=C_i_vector_ref(t2,t6);
t8=C_i_assoc(t3,t7);
t9=(C_truep(t8)?C_i_cdr(t8):C_SCHEME_FALSE);
if(C_truep(t9)){
t10=t1;{
C_word av2[2];
av2[0]=t10;
av2[1]=t9;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}
else{
t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_22942,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_22804,a[2]=t2,a[3]=t10,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22922,a[2]=((C_word)li302),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2981: mst-fold */
f_22165(t11,t3,t12,C_SCHEME_END_OF_LIST);}}

/* k22940 in chicken.irregex#nfa-epsilon-closure in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_22942(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,1)))){
C_save_and_reclaim((void *)f_22942,c,av);}
a=C_alloc(6);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=C_fixnum_times(t2,C_fix(4));
t4=C_fixnum_plus(t3,C_fix(3));
t5=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
t6=C_i_vector_ref(((C_word*)t0)[3],t4);
t7=C_a_i_cons(&a,2,t5,t6);
t8=C_i_vector_set(((C_word*)t0)[3],t4,t7);
t9=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t9;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t9+1)))(2,av2);}}

/* chicken.irregex#tag-set-commands-for-closure in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22947(C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,4)))){
C_save_and_reclaim_args((void *)trf_22947,5,t1,t2,t3,t4,t5);}
a=C_alloc(10);
t6=C_i_vector_ref(t2,C_fix(0));
t7=C_i_vector_ref(t4,C_fix(0));
t8=C_i_vector_ref(t3,C_fix(0));
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_22962,a[2]=t6,a[3]=t7,a[4]=t8,a[5]=t10,a[6]=t5,a[7]=((C_word)li307),tmp=(C_word)a,a+=8,tmp));
t12=((C_word*)t10)[1];
f_22962(t12,t1,C_fix(0),C_SCHEME_END_OF_LIST);}

/* lp in chicken.irregex#tag-set-commands-for-closure in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22962(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,0,5)))){
C_save_and_reclaim_args((void *)trf_22962,4,t0,t1,t2,t3);}
a=C_alloc(9);
t4=C_eqp(t2,((C_word*)t0)[2]);
if(C_truep(t4)){
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t5=C_i_vector_ref(((C_word*)t0)[3],t2);
t6=C_i_vector_ref(((C_word*)t0)[4],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_22982,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=t8,a[5]=((C_word*)t0)[6],a[6]=((C_word)li306),tmp=(C_word)a,a+=7,tmp));
t10=((C_word*)t8)[1];
f_22982(t10,t1,t5,t6,t3);}}

/* lp2 in lp in chicken.irregex#tag-set-commands-for-closure in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_22982(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(19,0,3)))){
C_save_and_reclaim_args((void *)trf_22982,5,t0,t1,t2,t3,t4);}
a=C_alloc(19);
if(C_truep(C_i_nullp(t2))){
/* irregex-core.scm:3033: lp */
t5=((C_word*)((C_word*)t0)[2])[1];
f_22962(t5,t1,C_fixnum_plus(((C_word*)t0)[3],C_fix(1)),t4);}
else{
t5=C_i_car(t2);
t6=C_i_memq(t5,t3);
t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_23005,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t2,a[5]=t3,a[6]=t4,a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
if(C_truep(t6)){
t8=t7;
f_23005(t8,t6);}
else{
t8=C_i_nullp(((C_word*)t0)[5]);
if(C_truep(C_i_not(t8))){
t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_23037,a[2]=t7,a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_23070,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li305),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3040: any */
f_9225(t9,t10,((C_word*)t0)[5]);}
else{
t9=t7;
f_23005(t9,C_SCHEME_FALSE);}}}}

/* k23003 in lp2 in lp in chicken.irregex#tag-set-commands-for-closure in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_23005(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,4)))){
C_save_and_reclaim_args((void *)trf_23005,2,t0,t1);}
a=C_alloc(6);
if(C_truep(t1)){
/* irregex-core.scm:3050: lp2 */
t2=((C_word*)((C_word*)t0)[2])[1];
f_22982(t2,((C_word*)t0)[3],C_u_i_cdr(((C_word*)t0)[4]),((C_word*)t0)[5],((C_word*)t0)[6]);}
else{
t2=C_u_i_cdr(((C_word*)t0)[4]);
t3=C_u_i_car(((C_word*)t0)[4]);
t4=C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
t5=C_a_i_cons(&a,2,t4,((C_word*)t0)[6]);
/* irregex-core.scm:3051: lp2 */
t6=((C_word*)((C_word*)t0)[2])[1];
f_22982(t6,((C_word*)t0)[3],t2,((C_word*)t0)[5],t5);}}

/* k23035 in lp2 in lp in chicken.irregex#tag-set-commands-for-closure in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_23037(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,3)))){
C_save_and_reclaim((void *)f_23037,c,av);}
a=C_alloc(8);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_23044,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_23046,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li304),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3046: any */
f_9225(t2,t3,((C_word*)t0)[5]);}
else{
t2=((C_word*)t0)[2];
f_23005(t2,C_SCHEME_FALSE);}}

/* k23042 in k23035 in lp2 in lp in chicken.irregex#tag-set-commands-for-closure in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_23044(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_23044,c,av);}
t2=((C_word*)t0)[2];
f_23005(t2,C_i_not(t1));}

/* a23045 in k23035 in lp2 in lp in chicken.irregex#tag-set-commands-for-closure in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_23046(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_23046,c,av);}
t3=C_i_vector_ref(t2,C_fix(0));
t4=C_eqp(t3,((C_word*)t0)[2]);
t5=t1;{
C_word *av2=av;
av2[0]=t5;
av2[1]=(C_truep(t4)?C_eqp(C_i_vector_ref(t2,C_fix(1)),C_i_car(((C_word*)t0)[3])):C_SCHEME_FALSE);
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}

/* a23069 in lp2 in lp in chicken.irregex#tag-set-commands-for-closure in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_23070(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_23070,c,av);}
t3=C_i_vector_ref(t2,C_fix(0));
t4=C_eqp(t3,((C_word*)t0)[2]);
t5=t1;{
C_word *av2=av;
av2[0]=t5;
av2[1]=(C_truep(t4)?C_eqp(C_i_vector_ref(t2,C_fix(2)),C_i_car(((C_word*)t0)[3])):C_SCHEME_FALSE);
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}

/* lp in k22361 in lp2 in k22329 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_23114(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(19,0,3)))){
C_save_and_reclaim_args((void *)trf_23114,3,t0,t1,t2);}
a=C_alloc(19);
if(C_truep(C_i_nullp(t2))){
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_23127,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_23249,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
t5=C_i_caar(t2);
t6=C_i_vector_ref(t5,C_fix(2));
t7=C_i_vector_ref(((C_word*)t0)[5],C_fix(2));
t8=C_eqp(t6,t7);
if(C_truep(t8)){
t9=C_i_vector_ref(t5,C_fix(1));
t10=C_i_vector_ref(((C_word*)t0)[5],C_fix(1));
t11=C_eqp(t9,t10);
if(C_truep(t11)){
t12=C_i_vector_length(t5);
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_22112,a[2]=t12,a[3]=t5,a[4]=((C_word*)t0)[5],a[5]=t14,a[6]=((C_word)li289),tmp=(C_word)a,a+=7,tmp));
t16=((C_word*)t14)[1];
f_22112(t16,t4,C_fix(3));}
else{
t12=t3;
f_23127(t12,C_SCHEME_TRUE);}}
else{
t9=t3;
f_23127(t9,C_SCHEME_TRUE);}}}

/* k23125 in lp in k22361 in lp2 in k22329 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_23127(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,5)))){
C_save_and_reclaim_args((void *)trf_23127,2,t0,t1);}
a=C_alloc(10);
if(C_truep(t1)){
/* irregex-core.scm:3068: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_23114(t2,((C_word*)t0)[3],C_u_i_cdr(((C_word*)t0)[4]));}
else{
t2=C_i_caar(((C_word*)t0)[4]);
t3=C_i_vector_ref(t2,C_fix(0));
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_23141,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[6],a[5]=t5,a[6]=((C_word*)t0)[2],a[7]=((C_word)li288),tmp=(C_word)a,a+=8,tmp));
t7=((C_word*)t5)[1];
f_23141(t7,((C_word*)t0)[3],t3,C_fix(0),C_SCHEME_END_OF_LIST);}}

/* lp2 in k23125 in lp in k22361 in lp2 in k22329 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_23141(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,0,5)))){
C_save_and_reclaim_args((void *)trf_23141,5,t0,t1,t2,t3,t4);}
a=C_alloc(11);
t5=C_eqp(t3,((C_word*)t0)[2]);
if(C_truep(t5)){
t6=C_i_caar(((C_word*)t0)[3]);
t7=t1;{
C_word av2[2];
av2[0]=t7;
av2[1]=C_a_i_cons(&a,2,t6,t4);
((C_proc)(void*)(*((C_word*)t7+1)))(2,av2);}}
else{
t6=C_i_vector_ref(((C_word*)t0)[4],t3);
t7=C_i_vector_ref(t2,t3);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_23168,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=t3,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[3],a[7]=t9,a[8]=((C_word)li287),tmp=(C_word)a,a+=9,tmp));
t11=((C_word*)t9)[1];
f_23168(t11,t1,t6,t7,t4);}}

/* lp3 in lp2 in k23125 in lp in k22361 in lp2 in k22329 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_23168(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,4)))){
C_save_and_reclaim_args((void *)trf_23168,5,t0,t1,t2,t3,t4);}
a=C_alloc(7);
if(C_truep(C_i_nullp(t2))){
if(C_truep(C_i_nullp(t3))){
/* irregex-core.scm:3078: lp2 */
t5=((C_word*)((C_word*)t0)[2])[1];
f_23141(t5,t1,((C_word*)t0)[3],C_fixnum_plus(((C_word*)t0)[4],C_fix(1)),t4);}
else{
/* irregex-core.scm:3079: lp */
t5=((C_word*)((C_word*)t0)[5])[1];
f_23114(t5,t1,C_i_cdr(((C_word*)t0)[6]));}}
else{
if(C_truep(C_i_nullp(t3))){
/* irregex-core.scm:3080: lp */
t5=((C_word*)((C_word*)t0)[5])[1];
f_23114(t5,t1,C_i_cdr(((C_word*)t0)[6]));}
else{
t5=C_i_cdr(t2);
t6=C_i_cdr(t3);
t7=C_u_i_car(t2);
t8=C_u_i_car(t3);
t9=C_eqp(t7,t8);
if(C_truep(t9)){
/* irregex-core.scm:3081: lp3 */
t15=t1;
t16=t5;
t17=t6;
t18=t4;
t1=t15;
t2=t16;
t3=t17;
t4=t18;
goto loop;}
else{
t10=C_u_i_car(t2);
t11=C_u_i_car(t3);
t12=C_a_i_vector3(&a,3,((C_word*)t0)[4],t10,t11);
t13=C_a_i_cons(&a,2,t12,t4);
/* irregex-core.scm:3081: lp3 */
t15=t1;
t16=t5;
t17=t6;
t18=t13;
t1=t15;
t2=t16;
t3=t17;
t4=t18;
goto loop;}}}}

/* k23247 in lp in k22361 in lp2 in k22329 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_23249(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_23249,c,av);}
t2=((C_word*)t0)[2];
f_23127(t2,C_i_not(t1));}

/* k23263 in k22361 in lp2 in k22329 in lp in k22261 in k22258 in k22255 in k22252 in chicken.irregex#nfa->dfa in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_23265(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,1)))){
C_save_and_reclaim((void *)f_23265,c,av);}
a=C_alloc(6);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=C_fixnum_times(t2,C_fix(4));
t4=C_fixnum_plus(t3,C_fix(2));
t5=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
t6=C_i_vector_ref(((C_word*)t0)[3],t4);
t7=C_a_i_cons(&a,2,t5,t6);
t8=C_i_vector_set(((C_word*)t0)[3],t4,t7);
t9=((C_word*)t0)[4];
f_22366(t9,t1);}

/* k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_23275(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,10)))){
C_save_and_reclaim((void *)f_23275,c,av);}
a=C_alloc(10);
t2=C_mutate(((C_word *)((C_word*)t0)[2])+1,t1);
t3=C_i_pairp(((C_word*)t0)[3]);
t4=(C_truep(t3)?C_u_i_car(((C_word*)t0)[3]):C_fix(0));
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_23284,a[2]=((C_word)li118),tmp=(C_word)a,a+=3,tmp);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_23324,a[2]=t7,a[3]=((C_word*)t0)[2],a[4]=((C_word)li185),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
f_23324(t9,((C_word*)t0)[4],((C_word*)t0)[5],C_fix(1),t4,t5);}

/* a23283 in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_23284(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_23284,c,av);}
t10=C_slot(t8,C_fix(1));
t11=C_i_car(t3);
t12=C_i_vector_set(t10,C_fix(0),t11);
t13=C_slot(t8,C_fix(1));
t14=C_i_vector_set(t13,C_fix(1),C_u_i_cdr(t3));
t15=C_slot(t8,C_fix(1));
t16=C_i_vector_set(t15,C_fix(2),t4);
t17=C_slot(t8,C_fix(1));
t18=C_i_vector_set(t17,C_fix(3),t6);
t19=C_i_setslot(t8,C_fix(4),t9);
t20=t1;{
C_word *av2=av;
av2[0]=t20;
av2[1]=t8;
((C_proc)(void*)(*((C_word*)t20+1)))(2,av2);}}

/* lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_23324(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,0,10)))){
C_save_and_reclaim_args((void *)trf_23324,6,t0,t1,t2,t3,t4,t5);}
a=C_alloc(18);
t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_23327,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t4,a[5]=t5,a[6]=((C_word)li119),tmp=(C_word)a,a+=7,tmp);
if(C_truep(C_i_pairp(t2))){
if(C_truep(C_i_stringp(C_u_i_car(t2)))){
t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_23350,a[2]=t1,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
t8=C_u_i_car(t2);
t9=C_fixnum_and(t4,C_fix(2));
t10=C_eqp(C_fix(2),t9);
/* irregex-core.scm:3121: sre->cset */
f_26377(t7,t8,C_a_i_list(&a,1,t10));}
else{
t7=C_u_i_car(t2);
t8=C_eqp(t7,lf[179]);
t9=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_23366,a[2]=t1,a[3]=t5,a[4]=t4,a[5]=t2,a[6]=t7,a[7]=t6,a[8]=((C_word*)t0)[2],a[9]=t3,a[10]=((C_word*)t0)[3],tmp=(C_word)a,a+=11,tmp);
if(C_truep(t8)){
t10=t9;
f_23366(t10,t8);}
else{
t10=C_eqp(t7,lf[247]);
if(C_truep(t10)){
t11=t9;
f_23366(t11,t10);}
else{
t11=C_eqp(t7,lf[234]);
t12=t9;
f_23366(t12,(C_truep(t11)?t11:C_eqp(t7,lf[52])));}}}}
else{
if(C_truep(C_i_symbolp(t2))){
t7=C_eqp(t2,lf[124]);
if(C_truep(t7)){
t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25159,a[2]=t5,a[3]=((C_word)li172),tmp=(C_word)a,a+=4,tmp);
t9=t1;{
C_word av2[2];
av2[0]=t9;
av2[1]=t8;
((C_proc)(void*)(*((C_word*)t9+1)))(2,av2);}}
else{
t8=C_eqp(t2,lf[125]);
if(C_truep(t8)){
t9=t1;{
C_word av2[2];
av2[0]=t9;
av2[1]=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25217,a[2]=t5,a[3]=((C_word)li173),tmp=(C_word)a,a+=4,tmp);
((C_proc)(void*)(*((C_word*)t9+1)))(2,av2);}}
else{
t9=C_eqp(t2,lf[186]);
if(C_truep(t9)){
t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25309,a[2]=t5,a[3]=((C_word)li174),tmp=(C_word)a,a+=4,tmp);
t11=t1;{
C_word av2[2];
av2[0]=t11;
av2[1]=t10;
((C_proc)(void*)(*((C_word*)t11+1)))(2,av2);}}
else{
t10=C_eqp(t2,lf[195]);
if(C_truep(t10)){
t11=t1;{
C_word av2[2];
av2[0]=t11;
av2[1]=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25339,a[2]=t5,a[3]=((C_word)li175),tmp=(C_word)a,a+=4,tmp);
((C_proc)(void*)(*((C_word*)t11+1)))(2,av2);}}
else{
t11=C_eqp(t2,lf[183]);
if(C_truep(t11)){
t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25397,a[2]=t5,a[3]=((C_word)li176),tmp=(C_word)a,a+=4,tmp);
t13=t1;{
C_word av2[2];
av2[0]=t13;
av2[1]=t12;
((C_proc)(void*)(*((C_word*)t13+1)))(2,av2);}}
else{
t12=C_eqp(t2,lf[187]);
if(C_truep(t12)){
t13=t1;{
C_word av2[2];
av2[0]=t13;
av2[1]=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25504,a[2]=t5,a[3]=((C_word)li177),tmp=(C_word)a,a+=4,tmp);
((C_proc)(void*)(*((C_word*)t13+1)))(2,av2);}}
else{
t13=C_eqp(t2,lf[196]);
if(C_truep(t13)){
t14=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25537,a[2]=t5,a[3]=((C_word)li178),tmp=(C_word)a,a+=4,tmp);
t15=t1;{
C_word av2[2];
av2[0]=t15;
av2[1]=t14;
((C_proc)(void*)(*((C_word*)t15+1)))(2,av2);}}
else{
t14=C_eqp(t2,lf[184]);
if(C_truep(t14)){
t15=t1;{
C_word av2[2];
av2[0]=t15;
av2[1]=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25602,a[2]=t5,a[3]=((C_word)li179),tmp=(C_word)a,a+=4,tmp);
((C_proc)(void*)(*((C_word*)t15+1)))(2,av2);}}
else{
t15=C_eqp(t2,lf[185]);
if(C_truep(t15)){
t16=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25691,a[2]=t5,a[3]=((C_word)li180),tmp=(C_word)a,a+=4,tmp);
t17=t1;{
C_word av2[2];
av2[0]=t17;
av2[1]=t16;
((C_proc)(void*)(*((C_word*)t17+1)))(2,av2);}}
else{
t16=C_eqp(t2,lf[110]);
if(C_truep(t16)){
t17=t1;{
C_word av2[2];
av2[0]=t17;
av2[1]=t5;
((C_proc)(void*)(*((C_word*)t17+1)))(2,av2);}}
else{
t17=C_i_assq(t2,lf[248]);
if(C_truep(t17)){
/* irregex-core.scm:3561: rec */
t18=t6;
f_23327(t18,t1,C_i_cdr(t17));}
else{
/* irregex-core.scm:3562: chicken.base#error */
t18=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t18;
av2[1]=t1;
av2[2]=lf[249];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t18+1)))(4,av2);}}}}}}}}}}}}}
else{
if(C_truep(C_charp(t2))){
t7=C_fixnum_and(t4,C_fix(2));
t8=C_eqp(C_fix(2),t7);
t9=t1;{
C_word av2[2];
av2[0]=t9;
av2[1]=(C_truep(t8)?(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_25813,a[2]=t5,a[3]=t2,a[4]=((C_word)li182),tmp=(C_word)a,a+=5,tmp):(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_25912,a[2]=t2,a[3]=t5,a[4]=((C_word)li184),tmp=(C_word)a,a+=5,tmp));
((C_proc)(void*)(*((C_word*)t9+1)))(2,av2);}}
else{
if(C_truep(C_i_stringp(t2))){
t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_26027,a[2]=t6,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* ##sys#string->list */
t8=*((C_word*)lf[105]+1);{
C_word av2[3];
av2[0]=t8;
av2[1]=t7;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t8+1)))(3,av2);}}
else{
/* irregex-core.scm:3615: chicken.base#error */
t7=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t7;
av2[1]=t1;
av2[2]=lf[251];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}}}}}

/* rec in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_23327(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,5)))){
C_save_and_reclaim_args((void *)trf_23327,3,t0,t1,t2);}
/* irregex-core.scm:3116: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_23324(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5]);}

/* k23348 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_23350(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_23350,c,av);}
/* irregex-core.scm:3120: sre-cset->procedure */
f_26053(((C_word*)t0)[2],t1,((C_word*)t0)[3]);}

/* k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_23366(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word t26;
C_word t27;
C_word t28;
C_word t29;
C_word t30;
C_word t31;
C_word t32;
C_word t33;
C_word t34;
C_word t35;
C_word t36;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(39,0,10)))){
C_save_and_reclaim_args((void *)trf_23366,2,t0,t1);}
a=C_alloc(39);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_23373,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t3=C_fixnum_and(((C_word*)t0)[4],C_fix(2));
t4=C_eqp(C_fix(2),t3);
/* irregex-core.scm:3126: sre->cset */
f_26377(t2,((C_word*)t0)[5],C_a_i_list(&a,1,t4));}
else{
t2=C_eqp(((C_word*)t0)[6],lf[103]);
if(C_truep(t2)){
t3=C_i_length(C_u_i_cdr(((C_word*)t0)[5]));
switch(t3){
case C_fix(0):
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_23393,a[2]=((C_word)li120),tmp=(C_word)a,a+=3,tmp);
t5=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t5;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}
case C_fix(1):
/* irregex-core.scm:3131: rec */
t4=((C_word*)t0)[7];
f_23327(t4,((C_word*)t0)[2],C_i_cadr(((C_word*)t0)[5]));
default:
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_23413,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3133: rec */
t5=((C_word*)t0)[7];
f_23327(t5,t4,C_i_cadr(((C_word*)t0)[5]));}}
else{
t3=C_eqp(((C_word*)t0)[6],lf[225]);
if(C_truep(t3)){
t4=(
/* irregex-core.scm:3143: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
t5=C_fixnum_not(C_fix(2));
/* irregex-core.scm:3143: lp */
t6=((C_word*)((C_word*)t0)[8])[1];
f_23324(t6,((C_word*)t0)[2],t4,((C_word*)t0)[9],C_fixnum_and(((C_word*)t0)[4],t5),((C_word*)t0)[3]);}
else{
t4=C_eqp(((C_word*)t0)[6],lf[226]);
if(C_truep(t4)){
t5=(
/* irregex-core.scm:3148: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
/* irregex-core.scm:3148: lp */
t6=((C_word*)((C_word*)t0)[8])[1];
f_23324(t6,((C_word*)t0)[2],t5,((C_word*)t0)[9],C_fixnum_or(((C_word*)t0)[4],C_fix(2)),((C_word*)t0)[3]);}
else{
t5=C_eqp(((C_word*)t0)[6],lf[156]);
if(C_truep(t5)){
t6=(
/* irregex-core.scm:3153: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
/* irregex-core.scm:3153: lp */
t7=((C_word*)((C_word*)t0)[8])[1];
f_23324(t7,((C_word*)t0)[2],t6,((C_word*)t0)[9],C_fixnum_or(((C_word*)t0)[4],C_fix(32)),((C_word*)t0)[3]);}
else{
t6=C_eqp(((C_word*)t0)[6],lf[157]);
if(C_truep(t6)){
t7=(
/* irregex-core.scm:3155: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
t8=C_fixnum_not(C_fix(32));
/* irregex-core.scm:3155: lp */
t9=((C_word*)((C_word*)t0)[8])[1];
f_23324(t9,((C_word*)t0)[2],t7,((C_word*)t0)[9],C_fixnum_and(((C_word*)t0)[4],t8),((C_word*)t0)[3]);}
else{
t7=C_eqp(((C_word*)t0)[6],lf[115]);
t8=(C_truep(t7)?t7:C_eqp(((C_word*)t0)[6],lf[227]));
if(C_truep(t8)){
t9=C_i_length(C_u_i_cdr(((C_word*)t0)[5]));
switch(t9){
case C_fix(0):
t10=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t10;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}
case C_fix(1):
/* irregex-core.scm:3159: rec */
t10=((C_word*)t0)[7];
f_23327(t10,((C_word*)t0)[2],C_i_cadr(((C_word*)t0)[5]));
default:
t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_23567,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
t11=(
/* irregex-core.scm:3161: sre-sequence */
  f_18122(C_a_i(&a,3),C_i_cddr(((C_word*)t0)[5]))
);
t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_23586,a[2]=((C_word*)t0)[8],a[3]=t10,a[4]=t11,a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3162: sre-count-submatches */
f_16913(t12,C_i_cadr(((C_word*)t0)[5]));}}
else{
t9=C_eqp(((C_word*)t0)[6],lf[131]);
if(C_truep(t9)){
t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_23609,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t11=(
/* irregex-core.scm:3167: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
/* irregex-core.scm:3167: rec */
t12=((C_word*)t0)[7];
f_23327(t12,t10,t11);}
else{
t10=C_eqp(((C_word*)t0)[6],lf[132]);
if(C_truep(t10)){
t11=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_23635,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t12=(
/* irregex-core.scm:3172: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
/* irregex-core.scm:3172: rec */
t13=((C_word*)t0)[7];
f_23327(t13,t11,t12);}
else{
t11=C_eqp(((C_word*)t0)[6],lf[127]);
if(C_truep(t11)){
t12=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_23664,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
t13=(
/* irregex-core.scm:3178: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
/* irregex-core.scm:3178: sre-empty? */
t14=lf[139];{
C_word av2[3];
av2[0]=t14;
av2[1]=t12;
av2[2]=t13;
f_16238(3,av2);}}
else{
t12=C_eqp(((C_word*)t0)[6],lf[128]);
if(C_truep(t12)){
t13=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_23709,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
t14=(
/* irregex-core.scm:3188: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
/* irregex-core.scm:3188: sre-empty? */
t15=lf[139];{
C_word av2[3];
av2[0]=t15;
av2[1]=t13;
av2[2]=t14;
f_16238(3,av2);}}
else{
t13=C_eqp(((C_word*)t0)[6],lf[129]);
if(C_truep(t13)){
t14=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_23763,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
t15=(
/* irregex-core.scm:3207: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
/* irregex-core.scm:3207: sre-empty? */
t16=lf[139];{
C_word av2[3];
av2[0]=t16;
av2[1]=t14;
av2[2]=t15;
f_16238(3,av2);}}
else{
t14=C_eqp(((C_word*)t0)[6],lf[134]);
if(C_truep(t14)){
t15=C_i_cadr(((C_word*)t0)[5]);
t16=C_u_i_cdr(((C_word*)t0)[5]);
t17=C_u_i_car(t16);
t18=C_u_i_cdr(((C_word*)t0)[5]);
t19=C_u_i_cdr(t18);
t20=C_a_i_cons(&a,2,t17,t19);
t21=C_a_i_cons(&a,2,t15,t20);
t22=C_a_i_cons(&a,2,lf[133],t21);
/* irregex-core.scm:3222: rec */
t23=((C_word*)t0)[7];
f_23327(t23,((C_word*)t0)[2],t22);}
else{
t15=C_eqp(((C_word*)t0)[6],lf[135]);
if(C_truep(t15)){
t16=C_i_cadr(((C_word*)t0)[5]);
t17=C_u_i_cdr(((C_word*)t0)[5]);
t18=C_u_i_cdr(t17);
t19=C_a_i_cons(&a,2,C_SCHEME_FALSE,t18);
t20=C_a_i_cons(&a,2,t16,t19);
t21=C_a_i_cons(&a,2,lf[133],t20);
/* irregex-core.scm:3224: rec */
t22=((C_word*)t0)[7];
f_23327(t22,((C_word*)t0)[2],t21);}
else{
t16=C_eqp(((C_word*)t0)[6],lf[133]);
if(C_truep(t16)){
t17=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_23865,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
t18=C_i_cadr(((C_word*)t0)[5]);
if(C_truep(C_i_numberp(t18))){
t19=C_i_caddr(((C_word*)t0)[5]);
if(C_truep(C_i_numberp(t19))){
t20=C_u_i_cdr(((C_word*)t0)[5]);
t21=C_u_i_car(t20);
t22=C_u_i_cdr(((C_word*)t0)[5]);
t23=C_u_i_cdr(t22);
t24=t17;
f_23865(t24,C_fixnum_greaterp(t21,C_u_i_car(t23)));}
else{
t20=t17;
f_23865(t20,C_SCHEME_FALSE);}}
else{
t19=t17;
f_23865(t19,C_SCHEME_FALSE);}}
else{
t17=C_eqp(((C_word*)t0)[6],lf[130]);
if(C_truep(t17)){
t18=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_24017,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[4],tmp=(C_word)a,a+=8,tmp);
t19=C_i_cadr(((C_word*)t0)[5]);
if(C_truep(C_i_numberp(t19))){
t20=C_i_caddr(((C_word*)t0)[5]);
if(C_truep(C_i_numberp(t20))){
t21=C_u_i_cdr(((C_word*)t0)[5]);
t22=C_u_i_car(t21);
t23=C_u_i_cdr(((C_word*)t0)[5]);
t24=C_u_i_cdr(t23);
t25=t18;
f_24017(t25,C_fixnum_greaterp(t22,C_u_i_car(t24)));}
else{
t21=t18;
f_24017(t21,C_SCHEME_FALSE);}}
else{
t20=t18;
f_24017(t20,C_SCHEME_FALSE);}}
else{
t18=C_eqp(((C_word*)t0)[6],lf[231]);
if(C_truep(t18)){
t19=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24188,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t20=C_u_i_cdr(((C_word*)t0)[5]);
t21=C_a_i_list(&a,1,lf[184]);
/* irregex-core.scm:3295: ##sys#append */
t22=*((C_word*)lf[118]+1);{
C_word av2[4];
av2[0]=t22;
av2[1]=t19;
av2[2]=t20;
av2[3]=t21;
((C_proc)(void*)(*((C_word*)t22+1)))(4,av2);}}
else{
t19=C_eqp(((C_word*)t0)[6],lf[232]);
if(C_truep(t19)){
t20=C_a_i_list(&a,3,lf[103],lf[181],lf[233]);
t21=C_u_i_cdr(((C_word*)t0)[5]);
t22=C_a_i_cons(&a,2,lf[103],t21);
t23=C_a_i_list(&a,3,lf[234],t20,t22);
t24=C_a_i_list(&a,2,lf[129],t23);
t25=C_a_i_list(&a,4,lf[115],lf[183],t24,lf[184]);
/* irregex-core.scm:3297: rec */
t26=((C_word*)t0)[7];
f_23327(t26,((C_word*)t0)[2],t25);}
else{
t20=C_eqp(((C_word*)t0)[6],lf[235]);
if(C_truep(t20)){
t21=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24238,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3300: string->sre */
t22=*((C_word*)lf[102]+1);{
C_word av2[3];
av2[0]=t22;
av2[1]=t21;
av2[2]=C_i_cadr(((C_word*)t0)[5]);
((C_proc)(void*)(*((C_word*)t22+1)))(3,av2);}}
else{
t21=C_eqp(((C_word*)t0)[6],lf[111]);
if(C_truep(t21)){
t22=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24251,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t23=(
/* irregex-core.scm:3303: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
t24=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24274,a[2]=((C_word)li149),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3303: lp */
t25=((C_word*)((C_word*)t0)[8])[1];
f_23324(t25,t22,t23,((C_word*)t0)[9],((C_word*)t0)[4],t24);}
else{
t22=C_eqp(((C_word*)t0)[6],lf[112]);
if(C_truep(t22)){
t23=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24286,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t24=(
/* irregex-core.scm:3313: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
t25=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24309,a[2]=((C_word)li152),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3313: lp */
t26=((C_word*)((C_word*)t0)[8])[1];
f_23324(t26,t23,t24,((C_word*)t0)[9],((C_word*)t0)[4],t25);}
else{
t23=C_eqp(((C_word*)t0)[6],lf[113]);
t24=(C_truep(t23)?t23:C_eqp(((C_word*)t0)[6],lf[114]));
if(C_truep(t24)){
t25=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24324,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
t26=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_24396,a[2]=((C_word*)t0)[8],a[3]=t25,a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:3324: scheme#append */
t27=*((C_word*)lf[73]+1);{
C_word av2[4];
av2[0]=t27;
av2[1]=t26;
av2[2]=C_u_i_cdr(((C_word*)t0)[5]);
av2[3]=lf[238];
((C_proc)(void*)(*((C_word*)t27+1)))(4,av2);}}
else{
t25=C_eqp(((C_word*)t0)[6],lf[239]);
if(C_truep(t25)){
t26=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24407,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t27=(
/* irregex-core.scm:3340: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
t28=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24430,a[2]=((C_word)li161),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3340: lp */
t29=((C_word*)((C_word*)t0)[8])[1];
f_23324(t29,t26,t27,((C_word*)t0)[9],((C_word*)t0)[4],t28);}
else{
t26=C_eqp(((C_word*)t0)[6],lf[109]);
if(C_truep(t26)){
t27=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_24442,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[3],tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:3350: sre-count-submatches */
f_16913(t27,C_i_cadr(((C_word*)t0)[5]));}
else{
t27=C_eqp(((C_word*)t0)[6],lf[192]);
t28=(C_truep(t27)?t27:C_eqp(((C_word*)t0)[6],lf[191]));
if(C_truep(t28)){
t29=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_24598,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
t30=C_i_cadr(((C_word*)t0)[5]);
if(C_truep(C_i_numberp(t30))){
t31=t29;{
C_word av2[2];
av2[0]=t31;
av2[1]=C_u_i_car(C_u_i_cdr(((C_word*)t0)[5]));
f_24598(2,av2);}}
else{
t31=C_u_i_cdr(((C_word*)t0)[5]);
t32=C_i_assq(C_u_i_car(t31),((C_word*)((C_word*)t0)[10])[1]);
if(C_truep(t32)){
t33=t29;{
C_word av2[2];
av2[0]=t33;
av2[1]=C_i_cdr(t32);
f_24598(2,av2);}}
else{
t33=C_u_i_cdr(((C_word*)t0)[5]);
/* irregex-core.scm:3382: chicken.base#error */
t34=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t34;
av2[1]=t29;
av2[2]=lf[243];
av2[3]=C_u_i_car(t33);
((C_proc)(void*)(*((C_word*)t34+1)))(4,av2);}}}}
else{
t29=C_eqp(((C_word*)t0)[6],lf[244]);
if(C_truep(t29)){
t30=(
/* irregex-core.scm:3422: sre-sequence */
  f_18122(C_a_i(&a,3),C_i_cdddr(((C_word*)t0)[5]))
);
t31=C_i_cadr(((C_word*)t0)[5]);
/* irregex-core.scm:3422: lp */
t32=((C_word*)((C_word*)t0)[8])[1];
f_23324(t32,((C_word*)t0)[2],t30,C_fixnum_plus(((C_word*)t0)[9],t31),((C_word*)t0)[4],((C_word*)t0)[3]);}
else{
t30=C_eqp(((C_word*)t0)[6],lf[245]);
t31=(C_truep(t30)?t30:C_eqp(((C_word*)t0)[6],lf[108]));
if(C_truep(t31)){
t32=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24815,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t33=(
/* irregex-core.scm:3425: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
t34=C_fixnum_plus(((C_word*)t0)[9],C_fix(1));
t35=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24924,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[3],a[4]=((C_word)li171),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3425: lp */
t36=((C_word*)((C_word*)t0)[8])[1];
f_23324(t36,t32,t33,t34,((C_word*)t0)[4],t35);}
else{
t32=C_eqp(((C_word*)t0)[6],lf[119]);
t33=(C_truep(t32)?t32:C_eqp(((C_word*)t0)[6],lf[120]));
if(C_truep(t33)){
t34=C_i_cddr(((C_word*)t0)[5]);
t35=C_a_i_cons(&a,2,lf[108],t34);
/* irregex-core.scm:3455: rec */
t36=((C_word*)t0)[7];
f_23327(t36,((C_word*)t0)[2],t35);}
else{
/* irregex-core.scm:3457: chicken.base#error */
t34=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t34;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[246];
av2[3]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t34+1)))(4,av2);}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}

/* k23371 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_23373(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_23373,c,av);}
/* irregex-core.scm:3125: sre-cset->procedure */
f_26053(((C_word*)t0)[2],t1,((C_word*)t0)[3]);}

/* f_23393 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_23393(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_23393,c,av);}
/* irregex-core.scm:3130: fail */
t10=t9;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* k23411 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_23413(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,2)))){
C_save_and_reclaim((void *)f_23413,c,av);}
a=C_alloc(15);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_23416,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t3=(
/* irregex-core.scm:3134: sre-alternate */
  f_18145(C_a_i(&a,3),C_i_cddr(((C_word*)t0)[3]))
);
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_23439,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t3,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);
/* irregex-core.scm:3135: sre-count-submatches */
f_16913(t4,C_i_cadr(((C_word*)t0)[3]));}

/* k23414 in k23411 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_23416(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,10)))){
C_save_and_reclaim((void *)f_23416,c,av);}
a=C_alloc(5);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_23417,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word)li122),tmp=(C_word)a,a+=5,tmp);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* f_23417 in k23414 in k23411 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_23417(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,9)))){
C_save_and_reclaim((void *)f_23417,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_23423,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=t4,a[6]=t5,a[7]=t6,a[8]=t7,a[9]=t8,a[10]=t9,a[11]=((C_word)li121),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3139: first */
t11=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t11;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t10;
((C_proc)(void*)(*((C_word*)t11+1)))(10,av2);}}

/* a23422 */
static void C_ccall f_23423(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_23423,c,av);}
/* irregex-core.scm:3141: rest */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=t1;
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
av2[4]=((C_word*)t0)[5];
av2[5]=((C_word*)t0)[6];
av2[6]=((C_word*)t0)[7];
av2[7]=((C_word*)t0)[8];
av2[8]=((C_word*)t0)[9];
av2[9]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}

/* k23437 in k23411 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_23439(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_23439,c,av);}
/* irregex-core.scm:3134: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_23324(t2,((C_word*)t0)[3],((C_word*)t0)[4],C_fixnum_plus(((C_word*)t0)[5],t1),((C_word*)t0)[6],((C_word*)t0)[7]);}

/* k23565 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_23567(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_23567,c,av);}
/* irregex-core.scm:3165: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_23324(t2,((C_word*)t0)[3],C_i_cadr(((C_word*)t0)[4]),((C_word*)t0)[5],((C_word*)t0)[6],t1);}

/* k23584 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_23586(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_23586,c,av);}
/* irregex-core.scm:3161: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_23324(t2,((C_word*)t0)[3],((C_word*)t0)[4],C_fixnum_plus(((C_word*)t0)[5],t1),((C_word*)t0)[6],((C_word*)t0)[7]);}

/* k23607 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_23609(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,10)))){
C_save_and_reclaim((void *)f_23609,c,av);}
a=C_alloc(5);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_23610,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word)li124),tmp=(C_word)a,a+=5,tmp);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* f_23610 in k23607 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_23610(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,9)))){
C_save_and_reclaim((void *)f_23610,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_23616,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=t4,a[6]=t5,a[7]=t6,a[8]=t7,a[9]=t8,a[10]=t9,a[11]=((C_word)li123),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3169: body */
t11=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t11;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t10;
((C_proc)(void*)(*((C_word*)t11+1)))(10,av2);}}

/* a23615 */
static void C_ccall f_23616(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_23616,c,av);}
/* irregex-core.scm:3170: next */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=t1;
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
av2[4]=((C_word*)t0)[5];
av2[5]=((C_word*)t0)[6];
av2[6]=((C_word*)t0)[7];
av2[7]=((C_word*)t0)[8];
av2[8]=((C_word*)t0)[9];
av2[9]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}

/* k23633 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_23635(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,10)))){
C_save_and_reclaim((void *)f_23635,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_23636,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word)li126),tmp=(C_word)a,a+=5,tmp);
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* f_23636 in k23633 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_23636(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,9)))){
C_save_and_reclaim((void *)f_23636,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_23642,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=t4,a[6]=t5,a[7]=t6,a[8]=t7,a[9]=t8,a[10]=t9,a[11]=((C_word)li125),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3174: next */
t11=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t11;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t10;
((C_proc)(void*)(*((C_word*)t11+1)))(10,av2);}}

/* a23641 */
static void C_ccall f_23642(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_23642,c,av);}
/* irregex-core.scm:3175: body */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=t1;
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
av2[4]=((C_word*)t0)[5];
av2[5]=((C_word*)t0)[6];
av2[6]=((C_word*)t0)[7];
av2[7]=((C_word*)t0)[8];
av2[8]=((C_word*)t0)[9];
av2[9]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}

/* k23662 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_23664(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,3)))){
C_save_and_reclaim((void *)f_23664,c,av);}
a=C_alloc(13);
if(C_truep(t1)){
/* irregex-core.scm:3179: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[228];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}
else{
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_23670,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t3=(
/* irregex-core.scm:3181: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[3]))
);
t4=C_a_i_list2(&a,2,lf[129],t3);
/* irregex-core.scm:3181: rec */
t5=((C_word*)t0)[5];
f_23327(t5,t2,t4);}}

/* k23668 in k23662 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_23670(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,10)))){
C_save_and_reclaim((void *)f_23670,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_23671,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word)li128),tmp=(C_word)a,a+=5,tmp);
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* f_23671 in k23668 in k23662 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_23671(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,9)))){
C_save_and_reclaim((void *)f_23671,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_23677,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=t4,a[6]=t5,a[7]=t6,a[8]=t7,a[9]=t8,a[10]=t9,a[11]=((C_word)li127),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3183: body */
t11=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t11;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t10;
((C_proc)(void*)(*((C_word*)t11+1)))(10,av2);}}

/* a23676 */
static void C_ccall f_23677(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_23677,c,av);}
/* irregex-core.scm:3185: next */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=t1;
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
av2[4]=((C_word*)t0)[5];
av2[5]=((C_word*)t0)[6];
av2[6]=((C_word*)t0)[7];
av2[7]=((C_word*)t0)[8];
av2[8]=((C_word*)t0)[9];
av2[9]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}

/* k23707 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_23709(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,10)))){
C_save_and_reclaim((void *)f_23709,c,av);}
a=C_alloc(15);
if(C_truep(t1)){
/* irregex-core.scm:3189: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[229];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}
else{
t2=C_SCHEME_UNDEFINED;
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_23715,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
t5=(
/* irregex-core.scm:3193: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[3]))
);
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_23733,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word)li132),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3193: lp */
t7=((C_word*)((C_word*)t0)[5])[1];
f_23324(t7,t4,t5,((C_word*)t0)[6],((C_word*)t0)[7],t6);}}

/* k23713 in k23707 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_23715(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,10)))){
C_save_and_reclaim((void *)f_23715,c,av);}
a=C_alloc(5);
t2=C_mutate(((C_word *)((C_word*)t0)[2])+1,t1);
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_23717,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word)li130),tmp=(C_word)a,a+=5,tmp);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* f_23717 in k23713 in k23707 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_23717(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,9)))){
C_save_and_reclaim((void *)f_23717,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_23723,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=t4,a[6]=t5,a[7]=t6,a[8]=t7,a[9]=t8,a[10]=t9,a[11]=((C_word)li129),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3202: next */
t11=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t11;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t10;
((C_proc)(void*)(*((C_word*)t11+1)))(10,av2);}}

/* a23722 */
static void C_ccall f_23723(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_23723,c,av);}
/* irregex-core.scm:3204: body */
t2=((C_word*)((C_word*)t0)[2])[1];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=t1;
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
av2[4]=((C_word*)t0)[5];
av2[5]=((C_word*)t0)[6];
av2[6]=((C_word*)t0)[7];
av2[7]=((C_word*)t0)[8];
av2[8]=((C_word*)t0)[9];
av2[9]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}

/* a23732 in k23707 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_23733(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,9)))){
C_save_and_reclaim((void *)f_23733,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_23739,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=t4,a[6]=t5,a[7]=t6,a[8]=t7,a[9]=t8,a[10]=t9,a[11]=((C_word)li131),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3197: next */
t11=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t11;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t10;
((C_proc)(void*)(*((C_word*)t11+1)))(10,av2);}}

/* a23738 in a23732 in k23707 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_23739(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_23739,c,av);}
/* irregex-core.scm:3199: body */
t2=((C_word*)((C_word*)t0)[2])[1];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=t1;
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
av2[4]=((C_word*)t0)[5];
av2[5]=((C_word*)t0)[6];
av2[6]=((C_word*)t0)[7];
av2[7]=((C_word*)t0)[8];
av2[8]=((C_word*)t0)[9];
av2[9]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}

/* k23761 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_23763(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,10)))){
C_save_and_reclaim((void *)f_23763,c,av);}
a=C_alloc(14);
if(C_truep(t1)){
/* irregex-core.scm:3208: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[230];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}
else{
t2=C_SCHEME_UNDEFINED;
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_23769,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t5=(
/* irregex-core.scm:3212: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[3]))
);
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_23776,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word)li134),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3212: lp */
t7=((C_word*)((C_word*)t0)[5])[1];
f_23324(t7,t4,t5,((C_word*)t0)[6],((C_word*)t0)[7],t6);}}

/* k23767 in k23761 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_23769(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_23769,c,av);}
t2=C_mutate(((C_word *)((C_word*)t0)[2])+1,t1);
t3=((C_word*)((C_word*)t0)[2])[1];
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* a23775 in k23761 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_23776(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,9)))){
C_save_and_reclaim((void *)f_23776,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_23782,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=t4,a[6]=t5,a[7]=t6,a[8]=t7,a[9]=t8,a[10]=t9,a[11]=((C_word)li133),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3216: body */
t11=((C_word*)((C_word*)t0)[3])[1];{
C_word *av2=av;
av2[0]=t11;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t10;
((C_proc)(void*)(*((C_word*)t11+1)))(10,av2);}}

/* a23781 in a23775 in k23761 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_23782(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_23782,c,av);}
/* irregex-core.scm:3218: next */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=t1;
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
av2[4]=((C_word*)t0)[5];
av2[5]=((C_word*)t0)[6];
av2[6]=((C_word*)t0)[7];
av2[7]=((C_word*)t0)[8];
av2[8]=((C_word*)t0)[9];
av2[9]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}

/* k23863 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_23865(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,2)))){
C_save_and_reclaim_args((void *)trf_23865,2,t0,t1);}
a=C_alloc(8);
t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_23868,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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(t1)){
t3=t2;
f_23868(t3,t1);}
else{
t3=C_u_i_cdr(((C_word*)t0)[3]);
t4=C_i_not(C_u_i_car(t3));
t5=t2;
f_23868(t5,(C_truep(t4)?C_i_caddr(((C_word*)t0)[3]):C_SCHEME_FALSE));}}

/* k23866 in k23863 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_fcall f_23868(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(28,0,10)))){
C_save_and_reclaim_args((void *)trf_23868,2,t0,t1);}
a=C_alloc(28);
if(C_truep(t1)){
t2=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t2;
av2[1]=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_23869,a[2]=((C_word)li135),tmp=(C_word)a,a+=3,tmp);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}
else{
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
t10=C_u_i_cdr(((C_word*)t0)[3]);
t11=C_u_i_car(t10);
t12=C_i_caddr(((C_word*)t0)[3]);
t13=C_u_i_cdr(((C_word*)t0)[3]);
t14=C_u_i_cdr(t13);
t15=(
/* irregex-core.scm:3236: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(t14))
);
t16=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_23882,a[2]=t5,a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=t9,a[6]=((C_word*)t0)[5],a[7]=t7,a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word)li138),tmp=(C_word)a,a+=11,tmp);
t17=C_set_block_item(t3,0,t11);
t18=C_set_block_item(t5,0,t12);
t19=C_set_block_item(t7,0,t15);
t20=C_set_block_item(t9,0,t16);
t21=(C_truep(C_i_zerop(((C_word*)t3)[1]))?(C_truep(((C_word*)t5)[1])?C_i_zerop(((C_word*)t5)[1]):C_SCHEME_FALSE):C_SCHEME_FALSE);
if(C_truep(t21)){
t22=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t22;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t22+1)))(2,av2);}}
else{
t22=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_23937,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=t9,a[5]=((C_word)li140),tmp=(C_word)a,a+=6,tmp);
t23=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t23;
av2[1]=t22;
((C_proc)(void*)(*((C_word*)t23+1)))(2,av2);}}}}

/* f_23869 in k23866 in k23863 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_23869(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_23869,c,av);}
/* irregex-core.scm:3231: fail */
t10=t9;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* body4547 in k23866 in k23863 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_23882(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,10)))){
C_save_and_reclaim((void *)f_23882,c,av);}
a=C_alloc(8);
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_23888,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)li137),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3239: lp */
t4=((C_word*)((C_word*)t0)[6])[1];
f_23324(t4,t1,((C_word*)((C_word*)t0)[7])[1],((C_word*)t0)[8],((C_word*)t0)[9],t3);}

/* a23887 in body4547 in k23866 in k23863 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in ... */
static void C_ccall f_23888(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,9)))){
C_save_and_reclaim((void *)f_23888,c,av);}
a=C_alloc(14);
t10=(C_truep(((C_word*)((C_word*)t0)[2])[1])?C_eqp(((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]):C_SCHEME_FALSE);
if(C_truep(t10)){
/* irregex-core.scm:3244: next */
t11=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t11;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t9;
((C_proc)(void*)(*((C_word*)t11+1)))(10,av2);}}
else{
t11=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_23901,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=t3,a[7]=t4,a[8]=t5,a[9]=t6,a[10]=t7,a[11]=t8,a[12]=t9,a[13]=t1,tmp=(C_word)a,a+=14,tmp);
/* irregex-core.scm:3245: body */
t12=((C_word*)((C_word*)t0)[6])[1];{
C_word *av2=av;
av2[0]=t12;
av2[1]=t11;
av2[2]=C_fixnum_plus(C_fix(1),((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t12+1)))(3,av2);}}}

/* k23899 in a23887 in body4547 in k23866 in k23863 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in ... */
static void C_ccall f_23901(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,9)))){
C_save_and_reclaim((void *)f_23901,c,av);}
a=C_alloc(14);
t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_23906,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word)li136),tmp=(C_word)a,a+=14,tmp);
/* irregex-core.scm:3243: g4566 */
t3=t1;{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[13];
av2[2]=((C_word*)t0)[5];
av2[3]=((C_word*)t0)[6];
av2[4]=((C_word*)t0)[7];
av2[5]=((C_word*)t0)[8];
av2[6]=((C_word*)t0)[9];
av2[7]=((C_word*)t0)[10];
av2[8]=((C_word*)t0)[11];
av2[9]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(10,av2);}}

/* a23905 in k23899 in a23887 in body4547 in k23866 in k23863 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in ... */
static void C_ccall f_23906(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_23906,c,av);}
if(C_truep(C_fixnum_greater_or_equal_p(((C_word*)t0)[2],((C_word*)((C_word*)t0)[3])[1]))){
/* irregex-core.scm:3249: next */
t2=((C_word*)t0)[4];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=t1;
av2[2]=((C_word*)t0)[5];
av2[3]=((C_word*)t0)[6];
av2[4]=((C_word*)t0)[7];
av2[5]=((C_word*)t0)[8];
av2[6]=((C_word*)t0)[9];
av2[7]=((C_word*)t0)[10];
av2[8]=((C_word*)t0)[11];
av2[9]=((C_word*)t0)[12];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}
else{
/* irregex-core.scm:3250: fail */
t2=((C_word*)t0)[12];{
C_word *av2=av;
av2[0]=t2;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* f_23937 in k23866 in k23863 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_23937(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,2)))){
C_save_and_reclaim((void *)f_23937,c,av);}
a=C_alloc(13);
t10=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_23941,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=t3,a[6]=t4,a[7]=t5,a[8]=t6,a[9]=t7,a[10]=t8,a[11]=t9,a[12]=t1,tmp=(C_word)a,a+=13,tmp);
/* irregex-core.scm:3254: body */
t11=((C_word*)((C_word*)t0)[4])[1];{
C_word *av2=av;
av2[0]=t11;
av2[1]=t10;
av2[2]=C_fix(1);
((C_proc)(void*)(*((C_word*)t11+1)))(3,av2);}}

/* k23939 */
static void C_ccall f_23941(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,9)))){
C_save_and_reclaim((void *)f_23941,c,av);}
a=C_alloc(13);
t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_23946,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word)li139),tmp=(C_word)a,a+=13,tmp);
/* irregex-core.scm:3253: g4578 */
t3=t1;{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[12];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
av2[5]=((C_word*)t0)[7];
av2[6]=((C_word*)t0)[8];
av2[7]=((C_word*)t0)[9];
av2[8]=((C_word*)t0)[10];
av2[9]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(10,av2);}}

/* a23945 in k23939 */
static void C_ccall f_23946(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_23946,c,av);}
if(C_truep(C_i_zerop(((C_word*)((C_word*)t0)[2])[1]))){
/* irregex-core.scm:3257: next */
t2=((C_word*)t0)[3];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=t1;
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
av2[5]=((C_word*)t0)[7];
av2[6]=((C_word*)t0)[8];
av2[7]=((C_word*)t0)[9];
av2[8]=((C_word*)t0)[10];
av2[9]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}
else{
/* irregex-core.scm:3258: fail */
t2=((C_word*)t0)[11];{
C_word *av2=av;
av2[0]=t2;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k24015 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_fcall f_24017(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,2)))){
C_save_and_reclaim_args((void *)trf_24017,2,t0,t1);}
a=C_alloc(8);
t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_24020,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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(t1)){
t3=t2;
f_24020(t3,t1);}
else{
t3=C_u_i_cdr(((C_word*)t0)[3]);
t4=C_i_not(C_u_i_car(t3));
t5=t2;
f_24020(t5,(C_truep(t4)?C_i_caddr(((C_word*)t0)[3]):C_SCHEME_FALSE));}}

/* k24018 in k24015 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_fcall f_24020(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(28,0,10)))){
C_save_and_reclaim_args((void *)trf_24020,2,t0,t1);}
a=C_alloc(28);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24021,a[2]=((C_word)li141),tmp=(C_word)a,a+=3,tmp);
t3=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t3;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
t10=C_u_i_cdr(((C_word*)t0)[3]);
t11=C_u_i_car(t10);
t12=C_i_caddr(((C_word*)t0)[3]);
t13=C_u_i_cdr(((C_word*)t0)[3]);
t14=C_u_i_cdr(t13);
t15=(
/* irregex-core.scm:3270: sre-sequence */
  f_18122(C_a_i(&a,3),C_u_i_cdr(t14))
);
t16=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_24034,a[2]=t3,a[3]=t9,a[4]=t5,a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=t7,a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word)li144),tmp=(C_word)a,a+=11,tmp);
t17=C_set_block_item(t3,0,t11);
t18=C_set_block_item(t5,0,t12);
t19=C_set_block_item(t7,0,t15);
t20=C_set_block_item(t9,0,t16);
t21=(C_truep(C_i_zerop(((C_word*)t3)[1]))?(C_truep(((C_word*)t5)[1])?C_i_zerop(((C_word*)t5)[1]):C_SCHEME_FALSE):C_SCHEME_FALSE);
t22=((C_word*)t0)[2];{
C_word av2[2];
av2[0]=t22;
av2[1]=(C_truep(t21)?((C_word*)t0)[4]:(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_24096,a[2]=t3,a[3]=t9,a[4]=((C_word*)t0)[4],a[5]=((C_word)li146),tmp=(C_word)a,a+=6,tmp));
((C_proc)(void*)(*((C_word*)t22+1)))(2,av2);}}}

/* f_24021 in k24018 in k24015 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_24021(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_24021,c,av);}
/* irregex-core.scm:3265: fail */
t10=t9;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* body4605 in k24018 in k24015 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_24034(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,10)))){
C_save_and_reclaim((void *)f_24034,c,av);}
a=C_alloc(8);
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_24040,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)li143),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3273: lp */
t4=((C_word*)((C_word*)t0)[6])[1];
f_23324(t4,t1,((C_word*)((C_word*)t0)[7])[1],((C_word*)t0)[8],((C_word*)t0)[9],t3);}

/* a24039 in body4605 in k24018 in k24015 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in ... */
static void C_ccall f_24040(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,9)))){
C_save_and_reclaim((void *)f_24040,c,av);}
a=C_alloc(14);
if(C_truep(C_fixnum_lessp(((C_word*)t0)[2],((C_word*)((C_word*)t0)[3])[1]))){
t10=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_24050,a[2]=t1,a[3]=t2,a[4]=t3,a[5]=t4,a[6]=t5,a[7]=t6,a[8]=t7,a[9]=t8,a[10]=t9,tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:3278: body */
t11=((C_word*)((C_word*)t0)[4])[1];{
C_word *av2=av;
av2[0]=t11;
av2[1]=t10;
av2[2]=C_fixnum_plus(C_fix(1),((C_word*)t0)[2]);
((C_proc)(void*)(*((C_word*)t11+1)))(3,av2);}}
else{
t10=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_24062,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[2],a[4]=t9,a[5]=t2,a[6]=t3,a[7]=t4,a[8]=t5,a[9]=t6,a[10]=t7,a[11]=t8,a[12]=((C_word*)t0)[4],a[13]=((C_word)li142),tmp=(C_word)a,a+=14,tmp);
/* irregex-core.scm:3280: next */
t11=((C_word*)t0)[6];{
C_word *av2=av;
av2[0]=t11;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t10;
((C_proc)(void*)(*((C_word*)t11+1)))(10,av2);}}}

/* k24048 in a24039 in body4605 in k24018 in k24015 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in ... */
static void C_ccall f_24050(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_24050,c,av);}
/* irregex-core.scm:3277: g4623 */
t2=t1;{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
av2[4]=((C_word*)t0)[5];
av2[5]=((C_word*)t0)[6];
av2[6]=((C_word*)t0)[7];
av2[7]=((C_word*)t0)[8];
av2[8]=((C_word*)t0)[9];
av2[9]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}

/* a24061 in a24039 in body4605 in k24018 in k24015 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in ... */
static void C_ccall f_24062(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_24062,c,av);}
a=C_alloc(11);
t2=(C_truep(((C_word*)((C_word*)t0)[2])[1])?C_eqp(((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]):C_SCHEME_FALSE);
if(C_truep(t2)){
/* irregex-core.scm:3283: fail */
t3=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t3;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_24075,a[2]=t1,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)[4],tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:3284: body */
t4=((C_word*)((C_word*)t0)[12])[1];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=C_fixnum_plus(C_fix(1),((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}}

/* k24073 in a24061 in a24039 in body4605 in k24018 in k24015 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in ... */
static void C_ccall f_24075(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_24075,c,av);}
/* irregex-core.scm:3282: g4626 */
t2=t1;{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
av2[4]=((C_word*)t0)[5];
av2[5]=((C_word*)t0)[6];
av2[6]=((C_word*)t0)[7];
av2[7]=((C_word*)t0)[8];
av2[8]=((C_word*)t0)[9];
av2[9]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}

/* f_24096 in k24018 in k24015 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_24096(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,9)))){
C_save_and_reclaim((void *)f_24096,c,av);}
a=C_alloc(12);
if(C_truep(C_i_zerop(((C_word*)((C_word*)t0)[2])[1]))){
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_24106,a[2]=t2,a[3]=t3,a[4]=t4,a[5]=t5,a[6]=t6,a[7]=t7,a[8]=t8,a[9]=t9,a[10]=((C_word*)t0)[3],a[11]=((C_word)li145),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3290: next */
t11=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t11;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t10;
((C_proc)(void*)(*((C_word*)t11+1)))(10,av2);}}
else{
t10=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_24116,a[2]=t1,a[3]=t2,a[4]=t3,a[5]=t4,a[6]=t5,a[7]=t6,a[8]=t7,a[9]=t8,a[10]=t9,tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:3293: body */
t11=((C_word*)((C_word*)t0)[3])[1];{
C_word *av2=av;
av2[0]=t11;
av2[1]=t10;
av2[2]=C_fix(1);
((C_proc)(void*)(*((C_word*)t11+1)))(3,av2);}}}

/* a24105 */
static void C_ccall f_24106(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
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_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_24106,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_24110,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);
/* irregex-core.scm:3292: body */
t3=((C_word*)((C_word*)t0)[10])[1];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=C_fix(1);
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k24108 in a24105 */
static void C_ccall f_24110(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_24110,c,av);}
/* irregex-core.scm:3291: g4638 */
t2=t1;{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
av2[4]=((C_word*)t0)[5];
av2[5]=((C_word*)t0)[6];
av2[6]=((C_word*)t0)[7];
av2[7]=((C_word*)t0)[8];
av2[8]=((C_word*)t0)[9];
av2[9]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}

/* k24114 */
static void C_ccall f_24116(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_24116,c,av);}
/* irregex-core.scm:3289: g4640 */
t2=t1;{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
av2[4]=((C_word*)t0)[5];
av2[5]=((C_word*)t0)[6];
av2[6]=((C_word*)t0)[7];
av2[7]=((C_word*)t0)[8];
av2[8]=((C_word*)t0)[9];
av2[9]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}

/* k24186 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_24188(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_24188,c,av);}
a=C_alloc(6);
t2=C_a_i_cons(&a,2,lf[183],t1);
t3=C_a_i_cons(&a,2,lf[115],t2);
/* irregex-core.scm:3295: rec */
t4=((C_word*)t0)[2];
f_23327(t4,((C_word*)t0)[3],t3);}

/* k24236 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_24238(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_24238,c,av);}
/* irregex-core.scm:3300: rec */
t2=((C_word*)t0)[2];
f_23327(t2,((C_word*)t0)[3],t1);}

/* k24249 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_24251(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,10)))){
C_save_and_reclaim((void *)f_24251,c,av);}
a=C_alloc(5);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24252,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word)li148),tmp=(C_word)a,a+=5,tmp);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* f_24252 in k24249 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_24252(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,9)))){
C_save_and_reclaim((void *)f_24252,c,av);}
a=C_alloc(15);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_24259,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=t3,a[6]=t4,a[7]=t5,a[8]=t6,a[9]=t7,a[10]=t8,a[11]=t9,tmp=(C_word)a,a+=12,tmp);
t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24267,a[2]=((C_word)li147),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3308: check */
t12=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t12;
av2[1]=t10;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t11;
((C_proc)(void*)(*((C_word*)t12+1)))(10,av2);}}

/* k24257 */
static void C_ccall f_24259(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_24259,c,av);}
if(C_truep(t1)){
/* irregex-core.scm:3309: next */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
av2[5]=((C_word*)t0)[7];
av2[6]=((C_word*)t0)[8];
av2[7]=((C_word*)t0)[9];
av2[8]=((C_word*)t0)[10];
av2[9]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}
else{
/* irregex-core.scm:3310: fail */
t2=((C_word*)t0)[11];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* a24266 */
static void C_ccall f_24267(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_24267,c,av);}
t2=t1;{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* a24273 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_24274(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_24274,c,av);}
t10=t1;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t6;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* k24284 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_24286(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,10)))){
C_save_and_reclaim((void *)f_24286,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24287,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word)li151),tmp=(C_word)a,a+=5,tmp);
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* f_24287 in k24284 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_24287(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,9)))){
C_save_and_reclaim((void *)f_24287,c,av);}
a=C_alloc(15);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_24294,a[2]=t9,a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=t2,a[6]=t3,a[7]=t4,a[8]=t5,a[9]=t6,a[10]=t7,a[11]=t8,tmp=(C_word)a,a+=12,tmp);
t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24302,a[2]=((C_word)li150),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3318: check */
t12=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t12;
av2[1]=t10;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t11;
((C_proc)(void*)(*((C_word*)t12+1)))(10,av2);}}

/* k24292 */
static void C_ccall f_24294(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_24294,c,av);}
if(C_truep(t1)){
/* irregex-core.scm:3319: fail */
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}
else{
/* irregex-core.scm:3320: next */
t2=((C_word*)t0)[4];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[5];
av2[3]=((C_word*)t0)[6];
av2[4]=((C_word*)t0)[7];
av2[5]=((C_word*)t0)[8];
av2[6]=((C_word*)t0)[9];
av2[7]=((C_word*)t0)[10];
av2[8]=((C_word*)t0)[11];
av2[9]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}}

/* a24301 */
static void C_ccall f_24302(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_24302,c,av);}
t2=t1;{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* a24308 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_24309(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_24309,c,av);}
t10=t1;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t6;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* k24322 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_24324(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,10)))){
C_save_and_reclaim((void *)f_24324,c,av);}
a=C_alloc(6);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_24325,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word)li157),tmp=(C_word)a,a+=6,tmp);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* f_24325 in k24322 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_24325(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(25,c,7)))){
C_save_and_reclaim((void *)f_24325,c,av);}
a=C_alloc(25);
t10=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_24329,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=t2,a[7]=t4,a[8]=t5,a[9]=t6,a[10]=t7,a[11]=t8,a[12]=t9,a[13]=((C_word*)t0)[4],tmp=(C_word)a,a+=14,tmp);
t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8693,a[2]=t4,a[3]=t2,a[4]=((C_word)li155),tmp=(C_word)a,a+=5,tmp);
t12=C_i_vector_ref(t2,C_fix(1));
t13=C_i_vector_ref(t2,C_fix(2));
t14=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8720,a[2]=t4,a[3]=t6,a[4]=t2,a[5]=((C_word)li156),tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:392: make-irregex-chunker */
t15=*((C_word*)lf[45]+1);{
C_word *av2=av;
av2[0]=t15;
av2[1]=t10;
av2[2]=t11;
av2[3]=t12;
av2[4]=t13;
av2[5]=t14;
av2[6]=C_i_vector_ref(t2,C_fix(4));
av2[7]=C_i_vector_ref(t2,C_fix(5));
((C_proc)(void*)(*((C_word*)t15+1)))(8,av2);}}

/* k24327 */
static void C_ccall f_24329(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,2)))){
C_save_and_reclaim((void *)f_24329,c,av);}
a=C_alloc(15);
t2=C_i_vector_ref(t1,C_fix(1));
t3=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_24335,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],tmp=(C_word)a,a+=15,tmp);
/* irregex-core.scm:3329: g4708 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=C_i_car(((C_word*)t0)[2]);
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k24333 in k24327 */
static void C_ccall f_24335(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(17,c,2)))){
C_save_and_reclaim((void *)f_24335,c,av);}
a=C_alloc(17);
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=C_i_vector_ref(((C_word*)t0)[3],C_fix(3));
t4=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_24342,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)[2],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)[3],a[15]=t1,a[16]=t2,tmp=(C_word)a,a+=17,tmp);
/* irregex-core.scm:3329: g4712 */
t5=t3;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t5;
av2[1]=t4;
av2[2]=C_u_i_car(((C_word*)t0)[2]);
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k24340 in k24333 in k24327 */
static void C_ccall f_24342(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(22,c,9)))){
C_save_and_reclaim((void *)f_24342,c,av);}
a=C_alloc(22);
t2=C_i_car(((C_word*)t0)[2]);
t3=C_eqp(t2,lf[113]);
t4=(C_truep(t3)?(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24370,a[2]=((C_word)li153),tmp=(C_word)a,a+=3,tmp):*((C_word*)lf[236]+1));
t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_24351,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],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);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24361,a[2]=t4,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
t7=C_u_i_car(((C_word*)t0)[6]);
t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24365,a[2]=((C_word)li154),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3334: check */
t9=((C_word*)t0)[13];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t9;
av2[1]=t6;
av2[2]=((C_word*)t0)[14];
av2[3]=((C_word*)t0)[6];
av2[4]=t7;
av2[5]=((C_word*)t0)[15];
av2[6]=((C_word*)t0)[16];
av2[7]=t1;
av2[8]=((C_word*)t0)[11];
av2[9]=t8;
((C_proc)(void*)(*((C_word*)t9+1)))(10,av2);}}

/* k24349 in k24340 in k24333 in k24327 */
static void C_ccall f_24351(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_24351,c,av);}
if(C_truep(t1)){
/* irregex-core.scm:3336: next */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
av2[5]=((C_word*)t0)[7];
av2[6]=((C_word*)t0)[8];
av2[7]=((C_word*)t0)[9];
av2[8]=((C_word*)t0)[10];
av2[9]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}
else{
/* irregex-core.scm:3337: fail */
t2=((C_word*)t0)[11];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k24359 in k24340 in k24333 in k24327 */
static void C_ccall f_24361(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_24361,c,av);}
/* irregex-core.scm:3333: g4714 */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* a24364 in k24340 in k24333 in k24327 */
static void C_ccall f_24365(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_24365,c,av);}
t2=t1;{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* f_24370 in k24340 in k24333 in k24327 */
static void C_ccall f_24370(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_24370,c,av);}
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* a24386 in k24394 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_24387(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_24387,c,av);}
t10=t1;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t6;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* k24394 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_24396(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,10)))){
C_save_and_reclaim((void *)f_24396,c,av);}
a=C_alloc(9);
t2=C_a_i_cons(&a,2,lf[237],t1);
t3=(
/* irregex-core.scm:3323: sre-sequence */
  f_18122(C_a_i(&a,3),t2)
);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24387,a[2]=((C_word)li158),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3323: lp */
t5=((C_word*)((C_word*)t0)[2])[1];
f_23324(t5,((C_word*)t0)[3],t3,((C_word*)t0)[4],((C_word*)t0)[5],t4);}

/* k24405 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_24407(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,10)))){
C_save_and_reclaim((void *)f_24407,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24408,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word)li160),tmp=(C_word)a,a+=5,tmp);
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* f_24408 in k24405 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_24408(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,9)))){
C_save_and_reclaim((void *)f_24408,c,av);}
a=C_alloc(14);
t10=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_24412,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=t3,a[6]=t4,a[7]=t5,a[8]=t7,a[9]=t8,a[10]=t9,tmp=(C_word)a,a+=11,tmp);
t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24423,a[2]=((C_word)li159),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3345: once */
t12=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t12;
av2[1]=t10;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t11;
((C_proc)(void*)(*((C_word*)t12+1)))(10,av2);}}

/* k24410 */
static void C_ccall f_24412(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_24412,c,av);}
if(C_truep(t1)){
/* irregex-core.scm:3347: next */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
av2[5]=((C_word*)t0)[7];
av2[6]=t1;
av2[7]=((C_word*)t0)[8];
av2[8]=((C_word*)t0)[9];
av2[9]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}
else{
/* irregex-core.scm:3348: fail */
t2=((C_word*)t0)[10];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* a24422 */
static void C_ccall f_24423(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_24423,c,av);}
t2=t1;{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* a24429 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_24430(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_24430,c,av);}
t10=t1;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t6;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* k24440 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_24442(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,5)))){
C_save_and_reclaim((void *)f_24442,c,av);}
a=C_alloc(10);
t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_24445,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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);
/* irregex-core.scm:3351: lp */
t3=((C_word*)((C_word*)t0)[5])[1];
f_23324(t3,t2,C_i_caddr(((C_word*)t0)[2]),((C_word*)t0)[7],C_fixnum_plus(((C_word*)t0)[6],t1),((C_word*)t0)[8]);}

/* k24443 in k24440 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_24445(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,c,10)))){
C_save_and_reclaim((void *)f_24445,c,av);}
a=C_alloc(18);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_24448,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=C_i_cdddr(((C_word*)t0)[2]);
if(C_truep(C_i_pairp(t3))){
t4=C_i_cadddr(((C_word*)t0)[2]);
t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_24561,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=t4,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
t6=C_u_i_cdr(((C_word*)t0)[2]);
t7=C_u_i_cdr(t6);
/* irregex-core.scm:3355: sre-count-submatches */
f_16913(t5,C_u_i_car(t7));}
else{
t4=t2;{
C_word *av2=av;
av2[0]=t4;
av2[1]=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24566,a[2]=((C_word)li165),tmp=(C_word)a,a+=3,tmp);
f_24448(2,av2);}}}

/* k24446 in k24443 in k24440 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_24448(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,2)))){
C_save_and_reclaim((void *)f_24448,c,av);}
a=C_alloc(10);
t2=C_i_cadr(((C_word*)t0)[2]);
t3=C_i_numberp(t2);
t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_24457,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[2],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);
if(C_truep(t3)){
t5=t4;
f_24457(t5,t3);}
else{
t5=C_u_i_cdr(((C_word*)t0)[2]);
t6=t4;
f_24457(t6,C_i_symbolp(C_u_i_car(t5)));}}

/* k24455 in k24446 in k24443 in k24440 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in ... */
static void C_fcall f_24457(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,5)))){
C_save_and_reclaim_args((void *)trf_24457,2,t0,t1);}
a=C_alloc(5);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24460,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_u_i_cdr(((C_word*)t0)[5]);
if(C_truep(C_i_symbolp(C_u_i_car(t3)))){
t4=C_u_i_cdr(((C_word*)t0)[5]);
t5=C_i_assq(C_u_i_car(t4),((C_word*)((C_word*)t0)[6])[1]);
if(C_truep(t5)){
t6=t2;{
C_word av2[2];
av2[0]=t6;
av2[1]=C_i_cdr(t5);
f_24460(2,av2);}}
else{
/* irregex-core.scm:3367: chicken.base#error */
t6=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t6;
av2[1]=t2;
av2[2]=lf[240];
av2[3]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}}
else{
t4=t2;{
C_word av2[2];
av2[0]=t4;
av2[1]=C_i_cadr(((C_word*)t0)[5]);
f_24460(2,av2);}}}
else{
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24518,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3374: lp */
t3=((C_word*)((C_word*)t0)[7])[1];
f_23324(t3,t2,C_i_cadr(((C_word*)t0)[5]),((C_word*)t0)[8],((C_word*)t0)[9],((C_word*)t0)[2]);}}

/* k24458 in k24455 in k24446 in k24443 in k24440 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in ... */
static void C_ccall f_24460(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,10)))){
C_save_and_reclaim((void *)f_24460,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_24461,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word)li162),tmp=(C_word)a,a+=6,tmp);
t3=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t3;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* f_24461 in k24458 in k24455 in k24446 in k24443 in k24440 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in ... */
static void C_ccall f_24461(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_24461,c,av);}
t10=C_slot(t8,C_fix(1));
t11=C_fixnum_times(((C_word*)t0)[2],C_fix(4));
t12=C_fixnum_plus(C_fix(2),t11);
if(C_truep(C_slot(t10,t12))){
/* irregex-core.scm:3371: pass */
t13=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t13;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t9;
((C_proc)(void*)(*((C_word*)t13+1)))(10,av2);}}
else{
/* irregex-core.scm:3372: fail */
t13=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t13;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t9;
((C_proc)(void*)(*((C_word*)t13+1)))(10,av2);}}}

/* k24516 in k24455 in k24446 in k24443 in k24440 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in ... */
static void C_ccall f_24518(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,10)))){
C_save_and_reclaim((void *)f_24518,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24519,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word)li164),tmp=(C_word)a,a+=5,tmp);
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* f_24519 in k24516 in k24455 in k24446 in k24443 in k24440 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in ... */
static void C_ccall f_24519(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,9)))){
C_save_and_reclaim((void *)f_24519,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_24525,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t3,a[5]=t4,a[6]=t5,a[7]=t6,a[8]=t7,a[9]=t8,a[10]=t9,a[11]=((C_word)li163),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3376: test */
t11=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t11;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t10;
((C_proc)(void*)(*((C_word*)t11+1)))(10,av2);}}

/* a24524 */
static void C_ccall f_24525(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_24525,c,av);}
/* irregex-core.scm:3377: fail */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=t1;
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
av2[4]=((C_word*)t0)[5];
av2[5]=((C_word*)t0)[6];
av2[6]=((C_word*)t0)[7];
av2[7]=((C_word*)t0)[8];
av2[8]=((C_word*)t0)[9];
av2[9]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}

/* k24559 in k24443 in k24440 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_24561(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_24561,c,av);}
/* irregex-core.scm:3353: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_23324(t2,((C_word*)t0)[3],((C_word*)t0)[4],C_fixnum_plus(C_fixnum_plus(((C_word*)t0)[5],((C_word*)t0)[6]),t1),((C_word*)t0)[7],((C_word*)t0)[8]);}

/* f_24566 in k24443 in k24440 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_24566(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_24566,c,av);}
/* irregex-core.scm:3359: fail */
t10=t9;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* k24596 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_24598(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_24598,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24601,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
t3=C_eqp(C_u_i_car(((C_word*)t0)[4]),lf[191]);
if(C_truep(t3)){
t4=t2;
f_24601(t4,(C_truep(t3)?*((C_word*)lf[241]+1):*((C_word*)lf[242]+1)));}
else{
t4=C_fixnum_and(((C_word*)t0)[5],C_fix(2));
t5=C_eqp(C_fix(2),t4);
t6=t2;
f_24601(t6,(C_truep(t5)?*((C_word*)lf[241]+1):*((C_word*)lf[242]+1)));}}

/* k24599 in k24596 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_fcall f_24601(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,10)))){
C_save_and_reclaim_args((void *)trf_24601,2,t0,t1);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_24602,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word)li167),tmp=(C_word)a,a+=6,tmp);
t3=((C_word*)t0)[4];{
C_word av2[2];
av2[0]=t3;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* f_24602 in k24599 in k24596 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in ... */
static void C_ccall f_24602(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,3)))){
C_save_and_reclaim((void *)f_24602,c,av);}
a=C_alloc(13);
t10=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_24606,a[2]=t9,a[3]=t1,a[4]=((C_word*)t0)[2],a[5]=t2,a[6]=t3,a[7]=t8,a[8]=((C_word*)t0)[3],a[9]=t4,a[10]=t5,a[11]=t6,a[12]=t7,tmp=(C_word)a,a+=13,tmp);
/* irregex-core.scm:3388: irregex-match-substring */
t11=*((C_word*)lf[40]+1);{
C_word *av2=av;
av2[0]=t11;
av2[1]=t10;
av2[2]=t8;
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t11+1)))(4,av2);}}

/* k24604 */
static void C_ccall f_24606(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,8)))){
C_save_and_reclaim((void *)f_24606,c,av);}
a=C_alloc(13);
if(C_truep(C_i_not(t1))){
/* irregex-core.scm:3390: fail */
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}
else{
t2=C_i_string_length(t1);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_24624,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)[2],a[7]=((C_word*)t0)[8],a[8]=t1,a[9]=t4,a[10]=((C_word)li166),tmp=(C_word)a,a+=11,tmp));
t6=((C_word*)t4)[1];
f_24624(t6,((C_word*)t0)[3],((C_word*)t0)[9],((C_word*)t0)[10],((C_word*)t0)[11],((C_word*)t0)[12],C_fix(0),t2);}}

/* lp in k24604 */
static void C_fcall f_24624(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5,C_word t6,C_word t7){
C_word tmp;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(20,0,4)))){
C_save_and_reclaim_args((void *)trf_24624,8,t0,t1,t2,t3,t4,t5,t6,t7);}
a=C_alloc(20);
t8=C_fixnum_difference(t5,t4);
if(C_truep(C_fixnum_less_or_equal_p(t7,t8))){
t9=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_24637,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t2,a[7]=t3,a[8]=t4,a[9]=t7,a[10]=t5,a[11]=((C_word*)t0)[5],a[12]=((C_word*)t0)[6],tmp=(C_word)a,a+=13,tmp);
t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_24651,a[2]=((C_word*)t0)[7],a[3]=t9,a[4]=t3,a[5]=t4,a[6]=t7,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:3401: scheme#substring */
t11=*((C_word*)lf[46]+1);{
C_word av2[5];
av2[0]=t11;
av2[1]=t10;
av2[2]=((C_word*)t0)[8];
av2[3]=t6;
av2[4]=C_i_string_length(((C_word*)t0)[8]);
((C_proc)(void*)(*((C_word*)t11+1)))(5,av2);}}
else{
t9=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_24669,a[2]=((C_word*)t0)[3],a[3]=t5,a[4]=t4,a[5]=t6,a[6]=((C_word*)t0)[9],a[7]=t1,a[8]=t7,a[9]=((C_word*)t0)[6],a[10]=t2,tmp=(C_word)a,a+=11,tmp);
t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_24724,a[2]=((C_word*)t0)[7],a[3]=t9,a[4]=t3,a[5]=t4,a[6]=t5,tmp=(C_word)a,a+=7,tmp);
t11=C_fixnum_difference(t5,t4);
/* irregex-core.scm:3408: scheme#substring */
t12=*((C_word*)lf[46]+1);{
C_word av2[5];
av2[0]=t12;
av2[1]=t10;
av2[2]=((C_word*)t0)[8];
av2[3]=t6;
av2[4]=C_fixnum_plus(t6,t11);
((C_proc)(void*)(*((C_word*)t12+1)))(5,av2);}}}

/* k24635 in lp in k24604 */
static void C_ccall f_24637(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_24637,c,av);}
if(C_truep(t1)){
/* irregex-core.scm:3403: next */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
av2[5]=((C_word*)t0)[7];
av2[6]=C_fixnum_plus(((C_word*)t0)[8],((C_word*)t0)[9]);
av2[7]=((C_word*)t0)[10];
av2[8]=((C_word*)t0)[11];
av2[9]=((C_word*)t0)[12];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}
else{
/* irregex-core.scm:3405: fail */
t2=((C_word*)t0)[12];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k24649 in lp in k24604 */
static void C_ccall f_24651(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,4)))){
C_save_and_reclaim((void *)f_24651,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24655,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3402: scheme#substring */
t3=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=C_fixnum_plus(((C_word*)t0)[5],((C_word*)t0)[6]);
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}

/* k24653 in k24649 in lp in k24604 */
static void C_ccall f_24655(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_24655,c,av);}
/* irregex-core.scm:3401: compare */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k24667 in lp in k24604 */
static void C_ccall f_24669(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,2)))){
C_save_and_reclaim((void *)f_24669,c,av);}
a=C_alloc(10);
if(C_truep(t1)){
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(0));
t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_24675,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],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);
/* irregex-core.scm:3410: g4824 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
/* irregex-core.scm:3420: fail */
t2=((C_word*)t0)[9];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[7];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k24673 in k24667 in lp in k24604 */
static void C_ccall f_24675(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,2)))){
C_save_and_reclaim((void *)f_24675,c,av);}
a=C_alloc(10);
if(C_truep(t1)){
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_24688,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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);
/* irregex-core.scm:3412: g4826 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
/* irregex-core.scm:3418: fail */
t2=((C_word*)t0)[9];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[7];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k24686 in k24673 in k24667 in lp in k24604 */
static void C_ccall f_24688(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_24688,c,av);}
a=C_alloc(11);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_24695,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
/* irregex-core.scm:3412: g4828 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[8];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k24693 in k24686 in k24673 in k24667 in lp in k24604 */
static void C_ccall f_24695(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_24695,c,av);}
a=C_alloc(11);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(3));
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_24702,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((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);
/* irregex-core.scm:3412: g4830 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[8];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k24700 in k24693 in k24686 in k24673 in k24667 in lp in k24604 */
static void C_ccall f_24702(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,7)))){
C_save_and_reclaim((void *)f_24702,c,av);}
a=C_alloc(15);
t2=C_a_i_fixnum_difference(&a,2,((C_word*)t0)[2],((C_word*)t0)[3]);
t3=C_s_a_u_i_integer_plus(&a,2,((C_word*)t0)[4],t2);
t4=C_a_i_fixnum_difference(&a,2,((C_word*)t0)[2],((C_word*)t0)[3]);
/* irregex-core.scm:3412: lp */
t5=((C_word*)((C_word*)t0)[5])[1];
f_24624(t5,((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8],((C_word*)t0)[9],t1,t3,C_fixnum_difference(((C_word*)t0)[10],t4));}

/* k24722 in lp in k24604 */
static void C_ccall f_24724(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,4)))){
C_save_and_reclaim((void *)f_24724,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24728,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3409: scheme#substring */
t3=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}

/* k24726 in k24722 in lp in k24604 */
static void C_ccall f_24728(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_24728,c,av);}
/* irregex-core.scm:3408: compare */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k24813 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_24815(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,10)))){
C_save_and_reclaim((void *)f_24815,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24816,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word)li169),tmp=(C_word)a,a+=5,tmp);
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* f_24816 in k24813 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_24816(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,9)))){
C_save_and_reclaim((void *)f_24816,c,av);}
a=C_alloc(8);
t10=C_slot(t8,C_fix(1));
t11=C_fixnum_times(((C_word*)t0)[2],C_fix(4));
t12=C_slot(t10,t11);
t13=C_slot(t8,C_fix(1));
t14=C_fixnum_times(((C_word*)t0)[2],C_fix(4));
t15=C_fixnum_plus(C_fix(1),t14);
t16=C_slot(t13,t15);
t17=C_slot(t8,C_fix(1));
t18=C_fixnum_times(((C_word*)t0)[2],C_fix(4));
t19=C_i_vector_set(t17,t18,t4);
t20=C_slot(t8,C_fix(1));
t21=C_fixnum_times(((C_word*)t0)[2],C_fix(4));
t22=C_fixnum_plus(C_fix(1),t21);
t23=C_i_vector_set(t20,t22,t6);
t24=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_24864,a[2]=t8,a[3]=((C_word*)t0)[2],a[4]=t12,a[5]=t16,a[6]=t9,a[7]=((C_word)li168),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3447: body */
t25=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t25;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t24;
((C_proc)(void*)(*((C_word*)t25+1)))(10,av2);}}

/* a24863 */
static void C_ccall f_24864(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_24864,c,av);}
t2=C_slot(((C_word*)t0)[2],C_fix(1));
t3=C_fixnum_times(((C_word*)t0)[3],C_fix(4));
t4=C_i_vector_set(t2,t3,((C_word*)t0)[4]);
t5=C_slot(((C_word*)t0)[2],C_fix(1));
t6=C_fixnum_times(((C_word*)t0)[3],C_fix(4));
t7=C_fixnum_plus(C_fix(1),t6);
t8=C_i_vector_set(t5,t7,((C_word*)t0)[5]);
/* irregex-core.scm:3453: fail */
t9=((C_word*)t0)[6];{
C_word *av2=av;
av2[0]=t9;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t9+1)))(2,av2);}}

/* a24923 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_24924(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word t26;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,9)))){
C_save_and_reclaim((void *)f_24924,c,av);}
a=C_alloc(8);
t10=C_slot(t8,C_fix(1));
t11=C_fixnum_times(((C_word*)t0)[2],C_fix(4));
t12=C_fixnum_plus(C_fix(2),t11);
t13=C_slot(t10,t12);
t14=C_slot(t8,C_fix(1));
t15=C_fixnum_times(((C_word*)t0)[2],C_fix(4));
t16=C_slot(t14,C_fixnum_plus(C_fix(3),t15));
t17=C_slot(t8,C_fix(1));
t18=C_fixnum_times(((C_word*)t0)[2],C_fix(4));
t19=C_fixnum_plus(C_fix(2),t18);
t20=C_i_vector_set(t17,t19,t4);
t21=C_slot(t8,C_fix(1));
t22=C_fixnum_times(((C_word*)t0)[2],C_fix(4));
t23=C_fixnum_plus(C_fix(3),t22);
t24=C_i_vector_set(t21,t23,t6);
t25=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_24959,a[2]=t8,a[3]=((C_word*)t0)[2],a[4]=t13,a[5]=t16,a[6]=t9,a[7]=((C_word)li170),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3435: next */
t26=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t26;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t25;
((C_proc)(void*)(*((C_word*)t26+1)))(10,av2);}}

/* a24958 in a24923 in k23364 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 in ... */
static void C_ccall f_24959(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
if(c!=2) C_bad_argc_2(c,2,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_24959,c,av);}
t2=C_slot(((C_word*)t0)[2],C_fix(1));
t3=C_fixnum_times(((C_word*)t0)[3],C_fix(4));
t4=C_fixnum_plus(C_fix(2),t3);
t5=C_i_vector_set(t2,t4,((C_word*)t0)[4]);
t6=C_slot(((C_word*)t0)[2],C_fix(1));
t7=C_fixnum_times(((C_word*)t0)[3],C_fix(4));
t8=C_fixnum_plus(C_fix(3),t7);
t9=C_i_vector_set(t6,t8,((C_word*)t0)[5]);
/* irregex-core.scm:3441: fail */
t10=((C_word*)t0)[6];{
C_word *av2=av;
av2[0]=t10;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* f_25159 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_25159(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,9)))){
C_save_and_reclaim((void *)f_25159,c,av);}
a=C_alloc(8);
if(C_truep(C_fixnum_lessp(t6,t7))){
/* irregex-core.scm:3463: next */
t10=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t10;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=C_fixnum_plus(t6,C_fix(1));
av2[7]=t7;
av2[8]=t8;
av2[9]=t9;
((C_proc)(void*)(*((C_word*)t10+1)))(10,av2);}}
else{
t10=C_i_vector_ref(t2,C_fix(0));
t11=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_25179,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t3,a[6]=t8,a[7]=t9,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3464: g4920 */
t12=t10;{
C_word *av2=av;
av2[0]=t12;
av2[1]=t11;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t12+1)))(3,av2);}}}

/* k25177 */
static void C_ccall f_25179(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_25179,c,av);}
a=C_alloc(9);
if(C_truep(t1)){
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_25188,a[2]=((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);
/* irregex-core.scm:3466: g4925 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
/* irregex-core.scm:3470: fail */
t2=((C_word*)t0)[7];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k25186 in k25177 */
static void C_ccall f_25188(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,2)))){
C_save_and_reclaim((void *)f_25188,c,av);}
a=C_alloc(10);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_25194,a[2]=((C_word*)t0)[2],a[3]=((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);
/* irregex-core.scm:3466: g4927 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k25192 in k25186 in k25177 */
static void C_ccall f_25194(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_25194,c,av);}
a=C_alloc(11);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(3));
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_25200,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[2],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);
/* irregex-core.scm:3466: g4929 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k25198 in k25192 in k25186 in k25177 */
static void C_ccall f_25200(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_25200,c,av);}
/* irregex-core.scm:3469: next */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
av2[5]=((C_word*)t0)[7];
av2[6]=C_fixnum_plus(((C_word*)t0)[8],C_fix(1));
av2[7]=t1;
av2[8]=((C_word*)t0)[9];
av2[9]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}

/* f_25217 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_25217(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,9)))){
C_save_and_reclaim((void *)f_25217,c,av);}
a=C_alloc(8);
if(C_truep(C_fixnum_lessp(t6,t7))){
t10=C_i_string_ref(t5,t6);
t11=C_eqp(C_make_character(10),t10);
if(C_truep(C_i_not(t11))){
t12=C_a_i_fixnum_plus(&a,2,t6,C_fix(1));
/* irregex-core.scm:3475: next */
t13=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t13;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t12;
av2[7]=t7;
av2[8]=t8;
av2[9]=t9;
((C_proc)(void*)(*((C_word*)t13+1)))(10,av2);}}
else{
/* irregex-core.scm:3476: fail */
t12=t9;{
C_word *av2=av;
av2[0]=t12;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t12+1)))(2,av2);}}}
else{
t10=C_i_vector_ref(t2,C_fix(0));
t11=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_25254,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t3,a[6]=t8,a[7]=t9,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3477: g4940 */
t12=t10;{
C_word *av2=av;
av2[0]=t12;
av2[1]=t11;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t12+1)))(3,av2);}}}

/* k25252 */
static void C_ccall f_25254(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_25254,c,av);}
a=C_alloc(9);
if(C_truep(t1)){
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_25263,a[2]=((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);
/* irregex-core.scm:3479: g4945 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
/* irregex-core.scm:3485: fail */
t2=((C_word*)t0)[7];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k25261 in k25252 */
static void C_ccall f_25263(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,2)))){
C_save_and_reclaim((void *)f_25263,c,av);}
a=C_alloc(10);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_25269,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);
/* irregex-core.scm:3479: g4947 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k25267 in k25261 in k25252 */
static void C_ccall f_25269(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_25269,c,av);}
a=C_alloc(11);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(3));
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_25275,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)[2],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);
/* irregex-core.scm:3479: g4949 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[7];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k25273 in k25267 in k25261 in k25252 */
static void C_ccall f_25275(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,9)))){
C_save_and_reclaim((void *)f_25275,c,av);}
a=C_alloc(5);
t2=C_i_string_ref(((C_word*)t0)[2],((C_word*)t0)[3]);
t3=C_eqp(C_make_character(10),t2);
if(C_truep(C_i_not(t3))){
t4=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[3],C_fix(1));
/* irregex-core.scm:3483: next */
t5=((C_word*)t0)[4];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t5;
av2[1]=((C_word*)t0)[5];
av2[2]=((C_word*)t0)[6];
av2[3]=((C_word*)t0)[7];
av2[4]=((C_word*)t0)[8];
av2[5]=((C_word*)t0)[2];
av2[6]=t4;
av2[7]=t1;
av2[8]=((C_word*)t0)[9];
av2[9]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t5+1)))(10,av2);}}
else{
/* irregex-core.scm:3484: fail */
t4=((C_word*)t0)[10];{
C_word *av2=av;
av2[0]=t4;
av2[1]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* f_25309 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_25309(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,9)))){
C_save_and_reclaim((void *)f_25309,c,av);}
t10=C_i_car(t3);
t11=C_eqp(t4,t10);
t12=(C_truep(t11)?C_i_eqvp(t6,C_u_i_cdr(t3)):C_SCHEME_FALSE);
if(C_truep(t12)){
/* irregex-core.scm:3489: next */
t13=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t13;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t6;
av2[7]=t7;
av2[8]=t8;
av2[9]=t9;
((C_proc)(void*)(*((C_word*)t13+1)))(10,av2);}}
else{
/* irregex-core.scm:3490: fail */
t13=t9;{
C_word *av2=av;
av2[0]=t13;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t13+1)))(2,av2);}}}

/* f_25339 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_25339(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(17,c,2)))){
C_save_and_reclaim((void *)f_25339,c,av);}
a=C_alloc(17);
t10=C_i_car(t3);
t11=C_eqp(t4,t10);
t12=(C_truep(t11)?C_i_eqvp(t6,C_u_i_cdr(t3)):C_SCHEME_FALSE);
t13=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_25349,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=t3,a[6]=t4,a[7]=t5,a[8]=t6,a[9]=t7,a[10]=t8,a[11]=t9,tmp=(C_word)a,a+=12,tmp);
if(C_truep(t12)){
t14=t13;
f_25349(t14,t12);}
else{
t14=C_i_vector_ref(t2,C_fix(2));
t15=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_25380,a[2]=t6,a[3]=t13,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3494: g4973 */
t16=t14;{
C_word *av2=av;
av2[0]=t16;
av2[1]=t15;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t16+1)))(3,av2);}}}

/* k25347 */
static void C_fcall f_25349(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,9)))){
C_save_and_reclaim_args((void *)trf_25349,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:3496: next */
t2=((C_word*)t0)[2];{
C_word av2[10];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
av2[5]=((C_word*)t0)[7];
av2[6]=((C_word*)t0)[8];
av2[7]=((C_word*)t0)[9];
av2[8]=((C_word*)t0)[10];
av2[9]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}
else{
/* irregex-core.scm:3497: fail */
t2=((C_word*)t0)[11];{
C_word av2[2];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k25378 */
static void C_ccall f_25380(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_25380,c,av);}
if(C_truep(C_fixnum_greaterp(((C_word*)t0)[2],t1))){
t2=C_fixnum_difference(((C_word*)t0)[2],C_fix(1));
t3=((C_word*)t0)[3];
f_25349(t3,C_eqp(C_make_character(10),C_i_string_ref(((C_word*)t0)[4],t2)));}
else{
t2=((C_word*)t0)[3];
f_25349(t2,C_SCHEME_FALSE);}}

/* f_25397 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_25397(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(28,c,2)))){
C_save_and_reclaim((void *)f_25397,c,av);}
a=C_alloc(28);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_25404,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=t3,a[6]=t4,a[7]=t5,a[8]=t6,a[9]=t7,a[10]=t8,a[11]=t9,tmp=(C_word)a,a+=12,tmp);
t11=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_25413,a[2]=t6,a[3]=t7,a[4]=t5,a[5]=t10,a[6]=t2,a[7]=t4,tmp=(C_word)a,a+=8,tmp);
t12=C_i_vector_ref(t2,C_fix(2));
t13=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_25497,a[2]=t6,a[3]=t5,a[4]=t11,a[5]=t2,a[6]=t3,a[7]=t4,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3500: g4984 */
t14=t12;{
C_word *av2=av;
av2[0]=t14;
av2[1]=t13;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t14+1)))(3,av2);}}

/* k25402 */
static void C_fcall f_25404(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,9)))){
C_save_and_reclaim_args((void *)trf_25404,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:3511: next */
t2=((C_word*)t0)[2];{
C_word av2[10];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
av2[5]=((C_word*)t0)[7];
av2[6]=((C_word*)t0)[8];
av2[7]=((C_word*)t0)[9];
av2[8]=((C_word*)t0)[10];
av2[9]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}
else{
/* irregex-core.scm:3512: fail */
t2=((C_word*)t0)[11];{
C_word av2[2];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k25411 */
static void C_fcall f_25413(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,0,2)))){
C_save_and_reclaim_args((void *)trf_25413,2,t0,t1);}
a=C_alloc(4);
if(C_truep(t1)){
if(C_truep(C_fixnum_lessp(((C_word*)t0)[2],((C_word*)t0)[3]))){
t2=C_i_string_ref(((C_word*)t0)[4],((C_word*)t0)[2]);
t3=C_u_i_char_alphabeticp(t2);
t4=((C_word*)t0)[5];
f_25404(t4,(C_truep(t3)?t3:C_u_i_char_numericp(t2)));}
else{
t2=C_i_vector_ref(((C_word*)t0)[6],C_fix(0));
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25432,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3506: g4991 */
t4=t2;{
C_word av2[3];
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[7];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}}
else{
t2=((C_word*)t0)[5];
f_25404(t2,C_SCHEME_FALSE);}}

/* k25430 in k25411 */
static void C_ccall f_25432(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_25432,c,av);}
a=C_alloc(5);
if(C_truep(t1)){
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_25449,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3509: g4994 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t2=((C_word*)t0)[3];
f_25404(t2,C_SCHEME_FALSE);}}

/* k25447 in k25430 in k25411 */
static void C_ccall f_25449(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_25449,c,av);}
a=C_alloc(4);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25456,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3509: g4996 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k25454 in k25447 in k25430 in k25411 */
static void C_ccall f_25456(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_25456,c,av);}
t2=C_i_string_ref(((C_word*)t0)[2],t1);
t3=C_u_i_char_alphabeticp(t2);
t4=((C_word*)t0)[3];
f_25404(t4,(C_truep(t3)?t3:C_u_i_char_numericp(t2)));}

/* k25475 in k25495 */
static void C_ccall f_25477(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_25477,c,av);}
t2=C_i_not(t1);
if(C_truep(t2)){
t3=((C_word*)t0)[2];
f_25413(t3,t2);}
else{
t3=C_u_i_char_alphabeticp(t1);
t4=(C_truep(t3)?t3:C_u_i_char_numericp(t1));
t5=((C_word*)t0)[2];
f_25413(t5,C_i_not(t4));}}

/* k25495 */
static void C_ccall f_25497(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,4)))){
C_save_and_reclaim((void *)f_25497,c,av);}
a=C_alloc(3);
if(C_truep(C_fixnum_greaterp(((C_word*)t0)[2],t1))){
t2=C_fixnum_difference(((C_word*)t0)[2],C_fix(1));
t3=C_i_string_ref(((C_word*)t0)[3],t2);
t4=C_u_i_char_alphabeticp(t3);
t5=(C_truep(t4)?t4:C_u_i_char_numericp(t3));
t6=((C_word*)t0)[4];
f_25413(t6,C_i_not(t5));}
else{
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_25477,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3502: chunker-prev-char */
f_8597(t2,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}}

/* f_25504 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_25504(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,2)))){
C_save_and_reclaim((void *)f_25504,c,av);}
a=C_alloc(15);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_25511,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=t3,a[6]=t4,a[7]=t5,a[8]=t6,a[9]=t7,a[10]=t8,a[11]=t9,tmp=(C_word)a,a+=12,tmp);
if(C_truep(C_fixnum_greater_or_equal_p(t6,t7))){
t11=C_i_vector_ref(t2,C_fix(0));
t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_25530,a[2]=t10,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3515: g5007 */
t13=t11;{
C_word *av2=av;
av2[0]=t13;
av2[1]=t12;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t13+1)))(3,av2);}}
else{
t11=t10;
f_25511(t11,C_SCHEME_FALSE);}}

/* k25509 */
static void C_fcall f_25511(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,9)))){
C_save_and_reclaim_args((void *)trf_25511,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:3516: next */
t2=((C_word*)t0)[2];{
C_word av2[10];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
av2[5]=((C_word*)t0)[7];
av2[6]=((C_word*)t0)[8];
av2[7]=((C_word*)t0)[9];
av2[8]=((C_word*)t0)[10];
av2[9]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}
else{
/* irregex-core.scm:3517: fail */
t2=((C_word*)t0)[11];{
C_word av2[2];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k25528 */
static void C_ccall f_25530(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_25530,c,av);}
t2=((C_word*)t0)[2];
f_25511(t2,C_i_not(t1));}

/* f_25537 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_25537(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(16,c,2)))){
C_save_and_reclaim((void *)f_25537,c,av);}
a=C_alloc(16);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_25544,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=t3,a[6]=t4,a[7]=t5,a[8]=t6,a[9]=t7,a[10]=t8,a[11]=t9,tmp=(C_word)a,a+=12,tmp);
if(C_truep(C_fixnum_lessp(t6,t7))){
t11=t10;
f_25544(t11,C_eqp(C_make_character(10),C_i_string_ref(t5,t6)));}
else{
t11=C_i_vector_ref(t2,C_fix(0));
t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25567,a[2]=t10,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3522: g5018 */
t13=t11;{
C_word *av2=av;
av2[0]=t13;
av2[1]=t12;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t13+1)))(3,av2);}}}

/* k25542 */
static void C_fcall f_25544(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,9)))){
C_save_and_reclaim_args((void *)trf_25544,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:3528: next */
t2=((C_word*)t0)[2];{
C_word av2[10];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
av2[5]=((C_word*)t0)[7];
av2[6]=((C_word*)t0)[8];
av2[7]=((C_word*)t0)[9];
av2[8]=((C_word*)t0)[10];
av2[9]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}
else{
/* irregex-core.scm:3529: fail */
t2=((C_word*)t0)[11];{
C_word av2[2];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k25565 */
static void C_ccall f_25567(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_25567,c,av);}
a=C_alloc(5);
if(C_truep(C_i_not(t1))){
t2=((C_word*)t0)[2];
f_25544(t2,C_SCHEME_TRUE);}
else{
t2=C_i_vector_ref(((C_word*)t0)[3],C_fix(1));
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_25588,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3526: g5020 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}}

/* k25586 in k25565 */
static void C_ccall f_25588(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_25588,c,av);}
a=C_alloc(4);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25595,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3526: g5022 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k25593 in k25586 in k25565 */
static void C_ccall f_25595(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_25595,c,av);}
t2=((C_word*)t0)[2];
f_25544(t2,C_eqp(C_make_character(10),C_i_string_ref(((C_word*)t0)[3],t1)));}

/* f_25602 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_25602(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(23,c,3)))){
C_save_and_reclaim((void *)f_25602,c,av);}
a=C_alloc(23);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_25609,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=t3,a[6]=t4,a[7]=t5,a[8]=t6,a[9]=t7,a[10]=t8,a[11]=t9,tmp=(C_word)a,a+=12,tmp);
t11=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_25618,a[2]=t2,a[3]=t6,a[4]=t5,a[5]=t10,a[6]=t3,a[7]=t4,tmp=(C_word)a,a+=8,tmp);
if(C_truep(C_fixnum_lessp(t6,t7))){
t12=C_i_string_ref(t5,t6);
t13=C_u_i_char_alphabeticp(t12);
t14=(C_truep(t13)?t13:C_u_i_char_numericp(t12));
t15=t11;
f_25618(t15,C_i_not(t14));}
else{
t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_25671,a[2]=t11,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3534: chunker-next-char */
f_8627(t12,t2,t4);}}

/* k25607 */
static void C_fcall f_25609(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,9)))){
C_save_and_reclaim_args((void *)trf_25609,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:3540: next */
t2=((C_word*)t0)[2];{
C_word av2[10];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
av2[5]=((C_word*)t0)[7];
av2[6]=((C_word*)t0)[8];
av2[7]=((C_word*)t0)[9];
av2[8]=((C_word*)t0)[10];
av2[9]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}
else{
/* irregex-core.scm:3541: fail */
t2=((C_word*)t0)[11];{
C_word av2[2];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k25616 */
static void C_fcall f_25618(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,2)))){
C_save_and_reclaim_args((void *)trf_25618,2,t0,t1);}
a=C_alloc(8);
if(C_truep(t1)){
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_25654,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3536: g5037 */
t4=t2;{
C_word av2[3];
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[7];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t2=((C_word*)t0)[5];
f_25609(t2,C_SCHEME_FALSE);}}

/* k25636 in k25652 in k25616 */
static void C_ccall f_25638(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_25638,c,av);}
t2=C_i_not(t1);
if(C_truep(t2)){
t3=((C_word*)t0)[2];
f_25609(t3,t2);}
else{
t3=C_u_i_char_alphabeticp(t1);
t4=((C_word*)t0)[2];
f_25609(t4,(C_truep(t3)?t3:C_u_i_char_numericp(t1)));}}

/* k25652 in k25616 */
static void C_ccall f_25654(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,4)))){
C_save_and_reclaim((void *)f_25654,c,av);}
a=C_alloc(3);
if(C_truep(C_fixnum_greaterp(((C_word*)t0)[2],t1))){
t2=C_fixnum_difference(((C_word*)t0)[2],C_fix(1));
t3=C_i_string_ref(((C_word*)t0)[3],t2);
t4=C_u_i_char_alphabeticp(t3);
t5=((C_word*)t0)[4];
f_25609(t5,(C_truep(t4)?t4:C_u_i_char_numericp(t3)));}
else{
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_25638,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3538: chunker-prev-char */
f_8597(t2,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}}

/* k25669 */
static void C_ccall f_25671(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_25671,c,av);}
t2=C_i_not(t1);
if(C_truep(t2)){
t3=((C_word*)t0)[2];
f_25618(t3,t2);}
else{
t3=C_u_i_char_alphabeticp(t1);
t4=(C_truep(t3)?t3:C_u_i_char_numericp(t1));
t5=((C_word*)t0)[2];
f_25618(t5,C_i_not(t4));}}

/* f_25691 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_25691(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,3)))){
C_save_and_reclaim((void *)f_25691,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_25695,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=t3,a[6]=t4,a[7]=t5,a[8]=t6,a[9]=t7,a[10]=t8,a[11]=t9,tmp=(C_word)a,a+=12,tmp);
if(C_truep(C_fixnum_lessp(t6,t7))){
t11=t10;{
C_word *av2=av;
av2[0]=t11;
av2[1]=C_i_string_ref(t5,t6);
f_25695(2,av2);}}
else{
/* irregex-core.scm:3546: chunker-next-char */
f_8627(t10,t2,t4);}}

/* k25693 */
static void C_ccall f_25695(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(21,c,2)))){
C_save_and_reclaim((void *)f_25695,c,av);}
a=C_alloc(21);
t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_25698,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((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,tmp=(C_word)a,a+=13,tmp);
t3=C_i_vector_ref(((C_word*)t0)[4],C_fix(2));
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_25749,a[2]=((C_word*)t0)[8],a[3]=t2,a[4]=((C_word*)t0)[7],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);
/* irregex-core.scm:3547: g5053 */
t5=t3;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t5;
av2[1]=t4;
av2[2]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k25696 in k25693 */
static void C_ccall f_25698(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,2)))){
C_save_and_reclaim((void *)f_25698,c,av);}
a=C_alloc(12);
t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_25704,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],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)[12])){
if(C_truep(t1)){
t3=C_u_i_char_alphabeticp(((C_word*)t0)[12]);
t4=(C_truep(t3)?t3:C_u_i_char_numericp(((C_word*)t0)[12]));
if(C_truep(t4)){
t5=C_u_i_char_alphabeticp(t1);
t6=t2;
f_25704(t6,(C_truep(t5)?t5:C_u_i_char_numericp(t1)));}
else{
t5=C_u_i_char_alphabeticp(t1);
t6=(C_truep(t5)?t5:C_u_i_char_numericp(t1));
t7=t2;
f_25704(t7,C_i_not(t6));}}
else{
t3=t2;
f_25704(t3,C_SCHEME_FALSE);}}
else{
t3=t2;
f_25704(t3,C_SCHEME_FALSE);}}

/* k25702 in k25696 in k25693 */
static void C_fcall f_25704(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,9)))){
C_save_and_reclaim_args((void *)trf_25704,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:3554: next */
t2=((C_word*)t0)[2];{
C_word av2[10];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
av2[5]=((C_word*)t0)[7];
av2[6]=((C_word*)t0)[8];
av2[7]=((C_word*)t0)[9];
av2[8]=((C_word*)t0)[10];
av2[9]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t2+1)))(10,av2);}}
else{
/* irregex-core.scm:3555: fail */
t2=((C_word*)t0)[11];{
C_word av2[2];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k25747 in k25693 */
static void C_ccall f_25749(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_25749,c,av);}
if(C_truep(C_fixnum_greaterp(((C_word*)t0)[2],t1))){
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_i_string_ref(((C_word*)t0)[4],C_fixnum_difference(((C_word*)t0)[2],C_fix(1)));
f_25698(2,av2);}}
else{
/* irregex-core.scm:3549: chunker-prev-char */
f_8597(((C_word*)t0)[3],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}}

/* f_25813 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_25813(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,3)))){
C_save_and_reclaim((void *)f_25813,c,av);}
a=C_alloc(12);
if(C_truep(C_fixnum_greater_or_equal_p(t6,t7))){
t10=C_i_vector_ref(t2,C_fix(0));
t11=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_25830,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t8,a[6]=t9,a[7]=((C_word*)t0)[3],a[8]=t1,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:3568: g5080 */
t12=t10;{
C_word *av2=av;
av2[0]=t12;
av2[1]=t11;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t12+1)))(3,av2);}}
else{
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_25898,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t2,a[6]=t3,a[7]=t4,a[8]=t5,a[9]=t7,a[10]=t8,a[11]=t9,tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3580: scheme#char-ci=? */
t11=*((C_word*)lf[250]+1);{
C_word *av2=av;
av2[0]=t11;
av2[1]=t10;
av2[2]=((C_word*)t0)[3];
av2[3]=C_i_string_ref(t5,t6);
((C_proc)(void*)(*((C_word*)t11+1)))(4,av2);}}}

/* k25828 */
static void C_ccall f_25830(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,3)))){
C_save_and_reclaim((void *)f_25830,c,av);}
a=C_alloc(12);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_25832,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)li181),tmp=(C_word)a,a+=10,tmp));
t5=((C_word*)t3)[1];
f_25832(t5,((C_word*)t0)[8],t1);}

/* lp in k25828 */
static void C_fcall f_25832(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,0,2)))){
C_save_and_reclaim_args((void *)trf_25832,3,t0,t1,t2);}
a=C_alloc(11);
if(C_truep(t2)){
t3=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_25842,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],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:3570: g5071 */
t5=t3;{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
/* irregex-core.scm:3579: fail */
t3=((C_word*)t0)[7];{
C_word av2[2];
av2[0]=t3;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k25840 in lp in k25828 */
static void C_ccall f_25842(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,2)))){
C_save_and_reclaim((void *)f_25842,c,av);}
a=C_alloc(12);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_25848,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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);
/* irregex-core.scm:3570: g5073 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k25846 in k25840 in lp in k25828 */
static void C_ccall f_25848(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,2)))){
C_save_and_reclaim((void *)f_25848,c,av);}
a=C_alloc(13);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(3));
t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_25854,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);
/* irregex-core.scm:3570: g5075 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k25852 in k25846 in k25840 in lp in k25828 */
static void C_ccall f_25854(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,3)))){
C_save_and_reclaim((void *)f_25854,c,av);}
a=C_alloc(12);
if(C_truep(C_fixnum_greater_or_equal_p(((C_word*)t0)[2],t1))){
t2=C_i_vector_ref(((C_word*)t0)[3],C_fix(0));
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25870,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3574: g5077 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_25876,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[9],a[9]=t1,a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3575: scheme#char-ci=? */
t3=*((C_word*)lf[250]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[12];
av2[3]=C_i_string_ref(((C_word*)t0)[9],((C_word*)t0)[2]);
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}}

/* k25868 in k25852 in k25846 in k25840 in lp in k25828 */
static void C_ccall f_25870(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_25870,c,av);}
/* irregex-core.scm:3574: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_25832(t2,((C_word*)t0)[3],t1);}

/* k25874 in k25852 in k25846 in k25840 in lp in k25828 */
static void C_ccall f_25876(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,9)))){
C_save_and_reclaim((void *)f_25876,c,av);}
a=C_alloc(5);
if(C_truep(t1)){
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(1));
/* irregex-core.scm:3576: next */
t3=((C_word*)t0)[3];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[4];
av2[2]=((C_word*)t0)[5];
av2[3]=((C_word*)t0)[6];
av2[4]=((C_word*)t0)[7];
av2[5]=((C_word*)t0)[8];
av2[6]=t2;
av2[7]=((C_word*)t0)[9];
av2[8]=((C_word*)t0)[10];
av2[9]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t3+1)))(10,av2);}}
else{
/* irregex-core.scm:3578: fail */
t2=((C_word*)t0)[11];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k25896 */
static void C_ccall f_25898(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,9)))){
C_save_and_reclaim((void *)f_25898,c,av);}
a=C_alloc(5);
if(C_truep(t1)){
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(1));
/* irregex-core.scm:3581: next */
t3=((C_word*)t0)[3];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[4];
av2[2]=((C_word*)t0)[5];
av2[3]=((C_word*)t0)[6];
av2[4]=((C_word*)t0)[7];
av2[5]=((C_word*)t0)[8];
av2[6]=t2;
av2[7]=((C_word*)t0)[9];
av2[8]=((C_word*)t0)[10];
av2[9]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t3+1)))(10,av2);}}
else{
/* irregex-core.scm:3582: fail */
t2=((C_word*)t0)[11];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* f_25912 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_25912(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,9)))){
C_save_and_reclaim((void *)f_25912,c,av);}
a=C_alloc(9);
if(C_truep(C_fixnum_greater_or_equal_p(t6,t7))){
t10=C_i_vector_ref(t2,C_fix(0));
t11=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_25929,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t8,a[7]=t9,a[8]=t1,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:3586: g5104 */
t12=t10;{
C_word *av2=av;
av2[0]=t12;
av2[1]=t11;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t12+1)))(3,av2);}}
else{
t10=C_i_string_ref(t5,t6);
if(C_truep(C_i_char_equalp(((C_word*)t0)[2],t10))){
t11=C_a_i_fixnum_plus(&a,2,t6,C_fix(1));
/* irregex-core.scm:3599: next */
t12=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t12;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
av2[5]=t5;
av2[6]=t11;
av2[7]=t7;
av2[8]=t8;
av2[9]=t9;
((C_proc)(void*)(*((C_word*)t12+1)))(10,av2);}}
else{
/* irregex-core.scm:3600: fail */
t11=t9;{
C_word *av2=av;
av2[0]=t11;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t11+1)))(2,av2);}}}}

/* k25927 */
static void C_ccall f_25929(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,3)))){
C_save_and_reclaim((void *)f_25929,c,av);}
a=C_alloc(12);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_25931,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)li183),tmp=(C_word)a,a+=10,tmp));
t5=((C_word*)t3)[1];
f_25931(t5,((C_word*)t0)[8],t1);}

/* lp in k25927 */
static void C_fcall f_25931(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,0,2)))){
C_save_and_reclaim_args((void *)trf_25931,3,t0,t1,t2);}
a=C_alloc(11);
if(C_truep(t2)){
t3=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_25941,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],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:3588: g5095 */
t5=t3;{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
/* irregex-core.scm:3597: fail */
t3=((C_word*)t0)[8];{
C_word av2[2];
av2[0]=t3;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k25939 in lp in k25927 */
static void C_ccall f_25941(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,2)))){
C_save_and_reclaim((void *)f_25941,c,av);}
a=C_alloc(12);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_25947,a[2]=((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],tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3588: g5097 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k25945 in k25939 in lp in k25927 */
static void C_ccall f_25947(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,2)))){
C_save_and_reclaim((void *)f_25947,c,av);}
a=C_alloc(13);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(3));
t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_25953,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);
/* irregex-core.scm:3588: g5099 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k25951 in k25945 in k25939 in lp in k25927 */
static void C_ccall f_25953(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,9)))){
C_save_and_reclaim((void *)f_25953,c,av);}
a=C_alloc(5);
if(C_truep(C_fixnum_greater_or_equal_p(((C_word*)t0)[2],t1))){
t2=C_i_vector_ref(((C_word*)t0)[3],C_fix(0));
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25969,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3592: g5101 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t2=C_i_string_ref(((C_word*)t0)[7],((C_word*)t0)[2]);
if(C_truep(C_i_char_equalp(((C_word*)t0)[8],t2))){
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(1));
/* irregex-core.scm:3594: next */
t4=((C_word*)t0)[9];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t4;
av2[1]=((C_word*)t0)[5];
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[10];
av2[4]=((C_word*)t0)[6];
av2[5]=((C_word*)t0)[7];
av2[6]=t3;
av2[7]=t1;
av2[8]=((C_word*)t0)[11];
av2[9]=((C_word*)t0)[12];
((C_proc)(void*)(*((C_word*)t4+1)))(10,av2);}}
else{
/* irregex-core.scm:3596: fail */
t3=((C_word*)t0)[12];{
C_word *av2=av;
av2[0]=t3;
av2[1]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}}

/* k25967 in k25951 in k25945 in k25939 in lp in k25927 */
static void C_ccall f_25969(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_25969,c,av);}
/* irregex-core.scm:3592: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_25931(t2,((C_word*)t0)[3],t1);}

/* k26025 in lp in k23273 in k16163 in k17021 in k17014 in k17011 in k16134 in k16131 in k16128 in k16125 in k16122 in k16116 in k16113 in k16110 in k16107 in chicken.irregex#sre->irregex in k7718 in k7493 in k7490 */
static void C_ccall f_26027(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_26027,c,av);}
a=C_alloc(3);
t2=(
/* irregex-core.scm:3603: sre-sequence */
  f_18122(C_a_i(&a,3),t1)
);
/* irregex-core.scm:3603: rec */
t3=((C_word*)t0)[2];
f_23327(t3,((C_word*)t0)[3],t2);}

/* chicken.irregex#sre-cset->procedure in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_26053(C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,10)))){
C_save_and_reclaim_args((void *)trf_26053,3,t1,t2,t3);}
a=C_alloc(5);
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_26055,a[2]=t3,a[3]=t2,a[4]=((C_word)li309),tmp=(C_word)a,a+=5,tmp);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* f_26055 in chicken.irregex#sre-cset->procedure in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26055(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7=av[7];
C_word t8=av[8];
C_word t9=av[9];
C_word t10;
C_word t11;
C_word t12;
C_word *a;
if(c!=10) C_bad_argc_2(c,10,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,3)))){
C_save_and_reclaim((void *)f_26055,c,av);}
a=C_alloc(12);
if(C_truep(C_fixnum_lessp(t6,t7))){
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_26068,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t2,a[6]=t3,a[7]=t4,a[8]=t5,a[9]=t7,a[10]=t8,a[11]=t9,tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3627: cset-contains? */
f_26844(t10,((C_word*)t0)[3],C_i_string_ref(t5,t6));}
else{
t10=C_i_vector_ref(t2,C_fix(0));
t11=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_26087,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t3,a[6]=t8,a[7]=t9,a[8]=((C_word*)t0)[3],tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:3630: g5145 */
t12=t10;{
C_word *av2=av;
av2[0]=t12;
av2[1]=t11;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t12+1)))(3,av2);}}}

/* k26066 */
static void C_ccall f_26068(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,9)))){
C_save_and_reclaim((void *)f_26068,c,av);}
a=C_alloc(5);
if(C_truep(t1)){
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(1));
/* irregex-core.scm:3628: next */
t3=((C_word*)t0)[3];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[4];
av2[2]=((C_word*)t0)[5];
av2[3]=((C_word*)t0)[6];
av2[4]=((C_word*)t0)[7];
av2[5]=((C_word*)t0)[8];
av2[6]=t2;
av2[7]=((C_word*)t0)[9];
av2[8]=((C_word*)t0)[10];
av2[9]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t3+1)))(10,av2);}}
else{
/* irregex-core.scm:3629: fail */
t2=((C_word*)t0)[11];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k26085 */
static void C_ccall f_26087(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,2)))){
C_save_and_reclaim((void *)f_26087,c,av);}
a=C_alloc(10);
if(C_truep(t1)){
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_26096,a[2]=((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);
/* irregex-core.scm:3632: g5150 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
/* irregex-core.scm:3638: fail */
t2=((C_word*)t0)[7];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k26094 in k26085 */
static void C_ccall f_26096(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_26096,c,av);}
a=C_alloc(11);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_26102,a[2]=((C_word*)t0)[2],a[3]=((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);
/* irregex-core.scm:3632: g5152 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k26100 in k26094 in k26085 */
static void C_ccall f_26102(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,2)))){
C_save_and_reclaim((void *)f_26102,c,av);}
a=C_alloc(12);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(3));
t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_26108,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[2],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);
/* irregex-core.scm:3632: g5154 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k26106 in k26100 in k26094 in k26085 */
static void C_ccall f_26108(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,3)))){
C_save_and_reclaim((void *)f_26108,c,av);}
a=C_alloc(12);
t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_26114,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
/* irregex-core.scm:3635: cset-contains? */
f_26844(t2,((C_word*)t0)[11],C_i_string_ref(((C_word*)t0)[8],((C_word*)t0)[2]));}

/* k26112 in k26106 in k26100 in k26094 in k26085 */
static void C_ccall f_26114(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,9)))){
C_save_and_reclaim((void *)f_26114,c,av);}
a=C_alloc(5);
if(C_truep(t1)){
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(1));
/* irregex-core.scm:3636: next */
t3=((C_word*)t0)[3];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[4];
av2[2]=((C_word*)t0)[5];
av2[3]=((C_word*)t0)[6];
av2[4]=((C_word*)t0)[7];
av2[5]=((C_word*)t0)[8];
av2[6]=t2;
av2[7]=((C_word*)t0)[9];
av2[8]=((C_word*)t0)[10];
av2[9]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t3+1)))(10,av2);}}
else{
/* irregex-core.scm:3637: fail */
t2=((C_word*)t0)[11];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* chicken.irregex#cset->plist in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_26266(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,4)))){
C_save_and_reclaim_args((void *)trf_26266,2,t1,t2);}
a=C_alloc(12);
t3=C_i_vector_length(t2);
t4=C_a_i_fixnum_difference(&a,2,t3,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|4,a[1]=(C_word)f_26278,a[2]=t2,a[3]=t6,a[4]=((C_word)li311),tmp=(C_word)a,a+=5,tmp));
t8=((C_word*)t6)[1];
f_26278(t8,t1,t4,C_SCHEME_END_OF_LIST);}

/* lp in chicken.irregex#cset->plist in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_26278(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,3)))){
C_save_and_reclaim_args((void *)trf_26278,4,t0,t1,t2,t3);}
a=C_alloc(6);
t4=C_eqp(t2,C_fix(-1));
if(C_truep(t4)){
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t5=C_fixnum_difference(t2,C_fix(1));
t6=C_i_vector_ref(((C_word*)t0)[2],t2);
t7=C_i_car(t6);
t8=C_i_vector_ref(((C_word*)t0)[2],t2);
t9=C_i_cdr(t8);
t10=C_a_i_cons(&a,2,t9,t3);
t11=C_a_i_cons(&a,2,t7,t10);
/* irregex-core.scm:3667: lp */
t13=t1;
t14=t5;
t15=t11;
t1=t13;
t2=t14;
t3=t15;
goto loop;}}

/* lp in k26643 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_26328(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,3)))){
C_save_and_reclaim_args((void *)trf_26328,4,t0,t1,t2,t3);}
a=C_alloc(10);
if(C_truep(C_i_nullp(t2))){
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=C_i_cddr(t2);
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_26346,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
t6=C_u_i_car(t2);
t7=C_u_i_cdr(t2);
t8=C_u_i_car(t7);
t9=C_a_i_cons(&a,2,t6,t8);
t10=C_a_i_vector1(&a,1,t9);
/* irregex-core.scm:3674: cset-union */
t11=lf[162];{
C_word av2[4];
av2[0]=t11;
av2[1]=t5;
av2[2]=t10;
av2[3]=t3;
f_26965(4,av2);}}}

/* k26344 in lp in k26643 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26346(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_26346,c,av);}
/* irregex-core.scm:3674: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_26328(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* chicken.irregex#string->cset in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_26357(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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,0,4)))){
C_save_and_reclaim_args((void *)trf_26357,2,t1,t2);}
a=C_alloc(9);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26363,a[2]=((C_word)li313),tmp=(C_word)a,a+=3,tmp);
t4=C_a_i_vector(&a,0);
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_26375,a[2]=t1,a[3]=t3,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
/* ##sys#string->list */
t6=*((C_word*)lf[105]+1);{
C_word av2[3];
av2[0]=t6;
av2[1]=t5;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* a26362 in chicken.irregex#string->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26363(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,3)))){
C_save_and_reclaim((void *)f_26363,c,av);}
a=C_alloc(5);
t4=C_a_i_cons(&a,2,t2,t2);
t5=C_a_i_vector1(&a,1,t4);
/* irregex-core.scm:3779: cset-union */
t6=lf[162];{
C_word *av2=av;
av2[0]=t6;
av2[1]=t1;
av2[2]=t3;
av2[3]=t5;
f_26965(4,av2);}}

/* k26373 in chicken.irregex#string->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26375(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_26375,c,av);}
/* irregex-core.scm:3677: fold */
f_9313(((C_word*)t0)[2],((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_26377(C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,4)))){
C_save_and_reclaim_args((void *)trf_26377,3,t1,t2,t3);}
a=C_alloc(6);
t4=C_i_pairp(t3);
t5=(C_truep(t4)?C_u_i_car(t3):C_SCHEME_FALSE);
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_26387,a[2]=t7,a[3]=((C_word)li323),tmp=(C_word)a,a+=4,tmp));
t9=((C_word*)t7)[1];
f_26387(t9,t1,t2,t5);}

/* lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_26387(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,0,4)))){
C_save_and_reclaim_args((void *)trf_26387,4,t0,t1,t2,t3);}
a=C_alloc(18);
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_26390,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word)li315),tmp=(C_word)a,a+=5,tmp);
if(C_truep(C_i_pairp(t2))){
if(C_truep(C_i_stringp(C_u_i_car(t2)))){
if(C_truep(t3)){
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26416,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3689: string->cset */
f_26357(t5,C_u_i_car(t2));}
else{
/* irregex-core.scm:3690: string->cset */
f_26357(t1,C_u_i_car(t2));}}
else{
t5=C_u_i_car(t2);
t6=C_eqp(t5,lf[179]);
if(C_truep(t6)){
t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26437,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_26441,a[2]=t2,a[3]=t7,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3694: rec */
t9=t4;
f_26390(t9,t8,C_i_cadr(t2));}
else{
t7=C_eqp(t5,lf[234]);
if(C_truep(t7)){
t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_26505,a[2]=t2,a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3696: rec */
t9=t4;
f_26390(t9,t8,C_i_cadr(t2));}
else{
t8=C_eqp(t5,lf[247]);
if(C_truep(t8)){
t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26567,a[2]=((C_word)li318),tmp=(C_word)a,a+=3,tmp);
t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_26575,a[2]=t2,a[3]=t1,a[4]=t9,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:3699: rec */
t11=t4;
f_26390(t11,t10,C_i_cadr(t2));}
else{
t9=C_eqp(t5,lf[52]);
if(C_truep(t9)){
t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_26635,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26645,a[2]=t10,tmp=(C_word)a,a+=3,tmp);
t12=C_u_i_cdr(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|3,a[1]=(C_word)f_18301,a[2]=t14,a[3]=((C_word)li321),tmp=(C_word)a,a+=4,tmp));
t16=((C_word*)t14)[1];
f_18301(t16,t11,t12,C_SCHEME_END_OF_LIST);}
else{
t10=C_eqp(t5,lf[103]);
if(C_truep(t10)){
t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_26660,a[2]=t2,a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3707: rec */
t12=t4;
f_26390(t12,t11,C_i_cadr(t2));}
else{
t11=C_eqp(t5,lf[225]);
if(C_truep(t11)){
t12=(
/* irregex-core.scm:3709: sre-alternate */
  f_18145(C_a_i(&a,3),C_u_i_cdr(t2))
);
/* irregex-core.scm:3709: lp */
t17=t1;
t18=t12;
t19=C_SCHEME_FALSE;
t1=t17;
t2=t18;
t3=t19;
goto loop;}
else{
t12=C_eqp(t5,lf[226]);
if(C_truep(t12)){
t13=(
/* irregex-core.scm:3711: sre-alternate */
  f_18145(C_a_i(&a,3),C_u_i_cdr(t2))
);
/* irregex-core.scm:3711: lp */
t17=t1;
t18=t13;
t19=C_SCHEME_TRUE;
t1=t17;
t2=t18;
t3=t19;
goto loop;}
else{
/* irregex-core.scm:3713: chicken.base#error */
t13=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t13;
av2[1]=t1;
av2[2]=lf[405];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t13+1)))(4,av2);}}}}}}}}}}
else{
if(C_truep(C_charp(t2))){
if(C_truep(t3)){
t5=C_a_i_cons(&a,2,t2,t2);
t6=C_a_i_vector1(&a,1,t5);
/* irregex-core.scm:3715: cset-case-insensitive */
f_27492(t1,t6);}
else{
t5=C_a_i_cons(&a,2,t2,t2);
t6=t1;{
C_word av2[2];
av2[0]=t6;
av2[1]=C_a_i_vector1(&a,1,t5);
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}}
else{
if(C_truep(C_i_stringp(t2))){
t5=C_a_i_list1(&a,1,t2);
/* irregex-core.scm:3717: rec */
t6=t4;
f_26390(t6,t1,t5);}
else{
t5=C_i_assq(t2,lf[248]);
if(C_truep(t5)){
/* irregex-core.scm:3721: rec */
t6=t4;
f_26390(t6,t1,C_i_cdr(t5));}
else{
/* irregex-core.scm:3722: chicken.base#error */
t6=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t6;
av2[1]=t1;
av2[2]=lf[406];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}}}}}

/* rec in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_26390(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,3)))){
C_save_and_reclaim_args((void *)trf_26390,3,t0,t1,t2);}
/* irregex-core.scm:3684: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_26387(t3,t1,t2,((C_word*)t0)[3]);}

/* k26414 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26416(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_26416,c,av);}
/* irregex-core.scm:3689: cset-case-insensitive */
f_27492(((C_word*)t0)[2],t1);}

/* k26435 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26437(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_26437,c,av);}
/* irregex-core.scm:3693: cset-complement */
f_27482(((C_word*)t0)[2],t1);}

/* k26439 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26441(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,c,3)))){
C_save_and_reclaim((void *)f_26441,c,av);}
a=C_alloc(18);
t2=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t3=t2;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=((C_word*)t4)[1];
t6=C_i_cddr(((C_word*)t0)[2]);
t7=C_i_check_list_2(t6,lf[211]);
t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_26454,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_26456,a[2]=t4,a[3]=t10,a[4]=((C_word*)t0)[4],a[5]=t5,a[6]=((C_word)li316),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
f_26456(t12,t8,t6);}

/* k26452 in k26439 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26454(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_26454,c,av);}
/* irregex-core.scm:3694: fold */
f_9313(((C_word*)t0)[2],lf[162],((C_word*)t0)[3],t1);}

/* map-loop5211 in k26439 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_26456(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_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_26456,3,t0,t1,t2);}
a=C_alloc(6);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_26481,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);
/* irregex-core.scm:3694: g5217 */
t4=((C_word*)t0)[4];
f_26390(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[5],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k26479 in map-loop5211 in k26439 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26481(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_26481,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
t3=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=((C_word*)((C_word*)t0)[3])[1];
f_26456(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* k26503 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26505(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,c,3)))){
C_save_and_reclaim((void *)f_26505,c,av);}
a=C_alloc(18);
t2=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t3=t2;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=((C_word*)t4)[1];
t6=C_i_cddr(((C_word*)t0)[2]);
t7=C_i_check_list_2(t6,lf[211]);
t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_26518,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_26520,a[2]=t4,a[3]=t10,a[4]=((C_word*)t0)[4],a[5]=t5,a[6]=((C_word)li317),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
f_26520(t12,t8,t6);}

/* k26516 in k26503 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26518(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_26518,c,av);}
/* irregex-core.scm:3696: fold */
f_9313(((C_word*)t0)[2],lf[404],((C_word*)t0)[3],t1);}

/* map-loop5237 in k26503 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_26520(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_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_26520,3,t0,t1,t2);}
a=C_alloc(6);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_26545,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);
/* irregex-core.scm:3696: g5243 */
t4=((C_word*)t0)[4];
f_26390(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[5],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k26543 in map-loop5237 in k26503 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26545(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_26545,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
t3=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=((C_word*)((C_word*)t0)[3])[1];
f_26520(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* a26566 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26567(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_26567,c,av);}
/* irregex-core.scm:3698: cset-difference */
f_27160(t1,t3,t2);}

/* k26573 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26575(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(19,c,3)))){
C_save_and_reclaim((void *)f_26575,c,av);}
a=C_alloc(19);
t2=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t3=t2;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=((C_word*)t4)[1];
t6=C_i_cddr(((C_word*)t0)[2]);
t7=C_i_check_list_2(t6,lf[211]);
t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_26588,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,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|6,a[1]=(C_word)f_26590,a[2]=t4,a[3]=t10,a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=((C_word)li319),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
f_26590(t12,t8,t6);}

/* k26586 in k26573 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26588(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_26588,c,av);}
/* irregex-core.scm:3698: fold */
f_9313(((C_word*)t0)[2],((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* map-loop5265 in k26573 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_26590(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_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_26590,3,t0,t1,t2);}
a=C_alloc(6);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_26615,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);
/* irregex-core.scm:3700: g5271 */
t4=((C_word*)t0)[4];
f_26390(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[5],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k26613 in map-loop5265 in k26573 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26615(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_26615,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
t3=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=((C_word*)((C_word*)t0)[3])[1];
f_26590(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* k26633 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26635(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_26635,c,av);}
if(C_truep(((C_word*)t0)[2])){
/* irregex-core.scm:3704: cset-case-insensitive */
f_27492(((C_word*)t0)[3],t1);}
else{
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k26643 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26645(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,4)))){
C_save_and_reclaim((void *)f_26645,c,av);}
a=C_alloc(7);
t2=C_a_i_vector(&a,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|3,a[1]=(C_word)f_26328,a[2]=t4,a[3]=((C_word)li320),tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
f_26328(t6,((C_word*)t0)[2],t1,t2);}

/* k26658 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26660(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(18,c,3)))){
C_save_and_reclaim((void *)f_26660,c,av);}
a=C_alloc(18);
t2=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t3=t2;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=((C_word*)t4)[1];
t6=C_i_cddr(((C_word*)t0)[2]);
t7=C_i_check_list_2(t6,lf[211]);
t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_26673,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
t11=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_26675,a[2]=t4,a[3]=t10,a[4]=((C_word*)t0)[4],a[5]=t5,a[6]=((C_word)li322),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
f_26675(t12,t8,t6);}

/* k26671 in k26658 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26673(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_26673,c,av);}
/* irregex-core.scm:3707: fold */
f_9313(((C_word*)t0)[2],lf[162],((C_word*)t0)[3],t1);}

/* map-loop5292 in k26658 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_26675(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_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_26675,3,t0,t1,t2);}
a=C_alloc(6);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_26700,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);
/* irregex-core.scm:3707: g5298 */
t4=((C_word*)t0)[4];
f_26390(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[5],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k26698 in map-loop5292 in k26658 in lp in chicken.irregex#sre->cset in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26700(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_26700,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
t3=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t2);
t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t2);
t5=((C_word*)((C_word*)t0)[3])[1];
f_26675(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* k26820 in k13385 in k13378 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_26822(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,1)))){
C_save_and_reclaim((void *)f_26822,c,av);}
a=C_alloc(9);
t2=C_a_i_cons(&a,2,lf[52],t1);
t3=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_a_i_list2(&a,2,t2,((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* a26823 in k13385 in k13378 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_26824(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,1)))){
C_save_and_reclaim((void *)f_26824,c,av);}
a=C_alloc(6);
t4=C_i_car(t2);
t5=C_u_i_cdr(t2);
t6=C_a_i_cons(&a,2,t5,t3);
t7=t1;{
C_word *av2=av;
av2[0]=t7;
av2[1]=C_a_i_cons(&a,2,t4,t6);
((C_proc)(void*)(*((C_word*)t7+1)))(2,av2);}}

/* k26840 in k13385 in k13378 in go in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_26842(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_26842,c,av);}
/* irregex-core.scm:3726: fold */
f_9313(((C_word*)t0)[2],((C_word*)t0)[3],C_SCHEME_END_OF_LIST,t1);}

/* chicken.irregex#cset-contains? in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_26844(C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,4)))){
C_save_and_reclaim_args((void *)trf_26844,3,t1,t2,t3);}
a=C_alloc(8);
t4=C_block_size(t2);
switch(t4){
case C_fix(0):
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}
case C_fix(1):
t5=C_i_vector_ref(t2,C_fix(0));
t6=C_u_i_cdr(t5);
t7=t1;{
C_word av2[2];
av2[0]=t7;
av2[1]=(C_truep(C_u_i_char_less_or_equal_p(t3,t6))?C_u_i_char_less_or_equal_p(C_u_i_car(t5),t3):C_SCHEME_FALSE);
((C_proc)(void*)(*((C_word*)t7+1)))(2,av2);}
default:
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_26877,a[2]=t2,a[3]=t3,a[4]=t6,a[5]=((C_word)li325),tmp=(C_word)a,a+=6,tmp));
t8=((C_word*)t6)[1];
f_26877(t8,t1,C_fix(0),t4);}}

/* lp in chicken.irregex#cset-contains? in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_26877(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,3)))){
C_save_and_reclaim_args((void *)trf_26877,4,t0,t1,t2,t3);}
a=C_alloc(5);
t4=C_fixnum_plus(t3,t2);
t5=C_fixnum_shift_right(t4,C_fix(1));
t6=C_i_vector_ref(((C_word*)t0)[2],t5);
t7=C_u_i_cdr(t6);
if(C_truep(C_u_i_char_lessp(t7,((C_word*)t0)[3]))){
t8=C_a_i_fixnum_plus(&a,2,t5,C_fix(1));
if(C_truep(C_fixnum_lessp(t8,t3))){
/* irregex-core.scm:3745: lp */
t10=t1;
t11=t8;
t12=t3;
t1=t10;
t2=t11;
t3=t12;
goto loop;}
else{
t9=t1;{
C_word av2[2];
av2[0]=t9;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t9+1)))(2,av2);}}}
else{
if(C_truep(C_i_char_lessp(((C_word*)t0)[3],C_u_i_car(t6)))){
if(C_truep(C_fixnum_lessp(t2,t5))){
/* irregex-core.scm:3747: lp */
t10=t1;
t11=t2;
t12=t5;
t1=t10;
t2=t11;
t3=t12;
goto loop;}
else{
t8=t1;{
C_word av2[2];
av2[0]=t8;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t8+1)))(2,av2);}}}
else{
t8=t1;{
C_word av2[2];
av2[0]=t8;
av2[1]=C_SCHEME_TRUE;
((C_proc)(void*)(*((C_word*)t8+1)))(2,av2);}}}}

/* chicken.irregex#char-ranges-union in k18847 in k7718 in k7493 in k7490 */
static C_word C_fcall f_26929(C_word *a,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_stack_overflow_check;{}
t3=C_i_car(t1);
t4=C_i_car(t2);
t5=C_i_char_less_or_equal_p(t3,t4);
t6=(C_truep(t5)?C_u_i_car(t1):C_u_i_car(t2));
if(C_truep(C_i_char_greater_or_equal_p(C_u_i_cdr(t1),C_u_i_cdr(t2)))){
t7=C_u_i_cdr(t1);
return(C_a_i_cons(&a,2,t6,t7));}
else{
t7=C_u_i_cdr(t2);
return(C_a_i_cons(&a,2,t6,t7));}}

/* chicken.irregex#cset-union in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26965(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_26965,c,av);}
a=C_alloc(4);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_26973,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3755: scheme#vector->list */
t5=*((C_word*)lf[163]+1);{
C_word *av2=av;
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k26971 in chicken.irregex#cset-union in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26973(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_26973,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_26977,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3756: scheme#vector->list */
t3=*((C_word*)lf[163]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k26975 in k26971 in chicken.irregex#cset-union in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26977(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,5)))){
C_save_and_reclaim((void *)f_26977,c,av);}
a=C_alloc(6);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_26979,a[2]=t3,a[3]=((C_word)li328),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_26979(t5,((C_word*)t0)[2],((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* union-range in k26975 in k26971 in chicken.irregex#cset-union in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_26979(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(19,0,4)))){
C_save_and_reclaim_args((void *)trf_26979,5,t0,t1,t2,t3,t4);}
a=C_alloc(19);
if(C_truep(C_i_nullp(t2))){
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26993,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26997,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27001,a[2]=t6,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3759: ##sys#fast-reverse */
t8=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t8;
av2[1]=t7;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t8+1)))(3,av2);}}
else{
if(C_truep(C_i_nullp(t3))){
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27014,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27018,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27022,a[2]=t6,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3760: ##sys#fast-reverse */
t8=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t8;
av2[1]=t7;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t8+1)))(3,av2);}}
else{
t5=C_i_car(t2);
t6=C_i_car(t3);
t7=C_i_cdr(t5);
t8=C_fix(C_character_code(t7));
t9=C_a_i_fixnum_plus(&a,2,t8,C_fix(1));
t10=C_i_car(t6);
t11=C_fix(C_character_code(t10));
if(C_truep(C_i_integer_lessp(t9,t11))){
t12=C_u_i_cdr(t2);
t13=C_a_i_cons(&a,2,t5,t4);
/* irregex-core.scm:3768: union-range */
t22=t1;
t23=t12;
t24=t3;
t25=t13;
t1=t22;
t2=t23;
t3=t24;
t4=t25;
goto loop;}
else{
t12=C_u_i_car(t5);
t13=C_fix(C_character_code(t12));
t14=C_u_i_cdr(t6);
t15=C_fix(C_character_code(t14));
t16=C_a_i_fixnum_plus(&a,2,t15,C_fix(1));
if(C_truep(C_i_integer_greaterp(t13,t16))){
t17=C_u_i_cdr(t3);
t18=C_a_i_cons(&a,2,t6,t4);
/* irregex-core.scm:3770: union-range */
t22=t1;
t23=t17;
t24=t2;
t25=t18;
t1=t22;
t2=t23;
t3=t24;
t4=t25;
goto loop;}
else{
if(C_truep(C_i_char_greater_or_equal_p(C_u_i_cdr(t5),C_u_i_car(t6)))){
t17=(
/* irregex-core.scm:3772: char-ranges-union */
  f_26929(C_a_i(&a,6),t5,t6)
);
t18=C_u_i_cdr(t2);
t19=C_a_i_cons(&a,2,t17,t18);
/* irregex-core.scm:3772: union-range */
t22=t1;
t23=t19;
t24=C_u_i_cdr(t3);
t25=t4;
t1=t22;
t2=t23;
t3=t24;
t4=t25;
goto loop;}
else{
t17=C_u_i_cdr(t2);
t18=(
/* irregex-core.scm:3776: char-ranges-union */
  f_26929(C_a_i(&a,6),t5,t6)
);
t19=C_u_i_cdr(t3);
t20=C_a_i_cons(&a,2,t18,t19);
/* irregex-core.scm:3775: union-range */
t22=t1;
t23=t17;
t24=t20;
t25=t4;
t1=t22;
t2=t23;
t3=t24;
t4=t25;
goto loop;}}}}}}

/* k26991 in union-range in k26975 in k26971 in chicken.irregex#cset-union in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26993(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_26993,c,av);}
/* irregex-core.scm:3759: scheme#list->vector */
t2=*((C_word*)lf[408]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k26995 in union-range in k26975 in k26971 in chicken.irregex#cset-union in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_26997(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_26997,c,av);}
/* irregex-core.scm:3759: ##sys#fast-reverse */
t2=*((C_word*)lf[69]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k26999 in union-range in k26975 in k26971 in chicken.irregex#cset-union in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27001(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_27001,c,av);}
/* irregex-core.scm:3759: scheme#append */
t2=*((C_word*)lf[73]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k27012 in union-range in k26975 in k26971 in chicken.irregex#cset-union in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27014(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_27014,c,av);}
/* irregex-core.scm:3760: scheme#list->vector */
t2=*((C_word*)lf[408]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k27016 in union-range in k26975 in k26971 in chicken.irregex#cset-union in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27018(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_27018,c,av);}
/* irregex-core.scm:3760: ##sys#fast-reverse */
t2=*((C_word*)lf[69]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k27020 in union-range in k26975 in k26971 in chicken.irregex#cset-union in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27022(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_27022,c,av);}
/* irregex-core.scm:3760: scheme#append */
t2=*((C_word*)lf[73]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* chicken.irregex#cset-difference in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_27160(C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,0,2)))){
C_save_and_reclaim_args((void *)trf_27160,3,t1,t2,t3);}
a=C_alloc(4);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27168,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3788: scheme#vector->list */
t5=*((C_word*)lf[163]+1);{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k27166 in chicken.irregex#cset-difference in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27168(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_27168,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27172,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3789: scheme#vector->list */
t3=*((C_word*)lf[163]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k27170 in k27166 in chicken.irregex#cset-difference in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27172(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,5)))){
C_save_and_reclaim((void *)f_27172,c,av);}
a=C_alloc(6);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_27174,a[2]=t3,a[3]=((C_word)li330),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_27174(t5,((C_word*)t0)[2],((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* diff in k27170 in k27166 in chicken.irregex#cset-difference in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_27174(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(17,0,4)))){
C_save_and_reclaim_args((void *)trf_27174,5,t0,t1,t2,t3,t4);}
a=C_alloc(17);
if(C_truep(C_i_nullp(t2))){
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27188,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3791: ##sys#fast-reverse */
t6=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t6;
av2[1]=t5;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}
else{
if(C_truep(C_i_nullp(t3))){
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27201,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27205,a[2]=t5,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3792: ##sys#fast-reverse */
t7=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t7;
av2[1]=t6;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t7+1)))(3,av2);}}
else{
t5=C_i_car(t2);
t6=C_i_car(t3);
t7=C_i_cdr(t5);
t8=C_i_car(t6);
if(C_truep(C_i_char_lessp(t7,t8))){
t9=C_u_i_cdr(t2);
t10=C_a_i_cons(&a,2,t5,t4);
/* irregex-core.scm:3798: diff */
t18=t1;
t19=t9;
t20=t3;
t21=t10;
t1=t18;
t2=t19;
t3=t20;
t4=t21;
goto loop;}
else{
if(C_truep(C_i_char_greaterp(C_u_i_car(t5),C_u_i_cdr(t6)))){
/* irregex-core.scm:3800: diff */
t18=t1;
t19=t2;
t20=C_u_i_cdr(t3);
t21=t4;
t1=t18;
t2=t19;
t3=t20;
t4=t21;
goto loop;}
else{
t9=C_i_char_less_or_equal_p(C_u_i_car(t6),C_u_i_car(t5));
t10=(C_truep(t9)?C_i_char_greater_or_equal_p(C_u_i_cdr(t6),C_u_i_cdr(t5)):C_SCHEME_FALSE);
if(C_truep(t10)){
/* irregex-core.scm:3803: diff */
t18=t1;
t19=C_u_i_cdr(t2);
t20=t3;
t21=t4;
t1=t18;
t2=t19;
t3=t20;
t4=t21;
goto loop;}
else{
t11=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_27251,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t3,a[6]=t2,a[7]=t5,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
if(C_truep(C_i_char_lessp(C_u_i_car(t5),C_u_i_car(t6)))){
t12=C_u_i_car(t5);
t13=C_u_i_car(t6);
t14=C_fix(C_character_code(t13));
t15=C_a_i_fixnum_difference(&a,2,t14,C_fix(1));
t16=C_make_character(C_unfix(t15));
t17=t11;
f_27251(t17,C_a_i_cons(&a,2,t12,t16));}
else{
t12=t11;
f_27251(t12,C_SCHEME_FALSE);}}}}}}}

/* k27186 in diff in k27170 in k27166 in chicken.irregex#cset-difference in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27188(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_27188,c,av);}
/* irregex-core.scm:3791: scheme#list->vector */
t2=*((C_word*)lf[408]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k27199 in diff in k27170 in k27166 in chicken.irregex#cset-difference in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27201(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_27201,c,av);}
/* irregex-core.scm:3792: scheme#list->vector */
t2=*((C_word*)lf[408]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k27203 in diff in k27170 in k27166 in chicken.irregex#cset-difference in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27205(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_27205,c,av);}
/* irregex-core.scm:3792: scheme#append */
t2=*((C_word*)lf[73]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k27249 in diff in k27170 in k27166 in chicken.irregex#cset-difference in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_27251(C_word t0,C_word t1){
C_word 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;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(16,0,2)))){
C_save_and_reclaim_args((void *)trf_27251,2,t0,t1);}
a=C_alloc(16);
t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_27254,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
if(C_truep(C_i_char_greaterp(C_u_i_cdr(((C_word*)t0)[7]),C_u_i_cdr(((C_word*)t0)[8])))){
t3=C_u_i_cdr(((C_word*)t0)[8]);
t4=C_fix(C_character_code(t3));
t5=C_a_i_fixnum_plus(&a,2,t4,C_fix(1));
t6=C_make_character(C_unfix(t5));
t7=C_u_i_cdr(((C_word*)t0)[7]);
t8=t2;
f_27254(t8,C_a_i_cons(&a,2,t6,t7));}
else{
t3=t2;
f_27254(t3,C_SCHEME_FALSE);}}

/* k27252 in k27249 in diff in k27170 in k27166 in chicken.irregex#cset-difference in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_27254(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,2)))){
C_save_and_reclaim_args((void *)trf_27254,2,t0,t1);}
a=C_alloc(10);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_27261,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],tmp=(C_word)a,a+=7,tmp);
if(C_truep(t1)){
t3=C_u_i_cdr(((C_word*)t0)[7]);
t4=t2;
f_27261(t4,C_a_i_cons(&a,2,t1,t3));}
else{
t3=t2;
f_27261(t3,C_u_i_cdr(((C_word*)t0)[7]));}}

/* k27259 in k27252 in k27249 in diff in k27170 in k27166 in chicken.irregex#cset-difference in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_27261(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,4)))){
C_save_and_reclaim_args((void *)trf_27261,2,t0,t1);}
a=C_alloc(3);
if(C_truep(((C_word*)t0)[2])){
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],((C_word*)t0)[3]);
/* irregex-core.scm:3810: diff */
t3=((C_word*)((C_word*)t0)[4])[1];
f_27174(t3,((C_word*)t0)[5],t1,((C_word*)t0)[6],t2);}
else{
/* irregex-core.scm:3810: diff */
t2=((C_word*)((C_word*)t0)[4])[1];
f_27174(t2,((C_word*)t0)[5],t1,((C_word*)t0)[6],((C_word*)t0)[3]);}}

/* chicken.irregex#cset-intersection in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27356(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_27356,c,av);}
a=C_alloc(4);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27364,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3821: scheme#vector->list */
t5=*((C_word*)lf[163]+1);{
C_word *av2=av;
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k27362 in chicken.irregex#cset-intersection in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27364(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_27364,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27368,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3822: scheme#vector->list */
t3=*((C_word*)lf[163]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k27366 in k27362 in chicken.irregex#cset-intersection in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27368(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,5)))){
C_save_and_reclaim((void *)f_27368,c,av);}
a=C_alloc(6);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_27370,a[2]=t3,a[3]=((C_word)li332),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_27370(t5,((C_word*)t0)[2],((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* intersect in k27366 in k27362 in chicken.irregex#cset-intersection in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_27370(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word t26;
C_word t27;
C_word t28;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,4)))){
C_save_and_reclaim_args((void *)trf_27370,5,t0,t1,t2,t3,t4);}
a=C_alloc(6);
t5=C_i_nullp(t2);
t6=(C_truep(t5)?t5:C_i_nullp(t3));
if(C_truep(t6)){
t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27387,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3825: ##sys#fast-reverse */
t8=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t8;
av2[1]=t7;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t8+1)))(3,av2);}}
else{
t7=C_i_car(t2);
t8=C_i_car(t3);
t9=C_i_cdr(t7);
t10=C_i_car(t8);
if(C_truep(C_i_char_lessp(t9,t10))){
/* irregex-core.scm:3830: intersect */
t25=t1;
t26=C_u_i_cdr(t2);
t27=t3;
t28=t4;
t1=t25;
t2=t26;
t3=t27;
t4=t28;
goto loop;}
else{
if(C_truep(C_i_char_greaterp(C_u_i_car(t7),C_u_i_cdr(t8)))){
/* irregex-core.scm:3832: intersect */
t25=t1;
t26=t2;
t27=C_u_i_cdr(t3);
t28=t4;
t1=t25;
t2=t26;
t3=t27;
t4=t28;
goto loop;}
else{
t11=C_u_i_car(t8);
t12=C_u_i_car(t7);
t13=C_i_char_lessp(t11,t12);
t14=(C_truep(t13)?t12:t11);
t15=C_u_i_cdr(t7);
t16=C_u_i_cdr(t8);
t17=C_i_char_lessp(t15,t16);
t18=(C_truep(t17)?C_a_i_cons(&a,2,t14,t15):C_a_i_cons(&a,2,t14,t16));
t19=C_i_char_greaterp(C_u_i_cdr(t7),C_u_i_cdr(t18));
t20=(C_truep(t19)?t2:C_u_i_cdr(t2));
t21=C_i_char_greaterp(C_u_i_cdr(t8),C_u_i_cdr(t18));
t22=(C_truep(t21)?t3:C_u_i_cdr(t3));
t23=C_a_i_cons(&a,2,t18,t4);
/* irregex-core.scm:3836: intersect */
t25=t1;
t26=t20;
t27=t22;
t28=t23;
t1=t25;
t2=t26;
t3=t27;
t4=t28;
goto loop;}}}}

/* k27385 in intersect in k27366 in k27362 in chicken.irregex#cset-intersection in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27387(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_27387,c,av);}
/* irregex-core.scm:3825: scheme#list->vector */
t2=*((C_word*)lf[408]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* chicken.irregex#cset-complement in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_27482(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,0,3)))){
C_save_and_reclaim_args((void *)trf_27482,2,t1,t2);}
a=C_alloc(4);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27490,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3843: sre->cset */
f_26377(t3,lf[53],C_SCHEME_END_OF_LIST);}

/* k27488 in chicken.irregex#cset-complement in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27490(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_27490,c,av);}
/* irregex-core.scm:3843: cset-difference */
f_27160(((C_word*)t0)[2],t1,((C_word*)t0)[3]);}

/* chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_27492(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,2)))){
C_save_and_reclaim_args((void *)trf_27492,2,t1,t2);}
a=C_alloc(3);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27500,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3847: scheme#vector->list */
t4=*((C_word*)lf[163]+1);{
C_word av2[3];
av2[0]=t4;
av2[1]=t3;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k27498 in chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27500(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,4)))){
C_save_and_reclaim((void *)f_27500,c,av);}
a=C_alloc(6);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_27502,a[2]=t3,a[3]=((C_word)li335),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_27502(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}

/* lp in k27498 in chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_27502(C_word t0,C_word 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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_27502,4,t0,t1,t2,t3);}
a=C_alloc(6);
if(C_truep(C_i_nullp(t2))){
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27516,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3848: ##sys#fast-reverse */
t5=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_27522,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
t5=C_i_caar(t2);
if(C_truep(C_u_i_char_alphabeticp(t5))){
t6=C_u_i_car(t2);
t7=t4;
f_27522(t7,C_u_i_char_alphabeticp(C_u_i_cdr(t6)));}
else{
t6=t4;
f_27522(t6,C_SCHEME_FALSE);}}}

/* k27514 in lp in k27498 in chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27516(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_27516,c,av);}
/* irregex-core.scm:3848: scheme#list->vector */
t2=*((C_word*)lf[408]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k27520 in lp in k27498 in chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_27522(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(22,0,2)))){
C_save_and_reclaim_args((void *)trf_27522,2,t0,t1);}
a=C_alloc(22);
if(C_truep(t1)){
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_27531,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27535,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27539,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27543,a[2]=((C_word*)t0)[2],a[3]=t5,tmp=(C_word)a,a+=4,tmp);
t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27567,a[2]=((C_word*)t0)[2],a[3]=t6,tmp=(C_word)a,a+=4,tmp);
t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27577,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3854: ##sys#fast-reverse */
t9=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t9;
av2[1]=t8;
av2[2]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t9+1)))(3,av2);}}
else{
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_27586,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27590,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27594,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27598,a[2]=((C_word*)t0)[2],a[3]=t5,tmp=(C_word)a,a+=4,tmp);
t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27608,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3859: ##sys#fast-reverse */
t8=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t8;
av2[1]=t7;
av2[2]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t8+1)))(3,av2);}}}

/* k27529 in k27520 in lp in k27498 in chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27531(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_27531,c,av);}
/* irregex-core.scm:3851: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_27502(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* k27533 in k27520 in lp in k27498 in chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27535(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_27535,c,av);}
/* irregex-core.scm:3852: ##sys#fast-reverse */
t2=*((C_word*)lf[69]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k27537 in k27520 in lp in k27498 in chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27539(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_27539,c,av);}
/* irregex-core.scm:3853: scheme#vector->list */
t2=*((C_word*)lf[163]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k27541 in k27520 in lp in k27498 in chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27543(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,3)))){
C_save_and_reclaim((void *)f_27543,c,av);}
a=C_alloc(5);
t2=C_i_caar(((C_word*)t0)[2]);
t3=C_u_i_char_upper_casep(t2);
t4=(C_truep(t3)?C_u_i_char_downcase(t2):C_u_i_char_upcase(t2));
t5=C_i_cdar(((C_word*)t0)[2]);
t6=C_u_i_char_upper_casep(t5);
t7=(C_truep(t6)?C_u_i_char_downcase(t5):C_u_i_char_upcase(t5));
t8=C_a_i_cons(&a,2,t4,t7);
t9=C_a_i_vector1(&a,1,t8);
/* irregex-core.scm:3854: cset-union */
t10=lf[162];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t10;
av2[1]=((C_word*)t0)[3];
av2[2]=t1;
av2[3]=t9;
f_26965(4,av2);}}

/* k27565 in k27520 in lp in k27498 in chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27567(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(2,c,3)))){
C_save_and_reclaim((void *)f_27567,c,av);}
a=C_alloc(2);
t2=C_u_i_car(((C_word*)t0)[2]);
t3=C_a_i_vector1(&a,1,t2);
/* irregex-core.scm:3854: cset-union */
t4=lf[162];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=((C_word*)t0)[3];
av2[2]=t1;
av2[3]=t3;
f_26965(4,av2);}}

/* k27575 in k27520 in lp in k27498 in chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27577(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_27577,c,av);}
/* irregex-core.scm:3854: scheme#list->vector */
t2=*((C_word*)lf[408]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k27584 in k27520 in lp in k27498 in chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27586(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_27586,c,av);}
/* irregex-core.scm:3858: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_27502(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* k27588 in k27520 in lp in k27498 in chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27590(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_27590,c,av);}
/* irregex-core.scm:3858: ##sys#fast-reverse */
t2=*((C_word*)lf[69]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k27592 in k27520 in lp in k27498 in chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27594(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_27594,c,av);}
/* irregex-core.scm:3858: scheme#vector->list */
t2=*((C_word*)lf[163]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k27596 in k27520 in lp in k27498 in chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27598(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(2,c,3)))){
C_save_and_reclaim((void *)f_27598,c,av);}
a=C_alloc(2);
t2=C_u_i_car(((C_word*)t0)[2]);
t3=C_a_i_vector1(&a,1,t2);
/* irregex-core.scm:3859: cset-union */
t4=lf[162];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=((C_word*)t0)[3];
av2[2]=t1;
av2[3]=t3;
f_26965(4,av2);}}

/* k27606 in k27520 in lp in k27498 in chicken.irregex#cset-case-insensitive in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27608(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_27608,c,av);}
/* irregex-core.scm:3859: scheme#list->vector */
t2=*((C_word*)lf[408]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* chicken.irregex#irregex-fold/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27623(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6;
C_word *a;
if(c<6) C_bad_min_argc_2(c,6,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-6)*C_SIZEOF_PAIR +8,c,4)))){
C_save_and_reclaim((void*)f_27623,c,av);}
a=C_alloc((c-6)*C_SIZEOF_PAIR+8);
t6=C_build_rest(&a,c,6,av);
C_word t7;
C_word t8;
C_word t9;
t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_27627,a[2]=t6,a[3]=t5,a[4]=t3,a[5]=t1,a[6]=t4,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
t8=C_i_stringp(t5);
if(C_truep(C_i_not(t8))){
/* irregex-core.scm:3866: chicken.base#error */
t9=*((C_word*)lf[30]+1);{
C_word *av2=av;
av2[0]=t9;
av2[1]=t7;
av2[2]=lf[410];
av2[3]=lf[413];
av2[4]=t5;
((C_proc)(void*)(*((C_word*)t9+1)))(5,av2);}}
else{
t9=t7;{
C_word *av2=av;
av2[0]=t9;
av2[1]=C_SCHEME_UNDEFINED;
f_27627(2,av2);}}}

/* k27625 in chicken.irregex#irregex-fold/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27627(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,2)))){
C_save_and_reclaim((void *)f_27627,c,av);}
a=C_alloc(7);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_27630,a[2]=((C_word*)t0)[2],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);
/* irregex-core.scm:3867: irregex */
t3=*((C_word*)lf[217]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[7];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k27628 in k27625 in chicken.irregex#irregex-fold/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27630(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,2)))){
C_save_and_reclaim((void *)f_27630,c,av);}
a=C_alloc(8);
t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_27633,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);
/* irregex-core.scm:3868: irregex-new-matches */
f_7579(t2,t1);}

/* k27631 in k27628 in k27625 in chicken.irregex#irregex-fold/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27633(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,4)))){
C_save_and_reclaim((void *)f_27633,c,av);}
a=C_alloc(13);
t2=C_i_pairp(((C_word*)t0)[2]);
t3=(C_truep(t2)?C_u_i_car(((C_word*)t0)[2]):C_SCHEME_FALSE);
t4=(C_truep(t3)?t3:(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27808,a[2]=((C_word)li337),tmp=(C_word)a,a+=3,tmp));
t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_27642,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t4,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)[2],tmp=(C_word)a,a+=10,tmp);
if(C_truep(C_i_pairp(((C_word*)t0)[2]))){
t6=C_i_pairp(C_u_i_cdr(((C_word*)t0)[2]));
t7=t5;
f_27642(t7,(C_truep(t6)?C_i_cadr(((C_word*)t0)[2]):C_fix(0)));}
else{
t6=t5;
f_27642(t6,C_fix(0));}}

/* k27640 in k27631 in k27628 in k27625 in chicken.irregex#irregex-fold/fast in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_27642(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,2)))){
C_save_and_reclaim_args((void *)trf_27642,2,t0,t1);}
a=C_alloc(10);
t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_27645,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);
if(C_truep(C_i_pairp(((C_word*)t0)[9]))){
if(C_truep(C_i_pairp(C_u_i_cdr(((C_word*)t0)[9])))){
t3=C_i_cddr(((C_word*)t0)[9]);
t4=C_i_pairp(t3);
t5=t2;
f_27645(t5,(C_truep(t4)?C_i_caddr(((C_word*)t0)[9]):C_i_string_length(((C_word*)t0)[2])));}
else{
t3=t2;
f_27645(t3,C_i_string_length(((C_word*)t0)[2]));}}
else{
t3=t2;
f_27645(t3,C_i_string_length(((C_word*)t0)[2]));}}

/* k27643 in k27640 in k27631 in k27628 in k27625 in chicken.irregex#irregex-fold/fast in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_27645(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(25,0,4)))){
C_save_and_reclaim_args((void *)trf_27645,2,t0,t1);}
a=C_alloc(25);
t2=C_a_i_list3(&a,3,((C_word*)t0)[2],((C_word*)t0)[3],t1);
t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[3]);
t4=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_27654,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)[2],a[7]=((C_word*)t0)[7],a[8]=t3,a[9]=((C_word*)t0)[8],a[10]=t2,a[11]=((C_word*)t0)[3],a[12]=((C_word*)t0)[9],tmp=(C_word)a,a+=13,tmp);
if(C_truep(C_i_integerp(((C_word*)t0)[3]))){
t5=C_i_exactp(((C_word*)t0)[3]);
if(C_truep(C_i_not(t5))){
/* irregex-core.scm:3877: chicken.base#error */
t6=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t6;
av2[1]=t4;
av2[2]=lf[410];
av2[3]=lf[412];
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t6+1)))(5,av2);}}
else{
t6=t4;{
C_word av2[2];
av2[0]=t6;
av2[1]=C_SCHEME_UNDEFINED;
f_27654(2,av2);}}}
else{
/* irregex-core.scm:3877: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t5;
av2[1]=t4;
av2[2]=lf[410];
av2[3]=lf[412];
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}}

/* k27652 in k27643 in k27640 in k27631 in k27628 in k27625 in chicken.irregex#irregex-fold/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27654(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,4)))){
C_save_and_reclaim((void *)f_27654,c,av);}
a=C_alloc(13);
t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_27657,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],tmp=(C_word)a,a+=13,tmp);
if(C_truep(C_i_integerp(((C_word*)t0)[3]))){
t3=C_i_exactp(((C_word*)t0)[3]);
if(C_truep(C_i_not(t3))){
/* irregex-core.scm:3879: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t4;
av2[1]=t2;
av2[2]=lf[410];
av2[3]=lf[411];
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}
else{
t4=t2;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_SCHEME_UNDEFINED;
f_27657(2,av2);}}}
else{
/* irregex-core.scm:3879: chicken.base#error */
t3=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=lf[410];
av2[3]=lf[411];
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}}

/* k27655 in k27652 in k27643 in k27640 in k27631 in k27628 in k27625 in chicken.irregex#irregex-fold/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27657(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,5)))){
C_save_and_reclaim((void *)f_27657,c,av);}
a=C_alloc(13);
t2=lf[285];
t3=C_i_setslot(((C_word*)t0)[2],C_fix(3),lf[285]);
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|10,a[1]=(C_word)f_27665,a[2]=((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,a[7]=((C_word*)t0)[2],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word)li338),tmp=(C_word)a,a+=11,tmp));
t7=((C_word*)t5)[1];
f_27665(t7,((C_word*)t0)[9],((C_word*)t0)[10],((C_word*)t0)[11],((C_word*)t0)[12]);}

/* lp in k27655 in k27652 in k27643 in k27640 in k27631 in k27628 in k27625 in chicken.irregex#irregex-fold/fast in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_27665(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,7)))){
C_save_and_reclaim_args((void *)trf_27665,5,t0,t1,t2,t3,t4);}
a=C_alloc(12);
if(C_truep(C_fixnum_greater_or_equal_p(t3,((C_word*)t0)[2]))){
/* irregex-core.scm:3883: finish */
t5=((C_word*)t0)[3];{
C_word av2[4];
av2[0]=t5;
av2[1]=t1;
av2[2]=t3;
av2[3]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}
else{
t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_27678,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t3,a[5]=t4,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[2],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);
/* irregex-core.scm:3884: irregex-search/matches */
f_18984(t5,((C_word*)t0)[4],lf[285],((C_word*)t0)[9],t2,t3,((C_word*)t0)[7]);}}

/* k27676 in lp in k27655 in k27652 in k27643 in k27640 in k27631 in k27628 in k27625 in chicken.irregex#irregex-fold/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27678(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,4)))){
C_save_and_reclaim((void *)f_27678,c,av);}
a=C_alloc(11);
if(C_truep(C_i_not(t1))){
/* irregex-core.scm:3892: finish */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}
else{
t2=C_slot(t1,C_fix(1));
t3=C_fixnum_times(C_fix(0),C_fix(4));
t4=C_slot(t2,C_fixnum_plus(C_fix(3),t3));
t5=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_27693,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t4,a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[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);
/* irregex-core.scm:3894: kons */
t6=((C_word*)t0)[11];{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t6;
av2[1]=t5;
av2[2]=((C_word*)t0)[4];
av2[3]=t1;
av2[4]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t6+1)))(5,av2);}}}

/* k27691 in k27676 in lp in k27655 in k27652 in k27643 in k27640 in k27631 in k27628 in k27625 in chicken.irregex#irregex-fold/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27693(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_27693,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_27696,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t1,a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[8],a[10]=((C_word*)t0)[9],tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:3895: irregex-reset-matches! */
f_7602(t2,((C_word*)t0)[10]);}

/* k27694 in k27691 in k27676 in lp in k27655 in k27652 in k27643 in k27640 in k27631 in k27628 in k27625 in chicken.irregex#irregex-fold/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27696(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,4)))){
C_save_and_reclaim((void *)f_27696,c,av);}
a=C_alloc(9);
t2=C_slot(((C_word*)t0)[2],C_fix(4));
t3=C_fixnum_and(t2,C_fix(2));
t4=C_eqp(C_fix(2),t3);
if(C_truep(t4)){
/* irregex-core.scm:3898: finish */
t5=((C_word*)t0)[3];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t5;
av2[1]=((C_word*)t0)[4];
av2[2]=((C_word*)t0)[5];
av2[3]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}
else{
t5=C_eqp(((C_word*)t0)[5],((C_word*)t0)[7]);
if(C_truep(t5)){
t6=C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
t7=C_a_i_list3(&a,3,((C_word*)t0)[8],t6,((C_word*)t0)[9]);
/* irregex-core.scm:3901: lp */
t8=((C_word*)((C_word*)t0)[10])[1];
f_27665(t8,((C_word*)t0)[4],t7,C_fixnum_plus(((C_word*)t0)[5],C_fix(1)),((C_word*)t0)[6]);}
else{
t6=C_a_i_list3(&a,3,((C_word*)t0)[8],((C_word*)t0)[5],((C_word*)t0)[9]);
/* irregex-core.scm:3903: lp */
t7=((C_word*)((C_word*)t0)[10])[1];
f_27665(t7,((C_word*)t0)[4],t6,((C_word*)t0)[5],((C_word*)t0)[6]);}}}

/* f_27808 in k27631 in k27628 in k27625 in chicken.irregex#irregex-fold/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27808(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_27808,c,av);}
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* chicken.irregex#irregex-fold in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27825(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c<4) C_bad_min_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-4)*C_SIZEOF_PAIR +6,c,4)))){
C_save_and_reclaim((void*)f_27825,c,av);}
a=C_alloc((c-4)*C_SIZEOF_PAIR+6);
t4=C_build_rest(&a,c,4,av);
C_word t5;
C_word t6;
C_word t7;
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_27829,a[2]=t3,a[3]=t1,a[4]=t2,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
t6=C_i_closurep(t3);
if(C_truep(C_i_not(t6))){
/* irregex-core.scm:3906: chicken.base#error */
t7=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t7;
av2[1]=t5;
av2[2]=lf[410];
av2[3]=lf[415];
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t7+1)))(5,av2);}}
else{
t7=t5;{
C_word *av2=av;
av2[0]=t7;
av2[1]=C_SCHEME_UNDEFINED;
f_27829(2,av2);}}}

/* k27827 in chicken.irregex#irregex-fold in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27829(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,5)))){
C_save_and_reclaim((void *)f_27829,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27830,a[2]=((C_word*)t0)[2],a[3]=((C_word)li340),tmp=(C_word)a,a+=4,tmp);{
C_word *av2;
if(c >= 6) {
  av2=av;
} else {
  av2=C_alloc(6);
}
av2[0]=0;
av2[1]=((C_word*)t0)[3];
av2[2]=lf[409];
av2[3]=((C_word*)t0)[4];
av2[4]=t2;
av2[5]=((C_word*)t0)[5];
C_apply(6,av2);}}

/* kons2 in k27827 in chicken.irregex#irregex-fold in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27830(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5;
C_word t6;
C_word *a;
if(c!=5) C_bad_argc_2(c,5,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_27830,c,av);}
a=C_alloc(6);
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_27838,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:3907: irregex-copy-matches */
f_7611(t5,t3);}

/* k27836 in kons2 in k27827 in chicken.irregex#irregex-fold in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27838(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_27838,c,av);}
/* irregex-core.scm:3907: kons */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=t1;
av2[4]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t2+1)))(5,av2);}}

/* chicken.irregex#irregex-fold/chunked/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27853(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6=av[6];
C_word t7;
C_word *a;
if(c<7) C_bad_min_argc_2(c,7,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-7)*C_SIZEOF_PAIR +8,c,2)))){
C_save_and_reclaim((void*)f_27853,c,av);}
a=C_alloc((c-7)*C_SIZEOF_PAIR+8);
t7=C_build_rest(&a,c,7,av);
C_word t8;
C_word t9;
t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_27857,a[2]=t7,a[3]=t6,a[4]=t5,a[5]=t3,a[6]=t1,a[7]=t4,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3911: irregex */
t9=*((C_word*)lf[217]+1);{
C_word *av2=av;
av2[0]=t9;
av2[1]=t8;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t9+1)))(3,av2);}}

/* k27855 in chicken.irregex#irregex-fold/chunked/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27857(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_27857,c,av);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_27860,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);
/* irregex-core.scm:3912: irregex-new-matches */
f_7579(t2,t1);}

/* k27858 in k27855 in chicken.irregex#irregex-fold/chunked/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27860(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,5)))){
C_save_and_reclaim((void *)f_27860,c,av);}
a=C_alloc(13);
t2=C_i_pairp(((C_word*)t0)[2]);
t3=(C_truep(t2)?C_u_i_car(((C_word*)t0)[2]):C_SCHEME_FALSE);
t4=(C_truep(t3)?t3:(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28028,a[2]=((C_word)li342),tmp=(C_word)a,a+=3,tmp));
t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_27869,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],tmp=(C_word)a,a+=10,tmp);
t6=C_i_pairp(((C_word*)t0)[2]);
t7=(C_truep(t6)?C_i_pairp(C_u_i_cdr(((C_word*)t0)[2])):C_SCHEME_FALSE);
if(C_truep(t7)){
t8=t5;{
C_word *av2=av;
av2[0]=t8;
av2[1]=C_i_cadr(((C_word*)t0)[2]);
f_27869(2,av2);}}
else{
/* irregex-core.scm:3914: g5510 */
t8=C_i_vector_ref(((C_word*)t0)[4],C_fix(2));{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t8;
av2[1]=t5;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t8+1)))(3,av2);}}}

/* k27867 in k27858 in k27855 in chicken.irregex#irregex-fold/chunked/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27869(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,4)))){
C_save_and_reclaim((void *)f_27869,c,av);}
a=C_alloc(15);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_27875,a[2]=((C_word*)t0)[3],a[3]=((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)[2],a[10]=t1,a[11]=((C_word*)t0)[9],tmp=(C_word)a,a+=12,tmp);
if(C_truep(C_i_not(C_i_integerp(t1)))){
/* irregex-core.scm:3918: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=lf[417];
av2[3]=lf[418];
av2[4]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}
else{
t4=t3;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_SCHEME_UNDEFINED;
f_27875(2,av2);}}}

/* k27873 in k27867 in k27858 in k27855 in chicken.irregex#irregex-fold/chunked/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27875(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,5)))){
C_save_and_reclaim((void *)f_27875,c,av);}
a=C_alloc(12);
t2=C_i_setslot(((C_word*)t0)[2],C_fix(3),((C_word*)t0)[3]);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_27883,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],a[4]=t4,a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[2],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word)li343),tmp=(C_word)a,a+=10,tmp));
t6=((C_word*)t4)[1];
f_27883(t6,((C_word*)t0)[8],((C_word*)t0)[9],((C_word*)t0)[10],((C_word*)t0)[11]);}

/* lp in k27873 in k27867 in k27858 in k27855 in chicken.irregex#irregex-fold/chunked/fast in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_27883(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,7)))){
C_save_and_reclaim_args((void *)trf_27883,5,t0,t1,t2,t3,t4);}
a=C_alloc(12);
if(C_truep(C_i_not(t2))){
/* irregex-core.scm:3922: finish */
t5=((C_word*)t0)[2];{
C_word av2[5];
av2[0]=t5;
av2[1]=t1;
av2[2]=t2;
av2[3]=t3;
av2[4]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}
else{
t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_27896,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=t3,a[6]=t4,a[7]=((C_word*)t0)[3],a[8]=((C_word*)t0)[4],a[9]=((C_word*)t0)[5],a[10]=((C_word*)t0)[6],a[11]=((C_word*)t0)[7],tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3923: irregex-search/matches */
f_18984(t5,((C_word*)t0)[5],((C_word*)t0)[3],((C_word*)t0)[8],t2,t3,((C_word*)t0)[6]);}}

/* k27894 in lp in k27873 in k27867 in k27858 in k27855 in chicken.irregex#irregex-fold/chunked/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27896(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,5)))){
C_save_and_reclaim((void *)f_27896,c,av);}
a=C_alloc(9);
if(C_truep(C_i_not(t1))){
/* irregex-core.scm:3925: finish */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t2+1)))(5,av2);}}
else{
t2=C_slot(t1,C_fix(1));
t3=C_slot(t2,C_fix(2));
t4=C_slot(t1,C_fix(1));
t5=C_fixnum_times(C_fix(0),C_fix(4));
t6=C_slot(t4,C_fixnum_plus(C_fix(3),t5));
t7=C_eqp(t3,((C_word*)t0)[4]);
t8=(C_truep(t7)?C_eqp(t6,((C_word*)t0)[5]):C_SCHEME_FALSE);
if(C_truep(t8)){
t9=C_i_vector_ref(((C_word*)t0)[7],C_fix(3));
t10=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_27970,a[2]=t6,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[6],a[7]=t3,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3929: g5525 */
t11=t9;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t11;
av2[1]=t10;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t11+1)))(3,av2);}}
else{
t9=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_27973,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t3,a[6]=t6,a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[10],tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:3933: kons */
t10=((C_word*)t0)[11];{
C_word *av2;
if(c >= 6) {
  av2=av;
} else {
  av2=C_alloc(6);
}
av2[0]=t10;
av2[1]=t9;
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=t1;
av2[5]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t10+1)))(6,av2);}}}}

/* k27944 in k27968 in k27894 in lp in k27873 in k27867 in k27858 in k27855 in chicken.irregex#irregex-fold/chunked/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27946(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_27946,c,av);}
a=C_alloc(6);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_27956,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);
/* irregex-core.scm:3931: g5530 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k27954 in k27944 in k27968 in k27894 in lp in k27873 in k27867 in k27858 in k27855 in chicken.irregex#irregex-fold/chunked/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27956(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_27956,c,av);}
/* irregex-core.scm:3931: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_27883(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5]);}

/* k27968 in k27894 in lp in k27873 in k27867 in k27858 in k27855 in chicken.irregex#irregex-fold/chunked/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27970(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,4)))){
C_save_and_reclaim((void *)f_27970,c,av);}
a=C_alloc(6);
if(C_truep(C_fixnum_greater_or_equal_p(((C_word*)t0)[2],t1))){
t2=C_i_vector_ref(((C_word*)t0)[3],C_fix(0));
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_27946,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);
/* irregex-core.scm:3930: g5528 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[7];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
/* irregex-core.scm:3932: lp */
t2=((C_word*)((C_word*)t0)[4])[1];
f_27883(t2,((C_word*)t0)[5],((C_word*)t0)[7],C_fixnum_plus(((C_word*)t0)[2],C_fix(1)),((C_word*)t0)[6]);}}

/* k27971 in k27894 in lp in k27873 in k27867 in k27858 in k27855 in chicken.irregex#irregex-fold/chunked/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27973(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_27973,c,av);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_27976,a[2]=((C_word*)t0)[2],a[3]=((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);
/* irregex-core.scm:3934: irregex-reset-matches! */
f_7602(t2,((C_word*)t0)[8]);}

/* k27974 in k27971 in k27894 in lp in k27873 in k27867 in k27858 in k27855 in chicken.irregex#irregex-fold/chunked/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_27976(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_27976,c,av);}
t2=C_slot(((C_word*)t0)[2],C_fix(4));
t3=C_fixnum_and(t2,C_fix(2));
t4=C_eqp(C_fix(2),t3);
if(C_truep(t4)){
/* irregex-core.scm:3936: finish */
t5=((C_word*)t0)[3];{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t5;
av2[1]=((C_word*)t0)[4];
av2[2]=((C_word*)t0)[5];
av2[3]=((C_word*)t0)[6];
av2[4]=((C_word*)t0)[7];
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}
else{
/* irregex-core.scm:3937: lp */
t5=((C_word*)((C_word*)t0)[8])[1];
f_27883(t5,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}}

/* f_28028 in k27858 in k27855 in chicken.irregex#irregex-fold/chunked/fast in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28028(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5;
C_word *a;
if(c!=5) C_bad_argc_2(c,5,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_28028,c,av);}
t5=t1;{
C_word *av2=av;
av2[0]=t5;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}

/* chicken.irregex#irregex-fold/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28035(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c<4) C_bad_min_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-4)*C_SIZEOF_PAIR +6,c,4)))){
C_save_and_reclaim((void*)f_28035,c,av);}
a=C_alloc((c-4)*C_SIZEOF_PAIR+6);
t4=C_build_rest(&a,c,4,av);
C_word t5;
C_word t6;
C_word t7;
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28039,a[2]=t3,a[3]=t1,a[4]=t2,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
t6=C_i_closurep(t3);
if(C_truep(C_i_not(t6))){
/* irregex-core.scm:3940: chicken.base#error */
t7=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t7;
av2[1]=t5;
av2[2]=lf[417];
av2[3]=lf[420];
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t7+1)))(5,av2);}}
else{
t7=t5;{
C_word *av2=av;
av2[0]=t7;
av2[1]=C_SCHEME_UNDEFINED;
f_28039(2,av2);}}}

/* k28037 in chicken.irregex#irregex-fold/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28039(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,6)))){
C_save_and_reclaim((void *)f_28039,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28040,a[2]=((C_word*)t0)[2],a[3]=((C_word)li345),tmp=(C_word)a,a+=4,tmp);{
C_word *av2;
if(c >= 6) {
  av2=av;
} else {
  av2=C_alloc(6);
}
av2[0]=0;
av2[1]=((C_word*)t0)[3];
av2[2]=lf[416];
av2[3]=((C_word*)t0)[4];
av2[4]=t2;
av2[5]=((C_word*)t0)[5];
C_apply(6,av2);}}

/* kons2 in k28037 in chicken.irregex#irregex-fold/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28040(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6;
C_word t7;
C_word *a;
if(c!=6) C_bad_argc_2(c,6,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,2)))){
C_save_and_reclaim((void *)f_28040,c,av);}
a=C_alloc(7);
t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_28048,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=t3,a[6]=t5,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:3941: irregex-copy-matches */
f_7611(t6,t4);}

/* k28046 in kons2 in k28037 in chicken.irregex#irregex-fold/chunked in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28048(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_28048,c,av);}
/* irregex-core.scm:3941: kons */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 6) {
  av2=av;
} else {
  av2=C_alloc(6);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=t1;
av2[5]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t2+1)))(6,av2);}}

/* chicken.irregex#irregex-replace in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28063(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c<4) C_bad_min_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-4)*C_SIZEOF_PAIR +6,c,4)))){
C_save_and_reclaim((void*)f_28063,c,av);}
a=C_alloc((c-4)*C_SIZEOF_PAIR+6);
t4=C_build_rest(&a,c,4,av);
C_word t5;
C_word t6;
C_word t7;
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28067,a[2]=t1,a[3]=t3,a[4]=t4,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
t6=C_i_stringp(t3);
if(C_truep(C_i_not(t6))){
/* irregex-core.scm:3945: chicken.base#error */
t7=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t7;
av2[1]=t5;
av2[2]=lf[423];
av2[3]=lf[424];
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t7+1)))(5,av2);}}
else{
t7=t5;{
C_word *av2=av;
av2[0]=t7;
av2[1]=C_SCHEME_UNDEFINED;
f_28067(2,av2);}}}

/* k28065 in chicken.irregex#irregex-replace in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28067(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,3)))){
C_save_and_reclaim((void *)f_28067,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_28070,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);
/* irregex-core.scm:3946: irregex-search */
t3=*((C_word*)lf[286]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[5];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* k28068 in k28065 in chicken.irregex#irregex-replace in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28070(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,4)))){
C_save_and_reclaim((void *)f_28070,c,av);}
a=C_alloc(6);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28084,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=C_slot(t1,C_fix(1));
t4=C_fixnum_times(C_fix(0),C_fix(4));
/* irregex-core.scm:3949: scheme#substring */
t5=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t5;
av2[1]=t2;
av2[2]=((C_word*)t0)[3];
av2[3]=C_slot(t3,C_fixnum_plus(C_fix(3),t4));
av2[4]=C_block_size(((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}
else{
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k28082 in k28068 in k28065 in chicken.irregex#irregex-replace in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28084(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,3)))){
C_save_and_reclaim((void *)f_28084,c,av);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28088,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_28092,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3950: irregex-apply-match */
f_28256(t3,((C_word*)t0)[3],((C_word*)t0)[5]);}

/* k28086 in k28082 in k28068 in k28065 in chicken.irregex#irregex-replace in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28088(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_28088,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:3948: string-cat-reverse */
f_9039(((C_word*)t0)[3],t2);}

/* k28090 in k28082 in k28068 in k28065 in chicken.irregex#irregex-replace in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28092(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,4)))){
C_save_and_reclaim((void *)f_28092,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28100,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t3=C_slot(((C_word*)t0)[3],C_fix(1));
/* irregex-core.scm:3951: scheme#substring */
t4=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t4;
av2[1]=t2;
av2[2]=((C_word*)t0)[4];
av2[3]=C_fix(0);
av2[4]=C_slot(t3,C_fix(1));
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}

/* k28098 in k28090 in k28082 in k28068 in k28065 in chicken.irregex#irregex-replace in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28100(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,3)))){
C_save_and_reclaim((void *)f_28100,c,av);}
a=C_alloc(3);
t2=C_a_i_list1(&a,1,t1);
/* irregex-core.scm:3950: scheme#append */
t3=*((C_word*)lf[73]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* chicken.irregex#irregex-replace/all in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28142(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c<4) C_bad_min_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-4)*C_SIZEOF_PAIR +6,c,4)))){
C_save_and_reclaim((void*)f_28142,c,av);}
a=C_alloc((c-4)*C_SIZEOF_PAIR+6);
t4=C_build_rest(&a,c,4,av);
C_word t5;
C_word t6;
C_word t7;
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28146,a[2]=t3,a[3]=t4,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
t6=C_i_stringp(t3);
if(C_truep(C_i_not(t6))){
/* irregex-core.scm:3956: chicken.base#error */
t7=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t7;
av2[1]=t5;
av2[2]=lf[426];
av2[3]=lf[427];
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t7+1)))(5,av2);}}
else{
t7=t5;{
C_word *av2=av;
av2[0]=t7;
av2[1]=C_SCHEME_UNDEFINED;
f_28146(2,av2);}}}

/* k28144 in chicken.irregex#irregex-replace/all in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28146(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,6)))){
C_save_and_reclaim((void *)f_28146,c,av);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_28151,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word)li348),tmp=(C_word)a,a+=5,tmp);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28223,a[2]=((C_word*)t0)[2],a[3]=((C_word)li349),tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3957: irregex-fold/fast */
t4=lf[409];{
C_word *av2;
if(c >= 7) {
  av2=av;
} else {
  av2=C_alloc(7);
}
av2[0]=t4;
av2[1]=((C_word*)t0)[4];
av2[2]=((C_word*)t0)[5];
av2[3]=t2;
av2[4]=C_SCHEME_END_OF_LIST;
av2[5]=((C_word*)t0)[2];
av2[6]=t3;
f_27623(7,av2);}}

/* a28150 in k28144 in chicken.irregex#irregex-replace/all in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28151(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
if(c!=5) C_bad_argc_2(c,5,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,c,3)))){
C_save_and_reclaim((void *)f_28151,c,av);}
a=C_alloc(13);
t5=C_slot(t3,C_fix(1));
t6=C_slot(t5,C_fix(1));
t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28175,a[2]=t3,a[3]=t2,a[4]=t1,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
if(C_truep(C_fixnum_greater_or_equal_p(t2,t6))){
t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28206,a[2]=t7,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3962: irregex-apply-match */
f_28256(t8,t3,((C_word*)t0)[3]);}
else{
t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_28213,a[2]=t4,a[3]=t7,a[4]=((C_word*)t0)[2],a[5]=t2,a[6]=t6,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:3963: irregex-apply-match */
f_28256(t8,t3,((C_word*)t0)[3]);}}

/* k28173 in a28150 in k28144 in chicken.irregex#irregex-replace/all in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28175(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,4)))){
C_save_and_reclaim((void *)f_28175,c,av);}
a=C_alloc(4);
t2=C_slot(((C_word*)t0)[2],C_fix(1));
t3=C_fixnum_times(C_fix(0),C_fix(4));
t4=C_slot(t2,C_fixnum_plus(C_fix(3),t3));
t5=C_eqp(((C_word*)t0)[3],t4);
if(C_truep(t5)){
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28188,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3967: scheme#substring */
t7=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t7;
av2[1]=t6;
av2[2]=((C_word*)t0)[5];
av2[3]=((C_word*)t0)[3];
av2[4]=C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
((C_proc)(void*)(*((C_word*)t7+1)))(5,av2);}}
else{
t6=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t6;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}}

/* k28186 in k28173 in a28150 in k28144 in chicken.irregex#irregex-replace/all in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28188(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_28188,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,t1,((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k28204 in a28150 in k28144 in chicken.irregex#irregex-replace/all in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28206(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_28206,c,av);}
/* irregex-core.scm:3962: scheme#append */
t2=*((C_word*)lf[73]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k28211 in a28150 in k28144 in chicken.irregex#irregex-replace/all in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28213(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,4)))){
C_save_and_reclaim((void *)f_28213,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_28221,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3964: scheme#substring */
t3=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[5];
av2[4]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}

/* k28219 in k28211 in a28150 in k28144 in chicken.irregex#irregex-replace/all in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28221(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,3)))){
C_save_and_reclaim((void *)f_28221,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:3963: scheme#append */
t3=*((C_word*)lf[73]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* a28222 in k28144 in chicken.irregex#irregex-replace/all in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28223(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,4)))){
C_save_and_reclaim((void *)f_28223,c,av);}
a=C_alloc(4);
t4=C_i_string_length(((C_word*)t0)[2]);
if(C_truep(C_fixnum_greater_or_equal_p(t2,t4))){
/* irregex-core.scm:3973: string-cat-reverse */
f_9039(t1,t3);}
else{
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28244,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3975: scheme#substring */
t6=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t6;
av2[1]=t5;
av2[2]=((C_word*)t0)[2];
av2[3]=t2;
av2[4]=t4;
((C_proc)(void*)(*((C_word*)t6+1)))(5,av2);}}}

/* k28242 in a28222 in k28144 in chicken.irregex#irregex-replace/all in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28244(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_28244,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:3973: string-cat-reverse */
f_9039(((C_word*)t0)[3],t2);}

/* chicken.irregex#irregex-apply-match in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_28256(C_word 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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,4)))){
C_save_and_reclaim_args((void *)trf_28256,3,t1,t2,t3);}
a=C_alloc(7);
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_28262,a[2]=t5,a[3]=t2,a[4]=((C_word)li352),tmp=(C_word)a,a+=5,tmp));
t7=((C_word*)t5)[1];
f_28262(t7,t1,t3,C_SCHEME_END_OF_LIST);}

/* lp in chicken.irregex#irregex-apply-match in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_28262(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,4)))){
C_save_and_reclaim_args((void *)trf_28262,4,t0,t1,t2,t3);}
a=C_alloc(7);
if(C_truep(C_i_nullp(t2))){
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=C_i_car(t2);
if(C_truep(C_i_integerp(t4))){
t5=C_u_i_cdr(t2);
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28289,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:3984: irregex-match-substring */
t7=*((C_word*)lf[40]+1);{
C_word av2[4];
av2[0]=t7;
av2[1]=t6;
av2[2]=((C_word*)t0)[3];
av2[3]=C_u_i_car(t2);
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}
else{
if(C_truep(C_i_closurep(C_u_i_car(t2)))){
t5=C_u_i_cdr(t2);
t6=C_u_i_car(t2);
t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28314,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:3986: g5587 */
t8=t6;{
C_word av2[3];
av2[0]=t8;
av2[1]=t7;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t8+1)))(3,av2);}}
else{
if(C_truep(C_i_symbolp(C_u_i_car(t2)))){
t5=C_u_i_car(t2);
t6=C_eqp(t5,lf[429]);
if(C_truep(t6)){
t7=C_u_i_cdr(t2);
t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28340,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
t9=C_slot(((C_word*)t0)[3],C_fix(1));
t10=C_slot(t9,C_fix(0));
t11=C_i_car(t10);
t12=C_slot(((C_word*)t0)[3],C_fix(1));
/* irregex-core.scm:3991: scheme#substring */
t13=*((C_word*)lf[46]+1);{
C_word av2[5];
av2[0]=t13;
av2[1]=t8;
av2[2]=t11;
av2[3]=C_fix(0);
av2[4]=C_slot(t12,C_fix(1));
((C_proc)(void*)(*((C_word*)t13+1)))(5,av2);}}
else{
t7=C_eqp(t5,lf[430]);
if(C_truep(t7)){
t8=C_slot(((C_word*)t0)[3],C_fix(1));
t9=C_slot(t8,C_fix(0));
t10=C_i_car(t9);
t11=C_u_i_cdr(t2);
t12=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28404,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t11,tmp=(C_word)a,a+=6,tmp);
t13=C_slot(((C_word*)t0)[3],C_fix(1));
t14=C_fixnum_times(C_fix(0),C_fix(4));
/* irregex-core.scm:3998: scheme#substring */
t15=*((C_word*)lf[46]+1);{
C_word av2[5];
av2[0]=t15;
av2[1]=t12;
av2[2]=t10;
av2[3]=C_slot(t13,C_fixnum_plus(C_fix(3),t14));
av2[4]=C_i_string_length(t10);
((C_proc)(void*)(*((C_word*)t15+1)))(5,av2);}}
else{
t8=C_u_i_car(t2);
t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_28466,a[2]=t8,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=t3,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:4004: irregex-match-names */
t10=*((C_word*)lf[19]+1);{
C_word av2[3];
av2[0]=t10;
av2[1]=t9;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t10+1)))(3,av2);}}}}
else{
t5=C_u_i_cdr(t2);
t6=C_u_i_car(t2);
t7=C_a_i_cons(&a,2,t6,t3);
/* irregex-core.scm:4009: lp */
t16=t1;
t17=t5;
t18=t7;
t1=t16;
t2=t17;
t3=t18;
goto loop;}}}}}

/* k28287 in lp in chicken.irregex#irregex-apply-match in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28289(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,3)))){
C_save_and_reclaim((void *)f_28289,c,av);}
a=C_alloc(3);
t2=(C_truep(t1)?C_a_i_cons(&a,2,t1,((C_word*)t0)[2]):C_a_i_cons(&a,2,lf[428],((C_word*)t0)[2]));
/* irregex-core.scm:3983: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_28262(t3,((C_word*)t0)[4],((C_word*)t0)[5],t2);}

/* k28312 in lp in chicken.irregex#irregex-apply-match in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28314(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,3)))){
C_save_and_reclaim((void *)f_28314,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:3986: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_28262(t3,((C_word*)t0)[4],((C_word*)t0)[5],t2);}

/* k28338 in lp in chicken.irregex#irregex-apply-match in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28340(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,3)))){
C_save_and_reclaim((void *)f_28340,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:3990: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_28262(t3,((C_word*)t0)[4],((C_word*)t0)[5],t2);}

/* k28402 in lp in chicken.irregex#irregex-apply-match in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28404(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,3)))){
C_save_and_reclaim((void *)f_28404,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:3997: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_28262(t3,((C_word*)t0)[4],((C_word*)t0)[5],t2);}

/* g5614 in k28464 in lp in chicken.irregex#irregex-apply-match in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_28436(C_word 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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,3)))){
C_save_and_reclaim_args((void *)trf_28436,3,t0,t1,t2);}
a=C_alloc(3);
t3=C_i_cdr(t2);
t4=C_i_cdr(((C_word*)t0)[2]);
t5=C_a_i_cons(&a,2,t3,t4);
/* irregex-core.scm:4005: lp */
t6=((C_word*)((C_word*)t0)[3])[1];
f_28262(t6,t1,t5,((C_word*)t0)[4]);}

/* k28464 in lp in chicken.irregex#irregex-apply-match in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28466(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,3)))){
C_save_and_reclaim((void *)f_28466,c,av);}
a=C_alloc(6);
t2=C_i_assq(((C_word*)t0)[2],t1);
if(C_truep(t2)){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28436,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li351),tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:4003: g5614 */
t4=t3;
f_28436(t4,((C_word*)t0)[6],t2);}
else{
/* irregex-core.scm:4007: chicken.base#error */
t3=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[6];
av2[2]=lf[431];
av2[3]=C_u_i_car(((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}}

/* chicken.irregex#irregex-extract in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28487(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c<4) C_bad_min_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-4)*C_SIZEOF_PAIR +6,c,4)))){
C_save_and_reclaim((void*)f_28487,c,av);}
a=C_alloc((c-4)*C_SIZEOF_PAIR+6);
t4=C_build_rest(&a,c,4,av);
C_word t5;
C_word t6;
C_word t7;
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28491,a[2]=t1,a[3]=t2,a[4]=t3,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
t6=C_i_stringp(t3);
if(C_truep(C_i_not(t6))){
/* irregex-core.scm:4012: chicken.base#error */
t7=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t7;
av2[1]=t5;
av2[2]=lf[433];
av2[3]=lf[434];
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t7+1)))(5,av2);}}
else{
t7=t5;{
C_word *av2=av;
av2[0]=t7;
av2[1]=C_SCHEME_UNDEFINED;
f_28491(2,av2);}}}

/* k28489 in chicken.irregex#irregex-extract in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28491(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,8)))){
C_save_and_reclaim((void *)f_28491,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28496,a[2]=((C_word)li354),tmp=(C_word)a,a+=3,tmp);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28506,a[2]=((C_word)li355),tmp=(C_word)a,a+=3,tmp);{
C_word *av2;
if(c >= 9) {
  av2=av;
} else {
  av2=C_alloc(9);
}
av2[0]=0;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[409];
av2[3]=((C_word*)t0)[3];
av2[4]=t2;
av2[5]=C_SCHEME_END_OF_LIST;
av2[6]=((C_word*)t0)[4];
av2[7]=t3;
av2[8]=((C_word*)t0)[5];
C_apply(9,av2);}}

/* a28495 in k28489 in chicken.irregex#irregex-extract in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28496(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5;
C_word t6;
C_word *a;
if(c!=5) C_bad_argc_2(c,5,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_28496,c,av);}
a=C_alloc(4);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28504,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:4015: irregex-match-substring */
t6=*((C_word*)lf[40]+1);{
C_word *av2=av;
av2[0]=t6;
av2[1]=t5;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k28502 in a28495 in k28489 in chicken.irregex#irregex-extract in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28504(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_28504,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,t1,((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* a28505 in k28489 in chicken.irregex#irregex-extract in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28506(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_28506,c,av);}
/* irregex-core.scm:4018: ##sys#fast-reverse */
t4=*((C_word*)lf[69]+1);{
C_word *av2=av;
av2[0]=t4;
av2[1]=t1;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* chicken.irregex#irregex-split in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28522(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c<4) C_bad_min_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-4)*C_SIZEOF_PAIR +6,c,4)))){
C_save_and_reclaim((void*)f_28522,c,av);}
a=C_alloc((c-4)*C_SIZEOF_PAIR+6);
t4=C_build_rest(&a,c,4,av);
C_word t5;
C_word t6;
C_word t7;
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28526,a[2]=t4,a[3]=t3,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
t6=C_i_stringp(t3);
if(C_truep(C_i_not(t6))){
/* irregex-core.scm:4022: chicken.base#error */
t7=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t7;
av2[1]=t5;
av2[2]=lf[437];
av2[3]=lf[438];
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t7+1)))(5,av2);}}
else{
t7=t5;{
C_word *av2=av;
av2[0]=t7;
av2[1]=C_SCHEME_UNDEFINED;
f_28526(2,av2);}}}

/* k28524 in chicken.irregex#irregex-split in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28526(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_28526,c,av);}
a=C_alloc(6);
t2=C_i_pairp(((C_word*)t0)[2]);
t3=(C_truep(t2)?C_u_i_car(((C_word*)t0)[2]):C_fix(0));
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28532,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
if(C_truep(C_i_pairp(((C_word*)t0)[2]))){
t5=C_i_pairp(C_u_i_cdr(((C_word*)t0)[2]));
t6=t4;
f_28532(t6,(C_truep(t5)?C_i_cadr(((C_word*)t0)[2]):C_i_string_length(((C_word*)t0)[3])));}
else{
t5=t4;
f_28532(t5,C_i_string_length(((C_word*)t0)[3]));}}

/* k28530 in k28524 in chicken.irregex#irregex-split in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_28532(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,0,8)))){
C_save_and_reclaim_args((void *)trf_28532,2,t0,t1);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28537,a[2]=((C_word*)t0)[2],a[3]=((C_word)li357),tmp=(C_word)a,a+=4,tmp);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_28612,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word)li359),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:4025: irregex-fold/fast */
t4=lf[409];{
C_word av2[9];
av2[0]=t4;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=t2;
av2[4]=C_SCHEME_END_OF_LIST;
av2[5]=((C_word*)t0)[2];
av2[6]=t3;
av2[7]=((C_word*)t0)[5];
av2[8]=t1;
f_27623(9,av2);}}

/* a28536 in k28530 in k28524 in chicken.irregex#irregex-split in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28537(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word *a;
if(c!=5) C_bad_argc_2(c,5,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,4)))){
C_save_and_reclaim((void *)f_28537,c,av);}
a=C_alloc(4);
t5=C_slot(t3,C_fix(1));
t6=C_fixnum_times(C_fix(0),C_fix(4));
t7=C_slot(t5,C_fixnum_plus(C_fix(3),t6));
t8=C_eqp(t2,t7);
if(C_truep(t8)){
t9=C_i_string_ref(((C_word*)t0)[2],t2);
t10=t1;{
C_word *av2=av;
av2[0]=t10;
av2[1]=C_a_i_cons(&a,2,t9,t4);
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}
else{
t9=C_slot(t3,C_fix(1));
t10=C_slot(t9,C_fix(1));
t11=C_eqp(t2,t10);
if(C_truep(t11)){
t12=t1;{
C_word *av2=av;
av2[0]=t12;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t12+1)))(2,av2);}}
else{
t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28564,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
t13=C_slot(t3,C_fix(1));
/* irregex-core.scm:4035: scheme#substring */
t14=*((C_word*)lf[46]+1);{
C_word *av2=av;
av2[0]=t14;
av2[1]=t12;
av2[2]=((C_word*)t0)[2];
av2[3]=t2;
av2[4]=C_slot(t13,C_fix(1));
((C_proc)(void*)(*((C_word*)t14+1)))(5,av2);}}}}

/* k28562 in a28536 in k28530 in k28524 in chicken.irregex#irregex-split in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28564(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_28564,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,t1,((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* a28611 in k28530 in k28524 in chicken.irregex#irregex-split in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28612(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,4)))){
C_save_and_reclaim((void *)f_28612,c,av);}
a=C_alloc(7);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28620,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t5=C_eqp(t2,((C_word*)t0)[2]);
if(C_truep(t5)){
t6=t4;
f_28620(t6,t3);}
else{
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28703,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:4039: scheme#substring */
t7=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t7;
av2[1]=t6;
av2[2]=((C_word*)t0)[3];
av2[3]=t2;
av2[4]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t7+1)))(5,av2);}}}

/* k28618 in a28611 in k28530 in k28524 in chicken.irregex#irregex-split in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_28620(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,5)))){
C_save_and_reclaim_args((void *)trf_28620,2,t0,t1);}
a=C_alloc(6);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_28622,a[2]=t3,a[3]=((C_word)li358),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_28622(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}

/* lp in k28618 in a28611 in k28530 in k28524 in chicken.irregex#irregex-split in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_28622(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,4)))){
C_save_and_reclaim_args((void *)trf_28622,5,t0,t1,t2,t3,t4);}
a=C_alloc(8);
if(C_truep(C_i_nullp(t2))){
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t5=C_i_car(t2);
if(C_truep(C_charp(t5))){
t6=C_u_i_cdr(t2);
t7=(C_truep(t4)?t4:C_i_nullp(t3));
if(C_truep(t7)){
t8=C_u_i_car(t2);
t9=C_a_i_string(&a,1,t8);
t10=C_a_i_cons(&a,2,t9,t3);
/* irregex-core.scm:4045: lp */
t12=t1;
t13=t6;
t14=t10;
t15=C_SCHEME_TRUE;
t1=t12;
t2=t13;
t3=t14;
t4=t15;
goto loop;}
else{
t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28663,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t6,tmp=(C_word)a,a+=6,tmp);
t9=C_u_i_car(t2);
t10=C_a_i_string(&a,1,t9);
/* irregex-core.scm:4048: scheme#string-append */
t11=*((C_word*)lf[436]+1);{
C_word av2[4];
av2[0]=t11;
av2[1]=t8;
av2[2]=t10;
av2[3]=C_i_car(t3);
((C_proc)(void*)(*((C_word*)t11+1)))(4,av2);}}}
else{
t6=C_u_i_cdr(t2);
t7=C_u_i_car(t2);
t8=C_a_i_cons(&a,2,t7,t3);
/* irregex-core.scm:4051: lp */
t12=t1;
t13=t6;
t14=t8;
t15=C_SCHEME_FALSE;
t1=t12;
t2=t13;
t3=t14;
t4=t15;
goto loop;}}}

/* k28661 in lp in k28618 in a28611 in k28530 in k28524 in chicken.irregex#irregex-split in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28663(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,4)))){
C_save_and_reclaim((void *)f_28663,c,av);}
a=C_alloc(3);
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=C_a_i_cons(&a,2,t1,t2);
/* irregex-core.scm:4045: lp */
t4=((C_word*)((C_word*)t0)[3])[1];
f_28622(t4,((C_word*)t0)[4],((C_word*)t0)[5],t3,C_SCHEME_TRUE);}

/* k28701 in a28611 in k28530 in k28524 in chicken.irregex#irregex-split in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28703(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_28703,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
f_28620(t2,C_a_i_cons(&a,2,t1,((C_word*)t0)[3]));}

/* chicken.irregex#string-scan-char in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28737(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c<4) C_bad_min_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-4)*C_SIZEOF_PAIR +9,c,3)))){
C_save_and_reclaim((void*)f_28737,c,av);}
a=C_alloc((c-4)*C_SIZEOF_PAIR+9);
t4=C_build_rest(&a,c,4,av);
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
t5=C_i_string_length(t2);
t6=C_i_pairp(t4);
t7=(C_truep(t6)?C_get_rest_arg(c,4,av,4,t0):C_fix(0));
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_28750,a[2]=t5,a[3]=t2,a[4]=t3,a[5]=t9,a[6]=((C_word)li361),tmp=(C_word)a,a+=7,tmp));
t11=((C_word*)t9)[1];
f_28750(t11,t1,t7);}

/* scan in chicken.irregex#string-scan-char in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_28750(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_28750,3,t0,t1,t2);}
a=C_alloc(5);
t3=C_eqp(t2,((C_word*)t0)[2]);
if(C_truep(t3)){
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=C_i_string_ref(((C_word*)t0)[3],t2);
t5=C_eqp(((C_word*)t0)[4],t4);
if(C_truep(t5)){
t6=t1;{
C_word av2[2];
av2[0]=t6;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
t6=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-utils.scm:14: scan */
t8=t1;
t9=t6;
t1=t8;
t2=t9;
goto loop;}}}

/* chicken.irregex#irregex-quote in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28780(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_28780,c,av);}
a=C_alloc(6);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28788,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28792,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
/* ##sys#string->list */
t5=*((C_word*)lf[105]+1);{
C_word *av2=av;
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k28786 in chicken.irregex#irregex-quote in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28788(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_28788,c,av);}
/* ##sys#list->string */
t2=*((C_word*)lf[440]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k28790 in chicken.irregex#irregex-quote in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28792(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,4)))){
C_save_and_reclaim((void *)f_28792,c,av);}
a=C_alloc(6);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_28794,a[2]=t3,a[3]=((C_word)li363),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_28794(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}

/* loop in k28790 in chicken.irregex#irregex-quote in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_28794(C_word 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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,3)))){
C_save_and_reclaim_args((void *)trf_28794,4,t0,t1,t2,t3);}
a=C_alloc(7);
if(C_truep(C_i_nullp(t2))){
/* irregex-utils.scm:20: ##sys#fast-reverse */
t4=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t4;
av2[1]=t1;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t4=C_i_car(t2);
t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_28813,a[2]=t2,a[3]=t3,a[4]=t4,a[5]=((C_word*)t0)[2],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
/* irregex-utils.scm:22: string-scan-char */
t6=lf[54];{
C_word av2[4];
av2[0]=t6;
av2[1]=t5;
av2[2]=lf[441];
av2[3]=t4;
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}}

/* k28811 in loop in k28790 in chicken.irregex#irregex-quote in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28813(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,3)))){
C_save_and_reclaim((void *)f_28813,c,av);}
a=C_alloc(6);
if(C_truep(t1)){
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=C_a_i_cons(&a,2,C_make_character(92),((C_word*)t0)[3]);
t4=C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
/* irregex-utils.scm:23: loop */
t5=((C_word*)((C_word*)t0)[5])[1];
f_28794(t5,((C_word*)t0)[6],t2,t4);}
else{
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)t0)[3]);
/* irregex-utils.scm:24: loop */
t4=((C_word*)((C_word*)t0)[5])[1];
f_28794(t4,((C_word*)t0)[6],t2,t3);}}

/* chicken.irregex#irregex-opt in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28837(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,3)))){
C_save_and_reclaim((void *)f_28837,c,av);}
a=C_alloc(4);
if(C_truep(C_i_nullp(t2))){
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=lf[443];
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
t3=C_i_cdr(t2);
if(C_truep(C_i_nullp(t3))){
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_u_i_car(t2);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28974,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-utils.scm:42: scheme#make-vector */
t5=*((C_word*)lf[4]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t5;
av2[1]=t4;
av2[2]=C_fix(256);
av2[3]=C_SCHEME_END_OF_LIST;
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}}}

/* k28852 in k29009 in lp2 in lp1 in k28972 in chicken.irregex#irregex-opt in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28854(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_28854,c,av);}
a=C_alloc(9);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28861,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
/* ##sys#list->string */
t3=*((C_word*)lf[440]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}
else{
t2=C_a_i_cons(&a,2,lf[103],((C_word*)t0)[4]);
t3=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t3;
av2[1]=(C_truep(((C_word*)t0)[3])?C_a_i_list(&a,2,lf[131],t2):t2);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k28859 in k28852 in k29009 in lp2 in lp1 in k28972 in chicken.irregex#irregex-opt in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28861(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,1)))){
C_save_and_reclaim((void *)f_28861,c,av);}
a=C_alloc(9);
t2=C_a_i_list1(&a,1,t1);
t3=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t3;
av2[1]=(C_truep(((C_word*)t0)[3])?C_a_i_list(&a,2,lf[131],t2):t2);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* k28882 in k29052 in lp2 in lp1 in k28972 in chicken.irregex#irregex-opt in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28884(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(16,c,3)))){
C_save_and_reclaim((void *)f_28884,c,av);}
a=C_alloc(16);
if(C_truep(t1)){
t2=C_a_i_cons(&a,2,C_SCHEME_UNDEFINED,C_SCHEME_END_OF_LIST);
t3=t2;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=((C_word*)t4)[1];
t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28905,a[2]=((C_word*)t0)[2],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|5,a[1]=(C_word)f_28907,a[2]=t4,a[3]=t8,a[4]=t5,a[5]=((C_word)li365),tmp=(C_word)a,a+=6,tmp));
t10=((C_word*)t8)[1];
f_28907(t10,t6,((C_word*)t0)[3]);}
else{
t2=C_a_i_cons(&a,2,lf[115],((C_word*)t0)[3]);
t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[4]);
/* irregex-utils.scm:51: lp2 */
t4=((C_word*)((C_word*)t0)[5])[1];
f_28991(t4,((C_word*)t0)[6],((C_word*)t0)[7],t3);}}

/* k28903 in k28882 in k29052 in lp2 in lp1 in k28972 in chicken.irregex#irregex-opt in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28905(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_28905,c,av);}{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=0;
av2[1]=((C_word*)t0)[2];
av2[2]=*((C_word*)lf[436]+1);
av2[3]=t1;
C_apply(4,av2);}}

/* map-loop5913 in k28882 in k29052 in lp2 in lp1 in k28972 in chicken.irregex#irregex-opt in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_28907(C_word 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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,0,2)))){
C_save_and_reclaim_args((void *)trf_28907,3,t0,t1,t2);}
a=C_alloc(11);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28917,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);
t4=C_slot(t2,C_fix(0));
if(C_truep(C_charp(t4))){
t5=C_a_i_string(&a,1,t4);
t6=t3;
f_28917(t6,C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST));}
else{
t5=t3;
f_28917(t5,C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST));}}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_slot(((C_word*)t0)[4],C_fix(1));
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k28915 in map-loop5913 in k28882 in k29052 in lp2 in lp1 in k28972 in chicken.irregex#irregex-opt in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_28917(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,2)))){
C_save_and_reclaim_args((void *)trf_28917,2,t0,t1);}
t2=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t1);
t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,t1);
t4=((C_word*)((C_word*)t0)[3])[1];
f_28907(t4,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* a28943 in k29052 in lp2 in lp1 in k28972 in chicken.irregex#irregex-opt in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28944(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_28944,c,av);}
t3=C_i_stringp(t2);
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=(C_truep(t3)?t3:C_charp(t2));
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* k28972 in chicken.irregex#irregex-opt in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_28974(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,4)))){
C_save_and_reclaim((void *)f_28974,c,av);}
a=C_alloc(7);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_28979,a[2]=t1,a[3]=t3,a[4]=((C_word)li368),tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
f_28979(t5,((C_word*)t0)[2],((C_word*)t0)[3],C_SCHEME_FALSE);}

/* lp1 in k28972 in chicken.irregex#irregex-opt in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_28979(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,4)))){
C_save_and_reclaim_args((void *)trf_28979,4,t0,t1,t2,t3);}
a=C_alloc(8);
if(C_truep(C_i_nullp(t2))){
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28991,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=((C_word)li367),tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
f_28991(t7,t1,C_fix(0),C_SCHEME_END_OF_LIST);}
else{
t4=C_i_car(t2);
t5=C_i_string_length(t4);
t6=C_eqp(t5,C_fix(0));
if(C_truep(t6)){
/* irregex-utils.scm:60: lp1 */
t11=t1;
t12=C_u_i_cdr(t2);
t13=C_SCHEME_TRUE;
t1=t11;
t2=t12;
t3=t13;
goto loop;}
else{
t7=C_i_string_ref(t4,C_fix(0));
t8=C_fix(C_character_code(t7));
t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_29090,a[2]=((C_word*)t0)[2],a[3]=t8,a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=t2,a[7]=t3,tmp=(C_word)a,a+=8,tmp);
/* irregex-utils.scm:65: scheme#substring */
t10=*((C_word*)lf[46]+1);{
C_word av2[5];
av2[0]=t10;
av2[1]=t9;
av2[2]=t4;
av2[3]=C_fix(1);
av2[4]=t5;
((C_proc)(void*)(*((C_word*)t10+1)))(5,av2);}}}}

/* lp2 in lp1 in k28972 in chicken.irregex#irregex-opt in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_28991(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(19,0,3)))){
C_save_and_reclaim_args((void *)trf_28991,4,t0,t1,t2,t3);}
a=C_alloc(19);
t4=C_eqp(t2,C_fix(256));
if(C_truep(t4)){
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29011,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
/* irregex-utils.scm:47: ##sys#fast-reverse */
t6=*((C_word*)lf[69]+1);{
C_word av2[3];
av2[0]=t6;
av2[1]=t5;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}
else{
t5=C_make_character(C_unfix(t2));
t6=C_i_vector_ref(((C_word*)t0)[3],t2);
t7=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
if(C_truep(C_i_nullp(t6))){
/* irregex-utils.scm:51: lp2 */
t11=t1;
t12=t7;
t13=t3;
t1=t11;
t2=t12;
t3=t13;
goto loop;}
else{
if(C_truep(C_i_equalp(t6,lf[445]))){
t8=C_a_i_cons(&a,2,t5,t3);
/* irregex-utils.scm:51: lp2 */
t11=t1;
t12=t7;
t13=t8;
t1=t11;
t2=t12;
t3=t13;
goto loop;}
else{
t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29046,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_29054,a[2]=t5,a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=t7,a[7]=t8,tmp=(C_word)a,a+=8,tmp);
/* irregex-utils.scm:55: irregex-opt */
t10=*((C_word*)lf[442]+1);{
C_word av2[3];
av2[0]=t10;
av2[1]=t9;
av2[2]=t6;
((C_proc)(void*)(*((C_word*)t10+1)))(3,av2);}}}}}

/* k29009 in lp2 in lp1 in k28972 in chicken.irregex#irregex-opt in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29011(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,3)))){
C_save_and_reclaim((void *)f_29011,c,av);}
a=C_alloc(6);
t2=C_i_cdr(t1);
if(C_truep(C_i_nullp(t2))){
t3=C_u_i_car(t1);
t4=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t4;
av2[1]=(C_truep(((C_word*)t0)[3])?C_a_i_list(&a,2,lf[131],t3):t3);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_28854,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:31: every */
f_9268(t3,*((C_word*)lf[444]+1),t1);}}

/* k29044 in lp2 in lp1 in k28972 in chicken.irregex#irregex-opt in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29046(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,3)))){
C_save_and_reclaim((void *)f_29046,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-utils.scm:51: lp2 */
t3=((C_word*)((C_word*)t0)[3])[1];
f_28991(t3,((C_word*)t0)[4],((C_word*)t0)[5],t2);}

/* k29052 in lp2 in lp1 in k28972 in chicken.irregex#irregex-opt in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29054(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(17,c,3)))){
C_save_and_reclaim((void *)f_29054,c,av);}
a=C_alloc(17);
t2=C_a_i_list2(&a,2,((C_word*)t0)[2],t1);
t3=C_i_cdr(t2);
if(C_truep(C_i_nullp(t3))){
t4=C_u_i_car(t2);
t5=C_a_i_cons(&a,2,t4,((C_word*)t0)[3]);
/* irregex-utils.scm:51: lp2 */
t6=((C_word*)((C_word*)t0)[4])[1];
f_28991(t6,((C_word*)t0)[5],((C_word*)t0)[6],t5);}
else{
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_28884,a[2]=((C_word*)t0)[7],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],tmp=(C_word)a,a+=8,tmp);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28944,a[2]=((C_word)li366),tmp=(C_word)a,a+=3,tmp);
/* irregex-utils.scm:35: every */
f_9268(t4,t5,t2);}}

/* k29088 in lp1 in k28972 in chicken.irregex#irregex-opt in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29090(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,3)))){
C_save_and_reclaim((void *)f_29090,c,av);}
a=C_alloc(3);
t2=C_i_vector_ref(((C_word*)t0)[2],((C_word*)t0)[3]);
t3=C_a_i_cons(&a,2,t1,t2);
t4=C_i_vector_set(((C_word*)t0)[2],((C_word*)t0)[3],t3);
/* irregex-utils.scm:66: lp1 */
t5=((C_word*)((C_word*)t0)[4])[1];
f_28979(t5,((C_word*)t0)[5],C_u_i_cdr(((C_word*)t0)[6]),((C_word*)t0)[7]);}

/* chicken.irregex#cset->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29104(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,0,2)))){
C_save_and_reclaim_args((void *)trf_29104,2,t1,t2);}
a=C_alloc(4);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29108,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-utils.scm:71: chicken.base#open-output-string */
t4=*((C_word*)lf[450]+1);{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* k29106 in chicken.irregex#cset->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29108(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,3)))){
C_save_and_reclaim((void *)f_29108,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29111,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29116,a[2]=t4,a[3]=t1,a[4]=((C_word)li370),tmp=(C_word)a,a+=5,tmp));
t6=((C_word*)t4)[1];
f_29116(t6,t2,((C_word*)t0)[3]);}

/* k29109 in k29106 in chicken.irregex#cset->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29111(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_29111,c,av);}
/* irregex-utils.scm:82: chicken.base#get-output-string */
t2=*((C_word*)lf[447]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* lp in k29106 in chicken.irregex#cset->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29116(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(16,0,2)))){
C_save_and_reclaim_args((void *)trf_29116,3,t0,t1,t2);}
a=C_alloc(16);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29126,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
if(C_truep(C_i_pairp(C_u_i_car(t2)))){
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29137,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29159,a[2]=t4,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t6=C_i_caar(t2);
t7=C_a_i_string(&a,1,t6);
/* irregex-utils.scm:77: irregex-quote */
t8=*((C_word*)lf[439]+1);{
C_word av2[3];
av2[0]=t8;
av2[1]=t5;
av2[2]=t7;
((C_proc)(void*)(*((C_word*)t8+1)))(3,av2);}}
else{
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29174,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t5=C_u_i_car(t2);
t6=C_a_i_string(&a,1,t5);
/* irregex-utils.scm:80: irregex-quote */
t7=*((C_word*)lf[439]+1);{
C_word av2[3];
av2[0]=t7;
av2[1]=t4;
av2[2]=t6;
((C_proc)(void*)(*((C_word*)t7+1)))(3,av2);}}}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k29124 in lp in k29106 in chicken.irregex#cset->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29126(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_29126,c,av);}
/* irregex-utils.scm:81: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_29116(t2,((C_word*)t0)[3],C_u_i_cdr(((C_word*)t0)[4]));}

/* k29135 in lp in k29106 in chicken.irregex#cset->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29137(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,3)))){
C_save_and_reclaim((void *)f_29137,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29140,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);
/* ##sys#write-char/port */
t3=*((C_word*)lf[449]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=C_make_character(45);
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* k29138 in k29135 in lp in k29106 in chicken.irregex#cset->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29140(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_29140,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29147,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t3=C_i_cdar(((C_word*)t0)[4]);
t4=C_a_i_string(&a,1,t3);
/* irregex-utils.scm:79: irregex-quote */
t5=*((C_word*)lf[439]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t5;
av2[1]=t2;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k29145 in k29138 in k29135 in lp in k29106 in chicken.irregex#cset->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29147(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29147,c,av);}
/* irregex-utils.scm:79: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k29157 in lp in k29106 in chicken.irregex#cset->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29159(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29159,c,av);}
/* irregex-utils.scm:77: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k29172 in lp in k29106 in chicken.irregex#cset->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29174(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29174,c,av);}
/* irregex-utils.scm:80: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29184(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_29184,c,av);}
a=C_alloc(4);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29188,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-utils.scm:85: chicken.base#open-output-string */
t4=*((C_word*)lf[450]+1);{
C_word *av2=av;
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29188(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,3)))){
C_save_and_reclaim((void *)f_29188,c,av);}
a=C_alloc(12);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29191,a[2]=((C_word*)t0)[2],a[3]=t1,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|5,a[1]=(C_word)f_29196,a[2]=t1,a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=((C_word)li380),tmp=(C_word)a,a+=6,tmp));
t6=((C_word*)t4)[1];
f_29196(t6,t2,((C_word*)t0)[3]);}

/* k29189 in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29191(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_29191,c,av);}
/* irregex-utils.scm:153: chicken.base#get-output-string */
t2=*((C_word*)lf[447]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29196(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,3)))){
C_save_and_reclaim_args((void *)trf_29196,3,t0,t1,t2);}
a=C_alloc(7);
if(C_truep(C_i_pairp(t2))){
t3=C_u_i_car(t2);
t4=C_eqp(t3,lf[227]);
t5=(C_truep(t4)?t4:C_eqp(t3,lf[115]));
if(C_truep(t5)){
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29219,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_i_pairp(C_u_i_cdr(t2)))){
t7=C_i_cddr(t2);
t8=C_i_pairp(t7);
t9=t6;
f_29219(t9,(C_truep(t8)?C_i_not(C_eqp(t2,((C_word*)t0)[4])):C_SCHEME_FALSE));}
else{
t7=t6;
f_29219(t7,C_SCHEME_FALSE);}}
else{
t6=C_eqp(t3,lf[108]);
if(C_truep(t6)){
t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29316,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);
/* irregex-utils.scm:96: scheme#display */
t8=*((C_word*)lf[448]+1);{
C_word av2[4];
av2[0]=t8;
av2[1]=t7;
av2[2]=lf[455];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t8+1)))(4,av2);}}
else{
t7=C_eqp(t3,lf[120]);
if(C_truep(t7)){
t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29358,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);
/* irregex-utils.scm:98: scheme#display */
t9=*((C_word*)lf[448]+1);{
C_word av2[4];
av2[0]=t9;
av2[1]=t8;
av2[2]=lf[458];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t9+1)))(4,av2);}}
else{
t8=C_eqp(t3,lf[103]);
if(C_truep(t8)){
t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29412,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
/* irregex-utils.scm:101: scheme#display */
t10=*((C_word*)lf[448]+1);{
C_word av2[4];
av2[0]=t10;
av2[1]=t9;
av2[2]=lf[461];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t10+1)))(4,av2);}}
else{
t9=C_eqp(t3,lf[127]);
t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_29471,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
if(C_truep(t9)){
t11=t10;
f_29471(t11,t9);}
else{
t11=C_eqp(t3,lf[129]);
if(C_truep(t11)){
t12=t10;
f_29471(t12,t11);}
else{
t12=C_eqp(t3,lf[131]);
if(C_truep(t12)){
t13=t10;
f_29471(t13,t12);}
else{
t13=C_eqp(t3,lf[128]);
t14=t10;
f_29471(t14,(C_truep(t13)?t13:C_eqp(t3,lf[132])));}}}}}}}}
else{
if(C_truep(C_i_symbolp(t2))){
t3=C_eqp(t2,lf[186]);
t4=(C_truep(t3)?t3:C_eqp(t2,lf[195]));
if(C_truep(t4)){
/* irregex-utils.scm:143: scheme#display */
t5=*((C_word*)lf[448]+1);{
C_word av2[4];
av2[0]=t5;
av2[1]=t1;
av2[2]=lf[480];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}
else{
t5=C_eqp(t2,lf[187]);
t6=(C_truep(t5)?t5:C_eqp(t2,lf[196]));
if(C_truep(t6)){
/* irregex-utils.scm:144: scheme#display */
t7=*((C_word*)lf[448]+1);{
C_word av2[4];
av2[0]=t7;
av2[1]=t1;
av2[2]=lf[481];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}
else{
t7=C_eqp(t2,lf[124]);
t8=(C_truep(t7)?t7:C_eqp(t2,lf[125]));
if(C_truep(t8)){
/* irregex-utils.scm:145: scheme#display */
t9=*((C_word*)lf[448]+1);{
C_word av2[4];
av2[0]=t9;
av2[1]=t1;
av2[2]=lf[482];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t9+1)))(4,av2);}}
else{
/* irregex-utils.scm:146: chicken.base#error */
t9=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t9;
av2[1]=t1;
av2[2]=lf[483];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t9+1)))(4,av2);}}}}}
else{
if(C_truep(C_i_stringp(t2))){
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29918,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
/* irregex-utils.scm:148: irregex-quote */
t4=*((C_word*)lf[439]+1);{
C_word av2[3];
av2[0]=t4;
av2[1]=t3;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
if(C_truep(C_charp(t2))){
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29931,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t4=C_a_i_string(&a,1,t2);
/* irregex-utils.scm:150: irregex-quote */
t5=*((C_word*)lf[439]+1);{
C_word av2[3];
av2[0]=t5;
av2[1]=t3;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
/* irregex-utils.scm:152: chicken.base#error */
t3=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t3;
av2[1]=t1;
av2[2]=lf[484];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}}}}}

/* k29217 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29219(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,3)))){
C_save_and_reclaim_args((void *)trf_29219,2,t0,t1);}
a=C_alloc(7);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29222,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
/* irregex-utils.scm:93: scheme#display */
t3=*((C_word*)lf[448]+1);{
C_word av2[4];
av2[0]=t3;
av2[1]=t2;
av2[2]=lf[453];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}
else{
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=C_i_check_list_2(t2,lf[306]);
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_29264,a[2]=t5,a[3]=((C_word*)t0)[5],a[4]=((C_word)li373),tmp=(C_word)a,a+=5,tmp));
t7=((C_word*)t5)[1];
f_29264(t7,((C_word*)t0)[3],t2);}}

/* k29220 in k29217 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29222(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,3)))){
C_save_and_reclaim((void *)f_29222,c,av);}
a=C_alloc(11);
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=C_i_check_list_2(t2,lf[306]);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29229,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],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|4,a[1]=(C_word)f_29234,a[2]=t6,a[3]=((C_word*)t0)[5],a[4]=((C_word)li372),tmp=(C_word)a,a+=5,tmp));
t8=((C_word*)t6)[1];
f_29234(t8,t4,t2);}

/* k29227 in k29220 in k29217 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29229(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29229,c,av);}
/* irregex-utils.scm:93: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[452];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* for-each-loop6013 in k29220 in k29217 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29234(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_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_29234,3,t0,t1,t2);}
a=C_alloc(5);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29244,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:93: g6014 */
t4=((C_word*)((C_word*)t0)[3])[1];
f_29196(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k29242 in for-each-loop6013 in k29220 in k29217 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29244(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_29244,c,av);}
t2=((C_word*)((C_word*)t0)[2])[1];
f_29234(t2,((C_word*)t0)[3],C_slot(((C_word*)t0)[4],C_fix(1)));}

/* for-each-loop6032 in k29217 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29264(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_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_29264,3,t0,t1,t2);}
a=C_alloc(5);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29274,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:94: g6033 */
t4=((C_word*)((C_word*)t0)[3])[1];
f_29196(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k29272 in for-each-loop6032 in k29217 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29274(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_29274,c,av);}
t2=((C_word*)((C_word*)t0)[2])[1];
f_29264(t2,((C_word*)t0)[3],C_slot(((C_word*)t0)[4],C_fix(1)));}

/* k29314 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29316(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,3)))){
C_save_and_reclaim((void *)f_29316,c,av);}
a=C_alloc(11);
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=C_i_check_list_2(t2,lf[306]);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29323,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],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|4,a[1]=(C_word)f_29328,a[2]=t6,a[3]=((C_word*)t0)[5],a[4]=((C_word)li374),tmp=(C_word)a,a+=5,tmp));
t8=((C_word*)t6)[1];
f_29328(t8,t4,t2);}

/* k29321 in k29314 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29323(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29323,c,av);}
/* irregex-utils.scm:96: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[454];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* for-each-loop6049 in k29314 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29328(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_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_29328,3,t0,t1,t2);}
a=C_alloc(5);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29338,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:96: g6050 */
t4=((C_word*)((C_word*)t0)[3])[1];
f_29196(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k29336 in for-each-loop6049 in k29314 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29338(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_29338,c,av);}
t2=((C_word*)((C_word*)t0)[2])[1];
f_29328(t2,((C_word*)t0)[3],C_slot(((C_word*)t0)[4],C_fix(1)));}

/* k29356 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29358(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,3)))){
C_save_and_reclaim((void *)f_29358,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29361,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
/* irregex-utils.scm:98: scheme#display */
t3=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=C_i_cadr(((C_word*)t0)[2]);
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* k29359 in k29356 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29361(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,3)))){
C_save_and_reclaim((void *)f_29361,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29364,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
/* irregex-utils.scm:98: scheme#display */
t3=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=lf[457];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* k29362 in k29359 in k29356 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29364(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,3)))){
C_save_and_reclaim((void *)f_29364,c,av);}
a=C_alloc(11);
t2=C_i_cddr(((C_word*)t0)[2]);
t3=C_i_check_list_2(t2,lf[306]);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29373,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],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|4,a[1]=(C_word)f_29378,a[2]=t6,a[3]=((C_word*)t0)[5],a[4]=((C_word)li375),tmp=(C_word)a,a+=5,tmp));
t8=((C_word*)t6)[1];
f_29378(t8,t4,t2);}

/* k29371 in k29362 in k29359 in k29356 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29373(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29373,c,av);}
/* irregex-utils.scm:99: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[456];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* for-each-loop6068 in k29362 in k29359 in k29356 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29378(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_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_29378,3,t0,t1,t2);}
a=C_alloc(5);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29388,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:99: g6069 */
t4=((C_word*)((C_word*)t0)[3])[1];
f_29196(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k29386 in for-each-loop6068 in k29362 in k29359 in k29356 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29388(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_29388,c,av);}
t2=((C_word*)((C_word*)t0)[2])[1];
f_29378(t2,((C_word*)t0)[3],C_slot(((C_word*)t0)[4],C_fix(1)));}

/* k29410 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29412(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_29412,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29415,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
/* irregex-utils.scm:102: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_29196(t3,t2,C_i_cadr(((C_word*)t0)[4]));}

/* k29413 in k29410 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29415(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(16,c,3)))){
C_save_and_reclaim((void *)f_29415,c,av);}
a=C_alloc(16);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29416,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word)li376),tmp=(C_word)a,a+=5,tmp);
t3=C_i_cddr(((C_word*)t0)[4]);
t4=C_i_check_list_2(t3,lf[306]);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29432,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29437,a[2]=t7,a[3]=t2,a[4]=((C_word)li377),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
f_29437(t9,t5,t3);}

/* g6090 in k29413 in k29410 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29416(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_unlikely(!C_demand(C_calculate_demand(5,0,3)))){
C_save_and_reclaim_args((void *)trf_29416,3,t0,t1,t2);}
a=C_alloc(5);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29420,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:103: scheme#display */
t4=*((C_word*)lf[448]+1);{
C_word av2[4];
av2[0]=t4;
av2[1]=t3;
av2[2]=lf[459];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}

/* k29418 in g6090 in k29413 in k29410 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29420(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_29420,c,av);}
/* irregex-utils.scm:103: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_29196(t2,((C_word*)t0)[3],((C_word*)t0)[4]);}

/* k29430 in k29413 in k29410 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29432(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29432,c,av);}
/* irregex-utils.scm:104: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[460];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* for-each-loop6089 in k29413 in k29410 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29437(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_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_29437,3,t0,t1,t2);}
a=C_alloc(5);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29447,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:103: g6090 */
t4=((C_word*)t0)[3];
f_29416(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k29445 in for-each-loop6089 in k29413 in k29410 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29447(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_29447,c,av);}
t2=((C_word*)((C_word*)t0)[2])[1];
f_29437(t2,((C_word*)t0)[3],C_slot(((C_word*)t0)[4],C_fix(1)));}

/* k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29471(C_word t0,C_word t1){
C_word 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;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,0,3)))){
C_save_and_reclaim_args((void *)trf_29471,2,t0,t1);}
a=C_alloc(11);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29474,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_cddr(((C_word*)t0)[3]);
if(C_truep(C_i_pairp(t3))){
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29485,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);
/* irregex-utils.scm:108: scheme#display */
t5=*((C_word*)lf[448]+1);{
C_word av2[4];
av2[0]=t5;
av2[1]=t4;
av2[2]=lf[463];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}
else{
/* irregex-utils.scm:109: lp */
t4=((C_word*)((C_word*)t0)[5])[1];
f_29196(t4,t2,C_i_cadr(((C_word*)t0)[3]));}}
else{
t2=C_eqp(((C_word*)t0)[6],lf[464]);
if(C_truep(t2)){
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29541,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);
t4=C_i_cadr(((C_word*)t0)[3]);
if(C_truep(C_i_pairp(t4))){
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29571,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
/* irregex-utils.scm:113: scheme#caadr */
t6=*((C_word*)lf[470]+1);{
C_word av2[3];
av2[0]=t6;
av2[1]=t5;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}
else{
t5=t3;
f_29541(t5,C_SCHEME_FALSE);}}
else{
t3=C_eqp(((C_word*)t0)[6],lf[469]);
if(C_truep(t3)){
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29584,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);
/* irregex-utils.scm:119: scheme#display */
t5=*((C_word*)lf[448]+1);{
C_word av2[4];
av2[0]=t5;
av2[1]=t4;
av2[2]=lf[472];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}
else{
t4=C_eqp(((C_word*)t0)[6],lf[247]);
t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_29605,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);
if(C_truep(t4)){
t6=t5;
f_29605(t6,t4);}
else{
t6=C_eqp(((C_word*)t0)[6],lf[234]);
if(C_truep(t6)){
t7=t5;
f_29605(t7,t6);}
else{
t7=C_eqp(((C_word*)t0)[6],lf[52]);
t8=t5;
f_29605(t8,(C_truep(t7)?t7:C_eqp(((C_word*)t0)[6],lf[179])));}}}}}}

/* k29472 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29474(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29474,c,av);}
/* irregex-utils.scm:110: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=C_u_i_car(((C_word*)t0)[3]);
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k29483 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29485(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,3)))){
C_save_and_reclaim((void *)f_29485,c,av);}
a=C_alloc(11);
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=C_i_check_list_2(t2,lf[306]);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29492,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],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|4,a[1]=(C_word)f_29497,a[2]=t6,a[3]=((C_word*)t0)[5],a[4]=((C_word)li378),tmp=(C_word)a,a+=5,tmp));
t8=((C_word*)t6)[1];
f_29497(t8,t4,t2);}

/* k29490 in k29483 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29492(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29492,c,av);}
/* irregex-utils.scm:108: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[462];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* for-each-loop6127 in k29483 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29497(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_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_29497,3,t0,t1,t2);}
a=C_alloc(5);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29507,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:108: g6128 */
t4=((C_word*)((C_word*)t0)[3])[1];
f_29196(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k29505 in for-each-loop6127 in k29483 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29507(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_29507,c,av);}
t2=((C_word*)((C_word*)t0)[2])[1];
f_29497(t2,((C_word*)t0)[3],C_slot(((C_word*)t0)[4],C_fix(1)));}

/* k29539 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29541(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,3)))){
C_save_and_reclaim_args((void *)trf_29541,2,t0,t1);}
a=C_alloc(5);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29544,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);
/* irregex-utils.scm:114: scheme#display */
t3=*((C_word*)lf[448]+1);{
C_word av2[4];
av2[0]=t3;
av2[1]=t2;
av2[2]=lf[467];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}
else{
/* irregex-utils.scm:117: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[468];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}}

/* k29542 in k29539 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29544(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_29544,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29547,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_29554,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29558,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
/* irregex-utils.scm:115: scheme#cdadr */
t5=*((C_word*)lf[466]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t5;
av2[1]=t4;
av2[2]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k29545 in k29542 in k29539 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29547(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29547,c,av);}
/* irregex-utils.scm:116: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[465];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k29552 in k29542 in k29539 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29554(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29554,c,av);}
/* irregex-utils.scm:115: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k29556 in k29542 in k29539 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29558(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_29558,c,av);}
/* irregex-utils.scm:115: cset->string */
f_29104(((C_word*)t0)[2],t1);}

/* k29569 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29571(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_29571,c,av);}
t2=((C_word*)t0)[2];
f_29541(t2,C_eqp(lf[469],t1));}

/* k29582 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29584(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,2)))){
C_save_and_reclaim((void *)f_29584,c,av);}
a=C_alloc(8);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29587,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_29594,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
/* irregex-utils.scm:120: cset->string */
f_29104(t3,C_u_i_cdr(((C_word*)t0)[4]));}

/* k29585 in k29582 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29587(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29587,c,av);}
/* irregex-utils.scm:121: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[471];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k29592 in k29582 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29594(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29594,c,av);}
/* irregex-utils.scm:120: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k29603 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29605(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,3)))){
C_save_and_reclaim_args((void *)trf_29605,2,t0,t1);}
a=C_alloc(6);
if(C_truep(t1)){
t2=C_eqp(C_make_character(126),C_u_i_car(((C_word*)t0)[2]));
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29614,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(t2)){
t4=t3;
f_29614(t4,t2);}
else{
t4=C_eqp(lf[247],C_u_i_car(((C_word*)t0)[2]));
if(C_truep(t4)){
t5=C_i_pairp(C_u_i_cdr(((C_word*)t0)[2]));
t6=t3;
f_29614(t6,(C_truep(t5)?C_eqp(lf[124],C_i_cadr(((C_word*)t0)[2])):C_SCHEME_FALSE));}
else{
t5=t3;
f_29614(t5,C_SCHEME_FALSE);}}}
else{
t2=C_eqp(((C_word*)t0)[6],lf[225]);
t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[6],lf[226]));
if(C_truep(t3)){
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29690,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
/* irregex-utils.scm:132: scheme#display */
t5=*((C_word*)lf[448]+1);{
C_word av2[4];
av2[0]=t5;
av2[1]=t4;
av2[2]=lf[478];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}
else{
if(C_truep(C_i_stringp(C_u_i_car(((C_word*)t0)[2])))){
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29754,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
/* ##sys#string->list */
t5=*((C_word*)lf[105]+1);{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=C_u_i_car(((C_word*)t0)[2]);
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
/* irregex-utils.scm:140: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t4;
av2[1]=((C_word*)t0)[3];
av2[2]=lf[479];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}}}}

/* k29612 in k29603 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29614(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,3)))){
C_save_and_reclaim_args((void *)trf_29614,2,t0,t1);}
a=C_alloc(5);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29617,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);
/* irregex-utils.scm:126: scheme#display */
t3=*((C_word*)lf[448]+1);{
C_word av2[4];
av2[0]=t3;
av2[1]=t2;
av2[2]=lf[474];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}
else{
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29652,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
/* irregex-utils.scm:130: sre->cset */
f_26377(t2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}}

/* k29615 in k29612 in k29603 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29617(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,c,2)))){
C_save_and_reclaim((void *)f_29617,c,av);}
a=C_alloc(8);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29620,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_29627,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t4=C_eqp(C_make_character(126),C_u_i_car(((C_word*)t0)[4]));
if(C_truep(t4)){
/* irregex-utils.scm:127: cset->string */
f_29104(t3,C_u_i_cdr(((C_word*)t0)[4]));}
else{
/* irregex-utils.scm:127: cset->string */
f_29104(t3,C_i_cddr(((C_word*)t0)[4]));}}

/* k29618 in k29615 in k29612 in k29603 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29620(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29620,c,av);}
/* irregex-utils.scm:128: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[473];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k29625 in k29615 in k29612 in k29603 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29627(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29627,c,av);}
/* irregex-utils.scm:127: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k29650 in k29612 in k29603 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29652(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_29652,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[469],t1);
/* irregex-utils.scm:130: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_29196(t3,((C_word*)t0)[3],t2);}

/* k29688 in k29603 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29690(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,3)))){
C_save_and_reclaim((void *)f_29690,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29693,a[2]=((C_word*)t0)[2],a[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(C_u_i_car(((C_word*)t0)[2]),lf[225]);
if(C_truep(t3)){
/* irregex-utils.scm:133: scheme#display */
t4=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=t2;
av2[2]=lf[477];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}
else{
t4=t2;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_SCHEME_UNDEFINED;
f_29693(2,av2);}}}

/* k29691 in k29688 in k29603 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29693(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,3)))){
C_save_and_reclaim((void *)f_29693,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29696,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
/* irregex-utils.scm:134: scheme#display */
t3=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=lf[476];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* k29694 in k29691 in k29688 in k29603 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29696(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,3)))){
C_save_and_reclaim((void *)f_29696,c,av);}
a=C_alloc(11);
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=C_i_check_list_2(t2,lf[306]);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29703,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],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|4,a[1]=(C_word)f_29708,a[2]=t6,a[3]=((C_word*)t0)[5],a[4]=((C_word)li379),tmp=(C_word)a,a+=5,tmp));
t8=((C_word*)t6)[1];
f_29708(t8,t4,t2);}

/* k29701 in k29694 in k29691 in k29688 in k29603 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29703(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29703,c,av);}
/* irregex-utils.scm:136: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[475];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* for-each-loop6182 in k29694 in k29691 in k29688 in k29603 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29708(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_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_29708,3,t0,t1,t2);}
a=C_alloc(5);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29718,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:135: g6183 */
t4=((C_word*)((C_word*)t0)[3])[1];
f_29196(t4,t3,C_slot(t2,C_fix(0)));}
else{
t3=C_SCHEME_UNDEFINED;
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k29716 in for-each-loop6182 in k29694 in k29691 in k29688 in k29603 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29718(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_29718,c,av);}
t2=((C_word*)((C_word*)t0)[2])[1];
f_29708(t2,((C_word*)t0)[3],C_slot(((C_word*)t0)[4],C_fix(1)));}

/* k29752 in k29603 in k29469 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29754(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_29754,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[469],t1);
/* irregex-utils.scm:139: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_29196(t3,((C_word*)t0)[3],t2);}

/* k29916 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29918(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29918,c,av);}
/* irregex-utils.scm:148: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k29929 in lp in k29186 in chicken.irregex#sre->string in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29931(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_29931,c,av);}
/* irregex-utils.scm:150: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* chicken.irregex#glob->sre in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29940(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_29940,c,av);}
a=C_alloc(6);
t3=C_i_check_string_2(t2,lf[486]);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29951,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29955,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
/* ##sys#string->list */
t6=*((C_word*)lf[105]+1);{
C_word *av2=av;
av2[0]=t6;
av2[1]=t5;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k29949 in chicken.irregex#glob->sre in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29951(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_29951,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,lf[227],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k29953 in chicken.irregex#glob->sre in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29955(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,4)))){
C_save_and_reclaim((void *)f_29955,c,av);}
a=C_alloc(6);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_29957,a[2]=t3,a[3]=((C_word)li383),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_29957(t5,((C_word*)t0)[2],t1,C_SCHEME_TRUE);}

/* loop in k29953 in chicken.irregex#glob->sre in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_29957(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(61,0,4)))){
C_save_and_reclaim_args((void *)trf_29957,4,t0,t1,t2,t3);}
a=C_alloc(61);
if(C_truep(C_i_nullp(t2))){
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=C_SCHEME_END_OF_LIST;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=C_i_car(t2);
t5=C_u_i_cdr(t2);
if(C_truep(C_i_char_equalp(t4,C_make_character(42)))){
if(C_truep(t3)){
t6=C_a_i_list(&a,1,lf[487]);
t7=C_a_i_list(&a,2,lf[179],t6);
t8=C_a_i_list(&a,1,lf[488]);
t9=C_a_i_list(&a,2,lf[179],t8);
t10=C_a_i_list(&a,2,lf[127],t9);
t11=C_a_i_list(&a,3,lf[227],t7,t10);
t12=C_a_i_list(&a,1,lf[489]);
t13=C_a_i_list(&a,2,lf[179],t12);
t14=C_a_i_list(&a,2,lf[127],t13);
t15=C_a_i_list(&a,3,lf[103],t11,t14);
t16=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29988,a[2]=t1,a[3]=t15,tmp=(C_word)a,a+=4,tmp);
/* irregex.scm:241: loop */
t18=t16;
t19=t5;
t20=C_SCHEME_FALSE;
t1=t18;
t2=t19;
t3=t20;
goto loop;}
else{
t6=C_a_i_list(&a,1,lf[490]);
t7=C_a_i_list(&a,2,lf[179],t6);
t8=C_a_i_list(&a,2,lf[127],t7);
t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_30035,a[2]=t1,a[3]=t8,tmp=(C_word)a,a+=4,tmp);
/* irregex.scm:242: loop */
t18=t9;
t19=t5;
t20=C_SCHEME_FALSE;
t1=t18;
t2=t19;
t3=t20;
goto loop;}}
else{
if(C_truep(C_u_i_char_equalp(t4,C_make_character(63)))){
t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_30055,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex.scm:243: loop */
t18=t6;
t19=t5;
t20=C_SCHEME_FALSE;
t1=t18;
t2=t19;
t3=t20;
goto loop;}
else{
if(C_truep(C_u_i_char_equalp(t4,C_make_character(91)))){
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_30065,a[2]=((C_word*)t0)[2],a[3]=t7,a[4]=((C_word)li382),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
f_30065(t9,t1,t5,C_SCHEME_END_OF_LIST);}
else{
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_30216,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
/* irregex.scm:265: loop */
t18=t6;
t19=t5;
t20=C_u_i_memq(t4,lf[492]);
t1=t18;
t2=t19;
t3=t20;
goto loop;}}}}}

/* k29986 in loop in k29953 in chicken.irregex#glob->sre in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_29988(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_29988,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k30033 in loop in k29953 in chicken.irregex#glob->sre in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_30035(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_30035,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k30053 in loop in k29953 in chicken.irregex#glob->sre in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_30055(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_30055,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,lf[124],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* loop2 in loop in k29953 in chicken.irregex#glob->sre in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_30065(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,4)))){
C_save_and_reclaim_args((void *)trf_30065,4,t0,t1,t2,t3);}
a=C_alloc(7);
t4=C_i_pairp(t2);
if(C_truep(C_i_not(t4))){
/* irregex.scm:247: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t5;
av2[1]=t1;
av2[2]=lf[486];
av2[3]=lf[491];
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}
else{
t5=C_i_car(t2);
if(C_truep(C_i_char_equalp(C_make_character(93),t5))){
t6=C_i_length(t3);
t7=C_fixnum_greaterp(t6,C_fix(1));
t8=(C_truep(t7)?C_a_i_cons(&a,2,lf[103],t3):C_i_car(t3));
t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_30092,a[2]=t1,a[3]=t8,tmp=(C_word)a,a+=4,tmp);
/* irregex.scm:253: loop */
t10=((C_word*)((C_word*)t0)[2])[1];
f_29957(t10,t9,C_u_i_cdr(t2),C_SCHEME_FALSE);}
else{
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_30114,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
if(C_truep(C_i_pairp(C_u_i_cdr(t2)))){
t7=C_i_cddr(t2);
if(C_truep(C_i_pairp(t7))){
t8=C_u_i_cdr(t2);
t9=t6;
f_30114(t9,C_i_char_equalp(C_make_character(45),C_u_i_car(t8)));}
else{
t8=t6;
f_30114(t8,C_SCHEME_FALSE);}}
else{
t7=t6;
f_30114(t7,C_SCHEME_FALSE);}}}}

/* k30090 in loop2 in loop in k29953 in chicken.irregex#glob->sre in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_30092(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_30092,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k30112 in loop2 in loop in k29953 in chicken.irregex#glob->sre in k18847 in k7718 in k7493 in k7490 */
static void C_fcall f_30114(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,3)))){
C_save_and_reclaim_args((void *)trf_30114,2,t0,t1);}
a=C_alloc(12);
if(C_truep(t1)){
t2=C_i_cdddr(((C_word*)t0)[2]);
t3=C_u_i_car(((C_word*)t0)[2]);
t4=C_u_i_cdr(((C_word*)t0)[2]);
t5=C_u_i_cdr(t4);
t6=C_u_i_car(t5);
t7=C_a_i_list(&a,3,lf[52],t3,t6);
t8=C_a_i_cons(&a,2,t7,((C_word*)t0)[3]);
/* irregex.scm:257: loop2 */
t9=((C_word*)((C_word*)t0)[4])[1];
f_30065(t9,((C_word*)t0)[5],t2,t8);}
else{
t2=C_i_pairp(C_u_i_cdr(((C_word*)t0)[2]));
t3=(C_truep(t2)?C_i_char_equalp(C_make_character(45),C_u_i_car(((C_word*)t0)[2])):C_SCHEME_FALSE);
if(C_truep(t3)){
t4=C_i_cddr(((C_word*)t0)[2]);
t5=C_u_i_cdr(((C_word*)t0)[2]);
t6=C_u_i_car(t5);
t7=C_a_i_list(&a,2,lf[179],t6);
t8=C_a_i_cons(&a,2,t7,((C_word*)t0)[3]);
/* irregex.scm:261: loop2 */
t9=((C_word*)((C_word*)t0)[4])[1];
f_30065(t9,((C_word*)t0)[5],t4,t8);}
else{
t4=C_u_i_cdr(((C_word*)t0)[2]);
t5=C_u_i_car(((C_word*)t0)[2]);
t6=C_a_i_cons(&a,2,t5,((C_word*)t0)[3]);
/* irregex.scm:264: loop2 */
t7=((C_word*)((C_word*)t0)[4])[1];
f_30065(t7,((C_word*)t0)[5],t4,t6);}}}

/* k30214 in loop in k29953 in chicken.irregex#glob->sre in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_30216(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_30216,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* a30680 in k18847 in k7718 in k7493 in k7490 */
static void C_ccall f_30681(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c<3) C_bad_min_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-3)*C_SIZEOF_PAIR +30,c,1)))){
C_save_and_reclaim((void*)f_30681,c,av);}
a=C_alloc((c-3)*C_SIZEOF_PAIR+30);
t3=C_build_rest(&a,c,3,av);
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
t4=C_a_i_cons(&a,2,t2,t3);
t5=C_a_i_cons(&a,2,lf[179],t4);
t6=C_a_i_list(&a,3,lf[115],t2,lf[124]);
t7=C_a_i_list(&a,3,lf[103],t5,t6);
t8=t1;{
C_word *av2=av;
av2[0]=t8;
av2[1]=C_a_i_list(&a,2,lf[127],t7);
((C_proc)(void*)(*((C_word*)t8+1)))(2,av2);}}

/* a30842 in k7718 in k7493 in k7490 */
static void C_ccall f_30843(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_30843,c,av);}
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* a30845 in k7718 in k7493 in k7490 */
static void C_ccall f_30846(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6;
C_word *a;
if(c!=6) C_bad_argc_2(c,6,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_30846,c,av);}
/* irregex-core.scm:1947: scheme#substring */
t6=*((C_word*)lf[46]+1);{
C_word *av2=av;
av2[0]=t6;
av2[1]=t1;
av2[2]=C_i_car(t2);
av2[3]=t3;
av2[4]=t5;
((C_proc)(void*)(*((C_word*)t6+1)))(5,av2);}}

/* a30879 in k7493 in k7490 */
static void C_ccall f_30880(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_30880,c,av);}
a=C_alloc(4);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_30884,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:152: irregex-match-num-submatches */
t5=*((C_word*)lf[17]+1);{
C_word *av2=av;
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k30882 in a30879 in k7493 in k7490 */
static void C_ccall f_30884(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,3)))){
C_save_and_reclaim((void *)f_30884,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_30887,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:153: scheme#display */
t3=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=lf[499];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* k30885 in k30882 in a30879 in k7493 in k7490 */
static void C_ccall f_30887(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,3)))){
C_save_and_reclaim((void *)f_30887,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_30890,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);
/* irregex-core.scm:154: scheme#display */
t3=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[4];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* k30888 in k30885 in k30882 in a30879 in k7493 in k7490 */
static void C_ccall f_30890(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,3)))){
C_save_and_reclaim((void *)f_30890,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_30893,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);
/* irregex-core.scm:155: scheme#display */
t3=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=lf[498];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* k30891 in k30888 in k30885 in k30882 in a30879 in k7493 in k7490 */
static void C_ccall f_30893(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,3)))){
C_save_and_reclaim((void *)f_30893,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_30896,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t3=C_eqp(((C_word*)t0)[4],C_fix(0));
t4=(C_truep(t3)?t3:C_fixnum_greaterp(((C_word*)t0)[4],C_fix(1)));
if(C_truep(t4)){
/* irregex-core.scm:156: scheme#display */
t5=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t5;
av2[1]=t2;
av2[2]=lf[497];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}
else{
/* irregex-core.scm:157: scheme#display */
t5=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t5;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[496];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}}

/* k30894 in k30891 in k30888 in k30885 in k30882 in a30879 in k7493 in k7490 */
static void C_ccall f_30896(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_30896,c,av);}
/* irregex-core.scm:157: scheme#display */
t2=*((C_word*)lf[448]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[496];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k7490 */
static void C_ccall f_7492(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_7492,c,av);}
a=C_alloc(3);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7495,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);{
C_word *av2=av;
av2[0]=C_SCHEME_UNDEFINED;
av2[1]=t2;
C_expand_toplevel(2,av2);}}

/* k7493 in k7490 */
static void C_ccall f_7495(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(52,c,4)))){
C_save_and_reclaim((void *)f_7495,c,av);}
a=C_alloc(52);
t2=C_a_i_provide(&a,1,lf[0]);
t3=C_a_i_provide(&a,1,lf[1]);
t4=C_mutate(&lf[2] /* (set! chicken.irregex#vector-copy ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7497,a[2]=((C_word)li0),tmp=(C_word)a,a+=3,tmp));
t5=C_mutate((C_word*)lf[5]+1 /* (set! chicken.irregex#irregex? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7510,a[2]=((C_word)li1),tmp=(C_word)a,a+=3,tmp));
t6=C_mutate((C_word*)lf[7]+1 /* (set! chicken.irregex#irregex-num-submatches ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7552,a[2]=((C_word)li2),tmp=(C_word)a,a+=3,tmp));
t7=C_mutate((C_word*)lf[9]+1 /* (set! chicken.irregex#irregex-names ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7570,a[2]=((C_word)li3),tmp=(C_word)a,a+=3,tmp));
t8=C_mutate(&lf[11] /* (set! chicken.irregex#irregex-new-matches ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7579,a[2]=((C_word)li4),tmp=(C_word)a,a+=3,tmp));
t9=C_mutate(&lf[13] /* (set! chicken.irregex#irregex-reset-matches! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7602,a[2]=((C_word)li5),tmp=(C_word)a,a+=3,tmp));
t10=C_mutate(&lf[15] /* (set! chicken.irregex#irregex-copy-matches ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7611,a[2]=((C_word)li6),tmp=(C_word)a,a+=3,tmp));
t11=C_mutate((C_word*)lf[16]+1 /* (set! chicken.irregex#irregex-match-data? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7643,a[2]=((C_word)li7),tmp=(C_word)a,a+=3,tmp));
t12=C_mutate((C_word*)lf[17]+1 /* (set! chicken.irregex#irregex-match-num-submatches ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7649,a[2]=((C_word)li8),tmp=(C_word)a,a+=3,tmp));
t13=C_mutate((C_word*)lf[19]+1 /* (set! chicken.irregex#irregex-match-names ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7674,a[2]=((C_word)li9),tmp=(C_word)a,a+=3,tmp));
t14=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7720,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
t15=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_30880,a[2]=((C_word)li387),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:151: ##sys#register-record-printer */
t16=*((C_word*)lf[500]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t16;
av2[1]=t14;
av2[2]=lf[501];
av2[3]=t15;
((C_proc)(void*)(*((C_word*)t16+1)))(4,av2);}}

/* chicken.irregex#vector-copy in k7493 in k7490 */
static void C_fcall f_7497(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,0,2)))){
C_save_and_reclaim_args((void *)trf_7497,2,t1,t2);}
a=C_alloc(4);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7501,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:83: scheme#make-vector */
t4=*((C_word*)lf[4]+1);{
C_word av2[3];
av2[0]=t4;
av2[1]=t3;
av2[2]=C_i_vector_length(t2);
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k7499 in chicken.irregex#vector-copy in k7493 in k7490 */
static void C_ccall f_7501(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,3)))){
C_save_and_reclaim((void *)f_7501,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7504,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:84: chicken.base#vector-copy! */
t3=*((C_word*)lf[3]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[3];
av2[3]=t1;
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* k7502 in k7499 in chicken.irregex#vector-copy in k7493 in k7490 */
static void C_ccall f_7504(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_7504,c,av);}
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* chicken.irregex#irregex? in k7493 in k7490 */
static void C_ccall f_7510(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_7510,c,av);}
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_i_structurep(t2,lf[6]);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* chicken.irregex#irregex-num-submatches in k7493 in k7490 */
static void C_ccall f_7552(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_7552,c,av);}
t3=C_i_check_structure_2(t2,lf[6],lf[8]);
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_slot(t2,C_fix(5));
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* chicken.irregex#irregex-names in k7493 in k7490 */
static void C_ccall f_7570(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_7570,c,av);}
t3=C_i_check_structure_2(t2,lf[6],lf[10]);
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_slot(t2,C_fix(7));
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* chicken.irregex#irregex-new-matches in k7493 in k7490 */
static void C_fcall f_7579(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,2)))){
C_save_and_reclaim_args((void *)trf_7579,2,t1,t2);}
a=C_alloc(7);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7587,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7600,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:116: irregex-num-submatches */
t5=*((C_word*)lf[7]+1);{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k7585 in chicken.irregex#irregex-new-matches in k7493 in k7490 */
static void C_ccall f_7587(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,1)))){
C_save_and_reclaim((void *)f_7587,c,av);}
a=C_alloc(6);
t2=C_slot(((C_word*)t0)[2],C_fix(7));
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_a_i_record5(&a,5,lf[12],t1,t2,C_SCHEME_FALSE,C_SCHEME_FALSE);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* k7598 in chicken.irregex#irregex-new-matches in k7493 in k7490 */
static void C_ccall f_7600(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,3)))){
C_save_and_reclaim((void *)f_7600,c,av);}
a=C_alloc(10);
t2=C_a_i_fixnum_plus(&a,2,C_fix(2),t1);
t3=C_s_a_u_i_integer_times(&a,2,C_fix(4),t2);
/* irregex-core.scm:116: scheme#make-vector */
t4=*((C_word*)lf[4]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=((C_word*)t0)[2];
av2[2]=t3;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}

/* chicken.irregex#irregex-reset-matches! in k7493 in k7490 */
static void C_fcall f_7602(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,0,3)))){
C_save_and_reclaim_args((void *)trf_7602,2,t1,t2);}
a=C_alloc(4);
t3=C_slot(t2,C_fix(1));
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7609,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:119: scheme#vector-fill! */
t5=*((C_word*)lf[14]+1);{
C_word av2[4];
av2[0]=t5;
av2[1]=t4;
av2[2]=t3;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}

/* k7607 in chicken.irregex#irregex-reset-matches! in k7493 in k7490 */
static void C_ccall f_7609(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_7609,c,av);}
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* chicken.irregex#irregex-copy-matches in k7493 in k7490 */
static void C_fcall f_7611(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,0,2)))){
C_save_and_reclaim_args((void *)trf_7611,2,t1,t2);}
a=C_alloc(4);
if(C_truep(C_i_structurep(t2,lf[12]))){
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7625,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:125: vector-copy */
f_7497(t3,C_slot(t2,C_fix(1)));}
else{
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k7623 in chicken.irregex#irregex-copy-matches in k7493 in k7490 */
static void C_ccall f_7625(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,1)))){
C_save_and_reclaim((void *)f_7625,c,av);}
a=C_alloc(6);
t2=C_slot(((C_word*)t0)[2],C_fix(2));
t3=C_slot(((C_word*)t0)[2],C_fix(3));
t4=C_slot(((C_word*)t0)[2],C_fix(4));
t5=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t5;
av2[1]=C_a_i_record5(&a,5,lf[12],t1,t2,t3,t4);
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}

/* chicken.irregex#irregex-match-data? in k7493 in k7490 */
static void C_ccall f_7643(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_7643,c,av);}
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_i_structurep(t2,lf[12]);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* chicken.irregex#irregex-match-num-submatches in k7493 in k7490 */
static void C_ccall f_7649(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,1)))){
C_save_and_reclaim((void *)f_7649,c,av);}
a=C_alloc(5);
t3=C_i_check_structure_2(t2,lf[12],lf[18]);
t4=C_slot(t2,C_fix(1));
t5=C_block_size(t4);
t6=C_fixnum_divide(t5,C_fix(4));
t7=t1;{
C_word *av2=av;
av2[0]=t7;
av2[1]=C_a_i_fixnum_difference(&a,2,t6,C_fix(2));
((C_proc)(void*)(*((C_word*)t7+1)))(2,av2);}}

/* chicken.irregex#irregex-match-names in k7493 in k7490 */
static void C_ccall f_7674(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_7674,c,av);}
t3=C_i_check_structure_2(t2,lf[12],lf[20]);
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_slot(t2,C_fix(2));
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* k7718 in k7493 in k7490 */
static void C_ccall f_7720(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word t26;
C_word t27;
C_word t28;
C_word t29;
C_word t30;
C_word t31;
C_word t32;
C_word t33;
C_word t34;
C_word t35;
C_word t36;
C_word t37;
C_word t38;
C_word t39;
C_word t40;
C_word t41;
C_word t42;
C_word t43;
C_word t44;
C_word t45;
C_word t46;
C_word t47;
C_word t48;
C_word t49;
C_word t50;
C_word t51;
C_word t52;
C_word t53;
C_word t54;
C_word t55;
C_word t56;
C_word t57;
C_word t58;
C_word t59;
C_word t60;
C_word t61;
C_word t62;
C_word t63;
C_word t64;
C_word t65;
C_word t66;
C_word t67;
C_word t68;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(216,c,6)))){
C_save_and_reclaim((void *)f_7720,c,av);}
a=C_alloc(216);
t2=C_mutate((C_word*)lf[21]+1 /* (set! chicken.irregex#irregex-match-start-chunk ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7735,a[2]=((C_word)li10),tmp=(C_word)a,a+=3,tmp));
t3=C_mutate((C_word*)lf[24]+1 /* (set! chicken.irregex#irregex-match-start-index ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7760,a[2]=((C_word)li11),tmp=(C_word)a,a+=3,tmp));
t4=C_mutate((C_word*)lf[26]+1 /* (set! chicken.irregex#irregex-match-end-chunk ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7789,a[2]=((C_word)li12),tmp=(C_word)a,a+=3,tmp));
t5=C_mutate((C_word*)lf[28]+1 /* (set! chicken.irregex#irregex-match-end-index ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7818,a[2]=((C_word)li13),tmp=(C_word)a,a+=3,tmp));
t6=C_mutate(&lf[22] /* (set! chicken.irregex#irregex-match-numeric-index ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7911,a[2]=((C_word)li15),tmp=(C_word)a,a+=3,tmp));
t7=C_mutate((C_word*)lf[36]+1 /* (set! chicken.irregex#irregex-match-valid-index? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8095,a[2]=((C_word)li16),tmp=(C_word)a,a+=3,tmp));
t8=C_mutate((C_word*)lf[40]+1 /* (set! chicken.irregex#irregex-match-substring ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8158,a[2]=((C_word)li17),tmp=(C_word)a,a+=3,tmp));
t9=C_mutate((C_word*)lf[42]+1 /* (set! chicken.irregex#irregex-match-subchunk ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8239,a[2]=((C_word)li18),tmp=(C_word)a,a+=3,tmp));
t10=C_mutate((C_word*)lf[45]+1 /* (set! chicken.irregex#make-irregex-chunker ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8329,a[2]=((C_word)li23),tmp=(C_word)a,a+=3,tmp));
t11=C_mutate(&lf[50] /* (set! chicken.irregex#chunker-prev-char ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8597,a[2]=((C_word)li25),tmp=(C_word)a,a+=3,tmp));
t12=C_mutate(&lf[51] /* (set! chicken.irregex#chunker-next-char ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8627,a[2]=((C_word)li26),tmp=(C_word)a,a+=3,tmp));
t13=C_a_i_list(&a,5,lf[52],C_make_character(0),C_make_character(55295),C_make_character(57344),C_make_character(1114111));
t14=C_mutate(&lf[53] /* (set! chicken.irregex#*all-chars* ...) */,t13);
t15=C_mutate(&lf[54] /* (set! chicken.irregex#string-scan-char ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8748,a[2]=((C_word)li28),tmp=(C_word)a,a+=3,tmp));
t16=C_mutate(&lf[47] /* (set! chicken.irregex#string-cat-reverse ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9039,a[2]=((C_word)li31),tmp=(C_word)a,a+=3,tmp));
t17=C_mutate(&lf[57] /* (set! chicken.irregex#zero-to ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9089,a[2]=((C_word)li33),tmp=(C_word)a,a+=3,tmp));
t18=C_mutate(&lf[58] /* (set! chicken.irregex#find ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9126,a[2]=((C_word)li35),tmp=(C_word)a,a+=3,tmp));
t19=C_mutate(&lf[59] /* (set! chicken.irregex#last ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9187,a[2]=((C_word)li37),tmp=(C_word)a,a+=3,tmp));
t20=C_mutate(&lf[61] /* (set! chicken.irregex#any ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9225,a[2]=((C_word)li39),tmp=(C_word)a,a+=3,tmp));
t21=C_mutate(&lf[62] /* (set! chicken.irregex#every ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9268,a[2]=((C_word)li41),tmp=(C_word)a,a+=3,tmp));
t22=C_mutate(&lf[56] /* (set! chicken.irregex#fold ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9313,a[2]=((C_word)li43),tmp=(C_word)a,a+=3,tmp));
t23=C_mutate(&lf[63] /* (set! chicken.irregex#flag-join ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9643,a[2]=((C_word)li44),tmp=(C_word)a,a+=3,tmp));
t24=C_mutate(&lf[64] /* (set! chicken.irregex#flag-clear ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9652,a[2]=((C_word)li45),tmp=(C_word)a,a+=3,tmp));
t25=C_a_i_list1(&a,1,lf[65]);
t26=C_mutate(&lf[66] /* (set! chicken.irregex#close-token ...) */,t25);
t27=C_mutate(&lf[67] /* (set! chicken.irregex#with-read-from-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9670,a[2]=((C_word)li60),tmp=(C_word)a,a+=3,tmp));
t28=C_mutate(&lf[89] /* (set! chicken.irregex#symbol-list->flags ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10263,a[2]=((C_word)li62),tmp=(C_word)a,a+=3,tmp));
t29=C_mutate((C_word*)lf[101]+1 /* (set! chicken.irregex#maybe-string->sre ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10386,a[2]=((C_word)li63),tmp=(C_word)a,a+=3,tmp));
t30=C_mutate((C_word*)lf[102]+1 /* (set! chicken.irregex#string->sre ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10398,a[2]=((C_word)li90),tmp=(C_word)a,a+=3,tmp));
t31=C_a_i_cons(&a,2,C_make_character(110),C_make_character(10));
t32=C_a_i_cons(&a,2,C_make_character(114),C_make_character(13));
t33=C_a_i_cons(&a,2,C_make_character(116),C_make_character(9));
t34=C_a_i_cons(&a,2,C_make_character(97),C_make_character(7));
t35=C_a_i_cons(&a,2,C_make_character(101),C_make_character(27));
t36=C_a_i_cons(&a,2,C_make_character(102),C_make_character(12));
t37=C_a_i_list(&a,6,t31,t32,t33,t34,t35,t36);
t38=C_mutate(&lf[168] /* (set! chicken.irregex#posix-escape-sequences ...) */,t37);
t39=C_mutate(&lf[169] /* (set! chicken.irregex#string-parse-hex-escape ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13226,a[2]=((C_word)li92),tmp=(C_word)a,a+=3,tmp));
t40=C_mutate(&lf[204] /* (set! chicken.irregex#high-char? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13939,a[2]=((C_word)li93),tmp=(C_word)a,a+=3,tmp));
t41=C_mutate(&lf[106] /* (set! chicken.irregex#utf8-string-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13960,a[2]=((C_word)li95),tmp=(C_word)a,a+=3,tmp));
t42=C_mutate(&lf[206] /* (set! chicken.irregex#utf8-lowest-digit-of-length ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14193,a[2]=((C_word)li96),tmp=(C_word)a,a+=3,tmp));
t43=C_mutate(&lf[208] /* (set! chicken.irregex#char->utf8-list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14269,a[2]=((C_word)li97),tmp=(C_word)a,a+=3,tmp));
t44=C_mutate(&lf[210] /* (set! chicken.irregex#unicode-range-helper ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14545,a[2]=((C_word)li100),tmp=(C_word)a,a+=3,tmp));
t45=C_mutate(&lf[212] /* (set! chicken.irregex#unicode-range-up-from ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14683,a[2]=((C_word)li103),tmp=(C_word)a,a+=3,tmp));
t46=C_mutate(&lf[213] /* (set! chicken.irregex#unicode-range-up-to ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14822,a[2]=((C_word)li106),tmp=(C_word)a,a+=3,tmp));
t47=C_mutate(&lf[214] /* (set! chicken.irregex#cset->utf8-pattern ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15400,a[2]=((C_word)li115),tmp=(C_word)a,a+=3,tmp));
t48=C_mutate((C_word*)lf[217]+1 /* (set! chicken.irregex#irregex ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15967,a[2]=((C_word)li116),tmp=(C_word)a,a+=3,tmp));
t49=C_mutate((C_word*)lf[219]+1 /* (set! chicken.irregex#string->irregex ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16095,a[2]=((C_word)li117),tmp=(C_word)a,a+=3,tmp));
t50=C_mutate((C_word*)lf[220]+1 /* (set! chicken.irregex#sre->irregex ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16105,a[2]=((C_word)li213),tmp=(C_word)a,a+=3,tmp));
t51=C_mutate(&lf[139] /* (set! chicken.irregex#sre-empty? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16238,a[2]=((C_word)li214),tmp=(C_word)a,a+=3,tmp));
t52=C_mutate(&lf[277] /* (set! chicken.irregex#sre-any? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16405,a[2]=((C_word)li215),tmp=(C_word)a,a+=3,tmp));
t53=C_mutate(&lf[136] /* (set! chicken.irregex#sre-repeater? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16506,a[2]=((C_word)li216),tmp=(C_word)a,a+=3,tmp));
t54=C_mutate(&lf[279] /* (set! chicken.irregex#sre-bos? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16551,a[2]=((C_word)li217),tmp=(C_word)a,a+=3,tmp));
t55=C_mutate(&lf[271] /* (set! chicken.irregex#sre-searcher? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16640,a[2]=((C_word)li218),tmp=(C_word)a,a+=3,tmp));
t56=C_mutate(&lf[253] /* (set! chicken.irregex#sre-consumer? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16757,a[2]=((C_word)li219),tmp=(C_word)a,a+=3,tmp));
t57=C_mutate(&lf[280] /* (set! chicken.irregex#sre-has-submatches? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16874,a[2]=((C_word)li220),tmp=(C_word)a,a+=3,tmp));
t58=C_mutate(&lf[224] /* (set! chicken.irregex#sre-count-submatches ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16913,a[2]=((C_word)li222),tmp=(C_word)a,a+=3,tmp));
t59=C_mutate(&lf[104] /* (set! chicken.irregex#sre-sequence ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18122,a[2]=((C_word)li223),tmp=(C_word)a,a+=3,tmp));
t60=C_mutate(&lf[107] /* (set! chicken.irregex#sre-alternate ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18145,a[2]=((C_word)li224),tmp=(C_word)a,a+=3,tmp));
t61=C_mutate(&lf[283] /* (set! chicken.irregex#sre-strip-submatches ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18168,a[2]=((C_word)li226),tmp=(C_word)a,a+=3,tmp));
t62=C_mutate(&lf[252] /* (set! chicken.irregex#sre-names ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18349,a[2]=((C_word)li227),tmp=(C_word)a,a+=3,tmp));
t63=C_mutate(&lf[284] /* (set! chicken.irregex#sre-sequence-names ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18635,a[2]=((C_word)li228),tmp=(C_word)a,a+=3,tmp));
t64=C_mutate(&lf[270] /* (set! chicken.irregex#sre-remove-initial-bos ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18667,a[2]=((C_word)li230),tmp=(C_word)a,a+=3,tmp));
t65=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18849,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
t66=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_30843,a[2]=((C_word)li385),tmp=(C_word)a,a+=3,tmp);
t67=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_30846,a[2]=((C_word)li386),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1942: make-irregex-chunker */
t68=*((C_word*)lf[45]+1);{
C_word *av2;
if(c >= 7) {
  av2=av;
} else {
  av2=C_alloc(7);
}
av2[0]=t68;
av2[1]=t65;
av2[2]=t66;
av2[3]=*((C_word*)lf[493]+1);
av2[4]=*((C_word*)lf[494]+1);
av2[5]=*((C_word*)lf[495]+1);
av2[6]=t67;
((C_proc)(void*)(*((C_word*)t68+1)))(7,av2);}}

/* k7731 in k8097 in chicken.irregex#irregex-match-valid-index? in k7718 in k7493 in k7490 */
static void C_ccall f_7733(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_7733,c,av);}
t2=C_i_assq(((C_word*)t0)[2],t1);
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=(C_truep(t2)?C_SCHEME_TRUE:C_SCHEME_FALSE);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* chicken.irregex#irregex-match-start-chunk in k7718 in k7493 in k7490 */
static void C_ccall f_7735(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c<3) C_bad_min_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-3)*C_SIZEOF_PAIR +4,c,4)))){
C_save_and_reclaim((void*)f_7735,c,av);}
a=C_alloc((c-3)*C_SIZEOF_PAIR+4);
t3=C_build_rest(&a,c,3,av);
C_word t4;
C_word t5;
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7739,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:225: irregex-match-numeric-index */
f_7911(t4,lf[23],t2,t3);}

/* k7737 in chicken.irregex#irregex-match-start-chunk in k7718 in k7493 in k7490 */
static void C_ccall f_7739(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_7739,c,av);}
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=(C_truep(t1)?C_slot(C_slot(((C_word*)t0)[3],C_fix(1)),C_fixnum_times(t1,C_fix(4))):C_SCHEME_FALSE);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* chicken.irregex#irregex-match-start-index in k7718 in k7493 in k7490 */
static void C_ccall f_7760(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c<3) C_bad_min_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-3)*C_SIZEOF_PAIR +4,c,4)))){
C_save_and_reclaim((void*)f_7760,c,av);}
a=C_alloc((c-3)*C_SIZEOF_PAIR+4);
t3=C_build_rest(&a,c,3,av);
C_word t4;
C_word t5;
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7764,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:228: irregex-match-numeric-index */
f_7911(t4,lf[25],t2,t3);}

/* k7762 in chicken.irregex#irregex-match-start-index in k7718 in k7493 in k7490 */
static void C_ccall f_7764(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_7764,c,av);}
if(C_truep(t1)){
t2=C_slot(((C_word*)t0)[2],C_fix(1));
t3=C_fixnum_times(t1,C_fix(4));
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_slot(t2,C_fixnum_plus(C_fix(1),t3));
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* chicken.irregex#irregex-match-end-chunk in k7718 in k7493 in k7490 */
static void C_ccall f_7789(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c<3) C_bad_min_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-3)*C_SIZEOF_PAIR +4,c,4)))){
C_save_and_reclaim((void*)f_7789,c,av);}
a=C_alloc((c-3)*C_SIZEOF_PAIR+4);
t3=C_build_rest(&a,c,3,av);
C_word t4;
C_word t5;
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7793,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:231: irregex-match-numeric-index */
f_7911(t4,lf[27],t2,t3);}

/* k7791 in chicken.irregex#irregex-match-end-chunk in k7718 in k7493 in k7490 */
static void C_ccall f_7793(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_7793,c,av);}
if(C_truep(t1)){
t2=C_slot(((C_word*)t0)[2],C_fix(1));
t3=C_fixnum_times(t1,C_fix(4));
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_slot(t2,C_fixnum_plus(C_fix(2),t3));
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* chicken.irregex#irregex-match-end-index in k7718 in k7493 in k7490 */
static void C_ccall f_7818(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c<3) C_bad_min_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-3)*C_SIZEOF_PAIR +4,c,4)))){
C_save_and_reclaim((void*)f_7818,c,av);}
a=C_alloc((c-3)*C_SIZEOF_PAIR+4);
t3=C_build_rest(&a,c,3,av);
C_word t4;
C_word t5;
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7822,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:234: irregex-match-numeric-index */
f_7911(t4,lf[29],t2,t3);}

/* k7820 in chicken.irregex#irregex-match-end-index in k7718 in k7493 in k7490 */
static void C_ccall f_7822(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_7822,c,av);}
if(C_truep(t1)){
t2=C_slot(((C_word*)t0)[2],C_fix(1));
t3=C_fixnum_times(t1,C_fix(4));
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_slot(t2,C_fixnum_plus(C_fix(3),t3));
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* chicken.irregex#irregex-match-numeric-index in k7718 in k7493 in k7490 */
static void C_fcall f_7911(C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_7911,4,t1,t2,t3,t4);}
a=C_alloc(6);
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8093,a[2]=t1,a[3]=t2,a[4]=t3,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:261: irregex-match-data? */
t6=*((C_word*)lf[16]+1);{
C_word av2[3];
av2[0]=t6;
av2[1]=t5;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k7977 in k8091 in chicken.irregex#irregex-match-numeric-index in k7718 in k7493 in k7490 */
static void C_fcall f_7979(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,5)))){
C_save_and_reclaim_args((void *)trf_7979,2,t0,t1);}
if(C_truep(t1)){
t2=C_slot(((C_word*)t0)[2],C_fix(1));
t3=C_fixnum_times(((C_word*)t0)[3],C_fix(4));
t4=C_fixnum_plus(C_fix(1),t3);
t5=C_slot(t2,t4);
t6=((C_word*)t0)[4];{
C_word av2[2];
av2[0]=t6;
av2[1]=(C_truep(t5)?((C_word*)t0)[3]:C_SCHEME_FALSE);
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
/* irregex-core.scm:272: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word av2[6];
av2[0]=t2;
av2[1]=((C_word*)t0)[4];
av2[2]=((C_word*)t0)[5];
av2[3]=lf[33];
av2[4]=((C_word*)t0)[2];
av2[5]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(6,av2);}}}

/* k8019 in k8091 in chicken.irregex#irregex-match-numeric-index in k7718 in k7493 in k7490 */
static void C_ccall f_8021(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,4)))){
C_save_and_reclaim((void *)f_8021,c,av);}
a=C_alloc(9);
t2=C_SCHEME_UNDEFINED;
t3=(*a=C_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_8023,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t3,a[6]=((C_word)li14),tmp=(C_word)a,a+=7,tmp));
t5=((C_word*)t3)[1];
f_8023(t5,((C_word*)t0)[5],t1,C_SCHEME_TRUE);}

/* lp in k8019 in k8091 in chicken.irregex#irregex-match-numeric-index in k7718 in k7493 in k7490 */
static void C_fcall f_8023(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,4)))){
C_save_and_reclaim_args((void *)trf_8023,4,t0,t1,t2,t3);}
if(C_truep(C_i_nullp(t2))){
if(C_truep(t3)){
/* irregex-core.scm:279: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t4;
av2[1]=t1;
av2[2]=((C_word*)t0)[2];
av2[3]=lf[35];
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}
else{
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}
else{
t4=C_i_caar(t2);
t5=C_eqp(((C_word*)t0)[3],t4);
if(C_truep(t5)){
t6=C_u_i_car(t2);
t7=C_u_i_cdr(t6);
t8=C_slot(((C_word*)t0)[4],C_fix(1));
t9=C_fixnum_times(t7,C_fix(4));
if(C_truep(C_slot(t8,t9))){
t10=t1;{
C_word av2[2];
av2[0]=t10;
av2[1]=C_i_cdar(t2);
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}
else{
/* irregex-core.scm:283: lp */
t11=t1;
t12=C_u_i_cdr(t2);
t13=C_SCHEME_FALSE;
t1=t11;
t2=t12;
t3=t13;
goto loop;}}
else{
/* irregex-core.scm:284: lp */
t11=t1;
t12=C_u_i_cdr(t2);
t13=t3;
t1=t11;
t2=t12;
t3=t13;
goto loop;}}}

/* k8091 in chicken.irregex#irregex-match-numeric-index in k7718 in k7493 in k7490 */
static void C_ccall f_8093(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,6)))){
C_save_and_reclaim((void *)f_8093,c,av);}
a=C_alloc(11);
if(C_truep(C_i_not(t1))){
/* irregex-core.scm:262: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=lf[31];
av2[4]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(5,av2);}}
else{
t2=C_i_pairp(((C_word*)t0)[5]);
if(C_truep(C_i_not(t2))){
t3=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_fix(0);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
t3=C_i_cdr(((C_word*)t0)[5]);
if(C_truep(C_i_pairp(t3))){{
C_word *av2;
if(c >= 7) {
  av2=av;
} else {
  av2=C_alloc(7);
}
av2[0]=0;
av2[1]=((C_word*)t0)[2];
av2[2]=*((C_word*)lf[30]+1);
av2[3]=((C_word*)t0)[3];
av2[4]=lf[32];
av2[5]=((C_word*)t0)[4];
av2[6]=((C_word*)t0)[5];
C_apply(7,av2);}}
else{
t4=C_u_i_car(((C_word*)t0)[5]);
if(C_truep(C_i_numberp(t4))){
t5=(C_truep(C_i_integerp(t4))?C_i_exactp(t4):C_SCHEME_FALSE);
if(C_truep(t5)){
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7979,a[2]=((C_word*)t0)[4],a[3]=t4,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
t7=C_slot(((C_word*)t0)[4],C_fix(1));
if(C_truep(C_fixnum_greater_or_equal_p(t4,C_fix(0)))){
t8=C_fixnum_times(t4,C_fix(4));
t9=C_block_size(t7);
t10=C_a_i_fixnum_difference(&a,2,t9,C_fix(4));
t11=t6;
f_7979(t11,C_fixnum_lessp(t8,t10));}
else{
t8=t6;
f_7979(t8,C_SCHEME_FALSE);}}
else{
/* irregex-core.scm:273: chicken.base#error */
t6=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t6;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=lf[34];
av2[4]=t4;
((C_proc)(void*)(*((C_word*)t6+1)))(5,av2);}}}
else{
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8021,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:274: irregex-match-names */
t6=*((C_word*)lf[19]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t6;
av2[1]=t5;
av2[2]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}}}}}

/* chicken.irregex#irregex-match-valid-index? in k7718 in k7493 in k7490 */
static void C_ccall f_8095(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(9,c,2)))){
C_save_and_reclaim((void *)f_8095,c,av);}
a=C_alloc(9);
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8099,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8156,a[2]=t4,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:287: irregex-match-data? */
t6=*((C_word*)lf[16]+1);{
C_word *av2=av;
av2[0]=t6;
av2[1]=t5;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k8097 in chicken.irregex#irregex-match-valid-index? in k7718 in k7493 in k7490 */
static void C_ccall f_8099(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,4)))){
C_save_and_reclaim((void *)f_8099,c,av);}
a=C_alloc(5);
if(C_truep(C_i_integerp(((C_word*)t0)[2]))){
t2=C_i_exactp(((C_word*)t0)[2]);
if(C_truep(C_i_not(t2))){
/* irregex-core.scm:291: chicken.base#error */
t3=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[3];
av2[2]=lf[37];
av2[3]=lf[38];
av2[4]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}
else{
t3=C_slot(((C_word*)t0)[4],C_fix(1));
if(C_truep(C_fixnum_greater_or_equal_p(((C_word*)t0)[2],C_fix(0)))){
t4=C_fixnum_times(((C_word*)t0)[2],C_fix(4));
t5=C_block_size(t3);
t6=C_a_i_fixnum_difference(&a,2,t5,C_fix(4));
t7=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t7;
av2[1]=C_fixnum_lessp(t4,t6);
((C_proc)(void*)(*((C_word*)t7+1)))(2,av2);}}
else{
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}}
else{
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7733,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:220: irregex-match-names */
t3=*((C_word*)lf[19]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}}

/* k8154 in chicken.irregex#irregex-match-valid-index? in k7718 in k7493 in k7490 */
static void C_ccall f_8156(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_8156,c,av);}
if(C_truep(C_i_not(t1))){
/* irregex-core.scm:288: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[37];
av2[3]=lf[39];
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(5,av2);}}
else{
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_UNDEFINED;
f_8099(2,av2);}}}

/* chicken.irregex#irregex-match-substring in k7718 in k7493 in k7490 */
static void C_ccall f_8158(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c<3) C_bad_min_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-3)*C_SIZEOF_PAIR +4,c,4)))){
C_save_and_reclaim((void*)f_8158,c,av);}
a=C_alloc((c-3)*C_SIZEOF_PAIR+4);
t3=C_build_rest(&a,c,3,av);
C_word t4;
C_word t5;
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8162,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:296: irregex-match-numeric-index */
f_7911(t4,lf[41],t2,t3);}

/* k8160 in chicken.irregex#irregex-match-substring in k7718 in k7493 in k7490 */
static void C_ccall f_8162(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_8162,c,av);}
t2=C_slot(((C_word*)t0)[2],C_fix(3));
if(C_truep(t1)){
t3=C_i_vector_ref(t2,C_fix(4));
t4=C_slot(((C_word*)t0)[2],C_fix(1));
t5=C_fixnum_times(t1,C_fix(4));
t6=C_slot(t4,t5);
t7=C_slot(((C_word*)t0)[2],C_fix(1));
t8=C_fixnum_times(t1,C_fix(4));
t9=C_fixnum_plus(C_fix(1),t8);
t10=C_slot(t7,t9);
t11=C_slot(((C_word*)t0)[2],C_fix(1));
t12=C_fixnum_times(t1,C_fix(4));
t13=C_fixnum_plus(C_fix(2),t12);
t14=C_slot(t11,t13);
t15=C_slot(((C_word*)t0)[2],C_fix(1));
t16=C_fixnum_times(t1,C_fix(4));
/* irregex-core.scm:298: g891 */
t17=t3;{
C_word *av2;
if(c >= 6) {
  av2=av;
} else {
  av2=C_alloc(6);
}
av2[0]=t17;
av2[1]=((C_word*)t0)[3];
av2[2]=t6;
av2[3]=t10;
av2[4]=t14;
av2[5]=C_slot(t15,C_fixnum_plus(C_fix(3),t16));
((C_proc)(void*)(*((C_word*)t17+1)))(6,av2);}}
else{
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* chicken.irregex#irregex-match-subchunk in k7718 in k7493 in k7490 */
static void C_ccall f_8239(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c<3) C_bad_min_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-3)*C_SIZEOF_PAIR +4,c,4)))){
C_save_and_reclaim((void*)f_8239,c,av);}
a=C_alloc((c-3)*C_SIZEOF_PAIR+4);
t3=C_build_rest(&a,c,3,av);
C_word t4;
C_word t5;
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8243,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:306: irregex-match-numeric-index */
f_7911(t4,lf[44],t2,t3);}

/* k8241 in chicken.irregex#irregex-match-subchunk in k7718 in k7493 in k7490 */
static void C_ccall f_8243(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,5)))){
C_save_and_reclaim((void *)f_8243,c,av);}
t2=C_slot(((C_word*)t0)[2],C_fix(3));
t3=C_i_vector_ref(t2,C_fix(5));
if(C_truep(C_i_not(t3))){
/* irregex-core.scm:310: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t4;
av2[1]=((C_word*)t0)[3];
av2[2]=lf[43];
av2[3]=((C_word*)t0)[2];
av2[4]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}
else{
if(C_truep(t1)){
t4=C_slot(((C_word*)t0)[2],C_fix(1));
t5=C_fixnum_times(t1,C_fix(4));
t6=C_slot(t4,t5);
t7=C_slot(((C_word*)t0)[2],C_fix(1));
t8=C_fixnum_times(t1,C_fix(4));
t9=C_fixnum_plus(C_fix(1),t8);
t10=C_slot(t7,t9);
t11=C_slot(((C_word*)t0)[2],C_fix(1));
t12=C_fixnum_times(t1,C_fix(4));
t13=C_fixnum_plus(C_fix(2),t12);
t14=C_slot(t11,t13);
t15=C_slot(((C_word*)t0)[2],C_fix(1));
t16=C_fixnum_times(t1,C_fix(4));
/* irregex-core.scm:311: get-subchunk */
t17=t3;{
C_word *av2;
if(c >= 6) {
  av2=av;
} else {
  av2=C_alloc(6);
}
av2[0]=t17;
av2[1]=((C_word*)t0)[3];
av2[2]=t6;
av2[3]=t10;
av2[4]=t14;
av2[5]=C_slot(t15,C_fixnum_plus(C_fix(3),t16));
((C_proc)(void*)(*((C_word*)t17+1)))(6,av2);}}
else{
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}}

/* chicken.irregex#make-irregex-chunker in k7718 in k7493 in k7490 */
static void C_ccall f_8329(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c<4) C_bad_min_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-4)*C_SIZEOF_PAIR +33,c,6)))){
C_save_and_reclaim((void*)f_8329,c,av);}
a=C_alloc((c-4)*C_SIZEOF_PAIR+33);
t4=C_build_rest(&a,c,4,av);
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
t5=C_i_pairp(t4);
t6=(C_truep(t5)?C_get_rest_arg(c,4,av,4,t0):C_SCHEME_FALSE);
t7=(C_truep(t6)?t6:(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8521,a[2]=((C_word)li19),tmp=(C_word)a,a+=3,tmp));
t8=C_i_pairp(t4);
t9=(C_truep(t8)?C_i_cdr(t4):t4);
t10=C_i_pairp(t9);
t11=(C_truep(t10)?C_u_i_car(t9):C_SCHEME_FALSE);
t12=(C_truep(t11)?t11:(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8504,a[2]=t3,a[3]=((C_word)li20),tmp=(C_word)a,a+=4,tmp));
t13=C_i_pairp(t9);
t14=(C_truep(t13)?C_u_i_cdr(t9):t9);
t15=C_i_pairp(t14);
t16=(C_truep(t15)?C_u_i_car(t14):C_SCHEME_FALSE);
t17=(C_truep(t16)?t16:(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8403,a[2]=t3,a[3]=t7,a[4]=t12,a[5]=t2,a[6]=((C_word)li22),tmp=(C_word)a,a+=7,tmp));
t18=C_i_pairp(t14);
t19=(C_truep(t18)?C_u_i_cdr(t14):t14);
t20=C_i_pairp(t19);
t21=(C_truep(t20)?C_u_i_car(t19):C_SCHEME_FALSE);
t22=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8363,a[2]=t1,a[3]=t2,a[4]=t3,a[5]=t7,a[6]=t12,a[7]=t17,a[8]=t21,tmp=(C_word)a,a+=9,tmp);
t23=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8369,a[2]=t22,a[3]=t1,a[4]=t2,a[5]=t3,a[6]=t7,a[7]=t12,a[8]=t17,a[9]=t21,tmp=(C_word)a,a+=10,tmp);
if(C_truep(C_i_closurep(t2))){
if(C_truep(C_i_closurep(t3))){
t24=C_i_closurep(t7);
t25=t23;
f_8369(t25,(C_truep(t24)?C_i_not(C_i_closurep(t17)):C_SCHEME_TRUE));}
else{
t24=t23;
f_8369(t24,C_SCHEME_TRUE);}}
else{
t24=t23;
f_8369(t24,C_SCHEME_TRUE);}}

/* k8361 in chicken.irregex#make-irregex-chunker in k7718 in k7493 in k7490 */
static void C_ccall f_8363(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,1)))){
C_save_and_reclaim((void *)f_8363,c,av);}
a=C_alloc(7);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_vector6(&a,6,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k8367 in chicken.irregex#make-irregex-chunker in k7718 in k7493 in k7490 */
static void C_fcall f_8369(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,3)))){
C_save_and_reclaim_args((void *)trf_8369,2,t0,t1);}
a=C_alloc(7);
if(C_truep(t1)){
/* irregex-core.scm:349: chicken.base#error */
t2=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=lf[48];
av2[3]=lf[49];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}
else{
t2=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t2;
av2[1]=C_a_i_vector6(&a,6,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8],((C_word*)t0)[9]);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* f_8403 in chicken.irregex#make-irregex-chunker in k7718 in k7493 in k7490 */
static void C_ccall f_8403(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4=av[4];
C_word t5=av[5];
C_word t6;
C_word t7;
C_word t8;
C_word *a;
if(c!=6) C_bad_argc_2(c,6,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(11,c,2)))){
C_save_and_reclaim((void *)f_8403,c,av);}
a=C_alloc(11);
t6=C_eqp(t2,t4);
if(C_truep(t6)){
t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8417,a[2]=t1,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:329: get-str */
t8=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t8;
av2[1]=t7;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t8+1)))(3,av2);}}
else{
t7=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8424,a[2]=t4,a[3]=t5,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=t1,a[9]=t3,a[10]=t2,tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:330: get-next */
t8=((C_word*)t0)[5];{
C_word *av2=av;
av2[0]=t8;
av2[1]=t7;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t8+1)))(3,av2);}}}

/* k8415 */
static void C_ccall f_8417(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_8417,c,av);}
/* irregex-core.scm:329: scheme#substring */
t2=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
av2[3]=((C_word*)t0)[3];
av2[4]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(5,av2);}}

/* k8422 */
static void C_ccall f_8424(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(16,c,2)))){
C_save_and_reclaim((void *)f_8424,c,av);}
a=C_alloc(16);
t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8487,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8491,a[2]=t2,a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[6],a[5]=((C_word*)t0)[10],tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:331: get-str */
t4=((C_word*)t0)[5];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* loop in k8485 in k8422 */
static void C_fcall f_8430(C_word t0,C_word 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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,2)))){
C_save_and_reclaim_args((void *)trf_8430,4,t0,t1,t2,t3);}
a=C_alloc(10);
t4=C_eqp(t2,((C_word*)t0)[2]);
if(C_truep(t4)){
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8448,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8452,a[2]=t5,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:336: get-str */
t7=((C_word*)t0)[5];{
C_word av2[3];
av2[0]=t7;
av2[1]=t6;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t7+1)))(3,av2);}}
else{
t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8463,a[2]=t3,a[3]=((C_word*)t0)[6],a[4]=t1,a[5]=((C_word*)t0)[7],a[6]=t2,a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[5],tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:340: get-next */
t6=((C_word*)t0)[8];{
C_word av2[3];
av2[0]=t6;
av2[1]=t5;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}}

/* k8446 in loop in k8485 in k8422 */
static void C_ccall f_8448(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_8448,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:335: string-cat-reverse */
f_9039(((C_word*)t0)[3],t2);}

/* k8450 in loop in k8485 in k8422 */
static void C_ccall f_8452(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_8452,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8456,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:337: get-start */
t3=((C_word*)t0)[4];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k8454 in k8450 in loop in k8485 in k8422 */
static void C_ccall f_8456(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_8456,c,av);}
/* irregex-core.scm:336: scheme#substring */
t2=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=t1;
av2[4]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(5,av2);}}

/* k8461 in loop in k8485 in k8422 */
static void C_ccall f_8463(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,c,2)))){
C_save_and_reclaim((void *)f_8463,c,av);}
a=C_alloc(12);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8471,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8475,a[2]=t2,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);
/* irregex-core.scm:341: get-str */
t4=((C_word*)t0)[8];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k8469 in k8461 in loop in k8485 in k8422 */
static void C_ccall f_8471(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,3)))){
C_save_and_reclaim((void *)f_8471,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:340: loop */
t3=((C_word*)((C_word*)t0)[3])[1];
f_8430(t3,((C_word*)t0)[4],((C_word*)t0)[5],t2);}

/* k8473 in k8461 in loop in k8485 in k8422 */
static void C_ccall f_8475(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,2)))){
C_save_and_reclaim((void *)f_8475,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8479,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);
/* irregex-core.scm:342: get-start */
t3=((C_word*)t0)[5];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k8477 in k8473 in k8461 in loop in k8485 in k8422 */
static void C_ccall f_8479(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_8479,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8483,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:343: get-end */
t3=((C_word*)t0)[4];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k8481 in k8477 in k8473 in k8461 in loop in k8485 in k8422 */
static void C_ccall f_8483(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_8483,c,av);}
/* irregex-core.scm:341: scheme#substring */
t2=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
av2[4]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(5,av2);}}

/* k8485 in k8422 */
static void C_ccall f_8487(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,c,4)))){
C_save_and_reclaim((void *)f_8487,c,av);}
a=C_alloc(15);
t2=C_a_i_list1(&a,1,t1);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8430,a[2]=((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],a[8]=((C_word*)t0)[7],a[9]=((C_word)li21),tmp=(C_word)a,a+=10,tmp));
t6=((C_word*)t4)[1];
f_8430(t6,((C_word*)t0)[8],((C_word*)t0)[9],t2);}

/* k8489 in k8422 */
static void C_ccall f_8491(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_8491,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8495,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:333: get-end */
t3=((C_word*)t0)[4];{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* k8493 in k8489 in k8422 */
static void C_ccall f_8495(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_8495,c,av);}
/* irregex-core.scm:331: scheme#substring */
t2=*((C_word*)lf[46]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
av2[4]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(5,av2);}}

/* f_8504 in chicken.irregex#make-irregex-chunker in k7718 in k7493 in k7490 */
static void C_ccall f_8504(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_8504,c,av);}
a=C_alloc(3);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8512,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:323: get-str */
t4=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t4;
av2[1]=t3;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k8510 */
static void C_ccall f_8512(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_8512,c,av);}
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_i_string_length(t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* f_8521 in chicken.irregex#make-irregex-chunker in k7718 in k7493 in k7490 */
static void C_ccall f_8521(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_8521,c,av);}
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_fix(0);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* lp in chicken.irregex#chunker-prev-char in k7718 in k7493 in k7490 */
static void C_fcall f_8579(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_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_8579,3,t0,t1,t2);}
a=C_alloc(6);
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8583,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:364: get-next */
t4=((C_word*)t0)[4];{
C_word av2[3];
av2[0]=t4;
av2[1]=t3;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k8581 in lp in chicken.irregex#chunker-prev-char in k7718 in k7493 in k7490 */
static void C_ccall f_8583(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_8583,c,av);}
t2=C_eqp(t1,((C_word*)t0)[2]);
if(C_truep(t2)){
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
if(C_truep(t1)){
/* irregex-core.scm:367: lp */
t3=((C_word*)((C_word*)t0)[5])[1];
f_8579(t3,((C_word*)t0)[3],t1);}
else{
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}}

/* chicken.irregex#chunker-prev-char in k7718 in k7493 in k7490 */
static void C_fcall f_8597(C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,3)))){
C_save_and_reclaim_args((void *)trf_8597,4,t1,t2,t3,t4);}
a=C_alloc(12);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8601,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t6=C_eqp(t3,t4);
if(C_truep(t6)){
t7=t5;{
C_word av2[2];
av2[0]=t7;
av2[1]=C_SCHEME_FALSE;
f_8601(2,av2);}}
else{
t7=C_i_vector_ref(t2,C_fix(0));
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8579,a[2]=t4,a[3]=t9,a[4]=t7,a[5]=((C_word)li24),tmp=(C_word)a,a+=6,tmp));
t11=((C_word*)t9)[1];
f_8579(t11,t5,t3);}}

/* k8599 in chicken.irregex#chunker-prev-char in k7718 in k7493 in k7490 */
static void C_ccall f_8601(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_8601,c,av);}
a=C_alloc(5);
if(C_truep(t1)){
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8614,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:372: g990 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k8612 in k8599 in chicken.irregex#chunker-prev-char in k7718 in k7493 in k7490 */
static void C_ccall f_8614(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_8614,c,av);}
a=C_alloc(4);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(3));
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8625,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:373: g992 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k8623 in k8612 in k8599 in chicken.irregex#chunker-prev-char in k7718 in k7493 in k7490 */
static void C_ccall f_8625(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_8625,c,av);}
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_i_string_ref(((C_word*)t0)[3],C_fixnum_difference(t1,C_fix(1)));
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* chicken.irregex#chunker-next-char in k7718 in k7493 in k7490 */
static void C_fcall f_8627(C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,0,2)))){
C_save_and_reclaim_args((void *)trf_8627,3,t1,t2,t3);}
a=C_alloc(4);
t4=C_i_vector_ref(t2,C_fix(0));
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8634,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:376: g998 */
t6=t4;{
C_word av2[3];
av2[0]=t6;
av2[1]=t5;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k8632 in chicken.irregex#chunker-next-char in k7718 in k7493 in k7490 */
static void C_ccall f_8634(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_8634,c,av);}
a=C_alloc(5);
if(C_truep(t1)){
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8647,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:378: g1001 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* k8645 in k8632 in chicken.irregex#chunker-next-char in k7718 in k7493 in k7490 */
static void C_ccall f_8647(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_8647,c,av);}
a=C_alloc(4);
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8654,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:378: g1003 */
t4=t2;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k8652 in k8645 in k8632 in chicken.irregex#chunker-next-char in k7718 in k7493 in k7490 */
static void C_ccall f_8654(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_8654,c,av);}
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_i_string_ref(((C_word*)t0)[3],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* a8692 */
static void C_ccall f_8693(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_8693,c,av);}
t3=C_eqp(t2,((C_word*)t0)[2]);
if(C_truep(C_i_not(t3))){
/* irregex-core.scm:393: g1020 */
t4=C_i_vector_ref(((C_word*)t0)[3],C_fix(0));{
C_word *av2=av;
av2[0]=t4;
av2[1]=t1;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* a8719 */
static void C_ccall f_8720(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3;
C_word t4;
C_word *a;
if(c!=3) C_bad_argc_2(c,3,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_8720,c,av);}
t3=C_eqp(t2,((C_word*)t0)[2]);
if(C_truep(t3)){
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
/* irregex-core.scm:396: g1023 */
t4=C_i_vector_ref(((C_word*)t0)[4],C_fix(3));{
C_word *av2=av;
av2[0]=t4;
av2[1]=t1;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}}

/* chicken.irregex#string-scan-char in k7718 in k7493 in k7490 */
static void C_ccall f_8748(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c<4) C_bad_min_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand((c-4)*C_SIZEOF_PAIR +9,c,3)))){
C_save_and_reclaim((void*)f_8748,c,av);}
a=C_alloc((c-4)*C_SIZEOF_PAIR+9);
t4=C_build_rest(&a,c,4,av);
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
t5=C_i_string_length(t2);
t6=C_i_pairp(t4);
t7=(C_truep(t6)?C_get_rest_arg(c,4,av,4,t0):C_fix(0));
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8761,a[2]=t5,a[3]=t2,a[4]=t3,a[5]=t9,a[6]=((C_word)li27),tmp=(C_word)a,a+=7,tmp));
t11=((C_word*)t9)[1];
f_8761(t11,t1,t7);}

/* scan in chicken.irregex#string-scan-char in k7718 in k7493 in k7490 */
static void C_fcall f_8761(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_8761,3,t0,t1,t2);}
a=C_alloc(5);
t3=C_eqp(t2,((C_word*)t0)[2]);
if(C_truep(t3)){
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=C_i_string_ref(((C_word*)t0)[3],t2);
t5=C_eqp(((C_word*)t0)[4],t4);
if(C_truep(t5)){
t6=t1;{
C_word av2[2];
av2[0]=t6;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
t6=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:421: scan */
t8=t1;
t9=t6;
t1=t8;
t2=t9;
goto loop;}}}

/* scan in chicken.irregex#string-parse-hex-escape in k7718 in k7493 in k7490 */
static void C_fcall f_8804(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_8804,3,t0,t1,t2);}
a=C_alloc(5);
t3=C_eqp(t2,((C_word*)t0)[2]);
if(C_truep(t3)){
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=C_i_string_ref(((C_word*)t0)[3],t2);
t5=C_eqp(C_make_character(125),t4);
if(C_truep(t5)){
t6=t1;{
C_word av2[2];
av2[0]=t6;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
t6=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:429: scan */
t8=t1;
t9=t6;
t1=t8;
t2=t9;
goto loop;}}}

/* scan in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_8861(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_8861,3,t0,t1,t2);}
a=C_alloc(5);
t3=C_eqp(t2,((C_word*)t0)[2]);
if(C_truep(t3)){
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=C_i_string_ref(((C_word*)t0)[3],t2);
t5=C_u_i_char_numericp(t4);
if(C_truep(C_i_not(t5))){
t6=t1;{
C_word av2[2];
av2[0]=t6;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
t6=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:436: scan */
t8=t1;
t9=t6;
t1=t8;
t2=t9;
goto loop;}}}

/* lp in k12127 in k11999 in k11983 in k11974 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_8899(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(23,0,4)))){
C_save_and_reclaim_args((void *)trf_8899,5,t0,t1,t2,t3,t4);}
a=C_alloc(23);
t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8902,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,a[6]=((C_word)li83),tmp=(C_word)a,a+=7,tmp);
if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[3]))){
t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8923,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:442: collect */
t7=t5;
f_8902(t7,t6);}
else{
t6=C_i_string_ref(((C_word*)t0)[2],t2);
t7=C_eqp(C_make_character(44),t6);
if(C_truep(t7)){
t8=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t9=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8942,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t8,a[5]=t9,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:443: collect */
t11=t5;
f_8902(t11,t10);}
else{
t8=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:444: lp */
t12=t1;
t13=t8;
t14=t3;
t15=t4;
t1=t12;
t2=t13;
t3=t14;
t4=t15;
goto loop;}}}

/* collect in lp in k12127 in k11999 in k11983 in k11974 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_fcall f_8902(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,0,4)))){
C_save_and_reclaim_args((void *)trf_8902,2,t0,t1);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8910,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:441: scheme#substring */
t3=*((C_word*)lf[46]+1);{
C_word av2[5];
av2[0]=t3;
av2[1]=t2;
av2[2]=((C_word*)t0)[3];
av2[3]=((C_word*)t0)[4];
av2[4]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}

/* k8908 in collect in lp in k12127 in k11999 in k11983 in k11974 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_8910(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_8910,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,t1,((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k8921 in lp in k12127 in k11999 in k11983 in k11974 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_8923(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_8923,c,av);}
/* irregex-core.scm:442: ##sys#fast-reverse */
t2=*((C_word*)lf[69]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[2];
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}

/* k8940 in lp in k12127 in k11999 in k11983 in k11974 in lp in k10406 in k10400 in chicken.irregex#string->sre in k7718 in k7493 in k7490 */
static void C_ccall f_8942(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_8942,c,av);}
/* irregex-core.scm:443: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_8899(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* chicken.irregex#string-cat-reverse in k7718 in k7493 in k7490 */
static void C_fcall f_9039(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,4)))){
C_save_and_reclaim_args((void *)trf_9039,2,t1,t2);}
a=C_alloc(7);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9047,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9049,a[2]=((C_word)li30),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:468: fold */
f_9313(t3,t4,C_fix(0),t2);}

/* k9045 in chicken.irregex#string-cat-reverse in k7718 in k7493 in k7490 */
static void C_ccall f_9047(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,2)))){
C_save_and_reclaim((void *)f_9047,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9063,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:472: scheme#make-string */
t3=*((C_word*)lf[55]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=t1;
((C_proc)(void*)(*((C_word*)t3+1)))(3,av2);}}

/* a9048 in chicken.irregex#string-cat-reverse in k7718 in k7493 in k7490 */
static void C_ccall f_9049(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_9049,c,av);}
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_fixnum_plus(C_i_string_length(t2),t3);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* k9061 in k9045 in chicken.irregex#string-cat-reverse in k7718 in k7493 in k7490 */
static void C_ccall f_9063(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,3)))){
C_save_and_reclaim((void *)f_9063,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9068,a[2]=t1,a[3]=((C_word)li29),tmp=(C_word)a,a+=4,tmp);
t3=(
  f_9068(t2,((C_word*)t0)[2],((C_word*)t0)[3])
);
t4=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t4;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* lp in k9061 in k9045 in chicken.irregex#string-cat-reverse in k7718 in k7493 in k7490 */
static C_word C_fcall f_9068(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_stack_overflow_check;
loop:{}
if(C_truep(C_i_pairp(t2))){
t3=C_u_i_car(t2);
t4=C_i_string_length(t3);
t5=C_fixnum_difference(t1,t4);
t6=C_substring_copy(t3,((C_word*)t0)[2],C_fix(0),t4,t5);
t8=t5;
t9=C_u_i_cdr(t2);
t1=t8;
t2=t9;
goto loop;}
else{
t3=C_SCHEME_UNDEFINED;
return(t3);}}

/* chicken.irregex#zero-to in k7718 in k7493 in k7490 */
static void C_fcall f_9089(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,4)))){
C_save_and_reclaim_args((void *)trf_9089,2,t1,t2);}
a=C_alloc(6);
if(C_truep(C_fixnum_less_or_equal_p(t2,C_fix(0)))){
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_END_OF_LIST;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
t3=C_fixnum_difference(t2,C_fix(1));
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9105,a[2]=t5,a[3]=((C_word)li32),tmp=(C_word)a,a+=4,tmp));
t7=((C_word*)t5)[1];
f_9105(t7,t1,t3,C_SCHEME_END_OF_LIST);}}

/* lp in chicken.irregex#zero-to in k7718 in k7493 in k7490 */
static void C_fcall f_9105(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,3)))){
C_save_and_reclaim_args((void *)trf_9105,4,t0,t1,t2,t3);}
a=C_alloc(3);
if(C_truep(C_i_zerop(t2))){
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=C_a_i_cons(&a,2,C_fix(0),t3);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=C_fixnum_difference(t2,C_fix(1));
t5=C_a_i_cons(&a,2,t2,t3);
/* irregex-core.scm:490: lp */
t7=t1;
t8=t4;
t9=t5;
t1=t7;
t2=t8;
t3=t9;
goto loop;}}

/* chicken.irregex#find in k7718 in k7493 in k7490 */
static void C_fcall f_9126(C_word 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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,3)))){
C_save_and_reclaim_args((void *)trf_9126,3,t1,t2,t3);}
a=C_alloc(7);
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_9132,a[2]=t5,a[3]=t2,a[4]=((C_word)li34),tmp=(C_word)a,a+=5,tmp));
t7=((C_word*)t5)[1];
f_9132(t7,t1,t3);}

/* lp in chicken.irregex#find in k7718 in k7493 in k7490 */
static void C_fcall f_9132(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_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_9132,3,t0,t1,t2);}
a=C_alloc(5);
if(C_truep(C_i_nullp(t2))){
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9145,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:497: pred */
t4=((C_word*)t0)[3];{
C_word av2[3];
av2[0]=t4;
av2[1]=t3;
av2[2]=C_i_car(t2);
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}}

/* k9143 in lp in chicken.irregex#find in k7718 in k7493 in k7490 */
static void C_ccall f_9145(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_9145,c,av);}
if(C_truep(t1)){
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_u_i_car(((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}
else{
/* irregex-core.scm:498: lp */
t2=((C_word*)((C_word*)t0)[4])[1];
f_9132(t2,((C_word*)t0)[2],C_u_i_cdr(((C_word*)t0)[3]));}}

/* chicken.irregex#last in k7718 in k7493 in k7490 */
static void C_fcall f_9187(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,0,2)))){
C_save_and_reclaim_args((void *)trf_9187,2,t1,t2);}
a=C_alloc(3);
t3=C_i_pairp(t2);
if(C_truep(C_i_not(t3))){
/* irregex-core.scm:508: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word av2[3];
av2[0]=t4;
av2[1]=t1;
av2[2]=lf[60];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9202,a[2]=((C_word)li36),tmp=(C_word)a,a+=3,tmp);
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=(
  f_9202(t2)
);
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}}

/* lp in chicken.irregex#last in k7718 in k7493 in k7490 */
static C_word C_fcall f_9202(C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_stack_overflow_check;
loop:{}
t2=C_i_cdr(t1);
if(C_truep(C_i_pairp(t2))){
t4=C_u_i_cdr(t1);
t1=t4;
goto loop;}
else{
return(C_u_i_car(t1));}}

/* chicken.irregex#any in k7718 in k7493 in k7490 */
static void C_fcall f_9225(C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,4)))){
C_save_and_reclaim_args((void *)trf_9225,3,t1,t2,t3);}
a=C_alloc(7);
if(C_truep(C_i_pairp(t3))){
t4=C_u_i_car(t3);
t5=C_u_i_cdr(t3);
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9241,a[2]=t2,a[3]=t7,a[4]=((C_word)li38),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
f_9241(t9,t1,t4,t5);}
else{
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* lp in chicken.irregex#any in k7718 in k7493 in k7490 */
static void C_fcall f_9241(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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_9241,4,t0,t1,t2,t3);}
a=C_alloc(5);
if(C_truep(C_i_nullp(t3))){
/* irregex-core.scm:518: pred */
t4=((C_word*)t0)[2];{
C_word av2[3];
av2[0]=t4;
av2[1]=t1;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9254,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:519: pred */
t5=((C_word*)t0)[2];{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}}

/* k9252 in lp in chicken.irregex#any in k7718 in k7493 in k7490 */
static void C_ccall f_9254(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_9254,c,av);}
if(C_truep(t1)){
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}
else{
/* irregex-core.scm:519: lp */
t2=((C_word*)((C_word*)t0)[3])[1];
f_9241(t2,((C_word*)t0)[2],C_i_car(((C_word*)t0)[4]),C_u_i_cdr(((C_word*)t0)[4]));}}

/* chicken.irregex#every in k7718 in k7493 in k7490 */
static void C_fcall f_9268(C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,4)))){
C_save_and_reclaim_args((void *)trf_9268,3,t1,t2,t3);}
a=C_alloc(7);
t4=C_i_nullp(t3);
if(C_truep(t4)){
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t5=C_i_car(t3);
t6=C_u_i_cdr(t3);
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_9286,a[2]=t2,a[3]=t8,a[4]=((C_word)li40),tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
f_9286(t10,t1,t5,t6);}}

/* lp in chicken.irregex#every in k7718 in k7493 in k7490 */
static void C_fcall f_9286(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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,2)))){
C_save_and_reclaim_args((void *)trf_9286,4,t0,t1,t2,t3);}
a=C_alloc(5);
if(C_truep(C_i_nullp(t3))){
/* irregex-core.scm:525: pred */
t4=((C_word*)t0)[2];{
C_word av2[3];
av2[0]=t4;
av2[1]=t1;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9302,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:526: pred */
t5=((C_word*)t0)[2];{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}}

/* k9300 in lp in chicken.irregex#every in k7718 in k7493 in k7490 */
static void C_ccall f_9302(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_9302,c,av);}
if(C_truep(t1)){
/* irregex-core.scm:526: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_9286(t2,((C_word*)t0)[3],C_i_car(((C_word*)t0)[4]),C_u_i_cdr(((C_word*)t0)[4]));}
else{
t2=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}}

/* chicken.irregex#fold in k7718 in k7493 in k7490 */
static void C_fcall f_9313(C_word 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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,0,4)))){
C_save_and_reclaim_args((void *)trf_9313,4,t1,t2,t3,t4);}
a=C_alloc(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|4,a[1]=(C_word)f_9319,a[2]=t6,a[3]=t2,a[4]=((C_word)li42),tmp=(C_word)a,a+=5,tmp));
t8=((C_word*)t6)[1];
f_9319(t8,t1,t4,t3);}

/* lp in chicken.irregex#fold in k7718 in k7493 in k7490 */
static void C_fcall f_9319(C_word 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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,0,3)))){
C_save_and_reclaim_args((void *)trf_9319,4,t0,t1,t2,t3);}
a=C_alloc(5);
if(C_truep(C_i_nullp(t2))){
t4=t1;{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t4=C_i_cdr(t2);
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9337,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:532: kons */
t6=((C_word*)t0)[3];{
C_word av2[4];
av2[0]=t6;
av2[1]=t5;
av2[2]=C_u_i_car(t2);
av2[3]=t3;
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}}

/* k9335 in lp in chicken.irregex#fold in k7718 in k7493 in k7490 */
static void C_ccall f_9337(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_9337,c,av);}
/* irregex-core.scm:532: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_9319(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* chicken.irregex#flag-join in k7718 in k7493 in k7490 */
static void C_ccall f_9643(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_9643,c,av);}
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=(C_truep(t3)?C_fixnum_or(t2,t3):t2);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* chicken.irregex#flag-clear in k7718 in k7493 in k7490 */
static void C_ccall f_9652(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,1)))){
C_save_and_reclaim((void *)f_9652,c,av);}
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_fixnum_and(t2,C_fixnum_not(t3));
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* chicken.irregex#with-read-from-string in k7718 in k7493 in k7490 */
static void C_fcall f_9670(C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(15,0,4)))){
C_save_and_reclaim_args((void *)trf_9670,4,t1,t2,t3,t4);}
a=C_alloc(15);
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_i_string_length(t2);
t10=C_set_block_item(t6,0,t9);
t11=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9677,a[2]=t6,a[3]=t2,a[4]=t8,a[5]=((C_word)li58),tmp=(C_word)a,a+=6,tmp));
t12=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10242,a[2]=t2,a[3]=t4,a[4]=((C_word)li59),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:698: read */
t13=((C_word*)t8)[1];
f_9677(t13,t1,t3,t12);}

/* f_9677 in chicken.irregex#with-read-from-string in k7718 in k7493 in k7490 */
static void C_fcall f_9677(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word t25;
C_word t26;
C_word t27;
C_word t28;
C_word t29;
C_word t30;
C_word t31;
C_word t32;
C_word t33;
C_word t34;
C_word t35;
C_word t36;
C_word t37;
C_word t38;
C_word t39;
C_word t40;
C_word t41;
C_word t42;
C_word t43;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(19,0,5)))){
C_save_and_reclaim_args((void *)trf_9677,4,t0,t1,t2,t3);}
a=C_alloc(19);
if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)((C_word*)t0)[2])[1]))){
/* irregex-core.scm:615: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t4;
av2[1]=t1;
av2[2]=lf[68];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}
else{
t4=C_i_string_ref(((C_word*)t0)[3],t2);
switch(t4){
case C_make_character(40):
t5=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9704,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t7,a[6]=((C_word)li49),tmp=(C_word)a,a+=7,tmp));
t9=((C_word*)t7)[1];
f_9704(t9,t1,t5,C_SCHEME_END_OF_LIST);
case C_make_character(41):
t5=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:639: k */
t6=t3;{
C_word av2[4];
av2[0]=t6;
av2[1]=t1;
av2[2]=lf[66];
av2[3]=t5;
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}
case C_make_character(59):
t5=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9818,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t3,a[6]=t7,a[7]=((C_word)li50),tmp=(C_word)a,a+=8,tmp));
t9=((C_word*)t7)[1];
f_9818(t9,t1,t5);
default:
t5=C_eqp(t4,C_make_character(39));
t6=(C_truep(t5)?t5:C_eqp(t4,C_make_character(96)));
if(C_truep(t6)){
t7=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9867,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t3,a[5]=((C_word)li51),tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:646: read */
t41=t1;
t42=t7;
t43=t8;
t1=t41;
t2=t42;
t3=t43;
goto loop;}
else{
switch(t4){
case C_make_character(44):
t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9895,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
t8=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
if(C_truep(C_fixnum_lessp(t8,((C_word*)((C_word*)t0)[2])[1]))){
t9=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t10=t7;
f_9895(t10,C_eqp(C_make_character(64),C_i_string_ref(((C_word*)t0)[3],t9)));}
else{
t9=t7;
f_9895(t9,C_SCHEME_FALSE);}
case C_make_character(34):
t7=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t8=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
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_9952,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t10,a[6]=((C_word)li54),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
f_9952(t12,t1,t7,t8,C_SCHEME_END_OF_LIST);
case C_make_character(35):
t7=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t8=C_i_string_ref(((C_word*)t0)[3],t7);
switch(t8){
case C_make_character(59):
t9=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10053,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word)li55),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:668: read */
t41=t1;
t42=t9;
t43=t10;
t1=t41;
t2=t42;
t3=t43;
goto loop;
case C_make_character(92):
t9=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10071,a[2]=t3,a[3]=((C_word)li56),tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:670: read */
t41=t1;
t42=t9;
t43=t10;
t1=t41;
t2=t42;
t3=t43;
goto loop;
default:
t9=C_eqp(t8,C_make_character(116));
t10=(C_truep(t9)?t9:C_eqp(t8,C_make_character(102)));
if(C_truep(t10)){
t11=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t12=C_i_string_ref(((C_word*)t0)[3],t11);
t13=C_eqp(C_make_character(116),t12);
t14=C_a_i_fixnum_plus(&a,2,t2,C_fix(2));
/* irregex-core.scm:681: k */
t15=t3;{
C_word av2[4];
av2[0]=t15;
av2[1]=t1;
av2[2]=t13;
av2[3]=t14;
((C_proc)(void*)(*((C_word*)t15+1)))(4,av2);}}
else{
/* irregex-core.scm:683: chicken.base#error */
t11=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t11;
av2[1]=t1;
av2[2]=lf[83];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t11+1)))(4,av2);}}}
default:
if(C_truep(C_u_i_char_whitespacep(C_i_string_ref(((C_word*)t0)[3],t2)))){
t7=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:687: read */
t41=t1;
t42=t7;
t43=t3;
t1=t41;
t2=t42;
t3=t43;
goto loop;}
else{
t7=C_a_i_fixnum_plus(&a,2,t2,C_fix(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|7,a[1]=(C_word)f_10171,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=t9,a[7]=((C_word)li57),tmp=(C_word)a,a+=8,tmp));
t11=((C_word*)t9)[1];
f_10171(t11,t1,t7);}}}}}}

/* lp */
static void C_fcall f_9704(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_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(8,0,4)))){
C_save_and_reclaim_args((void *)trf_9704,4,t0,t1,t2,t3);}
a=C_alloc(8);
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9710,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)li48),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:620: read */
t5=((C_word*)((C_word*)t0)[4])[1];
f_9677(t5,t1,t2,t4);}

/* a9709 in lp */
static void C_ccall f_9710(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,4)))){
C_save_and_reclaim((void *)f_9710,c,av);}
a=C_alloc(7);
t4=C_eqp(t2,lf[66]);
if(C_truep(t4)){
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9724,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:625: ##sys#fast-reverse */
t6=*((C_word*)lf[69]+1);{
C_word *av2=av;
av2[0]=t6;
av2[1]=t5;
av2[2]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}
else{
t5=C_eqp(t2,lf[70]);
if(C_truep(t5)){
if(C_truep(C_i_nullp(((C_word*)t0)[3]))){
/* irregex-core.scm:628: chicken.base#error */
t6=*((C_word*)lf[30]+1);{
C_word *av2=av;
av2[0]=t6;
av2[1]=t1;
av2[2]=lf[71];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}
else{
t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9744,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]=((C_word)li47),tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:629: read */
t7=((C_word*)((C_word*)t0)[5])[1];
f_9677(t7,t1,t3,t6);}}
else{
t6=C_a_i_cons(&a,2,t2,((C_word*)t0)[3]);
/* irregex-core.scm:637: lp */
t7=((C_word*)((C_word*)t0)[6])[1];
f_9704(t7,t1,t3,t6);}}}

/* k9722 in a9709 in lp */
static void C_ccall f_9724(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_9724,c,av);}
/* irregex-core.scm:625: k */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=t1;
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* a9743 in a9709 in lp */
static void C_ccall f_9744(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,4)))){
C_save_and_reclaim((void *)f_9744,c,av);}
a=C_alloc(7);
t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9750,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=((C_word)li46),tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:630: read */
t5=((C_word*)((C_word*)t0)[5])[1];
f_9677(t5,t1,t3,t4);}

/* a9749 in a9743 in a9709 in lp */
static void C_ccall f_9750(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,c,3)))){
C_save_and_reclaim((void *)f_9750,c,av);}
a=C_alloc(10);
t4=C_eqp(t2,lf[66]);
if(C_truep(C_i_not(t4))){
/* irregex-core.scm:632: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word *av2=av;
av2[0]=t5;
av2[1]=t1;
av2[2]=lf[72];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}
else{
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9767,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9771,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t5,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:633: ##sys#fast-reverse */
t7=*((C_word*)lf[69]+1);{
C_word *av2=av;
av2[0]=t7;
av2[1]=t6;
av2[2]=C_i_cdr(((C_word*)t0)[4]);
((C_proc)(void*)(*((C_word*)t7+1)))(3,av2);}}}

/* k9765 in a9749 in a9743 in a9709 in lp */
static void C_ccall f_9767(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,3)))){
C_save_and_reclaim((void *)f_9767,c,av);}
/* irregex-core.scm:633: k */
t2=((C_word*)t0)[2];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=t1;
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k9769 in a9749 in a9743 in a9709 in lp */
static void C_ccall f_9771(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,3)))){
C_save_and_reclaim((void *)f_9771,c,av);}
a=C_alloc(3);
t2=C_u_i_car(((C_word*)t0)[2]);
t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[3]);
/* irregex-core.scm:633: scheme#append */
t4=*((C_word*)lf[73]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=((C_word*)t0)[4];
av2[2]=t1;
av2[3]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}

/* skip */
static void C_fcall f_9818(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,0,3)))){
C_save_and_reclaim_args((void *)trf_9818,3,t0,t1,t2);}
t3=C_fixnum_greater_or_equal_p(t2,((C_word*)((C_word*)t0)[2])[1]);
t4=(C_truep(t3)?t3:C_eqp(C_make_character(10),C_i_string_ref(((C_word*)t0)[3],t2)));
if(C_truep(t4)){
/* irregex-core.scm:643: read */
t5=((C_word*)((C_word*)t0)[4])[1];
f_9677(t5,t1,C_fixnum_plus(t2,C_fix(1)),((C_word*)t0)[5]);}
else{
/* irregex-core.scm:644: skip */
t6=t1;
t7=C_fixnum_plus(t2,C_fix(1));
t1=t6;
t2=t7;
goto loop;}}

/* a9866 */
static void C_ccall f_9867(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,3)))){
C_save_and_reclaim((void *)f_9867,c,av);}
a=C_alloc(6);
t4=C_i_string_ref(((C_word*)t0)[2],((C_word*)t0)[3]);
t5=C_eqp(C_make_character(39),t4);
t6=(C_truep(t5)?lf[74]:lf[75]);
t7=C_a_i_list2(&a,2,t6,t2);
/* irregex-core.scm:649: k */
t8=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t8;
av2[1]=t1;
av2[2]=t7;
av2[3]=t3;
((C_proc)(void*)(*((C_word*)t8+1)))(4,av2);}}

/* k9893 */
static void C_fcall f_9895(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,4)))){
C_save_and_reclaim_args((void *)trf_9895,2,t0,t1);}
a=C_alloc(10);
t2=(C_truep(t1)?lf[76]:lf[77]);
t3=(C_truep(t1)?C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(2)):C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(1)));
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9906,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word)li52),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:654: read */
t5=((C_word*)((C_word*)t0)[4])[1];
f_9677(t5,((C_word*)t0)[5],t3,t4);}

/* a9905 in k9893 */
static void C_ccall f_9906(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2=av[2];
C_word t3=av[3];
C_word t4;
C_word t5;
C_word *a;
if(c!=4) C_bad_argc_2(c,4,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,c,3)))){
C_save_and_reclaim((void *)f_9906,c,av);}
a=C_alloc(6);
t4=C_a_i_list2(&a,2,((C_word*)t0)[2],t2);
/* irregex-core.scm:654: k */
t5=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t5;
av2[1]=t1;
av2[2]=t4;
av2[3]=t3;
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}

/* scan */
static void C_fcall f_9952(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4){
C_word tmp;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(23,0,4)))){
C_save_and_reclaim_args((void *)trf_9952,5,t0,t1,t2,t3,t4);}
a=C_alloc(23);
t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9955,a[2]=t2,a[3]=t3,a[4]=t4,a[5]=((C_word*)t0)[2],a[6]=((C_word)li53),tmp=(C_word)a,a+=7,tmp);
if(C_truep(C_fixnum_greater_or_equal_p(t3,((C_word*)((C_word*)t0)[3])[1]))){
/* irregex-core.scm:660: chicken.base#error */
t6=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t6;
av2[1]=t1;
av2[2]=lf[78];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}
else{
t6=C_i_string_ref(((C_word*)t0)[2],t3);
switch(t6){
case C_make_character(34):
t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9994,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10001,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:662: collect */
t9=t5;
f_9955(t9,t8);
case C_make_character(92):
t7=C_a_i_fixnum_plus(&a,2,t3,C_fix(1));
t8=C_a_i_fixnum_plus(&a,2,t3,C_fix(2));
t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10020,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=t7,a[5]=t8,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:663: collect */
t10=t5;
f_9955(t10,t9);
default:
t7=C_a_i_fixnum_plus(&a,2,t3,C_fix(1));
/* irregex-core.scm:664: scan */
t14=t1;
t15=t2;
t16=t7;
t17=t4;
t1=t14;
t2=t15;
t3=t16;
t4=t17;
goto loop;}}}

/* collect in scan */
static void C_fcall f_9955(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,0,4)))){
C_save_and_reclaim_args((void *)trf_9955,2,t0,t1);}
a=C_alloc(4);
t2=C_eqp(((C_word*)t0)[2],((C_word*)t0)[3]);
if(C_truep(t2)){
t3=t1;{
C_word av2[2];
av2[0]=t3;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9969,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:658: scheme#substring */
t4=*((C_word*)lf[46]+1);{
C_word av2[5];
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t0)[5];
av2[3]=((C_word*)t0)[2];
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}}

/* k9967 in collect in scan */
static void C_ccall f_9969(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_9969,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_a_i_cons(&a,2,t1,((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k9992 in scan */
static void C_ccall f_9994(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(5,c,3)))){
C_save_and_reclaim((void *)f_9994,c,av);}
a=C_alloc(5);
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(1));
/* irregex-core.scm:662: k */
t3=((C_word*)t0)[3];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t3;
av2[1]=((C_word*)t0)[4];
av2[2]=t1;
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}

/* toplevel */
static C_TLS int toplevel_initialized=0;

void C_ccall C_irregex_toplevel(C_word c,C_word *av){
C_word tmp;
C_word t0=av[0];
C_word t1=av[1];
C_word t2;
C_word t3;
C_word *a;
if(toplevel_initialized) {C_kontinue(t1,C_SCHEME_UNDEFINED);}
else C_toplevel_entry(C_text("irregex"));
C_check_nursery_minimum(C_calculate_demand(3,c,2));
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void*)C_irregex_toplevel,c,av);}
toplevel_initialized=1;
if(C_unlikely(!C_demand_2(2394))){
C_save(t1);
C_rereclaim2(2394*sizeof(C_word),1);
t1=C_restore;}
a=C_alloc(3);
C_initialize_lf(lf,502);
lf[0]=C_h_intern(&lf[0],7, C_text("irregex"));
lf[1]=C_h_intern(&lf[1],16, C_text("chicken.irregex#"));
lf[3]=C_h_intern(&lf[3],25, C_text("chicken.base#vector-copy!"));
lf[4]=C_h_intern(&lf[4],18, C_text("scheme#make-vector"));
lf[5]=C_h_intern(&lf[5],24, C_text("chicken.irregex#irregex\077"));
lf[6]=C_h_intern(&lf[6],6, C_text("regexp"));
lf[7]=C_h_intern(&lf[7],38, C_text("chicken.irregex#irregex-num-submatches"));
lf[8]=C_h_intern(&lf[8],22, C_text("irregex-num-submatches"));
lf[9]=C_h_intern(&lf[9],29, C_text("chicken.irregex#irregex-names"));
lf[10]=C_h_intern(&lf[10],13, C_text("irregex-names"));
lf[12]=C_h_intern(&lf[12],12, C_text("regexp-match"));
lf[14]=C_h_intern(&lf[14],19, C_text("scheme#vector-fill!"));
lf[16]=C_h_intern(&lf[16],35, C_text("chicken.irregex#irregex-match-data\077"));
lf[17]=C_h_intern(&lf[17],44, C_text("chicken.irregex#irregex-match-num-submatches"));
lf[18]=C_h_intern(&lf[18],28, C_text("irregex-match-num-submatches"));
lf[19]=C_h_intern(&lf[19],35, C_text("chicken.irregex#irregex-match-names"));
lf[20]=C_h_intern(&lf[20],19, C_text("irregex-match-names"));
lf[21]=C_h_intern(&lf[21],41, C_text("chicken.irregex#irregex-match-start-chunk"));
lf[23]=C_h_intern(&lf[23],25, C_text("irregex-match-start-chunk"));
lf[24]=C_h_intern(&lf[24],41, C_text("chicken.irregex#irregex-match-start-index"));
lf[25]=C_h_intern(&lf[25],25, C_text("irregex-match-start-index"));
lf[26]=C_h_intern(&lf[26],39, C_text("chicken.irregex#irregex-match-end-chunk"));
lf[27]=C_h_intern(&lf[27],23, C_text("irregex-match-end-chunk"));
lf[28]=C_h_intern(&lf[28],39, C_text("chicken.irregex#irregex-match-end-index"));
lf[29]=C_h_intern(&lf[29],23, C_text("irregex-match-end-index"));
lf[30]=C_h_intern(&lf[30],18, C_text("chicken.base#error"));
lf[31]=C_decode_literal(C_heaptop,C_text("\376B\000\000\016not match data"));
lf[32]=C_decode_literal(C_heaptop,C_text("\376B\000\000\022too many arguments"));
lf[33]=C_decode_literal(C_heaptop,C_text("\376B\000\000\021not a valid index"));
lf[34]=C_decode_literal(C_heaptop,C_text("\376B\000\000\024not an exact integer"));
lf[35]=C_decode_literal(C_heaptop,C_text("\376B\000\000\022unknown match name"));
lf[36]=C_h_intern(&lf[36],42, C_text("chicken.irregex#irregex-match-valid-index\077"));
lf[37]=C_h_intern(&lf[37],26, C_text("irregex-match-valid-index\077"));
lf[38]=C_decode_literal(C_heaptop,C_text("\376B\000\000\024not an exact integer"));
lf[39]=C_decode_literal(C_heaptop,C_text("\376B\000\000\016not match data"));
lf[40]=C_h_intern(&lf[40],39, C_text("chicken.irregex#irregex-match-substring"));
lf[41]=C_h_intern(&lf[41],23, C_text("irregex-match-substring"));
lf[42]=C_h_intern(&lf[42],38, C_text("chicken.irregex#irregex-match-subchunk"));
lf[43]=C_decode_literal(C_heaptop,C_text("\376B\000\0000this chunk type does not support match subchunks"));
lf[44]=C_h_intern(&lf[44],22, C_text("irregex-match-subchunk"));
lf[45]=C_h_intern(&lf[45],36, C_text("chicken.irregex#make-irregex-chunker"));
lf[46]=C_h_intern(&lf[46],16, C_text("scheme#substring"));
lf[48]=C_h_intern(&lf[48],20, C_text("make-irregex-chunker"));
lf[49]=C_decode_literal(C_heaptop,C_text("\376B\000\000\023expected a procdure"));
lf[52]=C_h_intern(&lf[52],1, C_text("/"));
lf[55]=C_h_intern(&lf[55],18, C_text("scheme#make-string"));
lf[60]=C_decode_literal(C_heaptop,C_text("\376B\000\000\035can\047t take last of empty list"));
lf[65]=C_h_intern(&lf[65],5, C_text("close"));
lf[68]=C_decode_literal(C_heaptop,C_text("\376B\000\000\031unterminated embedded SRE"));
lf[69]=C_h_intern(&lf[69],18, C_text("##sys#fast-reverse"));
lf[70]=C_h_intern(&lf[70],1, C_text("."));
lf[71]=C_decode_literal(C_heaptop,C_text("\376B\000\000\017bad dotted form"));
lf[72]=C_decode_literal(C_heaptop,C_text("\376B\000\000\017bad dotted form"));
lf[73]=C_h_intern(&lf[73],13, C_text("scheme#append"));
lf[74]=C_h_intern(&lf[74],5, C_text("quote"));
lf[75]=C_h_intern(&lf[75],10, C_text("quasiquote"));
lf[76]=C_h_intern(&lf[76],15, C_text("uquote-splicing"));
lf[77]=C_h_intern(&lf[77],7, C_text("unquote"));
lf[78]=C_decode_literal(C_heaptop,C_text("\376B\000\000#unterminated string in embedded SRE"));
lf[79]=C_h_intern(&lf[79],5, C_text("space"));
lf[80]=C_h_intern(&lf[80],7, C_text("newline"));
lf[81]=C_h_intern(&lf[81],20, C_text("##sys#number->string"));
lf[82]=C_h_intern(&lf[82],21, C_text("scheme#symbol->string"));
lf[83]=C_decode_literal(C_heaptop,C_text("\376B\000\000\036bad # syntax in simplified SRE"));
lf[84]=C_h_intern(&lf[84],21, C_text("scheme#string->symbol"));
lf[85]=C_h_intern(&lf[85],21, C_text("scheme#string->number"));
lf[86]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\377\012\000\000;\376\003\000\000\002\376\377\012\000\000(\376\003\000\000\002\376\377\012\000\000)\376\003\000\000\002\376\377\012\000\000\042\376\003\000\000\002\376\377\012\000\000#\376\003\000\000\002\376\377\012\000\000\134\376\377\016"));
lf[87]=C_h_intern(&lf[87],11, C_text("close-token"));
lf[88]=C_decode_literal(C_heaptop,C_text("\376B\000\000\025unexpected \047)\047 in SRE"));
lf[90]=C_h_intern(&lf[90],1, C_text("i"));
lf[91]=C_h_intern(&lf[91],1, C_text("m"));
lf[92]=C_h_intern(&lf[92],10, C_text("multi-line"));
lf[93]=C_h_intern(&lf[93],1, C_text("s"));
lf[94]=C_h_intern(&lf[94],11, C_text("single-line"));
lf[95]=C_h_intern(&lf[95],1, C_text("x"));
lf[96]=C_h_intern(&lf[96],12, C_text("ignore-space"));
lf[97]=C_h_intern(&lf[97],1, C_text("u"));
lf[98]=C_h_intern(&lf[98],4, C_text("utf8"));
lf[99]=C_h_intern(&lf[99],2, C_text("ci"));
lf[100]=C_h_intern(&lf[100],16, C_text("case-insensitive"));
lf[101]=C_h_intern(&lf[101],33, C_text("chicken.irregex#maybe-string->sre"));
lf[102]=C_h_intern(&lf[102],27, C_text("chicken.irregex#string->sre"));
lf[103]=C_h_intern(&lf[103],2, C_text("or"));
lf[105]=C_h_intern(&lf[105],18, C_text("##sys#string->list"));
lf[108]=C_h_intern(&lf[108],8, C_text("submatch"));
lf[109]=C_h_intern(&lf[109],2, C_text("if"));
lf[110]=C_h_intern(&lf[110],7, C_text("epsilon"));
lf[111]=C_h_intern(&lf[111],10, C_text("look-ahead"));
lf[112]=C_h_intern(&lf[112],14, C_text("neg-look-ahead"));
lf[113]=C_h_intern(&lf[113],11, C_text("look-behind"));
lf[114]=C_h_intern(&lf[114],15, C_text("neg-look-behind"));
lf[115]=C_h_intern(&lf[115],3, C_text("seq"));
lf[116]=C_h_intern(&lf[116],13, C_text("scheme#cddadr"));
lf[117]=C_h_intern(&lf[117],13, C_text("scheme#cadadr"));
lf[118]=C_h_intern(&lf[118],12, C_text("##sys#append"));
lf[119]=C_h_intern(&lf[119],2, C_text("=>"));
lf[120]=C_h_intern(&lf[120],14, C_text("submatch-named"));
lf[121]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\002\001=>\376\003\000\000\002\376\001\000\000\016\001submatch-named\376\377\016"));
lf[122]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\006\001atomic\376\003\000\000\002\376\001\000\000\002\001if\376\003\000\000\002\376\001\000\000\012\001look-ahead\376\003\000\000\002\376\001\000\000\016\001neg-look-ahead\376\003\000\000"
"\002\376\001\000\000\013\001look-behind\376\003\000\000\002\376\001\000\000\017\001neg-look-behind\376\003\000\000\002\376\001\000\000\002\001=>\376\003\000\000\002\376\001\000\000\016\001submatch-nam"
"ed\376\003\000\000\002\376\001\000\000\006\001w/utf8\376\003\000\000\002\376\001\000\000\010\001w/noutf8\376\377\016"));
lf[123]=C_decode_literal(C_heaptop,C_text("\376B\000\000\042unterminated parenthesis in regexp"));
lf[124]=C_h_intern(&lf[124],3, C_text("any"));
lf[125]=C_h_intern(&lf[125],4, C_text("nonl"));
lf[126]=C_decode_literal(C_heaptop,C_text("\376B\000\000\034\077 can\047t follow empty pattern"));
lf[127]=C_h_intern(&lf[127],1, C_text("\052"));
lf[128]=C_h_intern(&lf[128],2, C_text("\052\077"));
lf[129]=C_h_intern(&lf[129],1, C_text("+"));
lf[130]=C_h_intern(&lf[130],3, C_text("\052\052\077"));
lf[131]=C_h_intern(&lf[131],1, C_text("\077"));
lf[132]=C_h_intern(&lf[132],2, C_text("\077\077"));
lf[133]=C_h_intern(&lf[133],2, C_text("\052\052"));
lf[134]=C_h_intern(&lf[134],1, C_text("="));
lf[135]=C_h_intern(&lf[135],2, C_text(">="));
lf[137]=C_decode_literal(C_heaptop,C_text("\376B\000\000)duplicate repetition (e.g. \052\052) in pattern"));
lf[138]=C_decode_literal(C_heaptop,C_text("\376B\000\000%can\047t repeat empty pattern (e.g. ()\052)"));
lf[140]=C_decode_literal(C_heaptop,C_text("\376B\000\000\042unterminated parenthesis in regexp"));
lf[141]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\377\012\000\000\077\376\003\000\000\002\376\377\012\000\000\052\376\377\016"));
lf[142]=C_decode_literal(C_heaptop,C_text("\376B\000\000\042unterminated parenthesis in regexp"));
lf[143]=C_decode_literal(C_heaptop,C_text("\376B\000\000\037unterminated (\052\047...) SRE escape"));
lf[144]=C_decode_literal(C_heaptop,C_text("\376B\000\000\047bad regexp syntax: (\052FOO) not supported"));
lf[145]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\012\001look-ahead\376\377\016"));
lf[146]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\016\001neg-look-ahead\376\377\016"));
lf[147]=C_decode_literal(C_heaptop,C_text("\376B\000\000\042unterminated parenthesis in regexp"));
lf[148]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\013\001look-behind\376\377\016"));
lf[149]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\017\001neg-look-behind\376\377\016"));
lf[150]=C_decode_literal(C_heaptop,C_text("\376B\000\000\024invalid (\077< sequence"));
lf[151]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\006\001atomic\376\377\016"));
lf[152]=C_decode_literal(C_heaptop,C_text("\376B\000\000\042unterminated parenthesis in regexp"));
lf[153]=C_decode_literal(C_heaptop,C_text("\376B\000\000\035invalid conditional reference"));
lf[154]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\002\001if\376\377\016"));
lf[155]=C_decode_literal(C_heaptop,C_text("\376B\000\000\036unsupported Perl-style cluster"));
lf[156]=C_h_intern(&lf[156],6, C_text("w/utf8"));
lf[157]=C_h_intern(&lf[157],8, C_text("w/noutf8"));
lf[158]=C_decode_literal(C_heaptop,C_text("\376B\000\000\022incomplete cluster"));
lf[159]=C_decode_literal(C_heaptop,C_text("\376B\000\000\036unknown regex cluster modifier"));
lf[160]=C_decode_literal(C_heaptop,C_text("\376B\000\000\026too many )\047s in regexp"));
lf[161]=C_decode_literal(C_heaptop,C_text("\376B\000\000\023incomplete char set"));
lf[163]=C_h_intern(&lf[163],19, C_text("scheme#vector->list"));
lf[166]=C_decode_literal(C_heaptop,C_text("\376B\000\000\014bad char-set"));
lf[167]=C_decode_literal(C_heaptop,C_text("\376B\000\000\032inverted range in char-set"));
lf[170]=C_decode_literal(C_heaptop,C_text("\376\000\000\001\000\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000"
"\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376"
"\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000"
"\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001"
"\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001"
"\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000"
"\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377"
"\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000"
"\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376"
"\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000"
"\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001"
"\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001"
"\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000"
"\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377"
"\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000"
"\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376"
"\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\001\376\377\001\000\000\000\002\376\377\001\000"
"\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002"
"\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001"
"\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\002\376\377\001\000\000\000\003\376\377\001\000\000\000\003\376\377\001\000\000\000\003\376\377\001\000\000\000"
"\003\376\377\001\000\000\000\003\376\377\001\000\000\000\003\376\377\001\000\000\000\003\376\377\001\000\000\000\003\376\377\001\000\000\000\003\376\377\001\000\000\000\003\376\377\001\000\000\000\003\376\377\001\000\000\000\003\376\377\001\000\000\000\003\376\377\001\000\000\000\003\376\377\001\000\000\000\003\376\377"
"\001\000\000\000\003\376\377\001\000\000\000\004\376\377\001\000\000\000\004\376\377\001\000\000\000\004\376\377\001\000\000\000\004\376\377\001\000\000\000\004\376\377\001\000\000\000\004\376\377\001\000\000\000\004\376\377\001\000\000\000\004\376\377\001\000\000\000\005\376\377\001\000\000\000\005\376\377\001\000\000"
"\000\005\376\377\001\000\000\000\005\376\377\001\000\000\000\006\376\377\001\000\000\000\006\376\377\001\000\000\000\000\376\377\001\000\000\000\000"));
lf[171]=C_decode_literal(C_heaptop,C_text("\376B\000\000\032incomplete character class"));
lf[173]=C_decode_literal(C_heaptop,C_text("\376B\000\000!collating sequences not supported"));
lf[174]=C_decode_literal(C_heaptop,C_text("\376B\000\000\034{ can\047t follow empty pattern"));
lf[175]=C_decode_literal(C_heaptop,C_text("\376B\000\000\035invalid {n} repetition syntax"));
lf[176]=C_decode_literal(C_heaptop,C_text("\376B\000\000\000"));
lf[177]=C_decode_literal(C_heaptop,C_text("\376B\000\000\032incomplete escape sequence"));
lf[178]=C_h_intern(&lf[178],7, C_text("numeric"));
lf[179]=C_h_intern(&lf[179],1, C_text("~"));
lf[180]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001_"));
lf[181]=C_h_intern(&lf[181],12, C_text("alphanumeric"));
lf[182]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001_"));
lf[183]=C_h_intern(&lf[183],3, C_text("bow"));
lf[184]=C_h_intern(&lf[184],3, C_text("eow"));
lf[185]=C_h_intern(&lf[185],3, C_text("nwb"));
lf[186]=C_h_intern(&lf[186],3, C_text("bos"));
lf[187]=C_h_intern(&lf[187],3, C_text("eos"));
lf[188]=C_h_intern(&lf[188],5, C_text("reset"));
lf[189]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\377\012\000\000<\376\003\000\000\002\376\377\012\000\000{\376\003\000\000\002\376\377\012\000\000\047\376\377\016"));
lf[190]=C_decode_literal(C_heaptop,C_text("\376B\000\000\036bad \134k usage, expected \134k<...>"));
lf[191]=C_h_intern(&lf[191],10, C_text("backref-ci"));
lf[192]=C_h_intern(&lf[192],7, C_text("backref"));
lf[193]=C_decode_literal(C_heaptop,C_text("\376B\000\000\032unterminated named backref"));
lf[194]=C_decode_literal(C_heaptop,C_text("\376B\000\000\027unknown escape sequence"));
lf[195]=C_h_intern(&lf[195],3, C_text("bol"));
lf[196]=C_h_intern(&lf[196],3, C_text("eol"));
lf[197]=C_h_intern(&lf[197],11, C_text("string->sre"));
lf[198]=C_decode_literal(C_heaptop,C_text("\376B\000\000\021expected a string"));
lf[199]=C_decode_literal(C_heaptop,C_text("\376B\000\000\025incomplete hex escape"));
lf[200]=C_decode_literal(C_heaptop,C_text("\376B\000\000\033incomplete hex brace escape"));
lf[201]=C_decode_literal(C_heaptop,C_text("\376B\000\000\024bad hex brace escape"));
lf[202]=C_decode_literal(C_heaptop,C_text("\376B\000\000\025incomplete hex escape"));
lf[203]=C_decode_literal(C_heaptop,C_text("\376B\000\000\016bad hex escape"));
lf[205]=C_decode_literal(C_heaptop,C_text("\376B\000\000\023invalid utf8 length"));
lf[207]=C_decode_literal(C_heaptop,C_text("\376B\000\000\023invalid utf8 length"));
lf[209]=C_decode_literal(C_heaptop,C_text("\376B\000\000\037unicode codepoint out of range:"));
lf[211]=C_h_intern(&lf[211],3, C_text("map"));
lf[215]=C_decode_literal(C_heaptop,C_text("\376B\000\000\023invalid utf8 length"));
lf[217]=C_h_intern(&lf[217],23, C_text("chicken.irregex#irregex"));
lf[218]=C_decode_literal(C_heaptop,C_text("\376\000\000\000\013\376\377\006\000\376\377\006\000\376\377\006\000\376\377\006\000\376\377\006\000\376\377\006\000\376\377\006\000\376\377\006\000\376\377\006\000\376\377\006\000\376\377\001\000\000\000\000"));
lf[219]=C_h_intern(&lf[219],31, C_text("chicken.irregex#string->irregex"));
lf[220]=C_h_intern(&lf[220],28, C_text("chicken.irregex#sre->irregex"));
lf[221]=C_h_intern(&lf[221],5, C_text("small"));
lf[222]=C_h_intern(&lf[222],4, C_text("fast"));
lf[225]=C_h_intern(&lf[225],6, C_text("w/case"));
lf[226]=C_h_intern(&lf[226],8, C_text("w/nocase"));
lf[227]=C_h_intern(&lf[227],1, C_text(":"));
lf[228]=C_decode_literal(C_heaptop,C_text("\376B\000\000\024invalid sre: empty \052"));
lf[229]=C_decode_literal(C_heaptop,C_text("\376B\000\000\025invalid sre: empty \052\077"));
lf[230]=C_decode_literal(C_heaptop,C_text("\376B\000\000\024invalid sre: empty +"));
lf[231]=C_h_intern(&lf[231],4, C_text("word"));
lf[232]=C_h_intern(&lf[232],5, C_text("word+"));
lf[233]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001_"));
lf[234]=C_h_intern(&lf[234],1, C_text("&"));
lf[235]=C_h_intern(&lf[235],12, C_text("posix-string"));
lf[236]=C_h_intern(&lf[236],10, C_text("scheme#not"));
lf[237]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\001\001\052\376\003\000\000\002\376\001\000\000\003\001any\376\377\016"));
lf[238]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\003\001eos\376\377\016"));
lf[239]=C_h_intern(&lf[239],6, C_text("atomic"));
lf[240]=C_decode_literal(C_heaptop,C_text("\376B\000\000\037unknown named backref in SRE IF"));
lf[241]=C_h_intern(&lf[241],18, C_text("scheme#string-ci=\077"));
lf[242]=C_h_intern(&lf[242],15, C_text("scheme#string=\077"));
lf[243]=C_decode_literal(C_heaptop,C_text("\376B\000\000\025unknown backreference"));
lf[244]=C_h_intern(&lf[244],3, C_text("dsm"));
lf[245]=C_h_intern(&lf[245],1, C_text("$"));
lf[246]=C_decode_literal(C_heaptop,C_text("\376B\000\000\027unknown regexp operator"));
lf[247]=C_h_intern(&lf[247],1, C_text("-"));
lf[249]=C_decode_literal(C_heaptop,C_text("\376B\000\000\016unknown regexp"));
lf[250]=C_h_intern(&lf[250],16, C_text("scheme#char-ci=\077"));
lf[251]=C_decode_literal(C_heaptop,C_text("\376B\000\000\016unknown regexp"));
lf[254]=C_h_intern(&lf[254],10, C_text("scheme#max"));
lf[255]=C_h_intern(&lf[255],10, C_text("scheme#min"));
lf[256]=C_h_intern(&lf[256],10, C_text("sre-length"));
lf[257]=C_decode_literal(C_heaptop,C_text("\376B\000\000\025invalid backreference"));
lf[258]=C_decode_literal(C_heaptop,C_text("\376B\000\000\035invalid forward backreference"));
lf[259]=C_decode_literal(C_heaptop,C_text("\376B\000\000\025unknown backreference"));
lf[260]=C_h_intern(&lf[260],3, C_text(">=\077"));
lf[261]=C_h_intern(&lf[261],17, C_text("sre-length-ranges"));
lf[262]=C_decode_literal(C_heaptop,C_text("\376B\000\000\024unknown sre operator"));
lf[263]=C_h_intern(&lf[263],2, C_text("=\077"));
lf[264]=C_h_intern(&lf[264],6, C_text("commit"));
lf[265]=C_decode_literal(C_heaptop,C_text("\376B\000\000\013unknown sre"));
lf[266]=C_h_intern(&lf[266],11, C_text("scheme#cons"));
lf[269]=C_h_intern(&lf[269],9, C_text("backtrack"));
lf[272]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\001\001\052\376\003\000\000\002\376\001\000\000\003\001any\376\377\016"));
lf[273]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\001\001\052\376\003\000\000\002\376\001\000\000\004\001nonl\376\377\016"));
lf[274]=C_h_intern(&lf[274],8, C_text("utf8-any"));
lf[275]=C_h_intern(&lf[275],9, C_text("utf8-nonl"));
lf[276]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\007\001epsilon\376\003\000\000\002\376\001\000\000\003\001bos\376\003\000\000\002\376\001\000\000\003\001eos\376\003\000\000\002\376\001\000\000\003\001bol\376\003\000\000\002\376\001\000\000\003\001eol\376\003\000\000\002\376"
"\001\000\000\003\001bow\376\003\000\000\002\376\001\000\000\003\001eow\376\003\000\000\002\376\001\000\000\006\001commit\376\377\016"));
lf[278]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\001\001\052\376\003\000\000\002\376\001\000\000\001\001+\376\377\016"));
lf[281]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\001\001$\376\003\000\000\002\376\001\000\000\010\001submatch\376\003\000\000\002\376\001\000\000\002\001=>\376\003\000\000\002\376\001\000\000\016\001submatch-named\376\377\016"));
lf[282]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\002\001or\376\377\016"));
lf[286]=C_h_intern(&lf[286],30, C_text("chicken.irregex#irregex-search"));
lf[287]=C_h_intern(&lf[287],38, C_text("chicken.irregex#irregex-search/chunked"));
lf[288]=C_h_intern(&lf[288],14, C_text("irregex-search"));
lf[289]=C_decode_literal(C_heaptop,C_text("\376B\000\000\024not an exact integer"));
lf[290]=C_decode_literal(C_heaptop,C_text("\376B\000\000\024not an exact integer"));
lf[291]=C_decode_literal(C_heaptop,C_text("\376B\000\000\014not a string"));
lf[293]=C_decode_literal(C_heaptop,C_text("\376B\000\000\016not an integer"));
lf[294]=C_h_intern(&lf[294],11, C_text("irregex-dfa"));
lf[297]=C_h_intern(&lf[297],11, C_text("irregex-nfa"));
lf[298]=C_h_intern(&lf[298],29, C_text("chicken.irregex#irregex-match"));
lf[299]=C_h_intern(&lf[299],37, C_text("chicken.irregex#irregex-match/chunked"));
lf[300]=C_h_intern(&lf[300],13, C_text("irregex-match"));
lf[301]=C_decode_literal(C_heaptop,C_text("\376B\000\000\024not an exact integer"));
lf[302]=C_decode_literal(C_heaptop,C_text("\376B\000\000\024not an exact integer"));
lf[303]=C_decode_literal(C_heaptop,C_text("\376B\000\000\014not a string"));
lf[304]=C_h_intern(&lf[304],30, C_text("chicken.irregex#irregex-match\077"));
lf[306]=C_h_intern(&lf[306],8, C_text("for-each"));
lf[307]=C_h_intern(&lf[307],10, C_text("alphabetic"));
lf[308]=C_h_intern(&lf[308],5, C_text("alpha"));
lf[309]=C_h_intern(&lf[309],8, C_text("alphanum"));
lf[310]=C_h_intern(&lf[310],5, C_text("alnum"));
lf[311]=C_h_intern(&lf[311],10, C_text("lower-case"));
lf[312]=C_h_intern(&lf[312],5, C_text("lower"));
lf[313]=C_h_intern(&lf[313],10, C_text("upper-case"));
lf[314]=C_h_intern(&lf[314],5, C_text("upper"));
lf[315]=C_h_intern(&lf[315],3, C_text("num"));
lf[316]=C_h_intern(&lf[316],5, C_text("digit"));
lf[317]=C_h_intern(&lf[317],11, C_text("punctuation"));
lf[318]=C_h_intern(&lf[318],5, C_text("punct"));
lf[319]=C_h_intern(&lf[319],7, C_text("graphic"));
lf[320]=C_h_intern(&lf[320],5, C_text("graph"));
lf[321]=C_h_intern(&lf[321],5, C_text("blank"));
lf[322]=C_h_intern(&lf[322],10, C_text("whitespace"));
lf[323]=C_h_intern(&lf[323],5, C_text("white"));
lf[324]=C_h_intern(&lf[324],8, C_text("printing"));
lf[325]=C_h_intern(&lf[325],5, C_text("print"));
lf[326]=C_h_intern(&lf[326],7, C_text("control"));
lf[327]=C_h_intern(&lf[327],5, C_text("cntrl"));
lf[328]=C_h_intern(&lf[328],9, C_text("hex-digit"));
lf[329]=C_h_intern(&lf[329],6, C_text("xdigit"));
lf[330]=C_h_intern(&lf[330],5, C_text("ascii"));
lf[331]=C_h_intern(&lf[331],10, C_text("ascii-nonl"));
lf[332]=C_h_intern(&lf[332],14, C_text("utf8-tail-char"));
lf[333]=C_h_intern(&lf[333],11, C_text("utf8-2-char"));
lf[334]=C_h_intern(&lf[334],11, C_text("utf8-3-char"));
lf[335]=C_h_intern(&lf[335],11, C_text("utf8-4-char"));
lf[336]=C_h_intern(&lf[336],7, C_text("integer"));
lf[337]=C_h_intern(&lf[337],4, C_text("real"));
lf[338]=C_decode_literal(C_heaptop,C_text("\376B\000\000\016!$%&\052/:<=>\077^_~"));
lf[339]=C_h_intern(&lf[339],14, C_text("symbol-initial"));
lf[340]=C_decode_literal(C_heaptop,C_text("\376B\000\000\004+-.@"));
lf[341]=C_h_intern(&lf[341],17, C_text("symbol-subsequent"));
lf[342]=C_decode_literal(C_heaptop,C_text("\376B\000\000\002+-"));
lf[343]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001."));
lf[344]=C_decode_literal(C_heaptop,C_text("\376B\000\000\002.."));
lf[345]=C_h_intern(&lf[345],6, C_text("symbol"));
lf[346]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001;"));
lf[347]=C_h_intern(&lf[347],10, C_text("sexp-space"));
lf[348]=C_h_intern(&lf[348],6, C_text("escape"));
lf[349]=C_h_intern(&lf[349],6, C_text("string"));
lf[350]=C_decode_literal(C_heaptop,C_text("\376B\000\000\00212"));
lf[351]=C_h_intern(&lf[351],10, C_text("ipv4-digit"));
lf[352]=C_h_intern(&lf[352],12, C_text("ipv4-address"));
lf[353]=C_h_intern(&lf[353],12, C_text("ipv6-address"));
lf[354]=C_h_intern(&lf[354],10, C_text("ip-address"));
lf[355]=C_h_intern(&lf[355],11, C_text("domain-atom"));
lf[356]=C_h_intern(&lf[356],6, C_text("domain"));
lf[357]=C_decode_literal(C_heaptop,C_text("\376B\000\000\004arpa"));
lf[358]=C_decode_literal(C_heaptop,C_text("\376B\000\000\003com"));
lf[359]=C_decode_literal(C_heaptop,C_text("\376B\000\000\003gov"));
lf[360]=C_decode_literal(C_heaptop,C_text("\376B\000\000\003mil"));
lf[361]=C_decode_literal(C_heaptop,C_text("\376B\000\000\003net"));
lf[362]=C_decode_literal(C_heaptop,C_text("\376B\000\000\003org"));
lf[363]=C_decode_literal(C_heaptop,C_text("\376B\000\000\004aero"));
lf[364]=C_decode_literal(C_heaptop,C_text("\376B\000\000\003biz"));
lf[365]=C_decode_literal(C_heaptop,C_text("\376B\000\000\004coop"));
lf[366]=C_decode_literal(C_heaptop,C_text("\376B\000\000\004info"));
lf[367]=C_decode_literal(C_heaptop,C_text("\376B\000\000\006museum"));
lf[368]=C_decode_literal(C_heaptop,C_text("\376B\000\000\004name"));
lf[369]=C_decode_literal(C_heaptop,C_text("\376B\000\000\003pro"));
lf[370]=C_h_intern(&lf[370],16, C_text("top-level-domain"));
lf[371]=C_h_intern(&lf[371],13, C_text("domain/common"));
lf[372]=C_h_intern(&lf[372],16, C_text("email-local-part"));
lf[373]=C_h_intern(&lf[373],5, C_text("email"));
lf[374]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001%"));
lf[375]=C_h_intern(&lf[375],8, C_text("url-char"));
lf[376]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001%"));
lf[377]=C_h_intern(&lf[377],14, C_text("url-final-char"));
lf[378]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001s"));
lf[379]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001:"));
lf[380]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001/"));
lf[381]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001\077"));
lf[382]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001#"));
lf[383]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001/"));
lf[384]=C_h_intern(&lf[384],8, C_text("http-url"));
lf[385]=C_decode_literal(C_heaptop,C_text("\376B\000\000\004http"));
lf[386]=C_decode_literal(C_heaptop,C_text("\376B\000\000\003://"));
lf[389]=C_decode_literal(C_heaptop,C_text("\376B\000\000\000"));
lf[391]=C_h_intern(&lf[391],12, C_text("scheme#cadar"));
lf[392]=C_h_intern(&lf[392],12, C_text("scheme#cddar"));
lf[393]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\007\001epsilon\376\377\016"));
lf[394]=C_decode_literal(C_heaptop,C_text("\376B\000\000\034non-procedure in op position"));
lf[400]=C_h_intern(&lf[400],13, C_text("scheme#caddar"));
lf[405]=C_decode_literal(C_heaptop,C_text("\376B\000\000!not a valid sre char-set operator"));
lf[406]=C_decode_literal(C_heaptop,C_text("\376B\000\000\030not a valid sre char-set"));
lf[408]=C_h_intern(&lf[408],19, C_text("scheme#list->vector"));
lf[410]=C_h_intern(&lf[410],12, C_text("irregex-fold"));
lf[411]=C_decode_literal(C_heaptop,C_text("\376B\000\000\024not an exact integer"));
lf[412]=C_decode_literal(C_heaptop,C_text("\376B\000\000\024not an exact integer"));
lf[413]=C_decode_literal(C_heaptop,C_text("\376B\000\000\014not a string"));
lf[414]=C_h_intern(&lf[414],28, C_text("chicken.irregex#irregex-fold"));
lf[415]=C_decode_literal(C_heaptop,C_text("\376B\000\000\017not a procedure"));
lf[417]=C_h_intern(&lf[417],20, C_text("irregex-fold/chunked"));
lf[418]=C_decode_literal(C_heaptop,C_text("\376B\000\000\016not an integer"));
lf[419]=C_h_intern(&lf[419],36, C_text("chicken.irregex#irregex-fold/chunked"));
lf[420]=C_decode_literal(C_heaptop,C_text("\376B\000\000\017not a procedure"));
lf[421]=C_h_intern(&lf[421],31, C_text("chicken.irregex#irregex-replace"));
lf[423]=C_h_intern(&lf[423],15, C_text("irregex-replace"));
lf[424]=C_decode_literal(C_heaptop,C_text("\376B\000\000\014not a string"));
lf[425]=C_h_intern(&lf[425],35, C_text("chicken.irregex#irregex-replace/all"));
lf[426]=C_h_intern(&lf[426],19, C_text("irregex-replace/all"));
lf[427]=C_decode_literal(C_heaptop,C_text("\376B\000\000\014not a string"));
lf[428]=C_decode_literal(C_heaptop,C_text("\376B\000\000\000"));
lf[429]=C_h_intern(&lf[429],3, C_text("pre"));
lf[430]=C_h_intern(&lf[430],4, C_text("post"));
lf[431]=C_decode_literal(C_heaptop,C_text("\376B\000\000\031unknown match replacement"));
lf[432]=C_h_intern(&lf[432],31, C_text("chicken.irregex#irregex-extract"));
lf[433]=C_h_intern(&lf[433],15, C_text("irregex-extract"));
lf[434]=C_decode_literal(C_heaptop,C_text("\376B\000\000\014not a string"));
lf[435]=C_h_intern(&lf[435],29, C_text("chicken.irregex#irregex-split"));
lf[436]=C_h_intern(&lf[436],20, C_text("scheme#string-append"));
lf[437]=C_h_intern(&lf[437],13, C_text("irregex-split"));
lf[438]=C_decode_literal(C_heaptop,C_text("\376B\000\000\014not a string"));
lf[439]=C_h_intern(&lf[439],29, C_text("chicken.irregex#irregex-quote"));
lf[440]=C_h_intern(&lf[440],18, C_text("##sys#list->string"));
lf[441]=C_decode_literal(C_heaptop,C_text("\376B\000\000\017\134|[](){}.\052+\077^$#"));
lf[442]=C_h_intern(&lf[442],27, C_text("chicken.irregex#irregex-opt"));
lf[443]=C_decode_literal(C_heaptop,C_text("\376B\000\000\000"));
lf[444]=C_h_intern(&lf[444],12, C_text("scheme#char\077"));
lf[445]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376B\000\000\000\376\377\016"));
lf[447]=C_h_intern(&lf[447],30, C_text("chicken.base#get-output-string"));
lf[448]=C_h_intern(&lf[448],14, C_text("scheme#display"));
lf[449]=C_h_intern(&lf[449],21, C_text("##sys#write-char/port"));
lf[450]=C_h_intern(&lf[450],31, C_text("chicken.base#open-output-string"));
lf[451]=C_h_intern(&lf[451],27, C_text("chicken.irregex#sre->string"));
lf[452]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001)"));
lf[453]=C_decode_literal(C_heaptop,C_text("\376B\000\000\003(\077:"));
lf[454]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001)"));
lf[455]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001("));
lf[456]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001)"));
lf[457]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001>"));
lf[458]=C_decode_literal(C_heaptop,C_text("\376B\000\000\003(\077<"));
lf[459]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001|"));
lf[460]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001)"));
lf[461]=C_decode_literal(C_heaptop,C_text("\376B\000\000\003(\077:"));
lf[462]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001)"));
lf[463]=C_decode_literal(C_heaptop,C_text("\376B\000\000\003(\077:"));
lf[464]=C_h_intern(&lf[464],3, C_text("not"));
lf[465]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001]"));
lf[466]=C_h_intern(&lf[466],12, C_text("scheme#cdadr"));
lf[467]=C_decode_literal(C_heaptop,C_text("\376B\000\000\002[^"));
lf[468]=C_decode_literal(C_heaptop,C_text("\376B\000\000(can\047t represent general \047not\047 in strings"));
lf[469]=C_h_intern(&lf[469],4, C_text("cset"));
lf[470]=C_h_intern(&lf[470],12, C_text("scheme#caadr"));
lf[471]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001]"));
lf[472]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001["));
lf[473]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001]"));
lf[474]=C_decode_literal(C_heaptop,C_text("\376B\000\000\002[^"));
lf[475]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001)"));
lf[476]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001:"));
lf[477]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001-"));
lf[478]=C_decode_literal(C_heaptop,C_text("\376B\000\000\002(\077"));
lf[479]=C_decode_literal(C_heaptop,C_text("\376B\000\000\024unknown sre operator"));
lf[480]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001^"));
lf[481]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001$"));
lf[482]=C_decode_literal(C_heaptop,C_text("\376B\000\000\001."));
lf[483]=C_decode_literal(C_heaptop,C_text("\376B\000\000\022unknown sre symbol"));
lf[484]=C_decode_literal(C_heaptop,C_text("\376B\000\000\023unknown sre pattern"));
lf[485]=C_h_intern(&lf[485],25, C_text("chicken.irregex#glob->sre"));
lf[486]=C_h_intern(&lf[486],9, C_text("glob->sre"));
lf[487]=C_decode_literal(C_heaptop,C_text("\376B\000\000\003./\134"));
lf[488]=C_decode_literal(C_heaptop,C_text("\376B\000\000\002/\134"));
lf[489]=C_decode_literal(C_heaptop,C_text("\376B\000\000\003./\134"));
lf[490]=C_decode_literal(C_heaptop,C_text("\376B\000\000\002/\134"));
lf[491]=C_decode_literal(C_heaptop,C_text("\376B\000\000!unexpected end of character class"));
lf[492]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\377\012\000\000\134\376\003\000\000\002\376\377\012\000\000/\376\377\016"));
lf[493]=C_h_intern(&lf[493],10, C_text("scheme#car"));
lf[494]=C_h_intern(&lf[494],11, C_text("scheme#cadr"));
lf[495]=C_h_intern(&lf[495],12, C_text("scheme#caddr"));
lf[496]=C_decode_literal(C_heaptop,C_text("\376B\000\000\002)>"));
lf[497]=C_decode_literal(C_heaptop,C_text("\376B\000\000\002es"));
lf[498]=C_decode_literal(C_heaptop,C_text("\376B\000\000\011 submatch"));
lf[499]=C_decode_literal(C_heaptop,C_text("\376B\000\000\020#<regexp-match ("));
lf[500]=C_h_intern(&lf[500],29, C_text("##sys#register-record-printer"));
lf[501]=C_h_intern(&lf[501],28, C_text("chicken.irregex#regexp-match"));
C_register_lf2(lf,502,create_ptable());{}
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7492,a[2]=t1,tmp=(C_word)a,a+=3,tmp);{
C_word *av2=av;
av2[0]=C_SCHEME_UNDEFINED;
av2[1]=t2;
C_library_toplevel(2,av2);}}

#ifdef C_ENABLE_PTABLES
static C_PTABLE_ENTRY ptable[1205] = {
{C_text("f33512:irregex_2escm"),(void*)f33512},
{C_text("f33516:irregex_2escm"),(void*)f33516},
{C_text("f_10001:irregex_2escm"),(void*)f_10001},
{C_text("f_10020:irregex_2escm"),(void*)f_10020},
{C_text("f_10053:irregex_2escm"),(void*)f_10053},
{C_text("f_10071:irregex_2escm"),(void*)f_10071},
{C_text("f_10091:irregex_2escm"),(void*)f_10091},
{C_text("f_10171:irregex_2escm"),(void*)f_10171},
{C_text("f_10181:irregex_2escm"),(void*)f_10181},
{C_text("f_10184:irregex_2escm"),(void*)f_10184},
{C_text("f_10191:irregex_2escm"),(void*)f_10191},
{C_text("f_10194:irregex_2escm"),(void*)f_10194},
{C_text("f_10242:irregex_2escm"),(void*)f_10242},
{C_text("f_10263:irregex_2escm"),(void*)f_10263},
{C_text("f_10269:irregex_2escm"),(void*)f_10269},
{C_text("f_10287:irregex_2escm"),(void*)f_10287},
{C_text("f_10298:irregex_2escm"),(void*)f_10298},
{C_text("f_10386:irregex_2escm"),(void*)f_10386},
{C_text("f_10398:irregex_2escm"),(void*)f_10398},
{C_text("f_10402:irregex_2escm"),(void*)f_10402},
{C_text("f_10408:irregex_2escm"),(void*)f_10408},
{C_text("f_10413:irregex_2escm"),(void*)f_10413},
{C_text("f_10416:irregex_2escm"),(void*)f_10416},
{C_text("f_10438:irregex_2escm"),(void*)f_10438},
{C_text("f_10455:irregex_2escm"),(void*)f_10455},
{C_text("f_10458:irregex_2escm"),(void*)f_10458},
{C_text("f_10460:irregex_2escm"),(void*)f_10460},
{C_text("f_10494:irregex_2escm"),(void*)f_10494},
{C_text("f_10508:irregex_2escm"),(void*)f_10508},
{C_text("f_10512:irregex_2escm"),(void*)f_10512},
{C_text("f_10514:irregex_2escm"),(void*)f_10514},
{C_text("f_10521:irregex_2escm"),(void*)f_10521},
{C_text("f_10530:irregex_2escm"),(void*)f_10530},
{C_text("f_10550:irregex_2escm"),(void*)f_10550},
{C_text("f_10554:irregex_2escm"),(void*)f_10554},
{C_text("f_10558:irregex_2escm"),(void*)f_10558},
{C_text("f_10586:irregex_2escm"),(void*)f_10586},
{C_text("f_10590:irregex_2escm"),(void*)f_10590},
{C_text("f_10593:irregex_2escm"),(void*)f_10593},
{C_text("f_10596:irregex_2escm"),(void*)f_10596},
{C_text("f_10599:irregex_2escm"),(void*)f_10599},
{C_text("f_10604:irregex_2escm"),(void*)f_10604},
{C_text("f_10607:irregex_2escm"),(void*)f_10607},
{C_text("f_10677:irregex_2escm"),(void*)f_10677},
{C_text("f_10693:irregex_2escm"),(void*)f_10693},
{C_text("f_10769:irregex_2escm"),(void*)f_10769},
{C_text("f_10780:irregex_2escm"),(void*)f_10780},
{C_text("f_10794:irregex_2escm"),(void*)f_10794},
{C_text("f_10816:irregex_2escm"),(void*)f_10816},
{C_text("f_10819:irregex_2escm"),(void*)f_10819},
{C_text("f_10831:irregex_2escm"),(void*)f_10831},
{C_text("f_10891:irregex_2escm"),(void*)f_10891},
{C_text("f_10920:irregex_2escm"),(void*)f_10920},
{C_text("f_11051:irregex_2escm"),(void*)f_11051},
{C_text("f_11057:irregex_2escm"),(void*)f_11057},
{C_text("f_11072:irregex_2escm"),(void*)f_11072},
{C_text("f_11143:irregex_2escm"),(void*)f_11143},
{C_text("f_11173:irregex_2escm"),(void*)f_11173},
{C_text("f_11183:irregex_2escm"),(void*)f_11183},
{C_text("f_11205:irregex_2escm"),(void*)f_11205},
{C_text("f_11240:irregex_2escm"),(void*)f_11240},
{C_text("f_11255:irregex_2escm"),(void*)f_11255},
{C_text("f_11281:irregex_2escm"),(void*)f_11281},
{C_text("f_11304:irregex_2escm"),(void*)f_11304},
{C_text("f_11327:irregex_2escm"),(void*)f_11327},
{C_text("f_11369:irregex_2escm"),(void*)f_11369},
{C_text("f_11392:irregex_2escm"),(void*)f_11392},
{C_text("f_11395:irregex_2escm"),(void*)f_11395},
{C_text("f_11421:irregex_2escm"),(void*)f_11421},
{C_text("f_11425:irregex_2escm"),(void*)f_11425},
{C_text("f_11429:irregex_2escm"),(void*)f_11429},
{C_text("f_11481:irregex_2escm"),(void*)f_11481},
{C_text("f_11506:irregex_2escm"),(void*)f_11506},
{C_text("f_11509:irregex_2escm"),(void*)f_11509},
{C_text("f_11539:irregex_2escm"),(void*)f_11539},
{C_text("f_11543:irregex_2escm"),(void*)f_11543},
{C_text("f_11558:irregex_2escm"),(void*)f_11558},
{C_text("f_11561:irregex_2escm"),(void*)f_11561},
{C_text("f_11582:irregex_2escm"),(void*)f_11582},
{C_text("f_11586:irregex_2escm"),(void*)f_11586},
{C_text("f_11609:irregex_2escm"),(void*)f_11609},
{C_text("f_11640:irregex_2escm"),(void*)f_11640},
{C_text("f_11643:irregex_2escm"),(void*)f_11643},
{C_text("f_11652:irregex_2escm"),(void*)f_11652},
{C_text("f_11796:irregex_2escm"),(void*)f_11796},
{C_text("f_11827:irregex_2escm"),(void*)f_11827},
{C_text("f_11918:irregex_2escm"),(void*)f_11918},
{C_text("f_11933:irregex_2escm"),(void*)f_11933},
{C_text("f_11953:irregex_2escm"),(void*)f_11953},
{C_text("f_11957:irregex_2escm"),(void*)f_11957},
{C_text("f_11976:irregex_2escm"),(void*)f_11976},
{C_text("f_11985:irregex_2escm"),(void*)f_11985},
{C_text("f_12001:irregex_2escm"),(void*)f_12001},
{C_text("f_12004:irregex_2escm"),(void*)f_12004},
{C_text("f_12007:irregex_2escm"),(void*)f_12007},
{C_text("f_12010:irregex_2escm"),(void*)f_12010},
{C_text("f_12019:irregex_2escm"),(void*)f_12019},
{C_text("f_12129:irregex_2escm"),(void*)f_12129},
{C_text("f_12205:irregex_2escm"),(void*)f_12205},
{C_text("f_12232:irregex_2escm"),(void*)f_12232},
{C_text("f_12255:irregex_2escm"),(void*)f_12255},
{C_text("f_12282:irregex_2escm"),(void*)f_12282},
{C_text("f_12309:irregex_2escm"),(void*)f_12309},
{C_text("f_12340:irregex_2escm"),(void*)f_12340},
{C_text("f_12375:irregex_2escm"),(void*)f_12375},
{C_text("f_12398:irregex_2escm"),(void*)f_12398},
{C_text("f_12421:irregex_2escm"),(void*)f_12421},
{C_text("f_12452:irregex_2escm"),(void*)f_12452},
{C_text("f_12475:irregex_2escm"),(void*)f_12475},
{C_text("f_12498:irregex_2escm"),(void*)f_12498},
{C_text("f_12521:irregex_2escm"),(void*)f_12521},
{C_text("f_12544:irregex_2escm"),(void*)f_12544},
{C_text("f_12567:irregex_2escm"),(void*)f_12567},
{C_text("f_12578:irregex_2escm"),(void*)f_12578},
{C_text("f_12598:irregex_2escm"),(void*)f_12598},
{C_text("f_12602:irregex_2escm"),(void*)f_12602},
{C_text("f_12626:irregex_2escm"),(void*)f_12626},
{C_text("f_12629:irregex_2escm"),(void*)f_12629},
{C_text("f_12632:irregex_2escm"),(void*)f_12632},
{C_text("f_12667:irregex_2escm"),(void*)f_12667},
{C_text("f_12671:irregex_2escm"),(void*)f_12671},
{C_text("f_12698:irregex_2escm"),(void*)f_12698},
{C_text("f_12706:irregex_2escm"),(void*)f_12706},
{C_text("f_12766:irregex_2escm"),(void*)f_12766},
{C_text("f_12809:irregex_2escm"),(void*)f_12809},
{C_text("f_12821:irregex_2escm"),(void*)f_12821},
{C_text("f_12830:irregex_2escm"),(void*)f_12830},
{C_text("f_12850:irregex_2escm"),(void*)f_12850},
{C_text("f_12854:irregex_2escm"),(void*)f_12854},
{C_text("f_12858:irregex_2escm"),(void*)f_12858},
{C_text("f_12910:irregex_2escm"),(void*)f_12910},
{C_text("f_12926:irregex_2escm"),(void*)f_12926},
{C_text("f_12990:irregex_2escm"),(void*)f_12990},
{C_text("f_13016:irregex_2escm"),(void*)f_13016},
{C_text("f_13045:irregex_2escm"),(void*)f_13045},
{C_text("f_13073:irregex_2escm"),(void*)f_13073},
{C_text("f_13094:irregex_2escm"),(void*)f_13094},
{C_text("f_13112:irregex_2escm"),(void*)f_13112},
{C_text("f_13226:irregex_2escm"),(void*)f_13226},
{C_text("f_13245:irregex_2escm"),(void*)f_13245},
{C_text("f_13257:irregex_2escm"),(void*)f_13257},
{C_text("f_13260:irregex_2escm"),(void*)f_13260},
{C_text("f_13291:irregex_2escm"),(void*)f_13291},
{C_text("f_13294:irregex_2escm"),(void*)f_13294},
{C_text("f_13335:irregex_2escm"),(void*)f_13335},
{C_text("f_13370:irregex_2escm"),(void*)f_13370},
{C_text("f_13380:irregex_2escm"),(void*)f_13380},
{C_text("f_13387:irregex_2escm"),(void*)f_13387},
{C_text("f_13408:irregex_2escm"),(void*)f_13408},
{C_text("f_13418:irregex_2escm"),(void*)f_13418},
{C_text("f_13435:irregex_2escm"),(void*)f_13435},
{C_text("f_13452:irregex_2escm"),(void*)f_13452},
{C_text("f_13463:irregex_2escm"),(void*)f_13463},
{C_text("f_13464:irregex_2escm"),(void*)f_13464},
{C_text("f_13485:irregex_2escm"),(void*)f_13485},
{C_text("f_13497:irregex_2escm"),(void*)f_13497},
{C_text("f_13507:irregex_2escm"),(void*)f_13507},
{C_text("f_13610:irregex_2escm"),(void*)f_13610},
{C_text("f_13619:irregex_2escm"),(void*)f_13619},
{C_text("f_13625:irregex_2escm"),(void*)f_13625},
{C_text("f_13628:irregex_2escm"),(void*)f_13628},
{C_text("f_13638:irregex_2escm"),(void*)f_13638},
{C_text("f_13645:irregex_2escm"),(void*)f_13645},
{C_text("f_13649:irregex_2escm"),(void*)f_13649},
{C_text("f_13693:irregex_2escm"),(void*)f_13693},
{C_text("f_13732:irregex_2escm"),(void*)f_13732},
{C_text("f_13742:irregex_2escm"),(void*)f_13742},
{C_text("f_13746:irregex_2escm"),(void*)f_13746},
{C_text("f_13750:irregex_2escm"),(void*)f_13750},
{C_text("f_13765:irregex_2escm"),(void*)f_13765},
{C_text("f_13773:irregex_2escm"),(void*)f_13773},
{C_text("f_13777:irregex_2escm"),(void*)f_13777},
{C_text("f_13796:irregex_2escm"),(void*)f_13796},
{C_text("f_13849:irregex_2escm"),(void*)f_13849},
{C_text("f_13863:irregex_2escm"),(void*)f_13863},
{C_text("f_13867:irregex_2escm"),(void*)f_13867},
{C_text("f_13871:irregex_2escm"),(void*)f_13871},
{C_text("f_13881:irregex_2escm"),(void*)f_13881},
{C_text("f_13939:irregex_2escm"),(void*)f_13939},
{C_text("f_13960:irregex_2escm"),(void*)f_13960},
{C_text("f_13963:irregex_2escm"),(void*)f_13963},
{C_text("f_14155:irregex_2escm"),(void*)f_14155},
{C_text("f_14193:irregex_2escm"),(void*)f_14193},
{C_text("f_14269:irregex_2escm"),(void*)f_14269},
{C_text("f_14410:irregex_2escm"),(void*)f_14410},
{C_text("f_14413:irregex_2escm"),(void*)f_14413},
{C_text("f_14434:irregex_2escm"),(void*)f_14434},
{C_text("f_14439:irregex_2escm"),(void*)f_14439},
{C_text("f_14471:irregex_2escm"),(void*)f_14471},
{C_text("f_14496:irregex_2escm"),(void*)f_14496},
{C_text("f_14500:irregex_2escm"),(void*)f_14500},
{C_text("f_14511:irregex_2escm"),(void*)f_14511},
{C_text("f_14519:irregex_2escm"),(void*)f_14519},
{C_text("f_14545:irregex_2escm"),(void*)f_14545},
{C_text("f_14575:irregex_2escm"),(void*)f_14575},
{C_text("f_14585:irregex_2escm"),(void*)f_14585},
{C_text("f_14593:irregex_2escm"),(void*)f_14593},
{C_text("f_14609:irregex_2escm"),(void*)f_14609},
{C_text("f_14611:irregex_2escm"),(void*)f_14611},
{C_text("f_14647:irregex_2escm"),(void*)f_14647},
{C_text("f_14683:irregex_2escm"),(void*)f_14683},
{C_text("f_14703:irregex_2escm"),(void*)f_14703},
{C_text("f_14705:irregex_2escm"),(void*)f_14705},
{C_text("f_14737:irregex_2escm"),(void*)f_14737},
{C_text("f_14744:irregex_2escm"),(void*)f_14744},
{C_text("f_14750:irregex_2escm"),(void*)f_14750},
{C_text("f_14766:irregex_2escm"),(void*)f_14766},
{C_text("f_14768:irregex_2escm"),(void*)f_14768},
{C_text("f_14808:irregex_2escm"),(void*)f_14808},
{C_text("f_14814:irregex_2escm"),(void*)f_14814},
{C_text("f_14822:irregex_2escm"),(void*)f_14822},
{C_text("f_14842:irregex_2escm"),(void*)f_14842},
{C_text("f_14844:irregex_2escm"),(void*)f_14844},
{C_text("f_14876:irregex_2escm"),(void*)f_14876},
{C_text("f_14883:irregex_2escm"),(void*)f_14883},
{C_text("f_14889:irregex_2escm"),(void*)f_14889},
{C_text("f_14905:irregex_2escm"),(void*)f_14905},
{C_text("f_14907:irregex_2escm"),(void*)f_14907},
{C_text("f_14947:irregex_2escm"),(void*)f_14947},
{C_text("f_14953:irregex_2escm"),(void*)f_14953},
{C_text("f_14972:irregex_2escm"),(void*)f_14972},
{C_text("f_14981:irregex_2escm"),(void*)f_14981},
{C_text("f_14993:irregex_2escm"),(void*)f_14993},
{C_text("f_15005:irregex_2escm"),(void*)f_15005},
{C_text("f_15011:irregex_2escm"),(void*)f_15011},
{C_text("f_15013:irregex_2escm"),(void*)f_15013},
{C_text("f_15061:irregex_2escm"),(void*)f_15061},
{C_text("f_15069:irregex_2escm"),(void*)f_15069},
{C_text("f_15076:irregex_2escm"),(void*)f_15076},
{C_text("f_15082:irregex_2escm"),(void*)f_15082},
{C_text("f_15114:irregex_2escm"),(void*)f_15114},
{C_text("f_15116:irregex_2escm"),(void*)f_15116},
{C_text("f_15166:irregex_2escm"),(void*)f_15166},
{C_text("f_15184:irregex_2escm"),(void*)f_15184},
{C_text("f_15209:irregex_2escm"),(void*)f_15209},
{C_text("f_15252:irregex_2escm"),(void*)f_15252},
{C_text("f_15254:irregex_2escm"),(void*)f_15254},
{C_text("f_15343:irregex_2escm"),(void*)f_15343},
{C_text("f_15345:irregex_2escm"),(void*)f_15345},
{C_text("f_15400:irregex_2escm"),(void*)f_15400},
{C_text("f_15408:irregex_2escm"),(void*)f_15408},
{C_text("f_15410:irregex_2escm"),(void*)f_15410},
{C_text("f_15424:irregex_2escm"),(void*)f_15424},
{C_text("f_15428:irregex_2escm"),(void*)f_15428},
{C_text("f_15446:irregex_2escm"),(void*)f_15446},
{C_text("f_15455:irregex_2escm"),(void*)f_15455},
{C_text("f_15470:irregex_2escm"),(void*)f_15470},
{C_text("f_15522:irregex_2escm"),(void*)f_15522},
{C_text("f_15525:irregex_2escm"),(void*)f_15525},
{C_text("f_15582:irregex_2escm"),(void*)f_15582},
{C_text("f_15593:irregex_2escm"),(void*)f_15593},
{C_text("f_15595:irregex_2escm"),(void*)f_15595},
{C_text("f_15620:irregex_2escm"),(void*)f_15620},
{C_text("f_15643:irregex_2escm"),(void*)f_15643},
{C_text("f_15654:irregex_2escm"),(void*)f_15654},
{C_text("f_15656:irregex_2escm"),(void*)f_15656},
{C_text("f_15681:irregex_2escm"),(void*)f_15681},
{C_text("f_15697:irregex_2escm"),(void*)f_15697},
{C_text("f_15706:irregex_2escm"),(void*)f_15706},
{C_text("f_15712:irregex_2escm"),(void*)f_15712},
{C_text("f_15722:irregex_2escm"),(void*)f_15722},
{C_text("f_15729:irregex_2escm"),(void*)f_15729},
{C_text("f_15764:irregex_2escm"),(void*)f_15764},
{C_text("f_15766:irregex_2escm"),(void*)f_15766},
{C_text("f_15791:irregex_2escm"),(void*)f_15791},
{C_text("f_15820:irregex_2escm"),(void*)f_15820},
{C_text("f_15822:irregex_2escm"),(void*)f_15822},
{C_text("f_15847:irregex_2escm"),(void*)f_15847},
{C_text("f_15905:irregex_2escm"),(void*)f_15905},
{C_text("f_15915:irregex_2escm"),(void*)f_15915},
{C_text("f_15918:irregex_2escm"),(void*)f_15918},
{C_text("f_15920:irregex_2escm"),(void*)f_15920},
{C_text("f_15967:irregex_2escm"),(void*)f_15967},
{C_text("f_15974:irregex_2escm"),(void*)f_15974},
{C_text("f_16028:irregex_2escm"),(void*)f_16028},
{C_text("f_16095:irregex_2escm"),(void*)f_16095},
{C_text("f_16103:irregex_2escm"),(void*)f_16103},
{C_text("f_16105:irregex_2escm"),(void*)f_16105},
{C_text("f_16109:irregex_2escm"),(void*)f_16109},
{C_text("f_16112:irregex_2escm"),(void*)f_16112},
{C_text("f_16115:irregex_2escm"),(void*)f_16115},
{C_text("f_16118:irregex_2escm"),(void*)f_16118},
{C_text("f_16124:irregex_2escm"),(void*)f_16124},
{C_text("f_16127:irregex_2escm"),(void*)f_16127},
{C_text("f_16130:irregex_2escm"),(void*)f_16130},
{C_text("f_16133:irregex_2escm"),(void*)f_16133},
{C_text("f_16136:irregex_2escm"),(void*)f_16136},
{C_text("f_16151:irregex_2escm"),(void*)f_16151},
{C_text("f_16165:irregex_2escm"),(void*)f_16165},
{C_text("f_16170:irregex_2escm"),(void*)f_16170},
{C_text("f_16196:irregex_2escm"),(void*)f_16196},
{C_text("f_16200:irregex_2escm"),(void*)f_16200},
{C_text("f_16238:irregex_2escm"),(void*)f_16238},
{C_text("f_16255:irregex_2escm"),(void*)f_16255},
{C_text("f_16298:irregex_2escm"),(void*)f_16298},
{C_text("f_16405:irregex_2escm"),(void*)f_16405},
{C_text("f_16428:irregex_2escm"),(void*)f_16428},
{C_text("f_16506:irregex_2escm"),(void*)f_16506},
{C_text("f_16551:irregex_2escm"),(void*)f_16551},
{C_text("f_16568:irregex_2escm"),(void*)f_16568},
{C_text("f_16640:irregex_2escm"),(void*)f_16640},
{C_text("f_16644:irregex_2escm"),(void*)f_16644},
{C_text("f_16681:irregex_2escm"),(void*)f_16681},
{C_text("f_16757:irregex_2escm"),(void*)f_16757},
{C_text("f_16761:irregex_2escm"),(void*)f_16761},
{C_text("f_16798:irregex_2escm"),(void*)f_16798},
{C_text("f_16811:irregex_2escm"),(void*)f_16811},
{C_text("f_16874:irregex_2escm"),(void*)f_16874},
{C_text("f_16900:irregex_2escm"),(void*)f_16900},
{C_text("f_16913:irregex_2escm"),(void*)f_16913},
{C_text("f_16919:irregex_2escm"),(void*)f_16919},
{C_text("f_16940:irregex_2escm"),(void*)f_16940},
{C_text("f_16946:irregex_2escm"),(void*)f_16946},
{C_text("f_16976:irregex_2escm"),(void*)f_16976},
{C_text("f_17013:irregex_2escm"),(void*)f_17013},
{C_text("f_17016:irregex_2escm"),(void*)f_17016},
{C_text("f_17023:irregex_2escm"),(void*)f_17023},
{C_text("f_17025:irregex_2escm"),(void*)f_17025},
{C_text("f_17028:irregex_2escm"),(void*)f_17028},
{C_text("f_17068:irregex_2escm"),(void*)f_17068},
{C_text("f_17084:irregex_2escm"),(void*)f_17084},
{C_text("f_17097:irregex_2escm"),(void*)f_17097},
{C_text("f_17104:irregex_2escm"),(void*)f_17104},
{C_text("f_17137:irregex_2escm"),(void*)f_17137},
{C_text("f_17167:irregex_2escm"),(void*)f_17167},
{C_text("f_17182:irregex_2escm"),(void*)f_17182},
{C_text("f_17219:irregex_2escm"),(void*)f_17219},
{C_text("f_17235:irregex_2escm"),(void*)f_17235},
{C_text("f_17239:irregex_2escm"),(void*)f_17239},
{C_text("f_17252:irregex_2escm"),(void*)f_17252},
{C_text("f_17275:irregex_2escm"),(void*)f_17275},
{C_text("f_17278:irregex_2escm"),(void*)f_17278},
{C_text("f_17285:irregex_2escm"),(void*)f_17285},
{C_text("f_17287:irregex_2escm"),(void*)f_17287},
{C_text("f_17301:irregex_2escm"),(void*)f_17301},
{C_text("f_17315:irregex_2escm"),(void*)f_17315},
{C_text("f_17340:irregex_2escm"),(void*)f_17340},
{C_text("f_17344:irregex_2escm"),(void*)f_17344},
{C_text("f_17421:irregex_2escm"),(void*)f_17421},
{C_text("f_17434:irregex_2escm"),(void*)f_17434},
{C_text("f_17470:irregex_2escm"),(void*)f_17470},
{C_text("f_17479:irregex_2escm"),(void*)f_17479},
{C_text("f_17579:irregex_2escm"),(void*)f_17579},
{C_text("f_17588:irregex_2escm"),(void*)f_17588},
{C_text("f_17606:irregex_2escm"),(void*)f_17606},
{C_text("f_17609:irregex_2escm"),(void*)f_17609},
{C_text("f_17627:irregex_2escm"),(void*)f_17627},
{C_text("f_17674:irregex_2escm"),(void*)f_17674},
{C_text("f_17748:irregex_2escm"),(void*)f_17748},
{C_text("f_17776:irregex_2escm"),(void*)f_17776},
{C_text("f_17801:irregex_2escm"),(void*)f_17801},
{C_text("f_17820:irregex_2escm"),(void*)f_17820},
{C_text("f_17841:irregex_2escm"),(void*)f_17841},
{C_text("f_17851:irregex_2escm"),(void*)f_17851},
{C_text("f_17859:irregex_2escm"),(void*)f_17859},
{C_text("f_18090:irregex_2escm"),(void*)f_18090},
{C_text("f_18113:irregex_2escm"),(void*)f_18113},
{C_text("f_18122:irregex_2escm"),(void*)f_18122},
{C_text("f_18145:irregex_2escm"),(void*)f_18145},
{C_text("f_18168:irregex_2escm"),(void*)f_18168},
{C_text("f_18241:irregex_2escm"),(void*)f_18241},
{C_text("f_18266:irregex_2escm"),(void*)f_18266},
{C_text("f_18301:irregex_2escm"),(void*)f_18301},
{C_text("f_18324:irregex_2escm"),(void*)f_18324},
{C_text("f_18328:irregex_2escm"),(void*)f_18328},
{C_text("f_18349:irregex_2escm"),(void*)f_18349},
{C_text("f_18451:irregex_2escm"),(void*)f_18451},
{C_text("f_18635:irregex_2escm"),(void*)f_18635},
{C_text("f_18657:irregex_2escm"),(void*)f_18657},
{C_text("f_18663:irregex_2escm"),(void*)f_18663},
{C_text("f_18667:irregex_2escm"),(void*)f_18667},
{C_text("f_18684:irregex_2escm"),(void*)f_18684},
{C_text("f_18717:irregex_2escm"),(void*)f_18717},
{C_text("f_18754:irregex_2escm"),(void*)f_18754},
{C_text("f_18756:irregex_2escm"),(void*)f_18756},
{C_text("f_18781:irregex_2escm"),(void*)f_18781},
{C_text("f_18849:irregex_2escm"),(void*)f_18849},
{C_text("f_18851:irregex_2escm"),(void*)f_18851},
{C_text("f_18855:irregex_2escm"),(void*)f_18855},
{C_text("f_18864:irregex_2escm"),(void*)f_18864},
{C_text("f_18870:irregex_2escm"),(void*)f_18870},
{C_text("f_18873:irregex_2escm"),(void*)f_18873},
{C_text("f_18941:irregex_2escm"),(void*)f_18941},
{C_text("f_18945:irregex_2escm"),(void*)f_18945},
{C_text("f_18948:irregex_2escm"),(void*)f_18948},
{C_text("f_18951:irregex_2escm"),(void*)f_18951},
{C_text("f_18954:irregex_2escm"),(void*)f_18954},
{C_text("f_18984:irregex_2escm"),(void*)f_18984},
{C_text("f_19003:irregex_2escm"),(void*)f_19003},
{C_text("f_19028:irregex_2escm"),(void*)f_19028},
{C_text("f_19045:irregex_2escm"),(void*)f_19045},
{C_text("f_19049:irregex_2escm"),(void*)f_19049},
{C_text("f_19054:irregex_2escm"),(void*)f_19054},
{C_text("f_19061:irregex_2escm"),(void*)f_19061},
{C_text("f_19084:irregex_2escm"),(void*)f_19084},
{C_text("f_19094:irregex_2escm"),(void*)f_19094},
{C_text("f_19115:irregex_2escm"),(void*)f_19115},
{C_text("f_19133:irregex_2escm"),(void*)f_19133},
{C_text("f_19139:irregex_2escm"),(void*)f_19139},
{C_text("f_19153:irregex_2escm"),(void*)f_19153},
{C_text("f_19159:irregex_2escm"),(void*)f_19159},
{C_text("f_19166:irregex_2escm"),(void*)f_19166},
{C_text("f_19196:irregex_2escm"),(void*)f_19196},
{C_text("f_19209:irregex_2escm"),(void*)f_19209},
{C_text("f_19216:irregex_2escm"),(void*)f_19216},
{C_text("f_19223:irregex_2escm"),(void*)f_19223},
{C_text("f_19225:irregex_2escm"),(void*)f_19225},
{C_text("f_19233:irregex_2escm"),(void*)f_19233},
{C_text("f_19237:irregex_2escm"),(void*)f_19237},
{C_text("f_19246:irregex_2escm"),(void*)f_19246},
{C_text("f_19252:irregex_2escm"),(void*)f_19252},
{C_text("f_19255:irregex_2escm"),(void*)f_19255},
{C_text("f_19323:irregex_2escm"),(void*)f_19323},
{C_text("f_19327:irregex_2escm"),(void*)f_19327},
{C_text("f_19330:irregex_2escm"),(void*)f_19330},
{C_text("f_19345:irregex_2escm"),(void*)f_19345},
{C_text("f_19368:irregex_2escm"),(void*)f_19368},
{C_text("f_19379:irregex_2escm"),(void*)f_19379},
{C_text("f_19415:irregex_2escm"),(void*)f_19415},
{C_text("f_19425:irregex_2escm"),(void*)f_19425},
{C_text("f_19431:irregex_2escm"),(void*)f_19431},
{C_text("f_19437:irregex_2escm"),(void*)f_19437},
{C_text("f_19447:irregex_2escm"),(void*)f_19447},
{C_text("f_19449:irregex_2escm"),(void*)f_19449},
{C_text("f_19459:irregex_2escm"),(void*)f_19459},
{C_text("f_19478:irregex_2escm"),(void*)f_19478},
{C_text("f_19491:irregex_2escm"),(void*)f_19491},
{C_text("f_19523:irregex_2escm"),(void*)f_19523},
{C_text("f_19546:irregex_2escm"),(void*)f_19546},
{C_text("f_19551:irregex_2escm"),(void*)f_19551},
{C_text("f_19558:irregex_2escm"),(void*)f_19558},
{C_text("f_19609:irregex_2escm"),(void*)f_19609},
{C_text("f_19616:irregex_2escm"),(void*)f_19616},
{C_text("f_19619:irregex_2escm"),(void*)f_19619},
{C_text("f_19624:irregex_2escm"),(void*)f_19624},
{C_text("f_19676:irregex_2escm"),(void*)f_19676},
{C_text("f_19691:irregex_2escm"),(void*)f_19691},
{C_text("f_19727:irregex_2escm"),(void*)f_19727},
{C_text("f_19737:irregex_2escm"),(void*)f_19737},
{C_text("f_19747:irregex_2escm"),(void*)f_19747},
{C_text("f_19749:irregex_2escm"),(void*)f_19749},
{C_text("f_19807:irregex_2escm"),(void*)f_19807},
{C_text("f_19835:irregex_2escm"),(void*)f_19835},
{C_text("f_19839:irregex_2escm"),(void*)f_19839},
{C_text("f_19844:irregex_2escm"),(void*)f_19844},
{C_text("f_19864:irregex_2escm"),(void*)f_19864},
{C_text("f_19866:irregex_2escm"),(void*)f_19866},
{C_text("f_19891:irregex_2escm"),(void*)f_19891},
{C_text("f_19903:irregex_2escm"),(void*)f_19903},
{C_text("f_19906:irregex_2escm"),(void*)f_19906},
{C_text("f_19919:irregex_2escm"),(void*)f_19919},
{C_text("f_19923:irregex_2escm"),(void*)f_19923},
{C_text("f_19926:irregex_2escm"),(void*)f_19926},
{C_text("f_19931:irregex_2escm"),(void*)f_19931},
{C_text("f_19941:irregex_2escm"),(void*)f_19941},
{C_text("f_19944:irregex_2escm"),(void*)f_19944},
{C_text("f_19954:irregex_2escm"),(void*)f_19954},
{C_text("f_19989:irregex_2escm"),(void*)f_19989},
{C_text("f_20041:irregex_2escm"),(void*)f_20041},
{C_text("f_20053:irregex_2escm"),(void*)f_20053},
{C_text("f_20077:irregex_2escm"),(void*)f_20077},
{C_text("f_20078:irregex_2escm"),(void*)f_20078},
{C_text("f_20107:irregex_2escm"),(void*)f_20107},
{C_text("f_20108:irregex_2escm"),(void*)f_20108},
{C_text("f_20142:irregex_2escm"),(void*)f_20142},
{C_text("f_20165:irregex_2escm"),(void*)f_20165},
{C_text("f_20201:irregex_2escm"),(void*)f_20201},
{C_text("f_20204:irregex_2escm"),(void*)f_20204},
{C_text("f_20243:irregex_2escm"),(void*)f_20243},
{C_text("f_20246:irregex_2escm"),(void*)f_20246},
{C_text("f_20271:irregex_2escm"),(void*)f_20271},
{C_text("f_20311:irregex_2escm"),(void*)f_20311},
{C_text("f_20339:irregex_2escm"),(void*)f_20339},
{C_text("f_20464:irregex_2escm"),(void*)f_20464},
{C_text("f_20498:irregex_2escm"),(void*)f_20498},
{C_text("f_20639:irregex_2escm"),(void*)f_20639},
{C_text("f_20643:irregex_2escm"),(void*)f_20643},
{C_text("f_20646:irregex_2escm"),(void*)f_20646},
{C_text("f_20648:irregex_2escm"),(void*)f_20648},
{C_text("f_20651:irregex_2escm"),(void*)f_20651},
{C_text("f_20661:irregex_2escm"),(void*)f_20661},
{C_text("f_20665:irregex_2escm"),(void*)f_20665},
{C_text("f_20674:irregex_2escm"),(void*)f_20674},
{C_text("f_20677:irregex_2escm"),(void*)f_20677},
{C_text("f_20686:irregex_2escm"),(void*)f_20686},
{C_text("f_20722:irregex_2escm"),(void*)f_20722},
{C_text("f_20733:irregex_2escm"),(void*)f_20733},
{C_text("f_20739:irregex_2escm"),(void*)f_20739},
{C_text("f_20756:irregex_2escm"),(void*)f_20756},
{C_text("f_20789:irregex_2escm"),(void*)f_20789},
{C_text("f_20795:irregex_2escm"),(void*)f_20795},
{C_text("f_20802:irregex_2escm"),(void*)f_20802},
{C_text("f_20813:irregex_2escm"),(void*)f_20813},
{C_text("f_20827:irregex_2escm"),(void*)f_20827},
{C_text("f_20845:irregex_2escm"),(void*)f_20845},
{C_text("f_20870:irregex_2escm"),(void*)f_20870},
{C_text("f_20897:irregex_2escm"),(void*)f_20897},
{C_text("f_20928:irregex_2escm"),(void*)f_20928},
{C_text("f_20935:irregex_2escm"),(void*)f_20935},
{C_text("f_20947:irregex_2escm"),(void*)f_20947},
{C_text("f_20977:irregex_2escm"),(void*)f_20977},
{C_text("f_20991:irregex_2escm"),(void*)f_20991},
{C_text("f_20994:irregex_2escm"),(void*)f_20994},
{C_text("f_21000:irregex_2escm"),(void*)f_21000},
{C_text("f_21014:irregex_2escm"),(void*)f_21014},
{C_text("f_21038:irregex_2escm"),(void*)f_21038},
{C_text("f_21041:irregex_2escm"),(void*)f_21041},
{C_text("f_21048:irregex_2escm"),(void*)f_21048},
{C_text("f_21065:irregex_2escm"),(void*)f_21065},
{C_text("f_21081:irregex_2escm"),(void*)f_21081},
{C_text("f_21084:irregex_2escm"),(void*)f_21084},
{C_text("f_21087:irregex_2escm"),(void*)f_21087},
{C_text("f_21093:irregex_2escm"),(void*)f_21093},
{C_text("f_21103:irregex_2escm"),(void*)f_21103},
{C_text("f_21114:irregex_2escm"),(void*)f_21114},
{C_text("f_21118:irregex_2escm"),(void*)f_21118},
{C_text("f_21122:irregex_2escm"),(void*)f_21122},
{C_text("f_21130:irregex_2escm"),(void*)f_21130},
{C_text("f_21138:irregex_2escm"),(void*)f_21138},
{C_text("f_21153:irregex_2escm"),(void*)f_21153},
{C_text("f_21159:irregex_2escm"),(void*)f_21159},
{C_text("f_21173:irregex_2escm"),(void*)f_21173},
{C_text("f_21187:irregex_2escm"),(void*)f_21187},
{C_text("f_21193:irregex_2escm"),(void*)f_21193},
{C_text("f_21196:irregex_2escm"),(void*)f_21196},
{C_text("f_21223:irregex_2escm"),(void*)f_21223},
{C_text("f_21227:irregex_2escm"),(void*)f_21227},
{C_text("f_21247:irregex_2escm"),(void*)f_21247},
{C_text("f_21253:irregex_2escm"),(void*)f_21253},
{C_text("f_21256:irregex_2escm"),(void*)f_21256},
{C_text("f_21259:irregex_2escm"),(void*)f_21259},
{C_text("f_21275:irregex_2escm"),(void*)f_21275},
{C_text("f_21283:irregex_2escm"),(void*)f_21283},
{C_text("f_21295:irregex_2escm"),(void*)f_21295},
{C_text("f_21325:irregex_2escm"),(void*)f_21325},
{C_text("f_21331:irregex_2escm"),(void*)f_21331},
{C_text("f_21334:irregex_2escm"),(void*)f_21334},
{C_text("f_21337:irregex_2escm"),(void*)f_21337},
{C_text("f_21353:irregex_2escm"),(void*)f_21353},
{C_text("f_21361:irregex_2escm"),(void*)f_21361},
{C_text("f_21369:irregex_2escm"),(void*)f_21369},
{C_text("f_21373:irregex_2escm"),(void*)f_21373},
{C_text("f_21392:irregex_2escm"),(void*)f_21392},
{C_text("f_21410:irregex_2escm"),(void*)f_21410},
{C_text("f_21538:irregex_2escm"),(void*)f_21538},
{C_text("f_21544:irregex_2escm"),(void*)f_21544},
{C_text("f_21547:irregex_2escm"),(void*)f_21547},
{C_text("f_21555:irregex_2escm"),(void*)f_21555},
{C_text("f_21594:irregex_2escm"),(void*)f_21594},
{C_text("f_21629:irregex_2escm"),(void*)f_21629},
{C_text("f_21636:irregex_2escm"),(void*)f_21636},
{C_text("f_21662:irregex_2escm"),(void*)f_21662},
{C_text("f_21758:irregex_2escm"),(void*)f_21758},
{C_text("f_21762:irregex_2escm"),(void*)f_21762},
{C_text("f_21775:irregex_2escm"),(void*)f_21775},
{C_text("f_21787:irregex_2escm"),(void*)f_21787},
{C_text("f_21791:irregex_2escm"),(void*)f_21791},
{C_text("f_21798:irregex_2escm"),(void*)f_21798},
{C_text("f_21804:irregex_2escm"),(void*)f_21804},
{C_text("f_21808:irregex_2escm"),(void*)f_21808},
{C_text("f_21811:irregex_2escm"),(void*)f_21811},
{C_text("f_21813:irregex_2escm"),(void*)f_21813},
{C_text("f_21820:irregex_2escm"),(void*)f_21820},
{C_text("f_21827:irregex_2escm"),(void*)f_21827},
{C_text("f_21862:irregex_2escm"),(void*)f_21862},
{C_text("f_21875:irregex_2escm"),(void*)f_21875},
{C_text("f_21976:irregex_2escm"),(void*)f_21976},
{C_text("f_21982:irregex_2escm"),(void*)f_21982},
{C_text("f_21988:irregex_2escm"),(void*)f_21988},
{C_text("f_22041:irregex_2escm"),(void*)f_22041},
{C_text("f_22112:irregex_2escm"),(void*)f_22112},
{C_text("f_22165:irregex_2escm"),(void*)f_22165},
{C_text("f_22174:irregex_2escm"),(void*)f_22174},
{C_text("f_22194:irregex_2escm"),(void*)f_22194},
{C_text("f_22223:irregex_2escm"),(void*)f_22223},
{C_text("f_22247:irregex_2escm"),(void*)f_22247},
{C_text("f_22254:irregex_2escm"),(void*)f_22254},
{C_text("f_22257:irregex_2escm"),(void*)f_22257},
{C_text("f_22260:irregex_2escm"),(void*)f_22260},
{C_text("f_22263:irregex_2escm"),(void*)f_22263},
{C_text("f_22279:irregex_2escm"),(void*)f_22279},
{C_text("f_22296:irregex_2escm"),(void*)f_22296},
{C_text("f_22331:irregex_2escm"),(void*)f_22331},
{C_text("f_22335:irregex_2escm"),(void*)f_22335},
{C_text("f_22363:irregex_2escm"),(void*)f_22363},
{C_text("f_22366:irregex_2escm"),(void*)f_22366},
{C_text("f_22372:irregex_2escm"),(void*)f_22372},
{C_text("f_22458:irregex_2escm"),(void*)f_22458},
{C_text("f_22461:irregex_2escm"),(void*)f_22461},
{C_text("f_22466:irregex_2escm"),(void*)f_22466},
{C_text("f_22476:irregex_2escm"),(void*)f_22476},
{C_text("f_22479:irregex_2escm"),(void*)f_22479},
{C_text("f_22499:irregex_2escm"),(void*)f_22499},
{C_text("f_22507:irregex_2escm"),(void*)f_22507},
{C_text("f_22540:irregex_2escm"),(void*)f_22540},
{C_text("f_22542:irregex_2escm"),(void*)f_22542},
{C_text("f_22567:irregex_2escm"),(void*)f_22567},
{C_text("f_22580:irregex_2escm"),(void*)f_22580},
{C_text("f_22619:irregex_2escm"),(void*)f_22619},
{C_text("f_22634:irregex_2escm"),(void*)f_22634},
{C_text("f_22655:irregex_2escm"),(void*)f_22655},
{C_text("f_22673:irregex_2escm"),(void*)f_22673},
{C_text("f_22682:irregex_2escm"),(void*)f_22682},
{C_text("f_22696:irregex_2escm"),(void*)f_22696},
{C_text("f_22700:irregex_2escm"),(void*)f_22700},
{C_text("f_22703:irregex_2escm"),(void*)f_22703},
{C_text("f_22709:irregex_2escm"),(void*)f_22709},
{C_text("f_22712:irregex_2escm"),(void*)f_22712},
{C_text("f_22715:irregex_2escm"),(void*)f_22715},
{C_text("f_22732:irregex_2escm"),(void*)f_22732},
{C_text("f_22804:irregex_2escm"),(void*)f_22804},
{C_text("f_22808:irregex_2escm"),(void*)f_22808},
{C_text("f_22812:irregex_2escm"),(void*)f_22812},
{C_text("f_22814:irregex_2escm"),(void*)f_22814},
{C_text("f_22837:irregex_2escm"),(void*)f_22837},
{C_text("f_22866:irregex_2escm"),(void*)f_22866},
{C_text("f_22870:irregex_2escm"),(void*)f_22870},
{C_text("f_22894:irregex_2escm"),(void*)f_22894},
{C_text("f_22922:irregex_2escm"),(void*)f_22922},
{C_text("f_22932:irregex_2escm"),(void*)f_22932},
{C_text("f_22942:irregex_2escm"),(void*)f_22942},
{C_text("f_22947:irregex_2escm"),(void*)f_22947},
{C_text("f_22962:irregex_2escm"),(void*)f_22962},
{C_text("f_22982:irregex_2escm"),(void*)f_22982},
{C_text("f_23005:irregex_2escm"),(void*)f_23005},
{C_text("f_23037:irregex_2escm"),(void*)f_23037},
{C_text("f_23044:irregex_2escm"),(void*)f_23044},
{C_text("f_23046:irregex_2escm"),(void*)f_23046},
{C_text("f_23070:irregex_2escm"),(void*)f_23070},
{C_text("f_23114:irregex_2escm"),(void*)f_23114},
{C_text("f_23127:irregex_2escm"),(void*)f_23127},
{C_text("f_23141:irregex_2escm"),(void*)f_23141},
{C_text("f_23168:irregex_2escm"),(void*)f_23168},
{C_text("f_23249:irregex_2escm"),(void*)f_23249},
{C_text("f_23265:irregex_2escm"),(void*)f_23265},
{C_text("f_23275:irregex_2escm"),(void*)f_23275},
{C_text("f_23284:irregex_2escm"),(void*)f_23284},
{C_text("f_23324:irregex_2escm"),(void*)f_23324},
{C_text("f_23327:irregex_2escm"),(void*)f_23327},
{C_text("f_23350:irregex_2escm"),(void*)f_23350},
{C_text("f_23366:irregex_2escm"),(void*)f_23366},
{C_text("f_23373:irregex_2escm"),(void*)f_23373},
{C_text("f_23393:irregex_2escm"),(void*)f_23393},
{C_text("f_23413:irregex_2escm"),(void*)f_23413},
{C_text("f_23416:irregex_2escm"),(void*)f_23416},
{C_text("f_23417:irregex_2escm"),(void*)f_23417},
{C_text("f_23423:irregex_2escm"),(void*)f_23423},
{C_text("f_23439:irregex_2escm"),(void*)f_23439},
{C_text("f_23567:irregex_2escm"),(void*)f_23567},
{C_text("f_23586:irregex_2escm"),(void*)f_23586},
{C_text("f_23609:irregex_2escm"),(void*)f_23609},
{C_text("f_23610:irregex_2escm"),(void*)f_23610},
{C_text("f_23616:irregex_2escm"),(void*)f_23616},
{C_text("f_23635:irregex_2escm"),(void*)f_23635},
{C_text("f_23636:irregex_2escm"),(void*)f_23636},
{C_text("f_23642:irregex_2escm"),(void*)f_23642},
{C_text("f_23664:irregex_2escm"),(void*)f_23664},
{C_text("f_23670:irregex_2escm"),(void*)f_23670},
{C_text("f_23671:irregex_2escm"),(void*)f_23671},
{C_text("f_23677:irregex_2escm"),(void*)f_23677},
{C_text("f_23709:irregex_2escm"),(void*)f_23709},
{C_text("f_23715:irregex_2escm"),(void*)f_23715},
{C_text("f_23717:irregex_2escm"),(void*)f_23717},
{C_text("f_23723:irregex_2escm"),(void*)f_23723},
{C_text("f_23733:irregex_2escm"),(void*)f_23733},
{C_text("f_23739:irregex_2escm"),(void*)f_23739},
{C_text("f_23763:irregex_2escm"),(void*)f_23763},
{C_text("f_23769:irregex_2escm"),(void*)f_23769},
{C_text("f_23776:irregex_2escm"),(void*)f_23776},
{C_text("f_23782:irregex_2escm"),(void*)f_23782},
{C_text("f_23865:irregex_2escm"),(void*)f_23865},
{C_text("f_23868:irregex_2escm"),(void*)f_23868},
{C_text("f_23869:irregex_2escm"),(void*)f_23869},
{C_text("f_23882:irregex_2escm"),(void*)f_23882},
{C_text("f_23888:irregex_2escm"),(void*)f_23888},
{C_text("f_23901:irregex_2escm"),(void*)f_23901},
{C_text("f_23906:irregex_2escm"),(void*)f_23906},
{C_text("f_23937:irregex_2escm"),(void*)f_23937},
{C_text("f_23941:irregex_2escm"),(void*)f_23941},
{C_text("f_23946:irregex_2escm"),(void*)f_23946},
{C_text("f_24017:irregex_2escm"),(void*)f_24017},
{C_text("f_24020:irregex_2escm"),(void*)f_24020},
{C_text("f_24021:irregex_2escm"),(void*)f_24021},
{C_text("f_24034:irregex_2escm"),(void*)f_24034},
{C_text("f_24040:irregex_2escm"),(void*)f_24040},
{C_text("f_24050:irregex_2escm"),(void*)f_24050},
{C_text("f_24062:irregex_2escm"),(void*)f_24062},
{C_text("f_24075:irregex_2escm"),(void*)f_24075},
{C_text("f_24096:irregex_2escm"),(void*)f_24096},
{C_text("f_24106:irregex_2escm"),(void*)f_24106},
{C_text("f_24110:irregex_2escm"),(void*)f_24110},
{C_text("f_24116:irregex_2escm"),(void*)f_24116},
{C_text("f_24188:irregex_2escm"),(void*)f_24188},
{C_text("f_24238:irregex_2escm"),(void*)f_24238},
{C_text("f_24251:irregex_2escm"),(void*)f_24251},
{C_text("f_24252:irregex_2escm"),(void*)f_24252},
{C_text("f_24259:irregex_2escm"),(void*)f_24259},
{C_text("f_24267:irregex_2escm"),(void*)f_24267},
{C_text("f_24274:irregex_2escm"),(void*)f_24274},
{C_text("f_24286:irregex_2escm"),(void*)f_24286},
{C_text("f_24287:irregex_2escm"),(void*)f_24287},
{C_text("f_24294:irregex_2escm"),(void*)f_24294},
{C_text("f_24302:irregex_2escm"),(void*)f_24302},
{C_text("f_24309:irregex_2escm"),(void*)f_24309},
{C_text("f_24324:irregex_2escm"),(void*)f_24324},
{C_text("f_24325:irregex_2escm"),(void*)f_24325},
{C_text("f_24329:irregex_2escm"),(void*)f_24329},
{C_text("f_24335:irregex_2escm"),(void*)f_24335},
{C_text("f_24342:irregex_2escm"),(void*)f_24342},
{C_text("f_24351:irregex_2escm"),(void*)f_24351},
{C_text("f_24361:irregex_2escm"),(void*)f_24361},
{C_text("f_24365:irregex_2escm"),(void*)f_24365},
{C_text("f_24370:irregex_2escm"),(void*)f_24370},
{C_text("f_24387:irregex_2escm"),(void*)f_24387},
{C_text("f_24396:irregex_2escm"),(void*)f_24396},
{C_text("f_24407:irregex_2escm"),(void*)f_24407},
{C_text("f_24408:irregex_2escm"),(void*)f_24408},
{C_text("f_24412:irregex_2escm"),(void*)f_24412},
{C_text("f_24423:irregex_2escm"),(void*)f_24423},
{C_text("f_24430:irregex_2escm"),(void*)f_24430},
{C_text("f_24442:irregex_2escm"),(void*)f_24442},
{C_text("f_24445:irregex_2escm"),(void*)f_24445},
{C_text("f_24448:irregex_2escm"),(void*)f_24448},
{C_text("f_24457:irregex_2escm"),(void*)f_24457},
{C_text("f_24460:irregex_2escm"),(void*)f_24460},
{C_text("f_24461:irregex_2escm"),(void*)f_24461},
{C_text("f_24518:irregex_2escm"),(void*)f_24518},
{C_text("f_24519:irregex_2escm"),(void*)f_24519},
{C_text("f_24525:irregex_2escm"),(void*)f_24525},
{C_text("f_24561:irregex_2escm"),(void*)f_24561},
{C_text("f_24566:irregex_2escm"),(void*)f_24566},
{C_text("f_24598:irregex_2escm"),(void*)f_24598},
{C_text("f_24601:irregex_2escm"),(void*)f_24601},
{C_text("f_24602:irregex_2escm"),(void*)f_24602},
{C_text("f_24606:irregex_2escm"),(void*)f_24606},
{C_text("f_24624:irregex_2escm"),(void*)f_24624},
{C_text("f_24637:irregex_2escm"),(void*)f_24637},
{C_text("f_24651:irregex_2escm"),(void*)f_24651},
{C_text("f_24655:irregex_2escm"),(void*)f_24655},
{C_text("f_24669:irregex_2escm"),(void*)f_24669},
{C_text("f_24675:irregex_2escm"),(void*)f_24675},
{C_text("f_24688:irregex_2escm"),(void*)f_24688},
{C_text("f_24695:irregex_2escm"),(void*)f_24695},
{C_text("f_24702:irregex_2escm"),(void*)f_24702},
{C_text("f_24724:irregex_2escm"),(void*)f_24724},
{C_text("f_24728:irregex_2escm"),(void*)f_24728},
{C_text("f_24815:irregex_2escm"),(void*)f_24815},
{C_text("f_24816:irregex_2escm"),(void*)f_24816},
{C_text("f_24864:irregex_2escm"),(void*)f_24864},
{C_text("f_24924:irregex_2escm"),(void*)f_24924},
{C_text("f_24959:irregex_2escm"),(void*)f_24959},
{C_text("f_25159:irregex_2escm"),(void*)f_25159},
{C_text("f_25179:irregex_2escm"),(void*)f_25179},
{C_text("f_25188:irregex_2escm"),(void*)f_25188},
{C_text("f_25194:irregex_2escm"),(void*)f_25194},
{C_text("f_25200:irregex_2escm"),(void*)f_25200},
{C_text("f_25217:irregex_2escm"),(void*)f_25217},
{C_text("f_25254:irregex_2escm"),(void*)f_25254},
{C_text("f_25263:irregex_2escm"),(void*)f_25263},
{C_text("f_25269:irregex_2escm"),(void*)f_25269},
{C_text("f_25275:irregex_2escm"),(void*)f_25275},
{C_text("f_25309:irregex_2escm"),(void*)f_25309},
{C_text("f_25339:irregex_2escm"),(void*)f_25339},
{C_text("f_25349:irregex_2escm"),(void*)f_25349},
{C_text("f_25380:irregex_2escm"),(void*)f_25380},
{C_text("f_25397:irregex_2escm"),(void*)f_25397},
{C_text("f_25404:irregex_2escm"),(void*)f_25404},
{C_text("f_25413:irregex_2escm"),(void*)f_25413},
{C_text("f_25432:irregex_2escm"),(void*)f_25432},
{C_text("f_25449:irregex_2escm"),(void*)f_25449},
{C_text("f_25456:irregex_2escm"),(void*)f_25456},
{C_text("f_25477:irregex_2escm"),(void*)f_25477},
{C_text("f_25497:irregex_2escm"),(void*)f_25497},
{C_text("f_25504:irregex_2escm"),(void*)f_25504},
{C_text("f_25511:irregex_2escm"),(void*)f_25511},
{C_text("f_25530:irregex_2escm"),(void*)f_25530},
{C_text("f_25537:irregex_2escm"),(void*)f_25537},
{C_text("f_25544:irregex_2escm"),(void*)f_25544},
{C_text("f_25567:irregex_2escm"),(void*)f_25567},
{C_text("f_25588:irregex_2escm"),(void*)f_25588},
{C_text("f_25595:irregex_2escm"),(void*)f_25595},
{C_text("f_25602:irregex_2escm"),(void*)f_25602},
{C_text("f_25609:irregex_2escm"),(void*)f_25609},
{C_text("f_25618:irregex_2escm"),(void*)f_25618},
{C_text("f_25638:irregex_2escm"),(void*)f_25638},
{C_text("f_25654:irregex_2escm"),(void*)f_25654},
{C_text("f_25671:irregex_2escm"),(void*)f_25671},
{C_text("f_25691:irregex_2escm"),(void*)f_25691},
{C_text("f_25695:irregex_2escm"),(void*)f_25695},
{C_text("f_25698:irregex_2escm"),(void*)f_25698},
{C_text("f_25704:irregex_2escm"),(void*)f_25704},
{C_text("f_25749:irregex_2escm"),(void*)f_25749},
{C_text("f_25813:irregex_2escm"),(void*)f_25813},
{C_text("f_25830:irregex_2escm"),(void*)f_25830},
{C_text("f_25832:irregex_2escm"),(void*)f_25832},
{C_text("f_25842:irregex_2escm"),(void*)f_25842},
{C_text("f_25848:irregex_2escm"),(void*)f_25848},
{C_text("f_25854:irregex_2escm"),(void*)f_25854},
{C_text("f_25870:irregex_2escm"),(void*)f_25870},
{C_text("f_25876:irregex_2escm"),(void*)f_25876},
{C_text("f_25898:irregex_2escm"),(void*)f_25898},
{C_text("f_25912:irregex_2escm"),(void*)f_25912},
{C_text("f_25929:irregex_2escm"),(void*)f_25929},
{C_text("f_25931:irregex_2escm"),(void*)f_25931},
{C_text("f_25941:irregex_2escm"),(void*)f_25941},
{C_text("f_25947:irregex_2escm"),(void*)f_25947},
{C_text("f_25953:irregex_2escm"),(void*)f_25953},
{C_text("f_25969:irregex_2escm"),(void*)f_25969},
{C_text("f_26027:irregex_2escm"),(void*)f_26027},
{C_text("f_26053:irregex_2escm"),(void*)f_26053},
{C_text("f_26055:irregex_2escm"),(void*)f_26055},
{C_text("f_26068:irregex_2escm"),(void*)f_26068},
{C_text("f_26087:irregex_2escm"),(void*)f_26087},
{C_text("f_26096:irregex_2escm"),(void*)f_26096},
{C_text("f_26102:irregex_2escm"),(void*)f_26102},
{C_text("f_26108:irregex_2escm"),(void*)f_26108},
{C_text("f_26114:irregex_2escm"),(void*)f_26114},
{C_text("f_26266:irregex_2escm"),(void*)f_26266},
{C_text("f_26278:irregex_2escm"),(void*)f_26278},
{C_text("f_26328:irregex_2escm"),(void*)f_26328},
{C_text("f_26346:irregex_2escm"),(void*)f_26346},
{C_text("f_26357:irregex_2escm"),(void*)f_26357},
{C_text("f_26363:irregex_2escm"),(void*)f_26363},
{C_text("f_26375:irregex_2escm"),(void*)f_26375},
{C_text("f_26377:irregex_2escm"),(void*)f_26377},
{C_text("f_26387:irregex_2escm"),(void*)f_26387},
{C_text("f_26390:irregex_2escm"),(void*)f_26390},
{C_text("f_26416:irregex_2escm"),(void*)f_26416},
{C_text("f_26437:irregex_2escm"),(void*)f_26437},
{C_text("f_26441:irregex_2escm"),(void*)f_26441},
{C_text("f_26454:irregex_2escm"),(void*)f_26454},
{C_text("f_26456:irregex_2escm"),(void*)f_26456},
{C_text("f_26481:irregex_2escm"),(void*)f_26481},
{C_text("f_26505:irregex_2escm"),(void*)f_26505},
{C_text("f_26518:irregex_2escm"),(void*)f_26518},
{C_text("f_26520:irregex_2escm"),(void*)f_26520},
{C_text("f_26545:irregex_2escm"),(void*)f_26545},
{C_text("f_26567:irregex_2escm"),(void*)f_26567},
{C_text("f_26575:irregex_2escm"),(void*)f_26575},
{C_text("f_26588:irregex_2escm"),(void*)f_26588},
{C_text("f_26590:irregex_2escm"),(void*)f_26590},
{C_text("f_26615:irregex_2escm"),(void*)f_26615},
{C_text("f_26635:irregex_2escm"),(void*)f_26635},
{C_text("f_26645:irregex_2escm"),(void*)f_26645},
{C_text("f_26660:irregex_2escm"),(void*)f_26660},
{C_text("f_26673:irregex_2escm"),(void*)f_26673},
{C_text("f_26675:irregex_2escm"),(void*)f_26675},
{C_text("f_26700:irregex_2escm"),(void*)f_26700},
{C_text("f_26822:irregex_2escm"),(void*)f_26822},
{C_text("f_26824:irregex_2escm"),(void*)f_26824},
{C_text("f_26842:irregex_2escm"),(void*)f_26842},
{C_text("f_26844:irregex_2escm"),(void*)f_26844},
{C_text("f_26877:irregex_2escm"),(void*)f_26877},
{C_text("f_26929:irregex_2escm"),(void*)f_26929},
{C_text("f_26965:irregex_2escm"),(void*)f_26965},
{C_text("f_26973:irregex_2escm"),(void*)f_26973},
{C_text("f_26977:irregex_2escm"),(void*)f_26977},
{C_text("f_26979:irregex_2escm"),(void*)f_26979},
{C_text("f_26993:irregex_2escm"),(void*)f_26993},
{C_text("f_26997:irregex_2escm"),(void*)f_26997},
{C_text("f_27001:irregex_2escm"),(void*)f_27001},
{C_text("f_27014:irregex_2escm"),(void*)f_27014},
{C_text("f_27018:irregex_2escm"),(void*)f_27018},
{C_text("f_27022:irregex_2escm"),(void*)f_27022},
{C_text("f_27160:irregex_2escm"),(void*)f_27160},
{C_text("f_27168:irregex_2escm"),(void*)f_27168},
{C_text("f_27172:irregex_2escm"),(void*)f_27172},
{C_text("f_27174:irregex_2escm"),(void*)f_27174},
{C_text("f_27188:irregex_2escm"),(void*)f_27188},
{C_text("f_27201:irregex_2escm"),(void*)f_27201},
{C_text("f_27205:irregex_2escm"),(void*)f_27205},
{C_text("f_27251:irregex_2escm"),(void*)f_27251},
{C_text("f_27254:irregex_2escm"),(void*)f_27254},
{C_text("f_27261:irregex_2escm"),(void*)f_27261},
{C_text("f_27356:irregex_2escm"),(void*)f_27356},
{C_text("f_27364:irregex_2escm"),(void*)f_27364},
{C_text("f_27368:irregex_2escm"),(void*)f_27368},
{C_text("f_27370:irregex_2escm"),(void*)f_27370},
{C_text("f_27387:irregex_2escm"),(void*)f_27387},
{C_text("f_27482:irregex_2escm"),(void*)f_27482},
{C_text("f_27490:irregex_2escm"),(void*)f_27490},
{C_text("f_27492:irregex_2escm"),(void*)f_27492},
{C_text("f_27500:irregex_2escm"),(void*)f_27500},
{C_text("f_27502:irregex_2escm"),(void*)f_27502},
{C_text("f_27516:irregex_2escm"),(void*)f_27516},
{C_text("f_27522:irregex_2escm"),(void*)f_27522},
{C_text("f_27531:irregex_2escm"),(void*)f_27531},
{C_text("f_27535:irregex_2escm"),(void*)f_27535},
{C_text("f_27539:irregex_2escm"),(void*)f_27539},
{C_text("f_27543:irregex_2escm"),(void*)f_27543},
{C_text("f_27567:irregex_2escm"),(void*)f_27567},
{C_text("f_27577:irregex_2escm"),(void*)f_27577},
{C_text("f_27586:irregex_2escm"),(void*)f_27586},
{C_text("f_27590:irregex_2escm"),(void*)f_27590},
{C_text("f_27594:irregex_2escm"),(void*)f_27594},
{C_text("f_27598:irregex_2escm"),(void*)f_27598},
{C_text("f_27608:irregex_2escm"),(void*)f_27608},
{C_text("f_27623:irregex_2escm"),(void*)f_27623},
{C_text("f_27627:irregex_2escm"),(void*)f_27627},
{C_text("f_27630:irregex_2escm"),(void*)f_27630},
{C_text("f_27633:irregex_2escm"),(void*)f_27633},
{C_text("f_27642:irregex_2escm"),(void*)f_27642},
{C_text("f_27645:irregex_2escm"),(void*)f_27645},
{C_text("f_27654:irregex_2escm"),(void*)f_27654},
{C_text("f_27657:irregex_2escm"),(void*)f_27657},
{C_text("f_27665:irregex_2escm"),(void*)f_27665},
{C_text("f_27678:irregex_2escm"),(void*)f_27678},
{C_text("f_27693:irregex_2escm"),(void*)f_27693},
{C_text("f_27696:irregex_2escm"),(void*)f_27696},
{C_text("f_27808:irregex_2escm"),(void*)f_27808},
{C_text("f_27825:irregex_2escm"),(void*)f_27825},
{C_text("f_27829:irregex_2escm"),(void*)f_27829},
{C_text("f_27830:irregex_2escm"),(void*)f_27830},
{C_text("f_27838:irregex_2escm"),(void*)f_27838},
{C_text("f_27853:irregex_2escm"),(void*)f_27853},
{C_text("f_27857:irregex_2escm"),(void*)f_27857},
{C_text("f_27860:irregex_2escm"),(void*)f_27860},
{C_text("f_27869:irregex_2escm"),(void*)f_27869},
{C_text("f_27875:irregex_2escm"),(void*)f_27875},
{C_text("f_27883:irregex_2escm"),(void*)f_27883},
{C_text("f_27896:irregex_2escm"),(void*)f_27896},
{C_text("f_27946:irregex_2escm"),(void*)f_27946},
{C_text("f_27956:irregex_2escm"),(void*)f_27956},
{C_text("f_27970:irregex_2escm"),(void*)f_27970},
{C_text("f_27973:irregex_2escm"),(void*)f_27973},
{C_text("f_27976:irregex_2escm"),(void*)f_27976},
{C_text("f_28028:irregex_2escm"),(void*)f_28028},
{C_text("f_28035:irregex_2escm"),(void*)f_28035},
{C_text("f_28039:irregex_2escm"),(void*)f_28039},
{C_text("f_28040:irregex_2escm"),(void*)f_28040},
{C_text("f_28048:irregex_2escm"),(void*)f_28048},
{C_text("f_28063:irregex_2escm"),(void*)f_28063},
{C_text("f_28067:irregex_2escm"),(void*)f_28067},
{C_text("f_28070:irregex_2escm"),(void*)f_28070},
{C_text("f_28084:irregex_2escm"),(void*)f_28084},
{C_text("f_28088:irregex_2escm"),(void*)f_28088},
{C_text("f_28092:irregex_2escm"),(void*)f_28092},
{C_text("f_28100:irregex_2escm"),(void*)f_28100},
{C_text("f_28142:irregex_2escm"),(void*)f_28142},
{C_text("f_28146:irregex_2escm"),(void*)f_28146},
{C_text("f_28151:irregex_2escm"),(void*)f_28151},
{C_text("f_28175:irregex_2escm"),(void*)f_28175},
{C_text("f_28188:irregex_2escm"),(void*)f_28188},
{C_text("f_28206:irregex_2escm"),(void*)f_28206},
{C_text("f_28213:irregex_2escm"),(void*)f_28213},
{C_text("f_28221:irregex_2escm"),(void*)f_28221},
{C_text("f_28223:irregex_2escm"),(void*)f_28223},
{C_text("f_28244:irregex_2escm"),(void*)f_28244},
{C_text("f_28256:irregex_2escm"),(void*)f_28256},
{C_text("f_28262:irregex_2escm"),(void*)f_28262},
{C_text("f_28289:irregex_2escm"),(void*)f_28289},
{C_text("f_28314:irregex_2escm"),(void*)f_28314},
{C_text("f_28340:irregex_2escm"),(void*)f_28340},
{C_text("f_28404:irregex_2escm"),(void*)f_28404},
{C_text("f_28436:irregex_2escm"),(void*)f_28436},
{C_text("f_28466:irregex_2escm"),(void*)f_28466},
{C_text("f_28487:irregex_2escm"),(void*)f_28487},
{C_text("f_28491:irregex_2escm"),(void*)f_28491},
{C_text("f_28496:irregex_2escm"),(void*)f_28496},
{C_text("f_28504:irregex_2escm"),(void*)f_28504},
{C_text("f_28506:irregex_2escm"),(void*)f_28506},
{C_text("f_28522:irregex_2escm"),(void*)f_28522},
{C_text("f_28526:irregex_2escm"),(void*)f_28526},
{C_text("f_28532:irregex_2escm"),(void*)f_28532},
{C_text("f_28537:irregex_2escm"),(void*)f_28537},
{C_text("f_28564:irregex_2escm"),(void*)f_28564},
{C_text("f_28612:irregex_2escm"),(void*)f_28612},
{C_text("f_28620:irregex_2escm"),(void*)f_28620},
{C_text("f_28622:irregex_2escm"),(void*)f_28622},
{C_text("f_28663:irregex_2escm"),(void*)f_28663},
{C_text("f_28703:irregex_2escm"),(void*)f_28703},
{C_text("f_28737:irregex_2escm"),(void*)f_28737},
{C_text("f_28750:irregex_2escm"),(void*)f_28750},
{C_text("f_28780:irregex_2escm"),(void*)f_28780},
{C_text("f_28788:irregex_2escm"),(void*)f_28788},
{C_text("f_28792:irregex_2escm"),(void*)f_28792},
{C_text("f_28794:irregex_2escm"),(void*)f_28794},
{C_text("f_28813:irregex_2escm"),(void*)f_28813},
{C_text("f_28837:irregex_2escm"),(void*)f_28837},
{C_text("f_28854:irregex_2escm"),(void*)f_28854},
{C_text("f_28861:irregex_2escm"),(void*)f_28861},
{C_text("f_28884:irregex_2escm"),(void*)f_28884},
{C_text("f_28905:irregex_2escm"),(void*)f_28905},
{C_text("f_28907:irregex_2escm"),(void*)f_28907},
{C_text("f_28917:irregex_2escm"),(void*)f_28917},
{C_text("f_28944:irregex_2escm"),(void*)f_28944},
{C_text("f_28974:irregex_2escm"),(void*)f_28974},
{C_text("f_28979:irregex_2escm"),(void*)f_28979},
{C_text("f_28991:irregex_2escm"),(void*)f_28991},
{C_text("f_29011:irregex_2escm"),(void*)f_29011},
{C_text("f_29046:irregex_2escm"),(void*)f_29046},
{C_text("f_29054:irregex_2escm"),(void*)f_29054},
{C_text("f_29090:irregex_2escm"),(void*)f_29090},
{C_text("f_29104:irregex_2escm"),(void*)f_29104},
{C_text("f_29108:irregex_2escm"),(void*)f_29108},
{C_text("f_29111:irregex_2escm"),(void*)f_29111},
{C_text("f_29116:irregex_2escm"),(void*)f_29116},
{C_text("f_29126:irregex_2escm"),(void*)f_29126},
{C_text("f_29137:irregex_2escm"),(void*)f_29137},
{C_text("f_29140:irregex_2escm"),(void*)f_29140},
{C_text("f_29147:irregex_2escm"),(void*)f_29147},
{C_text("f_29159:irregex_2escm"),(void*)f_29159},
{C_text("f_29174:irregex_2escm"),(void*)f_29174},
{C_text("f_29184:irregex_2escm"),(void*)f_29184},
{C_text("f_29188:irregex_2escm"),(void*)f_29188},
{C_text("f_29191:irregex_2escm"),(void*)f_29191},
{C_text("f_29196:irregex_2escm"),(void*)f_29196},
{C_text("f_29219:irregex_2escm"),(void*)f_29219},
{C_text("f_29222:irregex_2escm"),(void*)f_29222},
{C_text("f_29229:irregex_2escm"),(void*)f_29229},
{C_text("f_29234:irregex_2escm"),(void*)f_29234},
{C_text("f_29244:irregex_2escm"),(void*)f_29244},
{C_text("f_29264:irregex_2escm"),(void*)f_29264},
{C_text("f_29274:irregex_2escm"),(void*)f_29274},
{C_text("f_29316:irregex_2escm"),(void*)f_29316},
{C_text("f_29323:irregex_2escm"),(void*)f_29323},
{C_text("f_29328:irregex_2escm"),(void*)f_29328},
{C_text("f_29338:irregex_2escm"),(void*)f_29338},
{C_text("f_29358:irregex_2escm"),(void*)f_29358},
{C_text("f_29361:irregex_2escm"),(void*)f_29361},
{C_text("f_29364:irregex_2escm"),(void*)f_29364},
{C_text("f_29373:irregex_2escm"),(void*)f_29373},
{C_text("f_29378:irregex_2escm"),(void*)f_29378},
{C_text("f_29388:irregex_2escm"),(void*)f_29388},
{C_text("f_29412:irregex_2escm"),(void*)f_29412},
{C_text("f_29415:irregex_2escm"),(void*)f_29415},
{C_text("f_29416:irregex_2escm"),(void*)f_29416},
{C_text("f_29420:irregex_2escm"),(void*)f_29420},
{C_text("f_29432:irregex_2escm"),(void*)f_29432},
{C_text("f_29437:irregex_2escm"),(void*)f_29437},
{C_text("f_29447:irregex_2escm"),(void*)f_29447},
{C_text("f_29471:irregex_2escm"),(void*)f_29471},
{C_text("f_29474:irregex_2escm"),(void*)f_29474},
{C_text("f_29485:irregex_2escm"),(void*)f_29485},
{C_text("f_29492:irregex_2escm"),(void*)f_29492},
{C_text("f_29497:irregex_2escm"),(void*)f_29497},
{C_text("f_29507:irregex_2escm"),(void*)f_29507},
{C_text("f_29541:irregex_2escm"),(void*)f_29541},
{C_text("f_29544:irregex_2escm"),(void*)f_29544},
{C_text("f_29547:irregex_2escm"),(void*)f_29547},
{C_text("f_29554:irregex_2escm"),(void*)f_29554},
{C_text("f_29558:irregex_2escm"),(void*)f_29558},
{C_text("f_29571:irregex_2escm"),(void*)f_29571},
{C_text("f_29584:irregex_2escm"),(void*)f_29584},
{C_text("f_29587:irregex_2escm"),(void*)f_29587},
{C_text("f_29594:irregex_2escm"),(void*)f_29594},
{C_text("f_29605:irregex_2escm"),(void*)f_29605},
{C_text("f_29614:irregex_2escm"),(void*)f_29614},
{C_text("f_29617:irregex_2escm"),(void*)f_29617},
{C_text("f_29620:irregex_2escm"),(void*)f_29620},
{C_text("f_29627:irregex_2escm"),(void*)f_29627},
{C_text("f_29652:irregex_2escm"),(void*)f_29652},
{C_text("f_29690:irregex_2escm"),(void*)f_29690},
{C_text("f_29693:irregex_2escm"),(void*)f_29693},
{C_text("f_29696:irregex_2escm"),(void*)f_29696},
{C_text("f_29703:irregex_2escm"),(void*)f_29703},
{C_text("f_29708:irregex_2escm"),(void*)f_29708},
{C_text("f_29718:irregex_2escm"),(void*)f_29718},
{C_text("f_29754:irregex_2escm"),(void*)f_29754},
{C_text("f_29918:irregex_2escm"),(void*)f_29918},
{C_text("f_29931:irregex_2escm"),(void*)f_29931},
{C_text("f_29940:irregex_2escm"),(void*)f_29940},
{C_text("f_29951:irregex_2escm"),(void*)f_29951},
{C_text("f_29955:irregex_2escm"),(void*)f_29955},
{C_text("f_29957:irregex_2escm"),(void*)f_29957},
{C_text("f_29988:irregex_2escm"),(void*)f_29988},
{C_text("f_30035:irregex_2escm"),(void*)f_30035},
{C_text("f_30055:irregex_2escm"),(void*)f_30055},
{C_text("f_30065:irregex_2escm"),(void*)f_30065},
{C_text("f_30092:irregex_2escm"),(void*)f_30092},
{C_text("f_30114:irregex_2escm"),(void*)f_30114},
{C_text("f_30216:irregex_2escm"),(void*)f_30216},
{C_text("f_30681:irregex_2escm"),(void*)f_30681},
{C_text("f_30843:irregex_2escm"),(void*)f_30843},
{C_text("f_30846:irregex_2escm"),(void*)f_30846},
{C_text("f_30880:irregex_2escm"),(void*)f_30880},
{C_text("f_30884:irregex_2escm"),(void*)f_30884},
{C_text("f_30887:irregex_2escm"),(void*)f_30887},
{C_text("f_30890:irregex_2escm"),(void*)f_30890},
{C_text("f_30893:irregex_2escm"),(void*)f_30893},
{C_text("f_30896:irregex_2escm"),(void*)f_30896},
{C_text("f_7492:irregex_2escm"),(void*)f_7492},
{C_text("f_7495:irregex_2escm"),(void*)f_7495},
{C_text("f_7497:irregex_2escm"),(void*)f_7497},
{C_text("f_7501:irregex_2escm"),(void*)f_7501},
{C_text("f_7504:irregex_2escm"),(void*)f_7504},
{C_text("f_7510:irregex_2escm"),(void*)f_7510},
{C_text("f_7552:irregex_2escm"),(void*)f_7552},
{C_text("f_7570:irregex_2escm"),(void*)f_7570},
{C_text("f_7579:irregex_2escm"),(void*)f_7579},
{C_text("f_7587:irregex_2escm"),(void*)f_7587},
{C_text("f_7600:irregex_2escm"),(void*)f_7600},
{C_text("f_7602:irregex_2escm"),(void*)f_7602},
{C_text("f_7609:irregex_2escm"),(void*)f_7609},
{C_text("f_7611:irregex_2escm"),(void*)f_7611},
{C_text("f_7625:irregex_2escm"),(void*)f_7625},
{C_text("f_7643:irregex_2escm"),(void*)f_7643},
{C_text("f_7649:irregex_2escm"),(void*)f_7649},
{C_text("f_7674:irregex_2escm"),(void*)f_7674},
{C_text("f_7720:irregex_2escm"),(void*)f_7720},
{C_text("f_7733:irregex_2escm"),(void*)f_7733},
{C_text("f_7735:irregex_2escm"),(void*)f_7735},
{C_text("f_7739:irregex_2escm"),(void*)f_7739},
{C_text("f_7760:irregex_2escm"),(void*)f_7760},
{C_text("f_7764:irregex_2escm"),(void*)f_7764},
{C_text("f_7789:irregex_2escm"),(void*)f_7789},
{C_text("f_7793:irregex_2escm"),(void*)f_7793},
{C_text("f_7818:irregex_2escm"),(void*)f_7818},
{C_text("f_7822:irregex_2escm"),(void*)f_7822},
{C_text("f_7911:irregex_2escm"),(void*)f_7911},
{C_text("f_7979:irregex_2escm"),(void*)f_7979},
{C_text("f_8021:irregex_2escm"),(void*)f_8021},
{C_text("f_8023:irregex_2escm"),(void*)f_8023},
{C_text("f_8093:irregex_2escm"),(void*)f_8093},
{C_text("f_8095:irregex_2escm"),(void*)f_8095},
{C_text("f_8099:irregex_2escm"),(void*)f_8099},
{C_text("f_8156:irregex_2escm"),(void*)f_8156},
{C_text("f_8158:irregex_2escm"),(void*)f_8158},
{C_text("f_8162:irregex_2escm"),(void*)f_8162},
{C_text("f_8239:irregex_2escm"),(void*)f_8239},
{C_text("f_8243:irregex_2escm"),(void*)f_8243},
{C_text("f_8329:irregex_2escm"),(void*)f_8329},
{C_text("f_8363:irregex_2escm"),(void*)f_8363},
{C_text("f_8369:irregex_2escm"),(void*)f_8369},
{C_text("f_8403:irregex_2escm"),(void*)f_8403},
{C_text("f_8417:irregex_2escm"),(void*)f_8417},
{C_text("f_8424:irregex_2escm"),(void*)f_8424},
{C_text("f_8430:irregex_2escm"),(void*)f_8430},
{C_text("f_8448:irregex_2escm"),(void*)f_8448},
{C_text("f_8452:irregex_2escm"),(void*)f_8452},
{C_text("f_8456:irregex_2escm"),(void*)f_8456},
{C_text("f_8463:irregex_2escm"),(void*)f_8463},
{C_text("f_8471:irregex_2escm"),(void*)f_8471},
{C_text("f_8475:irregex_2escm"),(void*)f_8475},
{C_text("f_8479:irregex_2escm"),(void*)f_8479},
{C_text("f_8483:irregex_2escm"),(void*)f_8483},
{C_text("f_8487:irregex_2escm"),(void*)f_8487},
{C_text("f_8491:irregex_2escm"),(void*)f_8491},
{C_text("f_8495:irregex_2escm"),(void*)f_8495},
{C_text("f_8504:irregex_2escm"),(void*)f_8504},
{C_text("f_8512:irregex_2escm"),(void*)f_8512},
{C_text("f_8521:irregex_2escm"),(void*)f_8521},
{C_text("f_8579:irregex_2escm"),(void*)f_8579},
{C_text("f_8583:irregex_2escm"),(void*)f_8583},
{C_text("f_8597:irregex_2escm"),(void*)f_8597},
{C_text("f_8601:irregex_2escm"),(void*)f_8601},
{C_text("f_8614:irregex_2escm"),(void*)f_8614},
{C_text("f_8625:irregex_2escm"),(void*)f_8625},
{C_text("f_8627:irregex_2escm"),(void*)f_8627},
{C_text("f_8634:irregex_2escm"),(void*)f_8634},
{C_text("f_8647:irregex_2escm"),(void*)f_8647},
{C_text("f_8654:irregex_2escm"),(void*)f_8654},
{C_text("f_8693:irregex_2escm"),(void*)f_8693},
{C_text("f_8720:irregex_2escm"),(void*)f_8720},
{C_text("f_8748:irregex_2escm"),(void*)f_8748},
{C_text("f_8761:irregex_2escm"),(void*)f_8761},
{C_text("f_8804:irregex_2escm"),(void*)f_8804},
{C_text("f_8861:irregex_2escm"),(void*)f_8861},
{C_text("f_8899:irregex_2escm"),(void*)f_8899},
{C_text("f_8902:irregex_2escm"),(void*)f_8902},
{C_text("f_8910:irregex_2escm"),(void*)f_8910},
{C_text("f_8923:irregex_2escm"),(void*)f_8923},
{C_text("f_8942:irregex_2escm"),(void*)f_8942},
{C_text("f_9039:irregex_2escm"),(void*)f_9039},
{C_text("f_9047:irregex_2escm"),(void*)f_9047},
{C_text("f_9049:irregex_2escm"),(void*)f_9049},
{C_text("f_9063:irregex_2escm"),(void*)f_9063},
{C_text("f_9068:irregex_2escm"),(void*)f_9068},
{C_text("f_9089:irregex_2escm"),(void*)f_9089},
{C_text("f_9105:irregex_2escm"),(void*)f_9105},
{C_text("f_9126:irregex_2escm"),(void*)f_9126},
{C_text("f_9132:irregex_2escm"),(void*)f_9132},
{C_text("f_9145:irregex_2escm"),(void*)f_9145},
{C_text("f_9187:irregex_2escm"),(void*)f_9187},
{C_text("f_9202:irregex_2escm"),(void*)f_9202},
{C_text("f_9225:irregex_2escm"),(void*)f_9225},
{C_text("f_9241:irregex_2escm"),(void*)f_9241},
{C_text("f_9254:irregex_2escm"),(void*)f_9254},
{C_text("f_9268:irregex_2escm"),(void*)f_9268},
{C_text("f_9286:irregex_2escm"),(void*)f_9286},
{C_text("f_9302:irregex_2escm"),(void*)f_9302},
{C_text("f_9313:irregex_2escm"),(void*)f_9313},
{C_text("f_9319:irregex_2escm"),(void*)f_9319},
{C_text("f_9337:irregex_2escm"),(void*)f_9337},
{C_text("f_9643:irregex_2escm"),(void*)f_9643},
{C_text("f_9652:irregex_2escm"),(void*)f_9652},
{C_text("f_9670:irregex_2escm"),(void*)f_9670},
{C_text("f_9677:irregex_2escm"),(void*)f_9677},
{C_text("f_9704:irregex_2escm"),(void*)f_9704},
{C_text("f_9710:irregex_2escm"),(void*)f_9710},
{C_text("f_9724:irregex_2escm"),(void*)f_9724},
{C_text("f_9744:irregex_2escm"),(void*)f_9744},
{C_text("f_9750:irregex_2escm"),(void*)f_9750},
{C_text("f_9767:irregex_2escm"),(void*)f_9767},
{C_text("f_9771:irregex_2escm"),(void*)f_9771},
{C_text("f_9818:irregex_2escm"),(void*)f_9818},
{C_text("f_9867:irregex_2escm"),(void*)f_9867},
{C_text("f_9895:irregex_2escm"),(void*)f_9895},
{C_text("f_9906:irregex_2escm"),(void*)f_9906},
{C_text("f_9952:irregex_2escm"),(void*)f_9952},
{C_text("f_9955:irregex_2escm"),(void*)f_9955},
{C_text("f_9969:irregex_2escm"),(void*)f_9969},
{C_text("f_9994:irregex_2escm"),(void*)f_9994},
{C_text("toplevel:irregex_2escm"),(void*)C_irregex_toplevel},
{NULL,NULL}};
#endif

static C_PTABLE_ENTRY *create_ptable(void){
#ifdef C_ENABLE_PTABLES
return ptable;
#else
return NULL;
#endif
}

/*
o|hiding unexported module binding: chicken.irregex#d 
o|hiding unexported module binding: chicken.irregex#define-alias 
o|hiding unexported module binding: chicken.irregex#build-cache 
o|hiding unexported module binding: chicken.irregex#vector-copy 
o|hiding unexported module binding: chicken.irregex#irregex-dfa 
o|hiding unexported module binding: chicken.irregex#irregex-dfa/search 
o|hiding unexported module binding: chicken.irregex#irregex-nfa 
o|hiding unexported module binding: chicken.irregex#irregex-flags 
o|hiding unexported module binding: chicken.irregex#irregex-lengths 
o|hiding unexported module binding: chicken.irregex#irregex-new-matches 
o|hiding unexported module binding: chicken.irregex#irregex-reset-matches! 
o|hiding unexported module binding: chicken.irregex#irregex-copy-matches 
o|hiding unexported module binding: chicken.irregex#irregex-match-chunker 
o|hiding unexported module binding: chicken.irregex#irregex-match-chunker-set! 
o|hiding unexported module binding: chicken.irregex#%irregex-match-end-index 
o|hiding unexported module binding: chicken.irregex#%irregex-match-fail 
o|hiding unexported module binding: chicken.irregex#%irregex-match-fail-set! 
o|hiding unexported module binding: chicken.irregex#irregex-match-valid-named-index? 
o|hiding unexported module binding: chicken.irregex#irregex-match-start-chunk-set! 
o|hiding unexported module binding: chicken.irregex#irregex-match-start-index-set! 
o|hiding unexported module binding: chicken.irregex#irregex-match-end-chunk-set! 
o|hiding unexported module binding: chicken.irregex#irregex-match-end-index-set! 
o|hiding unexported module binding: chicken.irregex#irregex-match-chunk&index-from-tag-set! 
o|hiding unexported module binding: chicken.irregex#irregex-match-numeric-index 
o|hiding unexported module binding: chicken.irregex#chunker-get-next 
o|hiding unexported module binding: chicken.irregex#chunker-get-str 
o|hiding unexported module binding: chicken.irregex#chunker-get-start 
o|hiding unexported module binding: chicken.irregex#chunker-get-end 
o|hiding unexported module binding: chicken.irregex#chunker-get-substring 
o|hiding unexported module binding: chicken.irregex#chunker-get-subchunk 
o|hiding unexported module binding: chicken.irregex#chunker-prev-chunk 
o|hiding unexported module binding: chicken.irregex#chunker-prev-char 
o|hiding unexported module binding: chicken.irregex#chunker-next-char 
o|hiding unexported module binding: chicken.irregex#chunk-before? 
o|hiding unexported module binding: chicken.irregex#wrap-end-chunker 
o|hiding unexported module binding: chicken.irregex#*all-chars* 
o|hiding unexported module binding: chicken.irregex#*allow-utf8-mode?* 
o|hiding unexported module binding: chicken.irregex#string-scan-char 
o|hiding unexported module binding: chicken.irregex#string-scan-char-escape 
o|hiding unexported module binding: chicken.irregex#string-scan-pred 
o|hiding unexported module binding: chicken.irregex#string-split-char 
o|hiding unexported module binding: chicken.irregex#char-alphanumeric? 
o|hiding unexported module binding: chicken.irregex#%substring=? 
o|hiding unexported module binding: chicken.irregex#%%string-copy! 
o|hiding unexported module binding: chicken.irregex#string-cat-reverse 
o|hiding unexported module binding: chicken.irregex#string-cat-reverse/aux 
o|hiding unexported module binding: chicken.irregex#zero-to 
o|hiding unexported module binding: chicken.irregex#find 
o|hiding unexported module binding: chicken.irregex#find-tail 
o|hiding unexported module binding: chicken.irregex#last 
o|hiding unexported module binding: chicken.irregex#any 
o|hiding unexported module binding: chicken.irregex#every 
o|hiding unexported module binding: chicken.irregex#fold 
o|hiding unexported module binding: chicken.irregex#filter 
o|hiding unexported module binding: chicken.irregex#remove 
o|hiding unexported module binding: chicken.irregex#bit-shr 
o|hiding unexported module binding: chicken.irregex#bit-shl 
o|hiding unexported module binding: chicken.irregex#bit-not 
o|hiding unexported module binding: chicken.irregex#bit-ior 
o|hiding unexported module binding: chicken.irregex#bit-and 
o|hiding unexported module binding: chicken.irregex#integer-log 
o|hiding unexported module binding: chicken.irregex#flag-set? 
o|hiding unexported module binding: chicken.irregex#flag-join 
o|hiding unexported module binding: chicken.irregex#flag-clear 
o|hiding unexported module binding: chicken.irregex#~none 
o|hiding unexported module binding: chicken.irregex#~searcher? 
o|hiding unexported module binding: chicken.irregex#~consumer? 
o|hiding unexported module binding: chicken.irregex#close-token 
o|hiding unexported module binding: chicken.irregex#dot-token 
o|hiding unexported module binding: chicken.irregex#with-read-from-string 
o|hiding unexported module binding: chicken.irregex#~save? 
o|hiding unexported module binding: chicken.irregex#~case-insensitive? 
o|hiding unexported module binding: chicken.irregex#~multi-line? 
o|hiding unexported module binding: chicken.irregex#~single-line? 
o|hiding unexported module binding: chicken.irregex#~ignore-space? 
o|hiding unexported module binding: chicken.irregex#~utf8? 
o|hiding unexported module binding: chicken.irregex#symbol-list->flags 
o|hiding unexported module binding: chicken.irregex#posix-escape-sequences 
o|hiding unexported module binding: chicken.irregex#char-altcase 
o|hiding unexported module binding: chicken.irregex#char-mirror 
o|hiding unexported module binding: chicken.irregex#string-parse-hex-escape 
o|hiding unexported module binding: chicken.irregex#string-parse-cset 
o|hiding unexported module binding: chicken.irregex#high-char? 
o|hiding unexported module binding: chicken.irregex#utf8-start-char->length 
o|hiding unexported module binding: chicken.irregex#utf8-string-ref 
o|hiding unexported module binding: chicken.irregex#utf8-backup-to-initial-char 
o|hiding unexported module binding: chicken.irregex#utf8-lowest-digit-of-length 
o|hiding unexported module binding: chicken.irregex#utf8-highest-digit-of-length 
o|hiding unexported module binding: chicken.irregex#char->utf8-list 
o|hiding unexported module binding: chicken.irregex#unicode-range->utf8-pattern 
o|hiding unexported module binding: chicken.irregex#unicode-range-helper 
o|hiding unexported module binding: chicken.irregex#unicode-range-up-from 
o|hiding unexported module binding: chicken.irregex#unicode-range-up-to 
o|hiding unexported module binding: chicken.irregex#unicode-range-climb-digits 
o|hiding unexported module binding: chicken.irregex#unicode-range-middle 
o|hiding unexported module binding: chicken.irregex#cset->utf8-pattern 
o|hiding unexported module binding: chicken.irregex#sre-adjust-utf8 
o|hiding unexported module binding: chicken.irregex#cached 
o|hiding unexported module binding: chicken.irregex#sre-empty? 
o|hiding unexported module binding: chicken.irregex#sre-any? 
o|hiding unexported module binding: chicken.irregex#sre-repeater? 
o|hiding unexported module binding: chicken.irregex#sre-bos? 
o|hiding unexported module binding: chicken.irregex#sre-searcher? 
o|hiding unexported module binding: chicken.irregex#sre-consumer? 
o|hiding unexported module binding: chicken.irregex#sre-has-submatches? 
o|hiding unexported module binding: chicken.irregex#sre-count-submatches 
o|hiding unexported module binding: chicken.irregex#sre-length-ranges 
o|hiding unexported module binding: chicken.irregex#sre-sequence 
o|hiding unexported module binding: chicken.irregex#sre-alternate 
o|hiding unexported module binding: chicken.irregex#sre-strip-submatches 
o|hiding unexported module binding: chicken.irregex#sre-flatten-ranges 
o|hiding unexported module binding: chicken.irregex#sre-names 
o|hiding unexported module binding: chicken.irregex#sre-sequence-names 
o|hiding unexported module binding: chicken.irregex#sre-remove-initial-bos 
o|hiding unexported module binding: chicken.irregex#irregex-basic-string-chunker 
o|hiding unexported module binding: chicken.irregex#irregex-search/matches 
o|hiding unexported module binding: chicken.irregex#irregex-search/backtrack 
o|hiding unexported module binding: chicken.irregex#dfa-init-state 
o|hiding unexported module binding: chicken.irregex#dfa-next-state 
o|hiding unexported module binding: chicken.irregex#dfa-cell-commands 
o|hiding unexported module binding: chicken.irregex#dfa-finalizer 
o|hiding unexported module binding: chicken.irregex#dfa-match/shortest 
o|hiding unexported module binding: chicken.irregex#finalize! 
o|hiding unexported module binding: chicken.irregex#make-initial-memory 
o|hiding unexported module binding: chicken.irregex#dfa-match/longest 
o|hiding unexported module binding: chicken.irregex#sre-named-definitions 
o|hiding unexported module binding: chicken.irregex#*nfa-presize* 
o|hiding unexported module binding: chicken.irregex#*nfa-num-fields* 
o|hiding unexported module binding: chicken.irregex#nfa-num-states 
o|hiding unexported module binding: chicken.irregex#nfa-start-state 
o|hiding unexported module binding: chicken.irregex#nfa-num-tags 
o|hiding unexported module binding: chicken.irregex#nfa-highest-map-index 
o|hiding unexported module binding: chicken.irregex#nfa-set-highest-map-index! 
o|hiding unexported module binding: chicken.irregex#nfa-get-state-trans 
o|hiding unexported module binding: chicken.irregex#nfa-set-state-trans! 
o|hiding unexported module binding: chicken.irregex#nfa-get-epsilons 
o|hiding unexported module binding: chicken.irregex#nfa-set-epsilons! 
o|hiding unexported module binding: chicken.irregex#nfa-add-epsilon! 
o|hiding unexported module binding: chicken.irregex#nfa-get-reorder-commands 
o|hiding unexported module binding: chicken.irregex#nfa-set-reorder-commands! 
o|hiding unexported module binding: chicken.irregex#nfa-get-closure 
o|hiding unexported module binding: chicken.irregex#nfa-add-closure! 
o|hiding unexported module binding: chicken.irregex#sre->nfa 
o|hiding unexported module binding: chicken.irregex#*mst-first-state-index* 
o|hiding unexported module binding: chicken.irregex#mst-mappings-summary 
o|hiding unexported module binding: chicken.irregex#mst-num-states 
o|hiding unexported module binding: chicken.irregex#mst-num-states-set! 
o|hiding unexported module binding: chicken.irregex#mst-hash 
o|hiding unexported module binding: chicken.irregex#mst-hash-set! 
o|hiding unexported module binding: chicken.irregex#mst-state-mappings 
o|hiding unexported module binding: chicken.irregex#mst-state-mappings-set! 
o|hiding unexported module binding: chicken.irregex#make-mst 
o|hiding unexported module binding: chicken.irregex#mst-copy 
o|hiding unexported module binding: chicken.irregex#nfa-state->mst 
o|hiding unexported module binding: chicken.irregex#mst-add! 
o|hiding unexported module binding: chicken.irregex#mst-add/fast! 
o|hiding unexported module binding: chicken.irregex#mst-add-tagged! 
o|hiding unexported module binding: chicken.irregex#mst-same-states? 
o|hiding unexported module binding: chicken.irregex#mst-fold 
o|hiding unexported module binding: chicken.irregex#next-index-for-tag! 
o|hiding unexported module binding: chicken.irregex#nfa->dfa 
o|hiding unexported module binding: chicken.irregex#dfa-renumber 
o|hiding unexported module binding: chicken.irregex#get-distinct-transitions 
o|hiding unexported module binding: chicken.irregex#nfa-epsilon-closure-internal 
o|hiding unexported module binding: chicken.irregex#nfa-epsilon-closure 
o|hiding unexported module binding: chicken.irregex#tag-set-commands-for-closure 
o|hiding unexported module binding: chicken.irregex#find-reorder-commands-internal 
o|hiding unexported module binding: chicken.irregex#find-reorder-commands 
o|hiding unexported module binding: chicken.irregex#sre->procedure 
o|hiding unexported module binding: chicken.irregex#sre-cset->procedure 
o|hiding unexported module binding: chicken.irregex#make-cset 
o|hiding unexported module binding: chicken.irregex#range->cset 
o|hiding unexported module binding: chicken.irregex#char->cset 
o|hiding unexported module binding: chicken.irregex#cset-empty? 
o|hiding unexported module binding: chicken.irregex#maybe-cset->char 
o|hiding unexported module binding: chicken.irregex#cset=? 
o|hiding unexported module binding: chicken.irregex#cset-size 
o|hiding unexported module binding: chicken.irregex#cset->plist 
o|hiding unexported module binding: chicken.irregex#plist->cset 
o|hiding unexported module binding: chicken.irregex#string->cset 
o|hiding unexported module binding: chicken.irregex#sre->cset 
o|hiding unexported module binding: chicken.irregex#cset->sre 
o|hiding unexported module binding: chicken.irregex#cset-contains? 
o|hiding unexported module binding: chicken.irregex#char-ranges-union 
o|hiding unexported module binding: chicken.irregex#cset-union 
o|hiding unexported module binding: chicken.irregex#cset-adjoin 
o|hiding unexported module binding: chicken.irregex#next-char 
o|hiding unexported module binding: chicken.irregex#prev-char 
o|hiding unexported module binding: chicken.irregex#cset-difference 
o|hiding unexported module binding: chicken.irregex#min-char 
o|hiding unexported module binding: chicken.irregex#max-char 
o|hiding unexported module binding: chicken.irregex#cset-intersection 
o|hiding unexported module binding: chicken.irregex#cset-complement 
o|hiding unexported module binding: chicken.irregex#cset-case-insensitive 
o|hiding unexported module binding: chicken.irregex#irregex-fold/fast 
o|hiding unexported module binding: chicken.irregex#irregex-fold/chunked/fast 
o|hiding unexported module binding: chicken.irregex#irregex-apply-match 
o|hiding unexported module binding: chicken.irregex#rx-special-chars 
o|hiding unexported module binding: chicken.irregex#string-scan-char 
o|hiding unexported module binding: chicken.irregex#cset->string 
S|applied compiler syntax:
S|  irregex-match-chunk&index-from-tag-set!		1
S|  scheme#for-each		12
S|  irregex-match-end-index-set!		7
S|  irregex-match-end-chunk-set!		7
S|  irregex-match-start-index-set!		7
S|  irregex-match-start-chunk-set!		7
S|  make-irregex		2
S|  scheme#map		23
S|  bit-not		1
S|  bit-shr		10
S|  bit-shl		11
S|  bit-and		18
S|  bit-ior		11
S|  %%string-copy!		1
S|  scheme#reverse		35
S|  make-irregex-match		1
o|eliminated procedure checks: 531 
o|eliminated procedure checks: 1 
o|folded constant expression: (scheme#integer->char (quote 0)) 
o|folded constant expression: (scheme#integer->char (quote 55295)) 
o|folded constant expression: (scheme#integer->char (quote 57344)) 
o|folded constant expression: (scheme#integer->char (quote 1114111)) 
o|folded constant expression: (scheme#string->symbol (quote ".")) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#+ (quote 10) (quote 3)) 
o|folded constant expression: (scheme#integer->char (quote 13)) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#- (quote 10) (quote 1)) 
o|folded constant expression: (scheme#integer->char (quote 9)) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#- (quote 10) (quote 3)) 
o|folded constant expression: (scheme#integer->char (quote 7)) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#+ (quote 10) (quote 17)) 
o|folded constant expression: (scheme#integer->char (quote 27)) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#+ (quote 10) (quote 2)) 
o|folded constant expression: (scheme#integer->char (quote 12)) 
o|folded constant expression: (scheme#integer->char (quote 128)) 
o|folded constant expression: (scheme#integer->char (quote 255)) 
o|folded constant expression: (scheme#integer->char (quote 255)) 
o|folded constant expression: (scheme#integer->char (quote 255)) 
o|folded constant expression: (scheme#integer->char (quote 128)) 
o|folded constant expression: (scheme#integer->char (quote 128)) 
o|folded constant expression: (scheme#integer->char (quote 128)) 
o|folded constant expression: (scheme#integer->char (quote 255)) 
o|folded constant expression: (scheme#integer->char (quote 128)) 
o|folded constant expression: (scheme#integer->char (quote 255)) 
o|folded constant expression: (scheme#integer->char (quote 128)) 
o|folded constant expression: (scheme#integer->char (quote 255)) 
o|folded constant expression: (scheme#integer->char (quote 128)) 
o|folded constant expression: (scheme#integer->char (quote 255)) 
o|eliminated procedure checks: 1 
o|eliminated procedure checks: 1 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|eliminated procedure checks: 1 
o|eliminated procedure checks: 1 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|eliminated procedure checks: 1 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|eliminated procedure checks: 1 
o|eliminated procedure checks: 1 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|eliminated procedure checks: 1 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#- (quote 32) (quote 23)) 
o|folded constant expression: (scheme#integer->char (quote 9)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#- (quote 32) (quote 32)) 
o|folded constant expression: (scheme#integer->char (quote 0)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#- (quote 32) (quote 1)) 
o|folded constant expression: (scheme#integer->char (quote 31)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#- (quote 32) (quote 32)) 
o|folded constant expression: (scheme#integer->char (quote 0)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 95)) 
o|folded constant expression: (scheme#integer->char (quote 127)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#- (quote 32) (quote 32)) 
o|folded constant expression: (scheme#integer->char (quote 0)) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#- (quote 10) (quote 1)) 
o|folded constant expression: (scheme#integer->char (quote 9)) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#+ (quote 10) (quote 1)) 
o|folded constant expression: (scheme#integer->char (quote 11)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 95)) 
o|folded constant expression: (scheme#integer->char (quote 127)) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#+ (quote 10) (quote 3)) 
o|folded constant expression: (scheme#integer->char (quote 13)) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#+ (quote 10) (quote 3)) 
o|folded constant expression: (scheme#integer->char (quote 13)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 96)) 
o|folded constant expression: (scheme#integer->char (quote 128)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 161)) 
o|folded constant expression: (scheme#integer->char (quote 193)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 162)) 
o|folded constant expression: (scheme#integer->char (quote 194)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 191)) 
o|folded constant expression: (scheme#integer->char (quote 223)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 192)) 
o|folded constant expression: (scheme#integer->char (quote 224)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 207)) 
o|folded constant expression: (scheme#integer->char (quote 239)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 208)) 
o|folded constant expression: (scheme#integer->char (quote 240)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 215)) 
o|folded constant expression: (scheme#integer->char (quote 247)) 
o|eliminated procedure checks: 1 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|folded constant expression: (scheme#+ (quote 2) (quote 0)) 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|folded constant expression: (scheme#+ (quote 3) (quote 0)) 
o|eliminated procedure checks: 1 
o|eliminated procedure checks: 1 
o|specializations:
o|  1 (scheme#> fixnum fixnum)
o|  1 (scheme#> integer integer)
o|  1 (scheme#< integer integer)
o|  1 (scheme#char<? char char)
o|  2 (scheme#char<=? char char)
o|  2 (scheme#zero? integer)
o|  2 (scheme#eqv? * *)
o|  1 (scheme#set-car! pair *)
o|  1 (scheme#equal? (or eof null fixnum char boolean symbol keyword) *)
o|  1 (scheme#caar (pair pair *))
o|  1 (scheme#quotient fixnum fixnum)
o|  1 (chicken.irregex#irregex-nfa (struct regexp))
o|  1 (chicken.irregex#irregex-dfa/search (struct regexp))
o|  4 (chicken.irregex#irregex-dfa (struct regexp))
o|  4 (chicken.irregex#irregex-flags (struct regexp))
o|  2 (scheme#string-length string)
o|  3 (scheme#cdddr (pair * (pair * pair)))
o|  5 (scheme#caddr (pair * (pair * pair)))
o|  3 (scheme#vector-length vector)
o|  31 (scheme#cadr (pair * pair))
o|  2 (scheme#- integer integer)
o|  2 (scheme#= fixnum fixnum)
o|  2 (scheme#length list)
o|  1 (scheme#>= fixnum fixnum)
o|  1 (scheme#< fixnum fixnum)
o|  5 (scheme#<= fixnum fixnum)
o|  7 (scheme#>= integer integer)
o|  6 (scheme#cddr (pair * pair))
o|  17 (scheme#memq * list)
o|  4 (##sys#check-list (or pair list) *)
o|  3 (scheme#memv (or symbol keyword procedure eof null fixnum char boolean) list)
o|  3 (scheme#string-ref string fixnum)
o|  1 (scheme#number->string *)
o|  128 (scheme#eqv? (or eof null fixnum char boolean symbol keyword) *)
o|  6 (scheme#+ integer integer)
o|  7 (scheme#* fixnum fixnum)
o|  4 (scheme#odd? *)
o|  13 (scheme#zero? *)
o|  4 (scheme#char=? char char)
o|  264 (scheme#eqv? * (or eof null fixnum char boolean symbol keyword))
o|  216 (scheme#cdr pair)
o|  5 (scheme#cdar (pair pair *))
o|  12 (scheme#integer? *)
o|  159 (scheme#car pair)
o|  16 (scheme#- fixnum fixnum)
o|  1 (chicken.irregex#irregex-names (struct regexp))
o|  1 (scheme#* integer integer)
o|  215 (scheme#+ fixnum fixnum)
(o e)|safe calls: 3618 
(o e)|assignments to immediate values: 13 
o|safe globals: (chicken.irregex#%irregex-match-fail-set! chicken.irregex#%irregex-match-fail chicken.irregex#%irregex-match-end-index chicken.irregex#irregex-match-chunker-set! chicken.irregex#irregex-match-names chicken.irregex#irregex-match-chunker chicken.irregex#irregex-match-num-submatches chicken.irregex#irregex-match-data? chicken.irregex#irregex-copy-matches chicken.irregex#irregex-reset-matches! chicken.irregex#irregex-new-matches chicken.irregex#irregex-names chicken.irregex#irregex-lengths chicken.irregex#irregex-num-submatches chicken.irregex#irregex-flags chicken.irregex#irregex-nfa chicken.irregex#irregex-dfa/search chicken.irregex#irregex-dfa chicken.irregex#irregex? chicken.irregex#vector-copy) 
o|removed side-effect free assignment to unused variable: chicken.irregex#irregex-dfa/search 
o|removed side-effect free assignment to unused variable: chicken.irregex#irregex-flags 
o|removed side-effect free assignment to unused variable: chicken.irregex#irregex-lengths 
o|substituted constant variable: a7596 
o|substituted constant variable: a7594 
o|inlining procedure: k7613 
o|inlining procedure: k7613 
o|substituted constant variable: a7658 
o|inlining procedure: k7740 
o|contracted procedure: "(irregex-core.scm:226) g790791" 
o|inlining procedure: k7740 
o|inlining procedure: k7765 
o|contracted procedure: "(irregex-core.scm:229) g799800" 
o|inlining procedure: k7765 
o|inlining procedure: k7794 
o|contracted procedure: "(irregex-core.scm:232) g808809" 
o|inlining procedure: k7794 
o|inlining procedure: k7823 
o|inlining procedure: k7823 
o|removed side-effect free assignment to unused variable: chicken.irregex#irregex-match-start-chunk-set! 
o|removed side-effect free assignment to unused variable: chicken.irregex#irregex-match-start-index-set! 
o|removed side-effect free assignment to unused variable: chicken.irregex#irregex-match-end-chunk-set! 
o|removed side-effect free assignment to unused variable: chicken.irregex#irregex-match-end-index-set! 
o|removed side-effect free assignment to unused variable: chicken.irregex#irregex-match-chunk&index-from-tag-set! 
o|inlining procedure: k7913 
o|inlining procedure: k7913 
o|inlining procedure: k7928 
o|inlining procedure: k7928 
o|inlining procedure: k7944 
o|inlining procedure: k7980 
o|inlining procedure: k7980 
o|contracted procedure: "(irregex-core.scm:271) g856857" 
o|inlining procedure: k7988 
o|inlining procedure: k7988 
o|contracted procedure: "(irregex-core.scm:270) g849850" 
o|inlining procedure: k7958 
o|substituted constant variable: a7976 
o|inlining procedure: k7958 
o|inlining procedure: k7944 
o|inlining procedure: k8025 
o|inlining procedure: k8025 
o|inlining procedure: k8043 
o|inlining procedure: k8043 
o|contracted procedure: "(irregex-core.scm:281) g870871" 
o|inlining procedure: k8100 
o|contracted procedure: "(irregex-core.scm:292) g878879" 
o|inlining procedure: k8118 
o|substituted constant variable: a8136 
o|inlining procedure: k8118 
o|inlining procedure: k8100 
o|contracted procedure: "(irregex-core.scm:293) chicken.irregex#irregex-match-valid-named-index?" 
o|inlining procedure: k7724 
o|inlining procedure: k7724 
o|inlining procedure: k8166 
o|contracted procedure: "(irregex-core.scm:302) g901902" 
o|contracted procedure: "(irregex-core.scm:301) g897898" 
o|contracted procedure: "(irregex-core.scm:300) g893894" 
o|inlining procedure: "(irregex-core.scm:299) chicken.irregex#chunker-get-substring" 
o|inlining procedure: k8166 
o|inlining procedure: "(irregex-core.scm:297) chicken.irregex#irregex-match-chunker" 
o|inlining procedure: k8250 
o|inlining procedure: k8250 
o|contracted procedure: "(irregex-core.scm:314) g920921" 
o|contracted procedure: "(irregex-core.scm:313) g916917" 
o|contracted procedure: "(irregex-core.scm:312) g912913" 
o|inlining procedure: "(irregex-core.scm:308) chicken.irregex#chunker-get-subchunk" 
o|inlining procedure: "(irregex-core.scm:307) chicken.irregex#irregex-match-chunker" 
o|inlining procedure: k8374 
o|inlining procedure: k8386 
o|inlining procedure: k8386 
o|inlining procedure: k8374 
o|inlining procedure: k8405 
o|inlining procedure: k8405 
o|inlining procedure: k8432 
o|inlining procedure: k8432 
o|inlining procedure: k8602 
o|inlining procedure: "(irregex-core.scm:373) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:372) chicken.irregex#chunker-get-str" 
o|inlining procedure: k8602 
o|contracted procedure: "(irregex-core.scm:370) chicken.irregex#chunker-prev-chunk" 
o|inlining procedure: k8566 
o|inlining procedure: k8566 
o|inlining procedure: k8584 
o|inlining procedure: k8584 
o|inlining procedure: "(irregex-core.scm:362) chicken.irregex#chunker-get-next" 
o|inlining procedure: k8635 
o|inlining procedure: "(irregex-core.scm:379) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:378) chicken.irregex#chunker-get-str" 
o|inlining procedure: k8635 
o|inlining procedure: "(irregex-core.scm:376) chicken.irregex#chunker-get-next" 
o|inlining procedure: k8763 
o|inlining procedure: k8763 
o|substituted constant variable: a8780 
o|inlining procedure: k8960 
o|inlining procedure: k8960 
o|removed side-effect free assignment to unused variable: chicken.irregex#%substring=? 
o|removed side-effect free assignment to unused variable: chicken.irregex#%%string-copy! 
o|contracted procedure: "(irregex-core.scm:467) chicken.irregex#string-cat-reverse/aux" 
o|substituted constant variable: u11291134 
o|inlining procedure: k9070 
o|inlining procedure: k9070 
o|inlining procedure: k9091 
o|inlining procedure: k9091 
o|inlining procedure: k9107 
o|inlining procedure: k9107 
o|inlining procedure: k9134 
o|inlining procedure: k9134 
o|removed side-effect free assignment to unused variable: chicken.irregex#find-tail 
o|inlining procedure: k9189 
o|inlining procedure: k9189 
o|inlining procedure: k9204 
o|inlining procedure: k9204 
o|inlining procedure: k9227 
o|inlining procedure: k9243 
o|inlining procedure: k9243 
o|inlining procedure: k9227 
o|inlining procedure: k9273 
o|inlining procedure: k9273 
o|inlining procedure: k9288 
o|inlining procedure: k9288 
o|inlining procedure: k9321 
o|inlining procedure: k9321 
o|removed side-effect free assignment to unused variable: chicken.irregex#filter 
o|removed side-effect free assignment to unused variable: chicken.irregex#remove 
o|removed side-effect free assignment to unused variable: chicken.irregex#bit-shr 
o|removed side-effect free assignment to unused variable: chicken.irregex#bit-shl 
o|removed side-effect free assignment to unused variable: chicken.irregex#bit-not 
o|removed side-effect free assignment to unused variable: chicken.irregex#bit-ior 
o|removed side-effect free assignment to unused variable: chicken.irregex#bit-and 
o|removed side-effect free assignment to unused variable: chicken.irregex#integer-log 
o|inlining procedure: k9645 
o|inlining procedure: k9645 
o|inlining procedure: k9679 
o|inlining procedure: k9679 
o|substituted constant variable: a9702 
o|inlining procedure: k9712 
o|inlining procedure: k9712 
o|inlining procedure: k9731 
o|inlining procedure: k9731 
o|inlining procedure: k9752 
o|inlining procedure: k9752 
o|substituted constant variable: chicken.irregex#dot-token 
o|inlining procedure: k9793 
o|substituted constant variable: a9804 
o|inlining procedure: k9793 
o|substituted constant variable: a9816 
o|inlining procedure: k9820 
o|inlining procedure: k9820 
o|substituted constant variable: a9846 
o|inlining procedure: k9851 
o|substituted constant variable: a9865 
o|substituted constant variable: a9882 
o|inlining procedure: k9851 
o|substituted constant variable: a9916 
o|substituted constant variable: a9918 
o|substituted constant variable: a9925 
o|substituted constant variable: a9932 
o|substituted constant variable: a9935 
o|inlining procedure: k9936 
o|substituted constant variable: a9947 
o|substituted constant variable: a9950 
o|inlining procedure: k9957 
o|inlining procedure: k9957 
o|inlining procedure: k9970 
o|inlining procedure: k9970 
o|substituted constant variable: a9997 
o|inlining procedure: k10002 
o|substituted constant variable: a10013 
o|substituted constant variable: a10016 
o|inlining procedure: k10002 
o|substituted constant variable: a10026 
o|substituted constant variable: a10028 
o|substituted constant variable: a10030 
o|inlining procedure: k9936 
o|inlining procedure: k10040 
o|substituted constant variable: a10051 
o|inlining procedure: k10040 
o|substituted constant variable: a10069 
o|inlining procedure: k10077 
o|inlining procedure: k10077 
o|substituted constant variable: a10093 
o|inlining procedure: k10089 
o|inlining procedure: k10089 
o|substituted constant variable: a10105 
o|substituted constant variable: a10107 
o|inlining procedure: k10108 
o|substituted constant variable: a10126 
o|substituted constant variable: a10127 
o|substituted constant variable: a10134 
o|inlining procedure: k10108 
o|substituted constant variable: a10142 
o|substituted constant variable: a10144 
o|substituted constant variable: a10146 
o|substituted constant variable: a10148 
o|substituted constant variable: a10151 
o|inlining procedure: k10152 
o|substituted constant variable: a10163 
o|inlining procedure: k10152 
o|substituted constant variable: a10169 
o|inlining procedure: k10173 
o|inlining procedure: k10192 
o|inlining procedure: k10192 
o|inlining procedure: k10173 
o|inlining procedure: k10211 
o|inlining procedure: k10211 
o|substituted constant variable: a10215 
o|substituted constant variable: a10220 
o|substituted constant variable: a10222 
o|substituted constant variable: a10224 
o|substituted constant variable: a10229 
o|substituted constant variable: a10231 
o|substituted constant variable: a10233 
o|substituted constant variable: a10235 
o|substituted constant variable: a10237 
o|inlining procedure: k10244 
o|inlining procedure: k10244 
o|inlining procedure: k10271 
o|inlining procedure: k10271 
o|inlining procedure: k10290 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|propagated global variable: r1029131096 chicken.irregex#~case-insensitive? 
o|inlining procedure: k10290 
o|substituted constant variable: chicken.irregex#~multi-line? 
o|inlining procedure: k10308 
o|substituted constant variable: chicken.irregex#~single-line? 
o|propagated global variable: r1030931100 chicken.irregex#~single-line? 
o|inlining procedure: k10308 
o|substituted constant variable: chicken.irregex#~ignore-space? 
o|inlining procedure: k10326 
o|substituted constant variable: chicken.irregex#*allow-utf8-mode?* 
o|substituted constant variable: chicken.irregex#~utf8? 
o|substituted constant variable: chicken.irregex#~none 
o|inlining procedure: k10290 
o|inlining procedure: k10326 
o|substituted constant variable: a10342 
o|substituted constant variable: a10344 
o|substituted constant variable: a10349 
o|substituted constant variable: a10351 
o|substituted constant variable: a10356 
o|substituted constant variable: a10358 
o|substituted constant variable: a10363 
o|substituted constant variable: a10365 
o|inlining procedure: k10369 
o|inlining procedure: k10369 
o|substituted constant variable: a10376 
o|substituted constant variable: a10378 
o|substituted constant variable: a10380 
o|substituted constant variable: chicken.irregex#~none 
o|inlining procedure: k10388 
o|inlining procedure: k10388 
o|inlining procedure: k10418 
o|inlining procedure: k10418 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k10440 
o|inlining procedure: k10462 
o|inlining procedure: k10462 
o|inlining procedure: k10440 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k10496 
o|inlining procedure: k10496 
o|inlining procedure: k10522 
o|inlining procedure: k10522 
o|inlining procedure: k10556 
o|inlining procedure: k10556 
o|contracted procedure: "(irregex-core.scm:756) chicken.irregex#utf8-backup-to-initial-char" 
o|inlining procedure: k14157 
o|inlining procedure: k14157 
o|substituted constant variable: a14180 
o|substituted constant variable: a14185 
o|substituted constant variable: a14187 
o|substituted constant variable: chicken.irregex#~utf8? 
o|inlining procedure: k10616 
o|inlining procedure: k10631 
o|substituted constant variable: a10650 
o|inlining procedure: k10643 
o|inlining procedure: k10643 
o|inlining procedure: k10631 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k10616 
o|substituted constant variable: a10758 
o|inlining procedure: k10751 
o|inlining procedure: k10751 
o|inlining procedure: k10795 
o|inlining procedure: k10795 
o|substituted constant variable: a10809 
o|substituted constant variable: a10817 
o|inlining procedure: k10832 
o|inlining procedure: k10832 
o|substituted constant variable: a10864 
o|substituted constant variable: a10867 
o|substituted constant variable: chicken.irregex#~single-line? 
o|inlining procedure: k10883 
o|substituted constant variable: a10909 
o|substituted constant variable: a10912 
o|inlining procedure: k10918 
o|inlining procedure: k10938 
o|inlining procedure: k10938 
o|inlining procedure: k10968 
o|inlining procedure: k10968 
o|inlining procedure: k10998 
o|inlining procedure: k10998 
o|substituted constant variable: a11026 
o|substituted constant variable: a11028 
o|substituted constant variable: a11030 
o|substituted constant variable: a11032 
o|substituted constant variable: a11034 
o|substituted constant variable: a11036 
o|inlining procedure: k10918 
o|inlining procedure: k10883 
o|inlining procedure: k11058 
o|inlining procedure: k11058 
o|substituted constant variable: a11081 
o|substituted constant variable: a11084 
o|inlining procedure: k11105 
o|substituted constant variable: a11116 
o|inlining procedure: k11121 
o|substituted constant variable: a11132 
o|substituted constant variable: a11135 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k11121 
o|substituted constant variable: a11149 
o|inlining procedure: k11154 
o|substituted constant variable: a11171 
o|inlining procedure: k11175 
o|inlining procedure: k11175 
o|substituted constant variable: a11213 
o|substituted constant variable: a11221 
o|substituted constant variable: a11228 
o|inlining procedure: k11154 
o|substituted constant variable: a11258 
o|inlining procedure: k11259 
o|substituted constant variable: a11270 
o|substituted constant variable: a11273 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k11259 
o|substituted constant variable: a11293 
o|substituted constant variable: a11296 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k11305 
o|substituted constant variable: a11316 
o|substituted constant variable: a11319 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k11305 
o|substituted constant variable: a11339 
o|inlining procedure: k11334 
o|inlining procedure: k11334 
o|substituted constant variable: a11358 
o|substituted constant variable: a11361 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k11370 
o|substituted constant variable: a11381 
o|substituted constant variable: a11384 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k11370 
o|substituted constant variable: a11432 
o|substituted constant variable: chicken.irregex#~save? 
o|substituted constant variable: a11444 
o|substituted constant variable: a11451 
o|substituted constant variable: a11453 
o|substituted constant variable: a11455 
o|substituted constant variable: a11458 
o|inlining procedure: k11459 
o|substituted constant variable: a11470 
o|substituted constant variable: a11473 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k11459 
o|substituted constant variable: a11493 
o|inlining procedure: k11488 
o|inlining procedure: k11488 
o|inlining procedure: k11510 
o|inlining procedure: k11510 
o|substituted constant variable: a11524 
o|substituted constant variable: a11527 
o|substituted constant variable: chicken.irregex#~save? 
o|substituted constant variable: a11546 
o|substituted constant variable: a11549 
o|inlining procedure: k11550 
o|substituted constant variable: a11567 
o|substituted constant variable: a11570 
o|substituted constant variable: chicken.irregex#~save? 
o|substituted constant variable: a11589 
o|substituted constant variable: a11592 
o|inlining procedure: k11550 
o|substituted constant variable: a11598 
o|substituted constant variable: a11601 
o|substituted constant variable: chicken.irregex#~save? 
o|substituted constant variable: a11616 
o|substituted constant variable: a11623 
o|inlining procedure: k11624 
o|inlining procedure: k11624 
o|substituted constant variable: a11638 
o|inlining procedure: k11645 
o|propagated global variable: r1164631183 chicken.irregex#flag-clear 
o|inlining procedure: k11645 
o|propagated global variable: r1164631188 chicken.irregex#flag-join 
o|inlining procedure: k11660 
o|inlining procedure: k11660 
o|inlining procedure: k11670 
o|inlining procedure: k11670 
o|substituted constant variable: chicken.irregex#~utf8? 
o|substituted constant variable: chicken.irregex#~utf8? 
o|inlining procedure: k11673 
o|inlining procedure: k11673 
o|substituted constant variable: a11696 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k11701 
o|substituted constant variable: a11712 
o|substituted constant variable: chicken.irregex#~multi-line? 
o|inlining procedure: k11701 
o|substituted constant variable: a11728 
o|substituted constant variable: chicken.irregex#~ignore-space? 
o|inlining procedure: k11733 
o|substituted constant variable: chicken.irregex#*allow-utf8-mode?* 
o|substituted constant variable: a11747 
o|substituted constant variable: chicken.irregex#~utf8? 
o|substituted constant variable: a11757 
o|inlining procedure: k11733 
o|substituted constant variable: a11769 
o|inlining procedure: k11774 
o|substituted constant variable: a11785 
o|substituted constant variable: a11788 
o|inlining procedure: k11774 
o|substituted constant variable: a11808 
o|substituted constant variable: a11811 
o|substituted constant variable: a11832 
o|substituted constant variable: a11834 
o|substituted constant variable: a11836 
o|substituted constant variable: a11838 
o|substituted constant variable: a11840 
o|substituted constant variable: a11842 
o|substituted constant variable: a11844 
o|substituted constant variable: a11846 
o|substituted constant variable: a11848 
o|substituted constant variable: a11850 
o|substituted constant variable: a11852 
o|substituted constant variable: a11854 
o|substituted constant variable: a11856 
o|substituted constant variable: a11858 
o|substituted constant variable: a11860 
o|substituted constant variable: a11863 
o|substituted constant variable: a11868 
o|substituted constant variable: a11871 
o|substituted constant variable: a11877 
o|substituted constant variable: a11880 
o|inlining procedure: k11105 
o|inlining procedure: k11887 
o|inlining procedure: k11887 
o|substituted constant variable: a11901 
o|substituted constant variable: a11904 
o|inlining procedure: k11923 
o|substituted constant variable: a11960 
o|contracted procedure: "(irregex-core.scm:998) chicken.irregex#string-parse-cset" 
o|inlining procedure: k13337 
o|inlining procedure: k13337 
o|inlining procedure: k13355 
o|substituted constant variable: a13366 
o|inlining procedure: k13355 
o|contracted procedure: "(irregex-core.scm:1218) chicken.irregex#cset->sre" 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k13394 
o|substituted constant variable: a13414 
o|inlining procedure: k13419 
o|inlining procedure: k13419 
o|inlining procedure: k13437 
o|inlining procedure: k13437 
o|inlining procedure: k13461 
o|inlining procedure: k13461 
o|substituted constant variable: a13491 
o|inlining procedure: k13492 
o|substituted constant variable: a13514 
o|inlining procedure: k13492 
o|substituted constant variable: a13520 
o|substituted constant variable: a13538 
o|substituted constant variable: a13541 
o|substituted constant variable: a13542 
o|substituted constant variable: a13550 
o|substituted constant variable: a13554 
o|inlining procedure: k13558 
o|inlining procedure: k13558 
o|substituted constant variable: a13564 
o|substituted constant variable: a13571 
o|substituted constant variable: a13578 
o|inlining procedure: k13394 
o|inlining procedure: k13602 
o|substituted constant variable: a13634 
o|consed rest parameter at call site: "(irregex-core.scm:1254) chicken.irregex#sre->cset" 2 
o|substituted constant variable: a13652 
o|substituted constant variable: a13660 
o|substituted constant variable: a13671 
o|inlining procedure: k13602 
o|substituted constant variable: a13689 
o|substituted constant variable: a13698 
o|substituted constant variable: a13700 
o|substituted constant variable: a13702 
o|substituted constant variable: a13704 
o|substituted constant variable: a13706 
o|substituted constant variable: a13707 
o|substituted constant variable: a13714 
o|inlining procedure: k13715 
o|substituted constant variable: a13738 
o|consed rest parameter at call site: "(irregex-core.scm:1269) chicken.irregex#sre->cset" 2 
o|inlining procedure: k13755 
o|substituted constant variable: a13780 
o|inlining procedure: k13755 
o|substituted constant variable: a13792 
o|substituted constant variable: a13801 
o|inlining procedure: k13805 
o|inlining procedure: k13805 
o|inlining procedure: k13817 
o|inlining procedure: k13817 
o|substituted constant variable: a13830 
o|substituted constant variable: a13832 
o|substituted constant variable: a13834 
o|substituted constant variable: a13836 
o|substituted constant variable: a13838 
o|substituted constant variable: a13840 
o|substituted constant variable: a13843 
o|inlining procedure: k13715 
o|substituted constant variable: a13877 
o|substituted constant variable: a13890 
o|substituted constant variable: a13892 
o|substituted constant variable: a13894 
o|substituted constant variable: a13896 
o|inlining procedure: k13897 
o|inlining procedure: k13908 
o|inlining procedure: k13908 
o|inlining procedure: "(irregex-core.scm:1291) chicken.irregex#make-cset" 
o|substituted constant variable: chicken.irregex#~multi-line? 
o|inlining procedure: k13897 
o|inlining procedure: "(irregex-core.scm:1292) chicken.irregex#make-cset" 
o|substituted constant variable: chicken.irregex#~utf8? 
o|substituted constant variable: a13933 
o|inlining procedure: k11923 
o|substituted constant variable: a11972 
o|inlining procedure: k11967 
o|substituted constant variable: a11982 
o|inlining procedure: k11967 
o|inlining procedure: k12011 
o|inlining procedure: k12011 
o|substituted constant variable: a12034 
o|substituted constant variable: a12037 
o|inlining procedure: k12046 
o|substituted constant variable: a12054 
o|substituted constant variable: a12057 
o|inlining procedure: k12046 
o|substituted constant variable: a12071 
o|substituted constant variable: a12074 
o|inlining procedure: k12085 
o|inlining procedure: k12085 
o|contracted procedure: "(irregex-core.scm:1014) chicken.irregex#string-split-char" 
o|inlining procedure: k8911 
o|inlining procedure: k8911 
o|substituted constant variable: a8935 
o|substituted constant variable: a8938 
o|substituted constant variable: a8948 
o|substituted constant variable: a12132 
o|substituted constant variable: a12135 
o|inlining procedure: k12143 
o|inlining procedure: k12143 
o|substituted constant variable: a12149 
o|substituted constant variable: a12156 
o|substituted constant variable: a12163 
o|inlining procedure: k12164 
o|substituted constant variable: a12175 
o|inlining procedure: k12183 
o|substituted constant variable: a12194 
o|substituted constant variable: a12197 
o|inlining procedure: k12183 
o|substituted constant variable: a12217 
o|substituted constant variable: a12220 
o|inlining procedure: k12233 
o|substituted constant variable: a12244 
o|substituted constant variable: a12247 
o|inlining procedure: k12233 
o|substituted constant variable: a12267 
o|substituted constant variable: a12270 
o|inlining procedure: k12283 
o|substituted constant variable: a12294 
o|substituted constant variable: a12297 
o|inlining procedure: k12283 
o|substituted constant variable: a12325 
o|substituted constant variable: a12328 
o|inlining procedure: k12349 
o|substituted constant variable: a12360 
o|substituted constant variable: a12363 
o|inlining procedure: k12349 
o|substituted constant variable: a12387 
o|substituted constant variable: a12390 
o|inlining procedure: k12399 
o|substituted constant variable: a12410 
o|substituted constant variable: a12413 
o|inlining procedure: k12399 
o|substituted constant variable: a12433 
o|substituted constant variable: a12436 
o|inlining procedure: k12453 
o|substituted constant variable: a12464 
o|substituted constant variable: a12467 
o|inlining procedure: k12453 
o|substituted constant variable: a12487 
o|substituted constant variable: a12490 
o|inlining procedure: k12499 
o|substituted constant variable: a12510 
o|substituted constant variable: a12513 
o|inlining procedure: k12499 
o|substituted constant variable: a12533 
o|substituted constant variable: a12536 
o|inlining procedure: k12545 
o|substituted constant variable: a12556 
o|substituted constant variable: a12559 
o|inlining procedure: k12545 
o|substituted constant variable: a12605 
o|inlining procedure: k12606 
o|inlining procedure: k12636 
o|inlining procedure: k12636 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|substituted constant variable: a12680 
o|substituted constant variable: a12683 
o|contracted procedure: "(irregex-core.scm:1083) chicken.irregex#char-mirror" 
o|inlining procedure: k13193 
o|inlining procedure: k13193 
o|inlining procedure: k13205 
o|inlining procedure: k13205 
o|substituted constant variable: a13218 
o|substituted constant variable: a13220 
o|substituted constant variable: a13222 
o|substituted constant variable: a13224 
o|substituted constant variable: a12686 
o|substituted constant variable: a12689 
o|inlining procedure: k12606 
o|substituted constant variable: a12704 
o|inlining procedure: k12708 
o|inlining procedure: k12708 
o|substituted constant variable: a12732 
o|inlining procedure: k12727 
o|substituted constant variable: a12739 
o|inlining procedure: k12727 
o|substituted constant variable: a12755 
o|substituted constant variable: a12758 
o|substituted constant variable: a12776 
o|substituted constant variable: a12777 
o|substituted constant variable: a12784 
o|substituted constant variable: a12790 
o|substituted constant variable: a12791 
o|inlining procedure: k12796 
o|substituted constant variable: a12807 
o|inlining procedure: k12796 
o|substituted constant variable: a12861 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|substituted constant variable: a12877 
o|contracted procedure: "(irregex-core.scm:1124) chicken.irregex#string-scan-pred" 
o|inlining procedure: k8863 
o|inlining procedure: k8863 
o|substituted constant variable: a8880 
o|inlining procedure: k12878 
o|substituted constant variable: a12895 
o|substituted constant variable: a12898 
o|inlining procedure: k12878 
o|substituted constant variable: a12919 
o|substituted constant variable: a12922 
o|substituted constant variable: a12928 
o|substituted constant variable: a12930 
o|substituted constant variable: a12932 
o|substituted constant variable: a12934 
o|substituted constant variable: a12936 
o|substituted constant variable: a12938 
o|substituted constant variable: a12940 
o|substituted constant variable: a12942 
o|substituted constant variable: a12944 
o|substituted constant variable: a12946 
o|substituted constant variable: a12948 
o|substituted constant variable: a12950 
o|substituted constant variable: a12952 
o|substituted constant variable: a12954 
o|substituted constant variable: a12956 
o|substituted constant variable: a12958 
o|substituted constant variable: a12960 
o|substituted constant variable: a12962 
o|substituted constant variable: a12964 
o|substituted constant variable: a12967 
o|inlining procedure: k12164 
o|substituted constant variable: a12979 
o|substituted constant variable: a12982 
o|inlining procedure: k12991 
o|substituted constant variable: a13005 
o|substituted constant variable: a13008 
o|substituted constant variable: chicken.irregex#~multi-line? 
o|inlining procedure: k12991 
o|substituted constant variable: a13034 
o|substituted constant variable: a13037 
o|substituted constant variable: chicken.irregex#~multi-line? 
o|inlining procedure: k13049 
o|substituted constant variable: a13066 
o|substituted constant variable: a13069 
o|substituted constant variable: a13079 
o|substituted constant variable: chicken.irregex#~ignore-space? 
o|inlining procedure: k13049 
o|inlining procedure: k13086 
o|substituted constant variable: a13114 
o|substituted constant variable: a13117 
o|inlining procedure: k13086 
o|substituted constant variable: a13123 
o|substituted constant variable: chicken.irregex#~ignore-space? 
o|substituted constant variable: a13129 
o|substituted constant variable: a13131 
o|substituted constant variable: a13133 
o|substituted constant variable: a13135 
o|substituted constant variable: a13137 
o|substituted constant variable: a13139 
o|substituted constant variable: a13141 
o|substituted constant variable: a13143 
o|substituted constant variable: a13145 
o|substituted constant variable: a13147 
o|substituted constant variable: a13149 
o|substituted constant variable: a13154 
o|substituted constant variable: a13156 
o|substituted constant variable: a13158 
o|substituted constant variable: a13160 
o|inlining procedure: k13178 
o|inlining procedure: k13178 
o|inlining procedure: k13228 
o|inlining procedure: k13228 
o|inlining procedure: k13246 
o|inlining procedure: k13246 
o|substituted constant variable: a13276 
o|substituted constant variable: a13279 
o|contracted procedure: "(irregex-core.scm:1186) chicken.irregex#string-scan-char-escape" 
o|inlining procedure: k8806 
o|inlining procedure: k8806 
o|inlining procedure: k8818 
o|substituted constant variable: a8829 
o|inlining procedure: k8818 
o|substituted constant variable: a8835 
o|substituted constant variable: a8837 
o|inlining procedure: k13280 
o|inlining procedure: k13280 
o|substituted constant variable: a13307 
o|substituted constant variable: a13313 
o|substituted constant variable: a13316 
o|substituted constant variable: a13317 
o|substituted constant variable: a13944 
o|substituted constant variable: table1932 
o|inlining procedure: k13972 
o|inlining procedure: k13972 
o|inlining procedure: k14015 
o|inlining procedure: k14015 
o|substituted constant variable: a14141 
o|substituted constant variable: a14143 
o|substituted constant variable: a14145 
o|substituted constant variable: a14147 
o|inlining procedure: k14195 
o|inlining procedure: k14195 
o|inlining procedure: k14207 
o|inlining procedure: k14207 
o|substituted constant variable: a14223 
o|substituted constant variable: a14225 
o|substituted constant variable: a14227 
o|substituted constant variable: a14229 
o|inlining procedure: k14274 
o|inlining procedure: k14274 
o|inlining procedure: k14308 
o|inlining procedure: k14308 
o|substituted constant variable: a14398 
o|substituted constant variable: a14400 
o|substituted constant variable: a14402 
o|substituted constant variable: a14404 
o|inlining procedure: k14547 
o|inlining procedure: k14547 
o|inlining procedure: k14613 
o|contracted procedure: "(irregex-core.scm:1430) g20712080" 
o|inlining procedure: k14613 
o|inlining procedure: k14649 
o|inlining procedure: k14649 
o|inlining procedure: k14770 
o|inlining procedure: k14770 
o|inlining procedure: k14909 
o|inlining procedure: k14909 
o|inlining procedure: k15412 
o|inlining procedure: k15430 
o|inlining procedure: k15430 
o|inlining procedure: k15412 
o|contracted procedure: "(irregex-core.scm:1518) chicken.irregex#unicode-range->utf8-pattern" 
o|inlining procedure: k14414 
o|contracted procedure: "(irregex-core.scm:1403) chicken.irregex#unicode-range-climb-digits" 
o|inlining procedure: k15015 
o|contracted procedure: "(irregex-core.scm:1485) g22312240" 
o|inlining procedure: k15015 
o|contracted procedure: "(irregex-core.scm:1484) chicken.irregex#utf8-highest-digit-of-length" 
o|inlining procedure: k14233 
o|inlining procedure: k14233 
o|inlining procedure: k14245 
o|inlining procedure: k14245 
o|substituted constant variable: a14261 
o|substituted constant variable: a14263 
o|substituted constant variable: a14265 
o|substituted constant variable: a14267 
o|inlining procedure: k15118 
o|contracted procedure: "(irregex-core.scm:1496) g22712280" 
o|inlining procedure: k15118 
o|inlining procedure: k15186 
o|inlining procedure: k15186 
o|substituted constant variable: a15224 
o|inlining procedure: k15256 
o|contracted procedure: "(irregex-core.scm:1476) g21782187" 
o|inlining procedure: k15256 
o|inlining procedure: k15296 
o|inlining procedure: k15296 
o|inlining procedure: k14414 
o|inlining procedure: k14441 
o|inlining procedure: k14459 
o|inlining procedure: k14459 
o|inlining procedure: k14441 
o|contracted procedure: "(irregex-core.scm:1417) chicken.irregex#unicode-range-middle" 
o|inlining procedure: k15347 
o|contracted procedure: "(irregex-core.scm:1505) g23092318" 
o|inlining procedure: k15347 
o|inlining procedure: k15969 
o|inlining procedure: k15969 
o|inlining procedure: k15981 
o|inlining procedure: k15981 
o|inlining procedure: k15999 
o|inlining procedure: k15999 
o|inlining procedure: k16017 
o|inlining procedure: k16017 
o|inlining procedure: k16082 
o|inlining procedure: k16082 
o|inlining procedure: k16143 
o|inlining procedure: k16143 
o|contracted procedure: "(irregex-core.scm:1623) chicken.irregex#sre->procedure" 
o|inlining procedure: "(irregex-core.scm:3113) chicken.irregex#%irregex-match-fail-set!" 
o|inlining procedure: k23332 
o|consed rest parameter at call site: "(irregex-core.scm:3121) chicken.irregex#sre->cset" 2 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k23358 
o|consed rest parameter at call site: "(irregex-core.scm:3126) chicken.irregex#sre->cset" 2 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k23358 
o|inlining procedure: k23387 
o|inlining procedure: k23387 
o|substituted constant variable: a23453 
o|substituted constant variable: a23455 
o|inlining procedure: k23458 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k23458 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k23496 
o|substituted constant variable: chicken.irregex#~utf8? 
o|inlining procedure: k23496 
o|substituted constant variable: chicken.irregex#~utf8? 
o|inlining procedure: k23534 
o|inlining procedure: k23552 
o|inlining procedure: k23552 
o|substituted constant variable: a23596 
o|substituted constant variable: a23598 
o|inlining procedure: k23534 
o|inlining procedure: k23627 
o|inlining procedure: k23627 
o|inlining procedure: k23659 
o|inlining procedure: k23659 
o|inlining procedure: k23698 
o|inlining procedure: k23698 
o|inlining procedure: k23758 
o|inlining procedure: k23758 
o|inlining procedure: k23795 
o|inlining procedure: k23795 
o|inlining procedure: k23854 
o|inlining procedure: k23890 
o|inlining procedure: k23890 
o|inlining procedure: k23908 
o|inlining procedure: k23908 
o|inlining procedure: k23931 
o|inlining procedure: k23931 
o|inlining procedure: k23948 
o|inlining procedure: k23948 
o|inlining procedure: k23959 
o|inlining procedure: k23959 
o|inlining procedure: k23967 
o|inlining procedure: k23967 
o|inlining procedure: k23982 
o|inlining procedure: k23982 
o|inlining procedure: k23854 
o|inlining procedure: k24012 
o|inlining procedure: k24042 
o|inlining procedure: k24042 
o|inlining procedure: k24064 
o|inlining procedure: k24064 
o|inlining procedure: k24012 
o|inlining procedure: k24098 
o|inlining procedure: k24098 
o|inlining procedure: k24121 
o|inlining procedure: k24121 
o|inlining procedure: k24129 
o|inlining procedure: k24129 
o|inlining procedure: k24144 
o|inlining procedure: k24144 
o|inlining procedure: k24168 
o|inlining procedure: k24168 
o|inlining procedure: k24226 
o|inlining procedure: k24226 
o|inlining procedure: k24254 
o|inlining procedure: k24254 
o|inlining procedure: k24278 
o|inlining procedure: k24289 
o|inlining procedure: k24289 
o|inlining procedure: k24278 
o|inlining procedure: k24343 
o|inlining procedure: k24343 
o|inlining procedure: "(irregex-core.scm:3332) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:3330) chicken.irregex#chunker-get-str" 
o|contracted procedure: "(irregex-core.scm:3329) chicken.irregex#wrap-end-chunker" 
o|inlining procedure: k8695 
o|inlining procedure: "(irregex-core.scm:393) chicken.irregex#chunker-get-next" 
o|inlining procedure: k8695 
o|inlining procedure: k8722 
o|inlining procedure: k8722 
o|inlining procedure: "(irregex-core.scm:396) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:398) chicken.irregex#chunker-get-subchunk" 
o|inlining procedure: "(irregex-core.scm:397) chicken.irregex#chunker-get-substring" 
o|inlining procedure: "(irregex-core.scm:395) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:394) chicken.irregex#chunker-get-str" 
o|inlining procedure: k24399 
o|inlining procedure: k24413 
o|inlining procedure: k24413 
o|inlining procedure: k24399 
o|inlining procedure: k24449 
o|inlining procedure: k24463 
o|inlining procedure: k24463 
o|contracted procedure: "(irregex-core.scm:3370) g47684769" 
o|inlining procedure: k24498 
o|inlining procedure: k24498 
o|inlining procedure: k24449 
o|inlining procedure: k24587 
o|inlining procedure: k24607 
o|inlining procedure: k24607 
o|inlining procedure: k24626 
o|inlining procedure: k24626 
o|inlining procedure: k24676 
o|inlining procedure: "(irregex-core.scm:3415) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:3414) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3413) chicken.irregex#chunker-get-str" 
o|inlining procedure: k24676 
o|inlining procedure: "(irregex-core.scm:3410) chicken.irregex#chunker-get-next" 
o|inlining procedure: k24744 
o|inlining procedure: k24744 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k24760 
o|inlining procedure: k24760 
o|inlining procedure: k24587 
o|inlining procedure: k24804 
o|contracted procedure: "(irregex-core.scm:3444) g48814882" 
o|contracted procedure: "(irregex-core.scm:3443) g48774878" 
o|contracted procedure: "(irregex-core.scm:3430) g48474848" 
o|inlining procedure: k24804 
o|substituted constant variable: a25047 
o|substituted constant variable: a25049 
o|substituted constant variable: a25054 
o|substituted constant variable: a25056 
o|substituted constant variable: a25058 
o|substituted constant variable: a25063 
o|substituted constant variable: a25065 
o|substituted constant variable: a25067 
o|substituted constant variable: a25069 
o|substituted constant variable: a25074 
o|substituted constant variable: a25076 
o|substituted constant variable: a25078 
o|substituted constant variable: a25080 
o|substituted constant variable: a25082 
o|substituted constant variable: a25084 
o|substituted constant variable: a25086 
o|substituted constant variable: a25088 
o|substituted constant variable: a25090 
o|substituted constant variable: a25092 
o|substituted constant variable: a25094 
o|substituted constant variable: a25096 
o|substituted constant variable: a25098 
o|substituted constant variable: a25100 
o|substituted constant variable: a25102 
o|substituted constant variable: a25104 
o|substituted constant variable: a25109 
o|substituted constant variable: a25111 
o|substituted constant variable: a25113 
o|substituted constant variable: a25115 
o|substituted constant variable: a25117 
o|substituted constant variable: a25119 
o|substituted constant variable: a25121 
o|inlining procedure: k25125 
o|inlining procedure: k25125 
o|substituted constant variable: a25138 
o|substituted constant variable: a25140 
o|substituted constant variable: a25142 
o|substituted constant variable: a25144 
o|inlining procedure: k23332 
o|inlining procedure: k25153 
o|inlining procedure: k25161 
o|inlining procedure: k25161 
o|inlining procedure: "(irregex-core.scm:3468) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:3467) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3466) chicken.irregex#chunker-get-str" 
o|inlining procedure: "(irregex-core.scm:3464) chicken.irregex#chunker-get-next" 
o|inlining procedure: k25153 
o|inlining procedure: k25219 
o|substituted constant variable: a25236 
o|substituted constant variable: a25244 
o|inlining procedure: k25219 
o|inlining procedure: k25276 
o|substituted constant variable: a25287 
o|inlining procedure: k25276 
o|substituted constant variable: a25295 
o|inlining procedure: "(irregex-core.scm:3481) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:3480) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3479) chicken.irregex#chunker-get-str" 
o|inlining procedure: "(irregex-core.scm:3477) chicken.irregex#chunker-get-next" 
o|inlining procedure: k25303 
o|inlining procedure: k25311 
o|inlining procedure: k25311 
o|inlining procedure: k25303 
o|inlining procedure: k25341 
o|inlining procedure: k25341 
o|inlining procedure: k25356 
o|substituted constant variable: a25365 
o|inlining procedure: k25356 
o|inlining procedure: "(irregex-core.scm:3494) chicken.irregex#chunker-get-start" 
o|inlining procedure: k25391 
o|inlining procedure: k25399 
o|inlining procedure: k25399 
o|inlining procedure: k25414 
o|inlining procedure: k25414 
o|inlining procedure: "(irregex-core.scm:3510) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3509) chicken.irregex#chunker-get-str" 
o|inlining procedure: "(irregex-core.scm:3506) chicken.irregex#chunker-get-next" 
o|inlining procedure: k25481 
o|inlining procedure: k25481 
o|inlining procedure: "(irregex-core.scm:3500) chicken.irregex#chunker-get-start" 
o|inlining procedure: k25391 
o|inlining procedure: k25506 
o|inlining procedure: k25506 
o|inlining procedure: "(irregex-core.scm:3515) chicken.irregex#chunker-get-next" 
o|inlining procedure: k25531 
o|inlining procedure: k25539 
o|inlining procedure: k25539 
o|substituted constant variable: a25557 
o|inlining procedure: k25568 
o|inlining procedure: k25568 
o|substituted constant variable: a25577 
o|inlining procedure: "(irregex-core.scm:3527) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3526) chicken.irregex#chunker-get-str" 
o|inlining procedure: "(irregex-core.scm:3522) chicken.irregex#chunker-get-next" 
o|inlining procedure: k25531 
o|inlining procedure: k25604 
o|inlining procedure: k25604 
o|inlining procedure: k25619 
o|inlining procedure: k25619 
o|inlining procedure: "(irregex-core.scm:3536) chicken.irregex#chunker-get-start" 
o|inlining procedure: k25675 
o|inlining procedure: k25675 
o|inlining procedure: k25685 
o|inlining procedure: k25699 
o|inlining procedure: k25699 
o|inlining procedure: k25711 
o|inlining procedure: k25711 
o|inlining procedure: "(irregex-core.scm:3547) chicken.irregex#chunker-get-start" 
o|inlining procedure: k25685 
o|inlining procedure: k25768 
o|inlining procedure: k25768 
o|substituted constant variable: a25782 
o|substituted constant variable: a25784 
o|substituted constant variable: a25786 
o|substituted constant variable: a25788 
o|substituted constant variable: a25790 
o|substituted constant variable: a25792 
o|substituted constant variable: a25794 
o|substituted constant variable: a25796 
o|substituted constant variable: a25798 
o|substituted constant variable: a25800 
o|inlining procedure: k25801 
o|inlining procedure: k25815 
o|inlining procedure: k25834 
o|inlining procedure: "(irregex-core.scm:3574) chicken.irregex#chunker-get-next" 
o|inlining procedure: k25871 
o|substituted constant variable: a25882 
o|inlining procedure: k25871 
o|inlining procedure: "(irregex-core.scm:3572) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:3571) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3570) chicken.irregex#chunker-get-str" 
o|inlining procedure: k25834 
o|inlining procedure: "(irregex-core.scm:3568) chicken.irregex#chunker-get-next" 
o|inlining procedure: k25815 
o|substituted constant variable: a25904 
o|inlining procedure: k25914 
o|inlining procedure: k25933 
o|inlining procedure: "(irregex-core.scm:3592) chicken.irregex#chunker-get-next" 
o|inlining procedure: k25970 
o|substituted constant variable: a25981 
o|inlining procedure: k25970 
o|inlining procedure: "(irregex-core.scm:3590) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:3589) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3588) chicken.irregex#chunker-get-str" 
o|inlining procedure: k25933 
o|inlining procedure: "(irregex-core.scm:3586) chicken.irregex#chunker-get-next" 
o|inlining procedure: k25914 
o|substituted constant variable: a26003 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k25801 
o|substituted constant variable: chicken.irregex#~none 
o|inlining procedure: k16160 
o|substituted constant variable: chicken.irregex#~consumer? 
o|propagated global variable: r1616131759 chicken.irregex#~consumer? 
o|inlining procedure: k16160 
o|substituted constant variable: chicken.irregex#~none 
o|inlining procedure: k16167 
o|substituted constant variable: chicken.irregex#~searcher? 
o|propagated global variable: r1616831763 chicken.irregex#~searcher? 
o|substituted constant variable: chicken.irregex#~none 
o|inlining procedure: k16167 
o|substituted constant variable: chicken.irregex#~none 
o|contracted procedure: "(irregex-core.scm:1615) chicken.irregex#sre-length-ranges" 
o|inlining procedure: k17038 
o|inlining procedure: k17038 
o|inlining procedure: k17044 
o|inlining procedure: k17060 
o|inlining procedure: k17060 
o|inlining procedure: k17089 
o|inlining procedure: k17106 
o|inlining procedure: k17120 
o|inlining procedure: k17120 
o|inlining procedure: k17106 
o|inlining procedure: k17155 
o|inlining procedure: k17155 
o|inlining procedure: k17089 
o|inlining procedure: k17184 
o|inlining procedure: k17198 
o|inlining procedure: k17198 
o|inlining procedure: k17208 
o|inlining procedure: k17208 
o|inlining procedure: k17184 
o|inlining procedure: k17237 
o|inlining procedure: k17237 
o|inlining procedure: k17255 
o|inlining procedure: k17325 
o|inlining procedure: k17331 
o|inlining procedure: k17331 
o|inlining procedure: k17325 
o|inlining procedure: k17358 
o|inlining procedure: k17358 
o|inlining procedure: k17255 
o|inlining procedure: k17413 
o|inlining procedure: k17447 
o|inlining procedure: k17447 
o|inlining procedure: k17413 
o|inlining procedure: k17471 
o|inlining procedure: k17471 
o|inlining procedure: k17506 
o|inlining procedure: k17506 
o|inlining procedure: k17549 
o|inlining procedure: k17549 
o|inlining procedure: k17568 
o|inlining procedure: k17568 
o|inlining procedure: k17601 
o|inlining procedure: k17601 
o|inlining procedure: k17637 
o|inlining procedure: k17637 
o|inlining procedure: k17695 
o|inlining procedure: k17695 
o|inlining procedure: k17710 
o|inlining procedure: k17710 
o|inlining procedure: k17734 
o|inlining procedure: k17734 
o|inlining procedure: k17782 
o|inlining procedure: k17782 
o|inlining procedure: k17793 
o|substituted constant variable: a17830 
o|inlining procedure: k17822 
o|inlining procedure: k17822 
o|inlining procedure: k17793 
o|inlining procedure: k17848 
o|inlining procedure: k17848 
o|inlining procedure: k17879 
o|inlining procedure: k17879 
o|substituted constant variable: a17892 
o|substituted constant variable: a17894 
o|substituted constant variable: a17896 
o|substituted constant variable: a17898 
o|inlining procedure: k17902 
o|inlining procedure: k17902 
o|substituted constant variable: a17915 
o|substituted constant variable: a17917 
o|substituted constant variable: a17919 
o|substituted constant variable: a17921 
o|substituted constant variable: a17926 
o|substituted constant variable: a17928 
o|substituted constant variable: a17930 
o|substituted constant variable: a17935 
o|substituted constant variable: a17937 
o|substituted constant variable: a17942 
o|substituted constant variable: a17944 
o|substituted constant variable: a17949 
o|substituted constant variable: a17951 
o|inlining procedure: k17955 
o|inlining procedure: k17955 
o|substituted constant variable: a17968 
o|substituted constant variable: a17970 
o|substituted constant variable: a17972 
o|substituted constant variable: a17974 
o|substituted constant variable: a17976 
o|substituted constant variable: a17978 
o|substituted constant variable: a17980 
o|inlining procedure: k17984 
o|inlining procedure: k17984 
o|inlining procedure: k17996 
o|inlining procedure: k17996 
o|substituted constant variable: a18003 
o|substituted constant variable: a18005 
o|substituted constant variable: a18007 
o|substituted constant variable: a18009 
o|substituted constant variable: a18011 
o|substituted constant variable: a18013 
o|inlining procedure: k18017 
o|inlining procedure: k18017 
o|substituted constant variable: a18030 
o|substituted constant variable: a18032 
o|substituted constant variable: a18034 
o|substituted constant variable: a18036 
o|inlining procedure: k17044 
o|inlining procedure: k18048 
o|inlining procedure: k18048 
o|substituted constant variable: a18066 
o|substituted constant variable: a18074 
o|inlining procedure: k18070 
o|inlining procedure: k18070 
o|inlining procedure: k18088 
o|inlining procedure: k18088 
o|consed rest parameter at call site: "(irregex-core.scm:1611) chicken.irregex#nfa->dfa" 2 
o|substituted constant variable: a16189 
o|inlining procedure: k16191 
o|inlining procedure: k16191 
o|consed rest parameter at call site: "(irregex-core.scm:1607) chicken.irregex#nfa->dfa" 2 
o|substituted constant variable: a16224 
o|substituted constant variable: a16229 
o|inlining procedure: k16226 
o|inlining procedure: k16226 
o|substituted constant variable: chicken.irregex#*allow-utf8-mode?* 
o|contracted procedure: "(irregex-core.scm:1594) chicken.irregex#sre-adjust-utf8" 
o|inlining procedure: k15530 
o|inlining procedure: k15552 
o|inlining procedure: k15552 
o|inlining procedure: k15597 
o|inlining procedure: k15597 
o|inlining procedure: k15628 
o|inlining procedure: k15658 
o|inlining procedure: k15658 
o|inlining procedure: k15628 
o|inlining procedure: k15698 
o|inlining procedure: k15698 
o|inlining procedure: k15713 
o|inlining procedure: k15713 
o|consed rest parameter at call site: "(irregex-core.scm:1539) chicken.irregex#sre->cset" 2 
o|inlining procedure: k15730 
o|inlining procedure: k15745 
o|inlining procedure: k15745 
o|inlining procedure: k15768 
o|inlining procedure: k15768 
o|substituted constant variable: a15800 
o|substituted constant variable: a15802 
o|inlining procedure: k15730 
o|inlining procedure: k15824 
o|inlining procedure: k15824 
o|substituted constant variable: a15856 
o|inlining procedure: k15860 
o|inlining procedure: k15860 
o|substituted constant variable: a15873 
o|substituted constant variable: a15875 
o|substituted constant variable: a15877 
o|substituted constant variable: a15879 
o|substituted constant variable: a15881 
o|substituted constant variable: a15883 
o|substituted constant variable: a15885 
o|substituted constant variable: a15887 
o|inlining procedure: k15530 
o|inlining procedure: k15894 
o|inlining procedure: k15894 
o|inlining procedure: k15922 
o|inlining procedure: k15922 
o|inlining procedure: k15953 
o|inlining procedure: k15953 
o|substituted constant variable: a15963 
o|substituted constant variable: a15965 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|substituted constant variable: chicken.irregex#~utf8? 
o|inlining procedure: k16240 
o|inlining procedure: k16256 
o|inlining procedure: k16256 
o|inlining procedure: k16290 
o|inlining procedure: k16290 
o|inlining procedure: k16307 
o|inlining procedure: k16307 
o|inlining procedure: k16319 
o|inlining procedure: k16319 
o|inlining procedure: k16331 
o|inlining procedure: k16331 
o|substituted constant variable: a16344 
o|substituted constant variable: a16346 
o|substituted constant variable: a16348 
o|substituted constant variable: a16350 
o|substituted constant variable: a16352 
o|substituted constant variable: a16354 
o|substituted constant variable: a16356 
o|substituted constant variable: a16358 
o|substituted constant variable: a16360 
o|substituted constant variable: a16362 
o|inlining procedure: k16366 
o|inlining procedure: k16366 
o|inlining procedure: k16378 
o|inlining procedure: k16378 
o|substituted constant variable: a16391 
o|substituted constant variable: a16393 
o|substituted constant variable: a16395 
o|substituted constant variable: a16397 
o|substituted constant variable: a16399 
o|substituted constant variable: a16401 
o|inlining procedure: k16240 
o|substituted constant variable: a16403 
o|inlining procedure: k16410 
o|inlining procedure: k16410 
o|inlining procedure: k16420 
o|inlining procedure: k16435 
o|inlining procedure: k16435 
o|inlining procedure: k16420 
o|substituted constant variable: a16465 
o|inlining procedure: k16469 
o|inlining procedure: k16469 
o|inlining procedure: k16481 
o|inlining procedure: k16481 
o|substituted constant variable: a16494 
o|substituted constant variable: a16496 
o|substituted constant variable: a16498 
o|substituted constant variable: a16500 
o|substituted constant variable: a16502 
o|substituted constant variable: a16504 
o|substituted constant variable: a16516 
o|inlining procedure: k16508 
o|substituted constant variable: a16525 
o|inlining procedure: k16520 
o|inlining procedure: k16532 
o|inlining procedure: k16532 
o|inlining procedure: k16520 
o|inlining procedure: k16508 
o|inlining procedure: k16553 
o|inlining procedure: k16569 
o|inlining procedure: k16569 
o|inlining procedure: k16584 
o|inlining procedure: k16584 
o|substituted constant variable: a16596 
o|inlining procedure: k16600 
o|inlining procedure: k16600 
o|inlining procedure: k16612 
o|inlining procedure: k16612 
o|substituted constant variable: a16625 
o|substituted constant variable: a16627 
o|substituted constant variable: a16629 
o|substituted constant variable: a16631 
o|substituted constant variable: a16633 
o|substituted constant variable: a16635 
o|inlining procedure: k16553 
o|inlining procedure: k16645 
o|inlining procedure: k16645 
o|inlining procedure: k16655 
o|inlining procedure: k16655 
o|inlining procedure: k16682 
o|inlining procedure: k16682 
o|inlining procedure: k16697 
o|inlining procedure: k16697 
o|substituted constant variable: a16709 
o|inlining procedure: k16713 
o|inlining procedure: k16713 
o|inlining procedure: k16725 
o|inlining procedure: k16725 
o|substituted constant variable: a16738 
o|substituted constant variable: a16740 
o|substituted constant variable: a16742 
o|substituted constant variable: a16744 
o|substituted constant variable: a16746 
o|substituted constant variable: a16748 
o|substituted constant variable: a16753 
o|substituted constant variable: a16755 
o|inlining procedure: k16762 
o|inlining procedure: k16762 
o|inlining procedure: k16772 
o|inlining procedure: k16772 
o|inlining procedure: k16799 
o|inlining procedure: k16799 
o|inlining procedure: k16814 
o|inlining procedure: k16814 
o|substituted constant variable: a16826 
o|inlining procedure: k16830 
o|inlining procedure: k16830 
o|inlining procedure: k16842 
o|inlining procedure: k16842 
o|substituted constant variable: a16855 
o|substituted constant variable: a16857 
o|substituted constant variable: a16859 
o|substituted constant variable: a16861 
o|substituted constant variable: a16863 
o|substituted constant variable: a16865 
o|substituted constant variable: a16870 
o|substituted constant variable: a16872 
o|substituted constant variable: a16884 
o|inlining procedure: k16876 
o|inlining procedure: k16888 
o|inlining procedure: k16888 
o|inlining procedure: k16876 
o|inlining procedure: k16921 
o|inlining procedure: k16938 
o|inlining procedure: k16938 
o|inlining procedure: k16964 
o|inlining procedure: k16964 
o|substituted constant variable: a16982 
o|substituted constant variable: a16984 
o|inlining procedure: k16988 
o|inlining procedure: k16988 
o|substituted constant variable: a17001 
o|substituted constant variable: a17003 
o|substituted constant variable: a17005 
o|substituted constant variable: a17007 
o|inlining procedure: k16921 
o|inlining procedure: k18124 
o|inlining procedure: k18124 
o|inlining procedure: k18147 
o|inlining procedure: k18147 
o|inlining procedure: k18170 
o|inlining procedure: k18170 
o|inlining procedure: k18197 
o|inlining procedure: k18197 
o|inlining procedure: k18243 
o|inlining procedure: k18243 
o|substituted constant variable: a18275 
o|substituted constant variable: a18280 
o|substituted constant variable: a18282 
o|substituted constant variable: a18287 
o|substituted constant variable: a18289 
o|inlining procedure: k18351 
o|inlining procedure: k18351 
o|inlining procedure: k18382 
o|inlining procedure: k18382 
o|inlining procedure: k18443 
o|inlining procedure: k18443 
o|inlining procedure: k18473 
o|inlining procedure: k18473 
o|substituted constant variable: a18493 
o|substituted constant variable: a18495 
o|substituted constant variable: a18500 
o|substituted constant variable: a18502 
o|inlining procedure: k18506 
o|inlining procedure: k18506 
o|inlining procedure: k18518 
o|inlining procedure: k18518 
o|inlining procedure: k18530 
o|inlining procedure: k18530 
o|inlining procedure: k18542 
o|inlining procedure: k18542 
o|inlining procedure: k18554 
o|inlining procedure: k18554 
o|inlining procedure: k18566 
o|inlining procedure: k18566 
o|inlining procedure: k18578 
o|inlining procedure: k18578 
o|substituted constant variable: a18585 
o|substituted constant variable: a18587 
o|substituted constant variable: a18589 
o|substituted constant variable: a18591 
o|substituted constant variable: a18593 
o|substituted constant variable: a18595 
o|substituted constant variable: a18597 
o|substituted constant variable: a18599 
o|substituted constant variable: a18601 
o|substituted constant variable: a18603 
o|substituted constant variable: a18605 
o|substituted constant variable: a18607 
o|substituted constant variable: a18609 
o|substituted constant variable: a18611 
o|substituted constant variable: a18613 
o|substituted constant variable: a18615 
o|substituted constant variable: a18620 
o|substituted constant variable: a18622 
o|substituted constant variable: a18627 
o|substituted constant variable: a18629 
o|inlining procedure: k18637 
o|inlining procedure: k18637 
o|inlining procedure: k18669 
o|inlining procedure: k18685 
o|inlining procedure: k18685 
o|inlining procedure: k18735 
o|inlining procedure: k18758 
o|inlining procedure: k18758 
o|inlining procedure: k18735 
o|substituted constant variable: a18790 
o|inlining procedure: k18794 
o|inlining procedure: k18794 
o|inlining procedure: k18806 
o|inlining procedure: k18806 
o|inlining procedure: k18818 
o|inlining procedure: k18818 
o|substituted constant variable: a18831 
o|substituted constant variable: a18833 
o|substituted constant variable: a18835 
o|substituted constant variable: a18837 
o|substituted constant variable: a18839 
o|substituted constant variable: a18841 
o|substituted constant variable: a18843 
o|substituted constant variable: a18845 
o|inlining procedure: k18669 
o|inlining procedure: k18888 
o|inlining procedure: k18888 
o|inlining procedure: k18902 
o|inlining procedure: k18902 
o|inlining procedure: k18915 
o|inlining procedure: k18915 
o|inlining procedure: "(irregex-core.scm:1967) chicken.irregex#irregex-match-chunker-set!" 
o|inlining procedure: "(irregex-core.scm:1965) chicken.irregex#chunker-get-start" 
o|inlining procedure: k18986 
o|inlining procedure: k18998 
o|inlining procedure: k18998 
o|inlining procedure: k19023 
o|inlining procedure: k19056 
o|inlining procedure: k19056 
o|inlining procedure: k19085 
o|inlining procedure: k19085 
o|inlining procedure: "(irregex-core.scm:1989) chicken.irregex#chunker-get-next" 
o|inlining procedure: "(irregex-core.scm:1988) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:1987) chicken.irregex#chunker-get-start" 
o|inlining procedure: k19023 
o|contracted procedure: "(irregex-core.scm:1984) chicken.irregex#dfa-match/shortest" 
o|inlining procedure: k19611 
o|inlining procedure: k19626 
o|inlining procedure: k19626 
o|inlining procedure: k19677 
o|substituted constant variable: a19685 
o|inlining procedure: k19677 
o|inlining procedure: k19696 
o|inlining procedure: k19696 
o|inlining procedure: k19728 
o|inlining procedure: k19728 
o|inlining procedure: "(irregex-core.scm:2118) chicken.irregex#dfa-finalizer" 
o|inlining procedure: k19611 
o|inlining procedure: "(irregex-core.scm:2110) chicken.irregex#dfa-init-state" 
o|inlining procedure: "(irregex-core.scm:2108) chicken.irregex#chunker-get-next" 
o|inlining procedure: "(irregex-core.scm:2107) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:2106) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:2105) chicken.irregex#chunker-get-str" 
o|substituted constant variable: chicken.irregex#~searcher? 
o|inlining procedure: k18986 
o|inlining procedure: "(irregex-core.scm:2007) chicken.irregex#%irregex-match-fail-set!" 
o|contracted procedure: "(irregex-core.scm:2006) chicken.irregex#irregex-search/backtrack" 
o|inlining procedure: k19143 
o|inlining procedure: k19143 
o|inlining procedure: k19161 
o|inlining procedure: k19161 
o|inlining procedure: k19197 
o|inlining procedure: "(irregex-core.scm:2034) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:2033) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:2032) chicken.irregex#chunker-get-str" 
o|inlining procedure: k19197 
o|substituted constant variable: chicken.irregex#~searcher? 
o|inlining procedure: "(irregex-core.scm:2014) chicken.irregex#chunker-get-next" 
o|inlining procedure: "(irregex-core.scm:2013) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:2012) chicken.irregex#chunker-get-str" 
o|contracted procedure: "(irregex-core.scm:2011) chicken.irregex#irregex-nfa" 
o|contracted procedure: "(irregex-core.scm:1974) chicken.irregex#irregex-dfa" 
o|inlining procedure: k19270 
o|inlining procedure: k19270 
o|inlining procedure: k19284 
o|inlining procedure: k19284 
o|inlining procedure: k19297 
o|inlining procedure: k19297 
o|inlining procedure: k19334 
o|inlining procedure: k19346 
o|inlining procedure: "(irregex-core.scm:2064) chicken.irregex#chunker-get-start" 
o|inlining procedure: k19346 
o|contracted procedure: "(irregex-core.scm:2058) g33833384" 
o|inlining procedure: "(irregex-core.scm:2058) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:2057) chicken.irregex#chunker-get-start" 
o|inlining procedure: k19334 
o|inlining procedure: k19451 
o|inlining procedure: "(irregex-core.scm:2080) chicken.irregex#%irregex-match-fail-set!" 
o|inlining procedure: k19463 
o|inlining procedure: "(irregex-core.scm:2083) chicken.irregex#%irregex-match-fail" 
o|inlining procedure: k19463 
o|inlining procedure: "(irregex-core.scm:2082) chicken.irregex#%irregex-match-fail" 
o|contracted procedure: "(irregex-core.scm:2078) g34233424" 
o|inlining procedure: "(irregex-core.scm:2077) chicken.irregex#chunker-get-end" 
o|contracted procedure: "(irregex-core.scm:2076) g34173418" 
o|inlining procedure: "(irregex-core.scm:2075) chicken.irregex#chunker-get-next" 
o|inlining procedure: k19451 
o|inlining procedure: "(irregex-core.scm:2070) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:2069) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:2068) chicken.irregex#chunker-get-str" 
o|inlining procedure: "(irregex-core.scm:2052) chicken.irregex#irregex-match-chunker-set!" 
o|inlining procedure: k19553 
o|inlining procedure: k19553 
o|removed unused formal parameters: (dfa3441) 
o|removed unused formal parameters: (dfa3444) 
o|substituted constant variable: a19774 
o|substituted constant variable: a19771 
o|inlining procedure: k19776 
o|inlining procedure: k19776 
o|substituted constant variable: a19790 
o|substituted constant variable: a19787 
o|inlining procedure: k19792 
o|inlining procedure: k19792 
o|inlining procedure: k19809 
o|inlining procedure: k19809 
o|inlining procedure: k19933 
o|inlining procedure: k19955 
o|inlining procedure: k19981 
o|inlining procedure: k19981 
o|contracted procedure: "(irregex-core.scm:2200) g36243625" 
o|inlining procedure: k19955 
o|inlining procedure: k19933 
o|inlining procedure: k20054 
o|substituted constant variable: a20062 
o|substituted constant variable: a20065 
o|inlining procedure: k20054 
o|substituted constant variable: a20071 
o|inlining procedure: k20144 
o|inlining procedure: k20144 
o|inlining procedure: k20167 
o|inlining procedure: k20167 
o|inlining procedure: "(irregex-core.scm:2216) chicken.irregex#dfa-cell-commands" 
o|inlining procedure: "(irregex-core.scm:2213) chicken.irregex#dfa-finalizer" 
o|inlining procedure: k20196 
o|inlining procedure: k20196 
o|inlining procedure: k20244 
o|inlining procedure: k20244 
o|contracted procedure: "(irregex-core.scm:2242) g37153716" 
o|inlining procedure: k20276 
o|inlining procedure: k20276 
o|inlining procedure: k20341 
o|inlining procedure: k20341 
o|inlining procedure: "(irregex-core.scm:2176) chicken.irregex#dfa-cell-commands" 
o|inlining procedure: "(irregex-core.scm:2167) chicken.irregex#dfa-finalizer" 
o|contracted procedure: "(irregex-core.scm:2164) chicken.irregex#make-initial-memory" 
o|substituted constant variable: a19836 
o|inlining procedure: k19846 
o|inlining procedure: k19846 
o|substituted constant variable: a19860 
o|inlining procedure: "(irregex-core.scm:2160) chicken.irregex#dfa-init-state" 
o|inlining procedure: "(irregex-core.scm:2159) chicken.irregex#chunker-get-next" 
o|inlining procedure: "(irregex-core.scm:2158) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:2157) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:2156) chicken.irregex#chunker-get-str" 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: k20466 
o|inlining procedure: k20466 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: k20503 
o|contracted procedure: "(irregex-core.scm:2401) chicken.irregex#nfa-set-epsilons!" 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: k20503 
o|contracted procedure: "(irregex-core.scm:2458) chicken.irregex#nfa-set-state-trans!" 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|substituted constant variable: a20684 
o|inlining procedure: k20688 
o|inlining procedure: k20688 
o|substituted constant variable: a20702 
o|substituted constant variable: a20708 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: k20724 
o|inlining procedure: k20724 
o|inlining procedure: k20744 
o|inlining procedure: k20744 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k20772 
o|inlining procedure: k20772 
o|inlining procedure: k20790 
o|inlining procedure: k20790 
o|inlining procedure: k20805 
o|substituted constant variable: a20825 
o|inlining procedure: k20829 
o|inlining procedure: k20829 
o|inlining procedure: k20805 
o|inlining procedure: k20875 
o|inlining procedure: k20895 
o|inlining procedure: k20895 
o|inlining procedure: k20875 
o|inlining procedure: k20920 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k20920 
o|inlining procedure: k20983 
o|substituted constant variable: a21022 
o|inlining procedure: k21016 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|propagated global variable: r2101732373 chicken.irregex#~case-insensitive? 
o|inlining procedure: k21016 
o|substituted constant variable: chicken.irregex#~utf8? 
o|propagated global variable: r2101732375 chicken.irregex#~utf8? 
o|substituted constant variable: a21027 
o|inlining procedure: k20983 
o|consed rest parameter at call site: "(irregex-core.scm:2525) chicken.irregex#sre->cset" 2 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k21057 
o|inlining procedure: k21069 
o|inlining procedure: k21069 
o|inlining procedure: k21057 
o|inlining procedure: k21154 
o|inlining procedure: k21154 
o|inlining procedure: k21176 
o|inlining procedure: k21197 
o|inlining procedure: k21197 
o|inlining procedure: k21176 
o|inlining procedure: k21248 
o|inlining procedure: k21248 
o|inlining procedure: k21308 
o|inlining procedure: k21338 
o|inlining procedure: k21338 
o|inlining procedure: k21308 
o|inlining procedure: k21394 
o|inlining procedure: k21394 
o|substituted constant variable: a21441 
o|substituted constant variable: a21443 
o|substituted constant variable: a21448 
o|substituted constant variable: a21450 
o|substituted constant variable: a21455 
o|substituted constant variable: a21457 
o|substituted constant variable: a21459 
o|substituted constant variable: a21461 
o|inlining procedure: k21465 
o|inlining procedure: k21465 
o|substituted constant variable: a21478 
o|substituted constant variable: a21480 
o|substituted constant variable: a21482 
o|substituted constant variable: a21484 
o|inlining procedure: k21488 
o|inlining procedure: k21488 
o|substituted constant variable: a21501 
o|substituted constant variable: a21503 
o|substituted constant variable: a21505 
o|substituted constant variable: a21507 
o|substituted constant variable: a21512 
o|substituted constant variable: a21514 
o|inlining procedure: k21539 
o|substituted constant variable: a21553 
o|inlining procedure: k21557 
o|inlining procedure: k21557 
o|substituted constant variable: a21571 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: k21539 
o|inlining procedure: k21596 
o|inlining procedure: k21596 
o|inlining procedure: k21621 
o|inlining procedure: k21621 
o|inlining procedure: k21670 
o|inlining procedure: k21670 
o|substituted constant variable: a21683 
o|substituted constant variable: a21685 
o|substituted constant variable: a21687 
o|substituted constant variable: a21689 
o|substituted constant variable: chicken.irregex#*nfa-presize* 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|substituted constant variable: chicken.irregex#*nfa-presize* 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|substituted constant variable: chicken.irregex#*mst-first-state-index* 
o|substituted constant variable: chicken.irregex#*mst-first-state-index* 
o|inlining procedure: "(irregex-core.scm:2716) chicken.irregex#nfa-num-tags" 
o|substituted constant variable: chicken.irregex#*mst-first-state-index* 
o|substituted constant variable: chicken.irregex#*mst-first-state-index* 
o|inlining procedure: k21836 
o|inlining procedure: k21836 
o|inlining procedure: "(irregex-core.scm:2749) chicken.irregex#mst-hash-set!" 
o|inlining procedure: k21877 
o|inlining procedure: k21877 
o|inlining procedure: "(irregex-core.scm:2739) chicken.irregex#mst-mappings-summary" 
o|inlining procedure: "(irregex-core.scm:2737) chicken.irregex#mst-num-states-set!" 
o|inlining procedure: "(irregex-core.scm:2737) chicken.irregex#mst-num-states" 
o|inlining procedure: "(irregex-core.scm:2734) chicken.irregex#mst-hash" 
o|inlining procedure: k22176 
o|inlining procedure: k22176 
o|substituted constant variable: a22190 
o|inlining procedure: k22192 
o|substituted constant variable: chicken.irregex#*mst-first-state-index* 
o|substituted constant variable: chicken.irregex#*mst-first-state-index* 
o|inlining procedure: k22192 
o|substituted constant variable: chicken.irregex#*mst-first-state-index* 
o|merged explicitly consed rest parameter: o4158 
o|inlining procedure: k22281 
o|contracted procedure: "(irregex-core.scm:2867) chicken.irregex#dfa-renumber" 
o|inlining procedure: k22468 
o|inlining procedure: k22468 
o|substituted constant variable: a22488 
o|contracted procedure: "(irregex-core.scm:2919) chicken.irregex#maybe-cset->char" 
o|inlining procedure: k26170 
o|inlining procedure: k26170 
o|substituted constant variable: a26209 
o|inlining procedure: k22544 
o|inlining procedure: k22544 
o|inlining procedure: k22582 
o|inlining procedure: k22582 
o|inlining procedure: "(irregex-core.scm:2866) chicken.irregex#nfa-highest-map-index" 
o|inlining procedure: k22281 
o|inlining procedure: k22313 
o|inlining procedure: k22313 
o|inlining procedure: k22337 
o|inlining procedure: k22337 
o|contracted procedure: "(irregex-core.scm:2884) chicken.irregex#find-reorder-commands" 
o|inlining procedure: k23260 
o|inlining procedure: k23260 
o|contracted procedure: "(irregex-core.scm:3091) chicken.irregex#nfa-set-reorder-commands!" 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: "(irregex-core.scm:2408) chicken.irregex#mst-hash" 
o|contracted procedure: "(irregex-core.scm:3090) chicken.irregex#find-reorder-commands-internal" 
o|inlining procedure: k23116 
o|inlining procedure: k23116 
o|inlining procedure: k23143 
o|inlining procedure: k23143 
o|inlining procedure: k23170 
o|inlining procedure: k23170 
o|inlining procedure: k23221 
o|inlining procedure: k23221 
o|inlining procedure: "(irregex-core.scm:3069) chicken.irregex#mst-mappings-summary" 
o|contracted procedure: "(irregex-core.scm:3067) chicken.irregex#mst-same-states?" 
o|inlining procedure: k22093 
o|inlining procedure: k22117 
o|inlining procedure: k22117 
o|substituted constant variable: a22131 
o|substituted constant variable: chicken.irregex#*mst-first-state-index* 
o|inlining procedure: "(irregex-core.scm:2787) chicken.irregex#mst-num-states" 
o|inlining procedure: "(irregex-core.scm:2787) chicken.irregex#mst-num-states" 
o|inlining procedure: k22093 
o|inlining procedure: "(irregex-core.scm:2786) chicken.irregex#mst-hash" 
o|inlining procedure: "(irregex-core.scm:2786) chicken.irregex#mst-hash" 
o|inlining procedure: "(irregex-core.scm:3063) chicken.irregex#mst-mappings-summary" 
o|inlining procedure: "(irregex-core.scm:3062) chicken.irregex#nfa-num-tags" 
o|contracted procedure: "(irregex-core.scm:3089) chicken.irregex#nfa-get-reorder-commands" 
o|inlining procedure: k20530 
o|inlining procedure: k20530 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: "(irregex-core.scm:2404) chicken.irregex#mst-hash" 
o|contracted procedure: "(irregex-core.scm:2874) chicken.irregex#get-distinct-transitions" 
o|inlining procedure: k22639 
o|inlining procedure: k22639 
o|inlining procedure: k22657 
o|inlining procedure: k22657 
o|inlining procedure: k22716 
o|inlining procedure: k22716 
o|inlining procedure: k22693 
o|inlining procedure: k22693 
o|contracted procedure: "(irregex-core.scm:2952) csets-intersect?4246" 
o|inlining procedure: k22620 
o|inlining procedure: k22620 
o|contracted procedure: "(irregex-core.scm:2935) chicken.irregex#nfa-get-state-trans" 
o|inlining procedure: k20440 
o|inlining procedure: k20440 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|contracted procedure: "(irregex-core.scm:2851) chicken.irregex#nfa-start-state" 
o|substituted constant variable: a20418 
o|inlining procedure: k22937 
o|inlining procedure: k22937 
o|contracted procedure: "(irregex-core.scm:3018) chicken.irregex#nfa-add-closure!" 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: "(irregex-core.scm:2416) chicken.irregex#mst-hash" 
o|contracted procedure: "(irregex-core.scm:3017) chicken.irregex#nfa-epsilon-closure-internal" 
o|inlining procedure: k22816 
o|inlining procedure: k22816 
o|inlining procedure: k22839 
o|inlining procedure: k22839 
o|contracted procedure: "(irregex-core.scm:3006) chicken.irregex#mst-add-tagged!" 
o|inlining procedure: "(irregex-core.scm:2781) chicken.irregex#mst-hash-set!" 
o|inlining procedure: "(irregex-core.scm:2776) chicken.irregex#mst-num-states-set!" 
o|inlining procedure: "(irregex-core.scm:2776) chicken.irregex#mst-num-states" 
o|inlining procedure: "(irregex-core.scm:2773) chicken.irregex#mst-hash" 
o|inlining procedure: k22043 
o|inlining procedure: k22043 
o|inlining procedure: "(irregex-core.scm:2765) chicken.irregex#mst-mappings-summary" 
o|contracted procedure: "(irregex-core.scm:3004) chicken.irregex#next-index-for-tag!" 
o|inlining procedure: k22213 
o|contracted procedure: "(irregex-core.scm:2813) chicken.irregex#nfa-set-highest-map-index!" 
o|inlining procedure: k22213 
o|inlining procedure: k22225 
o|inlining procedure: k22225 
o|inlining procedure: "(irregex-core.scm:2809) chicken.irregex#mst-mappings-summary" 
o|inlining procedure: "(irregex-core.scm:2808) chicken.irregex#nfa-highest-map-index" 
o|inlining procedure: k22863 
o|inlining procedure: k22863 
o|contracted procedure: "(irregex-core.scm:3011) chicken.irregex#mst-add/fast!" 
o|inlining procedure: "(irregex-core.scm:2758) chicken.irregex#mst-num-states-set!" 
o|inlining procedure: "(irregex-core.scm:2758) chicken.irregex#mst-num-states" 
o|inlining procedure: "(irregex-core.scm:2755) chicken.irregex#mst-hash-set!" 
o|inlining procedure: "(irregex-core.scm:2756) chicken.irregex#mst-hash" 
o|contracted procedure: "(irregex-core.scm:3016) chicken.irregex#nfa-get-closure" 
o|inlining procedure: k20587 
o|inlining procedure: k20587 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: "(irregex-core.scm:2412) chicken.irregex#mst-hash" 
o|inlining procedure: k22964 
o|inlining procedure: k22964 
o|inlining procedure: k22984 
o|inlining procedure: k22984 
o|inlining procedure: k23026 
o|inlining procedure: k23048 
o|inlining procedure: k23048 
o|inlining procedure: k23072 
o|inlining procedure: k23072 
o|inlining procedure: k23026 
o|inlining procedure: "(irregex-core.scm:3026) chicken.irregex#mst-mappings-summary" 
o|inlining procedure: "(irregex-core.scm:3025) chicken.irregex#mst-mappings-summary" 
o|inlining procedure: "(irregex-core.scm:3024) chicken.irregex#nfa-num-tags" 
o|inlining procedure: k26057 
o|substituted constant variable: a26074 
o|inlining procedure: k26057 
o|inlining procedure: k26109 
o|substituted constant variable: a26120 
o|inlining procedure: k26109 
o|inlining procedure: "(irregex-core.scm:3634) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:3633) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3632) chicken.irregex#chunker-get-str" 
o|inlining procedure: "(irregex-core.scm:3630) chicken.irregex#chunker-get-next" 
o|removed side-effect free assignment to unused variable: chicken.irregex#cset-size 
o|substituted constant variable: a26276 
o|inlining procedure: k26280 
o|inlining procedure: k26280 
o|inlining procedure: "(irregex-core.scm:3679) chicken.irregex#make-cset" 
o|merged explicitly consed rest parameter: o5193 
o|inlining procedure: k26395 
o|inlining procedure: k26407 
o|inlining procedure: k26407 
o|inlining procedure: k26425 
o|inlining procedure: k26458 
o|inlining procedure: k26458 
o|inlining procedure: k26425 
o|inlining procedure: k26522 
o|inlining procedure: k26522 
o|inlining procedure: k26557 
o|inlining procedure: k26592 
o|inlining procedure: k26592 
o|inlining procedure: k26557 
o|inlining procedure: k26636 
o|inlining procedure: k26636 
o|contracted procedure: "(irregex-core.scm:3702) chicken.irregex#plist->cset" 
o|inlining procedure: k26330 
o|inlining procedure: k26330 
o|inlining procedure: "(irregex-core.scm:3671) chicken.irregex#make-cset" 
o|contracted procedure: "(irregex-core.scm:3702) chicken.irregex#sre-flatten-ranges" 
o|inlining procedure: k18303 
o|inlining procedure: k18303 
o|inlining procedure: k26648 
o|inlining procedure: k26677 
o|inlining procedure: k26677 
o|inlining procedure: k26648 
o|inlining procedure: k26727 
o|inlining procedure: k26727 
o|substituted constant variable: a26746 
o|substituted constant variable: a26748 
o|substituted constant variable: a26750 
o|substituted constant variable: a26752 
o|substituted constant variable: a26754 
o|substituted constant variable: a26756 
o|substituted constant variable: a26758 
o|inlining procedure: k26395 
o|inlining procedure: k26767 
o|inlining procedure: k26767 
o|inlining procedure: k26780 
o|inlining procedure: k26780 
o|inlining procedure: k26849 
o|inlining procedure: k26849 
o|inlining procedure: k26864 
o|inlining procedure: k26864 
o|substituted constant variable: a26892 
o|inlining procedure: k26885 
o|inlining procedure: k26885 
o|inlining procedure: k26908 
o|inlining procedure: k26908 
o|substituted constant variable: a26924 
o|substituted constant variable: a26926 
o|inlining procedure: k26939 
o|inlining procedure: k26939 
o|inlining procedure: k26981 
o|inlining procedure: k26981 
o|substituted constant variable: a27037 
o|inlining procedure: k27029 
o|inlining procedure: k27029 
o|substituted constant variable: a27063 
o|inlining procedure: k27073 
o|inlining procedure: k27073 
o|inlining procedure: k27176 
o|inlining procedure: k27176 
o|inlining procedure: k27212 
o|inlining procedure: k27212 
o|inlining procedure: k27238 
o|inlining procedure: k27238 
o|inlining procedure: k27263 
o|inlining procedure: k27263 
o|contracted procedure: "(irregex-core.scm:3808) chicken.irregex#next-char" 
o|substituted constant variable: a27146 
o|contracted procedure: "(irregex-core.scm:3806) chicken.irregex#prev-char" 
o|substituted constant variable: a27158 
o|inlining procedure: k27372 
o|inlining procedure: k27372 
o|inlining procedure: k27405 
o|inlining procedure: k27405 
o|contracted procedure: "(irregex-core.scm:3835) chicken.irregex#min-char" 
o|inlining procedure: k27340 
o|inlining procedure: k27340 
o|contracted procedure: "(irregex-core.scm:3834) chicken.irregex#max-char" 
o|inlining procedure: k27349 
o|inlining procedure: k27349 
o|consed rest parameter at call site: "(irregex-core.scm:3843) chicken.irregex#sre->cset" 2 
o|inlining procedure: k27504 
o|inlining procedure: k27504 
o|inlining procedure: k27667 
o|inlining procedure: k27667 
o|inlining procedure: k27697 
o|inlining procedure: k27697 
o|substituted constant variable: chicken.irregex#~consumer? 
o|inlining procedure: "(irregex-core.scm:3880) chicken.irregex#irregex-match-chunker-set!" 
o|propagated global variable: str74232772 chicken.irregex#irregex-basic-string-chunker 
o|inlining procedure: k27746 
o|inlining procedure: k27746 
o|inlining procedure: k27760 
o|inlining procedure: k27760 
o|inlining procedure: k27779 
o|inlining procedure: k27779 
o|inlining procedure: k27885 
o|inlining procedure: k27885 
o|inlining procedure: k27929 
o|inlining procedure: "(irregex-core.scm:3931) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3930) chicken.irregex#chunker-get-next" 
o|inlining procedure: "(irregex-core.scm:3929) chicken.irregex#chunker-get-end" 
o|inlining procedure: k27929 
o|substituted constant variable: chicken.irregex#~consumer? 
o|contracted procedure: "(irregex-core.scm:3926) g55205521" 
o|inlining procedure: "(irregex-core.scm:3919) chicken.irregex#irregex-match-chunker-set!" 
o|inlining procedure: "(irregex-core.scm:3916) chicken.irregex#chunker-get-start" 
o|inlining procedure: k28071 
o|contracted procedure: "(irregex-core.scm:3951) g55525553" 
o|inlining procedure: k28071 
o|inlining procedure: k28176 
o|inlining procedure: k28176 
o|contracted procedure: "(irregex-core.scm:3960) g55655566" 
o|inlining procedure: k28232 
o|inlining procedure: k28232 
o|inlining procedure: k28264 
o|inlining procedure: k28264 
o|inlining procedure: k28290 
o|inlining procedure: k28290 
o|inlining procedure: k28295 
o|inlining procedure: k28295 
o|inlining procedure: k28322 
o|contracted procedure: "(irregex-core.scm:3993) g55995600" 
o|contracted procedure: "(irregex-core.scm:3991) g55955596" 
o|inlining procedure: k28322 
o|contracted procedure: "(irregex-core.scm:3996) g56045605" 
o|inlining procedure: k28433 
o|inlining procedure: k28433 
o|substituted constant variable: a28468 
o|substituted constant variable: a28470 
o|inlining procedure: k28539 
o|inlining procedure: k28539 
o|contracted procedure: "(irregex-core.scm:4035) g56465647" 
o|contracted procedure: "(irregex-core.scm:4032) g56425643" 
o|inlining procedure: k28624 
o|inlining procedure: k28624 
o|inlining procedure: k28642 
o|inlining procedure: k28642 
o|inlining procedure: k28752 
o|inlining procedure: k28752 
o|substituted constant variable: a28769 
o|inlining procedure: k28796 
o|inlining procedure: k28796 
o|substituted constant variable: chicken.irregex#rx-special-chars 
o|inlining procedure: k28959 
o|inlining procedure: k28959 
o|inlining procedure: k28981 
o|inlining procedure: k28993 
o|contracted procedure: "(irregex-utils.scm:47) make-alt5895" 
o|inlining procedure: k28842 
o|inlining procedure: k28842 
o|inlining procedure: k28993 
o|substituted constant variable: a29023 
o|inlining procedure: k29025 
o|inlining procedure: k29025 
o|contracted procedure: "(irregex-utils.scm:55) make-seq5896" 
o|inlining procedure: k28872 
o|inlining procedure: k28872 
o|inlining procedure: k28909 
o|contracted procedure: "(irregex-utils.scm:36) g59195928" 
o|inlining procedure: k28894 
o|inlining procedure: k28894 
o|inlining procedure: k28909 
o|inlining procedure: k28949 
o|inlining procedure: k28949 
o|inlining procedure: k28981 
o|substituted constant variable: a29097 
o|inlining procedure: k29118 
o|inlining procedure: k29118 
o|inlining procedure: k29198 
o|inlining procedure: k29214 
o|inlining procedure: k29236 
o|inlining procedure: k29236 
o|inlining procedure: k29214 
o|inlining procedure: k29266 
o|inlining procedure: k29266 
o|inlining procedure: k29289 
o|inlining procedure: k29289 
o|inlining procedure: k29308 
o|inlining procedure: k29330 
o|inlining procedure: k29330 
o|inlining procedure: k29308 
o|inlining procedure: k29380 
o|inlining procedure: k29380 
o|inlining procedure: k29404 
o|inlining procedure: k29439 
o|inlining procedure: k29439 
o|inlining procedure: k29404 
o|inlining procedure: k29499 
o|inlining procedure: k29499 
o|inlining procedure: k29530 
o|inlining procedure: k29530 
o|inlining procedure: k29597 
o|inlining procedure: k29629 
o|inlining procedure: k29629 
o|substituted constant variable: a29639 
o|consed rest parameter at call site: "(irregex-utils.scm:130) chicken.irregex#sre->cset" 2 
o|inlining procedure: k29653 
o|inlining procedure: k29653 
o|substituted constant variable: a29676 
o|inlining procedure: k29597 
o|inlining procedure: k29710 
o|inlining procedure: k29710 
o|inlining procedure: k29738 
o|inlining procedure: k29738 
o|substituted constant variable: a29766 
o|substituted constant variable: a29768 
o|inlining procedure: k29772 
o|inlining procedure: k29772 
o|substituted constant variable: a29785 
o|substituted constant variable: a29787 
o|substituted constant variable: a29789 
o|substituted constant variable: a29791 
o|substituted constant variable: a29793 
o|substituted constant variable: a29795 
o|inlining procedure: k29799 
o|inlining procedure: k29799 
o|inlining procedure: k29811 
o|inlining procedure: k29811 
o|substituted constant variable: a29818 
o|substituted constant variable: a29820 
o|substituted constant variable: a29822 
o|substituted constant variable: a29824 
o|substituted constant variable: a29826 
o|substituted constant variable: a29828 
o|substituted constant variable: a29830 
o|substituted constant variable: a29832 
o|substituted constant variable: a29837 
o|substituted constant variable: a29839 
o|inlining procedure: k29198 
o|inlining procedure: k29846 
o|inlining procedure: k29846 
o|inlining procedure: k29870 
o|inlining procedure: k29870 
o|substituted constant variable: a29889 
o|substituted constant variable: a29891 
o|substituted constant variable: a29896 
o|substituted constant variable: a29898 
o|substituted constant variable: a29903 
o|substituted constant variable: a29905 
o|inlining procedure: k29906 
o|inlining procedure: k29906 
o|inlining procedure: k29959 
o|inlining procedure: k29959 
o|inlining procedure: k29975 
o|inlining procedure: k29975 
o|substituted constant variable: a30048 
o|inlining procedure: k30044 
o|inlining procedure: k30044 
o|substituted constant variable: a30060 
o|inlining procedure: k30067 
o|inlining procedure: k30067 
o|substituted constant variable: a30108 
o|inlining procedure: k30109 
o|inlining procedure: k30109 
o|inlining procedure: k30184 
o|inlining procedure: k30184 
o|substituted constant variable: a30219 
o|inlining procedure: k30894 
o|inlining procedure: k30894 
o|simplifications: ((if . 8)) 
o|replaced variables: 7188 
o|removed binding forms: 690 
o|removed conditional forms: 3 
o|substituted constant variable: r761430913 
o|removed side-effect free assignment to unused variable: chicken.irregex#irregex-match-chunker 
o|removed side-effect free assignment to unused variable: chicken.irregex#irregex-match-chunker-set! 
o|removed side-effect free assignment to unused variable: chicken.irregex#%irregex-match-fail 
o|removed side-effect free assignment to unused variable: chicken.irregex#%irregex-match-fail-set! 
o|substituted constant variable: r774130915 
o|substituted constant variable: r776630917 
o|substituted constant variable: r779530919 
o|substituted constant variable: r782430921 
o|substituted constant variable: r798130928 
o|substituted constant variable: r798930929 
o|substituted constant variable: r798930930 
o|substituted constant variable: r795930932 
o|substituted constant variable: r811930940 
o|substituted constant variable: r772530942 
o|substituted constant variable: r772530943 
o|substituted constant variable: r816730950 
o|inlining procedure: k8374 
o|substituted constant variable: r838730971 
o|inlining procedure: k8374 
o|substituted constant variable: r837530972 
o|substituted constant variable: r837530972 
o|folded constant expression: (scheme#not (quote #f)) 
o|removed side-effect free assignment to unused variable: chicken.irregex#chunker-get-next 
o|removed side-effect free assignment to unused variable: chicken.irregex#chunker-get-str 
o|removed side-effect free assignment to unused variable: chicken.irregex#chunker-get-start 
o|removed side-effect free assignment to unused variable: chicken.irregex#chunker-get-end 
o|removed side-effect free assignment to unused variable: chicken.irregex#chunker-get-substring 
o|removed side-effect free assignment to unused variable: chicken.irregex#chunker-get-subchunk 
o|substituted constant variable: r860330989 
o|substituted constant variable: r856730990 
o|substituted constant variable: r863631010 
o|removed side-effect free assignment to unused variable: chicken.irregex#*allow-utf8-mode?* 
o|substituted constant variable: r876431016 
o|substituted constant variable: r909231022 
o|substituted constant variable: r913531026 
o|substituted constant variable: r922831035 
o|removed side-effect free assignment to unused variable: chicken.irregex#~none 
o|removed side-effect free assignment to unused variable: chicken.irregex#dot-token 
o|converted assignments to bindings: (collect1341) 
o|substituted constant variable: r1007831068 
o|substituted constant variable: r1007831068 
o|inlining procedure: k10077 
o|inlining procedure: k10077 
o|removed side-effect free assignment to unused variable: chicken.irregex#~save? 
o|removed side-effect free assignment to unused variable: chicken.irregex#~multi-line? 
o|removed side-effect free assignment to unused variable: chicken.irregex#~ignore-space? 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k10290 
o|inlining procedure: k10290 
o|substituted constant variable: chicken.irregex#~single-line? 
o|propagated global variable: r1029132999 chicken.irregex#~single-line? 
o|propagated global variable: r1029132999 chicken.irregex#~single-line? 
o|inlining procedure: k10290 
o|substituted constant variable: r1029131103 
o|substituted constant variable: r1029131103 
o|inlining procedure: k10290 
o|substituted constant variable: r1032731105 
o|substituted constant variable: r1415831124 
o|converted assignments to bindings: (shift1510) 
o|substituted constant variable: r1079631137 
o|substituted constant variable: r1167131195 
o|substituted constant variable: r1167131195 
o|substituted constant variable: r1167131197 
o|substituted constant variable: r1167131197 
o|substituted constant variable: r1208631261 
o|substituted constant variable: c1068 
o|converted assignments to bindings: (collect1078) 
o|substituted constant variable: r1319431288 
o|substituted constant variable: r1320631290 
o|substituted constant variable: r886431300 
o|substituted constant variable: r880731318 
o|substituted constant variable: c1044 
o|folded constant expression: (scheme#eq? (quote #\}) (quote #\\)) 
o|substituted constant variable: c1044 
o|converted assignments to bindings: (byte1943) 
o|substituted constant variable: r1419631328 
o|substituted constant variable: r1420831330 
o|substituted constant variable: r1543131347 
o|substituted constant variable: r1543131347 
o|substituted constant variable: r1423431355 
o|substituted constant variable: r1424631357 
o|substituted constant variable: r1529731365 
o|substituted constant variable: r1529731365 
o|folded constant expression: (scheme#integer->char (quote 127)) 
o|substituted constant variable: r1529731367 
o|substituted constant variable: r1529731367 
o|folded constant expression: (scheme#integer->char (quote 255)) 
o|substituted constant variable: r1446031371 
o|substituted constant variable: r1446031371 
o|substituted constant variable: r2396031431 
o|substituted constant variable: r2396831433 
o|substituted constant variable: r2398331435 
o|substituted constant variable: r2412231446 
o|substituted constant variable: r2413031448 
o|substituted constant variable: r2414531450 
o|substituted constant variable: r869631479 
o|substituted constant variable: r2535731609 
o|substituted constant variable: r2556931653 
o|substituted constant variable: r2571231686 
o|converted assignments to bindings: (rec4398) 
o|substituted constant variable: chicken.irregex#~consumer? 
o|substituted constant variable: chicken.irregex#~consumer? 
o|substituted constant variable: r1616131761 
o|substituted constant variable: r1616131761 
o|substituted constant variable: chicken.irregex#~searcher? 
o|substituted constant variable: chicken.irregex#~searcher? 
o|substituted constant variable: r1616831765 
o|substituted constant variable: r1616831765 
o|substituted constant variable: r1703931770 
o|substituted constant variable: r1703931770 
o|inlining procedure: k17120 
o|substituted constant variable: r1712131779 
o|substituted constant variable: r1712131779 
o|inlining procedure: k17155 
o|substituted constant variable: r1715631784 
o|substituted constant variable: r1715631784 
o|inlining procedure: k17198 
o|substituted constant variable: r1719931790 
o|substituted constant variable: r1719931790 
o|substituted constant variable: r1720931794 
o|substituted constant variable: r1720931794 
o|inlining procedure: k17237 
o|substituted constant variable: r1723831799 
o|substituted constant variable: r1723831799 
o|inlining procedure: k17325 
o|substituted constant variable: r1733231805 
o|substituted constant variable: r1732631806 
o|substituted constant variable: r1732631806 
o|inlining procedure: k17506 
o|substituted constant variable: r1750731825 
o|substituted constant variable: r1750731825 
o|inlining procedure: k17637 
o|substituted constant variable: r1763831835 
o|substituted constant variable: r1763831835 
o|substituted constant variable: r1769631838 
o|substituted constant variable: r1771131840 
o|inlining procedure: k17782 
o|substituted constant variable: r1778331845 
o|substituted constant variable: r1778331845 
o|substituted constant variable: r1782331848 
o|substituted constant variable: r1782331848 
o|converted assignments to bindings: (grow2843) 
o|substituted constant variable: r1619231885 
o|substituted constant variable: r1622731887 
o|substituted constant variable: r1622731888 
o|substituted constant variable: r1574631903 
o|substituted constant variable: r1589531913 
o|substituted constant variable: r1595431918 
o|converted assignments to bindings: (rec2352) 
o|substituted constant variable: r1629131923 
o|substituted constant variable: r1643631939 
o|substituted constant variable: r1653331948 
o|substituted constant variable: r1652131949 
o|substituted constant variable: r1650931951 
o|substituted constant variable: r1657031954 
o|substituted constant variable: r1658531956 
o|substituted constant variable: r1668331967 
o|substituted constant variable: r1669831969 
o|substituted constant variable: r1680031979 
o|substituted constant variable: r1681531981 
o|substituted constant variable: r1687731989 
o|substituted constant variable: r1693931991 
o|substituted constant variable: r1693931991 
o|inlining procedure: k16938 
o|substituted constant variable: r1696531996 
o|substituted constant variable: r1812532000 
o|substituted constant variable: r1814832002 
o|substituted constant variable: r1888932050 
o|substituted constant variable: r1888932050 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r1890332054 
o|substituted constant variable: r1890332054 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r1891632057 
o|substituted constant variable: r1899932071 
o|substituted constant variable: r1908632076 
o|substituted constant variable: r1902432092 
o|substituted constant variable: r1962732094 
o|substituted constant variable: index3452 
o|substituted constant variable: index3452 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: index3452 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|inlining procedure: k19632 
o|inlining procedure: k19650 
o|inlining procedure: k19662 
o|substituted constant variable: r1967832097 
o|substituted constant variable: r1972932101 
o|substituted constant variable: r1961232108 
o|substituted constant variable: x75032137 
o|inlining procedure: k19116 
o|substituted constant variable: r1919832161 
o|substituted constant variable: r1927132179 
o|substituted constant variable: r1927132179 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r1928532183 
o|substituted constant variable: r1928532183 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r1929832186 
o|substituted constant variable: r1934732194 
o|substituted constant variable: n3386 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: x75032209 
o|substituted constant variable: r1946432219 
o|substituted constant variable: n3426 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: n3420 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: r1945232235 
o|substituted constant variable: r1955432257 
o|substituted constant variable: r1955432258 
o|removed side-effect free assignment to unused variable: chicken.irregex#dfa-init-state 
o|removed side-effect free assignment to unused variable: chicken.irregex#dfa-cell-commands 
o|removed side-effect free assignment to unused variable: chicken.irregex#dfa-finalizer 
o|substituted constant variable: r1977732261 
o|substituted constant variable: r1977732261 
o|substituted constant variable: r1979332265 
o|substituted constant variable: r1979332265 
o|substituted constant variable: r1998232271 
o|substituted constant variable: r1998232272 
o|inlining procedure: k19987 
o|substituted constant variable: r1995632273 
o|substituted constant variable: r2019732293 
o|inlining procedure: k20202 
o|removed side-effect free assignment to unused variable: chicken.irregex#*nfa-presize* 
o|removed side-effect free assignment to unused variable: chicken.irregex#*nfa-num-fields* 
o|removed side-effect free assignment to unused variable: chicken.irregex#nfa-num-tags 
o|removed side-effect free assignment to unused variable: chicken.irregex#nfa-highest-map-index 
o|substituted constant variable: r2046732342 
o|substituted constant variable: r2072532349 
o|substituted constant variable: r2079132355 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|substituted constant variable: chicken.irregex#~utf8? 
o|substituted constant variable: chicken.irregex#~utf8? 
o|inlining procedure: k21160 
o|substituted constant variable: r2115532385 
o|inlining procedure: k21260 
o|substituted constant variable: r2124932393 
o|substituted constant variable: r2154032409 
o|removed side-effect free assignment to unused variable: chicken.irregex#*mst-first-state-index* 
o|removed side-effect free assignment to unused variable: chicken.irregex#mst-mappings-summary 
o|removed side-effect free assignment to unused variable: chicken.irregex#mst-num-states 
o|removed side-effect free assignment to unused variable: chicken.irregex#mst-num-states-set! 
o|removed side-effect free assignment to unused variable: chicken.irregex#mst-hash 
o|removed side-effect free assignment to unused variable: chicken.irregex#mst-hash-set! 
o|substituted constant variable: r2311732484 
o|substituted constant variable: r2209432512 
o|substituted constant variable: r2053132534 
o|substituted constant variable: r2262132549 
o|substituted constant variable: r2044132550 
o|substituted constant variable: r2058832633 
o|substituted constant variable: r2304932645 
o|substituted constant variable: r2307332647 
o|substituted constant variable: r2302732648 
o|removed side-effect free assignment to unused variable: chicken.irregex#make-cset 
o|removed side-effect free assignment to unused variable: chicken.irregex#cset=? 
o|converted assignments to bindings: (rec5201) 
o|substituted constant variable: r2685032728 
o|substituted constant variable: r2686532731 
o|substituted constant variable: r2690932735 
o|substituted constant variable: r2774732778 
o|substituted constant variable: r2774732778 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r2776132782 
o|substituted constant variable: r2776132782 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r2778032785 
o|substituted constant variable: n5523 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: n5555 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: n5568 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: r2829132828 
o|substituted constant variable: r2829132828 
o|substituted constant variable: n5602 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: n5598 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: n5607 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: n5649 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: n5645 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|removed side-effect free assignment to unused variable: chicken.irregex#rx-special-chars 
o|substituted constant variable: r2875332844 
o|substituted constant variable: r2896032848 
o|substituted constant variable: r2929032878 
o|substituted constant variable: r2965432899 
o|substituted constant variable: r2996032918 
o|substituted constant variable: r3018532929 
o|simplifications: ((let . 8)) 
o|replaced variables: 1033 
o|removed binding forms: 6499 
o|removed conditional forms: 1 
o|inlining procedure: k8002 
o|inlining procedure: k8002 
o|inlining procedure: k8361 
o|substituted constant variable: r837532944 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r837532946 
o|folded constant expression: (scheme#not (quote #f)) 
o|removed side-effect free assignment to unused variable: chicken.irregex#~searcher? 
o|removed side-effect free assignment to unused variable: chicken.irregex#~consumer? 
o|substituted constant variable: r1007832991 
o|removed side-effect free assignment to unused variable: chicken.irregex#~case-insensitive? 
o|removed side-effect free assignment to unused variable: chicken.irregex#~utf8? 
o|inlining procedure: "(irregex-core.scm:718) chicken.irregex#flag-join" 
o|inlining procedure: "(irregex-core.scm:718) chicken.irregex#flag-join" 
o|substituted constant variable: r1029132997 
o|substituted constant variable: chicken.irregex#~single-line? 
o|inlining procedure: "(irregex-core.scm:718) chicken.irregex#flag-join" 
o|substituted constant variable: chicken.irregex#~single-line? 
o|propagated global variable: b127533458 chicken.irregex#~single-line? 
o|propagated global variable: b127533458 chicken.irregex#~single-line? 
o|inlining procedure: "(irregex-core.scm:718) chicken.irregex#flag-join" 
o|substituted constant variable: r1029133001 
o|inlining procedure: "(irregex-core.scm:718) chicken.irregex#flag-join" 
o|inlining procedure: "(irregex-core.scm:718) chicken.irregex#flag-join" 
o|substituted constant variable: r1029133003 
o|inlining procedure: "(irregex-core.scm:740) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:745) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:754) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:798) chicken.irregex#flag-set?" 
o|inlining procedure: k10873 
o|inlining procedure: k10873 
o|inlining procedure: "(irregex-core.scm:833) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:875) chicken.irregex#flag-join" 
o|inlining procedure: "(irregex-core.scm:892) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:894) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:897) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:906) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:909) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:916) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:922) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:937) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:942) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:945) chicken.irregex#flag-clear" 
o|inlining procedure: chicken.irregex#flag-clear 
o|inlining procedure: chicken.irregex#flag-join 
o|inlining procedure: "(irregex-core.scm:956) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:955) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1214) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3779) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1215) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1213) chicken.irregex#cset-empty?" 
o|inlining procedure: "(irregex-core.scm:1225) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3779) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1234) chicken.irregex#range->cset" 
o|inlining procedure: "(irregex-core.scm:1242) chicken.irregex#utf8-start-char->length" 
o|inlining procedure: "(irregex-core.scm:1262) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3779) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1273) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3779) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1278) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3779) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1284) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3779) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1281) chicken.irregex#utf8-start-char->length" 
o|inlining procedure: "(irregex-core.scm:1285) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3779) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1290) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1289) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1206) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1087) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1130) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:435) a12865" 
o|inlining procedure: "(irregex-core.scm:1148) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1151) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1154) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1158) chicken.irregex#flag-set?" 
o|contracted procedure: k8821 
o|removed call to pure procedure with unused result: "(irregex-core.scm:1430) ##sys#slot" 
o|removed call to pure procedure with unused result: "(irregex-core.scm:1485) ##sys#slot" 
o|inlining procedure: k15059 
o|inlining procedure: k15059 
o|inlining procedure: k15059 
o|inlining procedure: k15059 
o|removed call to pure procedure with unused result: "(irregex-core.scm:1496) ##sys#slot" 
o|inlining procedure: "(irregex-core.scm:1493) chicken.irregex#utf8-start-char->length" 
o|removed call to pure procedure with unused result: "(irregex-core.scm:1476) ##sys#slot" 
o|inlining procedure: k15292 
o|inlining procedure: k15292 
o|removed call to pure procedure with unused result: "(irregex-core.scm:1505) ##sys#slot" 
o|inlining procedure: "(irregex-core.scm:1516) chicken.irregex#high-char?" 
o|inlining procedure: "(irregex-core.scm:1516) chicken.irregex#high-char?" 
o|inlining procedure: "(irregex-core.scm:3121) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:3126) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:3145) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:3150) chicken.irregex#flag-join" 
o|inlining procedure: "(irregex-core.scm:3153) chicken.irregex#flag-join" 
o|inlining procedure: "(irregex-core.scm:3155) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:3384) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:3564) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1616) chicken.irregex#flag-join" 
o|inlining procedure: "(irregex-core.scm:1616) chicken.irregex#flag-join" 
o|inlining procedure: "(irregex-core.scm:1617) chicken.irregex#flag-join" 
o|inlining procedure: "(irregex-core.scm:1617) chicken.irregex#flag-join" 
o|substituted constant variable: r1712133093 
o|substituted constant variable: r1715633095 
o|substituted constant variable: r1719933099 
o|substituted constant variable: r1723833101 
o|substituted constant variable: r1732633105 
o|substituted constant variable: r1750733107 
o|substituted constant variable: r1763833109 
o|substituted constant variable: r1778333111 
o|inlining procedure: "(irregex-core.scm:1611) chicken.irregex#nfa-num-states" 
o|inlining procedure: "(irregex-core.scm:1607) chicken.irregex#nfa-num-states" 
o|inlining procedure: "(irregex-core.scm:1558) chicken.irregex#high-char?" 
o|inlining procedure: "(irregex-core.scm:1525) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1524) chicken.irregex#flag-set?" 
o|substituted constant variable: r1693933131 
o|inlining procedure: k18881 
o|inlining procedure: k18895 
o|substituted constant variable: r1965133159 
o|folded constant expression: (scheme#+ (quote 3) (quote 0)) 
o|substituted constant variable: r1966333161 
o|folded constant expression: (scheme#+ (quote 2) (quote 0)) 
o|inlining procedure: "(irregex-core.scm:2131) chicken.irregex#dfa-next-state" 
o|inlining procedure: "(irregex-core.scm:2110) chicken.irregex#dfa-next-state" 
o|inlining procedure: "(irregex-core.scm:1976) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:2015) chicken.irregex#flag-set?" 
o|inlining procedure: k19263 
o|inlining procedure: k19277 
o|contracted procedure: k19399 
o|contracted procedure: k19511 
o|contracted procedure: k19539 
o|substituted constant variable: r199823227133190 
o|substituted constant variable: r199823227233191 
o|inlining procedure: k20187 
o|inlining procedure: "(irregex-core.scm:2212) chicken.irregex#dfa-next-state" 
o|substituted constant variable: r201973229333199 
o|inlining procedure: "(irregex-core.scm:2166) chicken.irregex#dfa-next-state" 
o|inlining procedure: "(irregex-core.scm:2466) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:2466) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:2467) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:2465) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:2504) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:2526) chicken.irregex#flag-set?" 
o|inlining procedure: k21200 
o|inlining procedure: "(irregex-core.scm:2715) chicken.irregex#nfa-num-states" 
o|inlining procedure: "(irregex-core.scm:2749) chicken.irregex#nfa-num-states" 
o|inlining procedure: "(irregex-core.scm:2735) chicken.irregex#mst-state-mappings" 
o|inlining procedure: "(irregex-core.scm:2878) chicken.irregex#mst-state-mappings" 
o|inlining procedure: k23247 
o|inlining procedure: k23247 
o|inlining procedure: "(irregex-core.scm:2968) chicken.irregex#cset-empty?" 
o|inlining procedure: "(irregex-core.scm:2958) chicken.irregex#cset-empty?" 
o|inlining procedure: "(irregex-core.scm:2931) chicken.irregex#cset-empty?" 
o|inlining procedure: k22446 
o|inlining procedure: "(irregex-core.scm:2380) chicken.irregex#nfa-num-states" 
o|inlining procedure: "(irregex-core.scm:2781) chicken.irregex#nfa-num-states" 
o|inlining procedure: "(irregex-core.scm:2774) chicken.irregex#mst-state-mappings" 
o|inlining procedure: "(irregex-core.scm:2757) chicken.irregex#nfa-num-states" 
o|inlining procedure: k21922 
o|inlining procedure: "(irregex-core.scm:2754) chicken.irregex#mst-state-mappings" 
o|inlining procedure: "(irregex-core.scm:2985) chicken.irregex#nfa-num-states" 
o|inlining procedure: "(irregex-core.scm:3678) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3779) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:3674) chicken.irregex#range->cset" 
o|inlining procedure: "(irregex-core.scm:3715) chicken.irregex#range->cset" 
o|inlining procedure: "(irregex-core.scm:3716) chicken.irregex#range->cset" 
o|inlining procedure: "(irregex-core.scm:3779) chicken.irregex#char->cset" 
o|inlining procedure: k27455 
o|inlining procedure: k27455 
o|inlining procedure: "(irregex-core.scm:3856) chicken.irregex#range->cset" 
o|inlining procedure: "(irregex-core.scm:3897) chicken.irregex#flag-set?" 
o|inlining procedure: k27739 
o|inlining procedure: k27753 
o|inlining procedure: k27767 
o|inlining procedure: k27767 
o|inlining procedure: k27794 
o|inlining procedure: "(irregex-core.scm:3935) chicken.irregex#flag-set?" 
o|contracted procedure: k27920 
o|contracted procedure: k28116 
o|contracted procedure: k28167 
o|contracted procedure: k28360 
o|contracted procedure: k28377 
o|contracted procedure: k28424 
o|contracted procedure: k28580 
o|contracted procedure: k28601 
o|inlining procedure: k28704 
o|inlining procedure: k28999 
o|inlining procedure: k29044 
o|inlining procedure: k28930 
o|replaced variables: 4 
o|removed binding forms: 1093 
o|substituted constant variable: r800333411 
o|substituted constant variable: r800333414 
o|removed side-effect free assignment to unused variable: chicken.irregex#flag-set? 
o|substituted constant variable: b127533450 
o|substituted constant variable: b127533450 
o|substituted constant variable: b127533454 
o|substituted constant variable: b127533454 
o|substituted constant variable: chicken.irregex#~single-line? 
o|substituted constant variable: chicken.irregex#~single-line? 
o|substituted constant variable: b127533462 
o|substituted constant variable: b127533462 
o|substituted constant variable: b127533466 
o|substituted constant variable: b127533466 
o|substituted constant variable: b127533470 
o|substituted constant variable: b127533470 
o|inlining procedure: k10285 
o|substituted constant variable: i127133476 
o|substituted constant variable: i127133476 
o|substituted constant variable: i127133484 
o|substituted constant variable: i127133484 
o|substituted constant variable: i127133498 
o|substituted constant variable: i127133498 
o|substituted constant variable: i127133504 
o|substituted constant variable: i127133504 
o|substituted constant variable: r1087433510 
o|substituted constant variable: r1087433514 
o|substituted constant variable: i127133520 
o|substituted constant variable: i127133520 
o|substituted constant variable: b127533526 
o|substituted constant variable: b127533526 
o|substituted constant variable: b127933530 
o|substituted constant variable: b127933536 
o|substituted constant variable: b127933542 
o|substituted constant variable: b127933548 
o|substituted constant variable: b127933554 
o|substituted constant variable: b127933560 
o|substituted constant variable: b127933566 
o|substituted constant variable: b127933572 
o|substituted constant variable: b127933578 
o|substituted constant variable: b127933584 
o|substituted constant variable: i127133600 
o|substituted constant variable: i127133600 
o|substituted constant variable: i127133606 
o|substituted constant variable: i127133606 
o|substituted constant variable: ch537633614 
o|substituted constant variable: ch537633614 
o|substituted constant variable: ch537633614 
o|substituted constant variable: i127133625 
o|substituted constant variable: i127133625 
o|substituted constant variable: ch537633658 
o|substituted constant variable: ch537633658 
o|substituted constant variable: ch537633658 
o|substituted constant variable: ch516133717 
o|substituted constant variable: ch516133717 
o|substituted constant variable: i127133723 
o|substituted constant variable: i127133723 
o|substituted constant variable: i127133731 
o|substituted constant variable: i127133731 
o|substituted constant variable: i127133739 
o|substituted constant variable: i127133739 
o|substituted constant variable: i127133747 
o|substituted constant variable: i127133747 
o|substituted constant variable: i127133760 
o|substituted constant variable: i127133760 
o|substituted constant variable: i127133766 
o|substituted constant variable: i127133766 
o|substituted constant variable: i127133772 
o|substituted constant variable: i127133772 
o|substituted constant variable: i127133778 
o|substituted constant variable: i127133778 
o|substituted constant variable: r8822 
o|removed side-effect free assignment to unused variable: chicken.irregex#utf8-start-char->length 
o|contracted procedure: k14638 
o|contracted procedure: k15040 
o|substituted constant variable: r1506033796 
o|folded constant expression: (scheme#integer->char (quote 127)) 
o|substituted constant variable: r1506033797 
o|folded constant expression: (scheme#integer->char (quote 223)) 
o|substituted constant variable: r1506033798 
o|folded constant expression: (scheme#integer->char (quote 239)) 
o|substituted constant variable: r1506033799 
o|folded constant expression: (scheme#integer->char (quote 247)) 
o|contracted procedure: k15143 
o|contracted procedure: k15281 
o|substituted constant variable: r1529333811 
o|substituted constant variable: r1529333812 
o|contracted procedure: k15372 
o|contracted procedure: k16137 
o|substituted constant variable: i127133831 
o|substituted constant variable: i127133831 
o|substituted constant variable: i127133837 
o|substituted constant variable: i127133837 
o|substituted constant variable: b127933843 
o|substituted constant variable: b127533849 
o|substituted constant variable: b127533849 
o|substituted constant variable: b127533853 
o|substituted constant variable: b127533853 
o|substituted constant variable: b127933857 
o|substituted constant variable: i127133865 
o|substituted constant variable: i127133865 
o|substituted constant variable: i127133875 
o|substituted constant variable: i127133875 
o|substituted constant variable: b127533883 
o|substituted constant variable: b127533883 
o|substituted constant variable: b127533887 
o|substituted constant variable: b127533887 
o|substituted constant variable: b127533891 
o|substituted constant variable: a127433890 
o|substituted constant variable: b127533891 
o|substituted constant variable: a127433890 
o|substituted constant variable: b127533895 
o|substituted constant variable: a127433894 
o|substituted constant variable: b127533895 
o|substituted constant variable: a127433894 
o|substituted constant variable: i127133932 
o|substituted constant variable: i127133932 
o|substituted constant variable: i127133938 
o|substituted constant variable: i127133938 
o|substituted constant variable: r1888233948 
o|substituted constant variable: r1889633949 
o|contracted procedure: k19646 
o|contracted procedure: k19658 
o|substituted constant variable: i127133972 
o|substituted constant variable: i127133972 
o|substituted constant variable: i127133980 
o|substituted constant variable: i127133980 
o|substituted constant variable: r1926433984 
o|substituted constant variable: r1927833985 
o|substituted constant variable: r19400 
o|folded constant expression: (scheme#+ (quote 2) (quote 0)) 
o|substituted constant variable: r19512 
o|folded constant expression: (scheme#+ (quote 2) (quote 0)) 
o|substituted constant variable: r19540 
o|folded constant expression: (scheme#+ (quote 2) (quote 0)) 
o|removed side-effect free assignment to unused variable: chicken.irregex#dfa-next-state 
o|substituted constant variable: r2018833994 
o|removed side-effect free assignment to unused variable: chicken.irregex#nfa-num-states 
o|substituted constant variable: i127134034 
o|substituted constant variable: i127134034 
o|substituted constant variable: i127134042 
o|substituted constant variable: i127134042 
o|substituted constant variable: i127134048 
o|substituted constant variable: i127134048 
o|removed side-effect free assignment to unused variable: chicken.irregex#mst-state-mappings 
o|substituted constant variable: state401134087 
o|folded constant expression: (scheme#+ (quote 0) (quote 3)) 
o|substituted constant variable: r2324834097 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r2324834098 
o|folded constant expression: (scheme#not (quote #f)) 
o|contracted procedure: k22871 
o|removed side-effect free assignment to unused variable: chicken.irregex#range->cset 
o|removed side-effect free assignment to unused variable: chicken.irregex#char->cset 
o|removed side-effect free assignment to unused variable: chicken.irregex#cset-empty? 
o|removed side-effect free assignment to unused variable: chicken.irregex#cset-adjoin 
o|substituted constant variable: i127134242 
o|substituted constant variable: i127134242 
o|substituted constant variable: r2774034248 
o|substituted constant variable: r2775434249 
o|substituted constant variable: r2776834250 
o|substituted constant variable: r2776834251 
o|substituted constant variable: r2779534252 
o|substituted constant variable: i127134255 
o|substituted constant variable: i127134255 
o|substituted constant variable: r27921 
o|folded constant expression: (scheme#+ (quote 2) (quote 0)) 
o|substituted constant variable: r28117 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|substituted constant variable: r28168 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|substituted constant variable: r28361 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|substituted constant variable: r28378 
o|substituted constant variable: r28425 
o|substituted constant variable: r28581 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|substituted constant variable: r28602 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|substituted constant variable: r2870534265 
o|replaced variables: 273 
o|removed binding forms: 66 
o|removed conditional forms: 27 
o|removed side-effect free assignment to unused variable: chicken.irregex#~single-line? 
o|inlining procedure: k15055 
o|inlining procedure: k15055 
o|inlining procedure: k15055 
o|inlining procedure: k15055 
o|inlining procedure: k16180 
o|inlining procedure: k16210 
o|substituted constant variable: r19647 
o|substituted constant variable: r19659 
o|contracted procedure: k19395 
o|contracted procedure: k19507 
o|contracted procedure: k19535 
o|inlining procedure: k21782 
o|inlining procedure: k21871 
o|contracted procedure: k2174434090 
o|inlining procedure: k20415 
o|inlining procedure: k21997 
o|inlining procedure: k21954 
o|inlining procedure: k22918 
o|contracted procedure: k27916 
o|contracted procedure: k28112 
o|contracted procedure: k28163 
o|contracted procedure: k28356 
o|contracted procedure: k28576 
o|contracted procedure: k28597 
o|replaced variables: 4 
o|removed binding forms: 356 
o|substituted constant variable: r1505634608 
o|substituted constant variable: r1505634609 
o|substituted constant variable: r1505634610 
o|substituted constant variable: r1505634611 
o|substituted constant variable: r19396 
o|substituted constant variable: r19508 
o|substituted constant variable: r19536 
o|substituted constant variable: r2174534088 
o|substituted constant variable: r27917 
o|substituted constant variable: r28113 
o|substituted constant variable: r28164 
o|substituted constant variable: r28357 
o|substituted constant variable: r28577 
o|substituted constant variable: r28598 
o|removed binding forms: 14 
o|removed binding forms: 14 
o|simplifications: ((let . 235) (if . 172) (##core#call . 2973)) 
o|  call simplifications:
o|    ##sys#check-string
o|    chicken.fixnum#fx>	2
o|    scheme#write-char
o|    scheme#list->string	2
o|    scheme#char>?	5
o|    scheme#char<=?	2
o|    scheme#char>=?	3
o|    scheme#quotient
o|    scheme#assoc	4
o|    scheme#modulo	3
o|    scheme#memv	4
o|    scheme#char?	11
o|    scheme#char=?	7
o|    scheme#cdddr	9
o|    scheme#cadddr	2
o|    scheme#symbol?	7
o|    scheme#caddr	14
o|    scheme#vector-set!	63
o|    chicken.fixnum#fx+	2
o|    chicken.fixnum#fxmod
o|    ##sys#setislot
o|    scheme#length	6
o|    ##sys#check-list	31
o|    chicken.fixnum#fxshr	6
o|    chicken.fixnum#fxshl	6
o|    chicken.fixnum#fx<=	8
o|    scheme#integer->char	27
o|    scheme#char-upper-case?
o|    scheme#char-upcase
o|    scheme#char-downcase
o|    scheme#equal?	9
o|    scheme#assv	4
o|    scheme#char<?	7
o|    scheme#string	10
o|    ##sys#cons	117
o|    scheme#cddr	31
o|    scheme#cadr	64
o|    scheme#>	11
o|    scheme#char->integer	19
o|    chicken.fixnum#fx<
o|    chicken.fixnum#fx>=
o|    scheme#string->list	7
o|    ##sys#setslot	33
o|    ##sys#list	179
o|    scheme#string?	23
o|    scheme#char-whitespace?	2
o|    chicken.fixnum#fxnot	14
o|    chicken.fixnum#fxand	58
o|    chicken.fixnum#fxior	21
o|    scheme#car	79
o|    scheme#<=	5
o|    scheme#char-alphabetic?	7
o|    scheme#char-numeric?	5
o|    scheme#=	68
o|    scheme#-	20
o|    scheme#string-ref	69
o|    scheme#string-length	24
o|    scheme#list	49
o|    scheme#cons	223
o|    scheme#procedure?	10
o|    scheme#vector	26
o|    scheme#vector-ref	168
o|    scheme#assq	13
o|    scheme#not	97
o|    scheme#cdr	60
o|    scheme#pair?	123
o|    scheme#number?	13
o|    scheme#null?	65
o|    scheme#caar	26
o|    scheme#eq?	434
o|    scheme#cdar	15
o|    scheme#exact?	8
o|    scheme#>=	27
o|    scheme#<	21
o|    scheme#apply	16
o|    scheme#*	52
o|    scheme#+	150
o|    ##sys#size	8
o|    chicken.fixnum#fx/
o|    ##sys#make-structure	4
o|    ##sys#check-structure	6
o|    ##sys#slot	215
o|    ##sys#structure?	3
o|    scheme#vector-length	20
o|contracted procedure: k7506 
o|contracted procedure: k7554 
o|contracted procedure: k7572 
o|contracted procedure: k7589 
o|contracted procedure: k7604 
o|contracted procedure: k7616 
o|contracted procedure: k7627 
o|contracted procedure: k7631 
o|contracted procedure: k7635 
o|contracted procedure: k7639 
o|contracted procedure: k7651 
o|contracted procedure: k7664 
o|contracted procedure: k7660 
o|contracted procedure: k7655 
o|contracted procedure: k7676 
o|contracted procedure: k7695 
o|contracted procedure: k7703 
o|contracted procedure: k7699 
o|contracted procedure: k7749 
o|contracted procedure: k7753 
o|contracted procedure: k7774 
o|contracted procedure: k7782 
o|contracted procedure: k7778 
o|contracted procedure: k7803 
o|contracted procedure: k7811 
o|contracted procedure: k7807 
o|contracted procedure: k7916 
o|contracted procedure: k8087 
o|contracted procedure: k7925 
o|contracted procedure: k8083 
o|contracted procedure: k7931 
o|contracted procedure: k7941 
o|contracted procedure: k7947 
o|contracted procedure: k7985 
o|contracted procedure: k7999 
o|contracted procedure: k7995 
o|contracted procedure: k7991 
o|contracted procedure: k7955 
o|contracted procedure: k7961 
o|substituted constant variable: g35539 
o|contracted procedure: k7968 
o|contracted procedure: k7973 
o|contracted procedure: k8028 
o|contracted procedure: k8079 
o|contracted procedure: k8040 
o|contracted procedure: k8052 
o|contracted procedure: k8056 
o|contracted procedure: k8059 
o|contracted procedure: k8141 
o|contracted procedure: k8107 
o|contracted procedure: k8115 
o|contracted procedure: k8121 
o|substituted constant variable: g35545 
o|contracted procedure: k8128 
o|contracted procedure: k8133 
o|contracted procedure: k7727 
o|contracted procedure: k8147 
o|contracted procedure: k8163 
o|contracted procedure: k8169 
o|contracted procedure: k8182 
o|contracted procedure: k8186 
o|contracted procedure: k8189 
o|contracted procedure: k8199 
o|contracted procedure: k8207 
o|contracted procedure: k8203 
o|contracted procedure: k8210 
o|contracted procedure: k8220 
o|contracted procedure: k8228 
o|contracted procedure: k8224 
o|contracted procedure: k8231 
o|contracted procedure: k8244 
o|contracted procedure: k8247 
o|contracted procedure: k8253 
o|contracted procedure: k8272 
o|contracted procedure: k8276 
o|contracted procedure: k8279 
o|contracted procedure: k8289 
o|contracted procedure: k8297 
o|contracted procedure: k8293 
o|contracted procedure: k8300 
o|contracted procedure: k8310 
o|contracted procedure: k8318 
o|contracted procedure: k8314 
o|contracted procedure: k8321 
o|contracted procedure: k8523 
o|contracted procedure: k8331 
o|contracted procedure: k8334 
o|contracted procedure: k8517 
o|contracted procedure: k8337 
o|contracted procedure: k8513 
o|contracted procedure: k8340 
o|contracted procedure: k8343 
o|contracted procedure: k8500 
o|contracted procedure: k8346 
o|contracted procedure: k8496 
o|contracted procedure: k8349 
o|contracted procedure: k8352 
o|contracted procedure: k8408 
o|contracted procedure: k8426 
o|contracted procedure: k8435 
o|contracted procedure: k8442 
o|contracted procedure: k8465 
o|contracted procedure: k8399 
o|contracted procedure: k8355 
o|contracted procedure: k8395 
o|contracted procedure: k8358 
o|contracted procedure: k8377 
o|contracted procedure: k8383 
o|contracted procedure: k8389 
o|contracted procedure: k8374 
o|contracted procedure: k8609 
o|contracted procedure: k8620 
o|contracted procedure: k8616 
o|contracted procedure: k8569 
o|contracted procedure: k8572 
o|contracted procedure: k8587 
o|contracted procedure: k8629 
o|contracted procedure: k8642 
o|contracted procedure: k8649 
o|contracted procedure: k8743 
o|contracted procedure: k8750 
o|contracted procedure: k8786 
o|contracted procedure: k8757 
o|contracted procedure: k8766 
o|contracted procedure: k8783 
o|contracted procedure: k8772 
o|contracted procedure: k8957 
o|contracted procedure: k9073 
o|contracted procedure: k9077 
o|contracted procedure: k9080 
o|contracted procedure: k9055 
o|contracted procedure: k9094 
o|substituted constant variable: g35559 
o|contracted procedure: k9101 
o|contracted procedure: k9118 
o|contracted procedure: k9122 
o|contracted procedure: k9137 
o|contracted procedure: k9153 
o|contracted procedure: k9221 
o|contracted procedure: k9192 
o|contracted procedure: k9217 
o|contracted procedure: k9207 
o|contracted procedure: k9230 
o|contracted procedure: k9246 
o|contracted procedure: k9262 
o|contracted procedure: k9270 
o|contracted procedure: k9280 
o|contracted procedure: k9291 
o|contracted procedure: k9307 
o|contracted procedure: k9324 
o|contracted procedure: k9331 
o|contracted procedure: k9658 
o|contracted procedure: k9665 
o|contracted procedure: k9673 
o|contracted procedure: k9682 
o|contracted procedure: k9688 
o|contracted procedure: k9694 
o|contracted procedure: k9715 
o|contracted procedure: k9728 
o|contracted procedure: k9734 
o|contracted procedure: k9783 
o|contracted procedure: k9755 
o|contracted procedure: k9773 
o|contracted procedure: k9779 
o|contracted procedure: k9790 
o|contracted procedure: k9796 
o|contracted procedure: k9808 
o|contracted procedure: k9823 
o|contracted procedure: k9833 
o|contracted procedure: k9840 
o|contracted procedure: k9848 
o|contracted procedure: k9854 
o|contracted procedure: k9857 
o|contracted procedure: k9884 
o|contracted procedure: k9879 
o|contracted procedure: k9869 
o|contracted procedure: k9876 
o|contracted procedure: k9890 
o|contracted procedure: k9896 
o|contracted procedure: k9899 
o|contracted procedure: k9912 
o|contracted procedure: k9919 
o|contracted procedure: k9927 
o|contracted procedure: k9939 
o|contracted procedure: k9960 
o|contracted procedure: k9973 
o|contracted procedure: k9979 
o|contracted procedure: k9985 
o|contracted procedure: k10005 
o|contracted procedure: k10034 
o|contracted procedure: k10037 
o|contracted procedure: k10043 
o|contracted procedure: k10061 
o|contracted procedure: k10080 
o|contracted procedure: k10086 
o|contracted procedure: k10094 
o|contracted procedure: k10111 
o|contracted procedure: k10114 
o|contracted procedure: k10129 
o|contracted procedure: k10121 
o|contracted procedure: k10155 
o|contracted procedure: k10176 
o|contracted procedure: k10202 
o|contracted procedure: k10205 
o|contracted procedure: k10208 
o|contracted procedure: k10247 
o|contracted procedure: k10382 
o|contracted procedure: k10274 
o|contracted procedure: k10281 
o|contracted procedure: k10293 
o|inlining procedure: k10285 
o|contracted procedure: k10302 
o|contracted procedure: k10305 
o|inlining procedure: k10285 
o|contracted procedure: k10311 
o|contracted procedure: k10314 
o|contracted procedure: k10320 
o|contracted procedure: k10323 
o|contracted procedure: k10329 
o|contracted procedure: k10332 
o|contracted procedure: k10366 
o|contracted procedure: k10391 
o|contracted procedure: k10403 
o|contracted procedure: k963933479 
o|contracted procedure: k10431 
o|substituted constant variable: g35592 
o|contracted procedure: k10421 
o|contracted procedure: k963933487 
o|contracted procedure: k10443 
o|substituted constant variable: g35596 
o|contracted procedure: k10450 
o|contracted procedure: k10465 
o|contracted procedure: k10468 
o|contracted procedure: k10471 
o|contracted procedure: k10479 
o|contracted procedure: k10487 
o|contracted procedure: k10499 
o|contracted procedure: k963933501 
o|contracted procedure: k10516 
o|substituted constant variable: g35610 
o|contracted procedure: k10525 
o|contracted procedure: k10534 
o|contracted procedure: k10544 
o|contracted procedure: k10563 
o|inlining procedure: k10556 
o|contracted procedure: k10576 
o|contracted procedure: k14160 
o|substituted constant variable: g35605 
o|contracted procedure: k14189 
o|contracted procedure: k14163 
o|contracted procedure: k14169 
o|contracted procedure: k14172 
o|substituted constant variable: g35609 
o|contracted procedure: k10619 
o|contracted procedure: k963933507 
o|contracted procedure: k10711 
o|substituted constant variable: g35612 
o|contracted procedure: k10625 
o|contracted procedure: k10708 
o|contracted procedure: k10634 
o|contracted procedure: k10697 
o|contracted procedure: k10640 
o|contracted procedure: k10647 
o|contracted procedure: k10654 
o|contracted procedure: k10661 
o|contracted procedure: k10687 
o|contracted procedure: k10704 
o|contracted procedure: k10748 
o|contracted procedure: k10724 
o|contracted procedure: k10742 
o|contracted procedure: k10755 
o|contracted procedure: k10763 
o|contracted procedure: k10774 
o|contracted procedure: k10788 
o|contracted procedure: k10802 
o|contracted procedure: k10806 
o|contracted procedure: k10810 
o|contracted procedure: k10825 
o|contracted procedure: k10835 
o|contracted procedure: k10841 
o|contracted procedure: k10850 
o|contracted procedure: k10856 
o|contracted procedure: k963933523 
o|contracted procedure: k10880 
o|substituted constant variable: g35616 
o|inlining procedure: k10869 
o|inlining procedure: k10869 
o|contracted procedure: k10886 
o|contracted procedure: k10895 
o|contracted procedure: k10901 
o|contracted procedure: k10914 
o|contracted procedure: k10923 
o|contracted procedure: k10930 
o|contracted procedure: k10941 
o|contracted procedure: k10952 
o|contracted procedure: k10948 
o|contracted procedure: k10960 
o|contracted procedure: k10971 
o|contracted procedure: k10982 
o|contracted procedure: k10993 
o|contracted procedure: k10989 
o|contracted procedure: k11001 
o|contracted procedure: k11012 
o|contracted procedure: k11016 
o|contracted procedure: k11008 
o|contracted procedure: k11043 
o|contracted procedure: k11046 
o|contracted procedure: k11101 
o|contracted procedure: k11052 
o|contracted procedure: k11090 
o|contracted procedure: k11094 
o|contracted procedure: k11086 
o|contracted procedure: k11098 
o|contracted procedure: k11108 
o|contracted procedure: k11874 
o|contracted procedure: k11124 
o|contracted procedure: k11137 
o|contracted procedure: k11865 
o|contracted procedure: k11157 
o|contracted procedure: k11223 
o|contracted procedure: k11163 
o|contracted procedure: k11178 
o|contracted procedure: k11191 
o|contracted procedure: k11195 
o|contracted procedure: k11199 
o|contracted procedure: k11215 
o|contracted procedure: k11210 
o|contracted procedure: k11229 
o|contracted procedure: k11235 
o|contracted procedure: k11245 
o|contracted procedure: k11249 
o|contracted procedure: k11262 
o|contracted procedure: k965833533 
o|contracted procedure: k11275 
o|contracted procedure: k11285 
o|contracted procedure: k965833539 
o|contracted procedure: k11298 
o|contracted procedure: k11308 
o|contracted procedure: k965833545 
o|contracted procedure: k11321 
o|contracted procedure: k11331 
o|contracted procedure: k11344 
o|contracted procedure: k11350 
o|contracted procedure: k965833551 
o|contracted procedure: k11363 
o|contracted procedure: k11373 
o|contracted procedure: k965833557 
o|contracted procedure: k11386 
o|contracted procedure: k11403 
o|contracted procedure: k11407 
o|contracted procedure: k965833563 
o|contracted procedure: k11411 
o|contracted procedure: k11415 
o|contracted procedure: k11446 
o|contracted procedure: k11436 
o|contracted procedure: k11462 
o|contracted procedure: k965833569 
o|contracted procedure: k11475 
o|contracted procedure: k11485 
o|contracted procedure: k11618 
o|contracted procedure: k11501 
o|contracted procedure: k11513 
o|contracted procedure: k965833575 
o|contracted procedure: k11529 
o|contracted procedure: k11533 
o|contracted procedure: k11611 
o|contracted procedure: k11553 
o|contracted procedure: k965833581 
o|contracted procedure: k11572 
o|contracted procedure: k11576 
o|contracted procedure: k965833587 
o|contracted procedure: k11603 
o|contracted procedure: k11627 
o|contracted procedure: k965833593 
o|contracted procedure: k963933609 
o|contracted procedure: k11654 
o|substituted constant variable: g35622 
o|contracted procedure: k963933603 
o|contracted procedure: k11657 
o|substituted constant variable: g35620 
o|contracted procedure: k11663 
o|contracted procedure: k11676 
o|contracted procedure: k11682 
o|contracted procedure: k11688 
o|contracted procedure: k11704 
o|contracted procedure: k11720 
o|contracted procedure: k11736 
o|contracted procedure: k11761 
o|contracted procedure: k11771 
o|contracted procedure: k11777 
o|contracted procedure: k11800 
o|contracted procedure: k11821 
o|contracted procedure: k11817 
o|contracted procedure: k11884 
o|contracted procedure: k11890 
o|contracted procedure: k11906 
o|contracted procedure: k11920 
o|contracted procedure: k11910 
o|contracted procedure: k11926 
o|contracted procedure: k11939 
o|contracted procedure: k11943 
o|contracted procedure: k11947 
o|contracted procedure: k13325 
o|contracted procedure: k963933734 
o|contracted procedure: k13331 
o|substituted constant variable: g35646 
o|contracted procedure: k13340 
o|contracted procedure: k13346 
o|contracted procedure: k13352 
o|contracted procedure: k2616433633 
o|contracted procedure: k13358 
o|contracted procedure: k2615433622 
o|contracted procedure: k2713233617 
o|contracted procedure: k963933628 
o|contracted procedure: k13371 
o|substituted constant variable: g35628 
o|contracted procedure: k13381 
o|contracted procedure: k26830 
o|contracted procedure: k26834 
o|contracted procedure: k13397 
o|contracted procedure: k13403 
o|contracted procedure: k2615433644 
o|contracted procedure: k2713233639 
o|contracted procedure: k13422 
o|contracted procedure: k13428 
o|contracted procedure: k13440 
o|contracted procedure: k2614433650 
o|contracted procedure: k13454 
o|contracted procedure: k13544 
o|contracted procedure: k13458 
o|contracted procedure: k13470 
o|contracted procedure: k13474 
o|contracted procedure: k1395633655 
o|contracted procedure: k13498 
o|contracted procedure: k13509 
o|inlining procedure: k13461 
o|inlining procedure: k13461 
o|contracted procedure: k13525 
o|substituted constant variable: g35630 
o|substituted constant variable: g35632 
o|contracted procedure: k13528 
o|contracted procedure: k13535 
o|contracted procedure: k13566 
o|contracted procedure: k13584 
o|contracted procedure: k13572 
o|contracted procedure: k13580 
o|contracted procedure: k13590 
o|contracted procedure: k13709 
o|contracted procedure: k13593 
o|contracted procedure: k13596 
o|contracted procedure: k13599 
o|contracted procedure: k13605 
o|contracted procedure: k13614 
o|contracted procedure: k13666 
o|contracted procedure: k13662 
o|contracted procedure: k13657 
o|contracted procedure: k13675 
o|contracted procedure: k13678 
o|contracted procedure: k2615433666 
o|contracted procedure: k2713233661 
o|contracted procedure: k13718 
o|contracted procedure: k13721 
o|contracted procedure: k13727 
o|contracted procedure: k13752 
o|contracted procedure: k13758 
o|contracted procedure: k2615433677 
o|contracted procedure: k2713233672 
o|contracted procedure: k13781 
o|contracted procedure: k13784 
o|contracted procedure: k2615433688 
o|contracted procedure: k2713233683 
o|contracted procedure: k13802 
o|contracted procedure: k13808 
o|contracted procedure: k13814 
o|contracted procedure: k13820 
o|contracted procedure: k1395633704 
o|contracted procedure: k13850 
o|contracted procedure: k13857 
o|contracted procedure: k2615433699 
o|contracted procedure: k2713233694 
o|contracted procedure: k2615433715 
o|contracted procedure: k2713233710 
o|contracted procedure: k13886 
o|substituted constant variable: g35637 
o|substituted constant variable: g35639 
o|contracted procedure: k13904 
o|contracted procedure: k963933726 
o|contracted procedure: k13911 
o|substituted constant variable: g35642 
o|contracted procedure: k2615433720 
o|inlining procedure: k13908 
o|inlining procedure: k13908 
o|contracted procedure: k13924 
o|contracted procedure: k13927 
o|contracted procedure: k13935 
o|contracted procedure: k11964 
o|contracted procedure: k11989 
o|contracted procedure: k11995 
o|contracted procedure: k12014 
o|contracted procedure: k12026 
o|contracted procedure: k12043 
o|contracted procedure: k12039 
o|contracted procedure: k12063 
o|contracted procedure: k12059 
o|contracted procedure: k12080 
o|contracted procedure: k12076 
o|contracted procedure: k12088 
o|contracted procedure: k12105 
o|contracted procedure: k12101 
o|contracted procedure: k12094 
o|contracted procedure: k12110 
o|contracted procedure: k12117 
o|contracted procedure: k12123 
o|contracted procedure: k8892 
o|contracted procedure: k8914 
o|contracted procedure: k8951 
o|contracted procedure: k8927 
o|contracted procedure: k12158 
o|contracted procedure: k12140 
o|contracted procedure: k12151 
o|contracted procedure: k12143 
o|contracted procedure: k12167 
o|contracted procedure: k12180 
o|contracted procedure: k12186 
o|contracted procedure: k12199 
o|contracted procedure: k12209 
o|contracted procedure: k12226 
o|contracted procedure: k12222 
o|contracted procedure: k12236 
o|contracted procedure: k12249 
o|contracted procedure: k12259 
o|contracted procedure: k12276 
o|contracted procedure: k12272 
o|contracted procedure: k12286 
o|contracted procedure: k12311 
o|contracted procedure: k12303 
o|contracted procedure: k12299 
o|contracted procedure: k12317 
o|contracted procedure: k12346 
o|contracted procedure: k12342 
o|contracted procedure: k12334 
o|contracted procedure: k12330 
o|contracted procedure: k12352 
o|contracted procedure: k12369 
o|contracted procedure: k12365 
o|contracted procedure: k12379 
o|contracted procedure: k12392 
o|contracted procedure: k12402 
o|contracted procedure: k12415 
o|contracted procedure: k12425 
o|contracted procedure: k12442 
o|contracted procedure: k12446 
o|contracted procedure: k12438 
o|contracted procedure: k12456 
o|contracted procedure: k12469 
o|contracted procedure: k12479 
o|contracted procedure: k12492 
o|contracted procedure: k12502 
o|contracted procedure: k12515 
o|contracted procedure: k12525 
o|contracted procedure: k12538 
o|contracted procedure: k12548 
o|contracted procedure: k12561 
o|contracted procedure: k12571 
o|contracted procedure: k12584 
o|contracted procedure: k12588 
o|contracted procedure: k12592 
o|contracted procedure: k12609 
o|contracted procedure: k12612 
o|contracted procedure: k12618 
o|contracted procedure: k963933742 
o|contracted procedure: k12672 
o|substituted constant variable: g35654 
o|contracted procedure: k12633 
o|contracted procedure: k12639 
o|contracted procedure: k12649 
o|contracted procedure: k12653 
o|contracted procedure: k12661 
o|contracted procedure: k12657 
o|contracted procedure: k13196 
o|contracted procedure: k13202 
o|contracted procedure: k13208 
o|contracted procedure: k13214 
o|contracted procedure: k12693 
o|contracted procedure: k12711 
o|contracted procedure: k12718 
o|contracted procedure: k12793 
o|contracted procedure: k12724 
o|contracted procedure: k12741 
o|contracted procedure: k12779 
o|contracted procedure: k12747 
o|contracted procedure: k12760 
o|contracted procedure: k12768 
o|contracted procedure: k12799 
o|contracted procedure: k12815 
o|contracted procedure: k12825 
o|contracted procedure: k12831 
o|contracted procedure: k963933750 
o|contracted procedure: k12862 
o|substituted constant variable: g35660 
o|contracted procedure: k12834 
o|contracted procedure: k12844 
o|contracted procedure: k12837 
o|contracted procedure: k8850 
o|contracted procedure: k8885 
o|contracted procedure: k8857 
o|contracted procedure: k8866 
o|contracted procedure: k8882 
o|contracted procedure: k1287233755 
o|contracted procedure: k8872 
o|contracted procedure: k12881 
o|contracted procedure: k12884 
o|contracted procedure: k12904 
o|contracted procedure: k12900 
o|contracted procedure: k12971 
o|contracted procedure: k12984 
o|contracted procedure: k12994 
o|contracted procedure: k963933763 
o|contracted procedure: k13017 
o|substituted constant variable: g35666 
o|contracted procedure: k12997 
o|contracted procedure: k13010 
o|contracted procedure: k13023 
o|contracted procedure: k963933769 
o|contracted procedure: k13046 
o|substituted constant variable: g35668 
o|contracted procedure: k13026 
o|contracted procedure: k13039 
o|contracted procedure: k13052 
o|contracted procedure: k963933775 
o|contracted procedure: k13058 
o|substituted constant variable: g35670 
o|contracted procedure: k13083 
o|contracted procedure: k963933781 
o|contracted procedure: k13089 
o|substituted constant variable: g35672 
o|contracted procedure: k13095 
o|contracted procedure: k13102 
o|contracted procedure: k13106 
o|contracted procedure: k13168 
o|contracted procedure: k13161 
o|contracted procedure: k30856 
o|contracted procedure: k30860 
o|contracted procedure: k30864 
o|contracted procedure: k30868 
o|contracted procedure: k30872 
o|contracted procedure: k30876 
o|contracted procedure: k13172 
o|contracted procedure: k13181 
o|contracted procedure: k13231 
o|contracted procedure: k13319 
o|contracted procedure: k13240 
o|contracted procedure: k13249 
o|contracted procedure: k13268 
o|contracted procedure: k8793 
o|contracted procedure: k8843 
o|contracted procedure: k8800 
o|contracted procedure: k8809 
o|contracted procedure: k8840 
o|contracted procedure: k8815 
o|contracted procedure: k13283 
o|contracted procedure: k13302 
o|contracted procedure: k13946 
o|contracted procedure: k13969 
o|contracted procedure: k13975 
o|contracted procedure: k13984 
o|contracted procedure: k14008 
o|contracted procedure: k13992 
o|contracted procedure: k13996 
o|contracted procedure: k14004 
o|contracted procedure: k14018 
o|contracted procedure: k14061 
o|contracted procedure: k14029 
o|contracted procedure: k14049 
o|contracted procedure: k14033 
o|contracted procedure: k14037 
o|contracted procedure: k14025 
o|contracted procedure: k14045 
o|contracted procedure: k14057 
o|contracted procedure: k14071 
o|contracted procedure: k14130 
o|contracted procedure: k14082 
o|contracted procedure: k14118 
o|contracted procedure: k14086 
o|contracted procedure: k14106 
o|contracted procedure: k14090 
o|contracted procedure: k14094 
o|contracted procedure: k14078 
o|contracted procedure: k14102 
o|contracted procedure: k14114 
o|contracted procedure: k14126 
o|contracted procedure: k14198 
o|contracted procedure: k14204 
o|contracted procedure: k14210 
o|contracted procedure: k14216 
o|contracted procedure: k14271 
o|contracted procedure: k14277 
o|contracted procedure: k14286 
o|contracted procedure: k14305 
o|contracted procedure: k14293 
o|contracted procedure: k14301 
o|contracted procedure: k14297 
o|contracted procedure: k14311 
o|contracted procedure: k14342 
o|contracted procedure: k14318 
o|contracted procedure: k14338 
o|contracted procedure: k14334 
o|contracted procedure: k14322 
o|contracted procedure: k14330 
o|contracted procedure: k14326 
o|contracted procedure: k14348 
o|contracted procedure: k14391 
o|contracted procedure: k14355 
o|contracted procedure: k14387 
o|contracted procedure: k14383 
o|contracted procedure: k14359 
o|contracted procedure: k14379 
o|contracted procedure: k14375 
o|contracted procedure: k14363 
o|contracted procedure: k14371 
o|contracted procedure: k14367 
o|contracted procedure: k14550 
o|contracted procedure: k14557 
o|contracted procedure: k14561 
o|contracted procedure: k14565 
o|contracted procedure: k14577 
o|contracted procedure: k14580 
o|contracted procedure: k14595 
o|contracted procedure: k14604 
o|contracted procedure: k14587 
o|contracted procedure: k14616 
o|contracted procedure: k14634 
o|contracted procedure: k14619 
o|contracted procedure: k14622 
o|contracted procedure: k14630 
o|contracted procedure: k14652 
o|contracted procedure: k14674 
o|contracted procedure: k14670 
o|contracted procedure: k14655 
o|contracted procedure: k14658 
o|contracted procedure: k14666 
o|contracted procedure: k14818 
o|contracted procedure: k14693 
o|contracted procedure: k14689 
o|contracted procedure: k14719 
o|contracted procedure: k14715 
o|contracted procedure: k14711 
o|contracted procedure: k14723 
o|contracted procedure: k14727 
o|contracted procedure: k14739 
o|contracted procedure: k14745 
o|contracted procedure: k14760 
o|contracted procedure: k14756 
o|contracted procedure: k14752 
o|contracted procedure: k14773 
o|contracted procedure: k14795 
o|contracted procedure: k14791 
o|contracted procedure: k14776 
o|contracted procedure: k14779 
o|contracted procedure: k14787 
o|contracted procedure: k14802 
o|contracted procedure: k14957 
o|contracted procedure: k14832 
o|contracted procedure: k14828 
o|contracted procedure: k14858 
o|contracted procedure: k14854 
o|contracted procedure: k14850 
o|contracted procedure: k14862 
o|contracted procedure: k14866 
o|contracted procedure: k14878 
o|contracted procedure: k14884 
o|contracted procedure: k14899 
o|contracted procedure: k14895 
o|contracted procedure: k14891 
o|contracted procedure: k14912 
o|contracted procedure: k14934 
o|contracted procedure: k14930 
o|contracted procedure: k14915 
o|contracted procedure: k14918 
o|contracted procedure: k14926 
o|contracted procedure: k14941 
o|contracted procedure: k15415 
o|contracted procedure: k15433 
o|contracted procedure: k15440 
o|contracted procedure: k15430 
o|contracted procedure: k15504 
o|contracted procedure: k1394633826 
o|contracted procedure: k15450 
o|contracted procedure: k15460 
o|contracted procedure: k15464 
o|contracted procedure: k14537 
o|contracted procedure: k14417 
o|contracted procedure: k14424 
o|contracted procedure: k14963 
o|contracted procedure: k14974 
o|contracted procedure: k14978 
o|contracted procedure: k14995 
o|contracted procedure: k15006 
o|contracted procedure: k14987 
o|contracted procedure: k15018 
o|contracted procedure: k15036 
o|contracted procedure: k15021 
o|contracted procedure: k15024 
o|contracted procedure: k15032 
o|contracted procedure: k15047 
o|contracted procedure: k15051 
o|contracted procedure: k15055 
o|contracted procedure: k15063 
o|contracted procedure: k14236 
o|contracted procedure: k14242 
o|contracted procedure: k14248 
o|contracted procedure: k14254 
o|contracted procedure: k15071 
o|contracted procedure: k15077 
o|contracted procedure: k15084 
o|contracted procedure: k15150 
o|contracted procedure: k15158 
o|contracted procedure: k15154 
o|contracted procedure: k15096 
o|contracted procedure: k15100 
o|contracted procedure: k15109 
o|contracted procedure: k15092 
o|contracted procedure: k15121 
o|contracted procedure: k15139 
o|contracted procedure: k15124 
o|contracted procedure: k15127 
o|contracted procedure: k15135 
o|contracted procedure: k15180 
o|contracted procedure: k15176 
o|contracted procedure: k15172 
o|contracted procedure: k1395633806 
o|contracted procedure: k15168 
o|contracted procedure: k15189 
o|contracted procedure: k15192 
o|contracted procedure: k15195 
o|contracted procedure: k15203 
o|contracted procedure: k15211 
o|contracted procedure: k15219 
o|contracted procedure: k15305 
o|contracted procedure: k15288 
o|contracted procedure: k15299 
o|substituted constant variable: g35703 
o|contracted procedure: k15234 
o|contracted procedure: k15238 
o|contracted procedure: k15247 
o|contracted procedure: k15230 
o|contracted procedure: k15259 
o|contracted procedure: k15277 
o|contracted procedure: k15262 
o|contracted procedure: k15265 
o|contracted procedure: k15273 
o|contracted procedure: k14529 
o|contracted procedure: k14533 
o|contracted procedure: k14444 
o|contracted procedure: k14455 
o|contracted procedure: k14462 
o|inlining procedure: k14451 
o|contracted procedure: k14459 
o|inlining procedure: k14451 
o|contracted procedure: k14521 
o|contracted procedure: k14483 
o|contracted procedure: k14490 
o|contracted procedure: k14505 
o|contracted procedure: k15396 
o|contracted procedure: k15392 
o|contracted procedure: k15311 
o|contracted procedure: k15388 
o|contracted procedure: k15384 
o|contracted procedure: k15314 
o|contracted procedure: k15325 
o|contracted procedure: k15329 
o|contracted procedure: k15338 
o|contracted procedure: k15321 
o|contracted procedure: k15350 
o|contracted procedure: k15368 
o|contracted procedure: k15353 
o|contracted procedure: k15356 
o|contracted procedure: k15364 
o|contracted procedure: k15480 
o|contracted procedure: k15491 
o|contracted procedure: k15484 
o|contracted procedure: k15500 
o|contracted procedure: k1394633821 
o|contracted procedure: k15978 
o|contracted procedure: k16079 
o|contracted procedure: k15984 
o|contracted procedure: k16075 
o|contracted procedure: k15993 
o|contracted procedure: k16071 
o|contracted procedure: k16002 
o|contracted procedure: k16067 
o|contracted procedure: k16011 
o|contracted procedure: k16063 
o|contracted procedure: k16020 
o|contracted procedure: k16029 
o|contracted procedure: k16032 
o|contracted procedure: k16050 
o|contracted procedure: k16035 
o|contracted procedure: k16046 
o|contracted procedure: k16042 
o|contracted procedure: k16038 
o|contracted procedure: k16053 
o|contracted procedure: k16085 
o|contracted procedure: k16119 
o|contracted procedure: k17017 
o|contracted procedure: k16156 
o|contracted procedure: k16140 
o|contracted procedure: k26031 
o|contracted procedure: k23280 
o|contracted procedure: k23316 
o|contracted procedure: k23320 
o|contracted procedure: k23286 
o|contracted procedure: k23310 
o|contracted procedure: k23289 
o|contracted procedure: k23306 
o|contracted procedure: k23292 
o|contracted procedure: k23302 
o|contracted procedure: k23295 
o|contracted procedure: k23298 
o|contracted procedure: k23335 
o|contracted procedure: k23341 
o|contracted procedure: k963933834 
o|contracted procedure: k23354 
o|substituted constant variable: g35714 
o|contracted procedure: k23361 
o|contracted procedure: k963933840 
o|contracted procedure: k23375 
o|substituted constant variable: g35716 
o|contracted procedure: k23381 
o|contracted procedure: k23384 
o|contracted procedure: k23390 
o|contracted procedure: k23401 
o|contracted procedure: k23408 
o|contracted procedure: k23433 
o|contracted procedure: k23441 
o|contracted procedure: k23445 
o|contracted procedure: k23449 
o|contracted procedure: k23461 
o|contracted procedure: k965833846 
o|contracted procedure: k23472 
o|contracted procedure: k23480 
o|contracted procedure: k23491 
o|contracted procedure: k23499 
o|contracted procedure: k23510 
o|contracted procedure: k23518 
o|contracted procedure: k965833860 
o|contracted procedure: k23529 
o|contracted procedure: k23537 
o|contracted procedure: k23540 
o|contracted procedure: k23543 
o|contracted procedure: k23549 
o|contracted procedure: k23555 
o|contracted procedure: k23562 
o|contracted procedure: k23572 
o|contracted procedure: k23580 
o|contracted procedure: k23588 
o|contracted procedure: k23592 
o|contracted procedure: k23604 
o|contracted procedure: k23630 
o|contracted procedure: k23656 
o|contracted procedure: k23683 
o|contracted procedure: k23701 
o|contracted procedure: k23755 
o|contracted procedure: k23798 
o|contracted procedure: k23813 
o|contracted procedure: k23817 
o|contracted procedure: k23809 
o|contracted procedure: k23805 
o|contracted procedure: k23829 
o|contracted procedure: k23844 
o|contracted procedure: k23848 
o|contracted procedure: k23840 
o|contracted procedure: k23836 
o|contracted procedure: k23857 
o|contracted procedure: k23876 
o|contracted procedure: k23911 
o|contracted procedure: k23921 
o|contracted procedure: k23970 
o|contracted procedure: k24003 
o|contracted procedure: k23979 
o|contracted procedure: k23999 
o|contracted procedure: k23985 
o|contracted procedure: k24009 
o|contracted procedure: k24028 
o|contracted procedure: k24045 
o|contracted procedure: k24055 
o|contracted procedure: k24080 
o|contracted procedure: k24132 
o|contracted procedure: k24165 
o|contracted procedure: k24141 
o|contracted procedure: k24161 
o|contracted procedure: k24147 
o|contracted procedure: k24171 
o|contracted procedure: k24182 
o|contracted procedure: k24178 
o|contracted procedure: k24192 
o|contracted procedure: k24198 
o|contracted procedure: k24217 
o|contracted procedure: k24221 
o|contracted procedure: k24213 
o|contracted procedure: k24209 
o|contracted procedure: k24205 
o|contracted procedure: k24229 
o|contracted procedure: k24240 
o|contracted procedure: k24246 
o|contracted procedure: k24281 
o|contracted procedure: k24316 
o|contracted procedure: k24319 
o|contracted procedure: k24330 
o|contracted procedure: k24337 
o|contracted procedure: k24373 
o|contracted procedure: k24367 
o|contracted procedure: k24346 
o|contracted procedure: k24379 
o|contracted procedure: k8708 
o|contracted procedure: k8698 
o|contracted procedure: k8701 
o|contracted procedure: k8712 
o|contracted procedure: k8716 
o|contracted procedure: k8725 
o|contracted procedure: k8728 
o|contracted procedure: k8735 
o|contracted procedure: k8739 
o|contracted procedure: k24390 
o|contracted procedure: k24402 
o|contracted procedure: k24437 
o|contracted procedure: k24541 
o|contracted procedure: k24452 
o|contracted procedure: k24472 
o|contracted procedure: k24480 
o|contracted procedure: k24476 
o|contracted procedure: k24483 
o|contracted procedure: k24492 
o|contracted procedure: k24495 
o|contracted procedure: k24531 
o|contracted procedure: k24572 
o|contracted procedure: k24544 
o|contracted procedure: k24551 
o|contracted procedure: k24555 
o|contracted procedure: k24576 
o|contracted procedure: k24580 
o|contracted procedure: k24584 
o|contracted procedure: k24590 
o|contracted procedure: k24593 
o|contracted procedure: k24610 
o|contracted procedure: k24620 
o|contracted procedure: k24738 
o|contracted procedure: k24629 
o|contracted procedure: k24642 
o|contracted procedure: k24657 
o|contracted procedure: k24661 
o|contracted procedure: k24670 
o|contracted procedure: k24683 
o|contracted procedure: k24690 
o|contracted procedure: k24697 
o|contracted procedure: k24709 
o|contracted procedure: k24734 
o|contracted procedure: k24730 
o|contracted procedure: k24741 
o|contracted procedure: k963933868 
o|contracted procedure: k24744 
o|substituted constant variable: g35734 
o|contracted procedure: k24776 
o|contracted procedure: k24752 
o|contracted procedure: k24757 
o|contracted procedure: k24782 
o|contracted procedure: k24797 
o|contracted procedure: k24793 
o|contracted procedure: k24801 
o|contracted procedure: k24807 
o|contracted procedure: k24810 
o|contracted procedure: k24824 
o|contracted procedure: k24828 
o|contracted procedure: k24831 
o|contracted procedure: k24840 
o|contracted procedure: k24848 
o|contracted procedure: k24844 
o|contracted procedure: k24851 
o|contracted procedure: k24908 
o|contracted procedure: k24912 
o|contracted procedure: k24854 
o|contracted procedure: k24896 
o|contracted procedure: k24904 
o|contracted procedure: k24900 
o|contracted procedure: k24857 
o|contracted procedure: k24888 
o|contracted procedure: k24892 
o|contracted procedure: k24866 
o|contracted procedure: k24876 
o|contracted procedure: k24884 
o|contracted procedure: k24880 
o|contracted procedure: k24869 
o|contracted procedure: k24920 
o|contracted procedure: k24932 
o|contracted procedure: k24940 
o|contracted procedure: k24936 
o|contracted procedure: k24943 
o|contracted procedure: k25007 
o|contracted procedure: k25015 
o|contracted procedure: k25011 
o|contracted procedure: k24949 
o|contracted procedure: k24995 
o|contracted procedure: k25003 
o|contracted procedure: k24999 
o|contracted procedure: k24952 
o|contracted procedure: k24983 
o|contracted procedure: k24991 
o|contracted procedure: k24987 
o|contracted procedure: k24961 
o|contracted procedure: k24971 
o|contracted procedure: k24979 
o|contracted procedure: k24975 
o|contracted procedure: k24964 
o|contracted procedure: k25023 
o|contracted procedure: k25026 
o|contracted procedure: k25037 
o|contracted procedure: k25033 
o|contracted procedure: k25122 
o|contracted procedure: k25128 
o|contracted procedure: k25150 
o|contracted procedure: k25156 
o|contracted procedure: k25164 
o|contracted procedure: k25171 
o|contracted procedure: k25174 
o|contracted procedure: k25183 
o|contracted procedure: k25189 
o|contracted procedure: k25195 
o|contracted procedure: k25205 
o|contracted procedure: k25214 
o|contracted procedure: k25222 
o|contracted procedure: k25246 
o|contracted procedure: k25241 
o|contracted procedure: k25228 
o|contracted procedure: k25249 
o|contracted procedure: k25258 
o|contracted procedure: k25264 
o|contracted procedure: k25270 
o|contracted procedure: k25297 
o|contracted procedure: k25292 
o|contracted procedure: k25279 
o|contracted procedure: k25306 
o|contracted procedure: k25330 
o|contracted procedure: k25323 
o|contracted procedure: k25314 
o|contracted procedure: k25336 
o|contracted procedure: k25388 
o|contracted procedure: k25381 
o|contracted procedure: k25344 
o|contracted procedure: k25375 
o|contracted procedure: k25359 
o|contracted procedure: k25371 
o|contracted procedure: k25367 
o|contracted procedure: k25394 
o|contracted procedure: k25417 
o|contracted procedure: k25424 
o|contracted procedure: k25427 
o|contracted procedure: k25444 
o|contracted procedure: k25451 
o|contracted procedure: k25440 
o|contracted procedure: k25492 
o|contracted procedure: k25457 
o|contracted procedure: k25472 
o|contracted procedure: k25468 
o|contracted procedure: k25478 
o|contracted procedure: k25501 
o|contracted procedure: k25518 
o|contracted procedure: k25525 
o|contracted procedure: k25534 
o|contracted procedure: k25551 
o|contracted procedure: k25559 
o|contracted procedure: k25562 
o|contracted procedure: k25571 
o|contracted procedure: k25583 
o|contracted procedure: k25590 
o|contracted procedure: k25579 
o|contracted procedure: k25599 
o|contracted procedure: k25649 
o|contracted procedure: k25622 
o|contracted procedure: k25633 
o|contracted procedure: k25629 
o|contracted procedure: k25639 
o|contracted procedure: k25655 
o|contracted procedure: k25666 
o|contracted procedure: k25672 
o|contracted procedure: k25688 
o|contracted procedure: k25744 
o|contracted procedure: k25730 
o|contracted procedure: k25737 
o|contracted procedure: k25750 
o|contracted procedure: k25762 
o|contracted procedure: k25765 
o|contracted procedure: k25775 
o|contracted procedure: k25804 
o|contracted procedure: k963933878 
o|contracted procedure: k25810 
o|substituted constant variable: g35770 
o|contracted procedure: k25818 
o|contracted procedure: k25825 
o|contracted procedure: k25837 
o|contracted procedure: k25843 
o|contracted procedure: k25849 
o|contracted procedure: k25858 
o|contracted procedure: k25865 
o|contracted procedure: k25887 
o|contracted procedure: k25909 
o|contracted procedure: k25917 
o|contracted procedure: k25924 
o|contracted procedure: k25936 
o|contracted procedure: k25942 
o|contracted procedure: k25948 
o|contracted procedure: k25957 
o|contracted procedure: k25964 
o|contracted procedure: k25986 
o|contracted procedure: k25973 
o|contracted procedure: k26008 
o|contracted procedure: k25995 
o|contracted procedure: k26014 
o|contracted procedure: k26044 
o|contracted procedure: k26035 
o|contracted procedure: k17034 
o|contracted procedure: k17038 
o|contracted procedure: k17047 
o|contracted procedure: k17053 
o|contracted procedure: k17063 
o|contracted procedure: k17075 
o|contracted procedure: k17086 
o|contracted procedure: k17092 
o|contracted procedure: k17109 
o|contracted procedure: k17116 
o|contracted procedure: k17120 
o|contracted procedure: k17133 
o|contracted procedure: k17143 
o|contracted procedure: k17147 
o|contracted procedure: k17151 
o|contracted procedure: k17155 
o|contracted procedure: k17173 
o|contracted procedure: k17187 
o|contracted procedure: k17194 
o|contracted procedure: k17198 
o|contracted procedure: k17215 
o|contracted procedure: k17225 
o|contracted procedure: k17229 
o|contracted procedure: k17258 
o|contracted procedure: k17264 
o|contracted procedure: k17293 
o|contracted procedure: k17297 
o|contracted procedure: k17352 
o|contracted procedure: k17345 
o|contracted procedure: k17307 
o|contracted procedure: k17311 
o|contracted procedure: k17321 
o|inlining procedure: k17325 
o|inlining procedure: k17325 
o|contracted procedure: k17370 
o|contracted procedure: k17355 
o|contracted procedure: k17358 
o|contracted procedure: k17374 
o|contracted procedure: k17383 
o|contracted procedure: k17391 
o|contracted procedure: k17406 
o|contracted procedure: k17402 
o|contracted procedure: k17410 
o|contracted procedure: k17416 
o|contracted procedure: k17430 
o|contracted procedure: k17443 
o|contracted procedure: k17436 
o|contracted procedure: k17450 
o|contracted procedure: k17447 
o|contracted procedure: k17462 
o|contracted procedure: k17465 
o|contracted procedure: k17474 
o|contracted procedure: k17524 
o|contracted procedure: k17486 
o|contracted procedure: k17520 
o|contracted procedure: k17492 
o|contracted procedure: k17516 
o|contracted procedure: k17495 
o|contracted procedure: k17502 
o|contracted procedure: k17506 
o|contracted procedure: k17535 
o|contracted procedure: k17531 
o|substituted constant variable: g35778 
o|contracted procedure: k17565 
o|contracted procedure: k17541 
o|contracted procedure: k17546 
o|contracted procedure: k17571 
o|contracted procedure: k17574 
o|contracted procedure: k17595 
o|contracted procedure: k17598 
o|contracted procedure: k17616 
o|contracted procedure: k17659 
o|contracted procedure: k17655 
o|contracted procedure: k17633 
o|contracted procedure: k17651 
o|contracted procedure: k17647 
o|contracted procedure: k17637 
o|contracted procedure: k17688 
o|contracted procedure: k17684 
o|contracted procedure: k17680 
o|contracted procedure: k17692 
o|contracted procedure: k17698 
o|contracted procedure: k17731 
o|contracted procedure: k17707 
o|contracted procedure: k17727 
o|contracted procedure: k17713 
o|contracted procedure: k17737 
o|contracted procedure: k17754 
o|contracted procedure: k17762 
o|contracted procedure: k17765 
o|contracted procedure: k17782 
o|contracted procedure: k17796 
o|contracted procedure: k17814 
o|contracted procedure: k17810 
o|contracted procedure: k17806 
o|contracted procedure: k17836 
o|contracted procedure: k17845 
o|contracted procedure: k17861 
o|contracted procedure: k17865 
o|contracted procedure: k17876 
o|contracted procedure: k17882 
o|contracted procedure: k17899 
o|contracted procedure: k17905 
o|contracted procedure: k17952 
o|contracted procedure: k17958 
o|contracted procedure: k17981 
o|contracted procedure: k17987 
o|contracted procedure: k17993 
o|contracted procedure: k18014 
o|contracted procedure: k18020 
o|contracted procedure: k18042 
o|contracted procedure: k18051 
o|contracted procedure: k18058 
o|contracted procedure: k18078 
o|contracted procedure: k18100 
o|contracted procedure: k18091 
o|contracted procedure: k18107 
o|contracted procedure: k18114 
o|contracted procedure: k2040733907 
o|contracted procedure: k16176 
o|contracted procedure: k2040733912 
o|contracted procedure: k16206 
o|contracted procedure: k16221 
o|contracted procedure: k16217 
o|contracted procedure: k963933941 
o|contracted procedure: k15514 
o|substituted constant variable: g35799 
o|contracted procedure: k963933935 
o|contracted procedure: k15518 
o|substituted constant variable: g35797 
o|contracted procedure: k15533 
o|contracted procedure: k15540 
o|contracted procedure: k15555 
o|contracted procedure: k15570 
o|contracted procedure: k15579 
o|contracted procedure: k15588 
o|contracted procedure: k15600 
o|contracted procedure: k15603 
o|contracted procedure: k15606 
o|contracted procedure: k15614 
o|contracted procedure: k15622 
o|contracted procedure: k15631 
o|contracted procedure: k15640 
o|contracted procedure: k15649 
o|contracted procedure: k15661 
o|contracted procedure: k15664 
o|contracted procedure: k15667 
o|contracted procedure: k15675 
o|contracted procedure: k15683 
o|contracted procedure: k15692 
o|contracted procedure: k15701 
o|contracted procedure: k15733 
o|contracted procedure: k15742 
o|contracted procedure: k15748 
o|contracted procedure: k15755 
o|contracted procedure: k15759 
o|contracted procedure: k15771 
o|contracted procedure: k15774 
o|contracted procedure: k15777 
o|contracted procedure: k15785 
o|contracted procedure: k15793 
o|contracted procedure: k15811 
o|contracted procedure: k15815 
o|contracted procedure: k15827 
o|contracted procedure: k15830 
o|contracted procedure: k15833 
o|contracted procedure: k15841 
o|contracted procedure: k15849 
o|contracted procedure: k15857 
o|contracted procedure: k15863 
o|contracted procedure: k15891 
o|contracted procedure: k15897 
o|contracted procedure: k15910 
o|contracted procedure: k15925 
o|contracted procedure: k15947 
o|contracted procedure: k15943 
o|contracted procedure: k15928 
o|contracted procedure: k15931 
o|contracted procedure: k15939 
o|contracted procedure: k15956 
o|contracted procedure: k1394633927 
o|contracted procedure: k16243 
o|contracted procedure: k16250 
o|contracted procedure: k16259 
o|contracted procedure: k16276 
o|contracted procedure: k16272 
o|contracted procedure: k16262 
o|contracted procedure: k16282 
o|contracted procedure: k16293 
o|inlining procedure: k16296 
o|contracted procedure: k16304 
o|inlining procedure: k16296 
o|contracted procedure: k16310 
o|contracted procedure: k16316 
o|contracted procedure: k16322 
o|contracted procedure: k16328 
o|contracted procedure: k16334 
o|contracted procedure: k16363 
o|contracted procedure: k16369 
o|contracted procedure: k16375 
o|contracted procedure: k16381 
o|contracted procedure: k16407 
o|contracted procedure: k16416 
o|contracted procedure: k16423 
o|contracted procedure: k16432 
o|contracted procedure: k16448 
o|contracted procedure: k16438 
o|contracted procedure: k16456 
o|contracted procedure: k16466 
o|contracted procedure: k16472 
o|contracted procedure: k16478 
o|contracted procedure: k16484 
o|contracted procedure: k16511 
o|contracted procedure: k16529 
o|contracted procedure: k16545 
o|contracted procedure: k16535 
o|contracted procedure: k16556 
o|contracted procedure: k16563 
o|contracted procedure: k16572 
o|contracted procedure: k16579 
o|contracted procedure: k16587 
o|contracted procedure: k16597 
o|contracted procedure: k16603 
o|contracted procedure: k16609 
o|contracted procedure: k16615 
o|contracted procedure: k16651 
o|contracted procedure: k16658 
o|contracted procedure: k16661 
o|contracted procedure: k16676 
o|contracted procedure: k16685 
o|contracted procedure: k16692 
o|contracted procedure: k16700 
o|contracted procedure: k16710 
o|contracted procedure: k16716 
o|contracted procedure: k16722 
o|contracted procedure: k16728 
o|contracted procedure: k16768 
o|contracted procedure: k16775 
o|contracted procedure: k16778 
o|contracted procedure: k16793 
o|contracted procedure: k16802 
o|contracted procedure: k16817 
o|contracted procedure: k16827 
o|contracted procedure: k16833 
o|contracted procedure: k16839 
o|contracted procedure: k16845 
o|contracted procedure: k16879 
o|contracted procedure: k16891 
o|contracted procedure: k16902 
o|contracted procedure: k16924 
o|inlining procedure: k16931 
o|contracted procedure: k16941 
o|inlining procedure: k16931 
o|contracted procedure: k16950 
o|contracted procedure: k16957 
o|contracted procedure: k16961 
o|contracted procedure: k16967 
o|contracted procedure: k16978 
o|inlining procedure: k16931 
o|contracted procedure: k16985 
o|contracted procedure: k16991 
o|contracted procedure: k18127 
o|contracted procedure: k18141 
o|contracted procedure: k18133 
o|contracted procedure: k18150 
o|contracted procedure: k18164 
o|contracted procedure: k18156 
o|contracted procedure: k18291 
o|contracted procedure: k18173 
o|contracted procedure: k18176 
o|contracted procedure: k18182 
o|contracted procedure: k18185 
o|contracted procedure: k18200 
o|contracted procedure: k18203 
o|contracted procedure: k18214 
o|contracted procedure: k18220 
o|contracted procedure: k18231 
o|contracted procedure: k18234 
o|contracted procedure: k18246 
o|contracted procedure: k18249 
o|contracted procedure: k18252 
o|contracted procedure: k18260 
o|contracted procedure: k18268 
o|contracted procedure: k18631 
o|contracted procedure: k18354 
o|contracted procedure: k18357 
o|contracted procedure: k18363 
o|contracted procedure: k18366 
o|contracted procedure: k18377 
o|contracted procedure: k18385 
o|contracted procedure: k18388 
o|contracted procedure: k18399 
o|contracted procedure: k18411 
o|contracted procedure: k18407 
o|contracted procedure: k18403 
o|contracted procedure: k18415 
o|contracted procedure: k18421 
o|contracted procedure: k18436 
o|contracted procedure: k18432 
o|contracted procedure: k18440 
o|contracted procedure: k18446 
o|contracted procedure: k18460 
o|contracted procedure: k18463 
o|contracted procedure: k18470 
o|contracted procedure: k18476 
o|contracted procedure: k18479 
o|contracted procedure: k18486 
o|contracted procedure: k18503 
o|contracted procedure: k18509 
o|contracted procedure: k18515 
o|contracted procedure: k18521 
o|contracted procedure: k18527 
o|contracted procedure: k18533 
o|contracted procedure: k18539 
o|contracted procedure: k18545 
o|contracted procedure: k18551 
o|contracted procedure: k18557 
o|contracted procedure: k18563 
o|contracted procedure: k18569 
o|contracted procedure: k18575 
o|contracted procedure: k18640 
o|contracted procedure: k18647 
o|contracted procedure: k18651 
o|contracted procedure: k18672 
o|contracted procedure: k18679 
o|contracted procedure: k18730 
o|contracted procedure: k18688 
o|contracted procedure: k18726 
o|contracted procedure: k18694 
o|contracted procedure: k18719 
o|contracted procedure: k18711 
o|contracted procedure: k18738 
o|contracted procedure: k18745 
o|contracted procedure: k18749 
o|contracted procedure: k18761 
o|contracted procedure: k18764 
o|contracted procedure: k18767 
o|contracted procedure: k18775 
o|contracted procedure: k18783 
o|contracted procedure: k18791 
o|contracted procedure: k18797 
o|contracted procedure: k18803 
o|contracted procedure: k18809 
o|contracted procedure: k18815 
o|contracted procedure: k18821 
o|contracted procedure: k18926 
o|contracted procedure: k18856 
o|contracted procedure: k18859 
o|contracted procedure: k18865 
o|contracted procedure: k18878 
o|contracted procedure: k18888 
o|contracted procedure: k18881 
o|contracted procedure: k18902 
o|contracted procedure: k18895 
o|contracted procedure: k18912 
o|contracted procedure: k18918 
o|contracted procedure: k18937 
o|contracted procedure: k18930 
o|contracted procedure: k18955 
o|contracted procedure: k18962 
o|contracted procedure: k18965 
o|contracted procedure: k18973 
o|contracted procedure: k18977 
o|contracted procedure: k7518 
o|contracted procedure: k18989 
o|contracted procedure: k19109 
o|contracted procedure: k963933975 
o|contracted procedure: k18995 
o|substituted constant variable: g35819 
o|contracted procedure: k19015 
o|contracted procedure: k19004 
o|contracted procedure: k19011 
o|contracted procedure: k19007 
o|contracted procedure: k19019 
o|contracted procedure: k19029 
o|contracted procedure: k19032 
o|contracted procedure: k19035 
o|contracted procedure: k19038 
o|contracted procedure: k19073 
o|contracted procedure: k19062 
o|contracted procedure: k19069 
o|contracted procedure: k19065 
o|contracted procedure: k19079 
o|contracted procedure: k19099 
o|contracted procedure: k19104 
o|contracted procedure: k19590 
o|contracted procedure: k19593 
o|contracted procedure: k19596 
o|contracted procedure: k19599 
o|contracted procedure: k19743 
o|contracted procedure: k19739 
o|contracted procedure: k1957233969 
o|contracted procedure: k19602 
o|contracted procedure: k19629 
o|contracted procedure: k19654 
o|contracted procedure: k19635 
o|contracted procedure: k19642 
o|contracted procedure: k19632 
o|contracted procedure: k19668 
o|contracted procedure: k19671 
o|contracted procedure: k1957233959 
o|contracted procedure: k19687 
o|contracted procedure: k19718 
o|contracted procedure: k19693 
o|contracted procedure: k19711 
o|contracted procedure: k19702 
o|contracted procedure: k19722 
o|contracted procedure: k19116 
o|contracted procedure: k7536 
o|contracted procedure: k19125 
o|contracted procedure: k19128 
o|contracted procedure: k19134 
o|contracted procedure: k19140 
o|contracted procedure: k19228 
o|contracted procedure: k963933983 
o|contracted procedure: k19146 
o|substituted constant variable: g35825 
o|contracted procedure: k19178 
o|contracted procedure: k19167 
o|contracted procedure: k19174 
o|contracted procedure: k19170 
o|contracted procedure: k19184 
o|contracted procedure: k19191 
o|contracted procedure: k19204 
o|contracted procedure: k19211 
o|contracted procedure: k19218 
o|contracted procedure: k19308 
o|contracted procedure: k19238 
o|contracted procedure: k19241 
o|contracted procedure: k19247 
o|contracted procedure: k19260 
o|contracted procedure: k19270 
o|contracted procedure: k19263 
o|contracted procedure: k19284 
o|contracted procedure: k19277 
o|contracted procedure: k19294 
o|contracted procedure: k19300 
o|contracted procedure: k19319 
o|contracted procedure: k19312 
o|contracted procedure: k19331 
o|contracted procedure: k19337 
o|contracted procedure: k19374 
o|contracted procedure: k19349 
o|contracted procedure: k19370 
o|contracted procedure: k19352 
o|contracted procedure: k19359 
o|contracted procedure: k19363 
o|contracted procedure: k19355 
o|contracted procedure: k19391 
o|contracted procedure: k19402 
o|contracted procedure: k19406 
o|contracted procedure: k19410 
o|contracted procedure: k19417 
o|contracted procedure: k19420 
o|contracted procedure: k19426 
o|contracted procedure: k19432 
o|contracted procedure: k19438 
o|contracted procedure: k19460 
o|contracted procedure: k19466 
o|contracted procedure: k19473 
o|contracted procedure: k19518 
o|contracted procedure: k19479 
o|contracted procedure: k19486 
o|contracted procedure: k19503 
o|contracted procedure: k19514 
o|contracted procedure: k19531 
o|contracted procedure: k19542 
o|contracted procedure: k19751 
o|contracted procedure: k19754 
o|contracted procedure: k19757 
o|contracted procedure: k19767 
o|contracted procedure: k19776 
o|contracted procedure: k19783 
o|contracted procedure: k19792 
o|contracted procedure: k19800 
o|contracted procedure: k19812 
o|contracted procedure: k19822 
o|contracted procedure: k19826 
o|contracted procedure: k19868 
o|contracted procedure: k19871 
o|contracted procedure: k19874 
o|contracted procedure: k19877 
o|contracted procedure: k19880 
o|contracted procedure: k19883 
o|contracted procedure: k19886 
o|contracted procedure: k19892 
o|contracted procedure: k1957234012 
o|contracted procedure: k19895 
o|contracted procedure: k19898 
o|contracted procedure: k19911 
o|contracted procedure: k19915 
o|contracted procedure: k19936 
o|contracted procedure: k19967 
o|contracted procedure: k19975 
o|contracted procedure: k19971 
o|contracted procedure: k19978 
o|contracted procedure: k19984 
o|contracted procedure: k20000 
o|contracted procedure: k19993 
o|contracted procedure: k20003 
o|contracted procedure: k20025 
o|contracted procedure: k20033 
o|contracted procedure: k20029 
o|contracted procedure: k20006 
o|contracted procedure: k20013 
o|contracted procedure: k20021 
o|contracted procedure: k20017 
o|contracted procedure: k20036 
o|contracted procedure: k1957234000 
o|contracted procedure: k20045 
o|contracted procedure: k20048 
o|contracted procedure: k20072 
o|contracted procedure: k20096 
o|contracted procedure: k20080 
o|contracted procedure: k20092 
o|contracted procedure: k20083 
o|contracted procedure: k20099 
o|contracted procedure: k20102 
o|contracted procedure: k20110 
o|contracted procedure: k20131 
o|contracted procedure: k20113 
o|contracted procedure: k20127 
o|contracted procedure: k20116 
o|contracted procedure: k20123 
o|contracted procedure: k20135 
o|contracted procedure: k20147 
o|contracted procedure: k20157 
o|contracted procedure: k20161 
o|contracted procedure: k20170 
o|contracted procedure: k20180 
o|contracted procedure: k20184 
o|contracted procedure: k20187 
o|contracted procedure: k20227 
o|contracted procedure: k20235 
o|contracted procedure: k20231 
o|contracted procedure: k20208 
o|contracted procedure: k20215 
o|contracted procedure: k20223 
o|contracted procedure: k20219 
o|contracted procedure: k20256 
o|contracted procedure: k20264 
o|contracted procedure: k20260 
o|contracted procedure: k20298 
o|contracted procedure: k20273 
o|contracted procedure: k20291 
o|contracted procedure: k20282 
o|contracted procedure: k20302 
o|contracted procedure: k20305 
o|contracted procedure: k20326 
o|contracted procedure: k20313 
o|contracted procedure: k20322 
o|contracted procedure: k20362 
o|contracted procedure: k20329 
o|contracted procedure: k20332 
o|contracted procedure: k20344 
o|contracted procedure: k20354 
o|contracted procedure: k20358 
o|contracted procedure: k20384 
o|contracted procedure: k20392 
o|contracted procedure: k20388 
o|contracted procedure: k20365 
o|contracted procedure: k20372 
o|contracted procedure: k20380 
o|contracted procedure: k20376 
o|contracted procedure: k19849 
o|contracted procedure: k19852 
o|contracted procedure: k30221 
o|contracted procedure: k30839 
o|contracted procedure: k30835 
o|contracted procedure: k30229 
o|contracted procedure: k30237 
o|contracted procedure: k30245 
o|contracted procedure: k30253 
o|contracted procedure: k30261 
o|contracted procedure: k30269 
o|contracted procedure: k30277 
o|contracted procedure: k30285 
o|contracted procedure: k30293 
o|contracted procedure: k30301 
o|contracted procedure: k30309 
o|contracted procedure: k30317 
o|contracted procedure: k30325 
o|contracted procedure: k30333 
o|contracted procedure: k30341 
o|contracted procedure: k30349 
o|contracted procedure: k30357 
o|contracted procedure: k30365 
o|contracted procedure: k30373 
o|contracted procedure: k30381 
o|contracted procedure: k30389 
o|contracted procedure: k30397 
o|contracted procedure: k30405 
o|contracted procedure: k30413 
o|contracted procedure: k30421 
o|contracted procedure: k30831 
o|contracted procedure: k30429 
o|contracted procedure: k30437 
o|contracted procedure: k30445 
o|contracted procedure: k30449 
o|contracted procedure: k30823 
o|contracted procedure: k30827 
o|contracted procedure: k30453 
o|contracted procedure: k30819 
o|contracted procedure: k30815 
o|contracted procedure: k30457 
o|contracted procedure: k30461 
o|contracted procedure: k30811 
o|contracted procedure: k30465 
o|contracted procedure: k30807 
o|contracted procedure: k30469 
o|contracted procedure: k30803 
o|contracted procedure: k30473 
o|contracted procedure: k30477 
o|contracted procedure: k30481 
o|contracted procedure: k30799 
o|contracted procedure: k30791 
o|contracted procedure: k30795 
o|contracted procedure: k30485 
o|contracted procedure: k30787 
o|contracted procedure: k30763 
o|contracted procedure: k30767 
o|contracted procedure: k30783 
o|contracted procedure: k30771 
o|contracted procedure: k30779 
o|contracted procedure: k30775 
o|contracted procedure: k30489 
o|contracted procedure: k30759 
o|contracted procedure: k30493 
o|contracted procedure: k30755 
o|contracted procedure: k30497 
o|contracted procedure: k30751 
o|contracted procedure: k30723 
o|contracted procedure: k30739 
o|contracted procedure: k30747 
o|contracted procedure: k30743 
o|contracted procedure: k30727 
o|contracted procedure: k30735 
o|contracted procedure: k30731 
o|contracted procedure: k30501 
o|contracted procedure: k30715 
o|contracted procedure: k30719 
o|contracted procedure: k30707 
o|contracted procedure: k30711 
o|contracted procedure: k30505 
o|contracted procedure: k30703 
o|contracted procedure: k30509 
o|contracted procedure: k30699 
o|contracted procedure: k30691 
o|contracted procedure: k30695 
o|contracted procedure: k30687 
o|contracted procedure: k30513 
o|contracted procedure: k30677 
o|contracted procedure: k30669 
o|contracted procedure: k30673 
o|contracted procedure: k30517 
o|contracted procedure: k30665 
o|contracted procedure: k30521 
o|contracted procedure: k30649 
o|contracted procedure: k30657 
o|contracted procedure: k30661 
o|contracted procedure: k30653 
o|contracted procedure: k30525 
o|contracted procedure: k30529 
o|contracted procedure: k30645 
o|contracted procedure: k30533 
o|contracted procedure: k30641 
o|contracted procedure: k30537 
o|contracted procedure: k30637 
o|contracted procedure: k30633 
o|contracted procedure: k30541 
o|contracted procedure: k30629 
o|contracted procedure: k30545 
o|contracted procedure: k30625 
o|contracted procedure: k30549 
o|contracted procedure: k30553 
o|contracted procedure: k30621 
o|contracted procedure: k30557 
o|contracted procedure: k30617 
o|contracted procedure: k30561 
o|contracted procedure: k30569 
o|contracted procedure: k30573 
o|contracted procedure: k30613 
o|contracted procedure: k30577 
o|contracted procedure: k30609 
o|contracted procedure: k30585 
o|contracted procedure: k30605 
o|contracted procedure: k30589 
o|contracted procedure: k30601 
o|contracted procedure: k30597 
o|contracted procedure: k30593 
o|contracted procedure: k30581 
o|contracted procedure: k30565 
o|contracted procedure: k30441 
o|contracted procedure: k30433 
o|contracted procedure: k30425 
o|contracted procedure: k30417 
o|contracted procedure: k30409 
o|contracted procedure: k30401 
o|contracted procedure: k30393 
o|contracted procedure: k30385 
o|contracted procedure: k30377 
o|contracted procedure: k30369 
o|contracted procedure: k30361 
o|contracted procedure: k30353 
o|contracted procedure: k30345 
o|contracted procedure: k30337 
o|contracted procedure: k30329 
o|contracted procedure: k30321 
o|contracted procedure: k30313 
o|contracted procedure: k30305 
o|contracted procedure: k30297 
o|contracted procedure: k30289 
o|contracted procedure: k30281 
o|contracted procedure: k30273 
o|contracted procedure: k30265 
o|contracted procedure: k30257 
o|contracted procedure: k30249 
o|contracted procedure: k30241 
o|contracted procedure: k30233 
o|contracted procedure: k30225 
o|contracted procedure: k20398 
o|contracted procedure: k20469 
o|substituted constant variable: g35852 
o|contracted procedure: k20480 
o|contracted procedure: k20476 
o|contracted procedure: k20521 
o|contracted procedure: k20506 
o|contracted procedure: k20517 
o|contracted procedure: k20513 
o|contracted procedure: k20494 
o|contracted procedure: k20490 
o|contracted procedure: k20657 
o|contracted procedure: k20460 
o|contracted procedure: k20666 
o|contracted procedure: k20714 
o|contracted procedure: k20718 
o|contracted procedure: k20669 
o|contracted procedure: k20681 
o|contracted procedure: k20691 
o|substituted constant variable: g35854 
o|contracted procedure: k20704 
o|contracted procedure: k20694 
o|contracted procedure: k20710 
o|contracted procedure: k20735 
o|contracted procedure: k963934037 
o|contracted procedure: k20747 
o|substituted constant variable: g35859 
o|contracted procedure: k2615434026 
o|contracted procedure: k20758 
o|contracted procedure: k2615434021 
o|contracted procedure: k20762 
o|contracted procedure: k2615434031 
o|contracted procedure: k20769 
o|contracted procedure: k20775 
o|contracted procedure: k21533 
o|contracted procedure: k20781 
o|contracted procedure: k20784 
o|contracted procedure: k20808 
o|contracted procedure: k20822 
o|contracted procedure: k20832 
o|substituted constant variable: g35862 
o|contracted procedure: k20839 
o|contracted procedure: k20851 
o|contracted procedure: k20847 
o|contracted procedure: k20861 
o|contracted procedure: k20878 
o|contracted procedure: k20881 
o|inlining procedure: k20891 
o|contracted procedure: k20909 
o|contracted procedure: k20900 
o|inlining procedure: k20891 
o|contracted procedure: k20917 
o|contracted procedure: k21516 
o|contracted procedure: k20923 
o|contracted procedure: k963934045 
o|contracted procedure: k20938 
o|substituted constant variable: g35865 
o|contracted procedure: k20949 
o|contracted procedure: k20956 
o|contracted procedure: k20959 
o|contracted procedure: k20965 
o|contracted procedure: k20968 
o|contracted procedure: k20986 
o|contracted procedure: k21024 
o|contracted procedure: k20995 
o|contracted procedure: k21008 
o|contracted procedure: k21033 
o|contracted procedure: k963934051 
o|contracted procedure: k21054 
o|substituted constant variable: g35867 
o|contracted procedure: k21060 
o|contracted procedure: k21140 
o|contracted procedure: k21072 
o|contracted procedure: k21108 
o|contracted procedure: k21124 
o|contracted procedure: k21148 
o|contracted procedure: k21167 
o|contracted procedure: k21179 
o|contracted procedure: k21182 
o|contracted procedure: k21213 
o|contracted procedure: k21206 
o|contracted procedure: k21217 
o|contracted procedure: k21233 
o|contracted procedure: k21236 
o|contracted procedure: k21303 
o|contracted procedure: k21299 
o|contracted procedure: k21239 
o|contracted procedure: k21242 
o|contracted procedure: k21277 
o|contracted procedure: k21289 
o|contracted procedure: k21311 
o|contracted procedure: k21314 
o|contracted procedure: k21381 
o|contracted procedure: k21377 
o|contracted procedure: k21317 
o|contracted procedure: k21320 
o|contracted procedure: k21355 
o|contracted procedure: k21434 
o|contracted procedure: k21386 
o|contracted procedure: k21427 
o|contracted procedure: k21397 
o|contracted procedure: k21404 
o|contracted procedure: k21416 
o|contracted procedure: k21423 
o|contracted procedure: k21462 
o|contracted procedure: k21468 
o|contracted procedure: k21485 
o|contracted procedure: k21491 
o|contracted procedure: k21550 
o|contracted procedure: k21560 
o|substituted constant variable: g35870 
o|contracted procedure: k21573 
o|contracted procedure: k21563 
o|contracted procedure: k21582 
o|contracted procedure: k21578 
o|contracted procedure: k21586 
o|contracted procedure: k21590 
o|contracted procedure: k21700 
o|contracted procedure: k21599 
o|contracted procedure: k21609 
o|contracted procedure: k21602 
o|contracted procedure: k21605 
o|contracted procedure: k21696 
o|contracted procedure: k21615 
o|contracted procedure: k21618 
o|contracted procedure: k21624 
o|contracted procedure: k21638 
o|contracted procedure: k21646 
o|contracted procedure: k21642 
o|contracted procedure: k21667 
o|contracted procedure: k21673 
o|contracted procedure: k21754 
o|contracted procedure: k21763 
o|contracted procedure: k21766 
o|contracted procedure: k21769 
o|contracted procedure: k21777 
o|contracted procedure: k2040734063 
o|contracted procedure: k21792 
o|contracted procedure: k21800 
o|contracted procedure: k21815 
o|contracted procedure: k21824 
o|contracted procedure: k21829 
o|contracted procedure: k21833 
o|contracted procedure: k21854 
o|contracted procedure: k21839 
o|contracted procedure: k21843 
o|contracted procedure: k21850 
o|contracted procedure: k21857 
o|contracted procedure: k2040734068 
o|contracted procedure: k21867 
o|contracted procedure: k21880 
o|contracted procedure: k21890 
o|contracted procedure: k21894 
o|contracted procedure: k2174434076 
o|contracted procedure: k21916 
o|contracted procedure: k21897 
o|contracted procedure: k21901 
o|contracted procedure: k21912 
o|contracted procedure: k21908 
o|contracted procedure: k22167 
o|contracted procedure: k22179 
o|contracted procedure: k22182 
o|contracted procedure: k22449 
o|contracted procedure: k22249 
o|contracted procedure: k22442 
o|contracted procedure: k22438 
o|contracted procedure: k22434 
o|contracted procedure: k22430 
o|contracted procedure: k22264 
o|contracted procedure: k22271 
o|contracted procedure: k22275 
o|contracted procedure: k22284 
o|contracted procedure: k22304 
o|contracted procedure: k22300 
o|contracted procedure: k22287 
o|contracted procedure: k22471 
o|contracted procedure: k22496 
o|contracted procedure: k22521 
o|contracted procedure: k22513 
o|contracted procedure: k22517 
o|contracted procedure: k22509 
o|contracted procedure: k22526 
o|contracted procedure: k26180 
o|contracted procedure: k26206 
o|contracted procedure: k26183 
o|contracted procedure: k26202 
o|contracted procedure: k26190 
o|contracted procedure: k26198 
o|contracted procedure: k26194 
o|contracted procedure: k22535 
o|contracted procedure: k22492 
o|contracted procedure: k22480 
o|contracted procedure: k22547 
o|contracted procedure: k22550 
o|contracted procedure: k22553 
o|contracted procedure: k22561 
o|contracted procedure: k22569 
o|contracted procedure: k22576 
o|contracted procedure: k22585 
o|contracted procedure: k22592 
o|contracted procedure: k22596 
o|contracted procedure: k22608 
o|contracted procedure: k22604 
o|contracted procedure: k22600 
o|contracted procedure: k22423 
o|contracted procedure: k22316 
o|contracted procedure: k22340 
o|contracted procedure: k22343 
o|contracted procedure: k22358 
o|contracted procedure: k22350 
o|contracted procedure: k22354 
o|contracted procedure: k22367 
o|contracted procedure: k22373 
o|contracted procedure: k22382 
o|contracted procedure: k22398 
o|contracted procedure: k22402 
o|contracted procedure: k22394 
o|contracted procedure: k22390 
o|contracted procedure: k22386 
o|contracted procedure: k22412 
o|contracted procedure: k20549 
o|contracted procedure: k20545 
o|contracted procedure: k20541 
o|contracted procedure: k20537 
o|contracted procedure: k20527 
o|contracted procedure: k23257 
o|contracted procedure: k20578 
o|contracted procedure: k20574 
o|contracted procedure: k20555 
o|contracted procedure: k20566 
o|contracted procedure: k20570 
o|contracted procedure: k20562 
o|contracted procedure: k23266 
o|contracted procedure: k23104 
o|contracted procedure: k23107 
o|contracted procedure: k23119 
o|contracted procedure: k23243 
o|contracted procedure: k23137 
o|contracted procedure: k23146 
o|contracted procedure: k23153 
o|contracted procedure: k23160 
o|contracted procedure: k23164 
o|contracted procedure: k23173 
o|contracted procedure: k23179 
o|contracted procedure: k23186 
o|contracted procedure: k23193 
o|contracted procedure: k23199 
o|contracted procedure: k23206 
o|contracted procedure: k23213 
o|contracted procedure: k23217 
o|contracted procedure: k23224 
o|contracted procedure: k23231 
o|contracted procedure: k23221 
o|contracted procedure: k23251 
o|contracted procedure: k22157 
o|contracted procedure: k22161 
o|contracted procedure: k22096 
o|contracted procedure: k22149 
o|contracted procedure: k22153 
o|contracted procedure: k22102 
o|contracted procedure: k22105 
o|contracted procedure: k22114 
o|contracted procedure: k22145 
o|contracted procedure: k22133 
o|contracted procedure: k22141 
o|contracted procedure: k22137 
o|contracted procedure: k22123 
o|contracted procedure: k22419 
o|contracted procedure: k22642 
o|contracted procedure: k22649 
o|contracted procedure: k22660 
o|contracted procedure: k22667 
o|contracted procedure: k22792 
o|contracted procedure: k22677 
o|contracted procedure: k22687 
o|contracted procedure: k22788 
o|contracted procedure: k2616434117 
o|contracted procedure: k22627 
o|contracted procedure: k22623 
o|contracted procedure: k22690 
o|contracted procedure: k22704 
o|contracted procedure: k2616434107 
o|contracted procedure: k22719 
o|contracted procedure: k22726 
o|contracted procedure: k22745 
o|contracted procedure: k22741 
o|contracted procedure: k22752 
o|contracted procedure: k2616434112 
o|contracted procedure: k22762 
o|contracted procedure: k22755 
o|contracted procedure: k22766 
o|contracted procedure: k22770 
o|contracted procedure: k22782 
o|contracted procedure: k20443 
o|substituted constant variable: g35912 
o|contracted procedure: k20450 
o|contracted procedure: k2040734127 
o|contracted procedure: k20606 
o|contracted procedure: k20602 
o|contracted procedure: k20598 
o|contracted procedure: k20594 
o|contracted procedure: k20584 
o|contracted procedure: k22934 
o|contracted procedure: k20635 
o|contracted procedure: k20631 
o|contracted procedure: k20612 
o|contracted procedure: k20623 
o|contracted procedure: k20627 
o|contracted procedure: k20619 
o|contracted procedure: k22943 
o|contracted procedure: k22819 
o|contracted procedure: k22822 
o|contracted procedure: k22842 
o|contracted procedure: k22848 
o|contracted procedure: k22914 
o|contracted procedure: k22854 
o|contracted procedure: k22857 
o|contracted procedure: k22860 
o|contracted procedure: k21968 
o|contracted procedure: k21971 
o|contracted procedure: k21977 
o|contracted procedure: k2040734132 
o|contracted procedure: k21993 
o|contracted procedure: k21989 
o|contracted procedure: k22878 
o|contracted procedure: k22886 
o|contracted procedure: k22882 
o|contracted procedure: k22015 
o|contracted procedure: k22000 
o|contracted procedure: k22004 
o|contracted procedure: k22011 
o|contracted procedure: k2174434138 
o|contracted procedure: k22037 
o|contracted procedure: k22018 
o|contracted procedure: k22022 
o|contracted procedure: k22033 
o|contracted procedure: k22029 
o|contracted procedure: k22046 
o|contracted procedure: k22053 
o|contracted procedure: k22087 
o|contracted procedure: k22059 
o|contracted procedure: k22070 
o|contracted procedure: k22066 
o|contracted procedure: k22081 
o|contracted procedure: k22204 
o|contracted procedure: k22243 
o|contracted procedure: k22207 
o|contracted procedure: k22216 
o|contracted procedure: k22213 
o|contracted procedure: k22239 
o|contracted procedure: k22228 
o|contracted procedure: k22235 
o|contracted procedure: k22905 
o|contracted procedure: k22901 
o|contracted procedure: k2174434154 
o|contracted procedure: k21962 
o|contracted procedure: k21928 
o|contracted procedure: k21958 
o|contracted procedure: k21950 
o|contracted procedure: k2040734147 
o|contracted procedure: k21946 
o|contracted procedure: k21931 
o|contracted procedure: k21942 
o|contracted procedure: k21938 
o|contracted procedure: k21922 
o|contracted procedure: k2040734163 
o|contracted procedure: k22928 
o|contracted procedure: k22949 
o|contracted procedure: k22952 
o|contracted procedure: k22955 
o|contracted procedure: k22967 
o|contracted procedure: k22974 
o|contracted procedure: k22978 
o|contracted procedure: k22987 
o|contracted procedure: k22994 
o|contracted procedure: k23098 
o|contracted procedure: k23000 
o|contracted procedure: k23021 
o|contracted procedure: k23017 
o|contracted procedure: k23094 
o|contracted procedure: k23029 
o|contracted procedure: k23066 
o|contracted procedure: k23051 
o|contracted procedure: k23058 
o|contracted procedure: k23062 
o|contracted procedure: k23090 
o|contracted procedure: k23075 
o|contracted procedure: k23082 
o|contracted procedure: k23086 
o|contracted procedure: k26060 
o|contracted procedure: k26079 
o|contracted procedure: k26082 
o|contracted procedure: k26091 
o|contracted procedure: k26097 
o|contracted procedure: k26103 
o|contracted procedure: k26125 
o|contracted procedure: k26273 
o|contracted procedure: k26283 
o|substituted constant variable: g35948 
o|contracted procedure: k26290 
o|contracted procedure: k26314 
o|contracted procedure: k26298 
o|contracted procedure: k26310 
o|contracted procedure: k26306 
o|contracted procedure: k26302 
o|contracted procedure: k26294 
o|contracted procedure: k2615434180 
o|contracted procedure: k2713234175 
o|contracted procedure: k26369 
o|contracted procedure: k26809 
o|contracted procedure: k26383 
o|contracted procedure: k26398 
o|contracted procedure: k26404 
o|contracted procedure: k26428 
o|contracted procedure: k26443 
o|contracted procedure: k26446 
o|contracted procedure: k26449 
o|contracted procedure: k26461 
o|contracted procedure: k26464 
o|contracted procedure: k26467 
o|contracted procedure: k26475 
o|contracted procedure: k26483 
o|contracted procedure: k26490 
o|contracted procedure: k26496 
o|contracted procedure: k26507 
o|contracted procedure: k26510 
o|contracted procedure: k26513 
o|contracted procedure: k26525 
o|contracted procedure: k26528 
o|contracted procedure: k26531 
o|contracted procedure: k26539 
o|contracted procedure: k26547 
o|contracted procedure: k26554 
o|contracted procedure: k26560 
o|contracted procedure: k26577 
o|contracted procedure: k26580 
o|contracted procedure: k26583 
o|contracted procedure: k26595 
o|contracted procedure: k26598 
o|contracted procedure: k26601 
o|contracted procedure: k26609 
o|contracted procedure: k26617 
o|contracted procedure: k26624 
o|contracted procedure: k26630 
o|contracted procedure: k26324 
o|contracted procedure: k26333 
o|contracted procedure: k26340 
o|contracted procedure: k2614434192 
o|contracted procedure: k26348 
o|contracted procedure: k18306 
o|contracted procedure: k18345 
o|contracted procedure: k18315 
o|contracted procedure: k18339 
o|contracted procedure: k26651 
o|contracted procedure: k26662 
o|contracted procedure: k26665 
o|contracted procedure: k26668 
o|contracted procedure: k26680 
o|contracted procedure: k26683 
o|contracted procedure: k26686 
o|contracted procedure: k26694 
o|contracted procedure: k26702 
o|contracted procedure: k26709 
o|contracted procedure: k26715 
o|contracted procedure: k26730 
o|contracted procedure: k26764 
o|contracted procedure: k2614434208 
o|contracted procedure: k26774 
o|contracted procedure: k2614434214 
o|contracted procedure: k26783 
o|contracted procedure: k26790 
o|contracted procedure: k26793 
o|contracted procedure: k26803 
o|contracted procedure: k26846 
o|contracted procedure: k26852 
o|contracted procedure: k26858 
o|contracted procedure: k26861 
o|contracted procedure: k26920 
o|contracted procedure: k26879 
o|contracted procedure: k26882 
o|contracted procedure: k26896 
o|contracted procedure: k26905 
o|contracted procedure: k26911 
o|contracted procedure: k26957 
o|contracted procedure: k26961 
o|contracted procedure: k26951 
o|contracted procedure: k26935 
o|contracted procedure: k26942 
o|contracted procedure: k26984 
o|contracted procedure: k27005 
o|contracted procedure: k27023 
o|contracted procedure: k27026 
o|contracted procedure: k27122 
o|contracted procedure: k27034 
o|contracted procedure: k27118 
o|contracted procedure: k27039 
o|contracted procedure: k27048 
o|contracted procedure: k27055 
o|contracted procedure: k27060 
o|contracted procedure: k27070 
o|contracted procedure: k27076 
o|contracted procedure: k27083 
o|contracted procedure: k27100 
o|contracted procedure: k27179 
o|contracted procedure: k27192 
o|contracted procedure: k27206 
o|contracted procedure: k27209 
o|contracted procedure: k27330 
o|contracted procedure: k27334 
o|contracted procedure: k27215 
o|contracted procedure: k27224 
o|contracted procedure: k27230 
o|contracted procedure: k27311 
o|contracted procedure: k27241 
o|contracted procedure: k27263 
o|contracted procedure: k27275 
o|contracted procedure: k27143 
o|contracted procedure: k27282 
o|contracted procedure: k27293 
o|contracted procedure: k27155 
o|contracted procedure: k27302 
o|contracted procedure: k27375 
o|contracted procedure: k27378 
o|contracted procedure: k27388 
o|contracted procedure: k27391 
o|contracted procedure: k27471 
o|contracted procedure: k27475 
o|contracted procedure: k27397 
o|contracted procedure: k27408 
o|contracted procedure: k27352 
o|contracted procedure: k27451 
o|contracted procedure: k27343 
o|contracted procedure: k27416 
o|contracted procedure: k27442 
o|contracted procedure: k27423 
o|contracted procedure: k27434 
o|contracted procedure: k27427 
o|contracted procedure: k27431 
o|contracted procedure: k27507 
o|contracted procedure: k2614434237 
o|contracted procedure: k27545 
o|contracted procedure: k27557 
o|contracted procedure: k27561 
o|contracted procedure: k27569 
o|contracted procedure: k27600 
o|contracted procedure: k27619 
o|contracted procedure: k27609 
o|contracted procedure: k27810 
o|contracted procedure: k27634 
o|contracted procedure: k27637 
o|contracted procedure: k27646 
o|contracted procedure: k27649 
o|contracted procedure: k27658 
o|contracted procedure: k27670 
o|contracted procedure: k27682 
o|contracted procedure: k27735 
o|contracted procedure: k963934245 
o|contracted procedure: k27700 
o|substituted constant variable: g35981 
o|contracted procedure: k27709 
o|contracted procedure: k27724 
o|contracted procedure: k27716 
o|contracted procedure: k27720 
o|contracted procedure: k27731 
o|contracted procedure: k27746 
o|contracted procedure: k27739 
o|contracted procedure: k27760 
o|contracted procedure: k27753 
o|contracted procedure: k27776 
o|contracted procedure: k27782 
o|contracted procedure: k27789 
o|contracted procedure: k27767 
o|contracted procedure: k27800 
o|contracted procedure: k27794 
o|contracted procedure: k27821 
o|contracted procedure: k27814 
o|contracted procedure: k27849 
o|contracted procedure: k27842 
o|contracted procedure: k28030 
o|contracted procedure: k27861 
o|contracted procedure: k27864 
o|contracted procedure: k27870 
o|contracted procedure: k27876 
o|contracted procedure: k27888 
o|contracted procedure: k27900 
o|contracted procedure: k27912 
o|contracted procedure: k27923 
o|contracted procedure: k27965 
o|contracted procedure: k27938 
o|contracted procedure: k27941 
o|contracted procedure: k27951 
o|contracted procedure: k27961 
o|contracted procedure: k27990 
o|contracted procedure: k963934258 
o|contracted procedure: k27980 
o|substituted constant variable: g35989 
o|contracted procedure: k27994 
o|contracted procedure: k28000 
o|contracted procedure: k28020 
o|contracted procedure: k28008 
o|contracted procedure: k28014 
o|contracted procedure: k28059 
o|contracted procedure: k28052 
o|contracted procedure: k28078 
o|contracted procedure: k28094 
o|contracted procedure: k28108 
o|contracted procedure: k28119 
o|contracted procedure: k28127 
o|contracted procedure: k28138 
o|contracted procedure: k28131 
o|contracted procedure: k28159 
o|contracted procedure: k28170 
o|contracted procedure: k28179 
o|contracted procedure: k28190 
o|contracted procedure: k28197 
o|contracted procedure: k28215 
o|contracted procedure: k28225 
o|contracted procedure: k28235 
o|contracted procedure: k28232 
o|contracted procedure: k28252 
o|contracted procedure: k28245 
o|contracted procedure: k28267 
o|contracted procedure: k28274 
o|contracted procedure: k28283 
o|contracted procedure: k28298 
o|contracted procedure: k28307 
o|contracted procedure: k28318 
o|contracted procedure: k28325 
o|contracted procedure: k28334 
o|contracted procedure: k28373 
o|contracted procedure: k28380 
o|contracted procedure: k28342 
o|contracted procedure: k28352 
o|contracted procedure: k28363 
o|contracted procedure: k28386 
o|contracted procedure: k28420 
o|contracted procedure: k28427 
o|contracted procedure: k28389 
o|contracted procedure: k28398 
o|contracted procedure: k28410 
o|contracted procedure: k28430 
o|contracted procedure: k28446 
o|contracted procedure: k28450 
o|contracted procedure: k28442 
o|contracted procedure: k28477 
o|contracted procedure: k28518 
o|contracted procedure: k28511 
o|contracted procedure: k28721 
o|contracted procedure: k28527 
o|contracted procedure: k28542 
o|contracted procedure: k28549 
o|contracted procedure: k28593 
o|contracted procedure: k28604 
o|contracted procedure: k28555 
o|contracted procedure: k28572 
o|contracted procedure: k28583 
o|contracted procedure: k28627 
o|contracted procedure: k28691 
o|contracted procedure: k28633 
o|contracted procedure: k28645 
o|contracted procedure: k28652 
o|inlining procedure: k28642 
o|inlining procedure: k28642 
o|contracted procedure: k28667 
o|contracted procedure: k28671 
o|contracted procedure: k28685 
o|contracted procedure: k28694 
o|contracted procedure: k28713 
o|contracted procedure: k28704 
o|contracted procedure: k28732 
o|contracted procedure: k28725 
o|contracted procedure: k28739 
o|contracted procedure: k28775 
o|contracted procedure: k28746 
o|contracted procedure: k28755 
o|contracted procedure: k28772 
o|contracted procedure: k28761 
o|contracted procedure: k28799 
o|contracted procedure: k28805 
o|contracted procedure: k28824 
o|contracted procedure: k28820 
o|contracted procedure: k28833 
o|contracted procedure: k28962 
o|contracted procedure: k29100 
o|contracted procedure: k28968 
o|contracted procedure: k28984 
o|contracted procedure: k28996 
o|substituted constant variable: g36020 
o|contracted procedure: k28866 
o|contracted procedure: k28845 
o|inlining procedure: k28999 
o|inlining procedure: k28999 
o|contracted procedure: k29012 
o|contracted procedure: k29015 
o|contracted procedure: k29028 
o|contracted procedure: k29034 
o|inlining procedure: k29025 
o|inlining procedure: k29025 
o|contracted procedure: k29048 
o|contracted procedure: k28956 
o|contracted procedure: k28875 
o|inlining procedure: k29025 
o|contracted procedure: k28889 
o|contracted procedure: k28912 
o|contracted procedure: k28918 
o|contracted procedure: k28926 
o|contracted procedure: k28934 
o|contracted procedure: k28897 
o|contracted procedure: k28930 
o|contracted procedure: k28946 
o|contracted procedure: k29055 
o|contracted procedure: k29058 
o|contracted procedure: k29064 
o|contracted procedure: k29072 
o|contracted procedure: k29092 
o|contracted procedure: k29084 
o|contracted procedure: k29075 
o|contracted procedure: k29121 
o|contracted procedure: k29132 
o|contracted procedure: k29153 
o|contracted procedure: k29149 
o|contracted procedure: k29165 
o|contracted procedure: k29161 
o|contracted procedure: k29176 
o|contracted procedure: k29201 
o|contracted procedure: k29208 
o|contracted procedure: k29211 
o|contracted procedure: k29224 
o|contracted procedure: k29239 
o|contracted procedure: k29249 
o|contracted procedure: k29253 
o|contracted procedure: k29257 
o|contracted procedure: k29269 
o|contracted procedure: k29279 
o|contracted procedure: k29283 
o|contracted procedure: k29286 
o|contracted procedure: k29303 
o|contracted procedure: k29292 
o|contracted procedure: k29299 
o|contracted procedure: k29311 
o|contracted procedure: k29318 
o|contracted procedure: k29333 
o|contracted procedure: k29343 
o|contracted procedure: k29347 
o|contracted procedure: k29353 
o|contracted procedure: k29365 
o|contracted procedure: k29368 
o|contracted procedure: k29383 
o|contracted procedure: k29393 
o|contracted procedure: k29397 
o|contracted procedure: k29401 
o|contracted procedure: k29407 
o|contracted procedure: k29424 
o|contracted procedure: k29427 
o|contracted procedure: k29442 
o|contracted procedure: k29452 
o|contracted procedure: k29456 
o|contracted procedure: k29460 
o|contracted procedure: k29466 
o|contracted procedure: k29527 
o|contracted procedure: k29480 
o|contracted procedure: k29487 
o|contracted procedure: k29502 
o|contracted procedure: k29512 
o|contracted procedure: k29516 
o|contracted procedure: k29523 
o|contracted procedure: k29533 
o|contracted procedure: k29573 
o|contracted procedure: k29562 
o|contracted procedure: k29579 
o|contracted procedure: k29600 
o|contracted procedure: k29609 
o|contracted procedure: k29632 
o|contracted procedure: k29629 
o|contracted procedure: k29646 
o|contracted procedure: k29656 
o|contracted procedure: k29662 
o|contracted procedure: k29669 
o|contracted procedure: k29682 
o|contracted procedure: k29685 
o|contracted procedure: k29698 
o|contracted procedure: k29713 
o|contracted procedure: k29723 
o|contracted procedure: k29727 
o|contracted procedure: k29730 
o|contracted procedure: k29741 
o|contracted procedure: k29748 
o|contracted procedure: k29769 
o|contracted procedure: k29775 
o|contracted procedure: k29796 
o|contracted procedure: k29802 
o|contracted procedure: k29808 
o|contracted procedure: k29843 
o|contracted procedure: k29849 
o|contracted procedure: k29852 
o|contracted procedure: k29861 
o|contracted procedure: k29864 
o|contracted procedure: k29873 
o|contracted procedure: k29876 
o|contracted procedure: k29909 
o|contracted procedure: k29922 
o|contracted procedure: k29933 
o|contracted procedure: k29942 
o|contracted procedure: k29962 
o|contracted procedure: k29965 
o|contracted procedure: k29972 
o|contracted procedure: k30022 
o|contracted procedure: k30006 
o|contracted procedure: k30018 
o|contracted procedure: k30014 
o|contracted procedure: k30010 
o|contracted procedure: k29990 
o|contracted procedure: k30002 
o|contracted procedure: k29998 
o|contracted procedure: k29994 
o|contracted procedure: k29982 
o|contracted procedure: k30041 
o|contracted procedure: k30037 
o|contracted procedure: k30029 
o|contracted procedure: k30207 
o|contracted procedure: k30070 
o|contracted procedure: k30203 
o|contracted procedure: k30079 
o|contracted procedure: k30105 
o|contracted procedure: k30095 
o|contracted procedure: k30086 
o|contracted procedure: k30119 
o|contracted procedure: k30127 
o|contracted procedure: k30123 
o|contracted procedure: k30171 
o|contracted procedure: k30139 
o|contracted procedure: k30146 
o|contracted procedure: k30154 
o|contracted procedure: k30150 
o|contracted procedure: k30166 
o|contracted procedure: k30181 
o|contracted procedure: k30197 
o|contracted procedure: k30187 
o|contracted procedure: k30852 
o|contracted procedure: k30900 
o|contracted procedure: k30903 
o|simplifications: ((if . 14) (let . 672)) 
o|replaced variables: 214 
o|removed binding forms: 2706 
o|inlining procedure: "(irregex-core.scm:235) chicken.irregex#%irregex-match-end-index" 
o|inlining procedure: "(irregex-core.scm:303) chicken.irregex#%irregex-match-end-index" 
o|inlining procedure: "(irregex-core.scm:315) chicken.irregex#%irregex-match-end-index" 
(o x)|known list op on rest arg sublist: ##core#rest-car o927 0 
(o x)|known list op on rest arg sublist: ##core#rest-cdr o927 0 
(o x)|known list op on rest arg sublist: ##core#rest-car o1033 0 
o|contracted procedure: k9826 
o|inlining procedure: "(irregex-core.scm:742) chicken.irregex#char-altcase" 
o|contracted procedure: k10781 
o|contracted procedure: k13328 
o|contracted procedure: k13555 
o|inlining procedure: "(irregex-core.scm:3432) chicken.irregex#%irregex-match-end-index" 
o|inlining procedure: "(irregex-core.scm:3505) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3508) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3501) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3503) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3537) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3539) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3533) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3535) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3552) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3553) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3551) chicken.irregex#char-alphanumeric?" 
o|contracted procedure: k17267 
o|substituted constant variable: r1732636146 
o|inlining procedure: k16938 
o|inlining procedure: k19253 
o|inlining procedure: "(irregex-core.scm:2059) chicken.irregex#%irregex-match-end-index" 
o|inlining procedure: "(irregex-core.scm:2079) chicken.irregex#%irregex-match-end-index" 
o|contracted procedure: k19760 
o|inlining procedure: "(irregex-core.scm:2464) chicken.irregex#char-altcase" 
o|inlining procedure: "(irregex-core.scm:2738) chicken.irregex#mst-state-mappings-set!" 
o|inlining procedure: k26173 
o|inlining procedure: k26173 
o|contracted procedure: k22636 
o|inlining procedure: "(irregex-core.scm:2777) chicken.irregex#mst-state-mappings-set!" 
o|inlining procedure: "(irregex-core.scm:2759) chicken.irregex#mst-state-mappings-set!" 
o|inlining procedure: "(irregex-core.scm:2759) chicken.irregex#mst-state-mappings-set!" 
o|inlining procedure: "(irregex-core.scm:3857) chicken.irregex#char-altcase" 
o|inlining procedure: "(irregex-core.scm:3856) chicken.irregex#char-altcase" 
o|inlining procedure: "(irregex-core.scm:3893) chicken.irregex#%irregex-match-end-index" 
o|inlining procedure: "(irregex-core.scm:3927) chicken.irregex#%irregex-match-end-index" 
o|inlining procedure: "(irregex-core.scm:3949) chicken.irregex#%irregex-match-end-index" 
o|inlining procedure: "(irregex-core.scm:3966) chicken.irregex#%irregex-match-end-index" 
o|inlining procedure: "(irregex-core.scm:3999) chicken.irregex#%irregex-match-end-index" 
o|inlining procedure: "(irregex-core.scm:4029) chicken.irregex#%irregex-match-end-index" 
(o x)|known list op on rest arg sublist: ##core#rest-car o5873 0 
o|inlining procedure: k29044 
o|simplifications: ((if . 3) (let . 6)) 
o|replaced variables: 7 
o|removed binding forms: 274 
o|removed side-effect free assignment to unused variable: chicken.irregex#%irregex-match-end-index 
o|removed side-effect free assignment to unused variable: chicken.irregex#char-alphanumeric? 
o|contracted procedure: k10569 
o|removed side-effect free assignment to unused variable: chicken.irregex#char-altcase 
o|substituted constant variable: n74536498 
o|substituted constant variable: n74536503 
o|removed side-effect free assignment to unused variable: chicken.irregex#mst-state-mappings-set! 
o|substituted constant variable: r2617436544 
o|contracted procedure: k22310 
o|substituted constant variable: n74536623 
o|contracted procedure: k27932 
o|substituted constant variable: n74536630 
o|substituted constant variable: n74536637 
o|substituted constant variable: n74536642 
o|substituted constant variable: n74536647 
o|substituted constant variable: n74536654 
o|simplifications: ((if . 2) (let . 8)) 
o|replaced variables: 77 
o|removed binding forms: 13 
o|inlining procedure: k8235 
o|inlining procedure: k8325 
o|inlining procedure: k10428 
o|inlining procedure: k25464 
o|inlining procedure: k25488 
o|inlining procedure: k25662 
o|inlining procedure: k25682 
o|inlining procedure: k25727 
o|inlining procedure: k19493 
o|inlining procedure: k27553 
o|inlining procedure: k28123 
o|inlining procedure: k28406 
o|removed binding forms: 80 
o|contracted procedure: k24946 
o|contracted procedure: k25717 
o|contracted procedure: k19381 
o|contracted procedure: k20741 
o|contracted procedure: k21821 
o|contracted procedure: k21983 
o|contracted procedure: k27549 
o|contracted procedure: k27688 
o|contracted procedure: k27926 
o|contracted procedure: k28194 
o|contracted procedure: k28608 
o|simplifications: ((let . 5)) 
o|removed binding forms: 23 
o|direct leaf routine/allocation: lp1119 0 
o|direct leaf routine/allocation: lp1167 0 
o|direct leaf routine/allocation: cased-char1445 9 
o|direct leaf routine/allocation: join1631 0 
o|direct leaf routine/allocation: new-res1632 6 
o|direct leaf routine/allocation: g18721873 6 
o|direct leaf routine/allocation: byte1943 0 
o|direct leaf routine/allocation: chicken.irregex#sre-repeater? 0 
o|direct leaf routine/allocation: chicken.irregex#sre-sequence 3 
o|direct leaf routine/allocation: chicken.irregex#sre-alternate 3 
o|direct leaf routine/allocation: g35023509 20 
o|direct leaf routine/allocation: g36573675 3 
o|direct leaf routine/allocation: g36673685 0 
o|direct leaf routine/allocation: g35733580 3 
o|direct leaf routine/allocation: chicken.irregex#nfa-get-epsilons 0 
o|direct leaf routine/allocation: g40474054 3 
o|direct leaf routine/allocation: doloop41474148 0 
o|direct leaf routine/allocation: chicken.irregex#char-ranges-union 6 
o|contracted procedure: k9064 
o|converted assignments to bindings: (lp1119) 
o|converted assignments to bindings: (lp1167) 
o|contracted procedure: "(irregex-core.scm:746) k10483" 
o|contracted procedure: "(irregex-core.scm:794) k10613" 
o|contracted procedure: "(irregex-core.scm:797) k10622" 
o|contracted procedure: "(irregex-core.scm:812) k10665" 
o|contracted procedure: "(irregex-core.scm:815) k10679" 
o|contracted procedure: "(irregex-core.scm:816) k10683" 
o|contracted procedure: "(irregex-core.scm:862) k11061" 
o|contracted procedure: "(irregex-core.scm:966) k11698" 
o|contracted procedure: "(irregex-core.scm:968) k11714" 
o|contracted procedure: "(irregex-core.scm:970) k11730" 
o|contracted procedure: "(irregex-core.scm:973) k11749" 
o|contracted procedure: "(irregex-core.scm:978) k11790" 
o|contracted procedure: "(irregex-core.scm:981) k11813" 
o|inlining procedure: "(irregex-core.scm:1235) k13461" 
o|contracted procedure: "(irregex-core.scm:1346) k14012" 
o|contracted procedure: "(irregex-core.scm:1347) k14000" 
o|contracted procedure: "(irregex-core.scm:1350) k14065" 
o|contracted procedure: "(irregex-core.scm:1351) k14053" 
o|contracted procedure: "(irregex-core.scm:1352) k14041" 
o|contracted procedure: "(irregex-core.scm:1355) k14134" 
o|contracted procedure: "(irregex-core.scm:1356) k14122" 
o|contracted procedure: "(irregex-core.scm:1357) k14110" 
o|contracted procedure: "(irregex-core.scm:1358) k14098" 
o|contracted procedure: "(irregex-core.scm:1427) k14569" 
o|contracted procedure: "(irregex-core.scm:1439) k14697" 
o|contracted procedure: "(irregex-core.scm:1446) k14731" 
o|contracted procedure: "(irregex-core.scm:1455) k14836" 
o|contracted procedure: "(irregex-core.scm:1462) k14870" 
o|contracted procedure: "(irregex-core.scm:1470) k14428" 
o|inlining procedure: "(irregex-core.scm:1403) k15468" 
o|contracted procedure: "(irregex-core.scm:1473) k15226" 
o|contracted procedure: "(irregex-core.scm:1490) k15088" 
o|contracted procedure: "(irregex-core.scm:1503) k14513" 
o|contracted procedure: "(irregex-core.scm:3134) k23429" 
o|contracted procedure: "(irregex-core.scm:3143) k23468" 
o|contracted procedure: "(irregex-core.scm:3148) k23487" 
o|contracted procedure: "(irregex-core.scm:3153) k23506" 
o|contracted procedure: "(irregex-core.scm:3155) k23525" 
o|contracted procedure: "(irregex-core.scm:3161) k23576" 
o|contracted procedure: "(irregex-core.scm:3167) k23622" 
o|contracted procedure: "(irregex-core.scm:3172) k23648" 
o|contracted procedure: "(irregex-core.scm:3181) k23687" 
o|contracted procedure: "(irregex-core.scm:3178) k23693" 
o|contracted procedure: "(irregex-core.scm:3193) k23729" 
o|contracted procedure: "(irregex-core.scm:3188) k23747" 
o|contracted procedure: "(irregex-core.scm:3212) k23772" 
o|contracted procedure: "(irregex-core.scm:3207) k23790" 
o|contracted procedure: "(irregex-core.scm:3236) k23879" 
o|contracted procedure: "(irregex-core.scm:3270) k24031" 
o|contracted procedure: "(irregex-core.scm:3303) k24270" 
o|contracted procedure: "(irregex-core.scm:3313) k24305" 
o|contracted procedure: "(irregex-core.scm:3323) k24383" 
o|contracted procedure: "(irregex-core.scm:3340) k24426" 
o|contracted procedure: "(irregex-core.scm:3422) k24789" 
o|contracted procedure: "(irregex-core.scm:3425) k24916" 
o|contracted procedure: "(irregex-core.scm:3603) k26021" 
o|contracted procedure: "(irregex-core.scm:1770) k17398" 
o|contracted procedure: "(irregex-core.scm:1794) k17584" 
o|contracted procedure: "(irregex-core.scm:1805) k17623" 
o|contracted procedure: "(irregex-core.scm:1809) k17670" 
o|contracted procedure: "(irregex-core.scm:1813) k17744" 
o|contracted procedure: "(irregex-core.scm:1817) k17772" 
o|contracted procedure: "(irregex-core.scm:1530) k15547" 
o|contracted procedure: "(irregex-core.scm:1531) k15562" 
o|contracted procedure: "(irregex-core.scm:1546) k15736" 
o|contracted procedure: "(irregex-core.scm:1672) k16668" 
o|contracted procedure: "(irregex-core.scm:1683) k16785" 
o|contracted procedure: "(irregex-core.scm:1872) k18192" 
o|contracted procedure: "(irregex-core.scm:1873) k18210" 
o|contracted procedure: "(irregex-core.scm:1874) k18227" 
o|contracted procedure: "(irregex-core.scm:1894) k18373" 
o|contracted procedure: "(irregex-core.scm:1896) k18395" 
o|contracted procedure: "(irregex-core.scm:1900) k18428" 
o|contracted procedure: "(irregex-core.scm:2137) k19815" 
o|contracted procedure: "(irregex-core.scm:2226) k20150" 
o|contracted procedure: "(irregex-core.scm:2221) k20173" 
o|contracted procedure: "(irregex-core.scm:2173) k20347" 
o|contracted procedure: "(irregex-core.scm:2399) k20500" 
o|contracted procedure: "(irregex-core.scm:2538) k21132" 
o|contracted procedure: "(irregex-core.scm:2611) k21285" 
o|contracted procedure: "(irregex-core.scm:2624) k21363" 
o|contracted procedure: "(irregex-core.scm:2740) k21883" 
o|contracted procedure: "(irregex-core.scm:2991) k22831" 
o|contracted procedure: k22210 
o|converted assignments to bindings: (doloop41474148) 
o|contracted procedure: "(irregex-core.scm:3709) k26722" 
o|contracted procedure: "(irregex-core.scm:3711) k26737" 
o|contracted procedure: "(irregex-core.scm:3772) k27089" 
o|contracted procedure: "(irregex-core.scm:3776) k27104" 
o|simplifications: ((if . 1) (let . 3)) 
o|removed binding forms: 87 
o|contracted procedure: "(irregex-core.scm:1772) k17426" 
o|replaced variables: 10 
o|removed binding forms: 1 
o|simplifications: ((if . 6)) 
o|removed binding forms: 10 
o|contracted procedure: k23893 
o|contracted procedure: k23934 
o|contracted procedure: k24067 
o|contracted procedure: k24093 
o|removed binding forms: 4 
o|direct leaf routine/allocation: shift1510 6 
o|direct leaf routine/allocation: for-each-loop36663691 0 
o|direct leaf routine/allocation: chicken.irregex#nfa-add-epsilon! 6 
o|contracted procedure: "(irregex-core.scm:797) k10718" 
o|contracted procedure: "(irregex-core.scm:819) k10733" 
o|converted assignments to bindings: (for-each-loop36663691) 
o|contracted procedure: "(irregex-core.scm:2476) k20796" 
o|contracted procedure: "(irregex-core.scm:2550) k21094" 
o|contracted procedure: "(irregex-core.scm:2551) k21097" 
o|contracted procedure: "(irregex-core.scm:2560) k21160" 
o|contracted procedure: "(irregex-core.scm:2575) k21200" 
o|inlining procedure: "(irregex-core.scm:2577) k21197" 
o|contracted procedure: "(irregex-core.scm:2615) k21263" 
o|contracted procedure: "(irregex-core.scm:2616) k21260" 
o|contracted procedure: "(irregex-core.scm:2628) k21341" 
o|contracted procedure: "(irregex-core.scm:2629) k21338" 
o|simplifications: ((let . 1)) 
o|removed binding forms: 11 
o|contracted procedure: "(irregex-core.scm:2577) k21197" 
o|removed binding forms: 1 
o|customizable procedures: (k30112 loop26245 loop6230 k29469 k29603 for-each-loop61826192 k29612 k29539 chicken.irregex#cset->string for-each-loop61276137 g60906097 for-each-loop60896101 for-each-loop60686078 for-each-loop60496059 k29217 for-each-loop60326042 lp5990 for-each-loop60136023 lp5972 lp15939 k28915 map-loop59135931 lp25942 loop5884 scan5875 k28530 k28618 lp5652 g56145615 lp5577 chicken.irregex#irregex-apply-match lp5513 chicken.irregex#irregex-copy-matches k27640 k27643 chicken.irregex#irregex-reset-matches! lp5465 k27520 lp5432 intersect5413 k27249 k27252 k27259 diff5384 union-range5359 lp5340 map-loop52925309 lp3078 lp5183 map-loop52655282 map-loop52375254 rec5201 map-loop52115228 lp5194 lp5177 k23003 lp24333 lp4330 k22892 g43024303 k22868 lp4094 k21980 k21986 lp24288 lp4282 chicken.irregex#mst-fold g42674268 chicken.irregex#cset-difference chicken.irregex#mst-copy k22710 lp4255 chicken.irregex#nfa-state->mst chicken.irregex#nfa-epsilon-closure lp4123 k23125 lp34364 lp24360 lp4358 k22364 chicken.irregex#tag-set-commands-for-closure lp24180 lp4169 lp4199 g42184227 map-loop42124234 doloop42044205 k22505 lp4135 k21818 for-each-loop40464065 chicken.irregex#make-mst chicken.irregex#mst-add! k21627 lp3804 doloop39893990 k20989 k21036 g39793980 chicken.irregex#string->cset add-char-state!3838 lp23870 lp3830 extend-state!3837 new-state-number3835 add-state!3836 doloop38433844 k20663 doloop35323533 k19901 for-each-loop35723584 k20241 k20199 for-each-loop36563680 k20051 lp23598 k19939 chicken.irregex#finalize! lp13589 for-each-loop35013522 k19457 lp3407 k19244 lp3323 lp13458 chicken.irregex#find chicken.irregex#cset-contains? lp23465 lp23289 lp13285 chicken.irregex#dfa-match/longest chicken.irregex#irregex-new-matches chicken.irregex#irregex-search/matches k18862 k18682 map-loop31933210 k18449 chicken.irregex#sre-sequence-names map-loop30523069 k16944 k16796 k16679 k16566 k16426 k16253 k16296 chicken.irregex#every k15903 map-loop24922509 k15695 map-loop24582475 rec2352 map-loop24322449 chicken.irregex#any chicken.irregex#cset->utf8-pattern g23952404 map-loop23892407 g23682377 map-loop23622380 adjust2344 g26022603 chicken.irregex#sre->nfa g26132614 chicken.irregex#nfa->dfa k17066 k17095 k17419 k17799 k17839 g30153016 k17818 k17604 k17607 k17477 k17283 lp22885 lp22873 lp2833 grow2843 chicken.irregex#sre-names lp5090 lp5066 k25702 chicken.irregex#chunker-next-char k25616 k25607 k25542 k25509 chicken.irregex#chunker-prev-char k25411 k25402 k25347 k23364 k24599 lp4804 k24455 k24015 k24018 k23863 k23866 chicken.irregex#sre-count-submatches rec4398 chicken.irregex#sre-cset->procedure lp4389 chicken.irregex#cset->plist k15453 chicken.irregex#char->utf8-list map-loop23032324 chicken.irregex#unicode-range-up-from lp2021 map-loop21722193 g22082217 map-loop22022253 map-loop22652286 chicken.irregex#utf8-lowest-digit-of-length k14991 chicken.irregex#zero-to map-loop22252246 chicken.irregex#unicode-range-up-to lp2333 map-loop21362153 map-loop21012118 map-loop20392056 map-loop20652086 chicken.irregex#unicode-range-helper scan1047 chicken.irregex#symbol-list->flags scan1059 lp21761 k12624 k11974 lp1070 collect1078 k12017 k13847 k13730 k13617 chicken.irregex#sre->cset k13406 k13483 k13495 chicken.irregex#string-parse-hex-escape chicken.irregex#cset-case-insensitive chicken.irregex#cset-complement go1838 lp21623 chicken.irregex#with-read-from-string k11181 save1450 collect/single1448 k10918 lp1439 collect/terms1449 collect1447 chicken.irregex#last k10591 k10594 lp1502 lp1965 chicken.irregex#utf8-string-ref k10528 cased-string1446 map-loop14591476 k10296 k10285 lp1404 k10179 scan1374 scan1337 collect1341 k9893 skip1319 lp1305 read1292 lp1196 lp1187 lp1174 lp1148 lp1141 chicken.irregex#fold scan1035 lp979 k8367 loop951 chicken.irregex#string-cat-reverse lp862 k7977 chicken.irregex#irregex-match-numeric-index chicken.irregex#vector-copy) 
o|calls to known targets: 1138 
o|identified direct recursive calls: f_8023 2 
o|identified direct recursive calls: f_8761 1 
o|identified direct recursive calls: f_9068 1 
o|identified direct recursive calls: f_9105 1 
o|identified direct recursive calls: f_9202 1 
o|identified direct recursive calls: f_9818 1 
o|identified direct recursive calls: f_9952 1 
o|identified direct recursive calls: f_9677 4 
o|identified direct recursive calls: f_10460 1 
o|identified direct recursive calls: f_14155 1 
o|identified direct recursive calls: f_10604 2 
o|identified direct recursive calls: f_11640 5 
o|identified direct recursive calls: f_8899 1 
o|identified direct recursive calls: f_12706 2 
o|identified direct recursive calls: f_8861 1 
o|identified direct recursive calls: f_10413 3 
o|identified direct recursive calls: f_8804 1 
o|identified direct recursive calls: f_14611 1 
o|identified direct recursive calls: f_14647 1 
o|identified direct recursive calls: f_14768 1 
o|identified direct recursive calls: f_14907 1 
o|identified direct recursive calls: f_15013 1 
o|identified direct recursive calls: f_15116 1 
o|identified direct recursive calls: f_15254 1 
o|identified direct recursive calls: f_15345 1 
o|identified direct recursive calls: f_14439 1 
o|identified direct recursive calls: f_17025 1 
o|identified direct recursive calls: f_15920 1 
o|identified direct recursive calls: f_15522 2 
o|identified direct recursive calls: f_16506 1 
o|identified direct recursive calls: f_18168 3 
o|identified direct recursive calls: f_18349 3 
o|identified direct recursive calls: f_19807 1 
o|identified direct recursive calls: f_20142 1 
o|identified direct recursive calls: f_20165 1 
o|identified direct recursive calls: f_20339 1 
o|identified direct recursive calls: f_20686 1 
o|identified direct recursive calls: f_20648 4 
o|identified direct recursive calls: f_21555 1 
o|identified direct recursive calls: f_21594 1 
o|identified direct recursive calls: f_21875 1 
o|identified direct recursive calls: f_22174 1 
o|identified direct recursive calls: f_22580 1 
o|identified direct recursive calls: f_23168 2 
o|identified direct recursive calls: f_22112 1 
o|identified direct recursive calls: f_22279 1 
o|identified direct recursive calls: f_22041 1 
o|identified direct recursive calls: f_22223 1 
o|identified direct recursive calls: f_22837 1 
o|identified direct recursive calls: f_26278 1 
o|identified direct recursive calls: f_18301 1 
o|identified direct recursive calls: f_26387 2 
o|identified direct recursive calls: f_26877 2 
o|identified direct recursive calls: f_26979 4 
o|identified direct recursive calls: f_27174 3 
o|identified direct recursive calls: f_27370 3 
o|identified direct recursive calls: f_28262 1 
o|identified direct recursive calls: f_28622 2 
o|identified direct recursive calls: f_28750 1 
o|identified direct recursive calls: f_28991 2 
o|identified direct recursive calls: f_28979 1 
o|identified direct recursive calls: f_29957 4 
o|fast box initializations: 139 
o|fast global references: 361 
o|fast global assignments: 77 
o|dropping unused closure argument: f_10263 
o|dropping unused closure argument: f_13226 
o|dropping unused closure argument: f_13960 
o|dropping unused closure argument: f_14193 
o|dropping unused closure argument: f_14269 
o|dropping unused closure argument: f_14545 
o|dropping unused closure argument: f_14683 
o|dropping unused closure argument: f_14822 
o|dropping unused closure argument: f_15400 
o|dropping unused closure argument: f_16506 
o|dropping unused closure argument: f_16913 
o|dropping unused closure argument: f_18122 
o|dropping unused closure argument: f_18145 
o|dropping unused closure argument: f_18349 
o|dropping unused closure argument: f_18635 
o|dropping unused closure argument: f_18984 
o|dropping unused closure argument: f_19747 
o|dropping unused closure argument: f_19866 
o|dropping unused closure argument: f_20464 
o|dropping unused closure argument: f_20498 
o|dropping unused closure argument: f_20639 
o|dropping unused closure argument: f_21758 
o|dropping unused closure argument: f_21787 
o|dropping unused closure argument: f_21804 
o|dropping unused closure argument: f_21813 
o|dropping unused closure argument: f_22165 
o|dropping unused closure argument: f_22247 
o|dropping unused closure argument: f_22932 
o|dropping unused closure argument: f_22947 
o|dropping unused closure argument: f_26053 
o|dropping unused closure argument: f_26266 
o|dropping unused closure argument: f_26357 
o|dropping unused closure argument: f_26377 
o|dropping unused closure argument: f_26844 
o|dropping unused closure argument: f_26929 
o|dropping unused closure argument: f_27160 
o|dropping unused closure argument: f_27482 
o|dropping unused closure argument: f_27492 
o|dropping unused closure argument: f_28256 
o|dropping unused closure argument: f_29104 
o|dropping unused closure argument: f_7497 
o|dropping unused closure argument: f_7579 
o|dropping unused closure argument: f_7602 
o|dropping unused closure argument: f_7611 
o|dropping unused closure argument: f_7911 
o|dropping unused closure argument: f_8597 
o|dropping unused closure argument: f_8627 
o|dropping unused closure argument: f_9039 
o|dropping unused closure argument: f_9089 
o|dropping unused closure argument: f_9126 
o|dropping unused closure argument: f_9187 
o|dropping unused closure argument: f_9202 
o|dropping unused closure argument: f_9225 
o|dropping unused closure argument: f_9268 
o|dropping unused closure argument: f_9313 
o|dropping unused closure argument: f_9670 
*/
/* end of file */
