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

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

static C_word lf[503];
static double C_possibly_force_alignment;
static C_char li0[] C_aligned={C_lihdr(0,0,32),40,99,104,105,99,107,101,110,46,105,114,114,101,103,101,120,35,37,118,101,99,116,111,114,45,99,111,112,121,32,118,41};
static C_char 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 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 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 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 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 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 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 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 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 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 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 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 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 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 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 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 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 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 li19[] C_aligned={C_lihdr(0,0,12),40,102,95,56,55,55,51,32,99,110,107,41,0,0,0,0};
static C_char li20[] C_aligned={C_lihdr(0,0,12),40,102,95,56,55,53,54,32,99,110,107,41,0,0,0,0};
static C_char 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 li22[] C_aligned={C_lihdr(0,0,28),40,102,95,56,54,53,53,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 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 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 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 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 li27[] C_aligned={C_lihdr(0,0,8),40,115,99,97,110,32,105,41};
static C_char 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 li29[] C_aligned={C_lihdr(0,0,16),40,100,111,108,111,111,112,49,49,50,55,32,105,32,106,41};
static C_char li30[] 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 li31[] C_aligned={C_lihdr(0,0,11),40,97,57,51,50,54,32,115,32,97,41,0,0,0,0,0};
static C_char li32[] 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 li33[] 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 li34[] 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 li35[] C_aligned={C_lihdr(0,0,7),40,108,112,32,108,115,41,0};
static C_char li36[] 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 li37[] C_aligned={C_lihdr(0,0,4),40,108,112,41,0,0,0,0};
static C_char li38[] 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 li39[] 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 li40[] 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 li41[] 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 li42[] 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 li43[] 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 li44[] 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 li45[] 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 li46[] 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 li47[] C_aligned={C_lihdr(0,0,13),40,97,49,48,48,51,48,32,122,32,106,51,41,0,0,0};
static C_char li48[] C_aligned={C_lihdr(0,0,13),40,97,49,48,48,50,52,32,121,32,106,50,41,0,0,0};
static C_char li49[] C_aligned={C_lihdr(0,0,11),40,97,57,57,57,48,32,120,32,106,41,0,0,0,0,0};
static C_char li50[] 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 li51[] C_aligned={C_lihdr(0,0,8),40,115,107,105,112,32,105,41};
static C_char li52[] C_aligned={C_lihdr(0,0,15),40,97,49,48,49,52,55,32,115,101,120,112,32,106,41,0};
static C_char li53[] C_aligned={C_lihdr(0,0,15),40,97,49,48,49,56,54,32,115,101,120,112,32,106,41,0};
static C_char li54[] 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 li55[] 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 li56[] C_aligned={C_lihdr(0,0,15),40,97,49,48,51,51,51,32,115,101,120,112,32,106,41,0};
static C_char li57[] C_aligned={C_lihdr(0,0,15),40,97,49,48,51,53,49,32,115,101,120,112,32,106,41,0};
static C_char li58[] C_aligned={C_lihdr(0,0,8),40,115,99,97,110,32,106,41};
static C_char li59[] C_aligned={C_lihdr(0,0,12),40,102,95,57,57,53,56,32,105,32,107,41,0,0,0,0};
static C_char li60[] C_aligned={C_lihdr(0,0,14),40,97,49,48,53,50,50,32,114,101,115,32,106,41,0,0};
static C_char li61[] 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 li62[] 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 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,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 li64[] 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 li65[] 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 li66[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,49,52,55,48,32,103,49,52,56,50,41,0,0,0,0};
static C_char li67[] 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 li68[] 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 li69[] C_aligned={C_lihdr(0,0,6),40,108,112,32,105,41,0,0};
static C_char li70[] 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 li71[] 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 li72[] 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 li73[] C_aligned={C_lihdr(0,0,6),40,115,97,118,101,41,0,0};
static C_char li74[] C_aligned={C_lihdr(0,0,14),40,97,49,49,52,53,51,32,115,114,101,32,106,41,0,0};
static C_char li75[] C_aligned={C_lihdr(0,0,6),40,106,111,105,110,41,0,0};
static C_char li76[] 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 li77[] 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 li78[] C_aligned={C_lihdr(0,0,14),40,97,49,50,50,49,51,32,115,114,101,32,106,41,0,0};
static C_char li79[] C_aligned={C_lihdr(0,0,14),40,97,50,55,51,50,55,32,120,32,114,101,115,41,0,0};
static C_char li80[] C_aligned={C_lihdr(0,0,12),40,97,49,51,55,50,49,32,99,32,106,41,0,0,0,0};
static C_char li81[] C_aligned={C_lihdr(0,0,7),40,103,49,57,48,52,41,0};
static C_char li82[] C_aligned={C_lihdr(0,0,13),40,97,49,52,48,53,49,32,99,104,32,106,41,0,0,0};
static C_char li83[] 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 li84[] 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 li85[] 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 li86[] C_aligned={C_lihdr(0,0,13),40,97,49,50,56,53,56,32,99,104,32,106,41,0,0,0};
static C_char li87[] C_aligned={C_lihdr(0,0,7),40,108,112,50,32,106,41,0};
static C_char li88[] C_aligned={C_lihdr(0,0,14),40,97,49,51,48,56,57,32,115,114,101,32,106,41,0,0};
static C_char li89[] C_aligned={C_lihdr(0,0,8),40,115,99,97,110,32,105,41};
static C_char li90[] 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 li91[] 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 li92[] C_aligned={C_lihdr(0,0,8),40,115,99,97,110,32,105,41};
static C_char li93[] 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 li94[] 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 li95[] C_aligned={C_lihdr(0,0,6),40,98,121,116,101,41,0,0};
static C_char li96[] 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 li97[] 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 li98[] 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 li99[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,49,49,48,32,103,50,49,50,50,41,0,0,0,0};
static C_char li100[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,48,56,51,32,103,50,48,57,53,41,0,0,0,0};
static C_char li101[] 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 li102[] C_aligned={C_lihdr(0,0,10),40,97,49,53,48,50,51,32,99,41,0,0,0,0,0,0};
static C_char li103[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,49,54,49,32,103,50,49,55,51,41,0,0,0,0};
static C_char li104[] 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 li105[] C_aligned={C_lihdr(0,0,10),40,97,49,53,49,56,56,32,99,41,0,0,0,0,0,0};
static C_char li106[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,50,49,50,32,103,50,50,50,52,41,0,0,0,0};
static C_char li107[] 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 li108[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,51,50,54,32,103,50,51,51,56,41,0,0,0,0};
static C_char li109[] C_aligned={C_lihdr(0,0,9),40,103,50,51,48,51,32,105,41,0,0,0,0,0,0,0};
static C_char li110[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,51,56,49,32,103,50,51,57,51,41,0,0,0,0};
static C_char li111[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,50,57,55,32,103,50,51,48,57,41,0,0,0,0};
static C_char li112[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,50,54,49,32,103,50,50,55,51,41,0,0,0,0};
static C_char li113[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,52,51,49,32,103,50,52,52,51,41,0,0,0,0};
static C_char li114[] 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 li115[] 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 li116[] 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 li117[] 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 li118[] 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 li119[] C_aligned={C_lihdr(0,0,44),40,97,50,51,55,57,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,0};
static C_char li120[] 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 li121[] C_aligned={C_lihdr(0,0,45),40,102,95,50,51,57,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 li122[] C_aligned={C_lihdr(0,0,8),40,97,50,51,57,51,51,41};
static C_char li123[] C_aligned={C_lihdr(0,0,45),40,102,95,50,51,57,50,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 li124[] C_aligned={C_lihdr(0,0,8),40,97,50,52,49,50,54,41};
static C_char li125[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,49,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 li126[] C_aligned={C_lihdr(0,0,8),40,97,50,52,49,53,50,41};
static C_char li127[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,49,52,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 li128[] C_aligned={C_lihdr(0,0,8),40,97,50,52,49,56,55,41};
static C_char li129[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,49,56,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 li130[] C_aligned={C_lihdr(0,0,8),40,97,50,52,50,51,51,41};
static C_char li131[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,50,50,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 li132[] C_aligned={C_lihdr(0,0,8),40,97,50,52,50,52,57,41};
static C_char li133[] C_aligned={C_lihdr(0,0,44),40,97,50,52,50,52,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 li134[] C_aligned={C_lihdr(0,0,8),40,97,50,52,50,57,50,41};
static C_char li135[] C_aligned={C_lihdr(0,0,44),40,97,50,52,50,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 li136[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,51,56,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 li137[] C_aligned={C_lihdr(0,0,8),40,97,50,52,52,49,54,41};
static C_char li138[] C_aligned={C_lihdr(0,0,44),40,97,50,52,51,57,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 li139[] C_aligned={C_lihdr(0,0,16),40,98,111,100,121,52,55,54,56,32,99,111,117,110,116,41};
static C_char li140[] C_aligned={C_lihdr(0,0,8),40,97,50,52,52,53,54,41};
static C_char li141[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,52,52,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 li142[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,53,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};
static C_char li143[] C_aligned={C_lihdr(0,0,8),40,97,50,52,53,55,50,41};
static C_char li144[] C_aligned={C_lihdr(0,0,44),40,97,50,52,53,53,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,0};
static C_char li145[] C_aligned={C_lihdr(0,0,16),40,98,111,100,121,52,56,50,54,32,99,111,117,110,116,41};
static C_char li146[] C_aligned={C_lihdr(0,0,8),40,97,50,52,54,49,54,41};
static C_char li147[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,54,48,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 li148[] C_aligned={C_lihdr(0,0,8),40,97,50,52,55,55,55,41};
static C_char li149[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,55,54,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 li150[] C_aligned={C_lihdr(0,0,44),40,97,50,52,55,56,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,0};
static C_char li151[] C_aligned={C_lihdr(0,0,8),40,97,50,52,56,49,50,41};
static C_char li152[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,55,57,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 li153[] C_aligned={C_lihdr(0,0,44),40,97,50,52,56,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,41,0,0,0,0};
static C_char li154[] C_aligned={C_lihdr(0,0,11),40,102,95,50,52,56,56,49,32,120,41,0,0,0,0,0};
static C_char li155[] C_aligned={C_lihdr(0,0,8),40,97,50,52,56,55,53,41};
static C_char li156[] C_aligned={C_lihdr(0,0,9),40,97,56,57,52,52,32,120,41,0,0,0,0,0,0,0};
static C_char li157[] C_aligned={C_lihdr(0,0,9),40,97,56,57,55,49,32,120,41,0,0,0,0,0,0,0};
static C_char li158[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,56,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 li159[] C_aligned={C_lihdr(0,0,44),40,97,50,52,56,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,0};
static C_char li160[] C_aligned={C_lihdr(0,0,8),40,97,50,52,57,51,51,41};
static C_char li161[] C_aligned={C_lihdr(0,0,45),40,102,95,50,52,57,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,41,0,0,0};
static C_char li162[] C_aligned={C_lihdr(0,0,44),40,97,50,52,57,52,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,0};
static C_char li163[] C_aligned={C_lihdr(0,0,46),40,102,95,50,52,57,55,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,50,41,0,0};
static C_char li164[] C_aligned={C_lihdr(0,0,8),40,97,50,53,48,51,53,41};
static C_char li165[] C_aligned={C_lihdr(0,0,46),40,102,95,50,53,48,51,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,50,41,0,0};
static C_char li166[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,48,55,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 li167[] 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 li168[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,49,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 li169[] C_aligned={C_lihdr(0,0,8),40,97,50,53,51,55,52,41};
static C_char li170[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,51,50,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 li171[] C_aligned={C_lihdr(0,0,8),40,97,50,53,52,54,57,41};
static C_char li172[] C_aligned={C_lihdr(0,0,44),40,97,50,53,52,51,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,0};
static C_char li173[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,54,55,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 li174[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,55,50,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 li175[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,56,50,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 li176[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,56,53,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 li177[] C_aligned={C_lihdr(0,0,45),40,102,95,50,53,57,48,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 li178[] C_aligned={C_lihdr(0,0,45),40,102,95,50,54,48,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 li179[] C_aligned={C_lihdr(0,0,45),40,102,95,50,54,48,52,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 li180[] C_aligned={C_lihdr(0,0,45),40,102,95,50,54,49,48,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 li181[] C_aligned={C_lihdr(0,0,45),40,102,95,50,54,49,57,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 li182[] 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 li183[] C_aligned={C_lihdr(0,0,45),40,102,95,50,54,51,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 li184[] 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 li185[] C_aligned={C_lihdr(0,0,45),40,102,95,50,54,52,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 li186[] 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 li187[] C_aligned={C_lihdr(0,0,8),40,103,114,111,119,32,105,41};
static C_char li188[] C_aligned={C_lihdr(0,0,16),40,97,49,55,53,57,55,32,108,111,51,32,104,105,51,41};
static C_char li189[] 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 li190[] C_aligned={C_lihdr(0,0,16),40,97,49,55,54,55,57,32,108,111,51,32,104,105,51,41};
static C_char li191[] 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 li192[] C_aligned={C_lihdr(0,0,16),40,97,49,55,55,55,53,32,108,111,52,32,104,105,52,41};
static C_char li193[] C_aligned={C_lihdr(0,0,16),40,97,49,55,55,54,49,32,108,111,51,32,104,105,51,41};
static C_char li194[] 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 li195[] C_aligned={C_lihdr(0,0,16),40,97,49,55,56,57,52,32,108,111,50,32,104,105,50,41};
static C_char li196[] C_aligned={C_lihdr(0,0,14),40,97,49,56,48,52,56,32,108,111,32,104,105,41,0,0};
static C_char li197[] C_aligned={C_lihdr(0,0,16),40,97,49,56,48,56,55,32,108,111,50,32,104,105,50,41};
static C_char li198[] C_aligned={C_lihdr(0,0,16),40,97,49,56,49,51,52,32,108,111,50,32,104,105,50,41};
static C_char li199[] C_aligned={C_lihdr(0,0,16),40,97,49,56,50,48,56,32,108,111,50,32,104,105,50,41};
static C_char li200[] C_aligned={C_lihdr(0,0,16),40,97,49,56,50,51,54,32,108,111,50,32,104,105,50,41};
static C_char li201[] C_aligned={C_lihdr(0,0,12),40,103,51,49,53,49,32,99,101,108,108,41,0,0,0,0};
static C_char li202[] 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 li203[] C_aligned={C_lihdr(0,0,11),40,103,50,55,52,57,32,110,102,97,41,0,0,0,0,0};
static C_char li204[] C_aligned={C_lihdr(0,0,11),40,103,50,55,51,56,32,110,102,97,41,0,0,0,0,0};
static C_char li205[] 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 li206[] C_aligned={C_lihdr(0,0,9),40,103,50,53,48,50,32,115,41,0,0,0,0,0,0,0};
static C_char li207[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,52,57,54,32,103,50,53,48,56,41,0,0,0,0};
static C_char li208[] C_aligned={C_lihdr(0,0,9),40,103,50,53,50,57,32,115,41,0,0,0,0,0,0,0};
static C_char li209[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,53,50,51,32,103,50,53,51,53,41,0,0,0,0};
static C_char li210[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,53,54,54,32,103,50,53,55,56,41,0,0,0,0};
static C_char li211[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,53,57,50,32,103,50,54,48,52,41,0,0,0,0};
static C_char li212[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,50,54,50,54,32,103,50,54,51,56,41,0,0,0,0};
static C_char li213[] 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 li214[] 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 li215[] 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 li216[] 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 li217[] 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 li218[] 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 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,115,101,97,114,99,104,101,114,63,32,115,114,101,41,0,0,0,0,0};
static C_char li220[] 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 li221[] 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 li222[] 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 li223[] 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 li224[] 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 li225[] 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 li226[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,51,49,56,56,32,103,51,50,48,48,41,0,0,0,0};
static C_char li227[] 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 li228[] 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 li229[] 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 li230[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,51,51,50,57,32,103,51,51,52,49,41,0,0,0,0};
static C_char li231[] 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 li232[] 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 li233[] 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 li234[] C_aligned={C_lihdr(0,0,7),40,108,112,50,32,105,41,0};
static C_char li235[] 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 li236[] C_aligned={C_lihdr(0,0,10),40,97,50,48,49,52,56,32,120,41,0,0,0,0,0,0};
static C_char li237[] 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 li238[] 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 li239[] C_aligned={C_lihdr(0,0,8),40,97,49,57,54,49,48,41};
static C_char li240[] C_aligned={C_lihdr(0,0,8),40,97,49,57,54,56,50,41};
static C_char li241[] 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 li242[] 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 li243[] 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 li244[] C_aligned={C_lihdr(0,0,6),40,108,112,32,109,41,0,0};
static C_char li245[] C_aligned={C_lihdr(0,0,8),40,97,50,48,48,48,51,41};
static C_char li246[] 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 li247[] 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 li248[] C_aligned={C_lihdr(0,0,7),40,103,51,54,51,56,41,0};
static C_char li249[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,51,54,51,55,32,103,51,54,52,52,41,0,0,0,0,0,0,0};
static C_char li250[] 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 li251[] C_aligned={C_lihdr(0,0,7),40,103,51,55,57,51,41,0};
static C_char li252[] C_aligned={C_lihdr(0,0,9),40,102,95,50,48,53,56,56,41,0,0,0,0,0,0,0};
static C_char li253[] C_aligned={C_lihdr(0,0,9),40,103,51,56,51,50,32,99,41,0,0,0,0,0,0,0};
static C_char li254[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,51,56,48,50,32,103,51,56,48,57,41,0,0,0,0,0,0,0};
static C_char li255[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,51,56,50,54,32,103,51,56,51,56,41,0,0,0,0};
static C_char li256[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,51,55,57,50,32,103,51,55,57,57,41,0,0,0,0,0,0,0};
static C_char li257[] C_aligned={C_lihdr(0,0,10),40,97,50,48,55,55,55,32,120,41,0,0,0,0,0,0};
static C_char li258[] 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 li259[] 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 li260[] C_aligned={C_lihdr(0,0,7),40,103,51,55,48,57,41,0};
static C_char li261[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,51,55,48,56,32,103,51,55,49,53,41,0,0,0,0,0,0,0};
static C_char li262[] C_aligned={C_lihdr(0,0,14),40,100,111,108,111,111,112,51,54,54,56,32,105,41,0,0};
static C_char li263[] 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 li264[] C_aligned={C_lihdr(0,0,16),40,97,51,49,49,57,54,32,101,115,99,32,46,32,111,41};
static C_char li265[] 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 li266[] 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 li267[] 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 li268[] C_aligned={C_lihdr(0,0,14),40,100,111,108,111,111,112,52,48,54,52,32,105,41,0,0};
static C_char li269[] 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 li270[] 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 li271[] 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 li272[] 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 li273[] C_aligned={C_lihdr(0,0,12),40,103,52,50,48,48,32,99,101,108,108,41,0,0,0,0};
static C_char li274[] 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 li275[] C_aligned={C_lihdr(0,0,14),40,100,111,108,111,111,112,52,50,49,48,32,105,41,0,0};
static C_char li276[] 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 li277[] 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 li278[] 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 li279[] 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 li280[] 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 li281[] C_aligned={C_lihdr(0,0,7),40,103,52,50,54,56,41,0};
static C_char li282[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,52,50,54,55,32,103,52,50,55,52,41,0,0,0,0,0,0,0};
static C_char li283[] 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 li284[] 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 li285[] 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 li286[] C_aligned={C_lihdr(0,0,10),40,103,52,52,51,57,32,116,114,41,0,0,0,0,0,0};
static C_char li287[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,52,52,51,51,32,103,52,52,52,53,41,0,0,0,0};
static C_char li288[] C_aligned={C_lihdr(0,0,21),40,100,111,108,111,111,112,52,52,50,53,32,105,32,115,116,97,116,101,115,41,0,0,0};
static C_char li289[] 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 li290[] 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 li291[] 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 li292[] C_aligned={C_lihdr(0,0,6),40,108,112,32,105,41,0,0};
static C_char li293[] 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 li294[] 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 li295[] C_aligned={C_lihdr(0,0,20),40,103,52,52,56,56,32,105,110,116,101,114,115,101,99,116,105,111,110,41,0,0,0,0};
static C_char li296[] 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 li297[] C_aligned={C_lihdr(0,0,24),40,97,50,51,49,52,52,32,115,116,32,109,97,112,112,105,110,103,115,32,114,101,115,41};
static C_char li298[] 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 li299[] 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 li300[] 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 li301[] C_aligned={C_lihdr(0,0,12),40,100,111,108,111,111,112,52,51,54,56,41,0,0,0,0};
static C_char li302[] C_aligned={C_lihdr(0,0,11),40,103,52,53,50,51,32,116,97,103,41,0,0,0,0,0};
static C_char li303[] 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 li304[] 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 li305[] C_aligned={C_lihdr(0,0,17),40,97,50,51,52,51,50,32,115,116,32,109,32,114,101,115,41,0,0,0,0,0,0,0};
static C_char li306[] 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 li307[] C_aligned={C_lihdr(0,0,10),40,97,50,51,53,53,54,32,99,41,0,0,0,0,0,0};
static C_char li308[] C_aligned={C_lihdr(0,0,10),40,97,50,51,53,56,48,32,99,41,0,0,0,0,0,0};
static C_char li309[] 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 li310[] 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 li311[] 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 li312[] C_aligned={C_lihdr(0,0,45),40,102,95,50,54,53,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 li313[] 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 li314[] 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 li315[] 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 li316[] C_aligned={C_lihdr(0,0,14),40,97,50,54,56,54,54,32,99,104,32,99,115,41,0,0};
static C_char li317[] 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 li318[] 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 li319[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,53,52,51,49,32,103,53,52,52,51,41,0,0,0,0};
static C_char li320[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,53,52,53,55,32,103,53,52,54,57,41,0,0,0,0};
static C_char li321[] C_aligned={C_lihdr(0,0,14),40,97,50,55,48,55,48,32,120,32,114,101,115,41,0,0};
static C_char li322[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,53,52,56,53,32,103,53,52,57,55,41,0,0,0,0};
static C_char li323[] 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 li324[] 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 li325[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,53,53,49,50,32,103,53,53,50,52,41,0,0,0,0};
static C_char li326[] 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 li327[] 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 li328[] 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 li329[] 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 li330[] 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 li331[] 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 li332[] 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 li333[] 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 li334[] 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 li335[] 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 li336[] 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 li337[] 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 li338[] 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 li339[] 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 li340[] C_aligned={C_lihdr(0,0,15),40,102,95,50,56,51,51,52,32,105,32,97,99,99,41,0};
static C_char li341[] C_aligned={C_lihdr(0,0,19),40,108,112,32,115,114,99,32,102,114,111,109,32,105,32,97,99,99,41,0,0,0,0,0};
static C_char li342[] 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 li343[] 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 li344[] 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 li345[] C_aligned={C_lihdr(0,0,19),40,102,95,50,56,53,53,52,32,115,114,99,32,105,32,97,99,99,41,0,0,0,0,0};
static C_char li346[] 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 li347[] 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 li348[] 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 li349[] 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 li350[] 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 li351[] C_aligned={C_lihdr(0,0,16),40,97,50,56,54,55,51,32,105,32,109,32,97,99,99,41};
static C_char li352[] C_aligned={C_lihdr(0,0,14),40,97,50,56,55,50,52,32,105,32,97,99,99,41,0,0};
static C_char li353[] 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 li354[] C_aligned={C_lihdr(0,0,9),40,103,53,56,52,53,32,120,41,0,0,0,0,0,0,0};
static C_char li355[] 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 li356[] 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 li357[] C_aligned={C_lihdr(0,0,14),40,97,50,56,57,57,55,32,105,32,109,32,97,41,0,0};
static C_char li358[] C_aligned={C_lihdr(0,0,12),40,97,50,57,48,48,55,32,105,32,97,41,0,0,0,0};
static C_char li359[] 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 li360[] C_aligned={C_lihdr(0,0,14),40,97,50,57,48,51,56,32,105,32,109,32,97,41,0,0};
static C_char li361[] 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 li362[] C_aligned={C_lihdr(0,0,12),40,97,50,57,48,57,54,32,105,32,97,41,0,0,0,0};
static C_char li363[] 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 li364[] C_aligned={C_lihdr(0,0,8),40,115,99,97,110,32,105,41};
static C_char li365[] 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 li366[] 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 li367[] 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 li368[] C_aligned={C_lihdr(0,0,20),40,109,97,112,45,108,111,111,112,54,49,52,54,32,103,54,49,53,56,41,0,0,0,0};
static C_char li369[] C_aligned={C_lihdr(0,0,10),40,97,50,57,52,50,56,32,120,41,0,0,0,0,0,0};
static C_char li370[] 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 li371[] 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 li372[] 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 li373[] C_aligned={C_lihdr(0,0,7),40,108,112,32,108,115,41,0};
static C_char li374[] 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 li375[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,54,50,52,57,32,103,54,50,53,54,41,0,0,0,0,0,0,0};
static C_char li376[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,54,50,54,56,32,103,54,50,55,53,41,0,0,0,0,0,0,0};
static C_char li377[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,54,50,56,53,32,103,54,50,57,50,41,0,0,0,0,0,0,0};
static C_char li378[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,54,51,48,52,32,103,54,51,49,49,41,0,0,0,0,0,0,0};
static C_char li379[] C_aligned={C_lihdr(0,0,9),40,103,54,51,50,54,32,120,41,0,0,0,0,0,0,0};
static C_char li380[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,54,51,50,53,32,103,54,51,51,50,41,0,0,0,0,0,0,0};
static C_char li381[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,54,51,54,55,32,103,54,51,55,52,41,0,0,0,0,0,0,0};
static C_char li382[] C_aligned={C_lihdr(0,0,25),40,102,111,114,45,101,97,99,104,45,108,111,111,112,54,52,50,50,32,103,54,52,50,57,41,0,0,0,0,0,0,0};
static C_char li383[] C_aligned={C_lihdr(0,0,6),40,108,112,32,120,41,0,0};
static C_char li384[] 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 li385[] 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 li386[] 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 li387[] 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 li388[] C_aligned={C_lihdr(0,0,10),40,97,51,49,52,57,49,32,120,41,0,0,0,0,0,0};
static C_char li389[] C_aligned={C_lihdr(0,0,22),40,97,51,49,52,57,52,32,115,114,99,49,32,105,32,115,114,99,50,32,106,41,0,0};
static C_char li390[] C_aligned={C_lihdr(0,0,14),40,97,51,49,53,57,49,32,109,32,111,117,116,41,0,0};
static C_char li391[] 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(f34268)
static void C_ccall f34268(C_word c,C_word *av) C_noret;
C_noret_decl(f34272)
static void C_ccall f34272(C_word c,C_word *av) C_noret;
C_noret_decl(f_10005)
static void C_ccall f_10005(C_word c,C_word *av) C_noret;
C_noret_decl(f_10025)
static void C_ccall f_10025(C_word c,C_word *av) C_noret;
C_noret_decl(f_10031)
static void C_ccall f_10031(C_word c,C_word *av) C_noret;
C_noret_decl(f_10048)
static void C_ccall f_10048(C_word c,C_word *av) C_noret;
C_noret_decl(f_10052)
static void C_ccall f_10052(C_word c,C_word *av) C_noret;
C_noret_decl(f_10099)
static void f_10099(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_10148)
static void C_ccall f_10148(C_word c,C_word *av) C_noret;
C_noret_decl(f_10176)
static void f_10176(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10187)
static void C_ccall f_10187(C_word c,C_word *av) C_noret;
C_noret_decl(f_10233)
static void f_10233(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_10236)
static void f_10236(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10250)
static void C_ccall f_10250(C_word c,C_word *av) C_noret;
C_noret_decl(f_10275)
static void C_ccall f_10275(C_word c,C_word *av) C_noret;
C_noret_decl(f_10282)
static void C_ccall f_10282(C_word c,C_word *av) C_noret;
C_noret_decl(f_10301)
static void C_ccall f_10301(C_word c,C_word *av) C_noret;
C_noret_decl(f_10334)
static void C_ccall f_10334(C_word c,C_word *av) C_noret;
C_noret_decl(f_10352)
static void C_ccall f_10352(C_word c,C_word *av) C_noret;
C_noret_decl(f_10372)
static void C_ccall f_10372(C_word c,C_word *av) C_noret;
C_noret_decl(f_10452)
static void f_10452(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_10462)
static void f_10462(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10465)
static void C_ccall f_10465(C_word c,C_word *av) C_noret;
C_noret_decl(f_10472)
static void C_ccall f_10472(C_word c,C_word *av) C_noret;
C_noret_decl(f_10475)
static void C_ccall f_10475(C_word c,C_word *av) C_noret;
C_noret_decl(f_10523)
static void C_ccall f_10523(C_word c,C_word *av) C_noret;
C_noret_decl(f_10544)
static void f_10544(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10550)
static void f_10550(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_10568)
static void f_10568(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10579)
static void f_10579(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10667)
static void C_ccall f_10667(C_word c,C_word *av) C_noret;
C_noret_decl(f_10679)
static void C_ccall f_10679(C_word c,C_word *av) C_noret;
C_noret_decl(f_10683)
static void C_ccall f_10683(C_word c,C_word *av) C_noret;
C_noret_decl(f_10689)
static void C_ccall f_10689(C_word c,C_word *av) C_noret;
C_noret_decl(f_10694)
static void f_10694(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_10697)
static C_word f_10697(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_10719)
static void f_10719(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_10736)
static void C_ccall f_10736(C_word c,C_word *av) C_noret;
C_noret_decl(f_10739)
static void C_ccall f_10739(C_word c,C_word *av) C_noret;
C_noret_decl(f_10741)
static void f_10741(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_10775)
static void f_10775(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10789)
static void C_ccall f_10789(C_word c,C_word *av) C_noret;
C_noret_decl(f_10793)
static void C_ccall f_10793(C_word c,C_word *av) C_noret;
C_noret_decl(f_10795)
static void f_10795(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10802)
static void C_ccall f_10802(C_word c,C_word *av) C_noret;
C_noret_decl(f_10811)
static void f_10811(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_10835)
static void C_ccall f_10835(C_word c,C_word *av) C_noret;
C_noret_decl(f_10839)
static void C_ccall f_10839(C_word c,C_word *av) C_noret;
C_noret_decl(f_10867)
static void f_10867(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10871)
static void C_ccall f_10871(C_word c,C_word *av) C_noret;
C_noret_decl(f_10874)
static void f_10874(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10877)
static void f_10877(C_word t0,C_word t1) C_noret;
C_noret_decl(f_10880)
static void C_ccall f_10880(C_word c,C_word *av) C_noret;
C_noret_decl(f_10885)
static void f_10885(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_10888)
static C_word f_10888(C_word *a,C_word t0);
C_noret_decl(f_10958)
static void C_ccall f_10958(C_word c,C_word *av) C_noret;
C_noret_decl(f_10974)
static void C_ccall f_10974(C_word c,C_word *av) C_noret;
C_noret_decl(f_11050)
static void C_ccall f_11050(C_word c,C_word *av) C_noret;
C_noret_decl(f_11061)
static void C_ccall f_11061(C_word c,C_word *av) C_noret;
C_noret_decl(f_11075)
static void C_ccall f_11075(C_word c,C_word *av) C_noret;
C_noret_decl(f_11097)
static void C_ccall f_11097(C_word c,C_word *av) C_noret;
C_noret_decl(f_11100)
static void f_11100(C_word t0,C_word t1) C_noret;
C_noret_decl(f_11112)
static void C_ccall f_11112(C_word c,C_word *av) C_noret;
C_noret_decl(f_11172)
static void C_ccall f_11172(C_word c,C_word *av) C_noret;
C_noret_decl(f_11201)
static void f_11201(C_word t0,C_word t1) C_noret;
C_noret_decl(f_11332)
static void C_ccall f_11332(C_word c,C_word *av) C_noret;
C_noret_decl(f_11338)
static void C_ccall f_11338(C_word c,C_word *av) C_noret;
C_noret_decl(f_11353)
static void C_ccall f_11353(C_word c,C_word *av) C_noret;
C_noret_decl(f_11424)
static void C_ccall f_11424(C_word c,C_word *av) C_noret;
C_noret_decl(f_11454)
static void C_ccall f_11454(C_word c,C_word *av) C_noret;
C_noret_decl(f_11464)
static void f_11464(C_word t0,C_word t1) C_noret;
C_noret_decl(f_11486)
static void C_ccall f_11486(C_word c,C_word *av) C_noret;
C_noret_decl(f_11521)
static void C_ccall f_11521(C_word c,C_word *av) C_noret;
C_noret_decl(f_11536)
static void C_ccall f_11536(C_word c,C_word *av) C_noret;
C_noret_decl(f_11562)
static void C_ccall f_11562(C_word c,C_word *av) C_noret;
C_noret_decl(f_11585)
static void C_ccall f_11585(C_word c,C_word *av) C_noret;
C_noret_decl(f_11608)
static void C_ccall f_11608(C_word c,C_word *av) C_noret;
C_noret_decl(f_11650)
static void C_ccall f_11650(C_word c,C_word *av) C_noret;
C_noret_decl(f_11673)
static void C_ccall f_11673(C_word c,C_word *av) C_noret;
C_noret_decl(f_11676)
static void C_ccall f_11676(C_word c,C_word *av) C_noret;
C_noret_decl(f_11702)
static void C_ccall f_11702(C_word c,C_word *av) C_noret;
C_noret_decl(f_11706)
static void C_ccall f_11706(C_word c,C_word *av) C_noret;
C_noret_decl(f_11710)
static void C_ccall f_11710(C_word c,C_word *av) C_noret;
C_noret_decl(f_11762)
static void C_ccall f_11762(C_word c,C_word *av) C_noret;
C_noret_decl(f_11787)
static void C_ccall f_11787(C_word c,C_word *av) C_noret;
C_noret_decl(f_11790)
static void C_ccall f_11790(C_word c,C_word *av) C_noret;
C_noret_decl(f_11820)
static void C_ccall f_11820(C_word c,C_word *av) C_noret;
C_noret_decl(f_11824)
static void C_ccall f_11824(C_word c,C_word *av) C_noret;
C_noret_decl(f_11839)
static void C_ccall f_11839(C_word c,C_word *av) C_noret;
C_noret_decl(f_11842)
static void C_ccall f_11842(C_word c,C_word *av) C_noret;
C_noret_decl(f_11863)
static void C_ccall f_11863(C_word c,C_word *av) C_noret;
C_noret_decl(f_11867)
static void C_ccall f_11867(C_word c,C_word *av) C_noret;
C_noret_decl(f_11890)
static void C_ccall f_11890(C_word c,C_word *av) C_noret;
C_noret_decl(f_11921)
static void f_11921(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_11924)
static C_word f_11924(C_word t0,C_word t1);
C_noret_decl(f_11933)
static C_word f_11933(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_12077)
static void C_ccall f_12077(C_word c,C_word *av) C_noret;
C_noret_decl(f_12108)
static void C_ccall f_12108(C_word c,C_word *av) C_noret;
C_noret_decl(f_12199)
static void C_ccall f_12199(C_word c,C_word *av) C_noret;
C_noret_decl(f_12214)
static void C_ccall f_12214(C_word c,C_word *av) C_noret;
C_noret_decl(f_12234)
static void C_ccall f_12234(C_word c,C_word *av) C_noret;
C_noret_decl(f_12238)
static void C_ccall f_12238(C_word c,C_word *av) C_noret;
C_noret_decl(f_12257)
static void f_12257(C_word t0,C_word t1) C_noret;
C_noret_decl(f_12266)
static void C_ccall f_12266(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_12285)
static void C_ccall f_12285(C_word c,C_word *av) C_noret;
C_noret_decl(f_12288)
static void C_ccall f_12288(C_word c,C_word *av) C_noret;
C_noret_decl(f_12291)
static void C_ccall f_12291(C_word c,C_word *av) C_noret;
C_noret_decl(f_12300)
static void f_12300(C_word t0,C_word t1) C_noret;
C_noret_decl(f_12410)
static void C_ccall f_12410(C_word c,C_word *av) C_noret;
C_noret_decl(f_12486)
static void C_ccall f_12486(C_word c,C_word *av) C_noret;
C_noret_decl(f_12513)
static void C_ccall f_12513(C_word c,C_word *av) C_noret;
C_noret_decl(f_12536)
static void C_ccall f_12536(C_word c,C_word *av) C_noret;
C_noret_decl(f_12563)
static void C_ccall f_12563(C_word c,C_word *av) C_noret;
C_noret_decl(f_12590)
static void C_ccall f_12590(C_word c,C_word *av) C_noret;
C_noret_decl(f_12621)
static void C_ccall f_12621(C_word c,C_word *av) C_noret;
C_noret_decl(f_12656)
static void C_ccall f_12656(C_word c,C_word *av) C_noret;
C_noret_decl(f_12679)
static void C_ccall f_12679(C_word c,C_word *av) C_noret;
C_noret_decl(f_12702)
static void C_ccall f_12702(C_word c,C_word *av) C_noret;
C_noret_decl(f_12733)
static void C_ccall f_12733(C_word c,C_word *av) C_noret;
C_noret_decl(f_12756)
static void C_ccall f_12756(C_word c,C_word *av) C_noret;
C_noret_decl(f_12779)
static void C_ccall f_12779(C_word c,C_word *av) C_noret;
C_noret_decl(f_12802)
static void C_ccall f_12802(C_word c,C_word *av) C_noret;
C_noret_decl(f_12825)
static void C_ccall f_12825(C_word c,C_word *av) C_noret;
C_noret_decl(f_12848)
static void C_ccall f_12848(C_word c,C_word *av) C_noret;
C_noret_decl(f_12859)
static void C_ccall f_12859(C_word c,C_word *av) C_noret;
C_noret_decl(f_12879)
static void C_ccall f_12879(C_word c,C_word *av) C_noret;
C_noret_decl(f_12883)
static void C_ccall f_12883(C_word c,C_word *av) C_noret;
C_noret_decl(f_12907)
static void f_12907(C_word t0,C_word t1) 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_12913)
static void C_ccall f_12913(C_word c,C_word *av) C_noret;
C_noret_decl(f_12948)
static void C_ccall f_12948(C_word c,C_word *av) C_noret;
C_noret_decl(f_12952)
static void C_ccall f_12952(C_word c,C_word *av) C_noret;
C_noret_decl(f_12979)
static void C_ccall f_12979(C_word c,C_word *av) C_noret;
C_noret_decl(f_12987)
static void f_12987(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_13047)
static void C_ccall f_13047(C_word c,C_word *av) C_noret;
C_noret_decl(f_13090)
static void C_ccall f_13090(C_word c,C_word *av) C_noret;
C_noret_decl(f_13102)
static void C_ccall f_13102(C_word c,C_word *av) C_noret;
C_noret_decl(f_13111)
static void C_ccall f_13111(C_word c,C_word *av) C_noret;
C_noret_decl(f_13131)
static void C_ccall f_13131(C_word c,C_word *av) C_noret;
C_noret_decl(f_13135)
static void C_ccall f_13135(C_word c,C_word *av) C_noret;
C_noret_decl(f_13139)
static void C_ccall f_13139(C_word c,C_word *av) C_noret;
C_noret_decl(f_13191)
static void C_ccall f_13191(C_word c,C_word *av) C_noret;
C_noret_decl(f_13207)
static void C_ccall f_13207(C_word c,C_word *av) C_noret;
C_noret_decl(f_13271)
static void C_ccall f_13271(C_word c,C_word *av) C_noret;
C_noret_decl(f_13297)
static void C_ccall f_13297(C_word c,C_word *av) C_noret;
C_noret_decl(f_13326)
static void C_ccall f_13326(C_word c,C_word *av) C_noret;
C_noret_decl(f_13354)
static void C_ccall f_13354(C_word c,C_word *av) C_noret;
C_noret_decl(f_13375)
static void C_ccall f_13375(C_word c,C_word *av) C_noret;
C_noret_decl(f_13393)
static void C_ccall f_13393(C_word c,C_word *av) C_noret;
C_noret_decl(f_13507)
static void f_13507(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_13526)
static void C_ccall f_13526(C_word c,C_word *av) C_noret;
C_noret_decl(f_13538)
static void C_ccall f_13538(C_word c,C_word *av) C_noret;
C_noret_decl(f_13541)
static void C_ccall f_13541(C_word c,C_word *av) C_noret;
C_noret_decl(f_13575)
static void C_ccall f_13575(C_word c,C_word *av) C_noret;
C_noret_decl(f_13578)
static void C_ccall f_13578(C_word c,C_word *av) C_noret;
C_noret_decl(f_13622)
static void f_13622(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_13657)
static void C_ccall f_13657(C_word c,C_word *av) C_noret;
C_noret_decl(f_13667)
static void C_ccall f_13667(C_word c,C_word *av) C_noret;
C_noret_decl(f_13674)
static void C_ccall f_13674(C_word c,C_word *av) C_noret;
C_noret_decl(f_13695)
static void f_13695(C_word t0,C_word t1) C_noret;
C_noret_decl(f_13705)
static void C_ccall f_13705(C_word c,C_word *av) C_noret;
C_noret_decl(f_13722)
static void C_ccall f_13722(C_word c,C_word *av) C_noret;
C_noret_decl(f_13739)
static void C_ccall f_13739(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_13751)
static C_word f_13751(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_13772)
static void f_13772(C_word t0,C_word t1) C_noret;
C_noret_decl(f_13784)
static void f_13784(C_word t0,C_word t1) C_noret;
C_noret_decl(f_13794)
static void C_ccall f_13794(C_word c,C_word *av) C_noret;
C_noret_decl(f_13897)
static void C_ccall f_13897(C_word c,C_word *av) C_noret;
C_noret_decl(f_13906)
static void f_13906(C_word t0,C_word t1) C_noret;
C_noret_decl(f_13912)
static void C_ccall f_13912(C_word c,C_word *av) C_noret;
C_noret_decl(f_13915)
static void C_ccall f_13915(C_word c,C_word *av) C_noret;
C_noret_decl(f_13925)
static void C_ccall f_13925(C_word c,C_word *av) C_noret;
C_noret_decl(f_13932)
static void C_ccall f_13932(C_word c,C_word *av) C_noret;
C_noret_decl(f_13936)
static void C_ccall f_13936(C_word c,C_word *av) C_noret;
C_noret_decl(f_13980)
static void C_ccall f_13980(C_word c,C_word *av) C_noret;
C_noret_decl(f_14019)
static void f_14019(C_word t0,C_word t1) C_noret;
C_noret_decl(f_14029)
static void C_ccall f_14029(C_word c,C_word *av) C_noret;
C_noret_decl(f_14033)
static void C_ccall f_14033(C_word c,C_word *av) C_noret;
C_noret_decl(f_14037)
static void C_ccall f_14037(C_word c,C_word *av) C_noret;
C_noret_decl(f_14052)
static void C_ccall f_14052(C_word c,C_word *av) C_noret;
C_noret_decl(f_14060)
static void C_ccall f_14060(C_word c,C_word *av) C_noret;
C_noret_decl(f_14064)
static void C_ccall f_14064(C_word c,C_word *av) C_noret;
C_noret_decl(f_14083)
static void C_ccall f_14083(C_word c,C_word *av) C_noret;
C_noret_decl(f_14136)
static void f_14136(C_word t0,C_word t1) C_noret;
C_noret_decl(f_14150)
static void C_ccall f_14150(C_word c,C_word *av) C_noret;
C_noret_decl(f_14154)
static void C_ccall f_14154(C_word c,C_word *av) C_noret;
C_noret_decl(f_14158)
static void C_ccall f_14158(C_word c,C_word *av) C_noret;
C_noret_decl(f_14168)
static void C_ccall f_14168(C_word c,C_word *av) C_noret;
C_noret_decl(f_14226)
static void C_ccall f_14226(C_word c,C_word *av) C_noret;
C_noret_decl(f_14247)
static void f_14247(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_14250)
static C_word f_14250(C_word t0,C_word t1);
C_noret_decl(f_14451)
static void f_14451(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_14489)
static void f_14489(C_word t0,C_word t1) C_noret;
C_noret_decl(f_14565)
static void f_14565(C_word t0,C_word t1) C_noret;
C_noret_decl(f_14706)
static void C_ccall f_14706(C_word c,C_word *av) C_noret;
C_noret_decl(f_14709)
static void C_ccall f_14709(C_word c,C_word *av) C_noret;
C_noret_decl(f_14730)
static void C_ccall f_14730(C_word c,C_word *av) C_noret;
C_noret_decl(f_14735)
static void f_14735(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_14770)
static void C_ccall f_14770(C_word c,C_word *av) C_noret;
C_noret_decl(f_14795)
static void C_ccall f_14795(C_word c,C_word *av) C_noret;
C_noret_decl(f_14799)
static void C_ccall f_14799(C_word c,C_word *av) C_noret;
C_noret_decl(f_14810)
static void C_ccall f_14810(C_word c,C_word *av) C_noret;
C_noret_decl(f_14818)
static void C_ccall f_14818(C_word c,C_word *av) C_noret;
C_noret_decl(f_14844)
static void f_14844(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_14874)
static void C_ccall f_14874(C_word c,C_word *av) C_noret;
C_noret_decl(f_14887)
static void C_ccall f_14887(C_word c,C_word *av) C_noret;
C_noret_decl(f_14895)
static void C_ccall f_14895(C_word c,C_word *av) C_noret;
C_noret_decl(f_14925)
static void C_ccall f_14925(C_word c,C_word *av) C_noret;
C_noret_decl(f_14927)
static void f_14927(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_14963)
static void f_14963(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_14999)
static void f_14999(C_word t0,C_word t1) C_noret;
C_noret_decl(f_15022)
static void C_ccall f_15022(C_word c,C_word *av) C_noret;
C_noret_decl(f_15024)
static void C_ccall f_15024(C_word c,C_word *av) C_noret;
C_noret_decl(f_15066)
static void C_ccall f_15066(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_15108)
static void C_ccall f_15108(C_word c,C_word *av) C_noret;
C_noret_decl(f_15110)
static void f_15110(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15150)
static void C_ccall f_15150(C_word c,C_word *av) C_noret;
C_noret_decl(f_15156)
static void C_ccall f_15156(C_word c,C_word *av) C_noret;
C_noret_decl(f_15164)
static void f_15164(C_word t0,C_word t1) C_noret;
C_noret_decl(f_15187)
static void C_ccall f_15187(C_word c,C_word *av) C_noret;
C_noret_decl(f_15189)
static void C_ccall f_15189(C_word c,C_word *av) C_noret;
C_noret_decl(f_15231)
static void C_ccall f_15231(C_word c,C_word *av) C_noret;
C_noret_decl(f_15241)
static void C_ccall f_15241(C_word c,C_word *av) C_noret;
C_noret_decl(f_15247)
static void C_ccall f_15247(C_word c,C_word *av) C_noret;
C_noret_decl(f_15273)
static void C_ccall f_15273(C_word c,C_word *av) C_noret;
C_noret_decl(f_15275)
static void f_15275(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15315)
static void C_ccall f_15315(C_word c,C_word *av) C_noret;
C_noret_decl(f_15321)
static void C_ccall f_15321(C_word c,C_word *av) C_noret;
C_noret_decl(f_15340)
static void C_ccall f_15340(C_word c,C_word *av) C_noret;
C_noret_decl(f_15349)
static void f_15349(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15361)
static void f_15361(C_word t0,C_word t1) C_noret;
C_noret_decl(f_15387)
static void C_ccall f_15387(C_word c,C_word *av) C_noret;
C_noret_decl(f_15393)
static void C_ccall f_15393(C_word c,C_word *av) C_noret;
C_noret_decl(f_15395)
static void f_15395(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15449)
static void C_ccall f_15449(C_word c,C_word *av) C_noret;
C_noret_decl(f_15457)
static void C_ccall f_15457(C_word c,C_word *av) C_noret;
C_noret_decl(f_15464)
static void C_ccall f_15464(C_word c,C_word *av) 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_15516)
static void C_ccall f_15516(C_word c,C_word *av) C_noret;
C_noret_decl(f_15518)
static void f_15518(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15574)
static void C_ccall f_15574(C_word c,C_word *av) C_noret;
C_noret_decl(f_15595)
static void 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_15647)
static void f_15647(C_word t0,C_word t1) C_noret;
C_noret_decl(f_15677)
static void C_ccall f_15677(C_word c,C_word *av) C_noret;
C_noret_decl(f_15679)
static void f_15679(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15794)
static void C_ccall f_15794(C_word c,C_word *av) C_noret;
C_noret_decl(f_15796)
static void f_15796(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_15852)
static void f_15852(C_word t0,C_word t1) C_noret;
C_noret_decl(f_15860)
static void C_ccall f_15860(C_word c,C_word *av) C_noret;
C_noret_decl(f_15862)
static void f_15862(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_15876)
static void C_ccall f_15876(C_word c,C_word *av) C_noret;
C_noret_decl(f_15880)
static void C_ccall f_15880(C_word c,C_word *av) C_noret;
C_noret_decl(f_15898)
static void C_ccall f_15898(C_word c,C_word *av) C_noret;
C_noret_decl(f_15907)
static void f_15907(C_word t0,C_word t1) C_noret;
C_noret_decl(f_15922)
static void C_ccall f_15922(C_word c,C_word *av) C_noret;
C_noret_decl(f_15974)
static void f_15974(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_15977)
static void f_15977(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_16034)
static void f_16034(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_16045)
static void C_ccall f_16045(C_word c,C_word *av) C_noret;
C_noret_decl(f_16047)
static void f_16047(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_16072)
static void C_ccall f_16072(C_word c,C_word *av) C_noret;
C_noret_decl(f_16095)
static void f_16095(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_16106)
static void C_ccall f_16106(C_word c,C_word *av) C_noret;
C_noret_decl(f_16108)
static void f_16108(C_word t0,C_word t1,C_word t2) 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_16149)
static void f_16149(C_word t0,C_word t1) C_noret;
C_noret_decl(f_16158)
static void C_ccall f_16158(C_word c,C_word *av) C_noret;
C_noret_decl(f_16164)
static void C_ccall f_16164(C_word c,C_word *av) C_noret;
C_noret_decl(f_16174)
static void C_ccall f_16174(C_word c,C_word *av) C_noret;
C_noret_decl(f_16181)
static void C_ccall f_16181(C_word c,C_word *av) C_noret;
C_noret_decl(f_16216)
static void C_ccall f_16216(C_word c,C_word *av) C_noret;
C_noret_decl(f_16218)
static void f_16218(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_16243)
static void C_ccall f_16243(C_word c,C_word *av) C_noret;
C_noret_decl(f_16272)
static void C_ccall f_16272(C_word c,C_word *av) C_noret;
C_noret_decl(f_16274)
static void f_16274(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_16299)
static void C_ccall f_16299(C_word c,C_word *av) C_noret;
C_noret_decl(f_16363)
static void f_16363(C_word t0,C_word t1) C_noret;
C_noret_decl(f_16376)
static void C_ccall f_16376(C_word c,C_word *av) C_noret;
C_noret_decl(f_16379)
static void C_ccall f_16379(C_word c,C_word *av) C_noret;
C_noret_decl(f_16381)
static void f_16381(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_16428)
static void C_ccall f_16428(C_word c,C_word *av) C_noret;
C_noret_decl(f_16435)
static void C_ccall f_16435(C_word c,C_word *av) C_noret;
C_noret_decl(f_16489)
static void C_ccall f_16489(C_word c,C_word *av) C_noret;
C_noret_decl(f_16556)
static void C_ccall f_16556(C_word c,C_word *av) C_noret;
C_noret_decl(f_16564)
static void C_ccall f_16564(C_word c,C_word *av) C_noret;
C_noret_decl(f_16566)
static void C_ccall f_16566(C_word c,C_word *av) C_noret;
C_noret_decl(f_16570)
static void C_ccall f_16570(C_word c,C_word *av) C_noret;
C_noret_decl(f_16573)
static void C_ccall f_16573(C_word c,C_word *av) C_noret;
C_noret_decl(f_16576)
static void C_ccall f_16576(C_word c,C_word *av) C_noret;
C_noret_decl(f_16579)
static void C_ccall f_16579(C_word c,C_word *av) C_noret;
C_noret_decl(f_16585)
static void C_ccall f_16585(C_word c,C_word *av) C_noret;
C_noret_decl(f_16588)
static void C_ccall f_16588(C_word c,C_word *av) C_noret;
C_noret_decl(f_16591)
static void C_ccall f_16591(C_word c,C_word *av) C_noret;
C_noret_decl(f_16594)
static void C_ccall f_16594(C_word c,C_word *av) C_noret;
C_noret_decl(f_16597)
static void C_ccall f_16597(C_word c,C_word *av) C_noret;
C_noret_decl(f_16612)
static void C_ccall f_16612(C_word c,C_word *av) C_noret;
C_noret_decl(f_16626)
static void C_ccall f_16626(C_word c,C_word *av) C_noret;
C_noret_decl(f_16631)
static void f_16631(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_16657)
static void C_ccall f_16657(C_word c,C_word *av) C_noret;
C_noret_decl(f_16661)
static void f_16661(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_16699)
static void C_ccall f_16699(C_word c,C_word *av) C_noret;
C_noret_decl(f_16716)
static void f_16716(C_word t0,C_word t1) C_noret;
C_noret_decl(f_16759)
static void f_16759(C_word t0,C_word t1) C_noret;
C_noret_decl(f_16866)
static void C_ccall f_16866(C_word c,C_word *av) C_noret;
C_noret_decl(f_16889)
static void f_16889(C_word t0,C_word t1) C_noret;
C_noret_decl(f_16967)
static C_word f_16967(C_word t0);
C_noret_decl(f_17012)
static void C_ccall f_17012(C_word c,C_word *av) C_noret;
C_noret_decl(f_17029)
static void f_17029(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17101)
static void C_ccall f_17101(C_word c,C_word *av) C_noret;
C_noret_decl(f_17105)
static void C_ccall f_17105(C_word c,C_word *av) C_noret;
C_noret_decl(f_17142)
static void f_17142(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17218)
static void C_ccall f_17218(C_word c,C_word *av) C_noret;
C_noret_decl(f_17222)
static void C_ccall f_17222(C_word c,C_word *av) C_noret;
C_noret_decl(f_17259)
static void f_17259(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17272)
static void C_ccall f_17272(C_word c,C_word *av) C_noret;
C_noret_decl(f_17335)
static void C_ccall f_17335(C_word c,C_word *av) C_noret;
C_noret_decl(f_17361)
static void C_ccall f_17361(C_word c,C_word *av) C_noret;
C_noret_decl(f_17374)
static void f_17374(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17380)
static void C_ccall f_17380(C_word c,C_word *av) C_noret;
C_noret_decl(f_17401)
static void C_ccall f_17401(C_word c,C_word *av) C_noret;
C_noret_decl(f_17407)
static void f_17407(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17437)
static void C_ccall f_17437(C_word c,C_word *av) C_noret;
C_noret_decl(f_17474)
static void C_ccall f_17474(C_word c,C_word *av) C_noret;
C_noret_decl(f_17477)
static void C_ccall f_17477(C_word c,C_word *av) C_noret;
C_noret_decl(f_17484)
static void C_ccall f_17484(C_word c,C_word *av) C_noret;
C_noret_decl(f_17486)
static void f_17486(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_17489)
static void f_17489(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_17529)
static void f_17529(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17545)
static void C_ccall f_17545(C_word c,C_word *av) C_noret;
C_noret_decl(f_17558)
static void f_17558(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17565)
static void f_17565(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
C_noret_decl(f_17598)
static void C_ccall f_17598(C_word c,C_word *av) C_noret;
C_noret_decl(f_17628)
static void C_ccall f_17628(C_word c,C_word *av) C_noret;
C_noret_decl(f_17643)
static void f_17643(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
C_noret_decl(f_17680)
static void C_ccall f_17680(C_word c,C_word *av) C_noret;
C_noret_decl(f_17696)
static void C_ccall f_17696(C_word c,C_word *av) C_noret;
C_noret_decl(f_17700)
static void C_ccall f_17700(C_word c,C_word *av) C_noret;
C_noret_decl(f_17713)
static void C_ccall f_17713(C_word c,C_word *av) C_noret;
C_noret_decl(f_17736)
static void C_ccall f_17736(C_word c,C_word *av) C_noret;
C_noret_decl(f_17739)
static void C_ccall f_17739(C_word c,C_word *av) C_noret;
C_noret_decl(f_17746)
static void f_17746(C_word t0,C_word t1) 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_17762)
static void C_ccall f_17762(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_ccall f_17801(C_word c,C_word *av) C_noret;
C_noret_decl(f_17805)
static void C_ccall f_17805(C_word c,C_word *av) C_noret;
C_noret_decl(f_17882)
static void f_17882(C_word t0,C_word t1) C_noret;
C_noret_decl(f_17895)
static void C_ccall f_17895(C_word c,C_word *av) C_noret;
C_noret_decl(f_17931)
static void C_ccall f_17931(C_word c,C_word *av) C_noret;
C_noret_decl(f_17940)
static void f_17940(C_word t0,C_word t1) C_noret;
C_noret_decl(f_18040)
static void C_ccall f_18040(C_word c,C_word *av) C_noret;
C_noret_decl(f_18049)
static void C_ccall f_18049(C_word c,C_word *av) C_noret;
C_noret_decl(f_18067)
static void f_18067(C_word t0,C_word t1) C_noret;
C_noret_decl(f_18070)
static void f_18070(C_word t0,C_word t1) C_noret;
C_noret_decl(f_18088)
static void C_ccall f_18088(C_word c,C_word *av) C_noret;
C_noret_decl(f_18135)
static void C_ccall f_18135(C_word c,C_word *av) C_noret;
C_noret_decl(f_18209)
static void C_ccall f_18209(C_word c,C_word *av) C_noret;
C_noret_decl(f_18237)
static void C_ccall f_18237(C_word c,C_word *av) C_noret;
C_noret_decl(f_18262)
static void f_18262(C_word t0,C_word t1) C_noret;
C_noret_decl(f_18281)
static void f_18281(C_word t0,C_word t1) C_noret;
C_noret_decl(f_18302)
static void f_18302(C_word t0,C_word t1) C_noret;
C_noret_decl(f_18312)
static void f_18312(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_18320)
static void C_ccall f_18320(C_word c,C_word *av) C_noret;
C_noret_decl(f_18548)
static void C_ccall f_18548(C_word c,C_word *av) C_noret;
C_noret_decl(f_18571)
static void C_ccall f_18571(C_word c,C_word *av) C_noret;
C_noret_decl(f_18580)
static C_word f_18580(C_word *a,C_word t0);
C_noret_decl(f_18603)
static C_word f_18603(C_word *a,C_word t0);
C_noret_decl(f_18626)
static void C_ccall f_18626(C_word c,C_word *av) C_noret;
C_noret_decl(f_18699)
static void f_18699(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_18724)
static void C_ccall f_18724(C_word c,C_word *av) C_noret;
C_noret_decl(f_18759)
static void f_18759(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_18782)
static void C_ccall f_18782(C_word c,C_word *av) C_noret;
C_noret_decl(f_18786)
static void C_ccall f_18786(C_word c,C_word *av) C_noret;
C_noret_decl(f_18807)
static void f_18807(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_18909)
static void f_18909(C_word t0,C_word t1) C_noret;
C_noret_decl(f_19093)
static void f_19093(C_word t0,C_word t1,C_word t2,C_word t3) 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_19121)
static void C_ccall f_19121(C_word c,C_word *av) C_noret;
C_noret_decl(f_19125)
static void C_ccall f_19125(C_word c,C_word *av) C_noret;
C_noret_decl(f_19142)
static void f_19142(C_word t0,C_word t1) C_noret;
C_noret_decl(f_19175)
static void C_ccall f_19175(C_word c,C_word *av) C_noret;
C_noret_decl(f_19212)
static void C_ccall f_19212(C_word c,C_word *av) C_noret;
C_noret_decl(f_19214)
static void f_19214(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_19239)
static void C_ccall f_19239(C_word c,C_word *av) C_noret;
C_noret_decl(f_19307)
static void C_ccall f_19307(C_word c,C_word *av) C_noret;
C_noret_decl(f_19309)
static void C_ccall f_19309(C_word c,C_word *av) C_noret;
C_noret_decl(f_19313)
static void C_ccall f_19313(C_word c,C_word *av) C_noret;
C_noret_decl(f_19322)
static void f_19322(C_word t0,C_word t1) C_noret;
C_noret_decl(f_19328)
static void C_ccall f_19328(C_word c,C_word *av) C_noret;
C_noret_decl(f_19331)
static void C_ccall f_19331(C_word c,C_word *av) C_noret;
C_noret_decl(f_19399)
static void C_ccall f_19399(C_word c,C_word *av) C_noret;
C_noret_decl(f_19403)
static void C_ccall f_19403(C_word c,C_word *av) C_noret;
C_noret_decl(f_19406)
static void C_ccall f_19406(C_word c,C_word *av) C_noret;
C_noret_decl(f_19409)
static void C_ccall f_19409(C_word c,C_word *av) C_noret;
C_noret_decl(f_19412)
static void C_ccall f_19412(C_word c,C_word *av) C_noret;
C_noret_decl(f_19442)
static void f_19442(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_19461)
static void C_ccall f_19461(C_word c,C_word *av) C_noret;
C_noret_decl(f_19486)
static void C_ccall f_19486(C_word c,C_word *av) C_noret;
C_noret_decl(f_19503)
static void f_19503(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_19507)
static void C_ccall f_19507(C_word c,C_word *av) C_noret;
C_noret_decl(f_19512)
static void f_19512(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_19519)
static void C_ccall f_19519(C_word c,C_word *av) C_noret;
C_noret_decl(f_19542)
static void C_ccall f_19542(C_word c,C_word *av) C_noret;
C_noret_decl(f_19552)
static void C_ccall f_19552(C_word c,C_word *av) C_noret;
C_noret_decl(f_19573)
static void C_ccall f_19573(C_word c,C_word *av) C_noret;
C_noret_decl(f_19591)
static void C_ccall f_19591(C_word c,C_word *av) C_noret;
C_noret_decl(f_19597)
static void C_ccall f_19597(C_word c,C_word *av) C_noret;
C_noret_decl(f_19611)
static void C_ccall f_19611(C_word c,C_word *av) C_noret;
C_noret_decl(f_19617)
static void f_19617(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
C_noret_decl(f_19624)
static void C_ccall f_19624(C_word c,C_word *av) C_noret;
C_noret_decl(f_19654)
static void C_ccall f_19654(C_word c,C_word *av) C_noret;
C_noret_decl(f_19667)
static void C_ccall f_19667(C_word c,C_word *av) C_noret;
C_noret_decl(f_19674)
static void C_ccall f_19674(C_word c,C_word *av) C_noret;
C_noret_decl(f_19681)
static void C_ccall f_19681(C_word c,C_word *av) C_noret;
C_noret_decl(f_19683)
static void C_ccall f_19683(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_19695)
static void C_ccall f_19695(C_word c,C_word *av) C_noret;
C_noret_decl(f_19704)
static void f_19704(C_word t0,C_word t1) C_noret;
C_noret_decl(f_19710)
static void C_ccall f_19710(C_word c,C_word *av) C_noret;
C_noret_decl(f_19713)
static void C_ccall f_19713(C_word c,C_word *av) C_noret;
C_noret_decl(f_19781)
static void C_ccall f_19781(C_word c,C_word *av) C_noret;
C_noret_decl(f_19785)
static void C_ccall f_19785(C_word c,C_word *av) C_noret;
C_noret_decl(f_19788)
static void C_ccall f_19788(C_word c,C_word *av) C_noret;
C_noret_decl(f_19803)
static void C_ccall f_19803(C_word c,C_word *av) C_noret;
C_noret_decl(f_19826)
static void C_ccall f_19826(C_word c,C_word *av) C_noret;
C_noret_decl(f_19837)
static void C_ccall f_19837(C_word c,C_word *av) C_noret;
C_noret_decl(f_19873)
static void C_ccall f_19873(C_word c,C_word *av) C_noret;
C_noret_decl(f_19883)
static void C_ccall f_19883(C_word c,C_word *av) C_noret;
C_noret_decl(f_19889)
static void C_ccall f_19889(C_word c,C_word *av) C_noret;
C_noret_decl(f_19895)
static void C_ccall f_19895(C_word c,C_word *av) C_noret;
C_noret_decl(f_19905)
static void C_ccall f_19905(C_word c,C_word *av) C_noret;
C_noret_decl(f_19907)
static void f_19907(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_19917)
static void f_19917(C_word t0,C_word t1) C_noret;
C_noret_decl(f_19936)
static void C_ccall f_19936(C_word c,C_word *av) C_noret;
C_noret_decl(f_19949)
static void C_ccall f_19949(C_word c,C_word *av) C_noret;
C_noret_decl(f_19981)
static void C_ccall f_19981(C_word c,C_word *av) C_noret;
C_noret_decl(f_20004)
static void C_ccall f_20004(C_word c,C_word *av) C_noret;
C_noret_decl(f_20009)
static void C_ccall f_20009(C_word c,C_word *av) C_noret;
C_noret_decl(f_20016)
static void C_ccall f_20016(C_word c,C_word *av) C_noret;
C_noret_decl(f_20067)
static void f_20067(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_20074)
static void C_ccall f_20074(C_word c,C_word *av) 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_20082)
static void f_20082(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_20134)
static void C_ccall f_20134(C_word c,C_word *av) C_noret;
C_noret_decl(f_20149)
static void C_ccall f_20149(C_word c,C_word *av) C_noret;
C_noret_decl(f_20185)
static void C_ccall f_20185(C_word c,C_word *av) C_noret;
C_noret_decl(f_20195)
static void C_ccall f_20195(C_word c,C_word *av) C_noret;
C_noret_decl(f_20205)
static void f_20205(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_20207)
static C_word f_20207(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_20265)
static void f_20265(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_20293)
static void C_ccall f_20293(C_word c,C_word *av) C_noret;
C_noret_decl(f_20297)
static void C_ccall f_20297(C_word c,C_word *av) C_noret;
C_noret_decl(f_20302)
static void f_20302(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_20322)
static void C_ccall f_20322(C_word c,C_word *av) C_noret;
C_noret_decl(f_20324)
static void f_20324(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_20349)
static void C_ccall f_20349(C_word c,C_word *av) C_noret;
C_noret_decl(f_20361)
static void f_20361(C_word t0,C_word t1) C_noret;
C_noret_decl(f_20364)
static void C_ccall f_20364(C_word c,C_word *av) C_noret;
C_noret_decl(f_20377)
static void f_20377(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_20381)
static void C_ccall f_20381(C_word c,C_word *av) C_noret;
C_noret_decl(f_20384)
static void C_ccall f_20384(C_word c,C_word *av) C_noret;
C_noret_decl(f_20389)
static void f_20389(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_20399)
static void f_20399(C_word t0,C_word t1) C_noret;
C_noret_decl(f_20402)
static void C_ccall f_20402(C_word c,C_word *av) C_noret;
C_noret_decl(f_20412)
static void C_ccall f_20412(C_word c,C_word *av) C_noret;
C_noret_decl(f_20447)
static void C_ccall f_20447(C_word c,C_word *av) C_noret;
C_noret_decl(f_20499)
static void C_ccall f_20499(C_word c,C_word *av) C_noret;
C_noret_decl(f_20511)
static void C_ccall f_20511(C_word c,C_word *av) C_noret;
C_noret_decl(f_20535)
static void C_ccall f_20535(C_word c,C_word *av) C_noret;
C_noret_decl(f_20536)
static C_word f_20536(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_20565)
static void C_ccall f_20565(C_word c,C_word *av) C_noret;
C_noret_decl(f_20574)
static void f_20574(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_20588)
static void C_ccall f_20588(C_word c,C_word *av) C_noret;
C_noret_decl(f_20607)
static void C_ccall f_20607(C_word c,C_word *av) C_noret;
C_noret_decl(f_20615)
static void f_20615(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_20625)
static void C_ccall f_20625(C_word c,C_word *av) C_noret;
C_noret_decl(f_20638)
static void f_20638(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_20663)
static void C_ccall f_20663(C_word c,C_word *av) C_noret;
C_noret_decl(f_20672)
static void f_20672(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_20708)
static void f_20708(C_word t0,C_word t1) C_noret;
C_noret_decl(f_20711)
static void C_ccall f_20711(C_word c,C_word *av) C_noret;
C_noret_decl(f_20750)
static void f_20750(C_word t0,C_word t1) C_noret;
C_noret_decl(f_20753)
static void C_ccall f_20753(C_word c,C_word *av) C_noret;
C_noret_decl(f_20778)
static void C_ccall f_20778(C_word c,C_word *av) C_noret;
C_noret_decl(f_20818)
static C_word f_20818(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_20846)
static void f_20846(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_20971)
static C_word f_20971(C_word t0,C_word t1);
C_noret_decl(f_21005)
static C_word f_21005(C_word *a,C_word t0,C_word t1,C_word t2,C_word t3);
C_noret_decl(f_21146)
static void f_21146(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_21150)
static void C_ccall f_21150(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_21155)
static void f_21155(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
C_noret_decl(f_21158)
static void f_21158(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_21168)
static void f_21168(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_21172)
static void f_21172(C_word t0,C_word t1) C_noret;
C_noret_decl(f_21181)
static void C_ccall f_21181(C_word c,C_word *av) C_noret;
C_noret_decl(f_21184)
static void C_ccall f_21184(C_word c,C_word *av) C_noret;
C_noret_decl(f_21193)
static void f_21193(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_21229)
static void f_21229(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_21240)
static void C_ccall f_21240(C_word c,C_word *av) C_noret;
C_noret_decl(f_21246)
static void f_21246(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_21263)
static void C_ccall f_21263(C_word c,C_word *av) C_noret;
C_noret_decl(f_21296)
static void C_ccall f_21296(C_word c,C_word *av) C_noret;
C_noret_decl(f_21302)
static void C_ccall f_21302(C_word c,C_word *av) C_noret;
C_noret_decl(f_21309)
static void C_ccall f_21309(C_word c,C_word *av) C_noret;
C_noret_decl(f_21320)
static void C_ccall f_21320(C_word c,C_word *av) C_noret;
C_noret_decl(f_21334)
static void f_21334(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_21352)
static void C_ccall f_21352(C_word c,C_word *av) C_noret;
C_noret_decl(f_21377)
static void C_ccall f_21377(C_word c,C_word *av) C_noret;
C_noret_decl(f_21404)
static void C_ccall f_21404(C_word c,C_word *av) C_noret;
C_noret_decl(f_21435)
static void C_ccall f_21435(C_word c,C_word *av) C_noret;
C_noret_decl(f_21442)
static void C_ccall f_21442(C_word c,C_word *av) C_noret;
C_noret_decl(f_21454)
static void C_ccall f_21454(C_word c,C_word *av) C_noret;
C_noret_decl(f_21484)
static void C_ccall f_21484(C_word c,C_word *av) C_noret;
C_noret_decl(f_21498)
static void f_21498(C_word t0,C_word t1) C_noret;
C_noret_decl(f_21501)
static void C_ccall f_21501(C_word c,C_word *av) C_noret;
C_noret_decl(f_21507)
static void C_ccall f_21507(C_word c,C_word *av) C_noret;
C_noret_decl(f_21521)
static void C_ccall f_21521(C_word c,C_word *av) C_noret;
C_noret_decl(f_21545)
static void f_21545(C_word t0,C_word t1) C_noret;
C_noret_decl(f_21548)
static void C_ccall f_21548(C_word c,C_word *av) C_noret;
C_noret_decl(f_21555)
static void C_ccall f_21555(C_word c,C_word *av) C_noret;
C_noret_decl(f_21572)
static void C_ccall f_21572(C_word c,C_word *av) C_noret;
C_noret_decl(f_21588)
static void C_ccall f_21588(C_word c,C_word *av) C_noret;
C_noret_decl(f_21591)
static void C_ccall f_21591(C_word c,C_word *av) C_noret;
C_noret_decl(f_21594)
static void C_ccall f_21594(C_word c,C_word *av) C_noret;
C_noret_decl(f_21600)
static void C_ccall f_21600(C_word c,C_word *av) C_noret;
C_noret_decl(f_21610)
static void C_ccall f_21610(C_word c,C_word *av) C_noret;
C_noret_decl(f_21614)
static void C_ccall f_21614(C_word c,C_word *av) C_noret;
C_noret_decl(f_21625)
static void C_ccall f_21625(C_word c,C_word *av) C_noret;
C_noret_decl(f_21629)
static void C_ccall f_21629(C_word c,C_word *av) C_noret;
C_noret_decl(f_21633)
static void C_ccall f_21633(C_word c,C_word *av) C_noret;
C_noret_decl(f_21641)
static void C_ccall f_21641(C_word c,C_word *av) C_noret;
C_noret_decl(f_21649)
static void C_ccall f_21649(C_word c,C_word *av) C_noret;
C_noret_decl(f_21664)
static void C_ccall f_21664(C_word c,C_word *av) C_noret;
C_noret_decl(f_21670)
static void C_ccall f_21670(C_word c,C_word *av) C_noret;
C_noret_decl(f_21684)
static void C_ccall f_21684(C_word c,C_word *av) C_noret;
C_noret_decl(f_21698)
static void C_ccall f_21698(C_word c,C_word *av) C_noret;
C_noret_decl(f_21704)
static void C_ccall f_21704(C_word c,C_word *av) C_noret;
C_noret_decl(f_21707)
static void C_ccall f_21707(C_word c,C_word *av) C_noret;
C_noret_decl(f_21734)
static void C_ccall f_21734(C_word c,C_word *av) C_noret;
C_noret_decl(f_21738)
static void C_ccall f_21738(C_word c,C_word *av) C_noret;
C_noret_decl(f_21758)
static void C_ccall f_21758(C_word c,C_word *av) C_noret;
C_noret_decl(f_21764)
static void C_ccall f_21764(C_word c,C_word *av) C_noret;
C_noret_decl(f_21767)
static void C_ccall f_21767(C_word c,C_word *av) C_noret;
C_noret_decl(f_21770)
static void C_ccall f_21770(C_word c,C_word *av) C_noret;
C_noret_decl(f_21786)
static void C_ccall f_21786(C_word c,C_word *av) C_noret;
C_noret_decl(f_21794)
static void C_ccall f_21794(C_word c,C_word *av) C_noret;
C_noret_decl(f_21806)
static void C_ccall f_21806(C_word c,C_word *av) C_noret;
C_noret_decl(f_21836)
static void C_ccall f_21836(C_word c,C_word *av) C_noret;
C_noret_decl(f_21842)
static void C_ccall f_21842(C_word c,C_word *av) C_noret;
C_noret_decl(f_21845)
static void C_ccall f_21845(C_word c,C_word *av) C_noret;
C_noret_decl(f_21848)
static void C_ccall f_21848(C_word c,C_word *av) C_noret;
C_noret_decl(f_21864)
static void C_ccall f_21864(C_word c,C_word *av) C_noret;
C_noret_decl(f_21872)
static void C_ccall f_21872(C_word c,C_word *av) C_noret;
C_noret_decl(f_21880)
static void C_ccall f_21880(C_word c,C_word *av) C_noret;
C_noret_decl(f_21884)
static void C_ccall f_21884(C_word c,C_word *av) C_noret;
C_noret_decl(f_21903)
static void f_21903(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_21921)
static void C_ccall f_21921(C_word c,C_word *av) C_noret;
C_noret_decl(f_22049)
static void C_ccall f_22049(C_word c,C_word *av) C_noret;
C_noret_decl(f_22055)
static void C_ccall f_22055(C_word c,C_word *av) C_noret;
C_noret_decl(f_22058)
static void C_ccall f_22058(C_word c,C_word *av) C_noret;
C_noret_decl(f_22066)
static void f_22066(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_22105)
static void f_22105(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_22140)
static void f_22140(C_word t0,C_word t1) C_noret;
C_noret_decl(f_22147)
static void C_ccall f_22147(C_word c,C_word *av) C_noret;
C_noret_decl(f_22173)
static void C_ccall f_22173(C_word c,C_word *av) C_noret;
C_noret_decl(f_22269)
static void f_22269(C_word t0,C_word t1) C_noret;
C_noret_decl(f_22273)
static void C_ccall f_22273(C_word c,C_word *av) C_noret;
C_noret_decl(f_22286)
static void C_ccall f_22286(C_word c,C_word *av) C_noret;
C_noret_decl(f_22298)
static void f_22298(C_word t0,C_word t1) C_noret;
C_noret_decl(f_22302)
static void C_ccall f_22302(C_word c,C_word *av) C_noret;
C_noret_decl(f_22309)
static void C_ccall f_22309(C_word c,C_word *av) C_noret;
C_noret_decl(f_22315)
static void f_22315(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_22319)
static void C_ccall f_22319(C_word c,C_word *av) C_noret;
C_noret_decl(f_22322)
static void C_ccall f_22322(C_word c,C_word *av) C_noret;
C_noret_decl(f_22324)
static void f_22324(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_22331)
static void f_22331(C_word t0,C_word t1) C_noret;
C_noret_decl(f_22338)
static C_word f_22338(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_22373)
static void C_ccall f_22373(C_word c,C_word *av) C_noret;
C_noret_decl(f_22386)
static void f_22386(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_22487)
static void C_ccall f_22487(C_word c,C_word *av) C_noret;
C_noret_decl(f_22493)
static void f_22493(C_word t0,C_word t1) C_noret;
C_noret_decl(f_22499)
static void f_22499(C_word t0,C_word t1) C_noret;
C_noret_decl(f_22552)
static void f_22552(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_22623)
static void f_22623(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_22676)
static void f_22676(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_22685)
static void f_22685(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_22705)
static void C_ccall f_22705(C_word c,C_word *av) C_noret;
C_noret_decl(f_22734)
static C_word f_22734(C_word t0,C_word t1);
C_noret_decl(f_22758)
static void f_22758(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_22765)
static void C_ccall f_22765(C_word c,C_word *av) C_noret;
C_noret_decl(f_22768)
static void C_ccall f_22768(C_word c,C_word *av) C_noret;
C_noret_decl(f_22771)
static void C_ccall f_22771(C_word c,C_word *av) C_noret;
C_noret_decl(f_22774)
static void C_ccall f_22774(C_word c,C_word *av) C_noret;
C_noret_decl(f_22790)
static void f_22790(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_22807)
static void C_ccall f_22807(C_word c,C_word *av) C_noret;
C_noret_decl(f_22842)
static void C_ccall f_22842(C_word c,C_word *av) C_noret;
C_noret_decl(f_22846)
static void f_22846(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_22874)
static void C_ccall f_22874(C_word c,C_word *av) C_noret;
C_noret_decl(f_22877)
static void f_22877(C_word t0,C_word t1) C_noret;
C_noret_decl(f_22883)
static void C_ccall f_22883(C_word c,C_word *av) C_noret;
C_noret_decl(f_22969)
static void C_ccall f_22969(C_word c,C_word *av) C_noret;
C_noret_decl(f_22972)
static void C_ccall f_22972(C_word c,C_word *av) C_noret;
C_noret_decl(f_22977)
static void f_22977(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_22987)
static void C_ccall f_22987(C_word c,C_word *av) C_noret;
C_noret_decl(f_22990)
static void C_ccall f_22990(C_word c,C_word *av) C_noret;
C_noret_decl(f_23010)
static void f_23010(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_23018)
static void f_23018(C_word t0,C_word t1) C_noret;
C_noret_decl(f_23051)
static void C_ccall f_23051(C_word c,C_word *av) C_noret;
C_noret_decl(f_23053)
static void f_23053(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_23078)
static void C_ccall f_23078(C_word c,C_word *av) C_noret;
C_noret_decl(f_23091)
static void f_23091(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_23130)
static void C_ccall f_23130(C_word c,C_word *av) C_noret;
C_noret_decl(f_23145)
static void C_ccall f_23145(C_word c,C_word *av) C_noret;
C_noret_decl(f_23166)
static void f_23166(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
C_noret_decl(f_23184)
static void C_ccall f_23184(C_word c,C_word *av) C_noret;
C_noret_decl(f_23193)
static void C_ccall f_23193(C_word c,C_word *av) C_noret;
C_noret_decl(f_23207)
static void f_23207(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_23211)
static void C_ccall f_23211(C_word c,C_word *av) C_noret;
C_noret_decl(f_23214)
static void C_ccall f_23214(C_word c,C_word *av) C_noret;
C_noret_decl(f_23220)
static void C_ccall f_23220(C_word c,C_word *av) C_noret;
C_noret_decl(f_23223)
static void f_23223(C_word t0,C_word t1) C_noret;
C_noret_decl(f_23226)
static void C_ccall f_23226(C_word c,C_word *av) C_noret;
C_noret_decl(f_23243)
static void C_ccall f_23243(C_word c,C_word *av) C_noret;
C_noret_decl(f_23315)
static void C_ccall f_23315(C_word c,C_word *av) C_noret;
C_noret_decl(f_23319)
static void C_ccall f_23319(C_word c,C_word *av) C_noret;
C_noret_decl(f_23323)
static void C_ccall f_23323(C_word c,C_word *av) C_noret;
C_noret_decl(f_23325)
static void f_23325(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_23348)
static void f_23348(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_23377)
static void f_23377(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_23381)
static void f_23381(C_word t0,C_word t1) C_noret;
C_noret_decl(f_23405)
static void f_23405(C_word t0,C_word t1) C_noret;
C_noret_decl(f_23433)
static void C_ccall f_23433(C_word c,C_word *av) C_noret;
C_noret_decl(f_23443)
static void f_23443(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_23453)
static void C_ccall f_23453(C_word c,C_word *av) C_noret;
C_noret_decl(f_23458)
static void f_23458(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_23473)
static void f_23473(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_23493)
static void f_23493(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_23516)
static void f_23516(C_word t0,C_word t1) C_noret;
C_noret_decl(f_23548)
static void C_ccall f_23548(C_word c,C_word *av) C_noret;
C_noret_decl(f_23555)
static void C_ccall f_23555(C_word c,C_word *av) C_noret;
C_noret_decl(f_23557)
static void C_ccall f_23557(C_word c,C_word *av) C_noret;
C_noret_decl(f_23581)
static void C_ccall f_23581(C_word c,C_word *av) C_noret;
C_noret_decl(f_23625)
static void f_23625(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_23638)
static void f_23638(C_word t0,C_word t1) C_noret;
C_noret_decl(f_23652)
static void f_23652(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_23679)
static void f_23679(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_23760)
static void C_ccall f_23760(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_23786)
static void C_ccall f_23786(C_word c,C_word *av) C_noret;
C_noret_decl(f_23795)
static void C_ccall f_23795(C_word c,C_word *av) C_noret;
C_noret_decl(f_23835)
static void f_23835(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
C_noret_decl(f_23838)
static void f_23838(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_23861)
static void C_ccall f_23861(C_word c,C_word *av) C_noret;
C_noret_decl(f_23877)
static void f_23877(C_word t0,C_word t1) C_noret;
C_noret_decl(f_23884)
static void C_ccall f_23884(C_word c,C_word *av) C_noret;
C_noret_decl(f_23904)
static void C_ccall f_23904(C_word c,C_word *av) C_noret;
C_noret_decl(f_23924)
static void C_ccall f_23924(C_word c,C_word *av) C_noret;
C_noret_decl(f_23927)
static void C_ccall f_23927(C_word c,C_word *av) C_noret;
C_noret_decl(f_23928)
static void C_ccall f_23928(C_word c,C_word *av) C_noret;
C_noret_decl(f_23934)
static void C_ccall f_23934(C_word c,C_word *av) C_noret;
C_noret_decl(f_23950)
static void C_ccall f_23950(C_word c,C_word *av) C_noret;
C_noret_decl(f_24078)
static void C_ccall f_24078(C_word c,C_word *av) C_noret;
C_noret_decl(f_24097)
static void C_ccall f_24097(C_word c,C_word *av) C_noret;
C_noret_decl(f_24120)
static void C_ccall f_24120(C_word c,C_word *av) C_noret;
C_noret_decl(f_24121)
static void C_ccall f_24121(C_word c,C_word *av) C_noret;
C_noret_decl(f_24127)
static void C_ccall f_24127(C_word c,C_word *av) C_noret;
C_noret_decl(f_24146)
static void C_ccall f_24146(C_word c,C_word *av) C_noret;
C_noret_decl(f_24147)
static void C_ccall f_24147(C_word c,C_word *av) C_noret;
C_noret_decl(f_24153)
static void C_ccall f_24153(C_word c,C_word *av) C_noret;
C_noret_decl(f_24175)
static void C_ccall f_24175(C_word c,C_word *av) C_noret;
C_noret_decl(f_24181)
static void C_ccall f_24181(C_word c,C_word *av) C_noret;
C_noret_decl(f_24182)
static void C_ccall f_24182(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_24220)
static void C_ccall f_24220(C_word c,C_word *av) C_noret;
C_noret_decl(f_24226)
static void C_ccall f_24226(C_word c,C_word *av) C_noret;
C_noret_decl(f_24228)
static void C_ccall f_24228(C_word c,C_word *av) C_noret;
C_noret_decl(f_24234)
static void C_ccall f_24234(C_word c,C_word *av) C_noret;
C_noret_decl(f_24244)
static void C_ccall f_24244(C_word c,C_word *av) C_noret;
C_noret_decl(f_24250)
static void C_ccall f_24250(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_24280)
static void C_ccall f_24280(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_24293)
static void C_ccall f_24293(C_word c,C_word *av) C_noret;
C_noret_decl(f_24376)
static void f_24376(C_word t0,C_word t1) C_noret;
C_noret_decl(f_24379)
static void f_24379(C_word t0,C_word t1) C_noret;
C_noret_decl(f_24380)
static void C_ccall f_24380(C_word c,C_word *av) C_noret;
C_noret_decl(f_24393)
static void C_ccall f_24393(C_word c,C_word *av) C_noret;
C_noret_decl(f_24399)
static void C_ccall f_24399(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_24417)
static void C_ccall f_24417(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_24452)
static void C_ccall f_24452(C_word c,C_word *av) C_noret;
C_noret_decl(f_24457)
static void C_ccall f_24457(C_word c,C_word *av) C_noret;
C_noret_decl(f_24528)
static void f_24528(C_word t0,C_word t1) C_noret;
C_noret_decl(f_24531)
static void f_24531(C_word t0,C_word t1) C_noret;
C_noret_decl(f_24532)
static void C_ccall f_24532(C_word c,C_word *av) C_noret;
C_noret_decl(f_24545)
static void C_ccall f_24545(C_word c,C_word *av) C_noret;
C_noret_decl(f_24551)
static void C_ccall f_24551(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_24573)
static void C_ccall f_24573(C_word c,C_word *av) C_noret;
C_noret_decl(f_24586)
static void C_ccall f_24586(C_word c,C_word *av) C_noret;
C_noret_decl(f_24607)
static void C_ccall f_24607(C_word c,C_word *av) C_noret;
C_noret_decl(f_24617)
static void C_ccall f_24617(C_word c,C_word *av) C_noret;
C_noret_decl(f_24621)
static void C_ccall f_24621(C_word c,C_word *av) C_noret;
C_noret_decl(f_24627)
static void C_ccall f_24627(C_word c,C_word *av) C_noret;
C_noret_decl(f_24699)
static void C_ccall f_24699(C_word c,C_word *av) C_noret;
C_noret_decl(f_24749)
static void C_ccall f_24749(C_word c,C_word *av) C_noret;
C_noret_decl(f_24762)
static void C_ccall f_24762(C_word c,C_word *av) C_noret;
C_noret_decl(f_24763)
static void C_ccall f_24763(C_word c,C_word *av) C_noret;
C_noret_decl(f_24770)
static void C_ccall f_24770(C_word c,C_word *av) C_noret;
C_noret_decl(f_24778)
static void C_ccall f_24778(C_word c,C_word *av) C_noret;
C_noret_decl(f_24785)
static void C_ccall f_24785(C_word c,C_word *av) C_noret;
C_noret_decl(f_24797)
static void C_ccall f_24797(C_word c,C_word *av) C_noret;
C_noret_decl(f_24798)
static void C_ccall f_24798(C_word c,C_word *av) C_noret;
C_noret_decl(f_24805)
static void C_ccall f_24805(C_word c,C_word *av) C_noret;
C_noret_decl(f_24813)
static void C_ccall f_24813(C_word c,C_word *av) C_noret;
C_noret_decl(f_24820)
static void C_ccall f_24820(C_word c,C_word *av) C_noret;
C_noret_decl(f_24835)
static void C_ccall f_24835(C_word c,C_word *av) C_noret;
C_noret_decl(f_24836)
static void C_ccall f_24836(C_word c,C_word *av) C_noret;
C_noret_decl(f_24840)
static void C_ccall f_24840(C_word c,C_word *av) C_noret;
C_noret_decl(f_24846)
static void C_ccall f_24846(C_word c,C_word *av) C_noret;
C_noret_decl(f_24853)
static void C_ccall f_24853(C_word c,C_word *av) C_noret;
C_noret_decl(f_24862)
static void C_ccall f_24862(C_word c,C_word *av) C_noret;
C_noret_decl(f_24872)
static void C_ccall f_24872(C_word c,C_word *av) C_noret;
C_noret_decl(f_24876)
static void C_ccall f_24876(C_word c,C_word *av) C_noret;
C_noret_decl(f_24881)
static void C_ccall f_24881(C_word c,C_word *av) C_noret;
C_noret_decl(f_24898)
static void C_ccall f_24898(C_word c,C_word *av) C_noret;
C_noret_decl(f_24907)
static void C_ccall f_24907(C_word c,C_word *av) C_noret;
C_noret_decl(f_24918)
static void C_ccall f_24918(C_word c,C_word *av) C_noret;
C_noret_decl(f_24919)
static void C_ccall f_24919(C_word c,C_word *av) C_noret;
C_noret_decl(f_24923)
static void C_ccall f_24923(C_word c,C_word *av) C_noret;
C_noret_decl(f_24934)
static void C_ccall f_24934(C_word c,C_word *av) C_noret;
C_noret_decl(f_24941)
static void C_ccall f_24941(C_word c,C_word *av) C_noret;
C_noret_decl(f_24953)
static void C_ccall f_24953(C_word c,C_word *av) C_noret;
C_noret_decl(f_24956)
static void C_ccall f_24956(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_24968)
static void f_24968(C_word t0,C_word t1) C_noret;
C_noret_decl(f_24971)
static void C_ccall f_24971(C_word c,C_word *av) C_noret;
C_noret_decl(f_24972)
static void C_ccall f_24972(C_word c,C_word *av) C_noret;
C_noret_decl(f_25029)
static void C_ccall f_25029(C_word c,C_word *av) C_noret;
C_noret_decl(f_25030)
static void C_ccall f_25030(C_word c,C_word *av) C_noret;
C_noret_decl(f_25036)
static void C_ccall f_25036(C_word c,C_word *av) C_noret;
C_noret_decl(f_25072)
static void C_ccall f_25072(C_word c,C_word *av) C_noret;
C_noret_decl(f_25077)
static void C_ccall f_25077(C_word c,C_word *av) C_noret;
C_noret_decl(f_25109)
static void C_ccall f_25109(C_word c,C_word *av) C_noret;
C_noret_decl(f_25112)
static void f_25112(C_word t0,C_word t1) C_noret;
C_noret_decl(f_25113)
static void C_ccall f_25113(C_word c,C_word *av) C_noret;
C_noret_decl(f_25117)
static void C_ccall f_25117(C_word c,C_word *av) C_noret;
C_noret_decl(f_25135)
static void f_25135(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_25148)
static void C_ccall f_25148(C_word c,C_word *av) C_noret;
C_noret_decl(f_25162)
static void C_ccall f_25162(C_word c,C_word *av) C_noret;
C_noret_decl(f_25166)
static void C_ccall f_25166(C_word c,C_word *av) C_noret;
C_noret_decl(f_25180)
static void C_ccall f_25180(C_word c,C_word *av) C_noret;
C_noret_decl(f_25186)
static void C_ccall f_25186(C_word c,C_word *av) C_noret;
C_noret_decl(f_25199)
static void C_ccall f_25199(C_word c,C_word *av) C_noret;
C_noret_decl(f_25206)
static void C_ccall f_25206(C_word c,C_word *av) C_noret;
C_noret_decl(f_25213)
static void C_ccall f_25213(C_word c,C_word *av) C_noret;
C_noret_decl(f_25235)
static void C_ccall f_25235(C_word c,C_word *av) C_noret;
C_noret_decl(f_25239)
static void C_ccall f_25239(C_word c,C_word *av) C_noret;
C_noret_decl(f_25326)
static void C_ccall f_25326(C_word c,C_word *av) C_noret;
C_noret_decl(f_25327)
static void C_ccall f_25327(C_word c,C_word *av) C_noret;
C_noret_decl(f_25375)
static void C_ccall f_25375(C_word c,C_word *av) C_noret;
C_noret_decl(f_25435)
static void C_ccall f_25435(C_word c,C_word *av) C_noret;
C_noret_decl(f_25470)
static void C_ccall f_25470(C_word c,C_word *av) C_noret;
C_noret_decl(f_25670)
static void C_ccall f_25670(C_word c,C_word *av) C_noret;
C_noret_decl(f_25690)
static void C_ccall f_25690(C_word c,C_word *av) C_noret;
C_noret_decl(f_25699)
static void C_ccall f_25699(C_word c,C_word *av) C_noret;
C_noret_decl(f_25705)
static void C_ccall f_25705(C_word c,C_word *av) C_noret;
C_noret_decl(f_25711)
static void C_ccall f_25711(C_word c,C_word *av) C_noret;
C_noret_decl(f_25728)
static void C_ccall f_25728(C_word c,C_word *av) C_noret;
C_noret_decl(f_25765)
static void C_ccall f_25765(C_word c,C_word *av) C_noret;
C_noret_decl(f_25774)
static void C_ccall f_25774(C_word c,C_word *av) C_noret;
C_noret_decl(f_25780)
static void C_ccall f_25780(C_word c,C_word *av) C_noret;
C_noret_decl(f_25786)
static void C_ccall f_25786(C_word c,C_word *av) C_noret;
C_noret_decl(f_25820)
static void C_ccall f_25820(C_word c,C_word *av) C_noret;
C_noret_decl(f_25850)
static void C_ccall f_25850(C_word c,C_word *av) C_noret;
C_noret_decl(f_25857)
static void C_ccall f_25857(C_word c,C_word *av) C_noret;
C_noret_decl(f_25894)
static void C_ccall f_25894(C_word c,C_word *av) C_noret;
C_noret_decl(f_25901)
static void C_ccall f_25901(C_word c,C_word *av) C_noret;
C_noret_decl(f_25908)
static void f_25908(C_word t0,C_word t1) C_noret;
C_noret_decl(f_25917)
static void f_25917(C_word t0,C_word t1) C_noret;
C_noret_decl(f_25936)
static void C_ccall f_25936(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_25960)
static void C_ccall f_25960(C_word c,C_word *av) C_noret;
C_noret_decl(f_25981)
static void C_ccall f_25981(C_word c,C_word *av) C_noret;
C_noret_decl(f_26001)
static void C_ccall f_26001(C_word c,C_word *av) C_noret;
C_noret_decl(f_26008)
static void C_ccall f_26008(C_word c,C_word *av) C_noret;
C_noret_decl(f_26015)
static void f_26015(C_word t0,C_word t1) C_noret;
C_noret_decl(f_26034)
static void C_ccall f_26034(C_word c,C_word *av) C_noret;
C_noret_decl(f_26041)
static void C_ccall f_26041(C_word c,C_word *av) C_noret;
C_noret_decl(f_26048)
static void f_26048(C_word t0,C_word t1) C_noret;
C_noret_decl(f_26071)
static void C_ccall f_26071(C_word c,C_word *av) C_noret;
C_noret_decl(f_26092)
static void C_ccall f_26092(C_word c,C_word *av) C_noret;
C_noret_decl(f_26099)
static void C_ccall f_26099(C_word c,C_word *av) C_noret;
C_noret_decl(f_26106)
static void C_ccall f_26106(C_word c,C_word *av) C_noret;
C_noret_decl(f_26113)
static void f_26113(C_word t0,C_word t1) C_noret;
C_noret_decl(f_26122)
static void f_26122(C_word t0,C_word t1) C_noret;
C_noret_decl(f_26142)
static void C_ccall f_26142(C_word c,C_word *av) C_noret;
C_noret_decl(f_26158)
static void C_ccall f_26158(C_word c,C_word *av) C_noret;
C_noret_decl(f_26175)
static void C_ccall f_26175(C_word c,C_word *av) C_noret;
C_noret_decl(f_26195)
static void C_ccall f_26195(C_word c,C_word *av) C_noret;
C_noret_decl(f_26199)
static void C_ccall f_26199(C_word c,C_word *av) C_noret;
C_noret_decl(f_26202)
static void C_ccall f_26202(C_word c,C_word *av) C_noret;
C_noret_decl(f_26208)
static void f_26208(C_word t0,C_word t1) C_noret;
C_noret_decl(f_26253)
static void C_ccall f_26253(C_word c,C_word *av) C_noret;
C_noret_decl(f_26317)
static void C_ccall f_26317(C_word c,C_word *av) C_noret;
C_noret_decl(f_26334)
static void C_ccall f_26334(C_word c,C_word *av) C_noret;
C_noret_decl(f_26336)
static void f_26336(C_word t0,C_word t1,C_word t2) 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_26352)
static void C_ccall f_26352(C_word c,C_word *av) C_noret;
C_noret_decl(f_26358)
static void C_ccall f_26358(C_word c,C_word *av) C_noret;
C_noret_decl(f_26374)
static void C_ccall f_26374(C_word c,C_word *av) C_noret;
C_noret_decl(f_26380)
static void C_ccall f_26380(C_word c,C_word *av) C_noret;
C_noret_decl(f_26402)
static void C_ccall f_26402(C_word c,C_word *av) 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_26433)
static void C_ccall f_26433(C_word c,C_word *av) C_noret;
C_noret_decl(f_26435)
static void f_26435(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_26445)
static void C_ccall f_26445(C_word c,C_word *av) C_noret;
C_noret_decl(f_26451)
static void C_ccall f_26451(C_word c,C_word *av) C_noret;
C_noret_decl(f_26457)
static void C_ccall f_26457(C_word c,C_word *av) C_noret;
C_noret_decl(f_26473)
static void C_ccall f_26473(C_word c,C_word *av) C_noret;
C_noret_decl(f_26531)
static void C_ccall f_26531(C_word c,C_word *av) C_noret;
C_noret_decl(f_26557)
static void f_26557(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_26559)
static void C_ccall f_26559(C_word c,C_word *av) C_noret;
C_noret_decl(f_26572)
static void C_ccall f_26572(C_word c,C_word *av) C_noret;
C_noret_decl(f_26591)
static void C_ccall f_26591(C_word c,C_word *av) C_noret;
C_noret_decl(f_26600)
static void C_ccall f_26600(C_word c,C_word *av) C_noret;
C_noret_decl(f_26606)
static void C_ccall f_26606(C_word c,C_word *av) C_noret;
C_noret_decl(f_26612)
static void C_ccall f_26612(C_word c,C_word *av) C_noret;
C_noret_decl(f_26618)
static void C_ccall f_26618(C_word c,C_word *av) C_noret;
C_noret_decl(f_26770)
static void f_26770(C_word t0,C_word t1) C_noret;
C_noret_decl(f_26782)
static void f_26782(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_26832)
static void f_26832(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_26850)
static void C_ccall f_26850(C_word c,C_word *av) C_noret;
C_noret_decl(f_26861)
static void f_26861(C_word t0,C_word t1) C_noret;
C_noret_decl(f_26867)
static void C_ccall f_26867(C_word c,C_word *av) C_noret;
C_noret_decl(f_26879)
static void C_ccall f_26879(C_word c,C_word *av) C_noret;
C_noret_decl(f_26881)
static void f_26881(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_26891)
static void f_26891(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_26894)
static void f_26894(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_26920)
static void C_ccall f_26920(C_word c,C_word *av) C_noret;
C_noret_decl(f_26941)
static void C_ccall f_26941(C_word c,C_word *av) C_noret;
C_noret_decl(f_26945)
static void C_ccall f_26945(C_word c,C_word *av) C_noret;
C_noret_decl(f_26958)
static void C_ccall f_26958(C_word c,C_word *av) C_noret;
C_noret_decl(f_26960)
static void f_26960(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_26985)
static void C_ccall f_26985(C_word c,C_word *av) C_noret;
C_noret_decl(f_27009)
static void C_ccall f_27009(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_27024)
static void f_27024(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_27049)
static void C_ccall f_27049(C_word c,C_word *av) C_noret;
C_noret_decl(f_27071)
static void C_ccall f_27071(C_word c,C_word *av) C_noret;
C_noret_decl(f_27079)
static void C_ccall f_27079(C_word c,C_word *av) C_noret;
C_noret_decl(f_27092)
static void C_ccall f_27092(C_word c,C_word *av) C_noret;
C_noret_decl(f_27094)
static void f_27094(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_27119)
static void C_ccall f_27119(C_word c,C_word *av) C_noret;
C_noret_decl(f_27139)
static void C_ccall f_27139(C_word c,C_word *av) C_noret;
C_noret_decl(f_27149)
static void C_ccall f_27149(C_word c,C_word *av) C_noret;
C_noret_decl(f_27164)
static void C_ccall f_27164(C_word c,C_word *av) C_noret;
C_noret_decl(f_27177)
static void C_ccall f_27177(C_word c,C_word *av) C_noret;
C_noret_decl(f_27179)
static void f_27179(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_27204)
static void C_ccall f_27204(C_word c,C_word *av) C_noret;
C_noret_decl(f_27326)
static void C_ccall f_27326(C_word c,C_word *av) C_noret;
C_noret_decl(f_27328)
static void C_ccall f_27328(C_word c,C_word *av) C_noret;
C_noret_decl(f_27346)
static void C_ccall f_27346(C_word c,C_word *av) C_noret;
C_noret_decl(f_27348)
static void f_27348(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_27381)
static void f_27381(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_27433)
static C_word f_27433(C_word *a,C_word t0,C_word t1);
C_noret_decl(f_27469)
static void C_ccall f_27469(C_word c,C_word *av) C_noret;
C_noret_decl(f_27477)
static void C_ccall f_27477(C_word c,C_word *av) C_noret;
C_noret_decl(f_27481)
static void C_ccall f_27481(C_word c,C_word *av) C_noret;
C_noret_decl(f_27483)
static void f_27483(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_27497)
static void C_ccall f_27497(C_word c,C_word *av) C_noret;
C_noret_decl(f_27501)
static void C_ccall f_27501(C_word c,C_word *av) C_noret;
C_noret_decl(f_27505)
static void C_ccall f_27505(C_word c,C_word *av) C_noret;
C_noret_decl(f_27518)
static void C_ccall f_27518(C_word c,C_word *av) C_noret;
C_noret_decl(f_27522)
static void C_ccall f_27522(C_word c,C_word *av) C_noret;
C_noret_decl(f_27526)
static void C_ccall f_27526(C_word c,C_word *av) C_noret;
C_noret_decl(f_27670)
static void f_27670(C_word t0,C_word t1,C_word t2) 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_27682)
static void C_ccall f_27682(C_word c,C_word *av) C_noret;
C_noret_decl(f_27684)
static void f_27684(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_27698)
static void C_ccall f_27698(C_word c,C_word *av) C_noret;
C_noret_decl(f_27711)
static void C_ccall f_27711(C_word c,C_word *av) C_noret;
C_noret_decl(f_27715)
static void C_ccall f_27715(C_word c,C_word *av) C_noret;
C_noret_decl(f_27761)
static void f_27761(C_word t0,C_word t1) C_noret;
C_noret_decl(f_27764)
static void f_27764(C_word t0,C_word t1) C_noret;
C_noret_decl(f_27771)
static void f_27771(C_word t0,C_word t1) C_noret;
C_noret_decl(f_27866)
static void C_ccall f_27866(C_word c,C_word *av) C_noret;
C_noret_decl(f_27874)
static void C_ccall f_27874(C_word c,C_word *av) C_noret;
C_noret_decl(f_27878)
static void C_ccall f_27878(C_word c,C_word *av) C_noret;
C_noret_decl(f_27880)
static void f_27880(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_27897)
static void C_ccall f_27897(C_word c,C_word *av) C_noret;
C_noret_decl(f_27992)
static void f_27992(C_word t0,C_word t1) C_noret;
C_noret_decl(f_28000)
static void C_ccall f_28000(C_word c,C_word *av) C_noret;
C_noret_decl(f_28002)
static void f_28002(C_word t0,C_word t1) C_noret;
C_noret_decl(f_28010)
static void C_ccall f_28010(C_word c,C_word *av) C_noret;
C_noret_decl(f_28012)
static void f_28012(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_28026)
static void C_ccall f_28026(C_word c,C_word *av) C_noret;
C_noret_decl(f_28032)
static void f_28032(C_word t0,C_word t1) C_noret;
C_noret_decl(f_28041)
static void C_ccall f_28041(C_word c,C_word *av) C_noret;
C_noret_decl(f_28045)
static void C_ccall f_28045(C_word c,C_word *av) C_noret;
C_noret_decl(f_28049)
static void C_ccall f_28049(C_word c,C_word *av) C_noret;
C_noret_decl(f_28053)
static void C_ccall f_28053(C_word c,C_word *av) C_noret;
C_noret_decl(f_28077)
static void C_ccall f_28077(C_word c,C_word *av) C_noret;
C_noret_decl(f_28087)
static void C_ccall f_28087(C_word c,C_word *av) C_noret;
C_noret_decl(f_28096)
static void C_ccall f_28096(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_28104)
static void C_ccall f_28104(C_word c,C_word *av) C_noret;
C_noret_decl(f_28108)
static void C_ccall f_28108(C_word c,C_word *av) C_noret;
C_noret_decl(f_28118)
static void C_ccall f_28118(C_word c,C_word *av) C_noret;
C_noret_decl(f_28133)
static void C_ccall f_28133(C_word c,C_word *av) C_noret;
C_noret_decl(f_28137)
static void C_ccall f_28137(C_word c,C_word *av) C_noret;
C_noret_decl(f_28140)
static void C_ccall f_28140(C_word c,C_word *av) C_noret;
C_noret_decl(f_28143)
static void C_ccall f_28143(C_word c,C_word *av) C_noret;
C_noret_decl(f_28152)
static void f_28152(C_word t0,C_word t1) C_noret;
C_noret_decl(f_28155)
static void f_28155(C_word t0,C_word t1) C_noret;
C_noret_decl(f_28164)
static void C_ccall f_28164(C_word c,C_word *av) C_noret;
C_noret_decl(f_28167)
static void C_ccall f_28167(C_word c,C_word *av) C_noret;
C_noret_decl(f_28175)
static void f_28175(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) 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_28223)
static void C_ccall f_28223(C_word c,C_word *av) C_noret;
C_noret_decl(f_28226)
static void C_ccall f_28226(C_word c,C_word *av) C_noret;
C_noret_decl(f_28334)
static void C_ccall f_28334(C_word c,C_word *av) C_noret;
C_noret_decl(f_28351)
static void C_ccall f_28351(C_word c,C_word *av) C_noret;
C_noret_decl(f_28355)
static void C_ccall f_28355(C_word c,C_word *av) C_noret;
C_noret_decl(f_28356)
static void C_ccall f_28356(C_word c,C_word *av) C_noret;
C_noret_decl(f_28364)
static void C_ccall f_28364(C_word c,C_word *av) C_noret;
C_noret_decl(f_28379)
static void C_ccall f_28379(C_word c,C_word *av) C_noret;
C_noret_decl(f_28383)
static void C_ccall f_28383(C_word c,C_word *av) C_noret;
C_noret_decl(f_28386)
static void C_ccall f_28386(C_word c,C_word *av) C_noret;
C_noret_decl(f_28395)
static void C_ccall f_28395(C_word c,C_word *av) C_noret;
C_noret_decl(f_28401)
static void C_ccall f_28401(C_word c,C_word *av) C_noret;
C_noret_decl(f_28409)
static void f_28409(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_28422)
static void C_ccall f_28422(C_word c,C_word *av) C_noret;
C_noret_decl(f_28472)
static void C_ccall f_28472(C_word c,C_word *av) C_noret;
C_noret_decl(f_28482)
static void C_ccall f_28482(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_28499)
static void C_ccall f_28499(C_word c,C_word *av) C_noret;
C_noret_decl(f_28502)
static void C_ccall f_28502(C_word c,C_word *av) C_noret;
C_noret_decl(f_28554)
static void C_ccall f_28554(C_word c,C_word *av) C_noret;
C_noret_decl(f_28561)
static void C_ccall f_28561(C_word c,C_word *av) C_noret;
C_noret_decl(f_28565)
static void C_ccall f_28565(C_word c,C_word *av) C_noret;
C_noret_decl(f_28566)
static void C_ccall f_28566(C_word c,C_word *av) C_noret;
C_noret_decl(f_28574)
static void C_ccall f_28574(C_word c,C_word *av) C_noret;
C_noret_decl(f_28589)
static void C_ccall f_28589(C_word c,C_word *av) C_noret;
C_noret_decl(f_28593)
static void C_ccall f_28593(C_word c,C_word *av) C_noret;
C_noret_decl(f_28596)
static void C_ccall f_28596(C_word c,C_word *av) C_noret;
C_noret_decl(f_28610)
static void C_ccall f_28610(C_word c,C_word *av) C_noret;
C_noret_decl(f_28614)
static void C_ccall f_28614(C_word c,C_word *av) C_noret;
C_noret_decl(f_28618)
static void C_ccall f_28618(C_word c,C_word *av) C_noret;
C_noret_decl(f_28626)
static void C_ccall f_28626(C_word c,C_word *av) C_noret;
C_noret_decl(f_28665)
static void C_ccall f_28665(C_word c,C_word *av) C_noret;
C_noret_decl(f_28669)
static void C_ccall f_28669(C_word c,C_word *av) C_noret;
C_noret_decl(f_28674)
static void C_ccall f_28674(C_word c,C_word *av) C_noret;
C_noret_decl(f_28708)
static void C_ccall f_28708(C_word c,C_word *av) C_noret;
C_noret_decl(f_28715)
static void C_ccall f_28715(C_word c,C_word *av) C_noret;
C_noret_decl(f_28723)
static void C_ccall f_28723(C_word c,C_word *av) C_noret;
C_noret_decl(f_28725)
static void C_ccall f_28725(C_word c,C_word *av) C_noret;
C_noret_decl(f_28746)
static void C_ccall f_28746(C_word c,C_word *av) C_noret;
C_noret_decl(f_28758)
static void f_28758(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_28764)
static void f_28764(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_28791)
static void C_ccall f_28791(C_word c,C_word *av) C_noret;
C_noret_decl(f_28816)
static void C_ccall f_28816(C_word c,C_word *av) C_noret;
C_noret_decl(f_28842)
static void C_ccall f_28842(C_word c,C_word *av) C_noret;
C_noret_decl(f_28906)
static void C_ccall f_28906(C_word c,C_word *av) C_noret;
C_noret_decl(f_28938)
static void f_28938(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_28968)
static void C_ccall f_28968(C_word c,C_word *av) C_noret;
C_noret_decl(f_28989)
static void C_ccall f_28989(C_word c,C_word *av) C_noret;
C_noret_decl(f_28993)
static void C_ccall f_28993(C_word c,C_word *av) C_noret;
C_noret_decl(f_28998)
static void C_ccall f_28998(C_word c,C_word *av) C_noret;
C_noret_decl(f_29006)
static void C_ccall f_29006(C_word c,C_word *av) C_noret;
C_noret_decl(f_29008)
static void C_ccall f_29008(C_word c,C_word *av) C_noret;
C_noret_decl(f_29024)
static void C_ccall f_29024(C_word c,C_word *av) C_noret;
C_noret_decl(f_29028)
static void C_ccall f_29028(C_word c,C_word *av) C_noret;
C_noret_decl(f_29034)
static void f_29034(C_word t0,C_word t1) C_noret;
C_noret_decl(f_29039)
static void C_ccall f_29039(C_word c,C_word *av) C_noret;
C_noret_decl(f_29053)
static void C_ccall f_29053(C_word c,C_word *av) C_noret;
C_noret_decl(f_29097)
static void C_ccall f_29097(C_word c,C_word *av) C_noret;
C_noret_decl(f_29105)
static void f_29105(C_word t0,C_word t1) C_noret;
C_noret_decl(f_29107)
static void f_29107(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_29148)
static void C_ccall f_29148(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_29222)
static void C_ccall f_29222(C_word c,C_word *av) C_noret;
C_noret_decl(f_29235)
static void f_29235(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29265)
static void C_ccall f_29265(C_word c,C_word *av) C_noret;
C_noret_decl(f_29273)
static void C_ccall f_29273(C_word c,C_word *av) C_noret;
C_noret_decl(f_29277)
static void C_ccall f_29277(C_word c,C_word *av) C_noret;
C_noret_decl(f_29279)
static void f_29279(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_29298)
static void C_ccall f_29298(C_word c,C_word *av) C_noret;
C_noret_decl(f_29322)
static void C_ccall f_29322(C_word c,C_word *av) C_noret;
C_noret_decl(f_29339)
static void C_ccall f_29339(C_word c,C_word *av) C_noret;
C_noret_decl(f_29346)
static void C_ccall f_29346(C_word c,C_word *av) C_noret;
C_noret_decl(f_29369)
static void C_ccall f_29369(C_word c,C_word *av) C_noret;
C_noret_decl(f_29390)
static void C_ccall f_29390(C_word c,C_word *av) C_noret;
C_noret_decl(f_29392)
static void f_29392(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29402)
static void f_29402(C_word t0,C_word t1) C_noret;
C_noret_decl(f_29429)
static void C_ccall f_29429(C_word c,C_word *av) C_noret;
C_noret_decl(f_29459)
static void C_ccall f_29459(C_word c,C_word *av) C_noret;
C_noret_decl(f_29464)
static void f_29464(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_29476)
static void f_29476(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_29496)
static void C_ccall f_29496(C_word c,C_word *av) C_noret;
C_noret_decl(f_29534)
static void C_ccall f_29534(C_word c,C_word *av) C_noret;
C_noret_decl(f_29542)
static void C_ccall f_29542(C_word c,C_word *av) C_noret;
C_noret_decl(f_29578)
static void C_ccall f_29578(C_word c,C_word *av) C_noret;
C_noret_decl(f_29592)
static void f_29592(C_word t0,C_word t1) C_noret;
C_noret_decl(f_29596)
static void C_ccall f_29596(C_word c,C_word *av) C_noret;
C_noret_decl(f_29599)
static void C_ccall f_29599(C_word c,C_word *av) C_noret;
C_noret_decl(f_29604)
static void f_29604(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29614)
static void C_ccall f_29614(C_word c,C_word *av) C_noret;
C_noret_decl(f_29625)
static void C_ccall f_29625(C_word c,C_word *av) C_noret;
C_noret_decl(f_29628)
static void C_ccall f_29628(C_word c,C_word *av) C_noret;
C_noret_decl(f_29635)
static void C_ccall f_29635(C_word c,C_word *av) C_noret;
C_noret_decl(f_29647)
static void C_ccall f_29647(C_word c,C_word *av) C_noret;
C_noret_decl(f_29662)
static void C_ccall f_29662(C_word c,C_word *av) C_noret;
C_noret_decl(f_29672)
static void C_ccall f_29672(C_word c,C_word *av) C_noret;
C_noret_decl(f_29676)
static void C_ccall f_29676(C_word c,C_word *av) C_noret;
C_noret_decl(f_29679)
static void C_ccall f_29679(C_word c,C_word *av) C_noret;
C_noret_decl(f_29684)
static void f_29684(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29707)
static void f_29707(C_word t0,C_word t1) C_noret;
C_noret_decl(f_29710)
static void C_ccall f_29710(C_word c,C_word *av) C_noret;
C_noret_decl(f_29717)
static void C_ccall f_29717(C_word c,C_word *av) C_noret;
C_noret_decl(f_29722)
static void f_29722(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29732)
static void C_ccall f_29732(C_word c,C_word *av) C_noret;
C_noret_decl(f_29752)
static void f_29752(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29762)
static void C_ccall f_29762(C_word c,C_word *av) C_noret;
C_noret_decl(f_29804)
static void C_ccall f_29804(C_word c,C_word *av) C_noret;
C_noret_decl(f_29811)
static void C_ccall f_29811(C_word c,C_word *av) C_noret;
C_noret_decl(f_29816)
static void f_29816(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29826)
static void C_ccall f_29826(C_word c,C_word *av) C_noret;
C_noret_decl(f_29846)
static void C_ccall f_29846(C_word c,C_word *av) C_noret;
C_noret_decl(f_29849)
static void C_ccall f_29849(C_word c,C_word *av) C_noret;
C_noret_decl(f_29852)
static void C_ccall f_29852(C_word c,C_word *av) C_noret;
C_noret_decl(f_29861)
static void C_ccall f_29861(C_word c,C_word *av) C_noret;
C_noret_decl(f_29866)
static void f_29866(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29876)
static void C_ccall f_29876(C_word c,C_word *av) C_noret;
C_noret_decl(f_29900)
static void C_ccall f_29900(C_word c,C_word *av) C_noret;
C_noret_decl(f_29903)
static void C_ccall f_29903(C_word c,C_word *av) C_noret;
C_noret_decl(f_29904)
static void f_29904(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29908)
static void C_ccall f_29908(C_word c,C_word *av) C_noret;
C_noret_decl(f_29920)
static void C_ccall f_29920(C_word c,C_word *av) C_noret;
C_noret_decl(f_29925)
static void f_29925(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29935)
static void C_ccall f_29935(C_word c,C_word *av) C_noret;
C_noret_decl(f_29959)
static void f_29959(C_word t0,C_word t1) C_noret;
C_noret_decl(f_29962)
static void C_ccall f_29962(C_word c,C_word *av) C_noret;
C_noret_decl(f_29973)
static void f_29973(C_word t0,C_word t1) C_noret;
C_noret_decl(f_29976)
static void C_ccall f_29976(C_word c,C_word *av) C_noret;
C_noret_decl(f_29983)
static void C_ccall f_29983(C_word c,C_word *av) C_noret;
C_noret_decl(f_29988)
static void f_29988(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_29998)
static void C_ccall f_29998(C_word c,C_word *av) C_noret;
C_noret_decl(f_30056)
static void f_30056(C_word t0,C_word t1) C_noret;
C_noret_decl(f_30059)
static void C_ccall f_30059(C_word c,C_word *av) C_noret;
C_noret_decl(f_30062)
static void C_ccall f_30062(C_word c,C_word *av) C_noret;
C_noret_decl(f_30069)
static void C_ccall f_30069(C_word c,C_word *av) C_noret;
C_noret_decl(f_30073)
static void C_ccall f_30073(C_word c,C_word *av) C_noret;
C_noret_decl(f_30086)
static void C_ccall f_30086(C_word c,C_word *av) C_noret;
C_noret_decl(f_30099)
static void C_ccall f_30099(C_word c,C_word *av) C_noret;
C_noret_decl(f_30102)
static void C_ccall f_30102(C_word c,C_word *av) C_noret;
C_noret_decl(f_30109)
static void C_ccall f_30109(C_word c,C_word *av) C_noret;
C_noret_decl(f_30120)
static void f_30120(C_word t0,C_word t1) C_noret;
C_noret_decl(f_30129)
static void f_30129(C_word t0,C_word t1) C_noret;
C_noret_decl(f_30132)
static void C_ccall f_30132(C_word c,C_word *av) C_noret;
C_noret_decl(f_30135)
static void C_ccall f_30135(C_word c,C_word *av) C_noret;
C_noret_decl(f_30142)
static void C_ccall f_30142(C_word c,C_word *av) C_noret;
C_noret_decl(f_30167)
static void C_ccall f_30167(C_word c,C_word *av) C_noret;
C_noret_decl(f_30205)
static void C_ccall f_30205(C_word c,C_word *av) C_noret;
C_noret_decl(f_30208)
static void C_ccall f_30208(C_word c,C_word *av) C_noret;
C_noret_decl(f_30211)
static void C_ccall f_30211(C_word c,C_word *av) C_noret;
C_noret_decl(f_30218)
static void C_ccall f_30218(C_word c,C_word *av) C_noret;
C_noret_decl(f_30223)
static void f_30223(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_30233)
static void C_ccall f_30233(C_word c,C_word *av) C_noret;
C_noret_decl(f_30269)
static void C_ccall f_30269(C_word c,C_word *av) C_noret;
C_noret_decl(f_30433)
static void C_ccall f_30433(C_word c,C_word *av) C_noret;
C_noret_decl(f_30446)
static void C_ccall f_30446(C_word c,C_word *av) C_noret;
C_noret_decl(f_30456)
static void C_ccall f_30456(C_word c,C_word *av) C_noret;
C_noret_decl(f_30467)
static void C_ccall f_30467(C_word c,C_word *av) C_noret;
C_noret_decl(f_30471)
static void C_ccall f_30471(C_word c,C_word *av) C_noret;
C_noret_decl(f_30473)
static void f_30473(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_30504)
static void C_ccall f_30504(C_word c,C_word *av) C_noret;
C_noret_decl(f_30551)
static void C_ccall f_30551(C_word c,C_word *av) C_noret;
C_noret_decl(f_30571)
static void C_ccall f_30571(C_word c,C_word *av) C_noret;
C_noret_decl(f_30581)
static void f_30581(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_30608)
static void C_ccall f_30608(C_word c,C_word *av) C_noret;
C_noret_decl(f_30630)
static void f_30630(C_word t0,C_word t1) C_noret;
C_noret_decl(f_30732)
static void C_ccall f_30732(C_word c,C_word *av) C_noret;
C_noret_decl(f_31197)
static void C_ccall f_31197(C_word c,C_word *av) C_noret;
C_noret_decl(f_31492)
static void C_ccall f_31492(C_word c,C_word *av) C_noret;
C_noret_decl(f_31495)
static void C_ccall f_31495(C_word c,C_word *av) C_noret;
C_noret_decl(f_31592)
static void C_ccall f_31592(C_word c,C_word *av) C_noret;
C_noret_decl(f_31596)
static void C_ccall f_31596(C_word c,C_word *av) C_noret;
C_noret_decl(f_31599)
static void C_ccall f_31599(C_word c,C_word *av) C_noret;
C_noret_decl(f_31602)
static void C_ccall f_31602(C_word c,C_word *av) C_noret;
C_noret_decl(f_31605)
static void C_ccall f_31605(C_word c,C_word *av) C_noret;
C_noret_decl(f_31608)
static void C_ccall f_31608(C_word c,C_word *av) C_noret;
C_noret_decl(f_7738)
static void C_ccall f_7738(C_word c,C_word *av) C_noret;
C_noret_decl(f_7741)
static void C_ccall f_7741(C_word c,C_word *av) C_noret;
C_noret_decl(f_7749)
static void f_7749(C_word t0,C_word t1) C_noret;
C_noret_decl(f_7753)
static void C_ccall f_7753(C_word c,C_word *av) C_noret;
C_noret_decl(f_7756)
static void C_ccall f_7756(C_word c,C_word *av) C_noret;
C_noret_decl(f_7762)
static void C_ccall f_7762(C_word c,C_word *av) C_noret;
C_noret_decl(f_7804)
static void C_ccall f_7804(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_7831)
static void f_7831(C_word t0,C_word t1) C_noret;
C_noret_decl(f_7839)
static void C_ccall f_7839(C_word c,C_word *av) C_noret;
C_noret_decl(f_7852)
static void C_ccall f_7852(C_word c,C_word *av) C_noret;
C_noret_decl(f_7854)
static void f_7854(C_word t0,C_word t1) C_noret;
C_noret_decl(f_7861)
static void C_ccall f_7861(C_word c,C_word *av) C_noret;
C_noret_decl(f_7863)
static void f_7863(C_word t0,C_word t1) C_noret;
C_noret_decl(f_7877)
static void C_ccall f_7877(C_word c,C_word *av) C_noret;
C_noret_decl(f_7895)
static void C_ccall f_7895(C_word c,C_word *av) C_noret;
C_noret_decl(f_7901)
static void C_ccall f_7901(C_word c,C_word *av) C_noret;
C_noret_decl(f_7926)
static void C_ccall f_7926(C_word c,C_word *av) C_noret;
C_noret_decl(f_7972)
static void C_ccall f_7972(C_word c,C_word *av) C_noret;
C_noret_decl(f_7985)
static void C_ccall f_7985(C_word c,C_word *av) C_noret;
C_noret_decl(f_7987)
static void C_ccall f_7987(C_word c,C_word *av) C_noret;
C_noret_decl(f_7991)
static void C_ccall f_7991(C_word c,C_word *av) C_noret;
C_noret_decl(f_8012)
static void C_ccall f_8012(C_word c,C_word *av) C_noret;
C_noret_decl(f_8016)
static void C_ccall f_8016(C_word c,C_word *av) C_noret;
C_noret_decl(f_8041)
static void C_ccall f_8041(C_word c,C_word *av) C_noret;
C_noret_decl(f_8045)
static void C_ccall f_8045(C_word c,C_word *av) C_noret;
C_noret_decl(f_8070)
static void C_ccall f_8070(C_word c,C_word *av) C_noret;
C_noret_decl(f_8074)
static void C_ccall f_8074(C_word c,C_word *av) C_noret;
C_noret_decl(f_8163)
static void f_8163(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_8231)
static void f_8231(C_word t0,C_word t1) C_noret;
C_noret_decl(f_8273)
static void C_ccall f_8273(C_word c,C_word *av) C_noret;
C_noret_decl(f_8275)
static void f_8275(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_8345)
static void C_ccall f_8345(C_word c,C_word *av) C_noret;
C_noret_decl(f_8347)
static void C_ccall f_8347(C_word c,C_word *av) C_noret;
C_noret_decl(f_8351)
static void C_ccall f_8351(C_word c,C_word *av) C_noret;
C_noret_decl(f_8408)
static void C_ccall f_8408(C_word c,C_word *av) C_noret;
C_noret_decl(f_8410)
static void C_ccall f_8410(C_word c,C_word *av) C_noret;
C_noret_decl(f_8414)
static void C_ccall f_8414(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_8581)
static void C_ccall f_8581(C_word c,C_word *av) C_noret;
C_noret_decl(f_8615)
static void C_ccall f_8615(C_word c,C_word *av) C_noret;
C_noret_decl(f_8621)
static void f_8621(C_word t0,C_word t1) C_noret;
C_noret_decl(f_8655)
static void C_ccall f_8655(C_word c,C_word *av) C_noret;
C_noret_decl(f_8669)
static void C_ccall f_8669(C_word c,C_word *av) C_noret;
C_noret_decl(f_8676)
static void C_ccall f_8676(C_word c,C_word *av) C_noret;
C_noret_decl(f_8682)
static void f_8682(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_8700)
static void C_ccall f_8700(C_word c,C_word *av) C_noret;
C_noret_decl(f_8704)
static void C_ccall f_8704(C_word c,C_word *av) C_noret;
C_noret_decl(f_8708)
static void C_ccall f_8708(C_word c,C_word *av) C_noret;
C_noret_decl(f_8715)
static void C_ccall f_8715(C_word c,C_word *av) C_noret;
C_noret_decl(f_8723)
static void C_ccall f_8723(C_word c,C_word *av) C_noret;
C_noret_decl(f_8727)
static void C_ccall f_8727(C_word c,C_word *av) C_noret;
C_noret_decl(f_8731)
static void C_ccall f_8731(C_word c,C_word *av) C_noret;
C_noret_decl(f_8735)
static void C_ccall f_8735(C_word c,C_word *av) C_noret;
C_noret_decl(f_8739)
static void C_ccall f_8739(C_word c,C_word *av) C_noret;
C_noret_decl(f_8743)
static void C_ccall f_8743(C_word c,C_word *av) C_noret;
C_noret_decl(f_8747)
static void C_ccall f_8747(C_word c,C_word *av) C_noret;
C_noret_decl(f_8756)
static void C_ccall f_8756(C_word c,C_word *av) C_noret;
C_noret_decl(f_8764)
static void C_ccall f_8764(C_word c,C_word *av) C_noret;
C_noret_decl(f_8773)
static void C_ccall f_8773(C_word c,C_word *av) C_noret;
C_noret_decl(f_8831)
static void f_8831(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_8835)
static void C_ccall f_8835(C_word c,C_word *av) C_noret;
C_noret_decl(f_8849)
static void f_8849(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_8853)
static void C_ccall f_8853(C_word c,C_word *av) C_noret;
C_noret_decl(f_8866)
static void C_ccall f_8866(C_word c,C_word *av) C_noret;
C_noret_decl(f_8877)
static void C_ccall f_8877(C_word c,C_word *av) C_noret;
C_noret_decl(f_8879)
static void f_8879(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_8886)
static void C_ccall f_8886(C_word c,C_word *av) C_noret;
C_noret_decl(f_8899)
static void C_ccall f_8899(C_word c,C_word *av) C_noret;
C_noret_decl(f_8906)
static void C_ccall f_8906(C_word c,C_word *av) C_noret;
C_noret_decl(f_8945)
static void C_ccall f_8945(C_word c,C_word *av) C_noret;
C_noret_decl(f_8972)
static void C_ccall f_8972(C_word c,C_word *av) C_noret;
C_noret_decl(f_9004)
static void C_ccall f_9004(C_word c,C_word *av) C_noret;
C_noret_decl(f_9011)
static void C_ccall f_9011(C_word c,C_word *av) C_noret;
C_noret_decl(f_9026)
static void C_ccall f_9026(C_word c,C_word *av) C_noret;
C_noret_decl(f_9039)
static void f_9039(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_9082)
static void f_9082(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_9139)
static void f_9139(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_9177)
static void f_9177(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
C_noret_decl(f_9180)
static void f_9180(C_word t0,C_word t1) C_noret;
C_noret_decl(f_9188)
static void C_ccall f_9188(C_word c,C_word *av) C_noret;
C_noret_decl(f_9201)
static void C_ccall f_9201(C_word c,C_word *av) C_noret;
C_noret_decl(f_9220)
static void C_ccall f_9220(C_word c,C_word *av) C_noret;
C_noret_decl(f_9292)
static void f_9292(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9317)
static void f_9317(C_word t0,C_word t1) C_noret;
C_noret_decl(f_9325)
static void C_ccall f_9325(C_word c,C_word *av) C_noret;
C_noret_decl(f_9327)
static void C_ccall f_9327(C_word c,C_word *av) C_noret;
C_noret_decl(f_9341)
static void C_ccall f_9341(C_word c,C_word *av) C_noret;
C_noret_decl(f_9344)
static void C_ccall f_9344(C_word c,C_word *av) C_noret;
C_noret_decl(f_9346)
static void f_9346(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9363)
static void C_ccall f_9363(C_word c,C_word *av) C_noret;
C_noret_decl(f_9370)
static void f_9370(C_word t0,C_word t1) C_noret;
C_noret_decl(f_9386)
static void f_9386(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9407)
static void f_9407(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_9413)
static void f_9413(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_9426)
static void C_ccall f_9426(C_word c,C_word *av) C_noret;
C_noret_decl(f_9468)
static void f_9468(C_word t0,C_word t1) C_noret;
C_noret_decl(f_9483)
static C_word f_9483(C_word t0);
C_noret_decl(f_9506)
static void f_9506(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_9522)
static void f_9522(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9535)
static void C_ccall f_9535(C_word c,C_word *av) C_noret;
C_noret_decl(f_9549)
static void f_9549(C_word t0,C_word t1,C_word t2) C_noret;
C_noret_decl(f_9567)
static void f_9567(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9583)
static void C_ccall f_9583(C_word c,C_word *av) C_noret;
C_noret_decl(f_9594)
static void f_9594(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9600)
static void f_9600(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9618)
static void C_ccall f_9618(C_word c,C_word *av) C_noret;
C_noret_decl(f_9924)
static void C_ccall f_9924(C_word c,C_word *av) C_noret;
C_noret_decl(f_9933)
static void C_ccall f_9933(C_word c,C_word *av) C_noret;
C_noret_decl(f_9951)
static void f_9951(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9958)
static void f_9958(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9985)
static void f_9985(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
C_noret_decl(f_9991)
static void C_ccall f_9991(C_word c,C_word *av) C_noret;
C_noret_decl(C_irregex_toplevel)
C_extern void C_ccall C_irregex_toplevel(C_word c,C_word *av) C_noret;

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

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

C_noret_decl(trf_10233)
static void C_ccall trf_10233(C_word c,C_word *av) C_noret;
static void C_ccall trf_10233(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_10233(t0,t1,t2,t3,t4);}

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

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

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

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

C_noret_decl(trf_10550)
static void C_ccall trf_10550(C_word c,C_word *av) C_noret;
static void C_ccall trf_10550(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_10550(t0,t1,t2,t3);}

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

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

C_noret_decl(trf_10694)
static void C_ccall trf_10694(C_word c,C_word *av) C_noret;
static void C_ccall trf_10694(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_10694(t0,t1,t2,t3,t4,t5,t6);}

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

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

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

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

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

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

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

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

C_noret_decl(trf_10885)
static void C_ccall trf_10885(C_word c,C_word *av) C_noret;
static void C_ccall trf_10885(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_10885(t0,t1,t2,t3,t4);}

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

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

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

C_noret_decl(trf_11921)
static void C_ccall trf_11921(C_word c,C_word *av) C_noret;
static void C_ccall trf_11921(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_11921(t0,t1,t2,t3,t4);}

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

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

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

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

C_noret_decl(trf_13507)
static void C_ccall trf_13507(C_word c,C_word *av) C_noret;
static void C_ccall trf_13507(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_13507(t0,t1,t2,t3);}

C_noret_decl(trf_13622)
static void C_ccall trf_13622(C_word c,C_word *av) C_noret;
static void C_ccall trf_13622(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_13622(t0,t1,t2,t3,t4);}

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

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

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

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

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

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

C_noret_decl(trf_14247)
static void C_ccall trf_14247(C_word c,C_word *av) C_noret;
static void C_ccall trf_14247(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_14247(t0,t1,t2,t3);}

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

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

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

C_noret_decl(trf_14735)
static void C_ccall trf_14735(C_word c,C_word *av) C_noret;
static void C_ccall trf_14735(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_14735(t0,t1,t2,t3);}

C_noret_decl(trf_14844)
static void C_ccall trf_14844(C_word c,C_word *av) C_noret;
static void C_ccall trf_14844(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_14844(t0,t1,t2,t3,t4);}

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

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

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

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

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

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

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

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

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

C_noret_decl(trf_15518)
static void C_ccall trf_15518(C_word c,C_word *av) C_noret;
static void C_ccall trf_15518(C_word c,C_word *av){
C_word t0=av[2];
C_word t1=av[1];
C_word t2=av[0];
f_15518(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_15647)
static void C_ccall trf_15647(C_word c,C_word *av) C_noret;
static void C_ccall trf_15647(C_word c,C_word *av){
C_word t0=av[1];
C_word t1=av[0];
f_15647(t0,t1);}

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

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

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

C_noret_decl(trf_15862)
static void C_ccall trf_15862(C_word c,C_word *av) C_noret;
static void C_ccall trf_15862(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_15862(t0,t1,t2,t3,t4);}

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

C_noret_decl(trf_15974)
static void C_ccall trf_15974(C_word c,C_word *av) C_noret;
static void C_ccall trf_15974(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_15974(t0,t1,t2,t3,t4);}

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

C_noret_decl(trf_17486)
static void C_ccall trf_17486(C_word c,C_word *av) C_noret;
static void C_ccall trf_17486(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_17486(t0,t1,t2,t3,t4,t5,t6);}

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

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

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

C_noret_decl(trf_17565)
static void C_ccall trf_17565(C_word c,C_word *av) C_noret;
static void C_ccall trf_17565(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_17565(t0,t1,t2,t3,t4,t5);}

C_noret_decl(trf_17643)
static void C_ccall trf_17643(C_word c,C_word *av) C_noret;
static void C_ccall trf_17643(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_17643(t0,t1,t2,t3,t4,t5);}

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

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

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

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

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

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

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

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

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

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

C_noret_decl(trf_18759)
static void C_ccall trf_18759(C_word c,C_word *av) C_noret;
static void C_ccall trf_18759(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_18759(t0,t1,t2,t3);}

C_noret_decl(trf_18807)
static void C_ccall trf_18807(C_word c,C_word *av) C_noret;
static void C_ccall trf_18807(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_18807(t0,t1,t2,t3);}

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

C_noret_decl(trf_19093)
static void C_ccall trf_19093(C_word c,C_word *av) C_noret;
static void C_ccall trf_19093(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_19093(t0,t1,t2,t3);}

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

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

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

C_noret_decl(trf_19442)
static void C_ccall trf_19442(C_word c,C_word *av) C_noret;
static void C_ccall trf_19442(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_19442(t0,t1,t2,t3,t4,t5,t6);}

C_noret_decl(trf_19503)
static void C_ccall trf_19503(C_word c,C_word *av) C_noret;
static void C_ccall trf_19503(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_19503(t0,t1,t2,t3);}

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

C_noret_decl(trf_19617)
static void C_ccall trf_19617(C_word c,C_word *av) C_noret;
static void C_ccall trf_19617(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_19617(t0,t1,t2,t3,t4,t5);}

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

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

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

C_noret_decl(trf_20067)
static void C_ccall trf_20067(C_word c,C_word *av) C_noret;
static void C_ccall trf_20067(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_20067(t0,t1,t2,t3,t4);}

C_noret_decl(trf_20082)
static void C_ccall trf_20082(C_word c,C_word *av) C_noret;
static void C_ccall trf_20082(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_20082(t0,t1,t2,t3);}

C_noret_decl(trf_20205)
static void C_ccall trf_20205(C_word c,C_word *av) C_noret;
static void C_ccall trf_20205(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_20205(t0,t1,t2,t3);}

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

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

C_noret_decl(trf_20324)
static void C_ccall trf_20324(C_word c,C_word *av) C_noret;
static void C_ccall trf_20324(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_20324(t0,t1,t2,t3,t4,t5,t6,t7,t8);}

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

C_noret_decl(trf_20377)
static void C_ccall trf_20377(C_word c,C_word *av) C_noret;
static void C_ccall trf_20377(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_20377(t0,t1,t2,t3,t4,t5,t6,t7);}

C_noret_decl(trf_20389)
static void C_ccall trf_20389(C_word c,C_word *av) C_noret;
static void C_ccall trf_20389(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_20389(t0,t1,t2,t3,t4,t5,t6);}

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

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

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

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

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

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

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

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

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

C_noret_decl(trf_21155)
static void C_ccall trf_21155(C_word c,C_word *av) C_noret;
static void C_ccall trf_21155(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_21155(t0,t1,t2,t3,t4,t5);}

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

C_noret_decl(trf_21168)
static void C_ccall trf_21168(C_word c,C_word *av) C_noret;
static void C_ccall trf_21168(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_21168(t0,t1,t2,t3);}

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

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

C_noret_decl(trf_21229)
static void C_ccall trf_21229(C_word c,C_word *av) C_noret;
static void C_ccall trf_21229(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_21229(t0,t1,t2,t3);}

C_noret_decl(trf_21246)
static void C_ccall trf_21246(C_word c,C_word *av) C_noret;
static void C_ccall trf_21246(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_21246(t0,t1,t2,t3);}

C_noret_decl(trf_21334)
static void C_ccall trf_21334(C_word c,C_word *av) C_noret;
static void C_ccall trf_21334(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_21334(t0,t1,t2,t3);}

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

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

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

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

C_noret_decl(trf_22105)
static void C_ccall trf_22105(C_word c,C_word *av) C_noret;
static void C_ccall trf_22105(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_22105(t0,t1,t2,t3,t4);}

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

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

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

C_noret_decl(trf_22315)
static void C_ccall trf_22315(C_word c,C_word *av) C_noret;
static void C_ccall trf_22315(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_22315(t0,t1,t2,t3);}

C_noret_decl(trf_22324)
static void C_ccall trf_22324(C_word c,C_word *av) C_noret;
static void C_ccall trf_22324(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_22324(t0,t1,t2,t3,t4);}

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

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

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

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[1];
C_word t1=av[0];
f_22499(t0,t1);}

C_noret_decl(trf_22552)
static void C_ccall trf_22552(C_word c,C_word *av) C_noret;
static void C_ccall trf_22552(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_22552(t0,t1,t2,t3);}

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

C_noret_decl(trf_22676)
static void C_ccall trf_22676(C_word c,C_word *av) C_noret;
static void C_ccall trf_22676(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_22676(t0,t1,t2,t3);}

C_noret_decl(trf_22685)
static void C_ccall trf_22685(C_word c,C_word *av) C_noret;
static void C_ccall trf_22685(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_22685(t0,t1,t2,t3);}

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

C_noret_decl(trf_22790)
static void C_ccall trf_22790(C_word c,C_word *av) C_noret;
static void C_ccall trf_22790(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_22790(t0,t1,t2,t3,t4);}

C_noret_decl(trf_22846)
static void C_ccall trf_22846(C_word c,C_word *av) C_noret;
static void C_ccall trf_22846(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_22846(t0,t1,t2,t3,t4);}

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

C_noret_decl(trf_22977)
static void C_ccall trf_22977(C_word c,C_word *av) C_noret;
static void C_ccall trf_22977(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_22977(t0,t1,t2,t3);}

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

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

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

C_noret_decl(trf_23091)
static void C_ccall trf_23091(C_word c,C_word *av) C_noret;
static void C_ccall trf_23091(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_23091(t0,t1,t2,t3,t4);}

C_noret_decl(trf_23166)
static void C_ccall trf_23166(C_word c,C_word *av) C_noret;
static void C_ccall trf_23166(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_23166(t0,t1,t2,t3,t4,t5);}

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

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

C_noret_decl(trf_23325)
static void C_ccall trf_23325(C_word c,C_word *av) C_noret;
static void C_ccall trf_23325(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_23325(t0,t1,t2,t3,t4);}

C_noret_decl(trf_23348)
static void C_ccall trf_23348(C_word c,C_word *av) C_noret;
static void C_ccall trf_23348(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_23348(t0,t1,t2,t3);}

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

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

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

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

C_noret_decl(trf_23458)
static void C_ccall trf_23458(C_word c,C_word *av) C_noret;
static void C_ccall trf_23458(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_23458(t0,t1,t2,t3,t4);}

C_noret_decl(trf_23473)
static void C_ccall trf_23473(C_word c,C_word *av) C_noret;
static void C_ccall trf_23473(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_23473(t0,t1,t2,t3);}

C_noret_decl(trf_23493)
static void C_ccall trf_23493(C_word c,C_word *av) C_noret;
static void C_ccall trf_23493(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_23493(t0,t1,t2,t3,t4);}

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

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

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

C_noret_decl(trf_23652)
static void C_ccall trf_23652(C_word c,C_word *av) C_noret;
static void C_ccall trf_23652(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_23652(t0,t1,t2,t3,t4);}

C_noret_decl(trf_23679)
static void C_ccall trf_23679(C_word c,C_word *av) C_noret;
static void C_ccall trf_23679(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_23679(t0,t1,t2,t3,t4);}

C_noret_decl(trf_23835)
static void C_ccall trf_23835(C_word c,C_word *av) C_noret;
static void C_ccall trf_23835(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_23835(t0,t1,t2,t3,t4,t5);}

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

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

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

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

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

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

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

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

C_noret_decl(trf_25135)
static void C_ccall trf_25135(C_word c,C_word *av) C_noret;
static void C_ccall trf_25135(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_25135(t0,t1,t2,t3,t4,t5,t6,t7);}

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

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

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

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

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

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

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

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

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

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

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

C_noret_decl(trf_26782)
static void C_ccall trf_26782(C_word c,C_word *av) C_noret;
static void C_ccall trf_26782(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_26782(t0,t1,t2,t3);}

C_noret_decl(trf_26832)
static void C_ccall trf_26832(C_word c,C_word *av) C_noret;
static void C_ccall trf_26832(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_26832(t0,t1,t2,t3);}

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

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

C_noret_decl(trf_26891)
static void C_ccall trf_26891(C_word c,C_word *av) C_noret;
static void C_ccall trf_26891(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_26891(t0,t1,t2,t3);}

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

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

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

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

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

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

C_noret_decl(trf_27381)
static void C_ccall trf_27381(C_word c,C_word *av) C_noret;
static void C_ccall trf_27381(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_27381(t0,t1,t2,t3);}

C_noret_decl(trf_27483)
static void C_ccall trf_27483(C_word c,C_word *av) C_noret;
static void C_ccall trf_27483(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_27483(t0,t1,t2,t3,t4);}

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

C_noret_decl(trf_27684)
static void C_ccall trf_27684(C_word c,C_word *av) C_noret;
static void C_ccall trf_27684(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_27684(t0,t1,t2,t3,t4);}

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

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

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

C_noret_decl(trf_27880)
static void C_ccall trf_27880(C_word c,C_word *av) C_noret;
static void C_ccall trf_27880(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_27880(t0,t1,t2,t3,t4);}

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

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

C_noret_decl(trf_28012)
static void C_ccall trf_28012(C_word c,C_word *av) C_noret;
static void C_ccall trf_28012(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_28012(t0,t1,t2,t3);}

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

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

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

C_noret_decl(trf_28175)
static void C_ccall trf_28175(C_word c,C_word *av) C_noret;
static void C_ccall trf_28175(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_28175(t0,t1,t2,t3,t4,t5);}

C_noret_decl(trf_28409)
static void C_ccall trf_28409(C_word c,C_word *av) C_noret;
static void C_ccall trf_28409(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_28409(t0,t1,t2,t3,t4);}

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

C_noret_decl(trf_28764)
static void C_ccall trf_28764(C_word c,C_word *av) C_noret;
static void C_ccall trf_28764(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_28764(t0,t1,t2,t3);}

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

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

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

C_noret_decl(trf_29107)
static void C_ccall trf_29107(C_word c,C_word *av) C_noret;
static void C_ccall trf_29107(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_29107(t0,t1,t2,t3,t4);}

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

C_noret_decl(trf_29279)
static void C_ccall trf_29279(C_word c,C_word *av) C_noret;
static void C_ccall trf_29279(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_29279(t0,t1,t2,t3);}

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

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

C_noret_decl(trf_29464)
static void C_ccall trf_29464(C_word c,C_word *av) C_noret;
static void C_ccall trf_29464(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_29464(t0,t1,t2,t3);}

C_noret_decl(trf_29476)
static void C_ccall trf_29476(C_word c,C_word *av) C_noret;
static void C_ccall trf_29476(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_29476(t0,t1,t2,t3);}

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

C_noret_decl(trf_30473)
static void C_ccall trf_30473(C_word c,C_word *av) C_noret;
static void C_ccall trf_30473(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_30473(t0,t1,t2,t3);}

C_noret_decl(trf_30581)
static void C_ccall trf_30581(C_word c,C_word *av) C_noret;
static void C_ccall trf_30581(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_30581(t0,t1,t2,t3);}

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

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

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

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

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

C_noret_decl(trf_8163)
static void C_ccall trf_8163(C_word c,C_word *av) C_noret;
static void C_ccall trf_8163(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_8163(t0,t1,t2,t3);}

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

C_noret_decl(trf_8275)
static void C_ccall trf_8275(C_word c,C_word *av) C_noret;
static void C_ccall trf_8275(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_8275(t0,t1,t2,t3);}

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

C_noret_decl(trf_8682)
static void C_ccall trf_8682(C_word c,C_word *av) C_noret;
static void C_ccall trf_8682(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_8682(t0,t1,t2,t3);}

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

C_noret_decl(trf_8849)
static void C_ccall trf_8849(C_word c,C_word *av) C_noret;
static void C_ccall trf_8849(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_8849(t0,t1,t2,t3);}

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

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[2];
C_word t1=av[1];
C_word t2=av[0];
f_9039(t0,t1,t2);}

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

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

C_noret_decl(trf_9177)
static void C_ccall trf_9177(C_word c,C_word *av) C_noret;
static void C_ccall trf_9177(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_9177(t0,t1,t2,t3,t4);}

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

C_noret_decl(trf_9292)
static void C_ccall trf_9292(C_word c,C_word *av) C_noret;
static void C_ccall trf_9292(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_9292(t0,t1,t2,t3);}

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

C_noret_decl(trf_9346)
static void C_ccall trf_9346(C_word c,C_word *av) C_noret;
static void C_ccall trf_9346(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_9346(t0,t1,t2,t3);}

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

C_noret_decl(trf_9386)
static void C_ccall trf_9386(C_word c,C_word *av) C_noret;
static void C_ccall trf_9386(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_9386(t0,t1,t2,t3);}

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

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

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

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

C_noret_decl(trf_9522)
static void C_ccall trf_9522(C_word c,C_word *av) C_noret;
static void C_ccall trf_9522(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_9522(t0,t1,t2,t3);}

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

C_noret_decl(trf_9567)
static void C_ccall trf_9567(C_word c,C_word *av) C_noret;
static void C_ccall trf_9567(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_9567(t0,t1,t2,t3);}

C_noret_decl(trf_9594)
static void C_ccall trf_9594(C_word c,C_word *av) C_noret;
static void C_ccall trf_9594(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_9594(t0,t1,t2,t3);}

C_noret_decl(trf_9600)
static void C_ccall trf_9600(C_word c,C_word *av) C_noret;
static void C_ccall trf_9600(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_9600(t0,t1,t2,t3);}

C_noret_decl(trf_9951)
static void C_ccall trf_9951(C_word c,C_word *av) C_noret;
static void C_ccall trf_9951(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_9951(t0,t1,t2,t3);}

C_noret_decl(trf_9958)
static void C_ccall trf_9958(C_word c,C_word *av) C_noret;
static void C_ccall trf_9958(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_9958(t0,t1,t2,t3);}

C_noret_decl(trf_9985)
static void C_ccall trf_9985(C_word c,C_word *av) C_noret;
static void C_ccall trf_9985(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_9985(t0,t1,t2,t3);}

/* f34268 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f34268(C_word c,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 *)f34268,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[125],t1);
/* irregex-core.scm:857: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10694(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* f34272 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f34272(C_word c,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 *)f34272,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[126],t1);
/* irregex-core.scm:857: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10694(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k10003 in a9990 in lp */
static void C_ccall f_10005(C_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_10005,c,av);}
/* irregex-core.scm:650: 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);}}

/* a10024 in a9990 in lp */
static void C_ccall f_10025(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_10025,c,av);}
a=C_alloc(7);
t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10031,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)li47),tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:655: read */
t5=((C_word*)((C_word*)t0)[5])[1];
f_9958(t5,t1,t3,t4);}

/* a10030 in a10024 in a9990 in lp */
static void C_ccall f_10031(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_10031,c,av);}
a=C_alloc(10);
t4=C_eqp(t2,C_retrieve2(lf[67],C_text("chicken.irregex#close-token")));
if(C_truep(C_i_not(t4))){
/* irregex-core.scm:657: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word *av2=av;
av2[0]=t5;
av2[1]=t1;
av2[2]=lf[73];
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_10048,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_10052,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:658: ##sys#fast-reverse */
t7=C_fast_retrieve(lf[70]);{
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);}}}

/* k10046 in a10030 in a10024 in a9990 in lp */
static void C_ccall f_10048(C_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_10048,c,av);}
/* irregex-core.scm:658: 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);}}

/* k10050 in a10030 in a10024 in a9990 in lp */
static void C_ccall f_10052(C_word c,C_word *av){
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_10052,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:658: scheme#append */
t4=*((C_word*)lf[74]+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 f_10099(C_word t0,C_word 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_10099,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:668: read */
t5=((C_word*)((C_word*)t0)[4])[1];
f_9958(t5,t1,C_fixnum_plus(t2,C_fix(1)),((C_word*)t0)[5]);}
else{
/* irregex-core.scm:669: skip */
t6=t1;
t7=C_fixnum_plus(t2,C_fix(1));
t1=t6;
t2=t7;
goto loop;}}

/* a10147 */
static void C_ccall f_10148(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_10148,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[75]:lf[76]);
t7=C_a_i_list2(&a,2,t6,t2);
/* irregex-core.scm:674: 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);}}

/* k10174 */
static void f_10176(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_10176,2,t0,t1);}
a=C_alloc(10);
t2=(C_truep(t1)?lf[77]:lf[78]);
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_10187,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word)li53),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:679: read */
t5=((C_word*)((C_word*)t0)[4])[1];
f_9958(t5,((C_word*)t0)[5],t3,t4);}

/* a10186 in k10174 */
static void C_ccall f_10187(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_10187,c,av);}
a=C_alloc(6);
t4=C_a_i_list2(&a,2,((C_word*)t0)[2],t2);
/* irregex-core.scm:679: 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 f_10233(C_word t0,C_word 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_10233,5,t0,t1,t2,t3,t4);}
a=C_alloc(23);
t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10236,a[2]=t2,a[3]=t3,a[4]=t4,a[5]=((C_word*)t0)[2],a[6]=((C_word)li54),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:685: chicken.base#error */
t6=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t6;
av2[1]=t1;
av2[2]=lf[79];
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_10275,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_10282,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:687: collect */
t9=t5;
f_10236(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_10301,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:688: collect */
t10=t5;
f_10236(t10,t9);
default:
t7=C_a_i_fixnum_plus(&a,2,t3,C_fix(1));
/* irregex-core.scm:689: scan */
t14=t1;
t15=t2;
t16=t7;
t17=t4;
t1=t14;
t2=t15;
t3=t16;
t4=t17;
goto loop;}}}

/* collect in scan */
static void f_10236(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_10236,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_10250,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:683: 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);}}}

/* k10248 in collect in scan */
static void C_ccall f_10250(C_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_10250,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);}}

/* k10273 in scan */
static void C_ccall f_10275(C_word c,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_10275,c,av);}
a=C_alloc(5);
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(1));
/* irregex-core.scm:687: 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);}}

/* k10280 in scan */
static void C_ccall f_10282(C_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_10282,c,av);}
/* irregex-core.scm:687: string-cat-reverse */
f_9317(((C_word*)t0)[2],t1);}

/* k10299 in scan */
static void C_ccall f_10301(C_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_10301,c,av);}
/* irregex-core.scm:688: scan */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10233(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* a10333 */
static void C_ccall f_10334(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_10334,c,av);}
/* irregex-core.scm:693: read */
t4=((C_word*)((C_word*)t0)[2])[1];
f_9958(t4,t1,t3,((C_word*)t0)[3]);}

/* a10351 */
static void C_ccall f_10352(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_10352,c,av);}
a=C_alloc(5);
t4=C_eqp(t2,lf[80]);
if(C_truep(t4)){
/* irregex-core.scm:697: 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[81]);
if(C_truep(t5)){
/* irregex-core.scm:697: 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_10372,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_fast_retrieve(lf[82]);{
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:702: scheme#symbol->string */
t7=*((C_word*)lf[83]+1);{
C_word *av2=av;
av2[0]=t7;
av2[1]=t6;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t7+1)))(3,av2);}}}}}

/* k10370 in a10351 */
static void C_ccall f_10372(C_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_10372,c,av);}
/* irregex-core.scm:697: 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 f_10452(C_word t0,C_word 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_10452,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_10462,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_10462(t5,t3);}
else{
t5=C_i_string_ref(((C_word*)t0)[4],t2);
t6=C_u_i_char_whitespacep(t5);
t7=t4;
f_10462(t7,(C_truep(t6)?t6:C_u_i_memq(t5,lf[87])));}}

/* k10460 in scan */
static void f_10462(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,4)))){
C_save_and_reclaim_args((void *)trf_10462,2,t0,t1);}
a=C_alloc(6);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10465,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:720: 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:722: scan */
t2=((C_word*)((C_word*)t0)[7])[1];
f_10452(t2,((C_word*)t0)[3],C_fixnum_plus(((C_word*)t0)[4],C_fix(1)));}}

/* k10463 in k10460 in scan */
static void C_ccall f_10465(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_10465,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+5,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10472,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:721: scheme#string->number */
t4=*((C_word*)lf[86]+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)[5];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k10470 in k10463 in k10460 in scan */
static void C_ccall f_10472(C_word c,C_word *av){
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_10472,c,av);}
a=C_alloc(5);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10475,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[3],a[4]=((C_word*)t2)[4],tmp=(C_word)a,a+=5,tmp);
if(C_truep(t1)){
/* irregex-core.scm:721: k */
t4=((C_word*)t2)[2];{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=((C_word*)t2)[3];
av2[2]=t1;
av2[3]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}
else{
/* irregex-core.scm:721: scheme#string->symbol */
t4=*((C_word*)lf[85]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t2)[5];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}}

/* k10473 in k10470 in k10463 in k10460 in scan */
static void C_ccall f_10475(C_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_10475,c,av);}
/* irregex-core.scm:721: 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);}}

/* a10522 in chicken.irregex#with-read-from-string in k7970 in k7739 in k7736 */
static void C_ccall f_10523(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_10523,c,av);}
t4=C_eqp(t2,lf[88]);
if(C_truep(t4)){
/* irregex-core.scm:725: 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[89];
av2[3]=((C_word*)t0)[2];
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}
else{
/* irregex-core.scm:726: 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 k7970 in k7739 in k7736 */
static void f_10544(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_10544,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_10550,a[2]=t4,a[3]=((C_word)li62),tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
f_10550(t6,t1,t2,C_fix(0));}

/* lp in chicken.irregex#symbol-list->flags in k7970 in k7739 in k7736 */
static void f_10550(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_10550,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_10568,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[91]);
t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10579,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_10579(t10,t8);}
else{
t10=C_eqp(t7,lf[100]);
t11=t9;
f_10579(t11,(C_truep(t10)?t10:C_eqp(t7,lf[101])));}}}

/* k10566 in lp in chicken.irregex#symbol-list->flags in k7970 in k7739 in k7736 */
static void f_10568(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_10568,2,t0,t1);}
/* irregex-core.scm:742: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10550(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* k10577 in lp in chicken.irregex#symbol-list->flags in k7970 in k7739 in k7736 */
static void f_10579(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word 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_10579,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:742: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10550(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[92]);
t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[6],lf[93]));
if(C_truep(t3)){
/* irregex-core.scm:742: lp */
t4=((C_word*)((C_word*)t0)[2])[1];
f_10550(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[94]);
t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[6],lf[95]));
if(C_truep(t5)){
t6=((C_word*)t0)[7];
f_10568(t6,C_fixnum_or(((C_word*)t0)[5],C_fix(8)));}
else{
t6=C_eqp(((C_word*)t0)[6],lf[96]);
t7=(C_truep(t6)?t6:C_eqp(((C_word*)t0)[6],lf[97]));
if(C_truep(t7)){
t8=((C_word*)t0)[7];
f_10568(t8,C_fixnum_or(((C_word*)t0)[5],C_fix(16)));}
else{
t8=C_eqp(((C_word*)t0)[6],lf[98]);
t9=(C_truep(t8)?t8:C_eqp(((C_word*)t0)[6],lf[99]));
t10=((C_word*)t0)[7];
f_10568(t10,(C_truep(t9)?(C_truep(C_retrieve2(lf[54],C_text("chicken.irregex#*allow-utf8-mode?*")))?C_fixnum_or(((C_word*)t0)[5],C_fix(32)):C_fixnum_or(((C_word*)t0)[5],C_fix(0))):(C_truep(C_SCHEME_FALSE)?C_fixnum_or(((C_word*)t0)[5],C_SCHEME_FALSE):((C_word*)t0)[5])));}}}}}

/* chicken.irregex#maybe-string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_10667(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_10667,c,av);}
if(C_truep(C_i_stringp(t2))){
/* irregex-core.scm:754: string->sre */
t3=C_fast_retrieve(lf[103]);{
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 k7970 in k7739 in k7736 */
static void C_ccall f_10679(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_10679,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_10683,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:757: 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[198];
av2[3]=lf[199];
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_10683(2,av2);}}}

/* k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_10683(C_word c,C_word *av){
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_10683,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_10689,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:759: symbol-list->flags */
f_10544(t3,((C_word*)t0)[4]);}

/* k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_10689(C_word c,C_word *av){
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_10689,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_10694,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=((C_word)li90),tmp=(C_word)a,a+=6,tmp));
t5=((C_word*)t3)[1];
f_10694(t5,((C_word*)t0)[4],C_fix(0),C_fix(0),t1,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}

/* lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_10694(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_10694,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_10697,a[2]=t4,a[3]=((C_word)li65),tmp=(C_word)a,a+=4,tmp));
t19=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10719,a[2]=t4,a[3]=t8,a[4]=((C_word)li67),tmp=(C_word)a,a+=5,tmp));
t20=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10775,a[2]=t2,a[3]=t3,a[4]=t5,a[5]=t10,a[6]=((C_word*)t0)[2],a[7]=((C_word)li68),tmp=(C_word)a,a+=8,tmp));
t21=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_10795,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)li70),tmp=(C_word)a,a+=10,tmp));
t22=t15=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10867,a[2]=t4,a[3]=t12,a[4]=((C_word)li72),tmp=(C_word)a,a+=5,tmp);
t23=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11100,a[2]=t4,a[3]=t6,a[4]=t12,a[5]=((C_word)li73),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:852: chicken.base#error */
t24=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t24;
av2[1]=t1;
av2[2]=lf[124];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t24+1)))(4,av2);}}
else{
/* irregex-core.scm:853: collect/terms */
t24=t15;
f_10867(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)f34268,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:859: collect */
t30=((C_word*)t12)[1];
f_10775(t30,t29);}
else{
t29=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f34272,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:859: collect */
t30=((C_word*)t12)[1];
f_10775(t30,t29);}
case C_make_character(63):
t25=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11172,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:862: collect/single */
t26=((C_word*)t14)[1];
f_10795(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_11332,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:883: collect/single */
t28=((C_word*)t14)[1];
f_10795(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:898: chicken.base#error */
t28=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t28;
av2[1]=t1;
av2[2]=lf[141];
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[142])))){
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_11424,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:900: save */
t34=((C_word*)t17)[1];
f_11100(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:902: chicken.base#error */
t31=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t31;
av2[1]=t1;
av2[2]=lf[143];
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_11454,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)li74),tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:905: with-read-from-string */
f_9951(t1,((C_word*)t0)[2],t37,t38);}
else{
/* irregex-core.scm:910: chicken.base#error */
t37=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t37;
av2[1]=t1;
av2[2]=lf[145];
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_11521,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:914: string-scan-char */
t38=C_retrieve2(lf[55],C_text("chicken.irregex#string-scan-char"));{
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_11562,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:917: save */
t41=((C_word*)t17)[1];
f_11100(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_11585,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:920: save */
t41=((C_word*)t17)[1];
f_11100(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_11608,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_11100(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:927: chicken.base#error */
t37=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t37;
av2[1]=t1;
av2[2]=lf[148];
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_11650,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:932: save */
t44=((C_word*)t17)[1];
f_11100(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_11673,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:935: save */
t44=((C_word*)t17)[1];
f_11100(t44,t43);
default:
t39=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11676,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:939: string-scan-char */
t43=C_retrieve2(lf[55],C_text("chicken.irregex#string-scan-char"));{
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_11676(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_11762,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:948: save */
t41=((C_word*)t17)[1];
f_11100(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:956: chicken.base#error */
t37=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t37;
av2[1]=t1;
av2[2]=lf[153];
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_11787,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:958: string-scan-char */
t41=C_retrieve2(lf[55],C_text("chicken.irregex#string-scan-char"));{
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_11839,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:965: string-scan-char */
t43=C_retrieve2(lf[55],C_text("chicken.irregex#string-scan-char"));{
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_11890,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:971: save */
t46=((C_word*)t17)[1];
f_11100(t46,t45);}}}
case C_make_character(123):
/* irregex-core.scm:973: chicken.base#error */
t36=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t36;
av2[1]=t1;
av2[2]=lf[156];
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_11921,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)li77),tmp=(C_word)a,a+=11,tmp));
t40=((C_word*)t38)[1];
f_11921(t40,t1,t36,t4,C_SCHEME_FALSE);}}}}}
case C_make_character(41):
if(C_truep(C_i_nullp(t6))){
/* irregex-core.scm:1013: chicken.base#error */
t27=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t27;
av2[1]=t1;
av2[2]=lf[161];
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_12199,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:1017: collect/terms */
t31=t15;
f_10867(t31,t30);}
case C_make_character(91):
t27=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12214,a[2]=((C_word*)t0)[4],a[3]=t4,a[4]=t6,a[5]=t12,a[6]=((C_word)li78),tmp=(C_word)a,a+=7,tmp);
t28=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12238,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_13622,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)li83),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:1312: go */
t43=((C_word*)t36)[1];
f_13622(t43,t28,t38,C_SCHEME_FALSE,t42);}
else{
t41=C_a_i_vector(&a,0);
/* irregex-core.scm:1312: go */
t42=((C_word*)t36)[1];
f_13622(t42,t28,t38,C_SCHEME_FALSE,t41);}}
else{
t38=C_a_i_vector(&a,0);
/* irregex-core.scm:1317: go */
t39=((C_word*)t36)[1];
f_13622(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_12257,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_12257(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_12257(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_12257(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:1060: chicken.base#error */
t28=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t28;
av2[1]=t1;
av2[2]=lf[178];
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_12486,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:1065: collect */
t33=((C_word*)t12)[1];
f_10775(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[180],lf[179]);
t33=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12513,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:1067: collect */
t34=((C_word*)t12)[1];
f_10775(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_12536,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:1069: collect */
t33=((C_word*)t12)[1];
f_10775(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[180],lf[80]);
t33=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12563,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:1071: collect */
t34=((C_word*)t12)[1];
f_10775(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[181]);
t33=C_a_i_list(&a,3,lf[104],lf[182],t32);
t34=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12590,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:1074: collect */
t35=((C_word*)t12)[1];
f_10775(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[183]);
t33=C_a_i_list(&a,3,lf[104],lf[182],t32);
t34=C_a_i_list(&a,2,lf[180],t33);
t35=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12621,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:1077: collect */
t36=((C_word*)t12)[1];
f_10775(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[104],lf[184],lf[185]);
t33=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12656,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:1080: collect */
t34=((C_word*)t12)[1];
f_10775(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_12679,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:1082: collect */
t33=((C_word*)t12)[1];
f_10775(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_12702,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:1084: collect */
t33=((C_word*)t12)[1];
f_10775(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[132],C_make_character(10));
t33=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12733,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:1087: collect */
t34=((C_word*)t12)[1];
f_10775(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_12756,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:1089: collect */
t33=((C_word*)t12)[1];
f_10775(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_12779,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:1091: collect */
t33=((C_word*)t12)[1];
f_10775(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_12802,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:1093: collect */
t33=((C_word*)t12)[1];
f_10775(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_12825,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:1096: collect */
t33=((C_word*)t12)[1];
f_10775(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_12848,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:1098: collect */
t33=((C_word*)t12)[1];
f_10775(t33,t32);
case C_make_character(120):
t30=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12859,a[2]=((C_word*)t0)[4],a[3]=t4,a[4]=t6,a[5]=t12,a[6]=((C_word)li86),tmp=(C_word)a,a+=7,tmp);
t31=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12883,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:1103: string-parse-hex-escape */
f_13507(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[190])))){
/* irregex-core.scm:1107: chicken.base#error */
t32=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t32;
av2[1]=t1;
av2[2]=lf[191];
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_12907,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_12907(t33,C_make_character(62));
case C_make_character(123):
t33=t32;
f_12907(t33,C_make_character(125));
case C_make_character(40):
t33=t32;
f_12907(t33,C_make_character(41));
default:
t33=C_eqp(t31,C_make_character(91));
t34=t32;
f_12907(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_12979,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:1122: collect */
t31=((C_word*)t12)[1];
f_10775(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_13090,a[2]=((C_word*)t0)[4],a[3]=t4,a[4]=t6,a[5]=t12,a[6]=((C_word)li88),tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:1139: with-read-from-string */
f_9951(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_13111,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_9139,a[2]=t33,a[3]=((C_word*)t0)[2],a[4]=t37,a[5]=((C_word)li89),tmp=(C_word)a,a+=6,tmp));
t39=((C_word*)t37)[1];
f_9139(t39,t30,t35);}
else{
if(C_truep(C_u_i_char_alphabeticp(t29))){
t30=C_i_assq(t29,C_retrieve2(lf[169],C_text("chicken.irregex#posix-escape-sequences")));
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_13191,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:1166: collect */
t35=((C_word*)t12)[1];
f_10775(t35,t34);}
else{
/* irregex-core.scm:1167: chicken.base#error */
t31=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t31;
av2[1]=t1;
av2[2]=lf[195];
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_13207,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:1169: collect */
t33=((C_word*)t12)[1];
f_10775(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_13271,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:1171: collect */
t30=((C_word*)t12)[1];
f_10775(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[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_13297,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:1174: collect */
t33=((C_word*)t12)[1];
f_10775(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[197]:lf[188]);
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_13326,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:1177: collect */
t33=((C_word*)t12)[1];
f_10775(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_13354,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:1180: collect */
t32=((C_word*)t12)[1];
f_10775(t32,t31);}
else{
t29=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:1181: 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_13375,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:1184: string-scan-char */
t31=C_retrieve2(lf[55],C_text("chicken.irregex#string-scan-char"));{
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:1187: 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:1189: 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 k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static C_word f_10697(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[104],t1,t6));}
else{
return(t1);}}

/* cased-string in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_10719(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word 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_10719,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_10736,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_fast_retrieve(lf[106]);{
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);}}}

/* k10734 in cased-string in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_10736(C_word c,C_word *av){
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_10736,c,av);}
a=C_alloc(12);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10739,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_10741,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)li66),tmp=(C_word)a,a+=7,tmp));
t6=((C_word*)t4)[1];
f_10741(t6,t2,t1);}

/* k10737 in k10734 in cased-string in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_10739(C_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_10739,c,av);}
a=C_alloc(3);
/* irregex-core.scm:771: sre-sequence */
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=(
/* irregex-core.scm:771: sre-sequence */
  f_18580(C_a_i(&a,3),t1)
);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* map-loop1470 in k10734 in cased-string in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_10741(C_word t0,C_word t1,C_word t2){
C_word 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_10741,3,t0,t1,t2);}
a=C_alloc(12);
if(C_truep(C_i_pairp(t2))){
t3=(
/* irregex-core.scm:771: g1476 */
  f_10697(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 k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_10775(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_10775,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_10789,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_10793,a[2]=((C_word*)t0)[5],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:775: 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);}}}

/* k10787 in collect in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_10789(C_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_10789,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);}}

/* k10791 in collect in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_10793(C_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_10793,c,av);}
/* irregex-core.scm:775: cased-string */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10719(t2,((C_word*)t0)[3],t1);}

/* collect/single in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_10795(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word 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_10795,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_10802,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_14451,a[2]=((C_word*)t0)[6],a[3]=t8,a[4]=((C_word)li69),tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
f_14451(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_10802(2,av2);}}}

/* k10800 in collect/single in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_10802(C_word c,C_word *av){
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_10802,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_10811,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_10839,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:788: utf8-string-ref */
f_14247(t3,((C_word*)t0)[6],t1,C_fixnum_difference(((C_word*)t0)[9],t1));}
else{
/* irregex-core.scm:787: cased-char */
t4=t2;
f_10811(t4,(
/* irregex-core.scm:787: cased-char */
  f_10697(C_a_i(&a,9),((C_word*)((C_word*)t0)[7])[1],C_i_string_ref(((C_word*)t0)[6],t1))
));}}}

/* k10809 in k10800 in collect/single in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_10811(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_10811,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_10831,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_10835,a[2]=((C_word*)t0)[6],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:795: 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);}}}

/* k10829 in k10809 in k10800 in collect/single in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
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,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);}}

/* k10833 in k10809 in k10800 in collect/single in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_10835(C_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_10835,c,av);}
/* irregex-core.scm:795: cased-string */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10719(t2,((C_word*)t0)[3],t1);}

/* k10837 in k10800 in collect/single in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_10839(C_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_10839,c,av);}
a=C_alloc(9);
/* irregex-core.scm:787: cased-char */
t2=((C_word*)t0)[2];
f_10811(t2,(
/* irregex-core.scm:787: cased-char */
  f_10697(C_a_i(&a,9),((C_word*)((C_word*)t0)[3])[1],t1)
));}

/* collect/terms in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_10867(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_10867,2,t0,t1);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10871,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:801: collect */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10775(t3,t2);}

/* k10869 in collect/terms in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_10871(C_word c,C_word *av){
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_10871,c,av);}
a=C_alloc(8);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10874,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_11097,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:804: last */
f_9468(t3,t1);}
else{
t3=t2;
f_10874(t3,C_SCHEME_FALSE);}}

/* k10872 in k10869 in collect/terms in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_10874(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_10874,2,t0,t1);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10877,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[122]):C_SCHEME_FALSE);
if(C_truep(t3)){
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11075,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:810: ##sys#fast-reverse */
t5=C_fast_retrieve(lf[70]);{
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_10877(t5,C_a_i_list1(&a,1,t4));}
else{
t4=t2;
f_10877(t4,C_SCHEME_FALSE);}}}

/* k10875 in k10872 in k10869 in collect/terms in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_10877(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_10877,2,t0,t1);}
a=C_alloc(8);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10880,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[120]))?C_SCHEME_TRUE:(C_truep(C_eqp(t3,lf[121]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11050,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:814: ##sys#fast-reverse */
t5=C_fast_retrieve(lf[70]);{
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_11061,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:815: ##sys#fast-reverse */
t5=C_fast_retrieve(lf[70]);{
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_10880(2,av2);}}}

/* k10878 in k10875 in k10872 in k10869 in collect/terms in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_10880(C_word c,C_word *av){
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_10880,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_10885,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=((C_word)li71),tmp=(C_word)a,a+=6,tmp));
t5=((C_word*)t3)[1];
f_10885(t5,((C_word*)t0)[4],t1,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}

/* lp in k10878 in k10875 in k10872 in k10869 in collect/terms in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_10885(C_word t0,C_word 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_10885,5,t0,t1,t2,t3,t4);}
a=C_alloc(31);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10888,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
if(C_truep(C_i_nullp(t2))){
t6=(
/* irregex-core.scm:822: shift */
  f_10888(C_a_i(&a,6),t5)
);
t7=(
/* irregex-core.scm:822: sre-alternate */
  f_18603(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[109],t7):t7);
if(C_truep(((C_word*)t0)[3])){
t11=C_i_car(((C_word*)t0)[3]);
t12=C_eqp(lf[110],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[111];
((C_proc)(void*)(*((C_word*)t14+1)))(2,av2);}}
else{
t14=C_i_car(t10);
if(C_truep((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_truep(C_eqp(t14,lf[115]))?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[116],C_u_i_car(t10));
if(C_truep(t15)){
t16=C_i_cadr(t10);
t17=C_u_i_cdr(t10);
t18=(
/* irregex-core.scm:837: sre-sequence */
  f_18580(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[110],t16,t18);
((C_proc)(void*)(*((C_word*)t19+1)))(2,av2);}}
else{
t16=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10958,a[2]=t10,a[3]=t1,a[4]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:839: scheme#cadadr */
t17=*((C_word*)lf[118]+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:842: ##sys#append */
t14=*((C_word*)lf[119]+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[104],t6);
if(C_truep(t7)){
t8=C_u_i_cdr(t2);
t9=(
/* irregex-core.scm:844: shift */
  f_10888(C_a_i(&a,6),t5)
);
/* irregex-core.scm:844: 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:845: lp */
t20=t1;
t21=t8;
t22=t10;
t23=t4;
t1=t20;
t2=t21;
t3=t22;
t4=t23;
goto loop;}}}

/* shift in lp in k10878 in k10875 in k10872 in k10869 in collect/terms in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static C_word f_10888(C_word *a,C_word t0){
C_word tmp;
C_word t1;
C_word t2;
C_stack_overflow_check;{}
t1=(
/* irregex-core.scm:819: sre-sequence */
  f_18580(C_a_i(&a,3),((C_word*)t0)[2])
);
return(C_a_i_cons(&a,2,t1,((C_word*)t0)[3]));}

/* k10956 in lp in k10878 in k10875 in k10872 in k10869 in collect/terms in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_10958(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_10958,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+4,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10974,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:840: scheme#cddadr */
t4=*((C_word*)lf[117]+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);}}

/* k10972 in k10956 in lp in k10878 in k10875 in k10872 in k10869 in collect/terms in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_10974(C_word c,C_word *av){
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,1)))){
C_save_and_reclaim((void *)f_10974,c,av);}
a=C_alloc(18);
t2=((C_word*)t0)[2];
t3=(
/* irregex-core.scm:840: sre-sequence */
  f_18580(C_a_i(&a,3),t1)
);
t4=(
/* irregex-core.scm:841: sre-alternate */
  f_18603(C_a_i(&a,3),C_i_cddr(((C_word*)t2)[2]))
);
t5=((C_word*)t2)[3];{
C_word *av2=av;
av2[0]=t5;
av2[1]=C_a_i_list(&a,4,lf[110],((C_word*)t2)[4],t3,t4);
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}

/* k11048 in k10875 in k10872 in k10869 in collect/terms in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11050(C_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_11050,c,av);}
/* irregex-core.scm:814: ##sys#fast-reverse */
t2=C_fast_retrieve(lf[70]);{
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);}}

/* k11059 in k10875 in k10872 in k10869 in collect/terms in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11061(C_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_11061,c,av);}
/* irregex-core.scm:815: ##sys#fast-reverse */
t2=C_fast_retrieve(lf[70]);{
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);}}

/* k11073 in k10872 in k10869 in collect/terms in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11075(C_word c,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_11075,c,av);}
a=C_alloc(6);
t2=C_i_cadr(t1);
t3=((C_word*)t0)[2];
f_10877(t3,C_a_i_list2(&a,2,lf[121],t2));}

/* k11095 in k10869 in collect/terms in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11097(C_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_11097,c,av);}
t2=((C_word*)t0)[2];
f_10874(t2,C_u_i_memq(t1,lf[123]));}

/* save in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_11100(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_11100,2,t0,t1);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11112,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:847: collect */
t3=((C_word*)((C_word*)t0)[4])[1];
f_10775(t3,t2);}

/* k11110 in save in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11112(C_word c,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_11112,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);}}

/* k11170 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11172(C_word c,C_word *av){
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_11172,c,av);}
a=C_alloc(28);
if(C_truep(C_i_nullp(t1))){
/* irregex-core.scm:864: 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[127];
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_11201,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[128]);
if(C_truep(t7)){
t8=C_u_i_cdr(t2);
t9=t5;
f_11201(t9,C_a_i_cons(&a,2,lf[129],t8));}
else{
t8=C_eqp(t6,lf[130]);
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_11201(t12,C_a_i_cons(&a,2,lf[131],t11));}
else{
t9=C_eqp(t6,lf[132]);
if(C_truep(t9)){
t10=C_u_i_cdr(t2);
t11=t5;
f_11201(t11,C_a_i_cons(&a,2,lf[133],t10));}
else{
t10=C_eqp(t6,lf[134]);
if(C_truep(t10)){
t11=C_u_i_cdr(t2);
t12=t5;
f_11201(t12,C_a_i_cons(&a,2,lf[131],t11));}
else{
t11=C_eqp(t6,lf[135]);
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_11201(t15,C_a_i_cons(&a,2,lf[131],t14));}
else{
t12=C_eqp(t6,lf[136]);
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_11201(t18,C_a_i_cons(&a,2,lf[131],t17));}
else{
t13=t5;
f_11201(t13,C_a_i_list(&a,2,lf[132],t2));}}}}}}}
else{
t6=t5;
f_11201(t6,C_a_i_list(&a,2,lf[132],t2));}}}

/* k11199 in k11170 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_11201(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_11201,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:866: lp */
t4=((C_word*)((C_word*)t0)[3])[1];
f_10694(t4,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t3,((C_word*)t0)[8]);}

/* k11330 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11332(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_11332,c,av);}
a=C_alloc(19);
t2=C_i_pairp(t1);
t3=(C_truep(t2)?C_u_i_car(t1):lf[111]);
t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_11338,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,a[5]=((C_word*)t0)[4],a[6]=C_SCHEME_UNDEFINED,a[7]=t3,a[8]=((C_word*)t0)[5],a[9]=((C_word*)t0)[6],a[10]=((C_word*)t0)[7],tmp=(C_word)a,a+=11,tmp);
t5=C_a_i_string(&a,1,((C_word*)t0)[8]);
/* irregex-core.scm:885: scheme#string->symbol */
t6=*((C_word*)lf[85]+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);}}

/* k11336 in k11330 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11338(C_word c,C_word *av){
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_11338,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+6,t1);
t3=(
/* irregex-core.scm:887: sre-repeater? */
  f_16967(((C_word*)t0)[7])
);
if(C_truep(t3)){
/* irregex-core.scm:888: 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)[2];
av2[2]=lf[138];
av2[3]=((C_word*)t0)[3];
av2[4]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}
else{
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11353,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:889: sre-empty? */
t5=C_retrieve2(lf[140],C_text("chicken.irregex#sre-empty?"));{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t5;
av2[1]=t4;
av2[2]=((C_word*)t0)[7];
f_16699(3,av2);}}}

/* k11351 in k11336 in k11330 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11353(C_word c,C_word *av){
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(19,c,6)))){
C_save_and_reclaim((void *)f_11353,c,av);}
a=C_alloc(19);
t2=((C_word*)t0)[2];
if(C_truep(t1)){
/* irregex-core.scm:890: 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*)t2)[2];
av2[2]=lf[139];
av2[3]=((C_word*)t2)[3];
av2[4]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}
else{
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t2)[5],C_fix(1));
t4=C_a_i_fixnum_plus(&a,2,((C_word*)t2)[5],C_fix(1));
t5=C_a_i_list2(&a,2,((C_word*)t2)[6],((C_word*)t2)[7]);
t6=C_i_cdr(((C_word*)t2)[4]);
t7=C_a_i_cons(&a,2,t5,t6);
/* irregex-core.scm:892: lp */
t8=((C_word*)((C_word*)t2)[8])[1];
f_10694(t8,((C_word*)t2)[2],t3,t4,((C_word*)t2)[9],t7,((C_word*)t2)[10]);}}

/* k11422 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11424(C_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_11424,c,av);}
/* irregex-core.scm:900: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10694(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],C_SCHEME_END_OF_LIST,t1);}

/* a11453 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11454(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_11454,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_11464,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_11464(t6,t4);}
else{
t6=C_i_string_ref(((C_word*)t0)[3],t3);
t7=t5;
f_11464(t7,C_i_not(C_eqp(C_make_character(41),t6)));}}

/* k11462 in a11453 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_11464(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_11464,2,t0,t1);}
a=C_alloc(9);
if(C_truep(t1)){
/* irregex-core.scm:908: 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[144];
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_11486,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:909: collect */
t5=((C_word*)((C_word*)t0)[9])[1];
f_10775(t5,t4);}}

/* k11484 in k11462 in a11453 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11486(C_word c,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_11486,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:909: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k11519 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11521(C_word c,C_word *av){
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_11521,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_11536,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:915: collect */
t5=((C_word*)((C_word*)t0)[7])[1];
f_10775(t5,t4);}

/* k11534 in k11519 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11536(C_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_11536,c,av);}
/* irregex-core.scm:915: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10694(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t1,((C_word*)t0)[7]);}

/* k11560 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11562(C_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_11562,c,av);}
/* irregex-core.scm:917: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10694(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],C_SCHEME_END_OF_LIST,t1);}

/* k11583 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11585(C_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_11585,c,av);}
/* irregex-core.scm:919: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10694(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],lf[146],t1);}

/* k11606 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11608(C_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_11608,c,av);}
/* irregex-core.scm:922: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10694(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],lf[147],t1);}

/* k11648 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11650(C_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_11650,c,av);}
/* irregex-core.scm:931: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10694(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],lf[149],t1);}

/* k11671 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11673(C_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_11673,c,av);}
/* irregex-core.scm:934: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10694(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],lf[150],t1);}

/* k11674 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11676(C_word c,C_word *av){
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_11676,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_11706,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_11710,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:942: 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:945: 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[151];
av2[3]=((C_word*)t0)[7];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}}

/* k11700 in k11704 in k11674 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11702(C_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_11702,c,av);}
/* irregex-core.scm:941: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10694(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t1);}

/* k11704 in k11674 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11706(C_word c,C_word *av){
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_11706,c,av);}
a=C_alloc(14);
t2=C_a_i_list(&a,2,t1,lf[121]);
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11702,a[2]=((C_word*)t0)[2],a[3]=((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:944: save */
t4=((C_word*)((C_word*)t0)[7])[1];
f_11100(t4,t3);}

/* k11708 in k11674 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11710(C_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_11710,c,av);}
/* irregex-core.scm:942: scheme#string->symbol */
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);}}

/* k11760 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11762(C_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_11762,c,av);}
/* irregex-core.scm:947: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10694(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],lf[152],t1);}

/* k11785 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11787(C_word c,C_word *av){
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_11787,c,av);}
a=C_alloc(16);
t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11790,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_11824,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:959: 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);}}

/* k11788 in k11785 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11790(C_word c,C_word *av){
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_11790,c,av);}
a=C_alloc(24);
if(C_truep(C_i_not(t1))){
/* irregex-core.scm:961: 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[154];
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[110]);
t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11820,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:963: save */
t8=((C_word*)((C_word*)t0)[7])[1];
f_11100(t8,t7);}}

/* k11818 in k11788 in k11785 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11820(C_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_11820,c,av);}
/* irregex-core.scm:962: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10694(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t1);}

/* k11822 in k11785 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11824(C_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_11824,c,av);}
/* irregex-core.scm:959: scheme#string->number */
t2=*((C_word*)lf[86]+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);}}

/* k11837 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11839(C_word c,C_word *av){
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_11839,c,av);}
a=C_alloc(15);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11842,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_11867,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:966: 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);}}

/* k11840 in k11837 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11842(C_word c,C_word *av){
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_11842,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[110]);
t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11863,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:968: save */
t8=((C_word*)((C_word*)t0)[6])[1];
f_11100(t8,t7);}

/* k11861 in k11840 in k11837 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11863(C_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_11863,c,av);}
/* irregex-core.scm:967: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10694(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t1);}

/* k11865 in k11837 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11867(C_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_11867,c,av);}
/* irregex-core.scm:966: scheme#string->symbol */
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);}}

/* k11888 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_11890(C_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_11890,c,av);}
/* irregex-core.scm:970: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10694(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],lf[155],t1);}

/* lp2 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_11921(C_word t0,C_word 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_11921,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_11924,a[2]=t4,a[3]=t3,a[4]=((C_word)li75),tmp=(C_word)a,a+=5,tmp);
t9=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11933,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word)li76),tmp=(C_word)a,a+=5,tmp));
if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[3]))){
/* irregex-core.scm:987: chicken.base#error */
t10=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t10;
av2[1]=t1;
av2[2]=lf[159];
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:991: join */
  f_11924(t5,C_fix(2))
);
/* irregex-core.scm:991: 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:993: join */
  f_11924(t5,C_fix(4))
);
/* irregex-core.scm:993: 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:995: join */
  f_11924(t5,C_fix(16))
);
/* irregex-core.scm:995: lp2 */
t28=t1;
t29=t11;
t30=t12;
t31=t4;
t1=t28;
t2=t29;
t3=t30;
t4=t31;
goto loop;
case C_make_character(117):
if(C_truep(C_retrieve2(lf[54],C_text("chicken.irregex#*allow-utf8-mode?*")))){
t11=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t12=(
/* irregex-core.scm:998: join */
  f_11924(t5,C_fix(32))
);
/* irregex-core.scm:998: lp2 */
t28=t1;
t29=t11;
t30=t12;
t31=t4;
t1=t28;
t2=t29;
t3=t30;
t4=t31;
goto loop;}
else{
t11=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:999: lp2 */
t28=t1;
t29=t11;
t30=t3;
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:1001: 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_12077,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:1003: collect */
t14=((C_word*)((C_word*)t0)[9])[1];
f_10775(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:1006: new-res */
  f_11933(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_12108,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:1007: collect */
t15=((C_word*)((C_word*)t0)[9])[1];
f_10775(t15,t14);
default:
/* irregex-core.scm:1009: chicken.base#error */
t11=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t11;
av2[1]=t1;
av2[2]=lf[160];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t11+1)))(4,av2);}}}}

/* join in lp2 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static C_word f_11924(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=C_retrieve2(lf[65],C_text("chicken.irregex#flag-clear"));
t3=C_retrieve2(lf[65],C_text("chicken.irregex#flag-clear"));
return(C_fixnum_and(((C_word*)t0)[3],C_fixnum_not(t1)));}
else{
t2=C_retrieve2(lf[64],C_text("chicken.irregex#flag-join"));
t3=C_retrieve2(lf[64],C_text("chicken.irregex#flag-join"));
return((C_truep(t1)?C_fixnum_or(((C_word*)t0)[3],t1):((C_word*)t0)[3]));}}

/* new-res in lp2 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static C_word f_11933(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[157],t1):C_a_i_cons(&a,2,lf[158],t1))));}

/* k12075 in lp2 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12077(C_word c,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_12077,c,av);}
a=C_alloc(6);
t2=(
/* irregex-core.scm:1003: new-res */
  f_11933(C_a_i(&a,6),((C_word*)((C_word*)t0)[2])[1],t1)
);
/* irregex-core.scm:1003: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12106 in lp2 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12108(C_word c,C_word *av){
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_12108,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:1006: lp */
t4=((C_word*)((C_word*)t0)[4])[1];
f_10694(t4,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8],((C_word*)t0)[9],t3);}

/* k12197 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12199(C_word c,C_word *av){
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_12199,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:1014: lp */
t4=((C_word*)((C_word*)t0)[3])[1];
f_10694(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]));}

/* a12213 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12214(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_12214,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_12234,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:1022: collect */
t7=((C_word*)((C_word*)t0)[5])[1];
f_10775(t7,t6);}

/* k12232 in a12213 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12234(C_word c,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_12234,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1022: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12236 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12238(C_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_12238,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);}}

/* k12255 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_12257(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,6)))){
C_save_and_reclaim_args((void *)trf_12257,2,t0,t1);}
a=C_alloc(10);
if(C_truep(t1)){
t2=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[2],C_fix(1));
/* irregex-core.scm:1029: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(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|9,a[1]=(C_word)f_12266,a[2]=((C_word*)t0)[4],a[3]=C_SCHEME_UNDEFINED,a[4]=C_SCHEME_UNDEFINED,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[2],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
/* irregex-core.scm:1031: collect/single */
t3=((C_word*)((C_word*)t0)[10])[1];
f_10795(t3,t2);}}

/* k12264 in k12255 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12266(C_word c,C_word *av){
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(8,c,4)))){
C_save_and_reclaim((void *)f_12266,c,av);}
a=C_alloc(8);
if(C_truep(C_i_nullp(t1))){
/* irregex-core.scm:1034: 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[175];
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}
else{
t2=C_i_car(t1);
t3=C_mutate(((C_word *)t0)+3,t2);
t4=C_u_i_cdr(t1);
t5=C_mutate(((C_word *)t0)+4,t4);
t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12282,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
t7=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[8],C_fix(1));
/* irregex-core.scm:1038: string-scan-char */
t8=C_retrieve2(lf[55],C_text("chicken.irregex#string-scan-char"));{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t8;
av2[1]=t6;
av2[2]=((C_word*)t0)[9];
av2[3]=C_make_character(125);
av2[4]=t7;
((C_proc)(void*)(*((C_word*)t8+1)))(5,av2);}}}

/* k12280 in k12264 in k12255 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
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 t4;
C_word t5;
C_word t6;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(20,c,4)))){
C_save_and_reclaim((void *)f_12282,c,av);}
a=C_alloc(20);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12285,a[2]=((C_word*)t2)[2],a[3]=C_SCHEME_UNDEFINED,a[4]=t1,a[5]=C_SCHEME_UNDEFINED,a[6]=((C_word*)t2)[3],a[7]=((C_word*)t2)[4],a[8]=((C_word*)t2)[5],a[9]=((C_word*)t2)[6],a[10]=((C_word*)t2)[7],a[11]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=12,tmp);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12410,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
t5=C_a_i_fixnum_plus(&a,2,((C_word*)t2)[8],C_fix(1));
/* irregex-core.scm:1039: 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]=t4;
av2[2]=((C_word*)t2)[9];
av2[3]=t5;
av2[4]=t1;
((C_proc)(void*)(*((C_word*)t6+1)))(5,av2);}}

/* k12283 in k12280 in k12264 in k12255 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12285(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_12285,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+3,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12288,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1041: scheme#string->number */
t4=*((C_word*)lf[86]+1);{
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)[3]);
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k12286 in k12283 in k12280 in k12264 in k12255 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12288(C_word c,C_word *av){
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_12288,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+5,t1);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12291,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
if(C_truep(C_i_pairp(C_u_i_cdr(((C_word*)t2)[3])))){
/* irregex-core.scm:1043: scheme#string->number */
t5=*((C_word*)lf[86]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t5;
av2[1]=t4;
av2[2]=C_i_cadr(((C_word*)t2)[3]);
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
t5=t4;{
C_word *av2=av;
av2[0]=t5;
av2[1]=C_SCHEME_FALSE;
f_12291(2,av2);}}}

/* k12289 in k12286 in k12283 in k12280 in k12264 in k12255 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12291(C_word c,C_word *av){
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(3,c,2)))){
C_save_and_reclaim((void *)f_12291,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+11,t1);
t4=C_i_not(((C_word*)t2)[5]);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12300,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
if(C_truep(t4)){
t6=t5;
f_12300(t6,t4);}
else{
if(C_truep(C_i_pairp(C_u_i_cdr(((C_word*)t2)[3])))){
t6=C_i_cadr(((C_word*)t2)[3]);
t7=C_i_equalp(lf[177],t6);
t8=C_i_not(t7);
t9=t5;
f_12300(t9,(C_truep(t8)?C_i_not(((C_word*)t2)[11]):C_SCHEME_FALSE));}
else{
t6=t5;
f_12300(t6,C_SCHEME_FALSE);}}}

/* k12298 in k12289 in k12286 in k12283 in k12280 in k12264 in k12255 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_12300(C_word t0,C_word 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(25,0,6)))){
C_save_and_reclaim_args((void *)trf_12300,2,t0,t1);}
a=C_alloc(25);
t2=((C_word*)t0)[2];
if(C_truep(t1)){
/* irregex-core.scm:1049: chicken.base#error */
t3=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t3;
av2[1]=((C_word*)t2)[2];
av2[2]=lf[176];
av2[3]=((C_word*)t2)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}
else{
if(C_truep(C_i_nullp(C_u_i_cdr(((C_word*)t2)[3])))){
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t2)[4],C_fix(1));
t4=C_a_i_fixnum_plus(&a,2,((C_word*)t2)[4],C_fix(1));
t5=C_a_i_list(&a,3,lf[135],((C_word*)t2)[5],((C_word*)t2)[6]);
t6=C_a_i_cons(&a,2,t5,((C_word*)t2)[7]);
/* irregex-core.scm:1051: lp */
t7=((C_word*)((C_word*)t2)[8])[1];
f_10694(t7,((C_word*)t2)[2],t3,t4,((C_word*)t2)[9],t6,((C_word*)t2)[10]);}
else{
if(C_truep(((C_word*)t2)[11])){
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t2)[4],C_fix(1));
t4=C_a_i_fixnum_plus(&a,2,((C_word*)t2)[4],C_fix(1));
t5=C_a_i_list(&a,4,lf[134],((C_word*)t2)[5],((C_word*)t2)[11],((C_word*)t2)[6]);
t6=C_a_i_cons(&a,2,t5,((C_word*)t2)[7]);
/* irregex-core.scm:1053: lp */
t7=((C_word*)((C_word*)t2)[8])[1];
f_10694(t7,((C_word*)t2)[2],t3,t4,((C_word*)t2)[9],t6,((C_word*)t2)[10]);}
else{
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t2)[4],C_fix(1));
t4=C_a_i_fixnum_plus(&a,2,((C_word*)t2)[4],C_fix(1));
t5=C_a_i_list(&a,3,lf[136],((C_word*)t2)[5],((C_word*)t2)[6]);
t6=C_a_i_cons(&a,2,t5,((C_word*)t2)[7]);
/* irregex-core.scm:1055: lp */
t7=((C_word*)((C_word*)t2)[8])[1];
f_10694(t7,((C_word*)t2)[2],t3,t4,((C_word*)t2)[9],t6,((C_word*)t2)[10]);}}}}

/* k12408 in k12280 in k12264 in k12255 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12410(C_word c,C_word *av){
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_12410,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_9177,a[2]=t1,a[3]=t2,a[4]=t4,a[5]=((C_word)li85),tmp=(C_word)a,a+=6,tmp));
t6=((C_word*)t4)[1];
f_9177(t6,((C_word*)t0)[2],C_fix(0),C_fix(0),C_SCHEME_END_OF_LIST);}

/* k12484 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12486(C_word c,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_12486,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[179],t1);
/* irregex-core.scm:1065: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10694(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12511 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12513(C_word c,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_12513,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1067: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12534 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12536(C_word c,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_12536,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[80],t1);
/* irregex-core.scm:1069: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10694(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12561 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12563(C_word c,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_12563,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1071: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12588 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12590(C_word c,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_12590,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1073: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12619 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12621(C_word c,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_12621,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1076: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12654 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12656(C_word c,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_12656,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1079: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12677 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12679(C_word c,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_12679,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[186],t1);
/* irregex-core.scm:1082: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10694(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12700 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12702(C_word c,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_12702,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[187],t1);
/* irregex-core.scm:1084: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10694(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12731 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12733(C_word c,C_word *av){
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_12733,c,av);}
a=C_alloc(6);
t2=C_a_i_cons(&a,2,lf[188],t1);
t3=C_a_i_cons(&a,2,((C_word*)t0)[2],t2);
/* irregex-core.scm:1086: lp */
t4=((C_word*)((C_word*)t0)[3])[1];
f_10694(t4,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t3,((C_word*)t0)[8]);}

/* k12754 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12756(C_word c,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_12756,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[188],t1);
/* irregex-core.scm:1089: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10694(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12777 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12779(C_word c,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_12779,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[81],t1);
/* irregex-core.scm:1091: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10694(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12800 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12802(C_word c,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_12802,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[189],t1);
/* irregex-core.scm:1093: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10694(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12823 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12825(C_word c,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_12825,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[184],t1);
/* irregex-core.scm:1096: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10694(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k12846 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12848(C_word c,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_12848,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[185],t1);
/* irregex-core.scm:1098: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10694(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* a12858 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12859(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_12859,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_12879,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:1102: collect */
t7=((C_word*)((C_word*)t0)[5])[1];
f_10775(t7,t6);}

/* k12877 in a12858 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12879(C_word c,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_12879,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1102: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12881 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12883(C_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_12883,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);}}

/* k12905 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_12907(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,4)))){
C_save_and_reclaim_args((void *)trf_12907,2,t0,t1);}
a=C_alloc(8);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12910,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[8],C_fix(2));
/* irregex-core.scm:1109: string-scan-char */
t4=C_retrieve2(lf[55],C_text("chicken.irregex#string-scan-char"));{
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);}}

/* k12908 in k12905 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
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 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_12910,c,av);}
a=C_alloc(14);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12913,a[2]=((C_word*)t2)[2],a[3]=t1,a[4]=((C_word*)t2)[3],a[5]=((C_word*)t2)[4],a[6]=((C_word*)t2)[5],a[7]=((C_word*)t2)[6],a[8]=((C_word*)t2)[7],tmp=(C_word)a,a+=9,tmp);
if(C_truep(t1)){
t4=C_a_i_fixnum_plus(&a,2,((C_word*)t2)[8],C_fix(3));
/* irregex-core.scm:1110: 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*)t2)[4];
av2[3]=t4;
av2[4]=t1;
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}
else{
t4=t3;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
f_12913(2,av2);}}}

/* k12911 in k12908 in k12905 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12913(C_word c,C_word *av){
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_12913,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[192]:lf[193]);
if(C_truep(C_i_not(((C_word*)t0)[3]))){
/* irregex-core.scm:1116: 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[194];
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_12952,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:1118: scheme#string->symbol */
t8=*((C_word*)lf[85]+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);}}}

/* k12946 in k12950 in k12911 in k12908 in k12905 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12948(C_word c,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_12948,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1117: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k12950 in k12911 in k12908 in k12905 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12952(C_word c,C_word *av){
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_12952,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_12948,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:1119: collect */
t4=((C_word*)((C_word*)t0)[9])[1];
f_10775(t4,t3);}

/* k12977 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_12979(C_word c,C_word *av){
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_12979,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_12987,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)li87),tmp=(C_word)a,a+=11,tmp));
t6=((C_word*)t4)[1];
f_12987(t6,((C_word*)t0)[8],t2);}

/* lp2 in k12977 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_12987(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word 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_12987,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:1126: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(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:1130: lp */
t7=((C_word*)((C_word*)t0)[3])[1];
f_10694(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_13047,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:1133: 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:1135: 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:1137: lp2 */
t13=t1;
t14=t5;
t1=t13;
t2=t14;
goto loop;}}}

/* k13045 in lp2 in k12977 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13047(C_word c,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_13047,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:1132: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* a13089 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13090(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_13090,c,av);}
a=C_alloc(8);
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13102,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:1141: collect */
t5=((C_word*)((C_word*)t0)[5])[1];
f_10775(t5,t4);}

/* k13100 in a13089 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13102(C_word c,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_13102,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1141: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k13109 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13111(C_word c,C_word *av){
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_13111,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[192]:lf[193]);
t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13135,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_13139,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:1159: 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);}}

/* k13129 in k13133 in k13109 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13131(C_word c,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_13131,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1161: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k13133 in k13109 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13135(C_word c,C_word *av){
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_13135,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_13131,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:1160: collect */
t4=((C_word*)((C_word*)t0)[8])[1];
f_10775(t4,t3);}

/* k13137 in k13109 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13139(C_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_13139,c,av);}
/* irregex-core.scm:1158: scheme#string->number */
t2=*((C_word*)lf[86]+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);}}

/* k13189 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13191(C_word c,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_13191,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1165: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k13205 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13207(C_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_13207,c,av);}
/* irregex-core.scm:1169: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10694(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t1,((C_word*)t0)[7]);}

/* k13269 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13271(C_word c,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_13271,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[104],t1);
/* irregex-core.scm:1171: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_10694(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t2,((C_word*)t0)[7]);}

/* k13295 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13297(C_word c,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_13297,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1174: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k13324 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13326(C_word c,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_13326,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1177: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_10694(t3,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],t2,((C_word*)t0)[8]);}

/* k13352 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13354(C_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_13354,c,av);}
/* irregex-core.scm:1180: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10694(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t1,((C_word*)t0)[7]);}

/* k13373 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13375(C_word c,C_word *av){
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_13375,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_13393,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:1186: collect */
t6=((C_word*)((C_word*)t0)[7])[1];
f_10775(t6,t5);}

/* k13391 in k13373 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13393(C_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_13393,c,av);}
/* irregex-core.scm:1186: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_10694(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 k7970 in k7739 in k7736 */
static void f_13507(C_word 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_13507,4,t1,t2,t3,t4);}
a=C_alloc(21);
if(C_truep(C_fixnum_greater_or_equal_p(t3,t4))){
/* irregex-core.scm:1209: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t5;
av2[1]=t1;
av2[2]=lf[200];
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_13526,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_9082,a[2]=t10,a[3]=t2,a[4]=t14,a[5]=((C_word)li92),tmp=(C_word)a,a+=6,tmp));
t16=((C_word*)t14)[1];
f_9082(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:1220: chicken.base#error */
t8=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t8;
av2[1]=t1;
av2[2]=lf[203];
av2[3]=t2;
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t8+1)))(5,av2);}}
else{
t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13575,a[2]=t3,a[3]=t1,a[4]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=5,tmp);
t9=C_a_i_fixnum_plus(&a,2,t3,C_fix(2));
/* irregex-core.scm:1222: 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);}}}}}

/* k13524 in chicken.irregex#string-parse-hex-escape in k7970 in k7739 in k7736 */
static void C_ccall f_13526(C_word c,C_word *av){
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_13526,c,av);}
a=C_alloc(10);
if(C_truep(C_i_not(t1))){
/* irregex-core.scm:1213: 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[201];
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|4,a[1]=(C_word)f_13538,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=5,tmp);
t3=C_a_i_fixnum_plus(&a,2,((C_word*)t0)[4],C_fix(1));
/* irregex-core.scm:1214: 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);}}}

/* k13536 in k13524 in chicken.irregex#string-parse-hex-escape in k7970 in k7739 in k7736 */
static void C_ccall f_13538(C_word c,C_word *av){
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_13538,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+4,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13541,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1215: scheme#string->number */
t4=*((C_word*)lf[86]+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_fix(16);
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}

/* k13539 in k13536 in k13524 in chicken.irregex#string-parse-hex-escape in k7970 in k7739 in k7736 */
static void C_ccall f_13541(C_word c,C_word *av){
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_13541,c,av);}
a=C_alloc(6);
t2=((C_word*)t0)[2];
if(C_truep(t1)){
t3=C_unfix(t1);
t4=C_make_character(t3);
t5=((C_word*)t2)[2];{
C_word *av2=av;
av2[0]=t5;
av2[1]=C_a_i_list2(&a,2,t4,((C_word*)t2)[3]);
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
/* irregex-core.scm:1218: 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*)t2)[2];
av2[2]=lf[202];
av2[3]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}}

/* k13573 in chicken.irregex#string-parse-hex-escape in k7970 in k7739 in k7736 */
static void C_ccall f_13575(C_word c,C_word *av){
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_13575,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+4,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13578,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1223: scheme#string->number */
t4=*((C_word*)lf[86]+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_fix(16);
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}

/* k13576 in k13573 in chicken.irregex#string-parse-hex-escape in k7970 in k7739 in k7736 */
static void C_ccall f_13578(C_word c,C_word *av){
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_13578,c,av);}
a=C_alloc(11);
t2=((C_word*)t0)[2];
if(C_truep(t1)){
t3=C_unfix(t1);
t4=C_make_character(t3);
t5=C_a_i_fixnum_plus(&a,2,((C_word*)t2)[2],C_fix(2));
t6=((C_word*)t2)[3];{
C_word *av2=av;
av2[0]=t6;
av2[1]=C_a_i_list2(&a,2,t4,t5);
((C_proc)(void*)(*((C_word*)t6+1)))(2,av2);}}
else{
/* irregex-core.scm:1226: 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*)t2)[3];
av2[2]=lf[204];
av2[3]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}}

/* go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_13622(C_word t0,C_word 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_13622,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:1234: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word av2[6];
av2[0]=t5;
av2[1]=t1;
av2[2]=lf[162];
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_13657,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:3812: cset-union */
t12=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
C_word av2[4];
av2[0]=t12;
av2[1]=t9;
av2[2]=t4;
av2[3]=t11;
f_27469(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_13667,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:1242: cset-case-insensitive */
f_28002(t10,t4);}
else{
t11=t10;{
C_word av2[2];
av2[0]=t11;
av2[1]=t4;
f_13667(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_13695,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_13695(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_13695(t11,t10);}
else{
t11=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t12=t7;
f_13695(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|8,a[1]=(C_word)f_13897,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=C_SCHEME_UNDEFINED,a[5]=((C_word*)t0)[4],a[6]=t4,a[7]=t8,a[8]=t9,tmp=(C_word)a,a+=9,tmp);
t13=C_a_i_fixnum_plus(&a,2,t9,C_fix(1));
/* irregex-core.scm:1276: string-scan-char */
t14=C_retrieve2(lf[55],C_text("chicken.irregex#string-scan-char"));{
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:1285: chicken.base#error */
t14=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t14;
av2[1]=t1;
av2[2]=lf[174];
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_13980,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:3812: cset-union */
t18=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
C_word av2[4];
av2[0]=t18;
av2[1]=t15;
av2[2]=t4;
av2[3]=t17;
f_27469(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_14019,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_14019(t10,t8);}
else{
t10=C_eqp(t7,C_make_character(68));
if(C_truep(t10)){
t11=t9;
f_14019(t11,t10);}
else{
t11=C_eqp(t7,C_make_character(115));
if(C_truep(t11)){
t12=t9;
f_14019(t12,t11);}
else{
t12=C_eqp(t7,C_make_character(83));
if(C_truep(t12)){
t13=t9;
f_14019(t13,t12);}
else{
t13=C_eqp(t7,C_make_character(119));
t14=t9;
f_14019(t14,(C_truep(t13)?t13:C_eqp(t7,C_make_character(87))));}}}}
default:
t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14136,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_14136(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_14136(t7,C_SCHEME_FALSE);}}}}

/* k13655 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13657(C_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_13657,c,av);}
/* irregex-core.scm:1239: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13622(t2,((C_word*)t0)[3],((C_word*)t0)[4],C_make_character(93),t1);}

/* k13665 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13667(C_word c,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_13667,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13674,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:1243: cset-complement */
f_27992(t2,t1);}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=t1;
f_13674(2,av2);}}}

/* k13672 in k13665 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13674(C_word c,C_word *av){
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,4)))){
C_save_and_reclaim((void *)f_13674,c,av);}
a=C_alloc(10);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27326,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27328,a[2]=((C_word)li79),tmp=(C_word)a,a+=3,tmp);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27346,a[2]=t2,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3761: scheme#vector->list */
t5=*((C_word*)lf[164]+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);}}

/* k13693 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_13695(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word 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_13695,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_13705,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:3812: cset-union */
t6=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
C_word av2[4];
av2[0]=t6;
av2[1]=t3;
av2[2]=((C_word*)t0)[6];
av2[3]=t5;
f_27469(4,av2);}}
else{
if(C_truep(C_i_not(((C_word*)t0)[7]))){
/* irregex-core.scm:1252: 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[167];
((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_13722,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],a[5]=((C_word)li80),tmp=(C_word)a,a+=6,tmp);
t5=C_eqp(C_make_character(92),t3);
t6=(C_truep(t5)?C_i_assq(t3,C_retrieve2(lf[169],C_text("chicken.irregex#posix-escape-sequences"))):C_SCHEME_FALSE);
t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13750,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_13751,a[2]=((C_word*)t0)[2],a[3]=((C_word)li81),tmp=(C_word)a,a+=4,tmp);
t9=(
/* irregex-core.scm:1260: g1904 */
  f_13751(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_13772,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_13772(t11,C_eqp(C_i_string_ref(((C_word*)t0)[8],t10),C_make_character(120)));}
else{
t10=t8;
f_13772(t10,C_SCHEME_FALSE);}}}}}

/* k13703 in k13693 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13705(C_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_13705,c,av);}
/* irregex-core.scm:1250: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13622(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* a13721 in k13693 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13722(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_13722,c,av);}
a=C_alloc(10);
if(C_truep(C_i_char_lessp(t2,((C_word*)t0)[2]))){
/* irregex-core.scm:1258: 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[168];
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_13739,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:1259: cset-union */
t7=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
C_word *av2=av;
av2[0]=t7;
av2[1]=t4;
av2[2]=((C_word*)t0)[4];
av2[3]=t6;
f_27469(4,av2);}}}

/* k13737 in a13721 in k13693 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13739(C_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_13739,c,av);}
/* irregex-core.scm:1259: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13622(t2,((C_word*)t0)[3],((C_word*)t0)[4],C_SCHEME_FALSE,t1);}

/* k13748 in k13693 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
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);}{
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);}}

/* g1904 in k13693 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static C_word f_13751(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));}

/* k13770 in k13693 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_13772(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_13772,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:1265: string-parse-hex-escape */
f_13507(((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_13784,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_13784(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_13784(t3,C_SCHEME_FALSE);}}}

/* k13782 in k13770 in k13693 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_13784(C_word 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_13784,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[171],t2);
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13794,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:1268: utf8-string-ref */
f_14247(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);}}}

/* k13792 in k13782 in k13770 in k13693 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13794(C_word c,C_word *av){
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_13794,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);}}

/* k13895 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13897(C_word c,C_word *av){
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(3,c,2)))){
C_save_and_reclaim((void *)f_13897,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+4,t1);
t3=C_i_not(((C_word*)t0)[4]);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13906,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(t3)){
t5=t4;
f_13906(t5,t3);}
else{
t5=C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
t6=C_i_string_ref(((C_word*)t0)[3],t5);
t7=t4;
f_13906(t7,C_i_not(C_eqp(C_make_character(93),t6)));}}

/* k13904 in k13895 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_13906(C_word t0,C_word 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(18,0,4)))){
C_save_and_reclaim_args((void *)trf_13906,2,t0,t1);}
a=C_alloc(18);
t2=((C_word*)t0)[2];
if(C_truep(t1)){
/* irregex-core.scm:1278: chicken.base#error */
t3=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t3;
av2[1]=((C_word*)t2)[2];
av2[2]=lf[172];
av2[3]=((C_word*)t2)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}
else{
t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13912,a[2]=((C_word*)t2)[4],a[3]=((C_word*)t2)[5],a[4]=((C_word*)t2)[2],a[5]=((C_word*)t2)[6],a[6]=((C_word*)t2)[7],tmp=(C_word)a,a+=7,tmp);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13932,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13936,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
t6=C_a_i_fixnum_plus(&a,2,((C_word*)t2)[8],C_fix(1));
/* irregex-core.scm:1281: scheme#substring */
t7=*((C_word*)lf[46]+1);{
C_word av2[5];
av2[0]=t7;
av2[1]=t5;
av2[2]=((C_word*)t2)[3];
av2[3]=t6;
av2[4]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t7+1)))(5,av2);}}}

/* k13910 in k13904 in k13895 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13912(C_word c,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_13912,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13915,a[2]=((C_word*)t0)[2],a[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:1282: cset-complement */
f_27992(t2,t1);}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=t1;
f_13915(2,av2);}}}

/* k13913 in k13910 in k13904 in k13895 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13915(C_word c,C_word *av){
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_13915,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_13925,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:1283: cset-union */
t4=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
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_27469(4,av2);}}

/* k13923 in k13913 in k13910 in k13904 in k13895 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13925(C_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_13925,c,av);}
/* irregex-core.scm:1283: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13622(t2,((C_word*)t0)[3],((C_word*)t0)[4],C_SCHEME_FALSE,t1);}

/* k13930 in k13904 in k13895 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13932(C_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_13932,c,av);}
/* irregex-core.scm:1279: sre->cset */
f_26881(((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}

/* k13934 in k13904 in k13895 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13936(C_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_13936,c,av);}
/* irregex-core.scm:1280: scheme#string->symbol */
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);}}

/* k13978 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_13980(C_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_13980,c,av);}
/* irregex-core.scm:1287: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13622(t2,((C_word*)t0)[3],((C_word*)t0)[4],C_make_character(91),t1);}

/* k14017 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_14019(C_word t0,C_word t1){
C_word tmp;
C_word 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(26,0,4)))){
C_save_and_reclaim_args((void *)trf_14019,2,t0,t1);}
a=C_alloc(26);
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_14029,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_14033,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_14037,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:1294: string->sre */
t7=C_fast_retrieve(lf[103]);{
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_14052,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],a[4]=((C_word)li82),tmp=(C_word)a,a+=5,tmp);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14064,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:1299: string-parse-hex-escape */
f_13507(t4,((C_word*)t0)[7],t5,((C_word*)t0)[8]);}
else{
t3=C_i_assq(((C_word*)t0)[6],C_retrieve2(lf[169],C_text("chicken.irregex#posix-escape-sequences")));
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_14083,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:3812: cset-union */
t9=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
C_word av2[4];
av2[0]=t9;
av2[1]=t6;
av2[2]=((C_word*)t0)[5];
av2[3]=t8;
f_27469(4,av2);}}}}

/* k14027 in k14017 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_14029(C_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_14029,c,av);}
/* irregex-core.scm:1292: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13622(t2,((C_word*)t0)[3],((C_word*)t0)[4],C_SCHEME_FALSE,t1);}

/* k14031 in k14017 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_14033(C_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_14033,c,av);}
/* irregex-core.scm:1293: cset-union */
t2=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
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_27469(4,av2);}}

/* k14035 in k14017 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_14037(C_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_14037,c,av);}
/* irregex-core.scm:1294: sre->cset */
f_26881(((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}

/* a14051 in k14017 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_14052(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_14052,c,av);}
a=C_alloc(11);
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14060,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:3812: cset-union */
t7=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
C_word *av2=av;
av2[0]=t7;
av2[1]=t4;
av2[2]=((C_word*)t0)[3];
av2[3]=t6;
f_27469(4,av2);}}

/* k14058 in a14051 in k14017 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_14060(C_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_14060,c,av);}
/* irregex-core.scm:1298: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13622(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* k14062 in k14017 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_14064(C_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_14064,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);}}

/* k14081 in k14017 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_14083(C_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_14083,c,av);}
/* irregex-core.scm:1303: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13622(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* k14134 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_14136(C_word 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_14136,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[171],t2);
t4=C_fixnum_plus(((C_word*)t0)[3],t3);
t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14150,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:1308: utf8-string-ref */
f_14247(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_14168,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:3812: cset-union */
t6=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
C_word av2[4];
av2[0]=t6;
av2[1]=t3;
av2[2]=((C_word*)t0)[6];
av2[3]=t5;
f_27469(4,av2);}}}

/* k14148 in k14134 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_14150(C_word c,C_word *av){
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_14150,c,av);}
a=C_alloc(10);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14154,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_14158,a[2]=t2,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1309: utf8-string-ref */
f_14247(t3,((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);}

/* k14152 in k14148 in k14134 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_14154(C_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_14154,c,av);}
/* irregex-core.scm:1307: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13622(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* k14156 in k14148 in k14134 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_14158(C_word c,C_word *av){
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_14158,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:3812: cset-union */
t4=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
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_27469(4,av2);}}

/* k14166 in k14134 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_14168(C_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_14168,c,av);}
/* irregex-core.scm:1310: go */
t2=((C_word*)((C_word*)t0)[2])[1];
f_13622(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* chicken.irregex#high-char? in k7970 in k7739 in k7736 */
static void C_ccall f_14226(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_14226,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 k7970 in k7739 in k7736 */
static void f_14247(C_word 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_14247,4,t1,t2,t3,t4);}
a=C_alloc(9);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14250,a[2]=t2,a[3]=((C_word)li95),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:1371: byte */
  f_14250(t5,t3)
);
t7=C_fixnum_and(t6,C_fix(31));
t8=C_fixnum_shift_left(t7,C_fix(6));
t9=(
/* irregex-core.scm:1372: byte */
  f_14250(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:1375: byte */
  f_14250(t5,t3)
);
t7=C_fixnum_and(t6,C_fix(15));
t8=C_fixnum_shift_left(t7,C_fix(12));
t9=(
/* irregex-core.scm:1376: byte */
  f_14250(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:1377: byte */
  f_14250(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:1380: byte */
  f_14250(t5,t3)
);
t7=C_fixnum_and(t6,C_fix(7));
t8=C_fixnum_shift_left(t7,C_fix(18));
t9=(
/* irregex-core.scm:1381: byte */
  f_14250(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:1382: byte */
  f_14250(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:1383: byte */
  f_14250(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:1385: chicken.base#error */
t6=*((C_word*)lf[30]+1);{
C_word av2[6];
av2[0]=t6;
av2[1]=t1;
av2[2]=lf[206];
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 k7970 in k7739 in k7736 */
static C_word f_14250(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 k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_14451(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word 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_14451,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:1394: lp */
t10=t1;
t11=t8;
t1=t10;
t2=t11;
goto loop;}}}

/* chicken.irregex#utf8-lowest-digit-of-length in k7970 in k7739 in k7736 */
static void f_14489(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_14489,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:1399: chicken.base#error */
t3=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t3;
av2[1]=t1;
av2[2]=lf[208];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}}

/* chicken.irregex#char->utf8-list in k7970 in k7739 in k7736 */
static void f_14565(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word 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_14565,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:1422: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t4;
av2[1]=t1;
av2[2]=lf[210];
av2[3]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}}}}}

/* k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_14706(C_word c,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_14706,c,av);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14709,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:1426: char->utf8-list */
f_14565(t2,((C_word*)t0)[8]);}

/* k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_14709(C_word c,C_word *av){
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(23,c,4)))){
C_save_and_reclaim((void *)f_14709,c,av);}
a=C_alloc(23);
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_15340,a[2]=((C_word*)t0)[3],a[3]=((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=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15647,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t1,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
t6=C_i_car(((C_word*)t0)[2]);
t7=C_unfix(t6);
t8=C_make_character(t7);
t9=C_u_i_car(((C_word*)t0)[2]);
if(C_truep(C_fixnum_less_or_equal_p(t9,C_fix(127)))){
t10=C_unfix(C_fix(127));
t11=C_make_character(t10);
t12=t5;
f_15647(t12,C_a_i_list(&a,3,lf[52],t8,t11));}
else{
t10=C_unfix(C_fix(255));
t11=C_make_character(t10);
t12=t5;
f_15647(t12,C_a_i_list(&a,3,lf[52],t8,t11));}}
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_14735,a[2]=t4,a[3]=((C_word)li114),tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
f_14735(t6,((C_word*)t0)[8],((C_word*)t0)[2],t1);}}

/* k14728 in k15338 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_14730(C_word c,C_word *av){
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_14730,c,av);}
a=C_alloc(12);
t2=C_a_i_list2(&a,2,((C_word*)t0)[2],t1);
t3=(
/* irregex-core.scm:1428: sre-alternate */
  f_18603(C_a_i(&a,3),t2)
);
t4=C_a_i_cons(&a,2,t3,((C_word*)t0)[3]);
/* irregex-core.scm:1542: lp */
t5=((C_word*)((C_word*)t0)[4])[1];
f_15862(t5,((C_word*)t0)[5],((C_word*)t0)[6],t4,((C_word*)t0)[7]);}

/* lp in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void f_14735(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_14735,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_unfix(t7);
t9=C_make_character(t8);
if(C_truep(C_i_nullp(C_u_i_cdr(t2)))){
t10=C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
/* irregex-core.scm:1433: sre-sequence */
t11=t1;{
C_word av2[2];
av2[0]=t11;
av2[1]=(
/* irregex-core.scm:1433: sre-sequence */
  f_18580(C_a_i(&a,3),t10)
);
((C_proc)(void*)(*((C_word*)t11+1)))(2,av2);}}
else{
t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14770,a[2]=t9,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1436: lp */
t12=t10;
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_14795,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1438: unicode-range-up-from */
f_14999(t10,t2);}
else{
t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14810,a[2]=t2,a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1441: unicode-range-up-from */
f_14999(t10,t2);}}}

/* k14768 in lp in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_14770(C_word c,C_word *av){
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_14770,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:1433: sre-sequence */
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=(
/* irregex-core.scm:1433: sre-sequence */
  f_18580(C_a_i(&a,3),t3)
);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* k14793 in lp in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_14795(C_word c,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_14795,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14799,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1439: unicode-range-up-to */
f_15164(t2,((C_word*)t0)[3]);}

/* k14797 in k14793 in lp in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_14799(C_word c,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_14799,c,av);}
a=C_alloc(9);
t2=C_a_i_list2(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1438: sre-alternate */
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=(
/* irregex-core.scm:1438: sre-alternate */
  f_18603(C_a_i(&a,3),t2)
);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* k14808 in lp in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_14810(C_word c,C_word *av){
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 *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(28,c,3)))){
C_save_and_reclaim((void *)f_14810,c,av);}
a=C_alloc(28);
t2=C_i_car(((C_word*)t0)[2]);
t3=C_fixnum_plus(t2,C_fix(1));
t4=C_unfix(t3);
t5=C_make_character(t4);
t6=C_i_car(((C_word*)t0)[3]);
t7=C_fixnum_difference(t6,C_fix(1));
t8=C_unfix(t7);
t9=C_make_character(t8);
t10=C_i_char_equalp(t5,t9);
t11=(C_truep(t10)?t5:C_a_i_list(&a,3,lf[52],t5,t9));
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=C_u_i_cdr(((C_word*)t0)[2]);
t17=C_i_check_list_2(t16,lf[212]);
t18=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15794,a[2]=t11,a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,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|5,a[1]=(C_word)f_15796,a[2]=t14,a[3]=t20,a[4]=t15,a[5]=((C_word)li113),tmp=(C_word)a,a+=6,tmp));
t22=((C_word*)t20)[1];
f_15796(t22,t18,t16);}

/* k14816 in k15792 in k14808 in lp in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_14818(C_word c,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_14818,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:1441: sre-alternate */
t3=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t3;
av2[1]=(
/* irregex-core.scm:1441: sre-alternate */
  f_18603(C_a_i(&a,3),t2)
);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* chicken.irregex#unicode-range-helper in k7970 in k7739 in k7736 */
static void f_14844(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_14844,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_14874,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[212]);
t15=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14887,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_14963,a[2]=t12,a[3]=t17,a[4]=t13,a[5]=((C_word)li100),tmp=(C_word)a,a+=6,tmp));
t19=((C_word*)t17)[1];
f_14963(t19,t15,t4);}}

/* k14872 in chicken.irregex#unicode-range-helper in k7970 in k7739 in k7736 */
static void C_ccall f_14874(C_word c,C_word *av){
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_14874,c,av);}
a=C_alloc(6);
t2=(
/* irregex-core.scm:1452: sre-sequence */
  f_18580(C_a_i(&a,3),t1)
);
t3=C_a_i_cons(&a,2,t2,((C_word*)t0)[2]);
/* irregex-core.scm:1448: unicode-range-helper */
f_14844(((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t3);}

/* k14885 in chicken.irregex#unicode-range-helper in k7970 in k7739 in k7736 */
static void C_ccall f_14887(C_word c,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_14887,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14895,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:1454: 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);}}

/* k14893 in k14885 in chicken.irregex#unicode-range-helper in k7970 in k7739 in k7736 */
static void C_ccall f_14895(C_word c,C_word *av){
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_14895,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[212]);
t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14925,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_14927,a[2]=t4,a[3]=t10,a[4]=t5,a[5]=((C_word)li99),tmp=(C_word)a,a+=6,tmp));
t12=((C_word*)t10)[1];
f_14927(t12,t8,t6);}

/* k14923 in k14893 in k14885 in chicken.irregex#unicode-range-helper in k7970 in k7739 in k7736 */
static void C_ccall f_14925(C_word c,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_14925,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1453: ##sys#append */
t3=*((C_word*)lf[119]+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-loop2110 in k14893 in k14885 in chicken.irregex#unicode-range-helper in k7970 in k7739 in k7736 */
static void f_14927(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word 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(12,0,2)))){
C_save_and_reclaim_args((void *)trf_14927,3,t0,t1,t2);}
a=C_alloc(12);
if(C_truep(C_i_pairp(t2))){
t3=C_unfix(C_fix(128));
t4=C_make_character(t3);
t5=C_unfix(C_fix(255));
t6=C_make_character(t5);
t7=C_a_i_list(&a,3,lf[52],t4,t6);
t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
t9=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t8);
t10=C_mutate(((C_word *)((C_word*)t0)[2])+1,t8);
t12=t1;
t13=C_slot(t2,C_fix(1));
t1=t12;
t2=t13;
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-loop2083 in chicken.irregex#unicode-range-helper in k7970 in k7739 in k7736 */
static void f_14963(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word 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(3,0,2)))){
C_save_and_reclaim_args((void *)trf_14963,3,t0,t1,t2);}
a=C_alloc(3);
if(C_truep(C_i_pairp(t2))){
t3=C_slot(t2,C_fix(0));
t4=C_unfix(t3);
t5=C_make_character(t4);
t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
t7=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t6);
t8=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
t10=t1;
t11=C_slot(t2,C_fix(1));
t1=t10;
t2=t11;
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 k7970 in k7739 in k7736 */
static void f_14999(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,0,3)))){
C_save_and_reclaim_args((void *)trf_14999,2,t1,t2);}
a=C_alloc(13);
t3=C_i_car(t2);
t4=C_unfix(t3);
t5=C_make_character(t4);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15022,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15024,a[2]=t2,a[3]=((C_word)li102),tmp=(C_word)a,a+=4,tmp);
t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15156,a[2]=t6,a[3]=t7,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1468: ##sys#fast-reverse */
t9=C_fast_retrieve(lf[70]);{
C_word av2[3];
av2[0]=t9;
av2[1]=t8;
av2[2]=C_u_i_cdr(t2);
((C_proc)(void*)(*((C_word*)t9+1)))(3,av2);}}

/* k15020 in chicken.irregex#unicode-range-up-from in k7970 in k7739 in k7736 */
static void C_ccall f_15022(C_word c,C_word *av){
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_15022,c,av);}
a=C_alloc(12);
t2=(
/* irregex-core.scm:1464: sre-alternate */
  f_18603(C_a_i(&a,3),t1)
);
t3=C_a_i_list2(&a,2,((C_word*)t0)[2],t2);
/* irregex-core.scm:1462: sre-sequence */
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=(
/* irregex-core.scm:1462: sre-sequence */
  f_18580(C_a_i(&a,3),t3)
);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* a15023 in chicken.irregex#unicode-range-up-from in k7970 in k7739 in k7736 */
static void C_ccall f_15024(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 *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_15024,c,av);}
a=C_alloc(9);
t3=C_i_car(((C_word*)t0)[2]);
t4=C_fixnum_plus(t3,C_fix(1));
t5=C_unfix(t4);
t6=C_make_character(t5);
t7=C_unfix(C_fix(255));
t8=C_make_character(t7);
t9=t1;{
C_word *av2=av;
av2[0]=t9;
av2[1]=C_a_i_list(&a,3,lf[52],t6,t8);
((C_proc)(void*)(*((C_word*)t9+1)))(2,av2);}}

/* k15064 in k15154 in chicken.irregex#unicode-range-up-from in k7970 in k7739 in k7736 */
static void C_ccall f_15066(C_word c,C_word *av){
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_15066,c,av);}
a=C_alloc(6);
t2=(
/* irregex-core.scm:1471: sre-sequence */
  f_18580(C_a_i(&a,3),t1)
);
t3=C_a_i_list1(&a,1,t2);
/* irregex-core.scm:1465: unicode-range-helper */
f_14844(((C_word*)t0)[2],((C_word*)t0)[3],((C_word*)t0)[4],C_SCHEME_END_OF_LIST,t3);}

/* k15074 in k15154 in chicken.irregex#unicode-range-up-from in k7970 in k7739 in k7736 */
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(12,c,3)))){
C_save_and_reclaim((void *)f_15076,c,av);}
a=C_alloc(12);
t2=C_i_check_list_2(t1,lf[212]);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15082,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_15110,a[2]=((C_word*)t0)[4],a[3]=t5,a[4]=((C_word*)t0)[5],a[5]=((C_word)li103),tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
f_15110(t7,t3,t1);}

/* k15080 in k15074 in k15154 in chicken.irregex#unicode-range-up-from in k7970 in k7739 in k7736 */
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 *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_15082,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15108,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1474: last */
f_9468(t2,((C_word*)t0)[3]);}

/* k15106 in k15080 in k15074 in k15154 in chicken.irregex#unicode-range-up-from in k7970 in k7739 in k7736 */
static void C_ccall f_15108(C_word c,C_word *av){
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(12,c,3)))){
C_save_and_reclaim((void *)f_15108,c,av);}
a=C_alloc(12);
t2=C_unfix(t1);
t3=C_make_character(t2);
t4=C_unfix(C_fix(255));
t5=C_make_character(t4);
t6=C_a_i_list(&a,3,lf[52],t3,t5);
t7=C_a_i_list(&a,1,t6);
/* irregex-core.scm:1472: scheme#append */
t8=*((C_word*)lf[74]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t8;
av2[1]=((C_word*)t0)[2];
av2[2]=((C_word*)t0)[3];
av2[3]=t7;
((C_proc)(void*)(*((C_word*)t8+1)))(4,av2);}}

/* map-loop2161 in k15074 in k15154 in chicken.irregex#unicode-range-up-from in k7970 in k7739 in k7736 */
static void f_15110(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word 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(3,0,2)))){
C_save_and_reclaim_args((void *)trf_15110,3,t0,t1,t2);}
a=C_alloc(3);
if(C_truep(C_i_pairp(t2))){
t3=C_slot(t2,C_fix(0));
t4=C_unfix(t3);
t5=C_make_character(t4);
t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
t7=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t6);
t8=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
t10=t1;
t11=C_slot(t2,C_fix(1));
t1=t10;
t2=t11;
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);}}}

/* k15148 in k15154 in chicken.irregex#unicode-range-up-from in k7970 in k7739 in k7736 */
static void C_ccall f_15150(C_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_15150,c,av);}
/* irregex-core.scm:1473: ##sys#fast-reverse */
t2=C_fast_retrieve(lf[70]);{
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);}}

/* k15154 in chicken.irregex#unicode-range-up-from in k7970 in k7739 in k7736 */
static void C_ccall f_15156(C_word c,C_word *av){
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_15156,c,av);}
a=C_alloc(19);
t2=C_i_cdr(t1);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15066,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_15076,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_15150,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1473: ##sys#fast-reverse */
t10=C_fast_retrieve(lf[70]);{
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 k7970 in k7739 in k7736 */
static void f_15164(C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(13,0,3)))){
C_save_and_reclaim_args((void *)trf_15164,2,t1,t2);}
a=C_alloc(13);
t3=C_i_car(t2);
t4=C_unfix(t3);
t5=C_make_character(t4);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15187,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15189,a[2]=t2,a[3]=((C_word)li105),tmp=(C_word)a,a+=4,tmp);
t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15321,a[2]=t6,a[3]=t7,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1484: ##sys#fast-reverse */
t9=C_fast_retrieve(lf[70]);{
C_word av2[3];
av2[0]=t9;
av2[1]=t8;
av2[2]=C_u_i_cdr(t2);
((C_proc)(void*)(*((C_word*)t9+1)))(3,av2);}}

/* k15185 in chicken.irregex#unicode-range-up-to in k7970 in k7739 in k7736 */
static void C_ccall f_15187(C_word c,C_word *av){
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_15187,c,av);}
a=C_alloc(12);
t2=(
/* irregex-core.scm:1480: sre-alternate */
  f_18603(C_a_i(&a,3),t1)
);
t3=C_a_i_list2(&a,2,((C_word*)t0)[2],t2);
/* irregex-core.scm:1478: sre-sequence */
t4=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t4;
av2[1]=(
/* irregex-core.scm:1478: sre-sequence */
  f_18580(C_a_i(&a,3),t3)
);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* a15188 in chicken.irregex#unicode-range-up-to in k7970 in k7739 in k7736 */
static void C_ccall f_15189(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 *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_15189,c,av);}
a=C_alloc(9);
t3=C_unfix(C_fix(128));
t4=C_make_character(t3);
t5=C_i_car(((C_word*)t0)[2]);
t6=C_fixnum_difference(t5,C_fix(1));
t7=C_unfix(t6);
t8=C_make_character(t7);
t9=t1;{
C_word *av2=av;
av2[0]=t9;
av2[1]=C_a_i_list(&a,3,lf[52],t4,t8);
((C_proc)(void*)(*((C_word*)t9+1)))(2,av2);}}

/* k15229 in k15319 in chicken.irregex#unicode-range-up-to in k7970 in k7739 in k7736 */
static void C_ccall f_15231(C_word c,C_word *av){
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_15231,c,av);}
a=C_alloc(6);
t2=(
/* irregex-core.scm:1487: sre-sequence */
  f_18580(C_a_i(&a,3),t1)
);
t3=C_a_i_list1(&a,1,t2);
/* irregex-core.scm:1481: unicode-range-helper */
f_14844(((C_word*)t0)[2],((C_word*)t0)[3],((C_word*)t0)[4],C_SCHEME_END_OF_LIST,t3);}

/* k15239 in k15319 in chicken.irregex#unicode-range-up-to in k7970 in k7739 in k7736 */
static void C_ccall f_15241(C_word c,C_word *av){
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_15241,c,av);}
a=C_alloc(12);
t2=C_i_check_list_2(t1,lf[212]);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15247,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_15275,a[2]=((C_word*)t0)[4],a[3]=t5,a[4]=((C_word*)t0)[5],a[5]=((C_word)li106),tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
f_15275(t7,t3,t1);}

/* k15245 in k15239 in k15319 in chicken.irregex#unicode-range-up-to in k7970 in k7739 in k7736 */
static void C_ccall f_15247(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_15247,c,av);}
a=C_alloc(5);
t2=C_unfix(C_fix(128));
t3=C_make_character(t2);
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15273,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1491: last */
f_9468(t4,((C_word*)t0)[3]);}

/* k15271 in k15245 in k15239 in k15319 in chicken.irregex#unicode-range-up-to in k7970 in k7739 in k7736 */
static void C_ccall f_15273(C_word c,C_word *av){
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_15273,c,av);}
a=C_alloc(12);
t2=C_unfix(t1);
t3=C_make_character(t2);
t4=C_a_i_list(&a,3,lf[52],((C_word*)t0)[2],t3);
t5=C_a_i_list(&a,1,t4);
/* irregex-core.scm:1488: scheme#append */
t6=*((C_word*)lf[74]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t6;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[4];
av2[3]=t5;
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}

/* map-loop2212 in k15239 in k15319 in chicken.irregex#unicode-range-up-to in k7970 in k7739 in k7736 */
static void f_15275(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word 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(3,0,2)))){
C_save_and_reclaim_args((void *)trf_15275,3,t0,t1,t2);}
a=C_alloc(3);
if(C_truep(C_i_pairp(t2))){
t3=C_slot(t2,C_fix(0));
t4=C_unfix(t3);
t5=C_make_character(t4);
t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
t7=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t6);
t8=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
t10=t1;
t11=C_slot(t2,C_fix(1));
t1=t10;
t2=t11;
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);}}}

/* k15313 in k15319 in chicken.irregex#unicode-range-up-to in k7970 in k7739 in k7736 */
static void C_ccall f_15315(C_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_15315,c,av);}
/* irregex-core.scm:1489: ##sys#fast-reverse */
t2=C_fast_retrieve(lf[70]);{
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);}}

/* k15319 in chicken.irregex#unicode-range-up-to in k7970 in k7739 in k7736 */
static void C_ccall f_15321(C_word c,C_word *av){
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_15321,c,av);}
a=C_alloc(19);
t2=C_i_cdr(t1);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15231,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_15241,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_15315,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1489: ##sys#fast-reverse */
t10=C_fast_retrieve(lf[70]);{
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);}}

/* k15338 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_15340(C_word c,C_word *av){
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_15340,c,av);}
a=C_alloc(11);
t2=(
/* irregex-core.scm:1495: sre-alternate */
  f_18603(C_a_i(&a,3),t1)
);
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14730,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:1429: unicode-range-up-to */
f_15164(t3,((C_word*)t0)[7]);}

/* g2303 in k15675 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void f_15349(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_15349,3,t0,t1,t2);}
a=C_alloc(10);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15361,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_15457,a[2]=t3,a[3]=t2,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1508: utf8-lowest-digit-of-length */
f_14489(t4,C_fixnum_plus(C_fixnum_plus(t2,((C_word*)t0)[2]),C_fix(1)));}

/* k15359 in g2303 in k15675 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void f_15361(C_word t0,C_word 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_15361,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_15387,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:1512: zero-to */
f_9370(t6,C_fixnum_plus(((C_word*)t0)[3],((C_word*)t0)[4]));}

/* k15385 in k15359 in g2303 in k15675 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_15387(C_word c,C_word *av){
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_15387,c,av);}
a=C_alloc(12);
t2=C_i_check_list_2(t1,lf[212]);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15393,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_15395,a[2]=((C_word*)t0)[4],a[3]=t5,a[4]=((C_word*)t0)[5],a[5]=((C_word)li108),tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
f_15395(t7,t3,t1);}

/* k15391 in k15385 in k15359 in g2303 in k15675 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_15393(C_word c,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_15393,c,av);}
a=C_alloc(6);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:1506: sre-sequence */
t3=((C_word*)t0)[3];{
C_word *av2=av;
av2[0]=t3;
av2[1]=(
/* irregex-core.scm:1506: sre-sequence */
  f_18580(C_a_i(&a,3),t2)
);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* map-loop2326 in k15385 in k15359 in g2303 in k15675 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void f_15395(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word 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(12,0,2)))){
C_save_and_reclaim_args((void *)trf_15395,3,t0,t1,t2);}
a=C_alloc(12);
if(C_truep(C_i_pairp(t2))){
t3=C_unfix(C_fix(128));
t4=C_make_character(t3);
t5=C_unfix(C_fix(255));
t6=C_make_character(t5);
t7=C_a_i_list(&a,3,lf[52],t4,t6);
t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
t9=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t8);
t10=C_mutate(((C_word *)((C_word*)t0)[2])+1,t8);
t12=t1;
t13=C_slot(t2,C_fix(1));
t1=t12;
t2=t13;
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);}}}

/* k15447 in k15455 in g2303 in k15675 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_15449(C_word c,C_word *av){
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_15449,c,av);}
a=C_alloc(9);
t2=C_unfix(t1);
t3=C_make_character(t2);
t4=((C_word*)t0)[2];
f_15361(t4,C_a_i_list(&a,3,lf[52],((C_word*)t0)[3],t3));}

/* k15455 in g2303 in k15675 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_15457(C_word c,C_word *av){
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(13,c,3)))){
C_save_and_reclaim((void *)f_15457,c,av);}
a=C_alloc(13);
t2=C_unfix(t1);
t3=C_make_character(t2);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15449,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
t5=C_fixnum_plus(C_fixnum_plus(((C_word*)t0)[3],((C_word*)t0)[4]),C_fix(1));
switch(t5){
case C_fix(1):
t6=C_unfix(C_fix(127));
t7=C_make_character(t6);
t8=((C_word*)t0)[2];
f_15361(t8,C_a_i_list(&a,3,lf[52],t3,t7));
case C_fix(2):
t6=C_unfix(C_fix(223));
t7=C_make_character(t6);
t8=((C_word*)t0)[2];
f_15361(t8,C_a_i_list(&a,3,lf[52],t3,t7));
case C_fix(3):
t6=C_unfix(C_fix(239));
t7=C_make_character(t6);
t8=((C_word*)t0)[2];
f_15361(t8,C_a_i_list(&a,3,lf[52],t3,t7));
case C_fix(4):
t6=C_unfix(C_fix(247));
t7=C_make_character(t6);
t8=((C_word*)t0)[2];
f_15361(t8,C_a_i_list(&a,3,lf[52],t3,t7));
default:
/* irregex-core.scm:1404: chicken.base#error */
t6=*((C_word*)lf[30]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t6;
av2[1]=t4;
av2[2]=lf[216];
av2[3]=t5;
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}}

/* k15462 in k15675 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_15464(C_word c,C_word *av){
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,3)))){
C_save_and_reclaim((void *)f_15464,c,av);}
a=C_alloc(15);
t2=C_i_check_list_2(t1,lf[212]);
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15470,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=6,tmp);
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15595,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)li111),tmp=(C_word)a,a+=7,tmp));
t7=((C_word*)t5)[1];
f_15595(t7,t3,t1);}

/* k15468 in k15462 in k15675 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
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 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(3,c,2)))){
C_save_and_reclaim((void *)f_15470,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+5,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15574,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
t4=C_i_car(((C_word*)t0)[2]);
t5=C_fixnum_difference(t4,C_fix(1));
t6=C_unfix(t5);
t7=C_make_character(t6);
t8=C_fix(C_character_code(t7));
/* irregex-core.scm:1517: utf8-lowest-digit-of-length */
f_14489(t3,C_i_vector_ref(lf[171],t8));}

/* k15514 in k15572 in k15468 in k15462 in k15675 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_15516(C_word c,C_word *av){
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_15516,c,av);}
a=C_alloc(9);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
t3=(
/* irregex-core.scm:1515: sre-sequence */
  f_18580(C_a_i(&a,3),t2)
);
t4=C_a_i_list1(&a,1,t3);
/* irregex-core.scm:1496: scheme#append */
t5=*((C_word*)lf[74]+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-loop2381 in k15572 in k15468 in k15462 in k15675 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void f_15518(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word 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(12,0,2)))){
C_save_and_reclaim_args((void *)trf_15518,3,t0,t1,t2);}
a=C_alloc(12);
if(C_truep(C_i_pairp(t2))){
t3=C_unfix(C_fix(128));
t4=C_make_character(t3);
t5=C_unfix(C_fix(255));
t6=C_make_character(t5);
t7=C_a_i_list(&a,3,lf[52],t4,t6);
t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
t9=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t8);
t10=C_mutate(((C_word *)((C_word*)t0)[2])+1,t8);
t12=t1;
t13=C_slot(t2,C_fix(1));
t1=t12;
t2=t13;
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);}}}

/* k15572 in k15468 in k15462 in k15675 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_15574(C_word c,C_word *av){
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_15574,c,av);}
a=C_alloc(28);
t2=((C_word*)t0)[2];
t3=C_unfix(t1);
t4=C_make_character(t3);
t5=C_fixnum_difference(C_u_i_car(((C_word*)t2)[2]),C_fix(1));
t6=C_unfix(t5);
t7=C_make_character(t6);
t8=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*)t2)[2]);
t14=C_i_check_list_2(t13,lf[212]);
t15=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15516,a[2]=t8,a[3]=((C_word*)t2)[3],a[4]=((C_word*)t2)[4],a[5]=((C_word*)t2)[5],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_15518,a[2]=t11,a[3]=t17,a[4]=t12,a[5]=((C_word)li110),tmp=(C_word)a,a+=6,tmp));
t19=((C_word*)t17)[1];
f_15518(t19,t15,t13);}

/* map-loop2297 in k15462 in k15675 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void 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:1504: g2303 */
t4=((C_word*)t0)[4];
f_15349(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-loop2297 in k15462 in k15675 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
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)));}

/* k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void f_15647(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word 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,0,3)))){
C_save_and_reclaim_args((void *)trf_15647,2,t0,t1);}
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_u_i_cdr(((C_word*)t0)[2]);
t7=C_i_check_list_2(t6,lf[212]);
t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15677,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
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_15679,a[2]=t4,a[3]=t10,a[4]=t5,a[5]=((C_word)li112),tmp=(C_word)a,a+=6,tmp));
t12=((C_word*)t10)[1];
f_15679(t12,t8,t6);}

/* k15675 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_15677(C_word c,C_word *av){
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_15677,c,av);}
a=C_alloc(36);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
t3=(
/* irregex-core.scm:1498: sre-sequence */
  f_18580(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_15349,a[2]=((C_word*)t0)[3],a[3]=((C_word)li109),tmp=(C_word)a,a+=4,tmp);
t10=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15464,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:1513: zero-to */
f_9370(t10,t13);}

/* map-loop2261 in k15645 in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void f_15679(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word 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(12,0,2)))){
C_save_and_reclaim_args((void *)trf_15679,3,t0,t1,t2);}
a=C_alloc(12);
if(C_truep(C_i_pairp(t2))){
t3=C_unfix(C_fix(128));
t4=C_make_character(t3);
t5=C_unfix(C_fix(255));
t6=C_make_character(t5);
t7=C_a_i_list(&a,3,lf[52],t4,t6);
t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
t9=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t8);
t10=C_mutate(((C_word *)((C_word*)t0)[2])+1,t8);
t12=t1;
t13=C_slot(t2,C_fix(1));
t1=t12;
t2=t13;
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);}}}

/* k15792 in k14808 in lp in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_15794(C_word c,C_word *av){
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_15794,c,av);}
a=C_alloc(11);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
t3=(
/* irregex-core.scm:1528: sre-sequence */
  f_18580(C_a_i(&a,3),t2)
);
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14818,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:1443: unicode-range-up-to */
f_15164(t4,((C_word*)t0)[5]);}

/* map-loop2431 in k14808 in lp in k14707 in k14704 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void f_15796(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word 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(12,0,2)))){
C_save_and_reclaim_args((void *)trf_15796,3,t0,t1,t2);}
a=C_alloc(12);
if(C_truep(C_i_pairp(t2))){
t3=C_unfix(C_fix(128));
t4=C_make_character(t3);
t5=C_unfix(C_fix(255));
t6=C_make_character(t5);
t7=C_a_i_list(&a,3,lf[52],t4,t6);
t8=C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
t9=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t8);
t10=C_mutate(((C_word *)((C_word*)t0)[2])+1,t8);
t12=t1;
t13=C_slot(t2,C_fix(1));
t1=t12;
t2=t13;
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 k7970 in k7739 in k7736 */
static void f_15852(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_15852,2,t1,t2);}
a=C_alloc(3);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15860,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1535: cset->plist */
f_26770(t3,t2);}

/* k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_15860(C_word c,C_word *av){
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_15860,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_15862,a[2]=t3,a[3]=((C_word)li115),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_15862(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}

/* lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void f_15862(C_word t0,C_word 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_15862,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_15876,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15880,a[2]=t4,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1537: ##sys#fast-reverse */
t7=C_fast_retrieve(lf[70]);{
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_15907,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_15907(t9,t7);}
else{
t9=C_i_cadr(t2);
t10=t8;
f_15907(t10,C_fixnum_less_or_equal_p(C_fix(128),C_fix(C_character_code(t9))));}}}

/* k15874 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_15876(C_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_15876,c,av);}
a=C_alloc(3);
/* irregex-core.scm:1537: sre-alternate */
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=(
/* irregex-core.scm:1537: sre-alternate */
  f_18603(C_a_i(&a,3),t1)
);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k15878 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_15880(C_word c,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_15880,c,av);}
a=C_alloc(4);
if(C_truep(C_i_nullp(((C_word*)t0)[2]))){
/* irregex-core.scm:1537: scheme#append */
t2=*((C_word*)lf[74]+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_15898,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1540: ##sys#fast-reverse */
t3=C_fast_retrieve(lf[70]);{
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);}}}

/* k15896 in k15878 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_15898(C_word c,C_word *av){
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_15898,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:1537: scheme#append */
t4=*((C_word*)lf[74]+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);}}

/* k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void f_15907(C_word t0,C_word t1){
C_word 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_15907,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_15922,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_14706,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:1425: char->utf8-list */
f_14565(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:1545: lp */
t8=((C_word*)((C_word*)t0)[4])[1];
f_15862(t8,((C_word*)t0)[5],t2,((C_word*)t0)[3],t7);}}

/* k15920 in k15905 in lp in k15858 in chicken.irregex#cset->utf8-pattern in k7970 in k7739 in k7736 */
static void C_ccall f_15922(C_word c,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_15922,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:1542: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_15862(t3,((C_word*)t0)[4],((C_word*)t0)[5],t2,((C_word*)t0)[6]);}

/* adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_15974(C_word t0,C_word 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_15974,5,t0,t1,t2,t3,t4);}
a=C_alloc(29);
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15977,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t4,a[5]=((C_word)li205),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[157]);
if(C_truep(t7)){
t8=(
/* irregex-core.scm:1555: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(t2))
);
/* irregex-core.scm:1555: 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[158]);
if(C_truep(t8)){
t9=(
/* irregex-core.scm:1556: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(t2))
);
/* irregex-core.scm:1556: 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[226]);
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_16034,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word)li206),tmp=(C_word)a,a+=5,tmp);
t16=C_u_i_cdr(t2);
t17=C_i_check_list_2(t16,lf[212]);
t18=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16045,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_16047,a[2]=t13,a[3]=t20,a[4]=t15,a[5]=t14,a[6]=((C_word)li207),tmp=(C_word)a,a+=7,tmp));
t22=((C_word*)t20)[1];
f_16047(t22,t18,t16);}
else{
t10=C_eqp(t6,lf[227]);
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_16095,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word)li208),tmp=(C_word)a,a+=5,tmp);
t17=C_u_i_cdr(t2);
t18=C_i_check_list_2(t17,lf[212]);
t19=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16106,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_16108,a[2]=t14,a[3]=t21,a[4]=t16,a[5]=t15,a[6]=((C_word)li209),tmp=(C_word)a,a+=7,tmp));
t23=((C_word*)t21)[1];
f_16108(t23,t19,t17);}
else{
t11=C_eqp(t6,lf[52]);
t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16149,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_16149(t13,t11);}
else{
t13=C_eqp(t6,lf[180]);
if(C_truep(t13)){
t14=t12;
f_16149(t14,t13);}
else{
t14=C_eqp(t6,lf[235]);
t15=t12;
f_16149(t15,(C_truep(t14)?t14:C_eqp(t6,lf[248])));}}}}}}}
else{
t6=C_eqp(t2,lf[125]);
if(C_truep(t6)){
t7=t1;{
C_word av2[2];
av2[0]=t7;
av2[1]=(C_truep(t3)?lf[275]:lf[125]);
((C_proc)(void*)(*((C_word*)t7+1)))(2,av2);}}
else{
t7=C_eqp(t2,lf[126]);
if(C_truep(t7)){
t8=t1;{
C_word av2[2];
av2[0]=t8;
av2[1]=(C_truep(t3)?lf[276]:lf[126]);
((C_proc)(void*)(*((C_word*)t8+1)))(2,av2);}}
else{
t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16363,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
if(C_truep(t3)){
t9=C_charp(t2);
t10=t8;
f_16363(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_16363(t9,C_SCHEME_FALSE);}}}}}

/* rec in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_15977(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_15977,3,t0,t1,t2);}
/* irregex-core.scm:1551: adjust */
t3=((C_word*)((C_word*)t0)[2])[1];
f_15974(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[4]);}

/* g2502 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_16034(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_16034,3,t0,t1,t2);}
/* irregex-core.scm:1558: adjust */
t3=((C_word*)((C_word*)t0)[2])[1];
f_15974(t3,t1,t2,((C_word*)t0)[3],C_SCHEME_FALSE);}

/* k16043 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16045(C_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_16045,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-loop2496 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_16047(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_16047,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_16072,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:1558: g2502 */
t4=((C_word*)t0)[4];
f_16034(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);}}}

/* k16070 in map-loop2496 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16072(C_word c,C_word *av){
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_16072,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_16047(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* g2529 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_16095(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_16095,3,t0,t1,t2);}
/* irregex-core.scm:1560: adjust */
t3=((C_word*)((C_word*)t0)[2])[1];
f_15974(t3,t1,t2,((C_word*)t0)[3],C_SCHEME_TRUE);}

/* k16104 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16106(C_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_16106,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-loop2523 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_16108(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_16108,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_16133,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:1560: g2529 */
t4=((C_word*)t0)[4];
f_16095(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);}}}

/* k16131 in map-loop2523 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
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 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_16133,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_16108(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* k16147 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_16149(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word 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_16149,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_16158,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:1564: sre->cset */
f_26881(t2,((C_word*)t0)[4],C_a_i_list(&a,1,((C_word*)t0)[5]));}}
else{
t2=C_eqp(((C_word*)t0)[6],lf[128]);
if(C_truep(t2)){
t3=(
/* irregex-core.scm:1571: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[4]))
);
t4=C_eqp(t3,lf[125]);
if(C_truep(t4)){
t5=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t5;
av2[1]=lf[273];
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t5=C_eqp(t3,lf[126]);
if(C_truep(t5)){
t6=((C_word*)t0)[3];{
C_word av2[2];
av2[0]=t6;
av2[1]=lf[274];
((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[212]);
t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16216,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_16218,a[2]=t8,a[3]=t14,a[4]=((C_word*)t0)[7],a[5]=t9,a[6]=((C_word)li210),tmp=(C_word)a,a+=7,tmp));
t16=((C_word*)t14)[1];
f_16218(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[212]);
t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16272,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_16274,a[2]=t6,a[3]=t12,a[4]=((C_word*)t0)[7],a[5]=t7,a[6]=((C_word)li211),tmp=(C_word)a,a+=7,tmp));
t14=((C_word*)t12)[1];
f_16274(t14,t10,t8);}}}

/* k16156 in k16147 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16158(C_word c,C_word *av){
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_16158,c,av);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16164,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_16181,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1565: cset->plist */
f_26770(t3,t1);}

/* k16162 in k16156 in k16147 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16164(C_word c,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_16164,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_16174,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1567: cset->utf8-pattern */
f_15852(t2,((C_word*)t0)[4]);}
else{
/* irregex-core.scm:1568: cset->utf8-pattern */
f_15852(((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);}}}

/* k16172 in k16162 in k16156 in k16147 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16174(C_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_16174,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[226],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k16179 in k16156 in k16147 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16181(C_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_16181,c,av);}
/* irregex-core.scm:1565: any */
f_9506(((C_word*)t0)[2],C_retrieve2(lf[205],C_text("chicken.irregex#high-char?")),t1);}

/* k16214 in k16147 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16216(C_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_16216,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[128],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* map-loop2566 in k16147 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_16218(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_16218,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_16243,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:1575: g2572 */
t4=((C_word*)t0)[4];
f_15977(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);}}}

/* k16241 in map-loop2566 in k16147 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16243(C_word c,C_word *av){
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_16243,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_16218(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* k16270 in k16147 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16272(C_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_16272,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-loop2592 in k16147 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_16274(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_16274,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_16299,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:1577: g2598 */
t4=((C_word*)t0)[4];
f_15977(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);}}}

/* k16297 in map-loop2592 in k16147 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16299(C_word c,C_word *av){
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_16299,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_16274(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* k16361 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_16363(C_word t0,C_word 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_16363,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_16376,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1584: char->utf8-list */
f_14565(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);}}}

/* k16374 in k16361 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16376(C_word c,C_word *av){
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_16376,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16379,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_16381,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=((C_word*)t0)[4],a[5]=((C_word)li212),tmp=(C_word)a,a+=6,tmp));
t6=((C_word*)t4)[1];
f_16381(t6,t2,t1);}

/* k16377 in k16374 in k16361 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16379(C_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_16379,c,av);}
a=C_alloc(3);
/* irregex-core.scm:1584: sre-sequence */
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=(
/* irregex-core.scm:1584: sre-sequence */
  f_18580(C_a_i(&a,3),t1)
);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* map-loop2626 in k16374 in k16361 in adjust in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_16381(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word 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(3,0,2)))){
C_save_and_reclaim_args((void *)trf_16381,3,t0,t1,t2);}
a=C_alloc(3);
if(C_truep(C_i_pairp(t2))){
t3=C_slot(t2,C_fix(0));
t4=C_unfix(t3);
t5=C_make_character(t4);
t6=C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
t7=C_i_setslot(((C_word*)((C_word*)t0)[2])[1],C_fix(1),t6);
t8=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
t10=t1;
t11=C_slot(t2,C_fix(1));
t1=t10;
t2=t11;
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 k7970 in k7739 in k7736 */
static void C_ccall f_16428(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_16428,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_16435,a[2]=t1,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1601: 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);}}

/* k16433 in chicken.irregex#irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16435(C_word c,C_word *av){
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_16435,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[219];
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_16489,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:1606: string->irregex */
t9=C_fast_retrieve(lf[220]);{
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:1607: sre->irregex */
t9=C_fast_retrieve(lf[221]);{
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_fast_retrieve(lf[220]);
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_fast_retrieve(lf[221]);
av2[3]=((C_word*)t0)[3];
av2[4]=((C_word*)t0)[4];
C_apply(5,av2);}}}}}

/* k16487 in k16433 in chicken.irregex#irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16489(C_word c,C_word *av){
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_16489,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 k7970 in k7739 in k7736 */
static void C_ccall f_16556(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_16556,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_16564,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_fast_retrieve(lf[103]);
av2[3]=t2;
av2[4]=t3;
C_apply(5,av2);}}

/* k16562 in chicken.irregex#string->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16564(C_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_16564,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_fast_retrieve(lf[221]);
av2[3]=t1;
av2[4]=((C_word*)t0)[3];
C_apply(5,av2);}}

/* chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16566(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_16566,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_16570,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1617: symbol-list->flags */
f_10544(t4,t3);}

/* k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16570(C_word c,C_word *av){
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(13,c,5)))){
C_save_and_reclaim((void *)f_16570,c,av);}
a=C_alloc(13);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16573,a[2]=((C_word*)t0)[2],a[3]=C_SCHEME_UNDEFINED,a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=7,tmp);
if(C_truep(C_retrieve2(lf[54],C_text("chicken.irregex#*allow-utf8-mode?*")))){
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_15974,a[2]=t8,a[3]=((C_word)li213),tmp=(C_word)a,a+=4,tmp));
t10=((C_word*)t8)[1];
f_15974(t10,t2,((C_word*)t0)[4],t4,t6);}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=((C_word*)t0)[4];
f_16573(2,av2);}}}

/* k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16573(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_16573,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+6,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16576,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1621: sre-searcher? */
t4=C_retrieve2(lf[272],C_text("chicken.irregex#sre-searcher?"));{
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];
f_17101(3,av2);}}

/* k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16576(C_word c,C_word *av){
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_16576,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+3,t1);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16579,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
if(C_truep(((C_word*)t2)[3])){
/* irregex-core.scm:1622: sre-remove-initial-bos */
t5=C_retrieve2(lf[271],C_text("chicken.irregex#sre-remove-initial-bos"));{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t5;
av2[1]=t4;
av2[2]=((C_word*)t2)[6];
f_19125(3,av2);}}
else{
t5=t4;{
C_word *av2=av;
av2[0]=t5;
av2[1]=((C_word*)t2)[6];
f_16579(2,av2);}}}

/* k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16579(C_word c,C_word *av){
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(28,c,3)))){
C_save_and_reclaim((void *)f_16579,c,av);}
a=C_alloc(28);
t2=((C_word*)t0)[2];
t3=(C_truep(C_u_i_memq(lf[222],((C_word*)t2)[2]))?C_fix(1):(C_truep(C_u_i_memq(lf[223],((C_word*)t2)[2]))?C_fix(50):C_fix(10)));
t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16585,a[2]=((C_word*)t2)[3],a[3]=((C_word*)t2)[4],a[4]=C_SCHEME_UNDEFINED,a[5]=((C_word*)t2)[5],a[6]=((C_word*)t2)[6],a[7]=t1,a[8]=t3,tmp=(C_word)a,a+=9,tmp);
if(C_truep(C_u_i_memq(lf[270],((C_word*)t2)[2]))){
t5=t4;{
C_word *av2=av;
av2[0]=t5;
av2[1]=C_SCHEME_FALSE;
f_16585(2,av2);}}
else{
if(C_truep(((C_word*)t2)[3])){
t5=t4;{
C_word *av2=av;
av2[0]=t5;
av2[1]=C_SCHEME_TRUE;
f_16585(2,av2);}}
else{
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16657,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
t6=C_a_i_list(&a,2,lf[128],lf[125]);
t7=C_a_i_list(&a,3,lf[116],t6,t1);
/* irregex-core.scm:1630: sre->nfa */
f_21146(t5,t7,((C_word*)t2)[5]);}}}

/* k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16585(C_word c,C_word *av){
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_16585,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+4,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16588,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(((C_word*)t0)[4])){
/* irregex-core.scm:1634: sre->nfa */
f_21146(t3,((C_word*)t0)[7],((C_word*)t0)[5]);}
else{
t4=t3;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
f_16588(2,av2);}}}

/* k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16588(C_word c,C_word *av){
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,3)))){
C_save_and_reclaim((void *)f_16588,c,av);}
a=C_alloc(15);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_16591,a[2]=((C_word*)t2)[2],a[3]=C_SCHEME_UNDEFINED,a[4]=((C_word*)t2)[3],a[5]=((C_word*)t2)[4],a[6]=C_SCHEME_UNDEFINED,a[7]=C_SCHEME_UNDEFINED,a[8]=((C_word*)t2)[5],a[9]=((C_word*)t2)[6],a[10]=((C_word*)t2)[7],tmp=(C_word)a,a+=11,tmp);
if(C_truep(t1)){
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16631,a[2]=((C_word*)t2)[8],a[3]=((C_word)li203),tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1634: g2749 */
t5=t4;
f_16631(t5,t3,t1);}
else{
t4=t3;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
f_16591(2,av2);}}}

/* k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16591(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_16591,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+3,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16594,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1638: sre-count-submatches */
f_17374(t3,((C_word*)t0)[10]);}

/* k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16594(C_word c,C_word *av){
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_16594,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+6,t1);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16597,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1639: sre-names */
f_18807(t4,((C_word*)t2)[10],C_fix(1),C_SCHEME_END_OF_LIST);}

/* k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16597(C_word c,C_word *av){
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_16597,c,av);}
a=C_alloc(6);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+7,t1);
t4=C_a_i_list(&a,1,((C_word*)t2)[7]);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17474,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
if(C_truep(C_i_pairp(t4))){
t6=t5;{
C_word *av2=av;
av2[0]=t6;
av2[1]=C_u_i_car(t4);
f_17474(2,av2);}}
else{
/* irregex-core.scm:1735: sre-names */
f_18807(t5,((C_word*)t2)[10],C_fix(1),C_SCHEME_END_OF_LIST);}}

/* k16610 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16612(C_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_16612,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);}}

/* k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16626(C_word c,C_word *av){
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_16626,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_16612,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_23786,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_23786(2,av2);}}
else{
/* irregex-core.scm:3136: sre-names */
f_18807(t7,((C_word*)t0)[10],C_fix(1),C_SCHEME_END_OF_LIST);}}}

/* g2749 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_16631(C_word 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_16631,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:1636: nfa->dfa */
f_22758(t1,t2,C_a_i_list(&a,1,t5));}

/* k16655 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_16657(C_word c,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_16657,c,av);}
a=C_alloc(4);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16661,a[2]=((C_word*)t0)[2],a[3]=((C_word)li204),tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:1628: g2738 */
t3=t2;
f_16661(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_16585(2,av2);}}}

/* g2738 in k16655 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_16661(C_word 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_16661,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:1632: nfa->dfa */
f_22758(t1,t2,C_a_i_list(&a,1,t5));}

/* chicken.irregex#sre-empty? in k7970 in k7739 in k7736 */
static void C_ccall f_16699(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_16699,c,av);}
a=C_alloc(5);
if(C_truep(C_i_pairp(t2))){
t3=C_u_i_car(t2);
t4=C_eqp(t3,lf[128]);
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16716,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
if(C_truep(t4)){
t6=t5;
f_16716(t6,t4);}
else{
t6=C_eqp(t3,lf[132]);
if(C_truep(t6)){
t7=t5;
f_16716(t7,t6);}
else{
t7=C_eqp(t3,lf[112]);
if(C_truep(t7)){
t8=t5;
f_16716(t8,t7);}
else{
t8=C_eqp(t3,lf[114]);
if(C_truep(t8)){
t9=t5;
f_16716(t9,t8);}
else{
t9=C_eqp(t3,lf[113]);
t10=t5;
f_16716(t10,(C_truep(t9)?t9:C_eqp(t3,lf[115])));}}}}}
else{
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_u_i_memq(t2,lf[277]);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k16714 in chicken.irregex#sre-empty? in k7970 in k7739 in k7736 */
static void f_16716(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word 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_16716,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[134]);
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[104]);
if(C_truep(t3)){
/* irregex-core.scm:1660: any */
f_9506(((C_word*)t0)[2],C_retrieve2(lf[140],C_text("chicken.irregex#sre-empty?")),C_u_i_cdr(((C_word*)t0)[4]));}
else{
t4=C_eqp(((C_word*)t0)[3],lf[228]);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16759,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:1662: every */
f_9549(((C_word*)t0)[2],C_retrieve2(lf[140],C_text("chicken.irregex#sre-empty?")),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[116]);
if(C_truep(t6)){
if(C_truep(t6)){
/* irregex-core.scm:1662: every */
f_9549(((C_word*)t0)[2],C_retrieve2(lf[140],C_text("chicken.irregex#sre-empty?")),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[246]);
if(C_truep(t7)){
t8=t5;
f_16759(t8,t7);}
else{
t8=C_eqp(((C_word*)t0)[3],lf[109]);
if(C_truep(t8)){
t9=t5;
f_16759(t9,t8);}
else{
t9=C_eqp(((C_word*)t0)[3],lf[120]);
if(C_truep(t9)){
t10=t5;
f_16759(t10,t9);}
else{
t10=C_eqp(((C_word*)t0)[3],lf[121]);
if(C_truep(t10)){
t11=t5;
f_16759(t11,t10);}
else{
t11=C_eqp(((C_word*)t0)[3],lf[130]);
t12=t5;
f_16759(t12,(C_truep(t11)?t11:C_eqp(((C_word*)t0)[3],lf[240])));}}}}}}}}}}

/* k16757 in k16714 in chicken.irregex#sre-empty? in k7970 in k7739 in k7736 */
static void f_16759(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_16759,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:1662: every */
f_9549(((C_word*)t0)[2],C_retrieve2(lf[140],C_text("chicken.irregex#sre-empty?")),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 k7970 in k7739 in k7736 */
static void C_ccall f_16866(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_16866,c,av);}
a=C_alloc(5);
t3=C_eqp(t2,lf[125]);
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[116]);
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16889,a[2]=t2,a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
if(C_truep(t5)){
t7=t6;
f_16889(t7,t5);}
else{
t7=C_eqp(t4,lf[228]);
if(C_truep(t7)){
t8=t6;
f_16889(t8,t7);}
else{
t8=C_eqp(t4,lf[246]);
if(C_truep(t8)){
t9=t6;
f_16889(t9,t8);}
else{
t9=C_eqp(t4,lf[109]);
if(C_truep(t9)){
t10=t6;
f_16889(t10,t9);}
else{
t10=C_eqp(t4,lf[120]);
t11=t6;
f_16889(t11,(C_truep(t10)?t10:C_eqp(t4,lf[121])));}}}}}
else{
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}}

/* k16887 in chicken.irregex#sre-any? in k7970 in k7739 in k7736 */
static void f_16889(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_16889,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:1671: sre-any? */
t4=C_retrieve2(lf[278],C_text("chicken.irregex#sre-any?"));{
C_word av2[3];
av2[0]=t4;
av2[1]=((C_word*)t0)[3];
av2[2]=C_u_i_car(t3);
f_16866(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[104]);
if(C_truep(t2)){
/* irregex-core.scm:1672: every */
f_9549(((C_word*)t0)[3],C_retrieve2(lf[278],C_text("chicken.irregex#sre-any?")),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 k7970 in k7739 in k7736 */
static C_word f_16967(C_word t1){
C_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[279]);
if(C_truep(t3)){
return(t3);}
else{
t4=C_u_i_car(t1);
if(C_truep((C_truep(C_eqp(t4,lf[246]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[109]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[120]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[121]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[116]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[228]))?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 k7970 in k7739 in k7736 */
static void C_ccall f_17012(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_17012,c,av);}
a=C_alloc(5);
if(C_truep(C_i_pairp(t2))){
t3=C_u_i_car(t2);
t4=C_eqp(t3,lf[116]);
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17029,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
if(C_truep(t4)){
t6=t5;
f_17029(t6,t4);}
else{
t6=C_eqp(t3,lf[228]);
if(C_truep(t6)){
t7=t5;
f_17029(t7,t6);}
else{
t7=C_eqp(t3,lf[246]);
if(C_truep(t7)){
t8=t5;
f_17029(t8,t7);}
else{
t8=C_eqp(t3,lf[109]);
if(C_truep(t8)){
t9=t5;
f_17029(t9,t8);}
else{
t9=C_eqp(t3,lf[120]);
t10=t5;
f_17029(t10,(C_truep(t9)?t9:C_eqp(t3,lf[121])));}}}}}
else{
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_eqp(lf[187],t2);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k17027 in chicken.irregex#sre-bos? in k7970 in k7739 in k7736 */
static void f_17029(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_17029,2,t0,t1);}
if(C_truep(t1)){
if(C_truep(C_i_pairp(C_u_i_cdr(((C_word*)t0)[2])))){
/* irregex-core.scm:1687: sre-bos? */
t2=C_retrieve2(lf[280],C_text("chicken.irregex#sre-bos?"));{
C_word av2[3];
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=C_i_cadr(((C_word*)t0)[2]);
f_17012(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[104]);
if(C_truep(t2)){
/* irregex-core.scm:1688: every */
f_9549(((C_word*)t0)[3],C_retrieve2(lf[280],C_text("chicken.irregex#sre-bos?")),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 k7970 in k7739 in k7736 */
static void C_ccall f_17101(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(5,c,2)))){
C_save_and_reclaim((void *)f_17101,c,av);}
a=C_alloc(5);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17105,a[2]=t2,a[3]=t1,a[4]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1694: sre-bos? */
t4=C_retrieve2(lf[280],C_text("chicken.irregex#sre-bos?"));{
C_word *av2=av;
av2[0]=t4;
av2[1]=t3;
av2[2]=t2;
f_17012(3,av2);}}

/* k17103 in chicken.irregex#sre-searcher? in k7970 in k7739 in k7736 */
static void C_ccall f_17105(C_word c,C_word *av){
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(3,c,2)))){
C_save_and_reclaim((void *)f_17105,c,av);}
a=C_alloc(3);
if(C_truep(t1)){
t2=((C_word*)t0)[3];{
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)[2]))){
t2=C_u_i_car(((C_word*)t0)[2]);
t3=C_mutate(((C_word *)t0)+4,t2);
t4=C_eqp(((C_word*)t0)[4],lf[128]);
t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[4],lf[130]));
if(C_truep(t5)){
t6=(
/* irregex-core.scm:1697: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[2]))
);
/* irregex-core.scm:1697: sre-any? */
t7=C_retrieve2(lf[278],C_text("chicken.irregex#sre-any?"));{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t7;
av2[1]=((C_word*)t0)[3];
av2[2]=t6;
f_16866(3,av2);}}
else{
t6=C_eqp(((C_word*)t0)[4],lf[116]);
t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17142,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(t6)){
t8=t7;
f_17142(t8,t6);}
else{
t8=C_eqp(((C_word*)t0)[4],lf[228]);
if(C_truep(t8)){
t9=t7;
f_17142(t9,t8);}
else{
t9=C_eqp(((C_word*)t0)[4],lf[246]);
if(C_truep(t9)){
t10=t7;
f_17142(t10,t9);}
else{
t10=C_eqp(((C_word*)t0)[4],lf[109]);
if(C_truep(t10)){
t11=t7;
f_17142(t11,t10);}
else{
t11=C_eqp(((C_word*)t0)[4],lf[120]);
t12=t7;
f_17142(t12,(C_truep(t11)?t11:C_eqp(((C_word*)t0)[4],lf[121])));}}}}}}
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);}}}}

/* k17140 in k17103 in chicken.irregex#sre-searcher? in k7970 in k7739 in k7736 */
static void f_17142(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_17142,2,t0,t1);}
t2=((C_word*)t0)[2];
if(C_truep(t1)){
if(C_truep(C_i_pairp(C_u_i_cdr(((C_word*)t2)[2])))){
/* irregex-core.scm:1699: sre-searcher? */
t3=C_retrieve2(lf[272],C_text("chicken.irregex#sre-searcher?"));{
C_word av2[3];
av2[0]=t3;
av2[1]=((C_word*)t2)[3];
av2[2]=C_i_cadr(((C_word*)t2)[2]);
f_17101(3,av2);}}
else{
t3=((C_word*)t2)[3];{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}
else{
t3=C_eqp(((C_word*)t2)[4],lf[104]);
if(C_truep(t3)){
/* irregex-core.scm:1700: every */
f_9549(((C_word*)t2)[3],C_retrieve2(lf[272],C_text("chicken.irregex#sre-searcher?")),C_u_i_cdr(((C_word*)t2)[2]));}
else{
t4=((C_word*)t2)[3];{
C_word av2[2];
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}}

/* chicken.irregex#sre-consumer? in k7970 in k7739 in k7736 */
static void C_ccall f_17218(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(5,c,2)))){
C_save_and_reclaim((void *)f_17218,c,av);}
a=C_alloc(5);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17222,a[2]=t2,a[3]=t1,a[4]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1705: sre-bos? */
t4=C_retrieve2(lf[280],C_text("chicken.irregex#sre-bos?"));{
C_word *av2=av;
av2[0]=t4;
av2[1]=t3;
av2[2]=t2;
f_17012(3,av2);}}

/* k17220 in chicken.irregex#sre-consumer? in k7970 in k7739 in k7736 */
static void C_ccall f_17222(C_word c,C_word *av){
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(3,c,2)))){
C_save_and_reclaim((void *)f_17222,c,av);}
a=C_alloc(3);
if(C_truep(t1)){
t2=((C_word*)t0)[3];{
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)[2]))){
t2=C_u_i_car(((C_word*)t0)[2]);
t3=C_mutate(((C_word *)t0)+4,t2);
t4=C_eqp(((C_word*)t0)[4],lf[128]);
t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[4],lf[130]));
if(C_truep(t5)){
t6=(
/* irregex-core.scm:1708: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[2]))
);
/* irregex-core.scm:1708: sre-any? */
t7=C_retrieve2(lf[278],C_text("chicken.irregex#sre-any?"));{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t7;
av2[1]=((C_word*)t0)[3];
av2[2]=t6;
f_16866(3,av2);}}
else{
t6=C_eqp(((C_word*)t0)[4],lf[116]);
t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17259,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(t6)){
t8=t7;
f_17259(t8,t6);}
else{
t8=C_eqp(((C_word*)t0)[4],lf[228]);
if(C_truep(t8)){
t9=t7;
f_17259(t9,t8);}
else{
t9=C_eqp(((C_word*)t0)[4],lf[246]);
if(C_truep(t9)){
t10=t7;
f_17259(t10,t9);}
else{
t10=C_eqp(((C_word*)t0)[4],lf[109]);
if(C_truep(t10)){
t11=t7;
f_17259(t11,t10);}
else{
t11=C_eqp(((C_word*)t0)[4],lf[120]);
t12=t7;
f_17259(t12,(C_truep(t11)?t11:C_eqp(((C_word*)t0)[4],lf[121])));}}}}}}
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);}}}}

/* k17257 in k17220 in chicken.irregex#sre-consumer? in k7970 in k7739 in k7736 */
static void f_17259(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,3)))){
C_save_and_reclaim_args((void *)trf_17259,2,t0,t1);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
if(C_truep(t1)){
if(C_truep(C_i_pairp(C_u_i_cdr(((C_word*)t2)[2])))){
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17272,a[2]=((C_word*)t2)[3],tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1710: last */
f_9468(t3,((C_word*)t2)[2]);}
else{
t3=((C_word*)t2)[3];{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}
else{
t3=C_eqp(((C_word*)t2)[4],lf[104]);
if(C_truep(t3)){
/* irregex-core.scm:1711: every */
f_9549(((C_word*)t2)[3],C_retrieve2(lf[254],C_text("chicken.irregex#sre-consumer?")),C_u_i_cdr(((C_word*)t2)[2]));}
else{
t4=((C_word*)t2)[3];{
C_word av2[2];
av2[0]=t4;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}}

/* k17270 in k17257 in k17220 in chicken.irregex#sre-consumer? in k7970 in k7739 in k7736 */
static void C_ccall f_17272(C_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_17272,c,av);}
/* irregex-core.scm:1710: sre-consumer? */
t2=C_retrieve2(lf[254],C_text("chicken.irregex#sre-consumer?"));{
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_17218(3,av2);}}

/* chicken.irregex#sre-has-submatches? in k7970 in k7739 in k7736 */
static void C_ccall f_17335(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_17335,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[282]);
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[236],C_u_i_car(t2));
if(C_truep(t5)){
t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17361,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1718: string->sre */
t7=C_fast_retrieve(lf[103]);{
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:1719: any */
f_9506(t1,C_retrieve2(lf[281],C_text("chicken.irregex#sre-has-submatches?")),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);}}}

/* k17359 in chicken.irregex#sre-has-submatches? in k7970 in k7739 in k7736 */
static void C_ccall f_17361(C_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_17361,c,av);}
/* irregex-core.scm:1718: sre-has-submatches? */
t2=C_retrieve2(lf[281],C_text("chicken.irregex#sre-has-submatches?"));{
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_17335(3,av2);}}

/* chicken.irregex#sre-count-submatches in k7970 in k7739 in k7736 */
static void f_17374(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_17374,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_17380,a[2]=t4,a[3]=((C_word)li222),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_17380(4,av2);}}

/* count in chicken.irregex#sre-count-submatches in k7970 in k7739 in k7736 */
static void C_ccall f_17380(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_17380,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_17401,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[246]);
t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17407,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_17407(t8,t6);}
else{
t8=C_eqp(t4,lf[109]);
if(C_truep(t8)){
t9=t7;
f_17407(t9,t8);}
else{
t9=C_eqp(t4,lf[120]);
t10=t7;
f_17407(t10,(C_truep(t9)?t9:C_eqp(t4,lf[121])));}}}
else{
t4=t1;{
C_word *av2=av;
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k17399 in count in chicken.irregex#sre-count-submatches in k7970 in k7739 in k7736 */
static void C_ccall f_17401(C_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_17401,c,av);}
/* irregex-core.scm:1724: fold */
f_9594(((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]));}

/* k17405 in count in chicken.irregex#sre-count-submatches in k7970 in k7739 in k7736 */
static void f_17407(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_17407,2,t0,t1);}
a=C_alloc(29);
if(C_truep(t1)){
/* irregex-core.scm:1724: fold */
f_9594(((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[245]);
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:1724: fold */
f_9594(((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[236]);
if(C_truep(t3)){
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17437,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1729: string->sre */
t5=C_fast_retrieve(lf[103]);{
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:1724: fold */
f_9594(((C_word*)t0)[2],((C_word*)((C_word*)t0)[3])[1],t4,C_u_i_cdr(((C_word*)t0)[5]));}}}}

/* k17435 in k17405 in count in chicken.irregex#sre-count-submatches in k7970 in k7739 in k7736 */
static void C_ccall f_17437(C_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_17437,c,av);}
/* irregex-core.scm:1729: sre-count-submatches */
f_17374(((C_word*)t0)[2],t1);}

/* k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_17474(C_word c,C_word *av){
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_17474,c,av);}
a=C_alloc(15);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_17477,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[3],a[4]=((C_word*)t2)[4],a[5]=((C_word*)t2)[5],a[6]=((C_word*)t2)[6],a[7]=((C_word*)t2)[7],a[8]=((C_word*)t2)[8],a[9]=((C_word*)t2)[9],a[10]=t1,a[11]=((C_word*)t2)[10],tmp=(C_word)a,a+=12,tmp);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18571,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1736: sre-count-submatches */
f_17374(t4,((C_word*)t2)[10]);}

/* k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_17477(C_word c,C_word *av){
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_17477,c,av);}
a=C_alloc(19);
t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_17484,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_17486,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[10],a[5]=((C_word)li202),tmp=(C_word)a,a+=6,tmp));
t6=((C_word*)t4)[1];
f_17486(t6,t2,((C_word*)t0)[11],C_fix(1),C_fix(0),C_fix(0),*((C_word*)lf[267]+1));}

/* k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_17484(C_word c,C_word *av){
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_17484,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_16626,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:1643: sre-consumer? */
t5=C_retrieve2(lf[254],C_text("chicken.irregex#sre-consumer?"));{
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_17218(3,av2);}}

/* lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_17486(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_17486,7,t0,t1,t2,t3,t4,t5,t6);}
a=C_alloc(19);
t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17489,a[2]=t4,a[3]=t5,a[4]=t6,a[5]=((C_word)li187),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:1745: grow */
t8=t7;
f_17489(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_17529,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_17529(t11,t9);}
else{
t11=C_eqp(t8,lf[180]);
if(C_truep(t11)){
t12=t10;
f_17529(t12,t11);}
else{
t12=C_eqp(t8,lf[235]);
t13=t10;
f_17529(t13,(C_truep(t12)?t12:C_eqp(t8,lf[248])));}}}}
else{
if(C_truep(C_charp(t2))){
/* irregex-core.scm:1860: grow */
t8=t7;
f_17489(t8,t1,C_fix(1));}
else{
if(C_truep(C_i_stringp(t2))){
/* irregex-core.scm:1862: grow */
t8=t7;
f_17489(t8,t1,C_u_i_string_length(t2));}
else{
if(C_truep((C_truep(C_eqp(t2,lf[125]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[126]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
/* irregex-core.scm:1864: grow */
t8=t7;
f_17489(t8,t1,C_fix(1));}
else{
if(C_truep((C_truep(C_eqp(t2,lf[111]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[187]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[188]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[196]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[197]))?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[186]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[265]))?C_SCHEME_TRUE:C_SCHEME_FALSE))))))))))){
/* irregex-core.scm:1866: 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,C_retrieve2(lf[249],C_text("chicken.irregex#sre-named-definitions")));
if(C_truep(t8)){
t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_18548,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:1870: g3155 */
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:1870: 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:1872: chicken.base#error */
t9=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t9;
av2[1]=t1;
av2[2]=lf[262];
av2[3]=lf[266];
av2[4]=t2;
((C_proc)(void*)(*((C_word*)t9+1)))(5,av2);}}}}}}}}

/* grow in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_17489(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_17489,3,t0,t1,t2);}
t3=C_fixnum_plus(((C_word*)t0)[2],t2);
if(C_truep(((C_word*)t0)[3])){
/* irregex-core.scm:1741: 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:1741: 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);}}}

/* k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_17529(C_word t0,C_word t1){
C_word 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_17529,2,t0,t1);}
a=C_alloc(12);
if(C_truep(t1)){
/* irregex-core.scm:1748: grow */
t2=((C_word*)t0)[2];
f_17489(t2,((C_word*)t0)[3],C_fix(1));}
else{
t2=C_eqp(((C_word*)t0)[4],lf[236]);
if(C_truep(t2)){
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17545,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:1750: string->sre */
t4=C_fast_retrieve(lf[103]);{
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[116]);
t4=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_17558,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_17558(t5,t3);}
else{
t5=C_eqp(((C_word*)t0)[4],lf[228]);
if(C_truep(t5)){
t6=t4;
f_17558(t6,t5);}
else{
t6=C_eqp(((C_word*)t0)[4],lf[226]);
if(C_truep(t6)){
t7=t4;
f_17558(t7,t6);}
else{
t7=C_eqp(((C_word*)t0)[4],lf[227]);
t8=t4;
f_17558(t8,(C_truep(t7)?t7:C_eqp(((C_word*)t0)[4],lf[240])));}}}}}}

/* k17543 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_17545(C_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_17545,c,av);}
/* irregex-core.scm:1750: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_17486(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}

/* k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_17558(C_word t0,C_word t1){
C_word tmp;
C_word 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,0,6)))){
C_save_and_reclaim_args((void *)trf_17558,2,t0,t1);}
a=C_alloc(11);
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_17565,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)li189),tmp=(C_word)a,a+=8,tmp));
t6=((C_word*)t4)[1];
f_17565(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[104]);
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_17643,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)li191),tmp=(C_word)a,a+=8,tmp));
t7=((C_word*)t5)[1];
f_17643(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[110]);
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:1774: 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|10,a[1]=(C_word)f_17736,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[8],a[4]=C_SCHEME_UNDEFINED,a[5]=C_SCHEME_UNDEFINED,a[6]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],a[9]=((C_word*)t0)[3],a[10]=((C_word*)t0)[4],tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:1776: sre-count-submatches */
f_17374(t6,C_u_i_car(((C_word*)t0)[2]));}}
else{
t4=C_eqp(((C_word*)t0)[9],lf[245]);
if(C_truep(t4)){
t5=(
/* irregex-core.scm:1795: sre-sequence */
  f_18580(C_a_i(&a,3),C_i_cdddr(((C_word*)t0)[2]))
);
t6=C_i_cadr(((C_word*)t0)[2]);
/* irregex-core.scm:1795: lp */
t7=((C_word*)((C_word*)t0)[6])[1];
f_17486(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[246]);
t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17882,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(t5)){
t7=t6;
f_17882(t7,t5);}
else{
t7=C_eqp(((C_word*)t0)[9],lf[109]);
if(C_truep(t7)){
t8=t6;
f_17882(t8,t7);}
else{
t8=C_eqp(((C_word*)t0)[9],lf[120]);
t9=t6;
f_17882(t9,(C_truep(t8)?t8:C_eqp(((C_word*)t0)[9],lf[121])));}}}}}}}

/* lp2 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_17565(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_17565,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:1754: 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:1754: 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:1754: 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_17598,a[2]=t2,a[3]=t3,a[4]=t4,a[5]=t5,a[6]=((C_word*)t0)[5],a[7]=((C_word)li188),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1755: lp */
t8=((C_word*)((C_word*)t0)[6])[1];
f_17486(t8,t1,t6,t3,C_fix(0),C_fix(0),t7);}}

/* a17597 in lp2 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_17598(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_17598,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_17628,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:1758: sre-count-submatches */
f_17374(t5,C_u_i_car(((C_word*)t0)[2]));}

/* k17626 in a17597 in lp2 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_17628(C_word c,C_word *av){
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_17628,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:1757: lp2 */
t4=((C_word*)((C_word*)t0)[7])[1];
f_17565(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:1757: lp2 */
t4=((C_word*)((C_word*)t0)[7])[1];
f_17565(t4,((C_word*)t0)[8],((C_word*)t0)[9],t2,t3,C_SCHEME_FALSE);}}
else{
/* irregex-core.scm:1757: lp2 */
t4=((C_word*)((C_word*)t0)[7])[1];
f_17565(t4,((C_word*)t0)[8],((C_word*)t0)[9],t2,t3,C_SCHEME_FALSE);}}

/* lp2 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_17643(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_17643,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:1764: 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:1764: 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:1764: 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_17680,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=t4,a[7]=((C_word)li190),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1765: lp */
t8=((C_word*)((C_word*)t0)[6])[1];
f_17486(t8,t1,t6,t3,C_fix(0),C_fix(0),t7);}}

/* a17679 in lp2 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_17680(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_17680,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_17713,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:1768: sre-count-submatches */
f_17374(t5,C_u_i_car(((C_word*)t0)[2]));}

/* k17694 in k17711 in a17679 in lp2 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_17696(C_word c,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_17696,c,av);}
a=C_alloc(7);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17700,a[2]=((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:1770: scheme#max */
t3=*((C_word*)lf[255]+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:1767: lp2 */
t3=((C_word*)((C_word*)t0)[2])[1];
f_17643(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1,C_SCHEME_FALSE);}}
else{
/* irregex-core.scm:1767: lp2 */
t3=((C_word*)((C_word*)t0)[2])[1];
f_17643(t3,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1,C_SCHEME_FALSE);}}

/* k17698 in k17694 in k17711 in a17679 in lp2 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_17700(C_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_17700,c,av);}
/* irregex-core.scm:1767: lp2 */
t2=((C_word*)((C_word*)t0)[2])[1];
f_17643(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t1);}

/* k17711 in a17679 in lp2 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_17713(C_word c,C_word *av){
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_17713,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_17696,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:1769: scheme#min */
t4=*((C_word*)lf[256]+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_17696(2,av2);}}}

/* k17734 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_17736(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_17736,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+4,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17739,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1777: sre-count-submatches */
f_17374(t3,C_i_cadr(((C_word*)t0)[2]));}

/* k17737 in k17734 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_17739(C_word c,C_word *av){
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(3,c,2)))){
C_save_and_reclaim((void *)f_17739,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+5,t1);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17746,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
t5=C_i_cadr(((C_word*)t2)[2]);
t6=C_i_numberp(t5);
if(C_truep(t6)){
t7=t4;
f_17746(t7,(C_truep(t6)?lf[111]:C_u_i_car(C_u_i_cdr(((C_word*)t2)[2]))));}
else{
t7=C_u_i_cdr(((C_word*)t2)[2]);
t8=C_i_symbolp(C_u_i_car(t7));
t9=t4;
f_17746(t9,(C_truep(t8)?lf[111]:C_u_i_car(C_u_i_cdr(((C_word*)t2)[2]))));}}

/* k17744 in k17737 in k17734 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_17746(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,6)))){
C_save_and_reclaim_args((void *)trf_17746,2,t0,t1);}
a=C_alloc(9);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17748,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[3],a[4]=((C_word*)t2)[4],a[5]=((C_word*)t2)[5],a[6]=((C_word*)t2)[6],a[7]=((C_word*)t2)[7],a[8]=((C_word)li194),tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1778: lp */
t4=((C_word*)((C_word*)t2)[7])[1];
f_17486(t4,((C_word*)t2)[8],t1,((C_word*)t2)[3],((C_word*)t2)[9],((C_word*)t2)[10],t3);}

/* a17747 in k17744 in k17737 in k17734 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
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 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_17748,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_17762,a[2]=((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)li193),tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:1783: lp */
t7=((C_word*)((C_word*)t0)[7])[1];
f_17486(t7,t1,t4,t5,C_fix(0),C_fix(0),t6);}

/* a17761 in a17747 in k17744 in k17737 in k17734 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_17762(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_17762,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[111]);
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_17776,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)li192),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:1785: lp */
t9=((C_word*)((C_word*)t0)[9])[1];
f_17486(t9,t1,t6,t7,C_fix(0),C_fix(0),t8);}

/* a17775 in a17761 in a17747 in k17744 in k17737 in k17734 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in ... */
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 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_17776,c,av);}
a=C_alloc(8);
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17805,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:1790: scheme#min */
t5=*((C_word*)lf[256]+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);}}

/* k17799 in k17803 in a17775 in a17761 in a17747 in k17744 in k17737 in k17734 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in ... */
static void C_ccall f_17801(C_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_17801,c,av);}
/* irregex-core.scm:1790: 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);}}

/* k17803 in a17775 in a17761 in a17747 in k17744 in k17737 in k17734 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in ... */
static void C_ccall f_17805(C_word c,C_word *av){
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_17805,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_17801,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:1792: scheme#max */
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)[4];
av2[3]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}
else{
/* irregex-core.scm:1790: 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:1790: 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:1790: 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);}}}

/* k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_17882(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word 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(11,0,6)))){
C_save_and_reclaim_args((void *)trf_17882,2,t0,t1);}
a=C_alloc(11);
t2=((C_word*)t0)[2];
if(C_truep(t1)){
t3=C_eqp(lf[109],C_u_i_car(((C_word*)t2)[2]));
t4=(C_truep(t3)?(
/* irregex-core.scm:1797: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t2)[2]))
):(
/* irregex-core.scm:1797: sre-sequence */
  f_18580(C_a_i(&a,3),C_i_cddr(((C_word*)t2)[2]))
));
t5=C_fixnum_plus(((C_word*)t2)[8],C_fix(1));
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17895,a[2]=((C_word*)t2)[10],a[3]=((C_word*)t2)[8],a[4]=((C_word*)t2)[5],a[5]=((C_word)li195),tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:1797: lp */
t7=((C_word*)((C_word*)t2)[6])[1];
f_17486(t7,((C_word*)t2)[7],t4,t5,((C_word*)t2)[3],((C_word*)t2)[4],t6);}
else{
t3=C_eqp(((C_word*)t2)[9],lf[193]);
t4=(C_truep(t3)?t3:C_eqp(((C_word*)t2)[9],lf[192]));
if(C_truep(t4)){
t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17931,a[2]=((C_word*)t2)[7],a[3]=((C_word*)t2)[2],a[4]=((C_word*)t2)[10],a[5]=C_SCHEME_UNDEFINED,a[6]=((C_word*)t2)[3],a[7]=((C_word*)t2)[4],a[8]=((C_word*)t2)[5],tmp=(C_word)a,a+=9,tmp);
t6=C_i_cadr(((C_word*)t2)[2]);
if(C_truep(C_i_numberp(t6))){
t7=t5;{
C_word av2[2];
av2[0]=t7;
av2[1]=C_u_i_car(C_u_i_cdr(((C_word*)t2)[2]));
f_17931(2,av2);}}
else{
t7=C_u_i_cdr(((C_word*)t2)[2]);
t8=C_i_assq(C_u_i_car(t7),((C_word*)t2)[11]);
if(C_truep(t8)){
t9=t5;{
C_word av2[2];
av2[0]=t9;
av2[1]=C_i_cdr(t8);
f_17931(2,av2);}}
else{
t9=C_u_i_cdr(((C_word*)t2)[2]);
/* irregex-core.scm:1807: chicken.base#error */
t10=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t10;
av2[1]=t5;
av2[2]=lf[260];
av2[3]=C_u_i_car(t9);
((C_proc)(void*)(*((C_word*)t10+1)))(4,av2);}}}}
else{
t5=C_eqp(((C_word*)t2)[9],lf[128]);
t6=(C_truep(t5)?t5:C_eqp(((C_word*)t2)[9],lf[129]));
if(C_truep(t6)){
t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18040,a[2]=((C_word*)t2)[5],a[3]=((C_word*)t2)[7],a[4]=((C_word*)t2)[3],tmp=(C_word)a,a+=5,tmp);
t8=(
/* irregex-core.scm:1819: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t2)[2]))
);
t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18049,a[2]=((C_word)li196),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1819: lp */
t10=((C_word*)((C_word*)t2)[6])[1];
f_17486(t10,t7,t8,((C_word*)t2)[8],((C_word*)t2)[3],((C_word*)t2)[4],t9);}
else{
t7=C_eqp(((C_word*)t2)[9],lf[134]);
t8=(C_truep(t7)?t7:C_eqp(((C_word*)t2)[9],lf[131]));
if(C_truep(t8)){
t9=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_18067,a[2]=((C_word*)t2)[5],a[3]=((C_word*)t2)[7],a[4]=((C_word*)t2)[3],a[5]=((C_word*)t2)[4],a[6]=((C_word*)t2)[2],a[7]=((C_word*)t2)[6],a[8]=((C_word*)t2)[8],tmp=(C_word)a,a+=9,tmp);
t10=C_i_cadr(((C_word*)t2)[2]);
if(C_truep(C_i_numberp(t10))){
t11=C_i_caddr(((C_word*)t2)[2]);
if(C_truep(C_i_numberp(t11))){
t12=C_u_i_cdr(((C_word*)t2)[2]);
t13=C_u_i_car(t12);
t14=C_u_i_cdr(((C_word*)t2)[2]);
t15=C_u_i_cdr(t14);
t16=t9;
f_18067(t16,C_fixnum_greaterp(t13,C_u_i_car(t15)));}
else{
t12=t9;
f_18067(t12,C_SCHEME_FALSE);}}
else{
t11=t9;
f_18067(t11,C_SCHEME_FALSE);}}
else{
t9=C_eqp(((C_word*)t2)[9],lf[130]);
if(C_truep(t9)){
t10=(
/* irregex-core.scm:1838: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t2)[2]))
);
t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18209,a[2]=((C_word*)t2)[5],a[3]=((C_word*)t2)[3],a[4]=((C_word)li199),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:1838: lp */
t12=((C_word*)((C_word*)t2)[6])[1];
f_17486(t12,((C_word*)t2)[7],t10,((C_word*)t2)[8],((C_word*)t2)[3],((C_word*)t2)[4],t11);}
else{
t10=C_eqp(((C_word*)t2)[9],lf[132]);
t11=(C_truep(t10)?t10:C_eqp(((C_word*)t2)[9],lf[133]));
if(C_truep(t11)){
t12=(
/* irregex-core.scm:1842: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t2)[2]))
);
t13=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18237,a[2]=((C_word*)t2)[4],a[3]=((C_word*)t2)[5],a[4]=((C_word*)t2)[3],a[5]=((C_word)li200),tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:1842: lp */
t14=((C_word*)((C_word*)t2)[6])[1];
f_17486(t14,((C_word*)t2)[7],t12,((C_word*)t2)[8],((C_word*)t2)[3],((C_word*)t2)[4],t13);}
else{
t12=C_eqp(((C_word*)t2)[9],lf[135]);
t13=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18262,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[6],a[4]=((C_word*)t2)[7],a[5]=((C_word*)t2)[8],a[6]=((C_word*)t2)[3],a[7]=((C_word*)t2)[4],a[8]=((C_word*)t2)[5],a[9]=((C_word*)t2)[9],tmp=(C_word)a,a+=10,tmp);
if(C_truep(t12)){
t14=t13;
f_18262(t14,t12);}
else{
t14=C_eqp(((C_word*)t2)[9],lf[264]);
if(C_truep(t14)){
t15=t13;
f_18262(t15,t14);}
else{
t15=C_eqp(((C_word*)t2)[9],lf[136]);
t16=t13;
f_18262(t16,(C_truep(t15)?t15:C_eqp(((C_word*)t2)[9],lf[261])));}}}}}}}}}

/* a17894 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_17895(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_17895,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:1802: 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);}}

/* k17929 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_17931(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_17931,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+5,t1);
t3=C_i_not(C_i_integerp(((C_word*)t0)[5]));
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17940,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(t3)){
t5=t4;
f_17940(t5,t3);}
else{
t5=C_block_size(((C_word*)t0)[4]);
t6=t4;
f_17940(t6,C_i_not(C_and(C_fixnum_lessp(C_fix(0),((C_word*)t0)[5]),C_fixnum_lessp(((C_word*)t0)[5],t5))));}}

/* k17938 in k17929 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_17940(C_word t0,C_word t1){
C_word tmp;
C_word 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,0,4)))){
C_save_and_reclaim_args((void *)trf_17940,2,t0,t1);}
t2=((C_word*)t0)[2];
if(C_truep(t1)){
/* irregex-core.scm:1811: chicken.base#error */
t3=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t3;
av2[1]=((C_word*)t2)[2];
av2[2]=lf[257];
av2[3]=lf[258];
av2[4]=((C_word*)t2)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}
else{
t3=C_i_vector_ref(((C_word*)t2)[4],((C_word*)t2)[5]);
if(C_truep(C_i_not(t3))){
/* irregex-core.scm:1813: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t4;
av2[1]=((C_word*)t2)[2];
av2[2]=lf[257];
av2[3]=lf[259];
av2[4]=((C_word*)t2)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}
else{
t4=C_i_vector_ref(((C_word*)t2)[4],((C_word*)t2)[5]);
t5=C_i_car(t4);
t6=C_i_vector_ref(((C_word*)t2)[4],((C_word*)t2)[5]);
t7=C_i_cdr(t6);
t8=C_fixnum_plus(((C_word*)t2)[6],t5);
if(C_truep(((C_word*)t2)[7])){
if(C_truep(t7)){
/* irregex-core.scm:1817: return */
t9=((C_word*)t2)[8];{
C_word av2[4];
av2[0]=t9;
av2[1]=((C_word*)t2)[2];
av2[2]=t8;
av2[3]=C_fixnum_plus(((C_word*)t2)[7],t7);
((C_proc)(void*)(*((C_word*)t9+1)))(4,av2);}}
else{
/* irregex-core.scm:1817: return */
t9=((C_word*)t2)[8];{
C_word av2[4];
av2[0]=t9;
av2[1]=((C_word*)t2)[2];
av2[2]=t8;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t9+1)))(4,av2);}}}
else{
/* irregex-core.scm:1817: return */
t9=((C_word*)t2)[8];{
C_word av2[4];
av2[0]=t9;
av2[1]=((C_word*)t2)[2];
av2[2]=t8;
av2[3]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t9+1)))(4,av2);}}}}}

/* k18038 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_18040(C_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_18040,c,av);}
/* irregex-core.scm:1820: 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);}}

/* a18048 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_18049(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_18049,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);}}

/* k18065 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_18067(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(3,0,2)))){
C_save_and_reclaim_args((void *)trf_18067,2,t0,t1);}
a=C_alloc(3);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18070,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(t1)){
t3=t2;
f_18070(t3,t1);}
else{
t3=C_u_i_cdr(((C_word*)t0)[6]);
t4=C_i_not(C_u_i_car(t3));
t5=t2;
f_18070(t5,(C_truep(t4)?C_i_caddr(((C_word*)t0)[6]):C_SCHEME_FALSE));}}

/* k18068 in k18065 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_18070(C_word t0,C_word 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,6)))){
C_save_and_reclaim_args((void *)trf_18070,2,t0,t1);}
a=C_alloc(10);
t2=((C_word*)t0)[2];
if(C_truep(t1)){
/* irregex-core.scm:1827: return */
t3=((C_word*)t2)[2];{
C_word av2[4];
av2[0]=t3;
av2[1]=((C_word*)t2)[3];
av2[2]=((C_word*)t2)[4];
av2[3]=((C_word*)t2)[5];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}
else{
if(C_truep(C_i_caddr(((C_word*)t2)[6]))){
t3=C_u_i_cdr(((C_word*)t2)[6]);
t4=C_u_i_cdr(t3);
t5=(
/* irregex-core.scm:1830: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(t4))
);
t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18088,a[2]=((C_word*)t2)[6],a[3]=((C_word*)t2)[4],a[4]=((C_word*)t2)[5],a[5]=((C_word*)t2)[2],a[6]=((C_word)li197),tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:1830: lp */
t7=((C_word*)((C_word*)t2)[7])[1];
f_17486(t7,((C_word*)t2)[3],t5,((C_word*)t2)[8],C_fix(0),C_fix(0),t6);}
else{
t3=(
/* irregex-core.scm:1834: sre-sequence */
  f_18580(C_a_i(&a,3),C_i_cdddr(((C_word*)t2)[6]))
);
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18135,a[2]=((C_word*)t2)[6],a[3]=((C_word*)t2)[2],a[4]=((C_word*)t2)[4],a[5]=((C_word)li198),tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:1834: lp */
t5=((C_word*)((C_word*)t2)[7])[1];
f_17486(t5,((C_word*)t2)[3],t3,((C_word*)t2)[8],C_fix(0),C_fix(0),t4);}}}

/* a18087 in k18068 in k18065 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_18088(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_18088,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:1832: 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:1832: 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:1832: 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);}}}

/* a18134 in k18068 in k18065 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_18135(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_18135,c,av);}
t4=C_i_cadr(((C_word*)t0)[2]);
t5=C_fixnum_times(t4,t2);
/* irregex-core.scm:1836: 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);}}

/* a18208 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_18209(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_18209,c,av);}
/* irregex-core.scm:1840: 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);}}

/* a18236 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_18237(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_18237,c,av);}
if(C_truep(((C_word*)t0)[2])){
if(C_truep(t3)){
/* irregex-core.scm:1844: 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:1844: 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:1844: 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);}}}

/* k18260 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_18262(C_word t0,C_word t1){
C_word tmp;
C_word 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_18262,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_18281,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[136]))?C_SCHEME_TRUE:(C_truep(C_eqp(t4,lf[261]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
t5=C_u_i_cdr(((C_word*)t0)[2]);
t6=C_u_i_cdr(t5);
t7=t3;
f_18281(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_18281(t9,C_a_i_cons(&a,2,t6,t8));}}
else{
t2=C_eqp(((C_word*)t0)[9],lf[112]);
t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_18302,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_18302(t4,t2);}
else{
t4=C_eqp(((C_word*)t0)[9],lf[113]);
if(C_truep(t4)){
t5=t3;
f_18302(t5,t4);}
else{
t5=C_eqp(((C_word*)t0)[9],lf[114]);
t6=t3;
f_18302(t6,(C_truep(t5)?t5:C_eqp(((C_word*)t0)[9],lf[115])));}}}}

/* k18279 in k18260 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_18281(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_18281,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[134],t2);
/* irregex-core.scm:1846: lp */
t4=((C_word*)((C_word*)t0)[3])[1];
f_17486(t4,((C_word*)t0)[4],t3,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);}

/* k18300 in k18260 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_18302(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_18302,2,t0,t1);}
a=C_alloc(9);
if(C_truep(t1)){
/* irregex-core.scm:1851: 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]),C_retrieve2(lf[249],C_text("chicken.irregex#sre-named-definitions")));
if(C_truep(t2)){
t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_18312,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)li201),tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:1853: g3151 */
t4=t3;
f_18312(t4,((C_word*)t0)[3],t2);}
else{
/* irregex-core.scm:1858: 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[262];
av2[3]=lf[263];
av2[4]=((C_word*)t0)[6];
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}}}

/* g3151 in k18300 in k18260 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void f_18312(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_18312,3,t0,t1,t2);}
a=C_alloc(8);
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_18320,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);}}

/* k18318 in g3151 in k18300 in k18260 in k17880 in k17556 in k17527 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_18320(C_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_18320,c,av);}
/* irregex-core.scm:1856: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_17486(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}

/* k18546 in lp in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_18548(C_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_18548,c,av);}
/* irregex-core.scm:1870: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_17486(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}

/* k18569 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_18571(C_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_18571,c,av);}
/* irregex-core.scm:1736: 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 k7970 in k7739 in k7736 */
static C_word f_18580(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[111]);}
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[116],t1)));}}

/* chicken.irregex#sre-alternate in k7970 in k7739 in k7736 */
static C_word f_18603(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[283]);}
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[104],t1)));}}

/* chicken.irregex#sre-strip-submatches in k7970 in k7739 in k7736 */
static void C_ccall f_18626(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_18626,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[246]);
t6=(C_truep(t5)?t5:C_eqp(t4,lf[109]));
if(C_truep(t6)){
t7=(
/* irregex-core.scm:1897: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(t2))
);
/* irregex-core.scm:1897: sre-strip-submatches */
t19=t1;
t20=t7;
t1=t19;
t2=t20;
c=3;
goto loop;}
else{
t7=C_eqp(t4,lf[120]);
t8=(C_truep(t7)?t7:C_eqp(t4,lf[121]));
if(C_truep(t8)){
t9=(
/* irregex-core.scm:1898: sre-sequence */
  f_18580(C_a_i(&a,3),C_i_cddr(t2))
);
/* irregex-core.scm:1898: sre-strip-submatches */
t19=t1;
t20=t9;
t1=t19;
t2=t20;
c=3;
goto loop;}
else{
t9=C_eqp(t4,lf[245]);
if(C_truep(t9)){
t10=(
/* irregex-core.scm:1899: sre-sequence */
  f_18580(C_a_i(&a,3),C_i_cdddr(t2))
);
/* irregex-core.scm:1899: 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=C_retrieve2(lf[284],C_text("chicken.irregex#sre-strip-submatches"));
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_18699,a[2]=t12,a[3]=t16,a[4]=t13,a[5]=((C_word)li226),tmp=(C_word)a,a+=6,tmp));
t18=((C_word*)t16)[1];
f_18699(t18,t1,t2);}}}}}

/* map-loop3188 in chicken.irregex#sre-strip-submatches in k7970 in k7739 in k7736 */
static void f_18699(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_18699,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_18724,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:1900: g3194 */
t4=C_retrieve2(lf[284],C_text("chicken.irregex#sre-strip-submatches"));{
C_word av2[3];
av2[0]=t4;
av2[1]=t3;
av2[2]=C_slot(t2,C_fix(0));
f_18626(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);}}}

/* k18722 in map-loop3188 in chicken.irregex#sre-strip-submatches in k7970 in k7739 in k7736 */
static void C_ccall f_18724(C_word c,C_word *av){
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_18724,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_18699(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* lp in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void f_18759(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_18759,4,t0,t1,t2,t3);}
a=C_alloc(9);
if(C_truep(C_i_nullp(t2))){
/* irregex-core.scm:1908: ##sys#fast-reverse */
t4=C_fast_retrieve(lf[70]);{
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_18782,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_18786,a[2]=t5,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* ##sys#string->list */
t7=C_fast_retrieve(lf[106]);{
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:1912: lp */
t9=t1;
t10=t5;
t11=t7;
t1=t9;
t2=t10;
t3=t11;
goto loop;}}}

/* k18780 in lp in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_18782(C_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_18782,c,av);}
/* irregex-core.scm:1910: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_18759(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4]);}

/* k18784 in lp in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_18786(C_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_18786,c,av);}
/* irregex-core.scm:1910: scheme#append */
t2=*((C_word*)lf[74]+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 k7970 in k7739 in k7736 */
static void f_18807(C_word 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_18807,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[246]);
t8=(C_truep(t7)?t7:C_eqp(t6,lf[109]));
if(C_truep(t8)){
t9=(
/* irregex-core.scm:1919: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(t2))
);
/* irregex-core.scm:1919: 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[120]);
t10=(C_truep(t9)?t9:C_eqp(t6,lf[121]));
if(C_truep(t10)){
t11=(
/* irregex-core.scm:1921: sre-sequence */
  f_18580(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:1921: 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[245]);
if(C_truep(t11)){
t12=(
/* irregex-core.scm:1925: sre-sequence */
  f_18580(C_a_i(&a,3),C_i_cdddr(t2))
);
t13=C_i_cadr(t2);
/* irregex-core.scm:1925: 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[116]);
t13=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18909,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_18909(t14,t12);}
else{
t14=C_eqp(t6,lf[228]);
if(C_truep(t14)){
t15=t13;
f_18909(t15,t14);}
else{
t15=C_eqp(t6,lf[104]);
if(C_truep(t15)){
t16=t13;
f_18909(t16,t15);}
else{
t16=C_eqp(t6,lf[128]);
if(C_truep(t16)){
t17=t13;
f_18909(t17,t16);}
else{
t17=C_eqp(t6,lf[130]);
if(C_truep(t17)){
t18=t13;
f_18909(t18,t17);}
else{
t18=C_eqp(t6,lf[132]);
if(C_truep(t18)){
t19=t13;
f_18909(t19,t18);}
else{
t19=C_eqp(t6,lf[129]);
if(C_truep(t19)){
t20=t13;
f_18909(t20,t19);}
else{
t20=C_eqp(t6,lf[133]);
if(C_truep(t20)){
t21=t13;
f_18909(t21,t20);}
else{
t21=C_eqp(t6,lf[226]);
if(C_truep(t21)){
t22=t13;
f_18909(t22,t21);}
else{
t22=C_eqp(t6,lf[227]);
if(C_truep(t22)){
t23=t13;
f_18909(t23,t22);}
else{
t23=C_eqp(t6,lf[240]);
if(C_truep(t23)){
t24=t13;
f_18909(t24,t23);}
else{
t24=C_eqp(t6,lf[112]);
if(C_truep(t24)){
t25=t13;
f_18909(t25,t24);}
else{
t25=C_eqp(t6,lf[114]);
if(C_truep(t25)){
t26=t13;
f_18909(t26,t25);}
else{
t26=C_eqp(t6,lf[113]);
t27=t13;
f_18909(t27,(C_truep(t26)?t26:C_eqp(t6,lf[115])));}}}}}}}}}}}}}}}}}}

/* k18907 in chicken.irregex#sre-names in k7970 in k7739 in k7736 */
static void f_18909(C_word 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_18909,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:1928: sre-sequence-names */
f_19093(((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[135]);
t3=(C_truep(t2)?t2:C_eqp(((C_word*)t0)[6],lf[136]));
if(C_truep(t3)){
/* irregex-core.scm:1930: sre-sequence-names */
f_19093(((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[134]);
t5=(C_truep(t4)?t4:C_eqp(((C_word*)t0)[6],lf[131]));
if(C_truep(t5)){
/* irregex-core.scm:1932: sre-sequence-names */
f_19093(((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 k7970 in k7739 in k7736 */
static void f_19093(C_word 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_19093,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_19121,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:1940: sre-count-submatches */
f_17374(t6,C_u_i_car(t2));}}

/* k19113 in k19119 in chicken.irregex#sre-sequence-names in k7970 in k7739 in k7736 */
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 *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,4)))){
C_save_and_reclaim((void *)f_19115,c,av);}
/* irregex-core.scm:1939: sre-sequence-names */
f_19093(((C_word*)t0)[2],((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* k19119 in chicken.irregex#sre-sequence-names in k7970 in k7739 in k7736 */
static void C_ccall f_19121(C_word c,C_word *av){
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_19121,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_19115,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:1941: sre-names */
f_18807(t3,C_u_i_car(((C_word*)t0)[5]),((C_word*)t0)[2],((C_word*)t0)[6]);}

/* chicken.irregex#sre-remove-initial-bos in k7970 in k7739 in k7736 */
static void C_ccall f_19125(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_19125,c,av);}
a=C_alloc(5);
if(C_truep(C_i_pairp(t2))){
t3=C_u_i_car(t2);
t4=C_eqp(t3,lf[116]);
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19142,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
if(C_truep(t4)){
t6=t5;
f_19142(t6,t4);}
else{
t6=C_eqp(t3,lf[228]);
if(C_truep(t6)){
t7=t5;
f_19142(t7,t6);}
else{
t7=C_eqp(t3,lf[246]);
if(C_truep(t7)){
t8=t5;
f_19142(t8,t7);}
else{
t8=C_eqp(t3,lf[109]);
if(C_truep(t8)){
t9=t5;
f_19142(t9,t8);}
else{
t9=C_eqp(t3,lf[120]);
if(C_truep(t9)){
t10=t5;
f_19142(t10,t9);}
else{
t10=C_eqp(t3,lf[121]);
if(C_truep(t10)){
t11=t5;
f_19142(t11,t10);}
else{
t11=C_eqp(t3,lf[128]);
t12=t5;
f_19142(t12,(C_truep(t11)?t11:C_eqp(t3,lf[130])));}}}}}}}
else{
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k19140 in chicken.irregex#sre-remove-initial-bos in k7970 in k7739 in k7736 */
static void f_19142(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word 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_19142,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[187],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_19175,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:1955: sre-remove-initial-bos */
t8=C_retrieve2(lf[271],C_text("chicken.irregex#sre-remove-initial-bos"));{
C_word av2[3];
av2[0]=t8;
av2[1]=t6;
av2[2]=C_u_i_car(t7);
f_19125(3,av2);}}}}
else{
t2=C_eqp(((C_word*)t0)[4],lf[104]);
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=C_retrieve2(lf[271],C_text("chicken.irregex#sre-remove-initial-bos"));
t8=C_u_i_cdr(((C_word*)t0)[2]);
t9=C_i_check_list_2(t8,lf[212]);
t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19212,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_19214,a[2]=t5,a[3]=t12,a[4]=t6,a[5]=((C_word)li230),tmp=(C_word)a,a+=6,tmp));
t14=((C_word*)t12)[1];
f_19214(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);}}}}

/* k19173 in k19140 in chicken.irregex#sre-remove-initial-bos in k7970 in k7739 in k7736 */
static void C_ccall f_19175(C_word c,C_word *av){
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_19175,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);}}

/* k19210 in k19140 in chicken.irregex#sre-remove-initial-bos in k7970 in k7739 in k7736 */
static void C_ccall f_19212(C_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_19212,c,av);}
a=C_alloc(3);
/* irregex-core.scm:1957: sre-alternate */
t2=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t2;
av2[1]=(
/* irregex-core.scm:1957: sre-alternate */
  f_18603(C_a_i(&a,3),t1)
);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* map-loop3329 in k19140 in chicken.irregex#sre-remove-initial-bos in k7970 in k7739 in k7736 */
static void f_19214(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_19214,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_19239,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:1957: g3335 */
t4=C_retrieve2(lf[271],C_text("chicken.irregex#sre-remove-initial-bos"));{
C_word av2[3];
av2[0]=t4;
av2[1]=t3;
av2[2]=C_slot(t2,C_fix(0));
f_19125(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);}}}

/* k19237 in map-loop3329 in k19140 in chicken.irregex#sre-remove-initial-bos in k7970 in k7739 in k7736 */
static void C_ccall f_19239(C_word c,C_word *av){
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_19239,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_19214(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19307(C_word c,C_word *av){
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 t202;
C_word t203;
C_word t204;
C_word t205;
C_word t206;
C_word t207;
C_word t208;
C_word t209;
C_word t210;
C_word t211;
C_word t212;
C_word t213;
C_word t214;
C_word t215;
C_word t216;
C_word t217;
C_word t218;
C_word t219;
C_word t220;
C_word t221;
C_word t222;
C_word t223;
C_word t224;
C_word t225;
C_word t226;
C_word t227;
C_word t228;
C_word t229;
C_word t230;
C_word t231;
C_word t232;
C_word t233;
C_word t234;
C_word t235;
C_word t236;
C_word t237;
C_word t238;
C_word t239;
C_word t240;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(1673,c,10)))){
C_save_and_reclaim((void *)f_19307,c,av);}
a=C_alloc(1673);
t2=C_mutate(&lf[286] /* (set! chicken.irregex#irregex-basic-string-chunker ...) */,t1);
t3=C_mutate((C_word*)lf[287]+1 /* (set! chicken.irregex#irregex-search ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19309,a[2]=((C_word)li232),tmp=(C_word)a,a+=3,tmp));
t4=C_mutate((C_word*)lf[288]+1 /* (set! chicken.irregex#irregex-search/chunked ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19399,a[2]=((C_word)li233),tmp=(C_word)a,a+=3,tmp));
t5=C_mutate(&lf[293] /* (set! chicken.irregex#irregex-search/matches ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19442,a[2]=((C_word)li242),tmp=(C_word)a,a+=3,tmp));
t6=C_mutate((C_word*)lf[299]+1 /* (set! chicken.irregex#irregex-match ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19691,a[2]=((C_word)li243),tmp=(C_word)a,a+=3,tmp));
t7=C_mutate((C_word*)lf[300]+1 /* (set! chicken.irregex#irregex-match/chunked ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19781,a[2]=((C_word)li246),tmp=(C_word)a,a+=3,tmp));
t8=C_mutate((C_word*)lf[305]+1 /* (set! chicken.irregex#irregex-match? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20009,a[2]=((C_word)li247),tmp=(C_word)a,a+=3,tmp));
t9=C_mutate(&lf[306] /* (set! chicken.irregex#finalize! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20205,a[2]=((C_word)li250),tmp=(C_word)a,a+=3,tmp));
t10=C_mutate(&lf[296] /* (set! chicken.irregex#dfa-match/longest ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20324,a[2]=((C_word)li263),tmp=(C_word)a,a+=3,tmp));
t11=C_a_i_cons(&a,2,lf[125],C_retrieve2(lf[53],C_text("chicken.irregex#*all-chars*")));
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[126],lf[248],C_retrieve2(lf[53],C_text("chicken.irregex#*all-chars*")),t13);
t15=C_a_i_list(&a,6,lf[308],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[309],lf[308]);
t17=C_a_i_list(&a,8,lf[182],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[310],lf[182]);
t19=C_a_i_cons(&a,2,lf[311],lf[182]);
t20=C_a_i_list(&a,4,lf[312],lf[52],C_make_character(97),C_make_character(122));
t21=C_a_i_cons(&a,2,lf[313],lf[312]);
t22=C_a_i_list(&a,4,lf[314],lf[52],C_make_character(65),C_make_character(90));
t23=C_a_i_cons(&a,2,lf[315],lf[314]);
t24=C_a_i_list(&a,4,lf[179],lf[52],C_make_character(48),C_make_character(57));
t25=C_a_i_cons(&a,2,lf[316],lf[179]);
t26=C_a_i_cons(&a,2,lf[317],lf[179]);
t27=C_a_i_list(&a,25,lf[318],lf[104],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[319],lf[318]);
t29=C_a_i_list(&a,13,lf[320],lf[104],lf[182],lf[318],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[321],lf[320]);
t31=C_unfix(C_fix(9));
t32=C_make_character(t31);
t33=C_a_i_list(&a,4,lf[322],lf[104],C_make_character(32),t32);
t34=C_a_i_list(&a,7,lf[323],lf[104],lf[322],C_make_character(10),C_make_character(12),C_make_character(13),C_make_character(11));
t35=C_a_i_cons(&a,2,lf[80],lf[323]);
t36=C_a_i_cons(&a,2,lf[324],lf[323]);
t37=C_a_i_list(&a,4,lf[325],lf[104],lf[320],lf[323]);
t38=C_a_i_cons(&a,2,lf[326],lf[325]);
t39=C_unfix(C_fix(0));
t40=C_make_character(t39);
t41=C_unfix(C_fix(31));
t42=C_make_character(t41);
t43=C_a_i_list(&a,4,lf[327],lf[52],t40,t42);
t44=C_a_i_cons(&a,2,lf[328],lf[327]);
t45=C_a_i_list(&a,5,lf[52],C_make_character(97),C_make_character(102),C_make_character(65),C_make_character(70));
t46=C_a_i_list(&a,4,lf[329],lf[104],lf[179],t45);
t47=C_a_i_cons(&a,2,lf[330],lf[329]);
t48=C_unfix(C_fix(0));
t49=C_make_character(t48);
t50=C_unfix(C_fix(127));
t51=C_make_character(t50);
t52=C_a_i_list(&a,4,lf[331],lf[52],t49,t51);
t53=C_unfix(C_fix(0));
t54=C_make_character(t53);
t55=C_unfix(C_fix(9));
t56=C_make_character(t55);
t57=C_unfix(C_fix(11));
t58=C_make_character(t57);
t59=C_unfix(C_fix(127));
t60=C_make_character(t59);
t61=C_a_i_list(&a,6,lf[332],lf[52],t54,t56,t58,t60);
t62=C_unfix(C_fix(13));
t63=C_make_character(t62);
t64=C_a_i_list(&a,3,lf[116],t63,C_make_character(10));
t65=C_unfix(C_fix(13));
t66=C_make_character(t65);
t67=C_a_i_list(&a,3,lf[52],C_make_character(10),t66);
t68=C_a_i_list(&a,4,lf[81],lf[104],t64,t67);
t69=C_a_i_list(&a,3,lf[104],lf[182],C_make_character(95));
t70=C_a_i_list(&a,2,lf[130],t69);
t71=C_a_i_list(&a,5,lf[232],lf[116],lf[184],t70,lf[185]);
t72=C_unfix(C_fix(128));
t73=C_make_character(t72);
t74=C_unfix(C_fix(193));
t75=C_make_character(t74);
t76=C_a_i_list(&a,4,lf[333],lf[52],t73,t75);
t77=C_unfix(C_fix(194));
t78=C_make_character(t77);
t79=C_unfix(C_fix(223));
t80=C_make_character(t79);
t81=C_a_i_list(&a,3,lf[52],t78,t80);
t82=C_a_i_list(&a,4,lf[334],lf[116],t81,lf[333]);
t83=C_unfix(C_fix(224));
t84=C_make_character(t83);
t85=C_unfix(C_fix(239));
t86=C_make_character(t85);
t87=C_a_i_list(&a,3,lf[52],t84,t86);
t88=C_a_i_list(&a,5,lf[335],lf[116],t87,lf[333],lf[333]);
t89=C_unfix(C_fix(240));
t90=C_make_character(t89);
t91=C_unfix(C_fix(247));
t92=C_make_character(t91);
t93=C_a_i_list(&a,3,lf[52],t90,t92);
t94=C_a_i_list(&a,6,lf[336],lf[116],t93,lf[333],lf[333],lf[333]);
t95=C_a_i_list(&a,6,lf[275],lf[104],lf[331],lf[334],lf[335],lf[336]);
t96=C_a_i_list(&a,6,lf[276],lf[104],lf[332],lf[334],lf[335],lf[336]);
t97=C_a_i_list(&a,3,lf[104],C_make_character(43),C_make_character(45));
t98=C_a_i_list(&a,2,lf[132],t97);
t99=C_a_i_list(&a,2,lf[130],lf[179]);
t100=C_a_i_list(&a,4,lf[337],lf[116],t98,t99);
t101=C_a_i_list(&a,3,lf[104],C_make_character(43),C_make_character(45));
t102=C_a_i_list(&a,2,lf[132],t101);
t103=C_a_i_list(&a,2,lf[130],lf[179]);
t104=C_a_i_list(&a,2,lf[130],lf[179]);
t105=C_a_i_list(&a,3,lf[132],C_make_character(46),t104);
t106=C_a_i_list(&a,3,lf[104],C_make_character(101),C_make_character(69));
t107=C_a_i_list(&a,3,lf[132],t106,lf[337]);
t108=C_a_i_list(&a,6,lf[338],lf[116],t102,t103,t105,t107);
t109=C_a_i_list(&a,1,lf[339]);
t110=C_a_i_list(&a,4,lf[340],lf[104],lf[309],t109);
t111=C_a_i_list(&a,1,lf[341]);
t112=C_a_i_list(&a,5,lf[342],lf[104],lf[340],lf[317],t111);
t113=C_a_i_list(&a,2,lf[128],lf[342]);
t114=C_a_i_list(&a,3,lf[116],lf[340],t113);
t115=C_a_i_list(&a,1,lf[343]);
t116=C_a_i_list(&a,2,lf[128],lf[342]);
t117=C_a_i_list(&a,3,lf[132],lf[340],t116);
t118=C_a_i_list(&a,3,lf[116],t115,t117);
t119=C_a_i_list(&a,2,lf[128],lf[344]);
t120=C_a_i_list(&a,3,lf[116],lf[345],t119);
t121=C_a_i_list(&a,5,lf[346],lf[104],t114,t118,t120);
t122=C_a_i_list(&a,2,lf[128],lf[80]);
t123=C_a_i_list(&a,2,lf[128],lf[126]);
t124=C_a_i_list(&a,5,lf[128],t122,lf[347],t123,lf[81]);
t125=C_a_i_list(&a,2,lf[130],lf[80]);
t126=C_a_i_list(&a,4,lf[348],lf[116],t124,t125);
t127=C_a_i_list(&a,3,lf[349],C_make_character(92),C_make_character(34));
t128=C_a_i_list(&a,5,lf[350],lf[116],C_make_character(34),t127,C_make_character(34));
t129=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_31197,a[2]=((C_word)li264),tmp=(C_word)a,a+=3,tmp);
t130=C_a_i_cons(&a,2,lf[349],t129);
t131=C_a_i_list(&a,2,lf[52],lf[351]);
t132=C_a_i_list(&a,2,lf[132],t131);
t133=C_a_i_list(&a,2,lf[132],lf[179]);
t134=C_a_i_list(&a,5,lf[352],lf[116],t132,t133,lf[179]);
t135=C_a_i_list(&a,4,lf[135],C_fix(3),C_make_character(46),lf[352]);
t136=C_a_i_list(&a,4,lf[353],lf[116],lf[352],t135);
t137=C_a_i_list(&a,4,lf[134],C_fix(0),C_fix(4),lf[329]);
t138=C_a_i_list(&a,2,lf[132],C_make_character(58));
t139=C_a_i_list(&a,4,lf[134],C_fix(0),C_fix(4),lf[329]);
t140=C_a_i_list(&a,6,lf[134],C_fix(1),C_fix(7),C_make_character(58),t138,t139);
t141=C_a_i_list(&a,4,lf[354],lf[116],t137,t140);
t142=C_a_i_list(&a,4,lf[355],lf[104],lf[353],lf[354]);
t143=C_a_i_list(&a,4,lf[104],lf[182],C_make_character(95),C_make_character(45));
t144=C_a_i_list(&a,3,lf[356],lf[130],t143);
t145=C_a_i_list(&a,3,lf[130],C_make_character(46),lf[356]);
t146=C_a_i_list(&a,4,lf[357],lf[116],lf[356],t145);
t147=C_a_i_list(&a,3,lf[135],C_fix(2),lf[309]);
t148=C_a_i_list(&a,16,lf[104],lf[358],lf[359],lf[360],lf[361],lf[362],lf[363],lf[364],lf[365],lf[366],lf[367],lf[368],lf[369],lf[370],lf[371],t147);
t149=C_a_i_list(&a,3,lf[372],lf[227],t148);
t150=C_a_i_list(&a,3,lf[130],lf[356],C_make_character(46));
t151=C_a_i_list(&a,4,lf[373],lf[116],t150,lf[372]);
t152=C_a_i_list(&a,6,lf[104],lf[182],C_make_character(95),C_make_character(45),C_make_character(46),C_make_character(43));
t153=C_a_i_list(&a,3,lf[374],lf[130],t152);
t154=C_a_i_list(&a,5,lf[375],lf[116],lf[374],C_make_character(64),lf[357]);
t155=C_a_i_list(&a,4,lf[116],lf[376],lf[329],lf[329]);
t156=C_a_i_list(&a,14,lf[377],lf[104],lf[311],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),t155);
t157=C_a_i_list(&a,4,lf[116],lf[378],lf[329],lf[329]);
t158=C_a_i_list(&a,11,lf[379],lf[104],lf[311],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),t157);
t159=C_a_i_list(&a,2,lf[132],lf[380]);
t160=C_a_i_list(&a,3,lf[104],lf[357],lf[353]);
t161=C_a_i_list(&a,2,lf[130],lf[179]);
t162=C_a_i_list(&a,3,lf[132],lf[381],t161);
t163=C_a_i_list(&a,3,lf[104],lf[377],lf[382]);
t164=C_a_i_list(&a,2,lf[128],t163);
t165=C_a_i_list(&a,2,lf[128],lf[377]);
t166=C_a_i_list(&a,3,lf[132],lf[383],t165);
t167=C_a_i_list(&a,2,lf[128],lf[377]);
t168=C_a_i_list(&a,3,lf[132],t167,lf[379]);
t169=C_a_i_list(&a,3,lf[132],lf[384],t168);
t170=C_a_i_list(&a,5,lf[132],lf[385],t164,t166,t169);
t171=C_a_i_list(&a,8,lf[386],lf[227],lf[387],t159,lf[388],t160,t162,t170);
t172=C_a_i_list(&a,31,t52,t61,t68,t71,t76,t82,t88,t94,t95,t96,t100,t108,t110,t112,t121,t126,t128,t130,t134,t136,t141,t142,t144,t146,t149,t151,t153,t154,t156,t158,t171);
t173=C_a_i_cons(&a,2,t47,t172);
t174=C_a_i_cons(&a,2,t46,t173);
t175=C_a_i_cons(&a,2,t44,t174);
t176=C_a_i_cons(&a,2,t43,t175);
t177=C_a_i_cons(&a,2,t38,t176);
t178=C_a_i_cons(&a,2,t37,t177);
t179=C_a_i_cons(&a,2,t36,t178);
t180=C_a_i_cons(&a,2,t35,t179);
t181=C_a_i_cons(&a,2,t34,t180);
t182=C_a_i_cons(&a,2,t33,t181);
t183=C_a_i_cons(&a,2,t30,t182);
t184=C_a_i_cons(&a,2,t29,t183);
t185=C_a_i_cons(&a,2,t28,t184);
t186=C_a_i_cons(&a,2,t27,t185);
t187=C_a_i_cons(&a,2,t26,t186);
t188=C_a_i_cons(&a,2,t25,t187);
t189=C_a_i_cons(&a,2,t24,t188);
t190=C_a_i_cons(&a,2,t23,t189);
t191=C_a_i_cons(&a,2,t22,t190);
t192=C_a_i_cons(&a,2,t21,t191);
t193=C_a_i_cons(&a,2,t20,t192);
t194=C_a_i_cons(&a,2,t19,t193);
t195=C_a_i_cons(&a,2,t18,t194);
t196=C_a_i_cons(&a,2,t17,t195);
t197=C_a_i_cons(&a,2,t16,t196);
t198=C_a_i_cons(&a,2,t15,t197);
t199=C_a_i_cons(&a,2,t14,t198);
t200=C_a_i_cons(&a,2,t11,t199);
t201=C_mutate(&lf[249] /* (set! chicken.irregex#sre-named-definitions ...) */,t200);
t202=C_mutate(&lf[389] /* (set! chicken.irregex#nfa-get-epsilons ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20971,a[2]=((C_word)li265),tmp=(C_word)a,a+=3,tmp));
t203=C_mutate(&lf[390] /* (set! chicken.irregex#nfa-add-epsilon! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21005,a[2]=((C_word)li266),tmp=(C_word)a,a+=3,tmp));
t204=C_mutate(&lf[269] /* (set! chicken.irregex#sre->nfa ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21146,a[2]=((C_word)li277),tmp=(C_word)a,a+=3,tmp));
t205=C_mutate(&lf[397] /* (set! chicken.irregex#make-mst ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22269,a[2]=((C_word)li278),tmp=(C_word)a,a+=3,tmp));
t206=C_mutate(&lf[398] /* (set! chicken.irregex#mst-copy ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22298,a[2]=((C_word)li279),tmp=(C_word)a,a+=3,tmp));
t207=C_mutate(&lf[399] /* (set! chicken.irregex#nfa-state->mst ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22315,a[2]=((C_word)li280),tmp=(C_word)a,a+=3,tmp));
t208=C_mutate(&lf[400] /* (set! chicken.irregex#mst-add! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22324,a[2]=((C_word)li283),tmp=(C_word)a,a+=3,tmp));
t209=C_mutate(&lf[401] /* (set! chicken.irregex#mst-fold ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22676,a[2]=((C_word)li285),tmp=(C_word)a,a+=3,tmp));
t210=C_mutate(&lf[268] /* (set! chicken.irregex#nfa->dfa ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22758,a[2]=((C_word)li299),tmp=(C_word)a,a+=3,tmp));
t211=C_mutate(&lf[404] /* (set! chicken.irregex#nfa-epsilon-closure ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_23443,a[2]=((C_word)li306),tmp=(C_word)a,a+=3,tmp));
t212=C_mutate(&lf[403] /* (set! chicken.irregex#tag-set-commands-for-closure ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_23458,a[2]=((C_word)li311),tmp=(C_word)a,a+=3,tmp));
t213=C_mutate(&lf[224] /* (set! chicken.irregex#sre-cset->procedure ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26557,a[2]=((C_word)li313),tmp=(C_word)a,a+=3,tmp));
t214=C_mutate(&lf[217] /* (set! chicken.irregex#cset->plist ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26770,a[2]=((C_word)li315),tmp=(C_word)a,a+=3,tmp));
t215=C_mutate(&lf[392] /* (set! chicken.irregex#string->cset ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26861,a[2]=((C_word)li317),tmp=(C_word)a,a+=3,tmp));
t216=C_mutate(&lf[173] /* (set! chicken.irregex#sre->cset ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26881,a[2]=((C_word)li327),tmp=(C_word)a,a+=3,tmp));
t217=C_mutate(&lf[297] /* (set! chicken.irregex#cset-contains? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27348,a[2]=((C_word)li329),tmp=(C_word)a,a+=3,tmp));
t218=C_mutate(&lf[409] /* (set! chicken.irregex#char-ranges-union ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27433,a[2]=((C_word)li330),tmp=(C_word)a,a+=3,tmp));
t219=C_mutate(&lf[163] /* (set! chicken.irregex#cset-union ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27469,a[2]=((C_word)li332),tmp=(C_word)a,a+=3,tmp));
t220=C_mutate(&lf[405] /* (set! chicken.irregex#cset-difference ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27670,a[2]=((C_word)li334),tmp=(C_word)a,a+=3,tmp));
t221=C_mutate(&lf[406] /* (set! chicken.irregex#cset-intersection ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27866,a[2]=((C_word)li336),tmp=(C_word)a,a+=3,tmp));
t222=C_mutate(&lf[165] /* (set! chicken.irregex#cset-complement ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27992,a[2]=((C_word)li337),tmp=(C_word)a,a+=3,tmp));
t223=C_mutate(&lf[166] /* (set! chicken.irregex#cset-case-insensitive ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28002,a[2]=((C_word)li339),tmp=(C_word)a,a+=3,tmp));
t224=C_mutate(&lf[411] /* (set! chicken.irregex#irregex-fold/fast ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28133,a[2]=((C_word)li342),tmp=(C_word)a,a+=3,tmp));
t225=C_mutate((C_word*)lf[416]+1 /* (set! chicken.irregex#irregex-fold ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28351,a[2]=((C_word)li344),tmp=(C_word)a,a+=3,tmp));
t226=C_mutate(&lf[418] /* (set! chicken.irregex#irregex-fold/chunked/fast ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28379,a[2]=((C_word)li347),tmp=(C_word)a,a+=3,tmp));
t227=C_mutate((C_word*)lf[421]+1 /* (set! chicken.irregex#irregex-fold/chunked ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28561,a[2]=((C_word)li349),tmp=(C_word)a,a+=3,tmp));
t228=C_mutate((C_word*)lf[423]+1 /* (set! chicken.irregex#irregex-replace ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28589,a[2]=((C_word)li350),tmp=(C_word)a,a+=3,tmp));
t229=C_mutate((C_word*)lf[427]+1 /* (set! chicken.irregex#irregex-replace/all ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28665,a[2]=((C_word)li353),tmp=(C_word)a,a+=3,tmp));
t230=C_mutate(&lf[424] /* (set! chicken.irregex#irregex-apply-match ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28758,a[2]=((C_word)li356),tmp=(C_word)a,a+=3,tmp));
t231=C_mutate((C_word*)lf[434]+1 /* (set! chicken.irregex#irregex-extract ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28989,a[2]=((C_word)li359),tmp=(C_word)a,a+=3,tmp));
t232=C_mutate((C_word*)lf[437]+1 /* (set! chicken.irregex#irregex-split ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29024,a[2]=((C_word)li363),tmp=(C_word)a,a+=3,tmp));
t233=C_mutate(&lf[55] /* (set! chicken.irregex#string-scan-char ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29222,a[2]=((C_word)li365),tmp=(C_word)a,a+=3,tmp));
t234=C_mutate((C_word*)lf[441]+1 /* (set! chicken.irregex#irregex-quote ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29265,a[2]=((C_word)li367),tmp=(C_word)a,a+=3,tmp));
t235=C_mutate((C_word*)lf[444]+1 /* (set! chicken.irregex#irregex-opt ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29322,a[2]=((C_word)li372),tmp=(C_word)a,a+=3,tmp));
t236=C_mutate(&lf[448] /* (set! chicken.irregex#cset->string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29592,a[2]=((C_word)li374),tmp=(C_word)a,a+=3,tmp));
t237=C_mutate((C_word*)lf[453]+1 /* (set! chicken.irregex#sre->string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29672,a[2]=((C_word)li384),tmp=(C_word)a,a+=3,tmp));
t238=lf[54] /* chicken.irregex#*allow-utf8-mode?* */ =C_SCHEME_FALSE;;
t239=C_mutate((C_word*)lf[487]+1 /* (set! chicken.irregex#glob->sre ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_30456,a[2]=((C_word)li387),tmp=(C_word)a,a+=3,tmp));
t240=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t240;
av2[1]=C_SCHEME_UNDEFINED;
((C_proc)(void*)(*((C_word*)t240+1)))(2,av2);}}

/* chicken.irregex#irregex-search in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19309(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_19309,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_19313,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:1975: 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[289];
av2[3]=lf[292];
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_19313(2,av2);}}}

/* k19311 in chicken.irregex#irregex-search in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19313(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_19313,c,av);}
a=C_alloc(7);
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|6,a[1]=(C_word)f_19322,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=C_SCHEME_UNDEFINED,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)[2]))){
t6=C_i_pairp(C_u_i_cdr(((C_word*)t0)[2]));
t7=t5;
f_19322(t7,(C_truep(t6)?C_i_cadr(((C_word*)t0)[2]):C_SCHEME_FALSE));}
else{
t6=t5;
f_19322(t6,C_SCHEME_FALSE);}}

/* k19320 in k19311 in chicken.irregex#irregex-search in k19305 in k7970 in k7739 in k7736 */
static void f_19322(C_word 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(3,0,4)))){
C_save_and_reclaim_args((void *)trf_19322,2,t0,t1);}
a=C_alloc(3);
t2=(C_truep(t1)?t1:C_i_string_length(((C_word*)t0)[2]));
t3=C_mutate(((C_word *)t0)+4,t2);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19328,a[2]=t0,tmp=(C_word)a,a+=3,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:1979: chicken.base#error */
t6=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t6;
av2[1]=t4;
av2[2]=lf[289];
av2[3]=lf[291];
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_19328(2,av2);}}}
else{
/* irregex-core.scm:1979: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t5;
av2[1]=t4;
av2[2]=lf[289];
av2[3]=lf[291];
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}}

/* k19326 in k19320 in k19311 in chicken.irregex#irregex-search in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19328(C_word c,C_word *av){
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_19328,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19331,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
if(C_truep(C_i_integerp(((C_word*)t2)[4]))){
t4=C_i_exactp(((C_word*)t2)[4]);
if(C_truep(C_i_not(t4))){
/* irregex-core.scm:1981: 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]=t3;
av2[2]=lf[289];
av2[3]=lf[290];
av2[4]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}
else{
t5=t3;{
C_word *av2=av;
av2[0]=t5;
av2[1]=C_SCHEME_UNDEFINED;
f_19331(2,av2);}}}
else{
/* irregex-core.scm:1981: 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[289];
av2[3]=lf[290];
av2[4]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}}

/* k19329 in k19326 in k19320 in k19311 in chicken.irregex#irregex-search in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19331(C_word c,C_word *av){
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,5)))){
C_save_and_reclaim((void *)f_19331,c,av);}
a=C_alloc(9);
t2=((C_word*)t0)[2];
t3=C_a_i_list3(&a,3,((C_word*)t2)[2],((C_word*)t2)[3],((C_word*)t2)[4]);
/* irregex-core.scm:1982: irregex-search/chunked */
t4=C_fast_retrieve(lf[288]);{
C_word *av2;
if(c >= 6) {
  av2=av;
} else {
  av2=C_alloc(6);
}
av2[0]=t4;
av2[1]=((C_word*)t2)[5];
av2[2]=((C_word*)t2)[6];
av2[3]=C_retrieve2(lf[286],C_text("chicken.irregex#irregex-basic-string-chunker"));
av2[4]=t3;
av2[5]=((C_word*)t2)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(6,av2);}}

/* chicken.irregex#irregex-search/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19399(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 +7,c,2)))){
C_save_and_reclaim((void*)f_19399,c,av);}
a=C_alloc((c-5)*C_SIZEOF_PAIR+7);
t5=C_build_rest(&a,c,5,av);
C_word t6;
C_word t7;
t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19403,a[2]=t3,a[3]=t4,a[4]=t1,a[5]=C_SCHEME_UNDEFINED,a[6]=t5,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:1988: irregex */
t7=C_fast_retrieve(lf[218]);{
C_word *av2=av;
av2[0]=t7;
av2[1]=t6;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t7+1)))(3,av2);}}

/* k19401 in chicken.irregex#irregex-search/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19403(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_19403,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+5,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19406,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1989: irregex-new-matches */
f_7831(t3,((C_word*)t0)[5]);}

/* k19404 in k19401 in chicken.irregex#irregex-search/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19406(C_word c,C_word *av){
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_19406,c,av);}
a=C_alloc(8);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19409,a[2]=t1,a[3]=((C_word*)t2)[2],a[4]=((C_word*)t2)[3],a[5]=C_SCHEME_UNDEFINED,a[6]=((C_word*)t2)[4],a[7]=((C_word*)t2)[5],tmp=(C_word)a,a+=8,tmp);
if(C_truep(C_i_pairp(((C_word*)t2)[6]))){
t4=t3;{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_u_i_car(((C_word*)t2)[6]);
f_19409(2,av2);}}
else{
/* irregex-core.scm:1990: g3387 */
t4=C_i_vector_ref(((C_word*)t2)[2],C_fix(2));{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t2)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}}

/* k19407 in k19404 in k19401 in chicken.irregex#irregex-search/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19409(C_word c,C_word *av){
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_19409,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+5,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19412,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(C_i_not(C_i_integerp(((C_word*)t0)[5])))){
/* irregex-core.scm:1991: 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[289];
av2[3]=lf[294];
av2[4]=((C_word*)t0)[5];
((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_19412(2,av2);}}}

/* k19410 in k19407 in k19404 in k19401 in chicken.irregex#irregex-search/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19412(C_word c,C_word *av){
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,7)))){
C_save_and_reclaim((void *)f_19412,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_i_setslot(((C_word*)t2)[2],C_fix(3),((C_word*)t2)[3]);
t4=C_a_i_cons(&a,2,((C_word*)t2)[4],((C_word*)t2)[5]);
/* irregex-core.scm:1993: irregex-search/matches */
f_19442(((C_word*)t2)[6],((C_word*)t2)[7],((C_word*)t2)[3],t4,((C_word*)t2)[4],((C_word*)t2)[5],((C_word*)t2)[2]);}

/* chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void f_19442(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_19442,7,t1,t2,t3,t4,t5,t6,t7);}
a=C_alloc(20);
t8=C_i_check_structure_2(t2,lf[6],lf[295]);
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_19461,a[2]=t7,a[3]=t5,a[4]=t6,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:2003: dfa-match/longest */
f_20324(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_19486,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_20067,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)li238),tmp=(C_word)a,a+=10,tmp));
t25=((C_word*)t23)[1];
f_20067(t25,t12,t5,t6,t21);}}
else{
t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19573,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t10=C_i_check_structure_2(t2,lf[6],lf[298]);
t11=C_slot(t2,C_fix(3));
t12=C_i_vector_ref(t3,C_fix(1));
t13=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_19591,a[2]=t3,a[3]=t2,a[4]=t11,a[5]=t9,a[6]=t4,a[7]=t5,a[8]=C_SCHEME_UNDEFINED,a[9]=t6,a[10]=t7,tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:2036: g3455 */
t14=t12;{
C_word av2[3];
av2[0]=t14;
av2[1]=t13;
av2[2]=t5;
((C_proc)(void*)(*((C_word*)t14+1)))(3,av2);}}}

/* k19459 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19461(C_word c,C_word *av){
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_19461,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);}}}

/* k19484 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19486(C_word c,C_word *av){
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_19486,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_19503,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)li235),tmp=(C_word)a,a+=10,tmp));
t9=((C_word*)t7)[1];
f_19503(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 k19484 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void f_19503(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_19503,4,t0,t1,t2,t3);}
a=C_alloc(11);
t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_19507,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:2016: 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);}}

/* k19505 in lp1 in k19484 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19507(C_word c,C_word *av){
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_19507,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_19512,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)li234),tmp=(C_word)a,a+=12,tmp));
t5=((C_word*)t3)[1];
f_19512(t5,((C_word*)t0)[9],((C_word*)t0)[10]);}

/* lp2 in k19505 in lp1 in k19484 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void f_19512(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_19512,3,t0,t1,t2);}
a=C_alloc(11);
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_19519,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:2019: dfa-match/longest */
f_20324(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));}

/* k19517 in lp2 in k19505 in lp1 in k19484 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19519(C_word c,C_word *av){
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_19519,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_19542,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:2024: 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:2027: lp2 */
t2=((C_word*)((C_word*)t0)[10])[1];
f_19512(t2,((C_word*)t0)[5],C_fixnum_plus(((C_word*)t0)[4],C_fix(1)));}}}

/* k19540 in k19517 in lp2 in k19505 in lp1 in k19484 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19542(C_word c,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_19542,c,av);}
a=C_alloc(5);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19552,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:2025: 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);}}}

/* k19550 in k19540 in k19517 in lp2 in k19505 in lp1 in k19484 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19552(C_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_19552,c,av);}
/* irregex-core.scm:2025: lp1 */
t2=((C_word*)((C_word*)t0)[2])[1];
f_19503(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* k19571 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19573(C_word c,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_19573,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);}}}

/* k19589 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19591(C_word c,C_word *av){
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_19591,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+8,t1);
t3=C_i_vector_ref(((C_word*)t0)[2],C_fix(3));
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19597,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2036: g3457 */
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)[7];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k19595 in k19589 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19597(C_word c,C_word *av){
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,9)))){
C_save_and_reclaim((void *)f_19597,c,av);}
a=C_alloc(11);
t2=((C_word*)t0)[2];
t3=C_i_vector_ref(((C_word*)t2)[2],C_fix(0));
t4=C_slot(((C_word*)t2)[3],C_fix(4));
t5=C_fixnum_and(t4,C_fix(1));
t6=C_eqp(C_fix(1),t5);
if(C_truep(t6)){
t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19611,a[2]=((C_word)li239),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2041: matcher */
t8=((C_word*)t2)[4];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t8;
av2[1]=((C_word*)t2)[5];
av2[2]=((C_word*)t2)[2];
av2[3]=((C_word*)t2)[6];
av2[4]=((C_word*)t2)[7];
av2[5]=((C_word*)t2)[8];
av2[6]=((C_word*)t2)[9];
av2[7]=t1;
av2[8]=((C_word*)t2)[10];
av2[9]=t7;
((C_proc)(void*)(*((C_word*)t8+1)))(10,av2);}}
else{
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19617,a[2]=((C_word*)t2)[10],a[3]=t8,a[4]=((C_word*)t2)[2],a[5]=t3,a[6]=((C_word*)t2)[4],a[7]=((C_word*)t2)[6],a[8]=((C_word)li241),tmp=(C_word)a,a+=9,tmp));
t10=((C_word*)t8)[1];
f_19617(t10,((C_word*)t2)[5],((C_word*)t2)[7],((C_word*)t2)[8],((C_word*)t2)[9],t1);}}

/* a19610 in k19595 in k19589 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19611(C_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_19611,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 k19595 in k19589 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void f_19617(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_19617,6,t0,t1,t2,t3,t4,t5);}
a=C_alloc(14);
t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_19624,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_19683,a[2]=((C_word)li240),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2047: 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);}}

/* k19622 in lp in k19595 in k19589 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19624(C_word c,C_word *av){
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,5)))){
C_save_and_reclaim((void *)f_19624,c,av);}
a=C_alloc(7);
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:2052: lp */
t2=((C_word*)((C_word*)t0)[7])[1];
f_19617(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|6,a[1]=(C_word)f_19654,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[5],a[5]=C_SCHEME_UNDEFINED,a[6]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:2054: 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);}}}}

/* k19652 in k19622 in lp in k19595 in k19589 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19654(C_word c,C_word *av){
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_19654,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+5,t1);
if(C_truep(((C_word*)t0)[5])){
t3=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19667,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2056: g3476 */
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)[5];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
t3=((C_word*)t0)[4];{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k19665 in k19652 in k19622 in lp in k19595 in k19589 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19667(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_19667,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+6,t1);
t4=C_i_vector_ref(((C_word*)t2)[2],C_fix(2));
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19674,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2056: g3478 */
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*)t2)[5];
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k19672 in k19665 in k19652 in k19622 in lp in k19595 in k19589 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19674(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_19674,c,av);}
a=C_alloc(7);
t2=((C_word*)t0)[2];
t3=C_i_vector_ref(((C_word*)t2)[2],C_fix(3));
t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19681,a[2]=((C_word*)t2)[3],a[3]=((C_word*)t2)[4],a[4]=((C_word*)t2)[5],a[5]=((C_word*)t2)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:2056: g3480 */
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*)t2)[5];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k19679 in k19672 in k19665 in k19652 in k19622 in lp in k19595 in k19589 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19681(C_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_19681,c,av);}
/* irregex-core.scm:2056: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_19617(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],t1);}

/* a19682 in lp in k19595 in k19589 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19683(C_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_19683,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 k19305 in k7970 in k7739 in k7736 */
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=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_19691,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_19695,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:2063: 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[301];
av2[3]=lf[304];
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_19695(2,av2);}}}

/* k19693 in chicken.irregex#irregex-match in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19695(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_19695,c,av);}
a=C_alloc(7);
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|6,a[1]=(C_word)f_19704,a[2]=((C_word*)t0)[3],a[3]=t4,a[4]=C_SCHEME_UNDEFINED,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)[2]))){
t6=C_i_pairp(C_u_i_cdr(((C_word*)t0)[2]));
t7=t5;
f_19704(t7,(C_truep(t6)?C_i_cadr(((C_word*)t0)[2]):C_SCHEME_FALSE));}
else{
t6=t5;
f_19704(t6,C_SCHEME_FALSE);}}

/* k19702 in k19693 in chicken.irregex#irregex-match in k19305 in k7970 in k7739 in k7736 */
static void f_19704(C_word 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(3,0,4)))){
C_save_and_reclaim_args((void *)trf_19704,2,t0,t1);}
a=C_alloc(3);
t2=(C_truep(t1)?t1:C_i_string_length(((C_word*)t0)[2]));
t3=C_mutate(((C_word *)t0)+4,t2);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19710,a[2]=t0,tmp=(C_word)a,a+=3,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:2067: chicken.base#error */
t6=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t6;
av2[1]=t4;
av2[2]=lf[301];
av2[3]=lf[303];
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_19710(2,av2);}}}
else{
/* irregex-core.scm:2067: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t5;
av2[1]=t4;
av2[2]=lf[301];
av2[3]=lf[303];
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}}

/* k19708 in k19702 in k19693 in chicken.irregex#irregex-match in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19710(C_word c,C_word *av){
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,4)))){
C_save_and_reclaim((void *)f_19710,c,av);}
a=C_alloc(12);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19713,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
if(C_truep(C_i_integerp(((C_word*)t2)[4]))){
t4=C_i_exactp(((C_word*)t2)[4]);
if(C_truep(C_i_not(t4))){
/* irregex-core.scm:2069: 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]=t3;
av2[2]=lf[301];
av2[3]=lf[302];
av2[4]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}
else{
t5=C_a_i_list3(&a,3,((C_word*)t2)[2],((C_word*)t2)[3],((C_word*)t2)[4]);
/* irregex-core.scm:2070: irregex-match/chunked */
t6=C_fast_retrieve(lf[300]);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t6;
av2[1]=((C_word*)t2)[5];
av2[2]=((C_word*)t2)[6];
av2[3]=C_retrieve2(lf[286],C_text("chicken.irregex#irregex-basic-string-chunker"));
av2[4]=t5;
((C_proc)(void*)(*((C_word*)t6+1)))(5,av2);}}}
else{
/* irregex-core.scm:2069: 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[301];
av2[3]=lf[302];
av2[4]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}}

/* k19711 in k19708 in k19702 in k19693 in chicken.irregex#irregex-match in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19713(C_word c,C_word *av){
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_19713,c,av);}
a=C_alloc(9);
t2=((C_word*)t0)[2];
t3=C_a_i_list3(&a,3,((C_word*)t2)[2],((C_word*)t2)[3],((C_word*)t2)[4]);
/* irregex-core.scm:2070: irregex-match/chunked */
t4=C_fast_retrieve(lf[300]);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t4;
av2[1]=((C_word*)t2)[5];
av2[2]=((C_word*)t2)[6];
av2[3]=C_retrieve2(lf[286],C_text("chicken.irregex#irregex-basic-string-chunker"));
av2[4]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}

/* chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19781(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_19781,c,av);}
a=C_alloc(6);
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19785,a[2]=t3,a[3]=C_SCHEME_UNDEFINED,a[4]=t4,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:2075: irregex */
t6=C_fast_retrieve(lf[218]);{
C_word *av2=av;
av2[0]=t6;
av2[1]=t5;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19785(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_19785,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+3,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19788,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2076: irregex-new-matches */
f_7831(t3,((C_word*)t0)[3]);}

/* k19786 in k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19788(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_19788,c,av);}
a=C_alloc(13);
t2=((C_word*)t0)[2];
t3=C_i_setslot(t1,C_fix(3),((C_word*)t2)[2]);
if(C_truep(C_slot(((C_word*)t2)[3],C_fix(1)))){
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19803,a[2]=t1,a[3]=((C_word*)t2)[4],a[4]=((C_word*)t2)[2],a[5]=((C_word*)t2)[5],tmp=(C_word)a,a+=6,tmp);
t5=C_slot(((C_word*)t2)[3],C_fix(1));
t6=C_i_vector_ref(((C_word*)t2)[2],C_fix(2));
t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19873,a[2]=t4,a[3]=t5,a[4]=((C_word*)t2)[2],a[5]=((C_word*)t2)[4],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:2081: g3514 */
t8=t6;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t8;
av2[1]=t7;
av2[2]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t8+1)))(3,av2);}}
else{
t4=C_slot(((C_word*)t2)[3],C_fix(3));
t5=C_i_vector_ref(((C_word*)t2)[2],C_fix(1));
t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19883,a[2]=((C_word*)t2)[4],a[3]=C_SCHEME_UNDEFINED,a[4]=((C_word*)t2)[2],a[5]=((C_word*)t2)[5],a[6]=t4,a[7]=C_SCHEME_UNDEFINED,a[8]=t1,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:2092: g3534 */
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*)t2)[4];
((C_proc)(void*)(*((C_word*)t7+1)))(3,av2);}}}

/* k19801 in k19786 in k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19803(C_word c,C_word *av){
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_19803,c,av);}
a=C_alloc(3);
if(C_truep(t1)){
t2=C_i_vector_ref(((C_word*)t0)[4],C_fix(3));
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19837,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
t4=C_slot(((C_word*)t0)[2],C_fix(1));
/* irregex-core.scm:2083: g3517 */
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);}}}

/* k19824 in k19835 in k19801 in k19786 in k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19826(C_word c,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_19826,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);}}

/* k19835 in k19801 in k19786 in k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19837(C_word c,C_word *av){
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(5,c,2)))){
C_save_and_reclaim((void *)f_19837,c,av);}
a=C_alloc(5);
t2=((C_word*)t0)[2];
t3=C_slot(((C_word*)t2)[2],C_fix(1));
t4=C_fixnum_times(C_fix(0),C_fix(4));
t5=C_slot(t3,C_fixnum_plus(C_fix(3),t4));
t6=C_eqp(t1,t5);
if(C_truep(t6)){
t7=C_slot(((C_word*)t2)[2],C_fix(1));
t8=C_i_vector_set(t7,C_fix(0),((C_word*)t2)[3]);
t9=C_slot(((C_word*)t2)[2],C_fix(1));
t10=C_i_vector_ref(((C_word*)t2)[4],C_fix(2));
t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19826,a[2]=t9,a[3]=((C_word*)t2)[5],a[4]=((C_word*)t2)[2],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2087: g3528 */
t12=t10;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t12;
av2[1]=t11;
av2[2]=((C_word*)t2)[3];
((C_proc)(void*)(*((C_word*)t12+1)))(3,av2);}}
else{
t7=((C_word*)t2)[5];{
C_word *av2=av;
av2[0]=t7;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t7+1)))(2,av2);}}}

/* k19871 in k19786 in k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19873(C_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_19873,c,av);}
/* irregex-core.scm:2081: dfa-match/longest */
f_20324(((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));}

/* k19881 in k19786 in k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19883(C_word c,C_word *av){
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_19883,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+7,t1);
t3=C_i_vector_ref(((C_word*)t0)[4],C_fix(2));
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19889,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2092: g3537 */
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)[2];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k19887 in k19881 in k19786 in k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19889(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_19889,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+3,t1);
t4=C_i_vector_ref(((C_word*)t2)[4],C_fix(3));
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19895,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2092: g3540 */
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*)t2)[2];
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k19893 in k19887 in k19881 in k19786 in k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19895(C_word c,C_word *av){
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,9)))){
C_save_and_reclaim((void *)f_19895,c,av);}
a=C_alloc(10);
t2=((C_word*)t0)[2];
t3=C_a_i_cons(&a,2,((C_word*)t2)[2],((C_word*)t2)[3]);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19905,a[2]=((C_word*)t2)[4],a[3]=((C_word*)t2)[5],tmp=(C_word)a,a+=4,tmp);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20004,a[2]=((C_word)li245),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2097: matcher */
t6=((C_word*)t2)[6];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t6;
av2[1]=t4;
av2[2]=((C_word*)t2)[4];
av2[3]=t3;
av2[4]=((C_word*)t2)[2];
av2[5]=((C_word*)t2)[7];
av2[6]=((C_word*)t2)[3];
av2[7]=t1;
av2[8]=((C_word*)t2)[8];
av2[9]=t5;
((C_proc)(void*)(*((C_word*)t6+1)))(10,av2);}}

/* k19903 in k19893 in k19887 in k19881 in k19786 in k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19905(C_word c,C_word *av){
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_19905,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_19907,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=((C_word)li244),tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
f_19907(t5,((C_word*)t0)[3],t1);}

/* lp in k19903 in k19893 in k19887 in k19881 in k19786 in k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void f_19907(C_word t0,C_word 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_19907,3,t0,t1,t2);}
a=C_alloc(10);
if(C_truep(t2)){
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19917,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_19981,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:2100: g3551 */
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);}}}

/* k19915 in lp in k19903 in k19893 in k19887 in k19881 in k19786 in k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void f_19917(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_19917,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_19936,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2108: g3564 */
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);}}}}

/* k19934 in k19915 in lp in k19903 in k19893 in k19887 in k19881 in k19786 in k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19936(C_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_19936,c,av);}
/* irregex-core.scm:2108: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_19907(t2,((C_word*)t0)[3],t1);}

/* k19947 in k19979 in lp in k19903 in k19893 in k19887 in k19881 in k19786 in k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19949(C_word c,C_word *av){
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_19949,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_19917(t4,C_eqp(t1,C_slot(t2,C_fixnum_plus(C_fix(3),t3))));}

/* k19979 in lp in k19903 in k19893 in k19887 in k19881 in k19786 in k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_19981(C_word c,C_word *av){
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_19981,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_19949,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:2102: g3557 */
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_19917(t2,C_SCHEME_FALSE);}}

/* a20003 in k19893 in k19887 in k19881 in k19786 in k19783 in chicken.irregex#irregex-match/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20004(C_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_20004,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 k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20009(C_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_20009,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_20016,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_fast_retrieve(lf[299]);
av2[3]=t2;
C_apply(4,av2);}}

/* k20014 in chicken.irregex#irregex-match? in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20016(C_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_20016,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 k19305 in k7970 in k7739 in k7736 */
static void f_20067(C_word 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_20067,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_20074,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:2139: 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);}}}

/* k20072 in lp1 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20074(C_word c,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_20074,c,av);}
a=C_alloc(12);
t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_20077,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:2140: 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);}}

/* k20075 in k20072 in lp1 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
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 *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(14,c,4)))){
C_save_and_reclaim((void *)f_20077,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_20082,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)li237),tmp=(C_word)a,a+=12,tmp));
t5=((C_word*)t3)[1];
f_20082(t5,((C_word*)t0)[9],((C_word*)t0)[10],((C_word*)t0)[11]);}

/* lp2 in k20075 in k20072 in lp1 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void f_20082(C_word t0,C_word t1,C_word 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_20082,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_20134,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_20149,a[2]=t4,a[3]=((C_word)li236),tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2151: find */
f_9407(t5,t6,C_i_cdr(t3));}
else{
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20185,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:2158: 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);}}}}

/* k20132 in lp2 in k20075 in k20072 in lp1 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20134(C_word c,C_word *av){
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_20134,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:2156: lp2 */
t4=((C_word*)((C_word*)t0)[3])[1];
f_20082(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);}}}

/* a20148 in lp2 in k20075 in k20072 in lp1 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20149(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_20149,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:2154: cset-contains? */
f_27348(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);}}}}

/* k20183 in lp2 in k20075 in k20072 in lp1 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20185(C_word c,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_20185,c,av);}
a=C_alloc(6);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20195,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:2159: 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);}}}

/* k20193 in k20183 in lp2 in k20075 in k20072 in lp1 in chicken.irregex#irregex-search/matches in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20195(C_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_20195,c,av);}
/* irregex-core.scm:2159: lp1 */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20067(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5]);}

/* chicken.irregex#finalize! in k19305 in k7970 in k7739 in k7736 */
static void f_20205(C_word 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_20205,4,t1,t2,t3,t4);}
a=C_alloc(12);
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20207,a[2]=t3,a[3]=t4,a[4]=((C_word)li248),tmp=(C_word)a,a+=5,tmp);
t6=C_i_check_list_2(t2,lf[307]);
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_20265,a[2]=t5,a[3]=t8,a[4]=((C_word)li249),tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
f_20265(t10,t1,t2);}

/* g3638 in chicken.irregex#finalize! in k19305 in k7970 in k7739 in k7736 */
static C_word f_20207(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-loop3637 in chicken.irregex#finalize! in k19305 in k7970 in k7739 in k7736 */
static void f_20265(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(20,0,2)))){
C_save_and_reclaim_args((void *)trf_20265,3,t0,t1,t2);}
a=C_alloc(20);
if(C_truep(C_i_pairp(t2))){
t3=(
/* irregex-core.scm:2162: g3638 */
  f_20207(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);}}}

/* k20291 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20293(C_word c,C_word *av){
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_20293,c,av);}
a=C_alloc(8);
t2=C_a_i_fixnum_times(&a,2,t1,C_fix(2));
t3=C_mutate(((C_word *)t0)+3,t2);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20297,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2174: scheme#make-vector */
t5=*((C_word*)lf[4]+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);}}

/* k20295 in k20291 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20297(C_word c,C_word *av){
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,3)))){
C_save_and_reclaim((void *)f_20297,c,av);}
a=C_alloc(9);
t2=((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|6,a[1]=(C_word)f_20302,a[2]=((C_word*)t2)[2],a[3]=t1,a[4]=t4,a[5]=((C_word*)t2)[3],a[6]=((C_word)li262),tmp=(C_word)a,a+=7,tmp));
t6=((C_word*)t4)[1];
f_20302(t6,((C_word*)t2)[4],C_fix(0));}

/* doloop3668 in k20295 in k20291 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void f_20302(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_20302,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_20322,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:2177: 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);}}}

/* k20320 in doloop3668 in k20295 in k20291 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20322(C_word c,C_word *av){
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_20322,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_20302(t4,((C_word*)t0)[5],t3);}

/* chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void f_20324(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(21,0,2)))){
C_save_and_reclaim_args((void *)trf_20324,9,t1,t2,t3,t4,t5,t6,t7,t8,t9);}
a=C_alloc(21);
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_20349,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|4,a[1]=(C_word)f_20293,a[2]=t15,a[3]=C_SCHEME_UNDEFINED,a[4]=t17,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2173: 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);}}

/* k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20349(C_word c,C_word *av){
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_20349,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_20361,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_20361(t13,C_i_vector_set(t11,C_fixnum_plus(C_fix(3),t12),C_SCHEME_FALSE));}
else{
t7=t6;
f_20361(t7,C_SCHEME_UNDEFINED);}}

/* k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void f_20361(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word 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_20361,2,t0,t1);}
a=C_alloc(31);
t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_20364,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[13],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_20818,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word)li260),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[307]);
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_20846,a[2]=t3,a[3]=t8,a[4]=((C_word)li261),tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
f_20846(t10,t2,t5);}
else{
t3=t2;{
C_word av2[2];
av2[0]=t3;
av2[1]=C_SCHEME_UNDEFINED;
f_20364(2,av2);}}}

/* k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20364(C_word c,C_word *av){
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_20364,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_20377,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)li259),tmp=(C_word)a,a+=15,tmp));
t7=((C_word*)t5)[1];
f_20377(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 k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void f_20377(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_20377,8,t0,t1,t2,t3,t4,t5,t6,t7);}
a=C_alloc(20);
t8=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_20381,a[2]=((C_word*)t0)[2],a[3]=((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:2208: 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);}}

/* k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20381(C_word c,C_word *av){
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_20381,c,av);}
a=C_alloc(19);
t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_20384,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((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_20384(2,av2);}}
else{
/* irregex-core.scm:2209: 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);}}}

/* k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20384(C_word c,C_word *av){
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_20384,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_20389,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)li258),tmp=(C_word)a,a+=16,tmp));
t5=((C_word*)t3)[1];
f_20389(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 k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void f_20389(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_20389,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_20399,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_20399(t15,C_i_vector_set(t13,C_fixnum_plus(C_fix(3),t14),t5));}
else{
t9=t7;
f_20399(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_20499,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_20778,a[2]=t7,a[3]=((C_word)li257),tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2230: find */
f_9407(t8,t9,C_i_cdr(t3));}}

/* k20397 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void f_20399(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_20399,2,t0,t1);}
a=C_alloc(12);
t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_20402,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],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:2221: 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_20402(2,av2);}}}

/* k20400 in k20397 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20402(C_word c,C_word *av){
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_20402,c,av);}
a=C_alloc(9);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_20412,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:2223: 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_20447,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:2226: finalize! */
f_20205(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);}}}}

/* k20410 in k20400 in k20397 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20412(C_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_20412,c,av);}
/* irregex-core.scm:2223: lp1 */
t2=((C_word*)((C_word*)t0)[2])[1];
f_20377(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]);}

/* k20445 in k20400 in k20397 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20447(C_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_20447,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);}}

/* k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20499(C_word c,C_word *av){
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_20499,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_20511,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_20535,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:2245: finalize! */
f_20205(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_20535(2,av2);}}}
else{
t8=t7;{
C_word *av2=av;
av2[0]=t8;
av2[1]=C_SCHEME_UNDEFINED;
f_20535(2,av2);}}}
else{
t6=t5;{
C_word *av2=av;
av2[0]=t6;
av2[1]=C_SCHEME_UNDEFINED;
f_20511(2,av2);}}}
else{
if(C_truep(((C_word*)t0)[7])){
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20708,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_20708(t9,C_i_vector_set(t7,C_fixnum_plus(C_fix(3),t8),((C_word*)t0)[8]));}
else{
t3=t2;
f_20708(t3,C_SCHEME_UNDEFINED);}}
else{
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20750,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_20750(t5,C_slot(t3,C_fixnum_plus(C_fix(2),t4)));}
else{
t3=t2;
f_20750(t3,C_SCHEME_FALSE);}}}}

/* k20509 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20511(C_word c,C_word *av){
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,6)))){
C_save_and_reclaim((void *)f_20511,c,av);}
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:2264: lp2 */
t4=((C_word*)((C_word*)t0)[4])[1];
f_20389(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:2265: lp2 */
t3=((C_word*)((C_word*)t0)[4])[1];
f_20389(t3,((C_word*)t0)[5],t2,((C_word*)t0)[6],((C_word*)t0)[8],((C_word*)t0)[9],C_SCHEME_FALSE);}}

/* k20533 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20535(C_word c,C_word *av){
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_20535,c,av);}
a=C_alloc(18);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20536,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word)li251),tmp=(C_word)a,a+=6,tmp);
t3=C_i_cdr(((C_word*)t0)[5]);
t4=C_i_check_list_2(t3,lf[307]);
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20565,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_20672,a[2]=t2,a[3]=t7,a[4]=((C_word)li256),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
f_20672(t9,t5,t3);}

/* g3793 in k20533 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static C_word f_20536(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));}

/* k20563 in k20533 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20565(C_word c,C_word *av){
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(21,c,3)))){
C_save_and_reclaim((void *)f_20565,c,av);}
a=C_alloc(21);
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_20574,a[2]=((C_word*)t0)[2],a[3]=((C_word)li253),tmp=(C_word)a,a+=4,tmp);
t7=C_u_i_car(((C_word*)t0)[3]);
t8=C_i_check_list_2(t7,lf[212]);
t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20607,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
t10=C_SCHEME_UNDEFINED;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_20638,a[2]=t4,a[3]=t11,a[4]=t6,a[5]=t5,a[6]=((C_word)li255),tmp=(C_word)a,a+=7,tmp));
t13=((C_word*)t11)[1];
f_20638(t13,t9,t7);}

/* g3832 in k20563 in k20533 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void f_20574(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(6,0,2)))){
C_save_and_reclaim_args((void *)trf_20574,3,t0,t1,t2);}
a=C_alloc(6);
t3=C_i_vector_ref(t2,C_fix(0));
t4=C_i_vector_ref(t2,C_fix(1));
t5=C_i_vector_ref(((C_word*)t0)[2],t4);
t6=C_i_vector_ref(t2,C_fix(2));
t7=C_i_vector_ref(((C_word*)t0)[2],t6);
t8=C_i_vector_ref(t5,t3);
t9=t1;{
C_word av2[2];
av2[0]=t9;
av2[1]=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20588,a[2]=t7,a[3]=t3,a[4]=t8,a[5]=((C_word)li252),tmp=(C_word)a,a+=6,tmp);
((C_proc)(void*)(*((C_word*)t9+1)))(2,av2);}}

/* f_20588 in g3832 in k20563 in k20533 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20588(C_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_20588,c,av);}
t2=t1;{
C_word *av2=av;
av2[0]=t2;
av2[1]=C_i_vector_set(((C_word*)t0)[2],((C_word*)t0)[3],((C_word*)t0)[4]);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k20605 in k20563 in k20533 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20607(C_word c,C_word *av){
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,3)))){
C_save_and_reclaim((void *)f_20607,c,av);}
a=C_alloc(6);
t2=C_i_check_list_2(t1,lf[307]);
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_20615,a[2]=t4,a[3]=((C_word)li254),tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
f_20615(t6,((C_word*)t0)[2],t1);}

/* for-each-loop3802 in k20605 in k20563 in k20533 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void f_20615(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_20615,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_20625,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2255: execute! */
t4=C_slot(t2,C_fix(0));{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,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);}}}

/* k20623 in for-each-loop3802 in k20605 in k20563 in k20533 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20625(C_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_20625,c,av);}
t2=((C_word*)((C_word*)t0)[2])[1];
f_20615(t2,((C_word*)t0)[3],C_slot(((C_word*)t0)[4],C_fix(1)));}

/* map-loop3826 in k20563 in k20533 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void f_20638(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_20638,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_20663,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:2256: g3832 */
t4=((C_word*)t0)[4];
f_20574(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);}}}

/* k20661 in map-loop3826 in k20563 in k20533 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20663(C_word c,C_word *av){
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_20663,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_20638(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* for-each-loop3792 in k20533 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void f_20672(C_word 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_20672,3,t0,t1,t2);}
a=C_alloc(3);
if(C_truep(C_i_pairp(t2))){
t3=(
/* irregex-core.scm:2246: g3793 */
  f_20536(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);}}}

/* k20706 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void f_20708(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_20708,2,t0,t1);}
a=C_alloc(3);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20711,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
if(C_truep(((C_word*)t0)[3])){
/* irregex-core.scm:2271: finalize! */
f_20205(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);}}}

/* k20709 in k20706 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20711(C_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_20711,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);}}

/* k20748 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void f_20750(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_20750,2,t0,t1);}
a=C_alloc(3);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20753,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
if(C_truep(((C_word*)t0)[3])){
/* irregex-core.scm:2274: finalize! */
f_20205(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);}}}

/* k20751 in k20748 in k20497 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20753(C_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_20753,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);}}

/* a20777 in lp2 in k20382 in k20379 in lp1 in k20362 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_20778(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_20778,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:2233: cset-contains? */
f_27348(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);}}}}

/* g3709 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static C_word f_20818(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-loop3708 in k20359 in k20347 in chicken.irregex#dfa-match/longest in k19305 in k7970 in k7739 in k7736 */
static void f_20846(C_word 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_20846,3,t0,t1,t2);}
a=C_alloc(3);
if(C_truep(C_i_pairp(t2))){
t3=(
/* irregex-core.scm:2198: g3709 */
  f_20818(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 k19305 in k7970 in k7739 in k7736 */
static C_word f_20971(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 k19305 in k7970 in k7739 in k7736 */
static C_word f_21005(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:2431: nfa-get-epsilons */
  f_20971(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 k19305 in k7970 in k7739 in k7736 */
static void f_21146(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_21146,3,t1,t2,t3);}
a=C_alloc(10);
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21150,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:2457: 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);}}

/* k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21150(C_word c,C_word *av){
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_21150,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_21153,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_22105,a[2]=t3,a[3]=t7,a[4]=((C_word)li276),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
f_22105(t9,t4,t5,C_fix(0),C_SCHEME_END_OF_LIST);}

/* k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
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 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_21153,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_21155,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t1,a[5]=((C_word)li274),tmp=(C_word)a,a+=6,tmp));
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22049,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:2674: lp */
t7=((C_word*)t3)[1];
f_21155(t7,t5,t6,C_fix(1),((C_word*)t0)[5],C_fix(0));}

/* lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void f_21155(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_21155,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_21158,a[2]=t3,a[3]=((C_word)li267),tmp=(C_word)a,a+=4,tmp));
t15=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21168,a[2]=((C_word*)t0)[2],a[3]=((C_word)li269),tmp=(C_word)a,a+=4,tmp));
t16=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21229,a[2]=t9,a[3]=t7,a[4]=((C_word)li270),tmp=(C_word)a,a+=5,tmp));
t17=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21246,a[2]=t4,a[3]=t11,a[4]=((C_word)li271),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[111],t18);
t20=(C_truep(t19)?t19:C_i_equalp(lf[391],C_u_i_car(t2)));
if(C_truep(t20)){
t21=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21296,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:2505: 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_21320,a[2]=t2,a[3]=t13,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2512: 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_21377,a[2]=t13,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2522: 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),C_retrieve2(lf[249],C_text("chicken.irregex#sre-named-definitions")));
if(C_truep(t21)){
t22=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21404,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:2526: g4097 */
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:2526: 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_21435,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_21454,a[2]=t22,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2537: string->cset */
f_26861(t25,C_i_caar(t2));}
else{
/* irregex-core.scm:2538: string->cset */
f_26861(t22,C_i_caar(t2));}}
else{
t22=C_i_caar(t2);
t23=C_eqp(t22,lf[116]);
t24=(C_truep(t23)?t23:C_eqp(t22,lf[228]));
if(C_truep(t24)){
t25=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21484,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:2544: scheme#append */
t27=*((C_word*)lf[74]+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[226]);
t26=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_21498,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_21498(t27,t25);}
else{
t27=C_eqp(t22,lf[227]);
if(C_truep(t27)){
t28=t26;
f_21498(t28,t27);}
else{
t28=C_eqp(t22,lf[157]);
t29=t26;
f_21498(t29,(C_truep(t28)?t28:C_eqp(t22,lf[158])));}}}}}
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 k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void f_21158(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_21158,3,t0,t1,t2);}
/* irregex-core.scm:2482: scheme#max */
t3=*((C_word*)lf[255]+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 k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void f_21168(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_21168,4,t0,t1,t2,t3);}
a=C_alloc(15);
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21172,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_21181,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:2485: 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_21172(t7,C_SCHEME_UNDEFINED);}}

/* k21170 in add-state! in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void f_21172(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_21172,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);}}

/* k21179 in add-state! in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21181(C_word c,C_word *av){
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_21181,c,av);}
a=C_alloc(18);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21184,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_21193,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t6,a[5]=((C_word)li268),tmp=(C_word)a,a+=6,tmp));
t8=((C_word*)t6)[1];
f_21193(t8,t2,t4);}

/* k21182 in k21179 in add-state! in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21184(C_word c,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_21184,c,av);}
t2=C_mutate(((C_word *)((C_word*)t0)[2])+1,((C_word*)t0)[3]);
t3=((C_word*)t0)[4];
f_21172(t3,t2);}

/* doloop4064 in k21179 in add-state! in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void f_21193(C_word t0,C_word t1,C_word 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_21193,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 k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void f_21229(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_21229,4,t0,t1,t2,t3);}
a=C_alloc(6);
if(C_truep(t2)){
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21240,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:2494: new-state-number */
t5=((C_word*)((C_word*)t0)[3])[1];
f_21158(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);}}}

/* k21238 in extend-state! in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21240(C_word c,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_21240,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],((C_word*)t0)[3]);
/* irregex-core.scm:2494: add-state! */
t3=((C_word*)((C_word*)t0)[4])[1];
f_21168(t3,((C_word*)t0)[5],t1,t2);}

/* add-char-state! in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void f_21246(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_21246,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_21263,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:2498: cset-union */
t13=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
C_word av2[4];
av2[0]=t13;
av2[1]=t8;
av2[2]=t10;
av2[3]=t12;
f_27469(4,av2);}}
else{
t8=C_a_i_cons(&a,2,t3,t3);
t9=C_a_i_vector1(&a,1,t8);
/* irregex-core.scm:2499: extend-state! */
t10=((C_word*)((C_word*)t0)[3])[1];
f_21229(t10,t1,t2,t9);}}

/* k21261 in add-char-state! in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21263(C_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_21263,c,av);}
/* irregex-core.scm:2498: extend-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21229(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* k21294 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21296(C_word c,C_word *av){
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_21296,c,av);}
a=C_alloc(9);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21302,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_21309,a[2]=((C_word*)t0)[4],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2507: new-state-number */
t4=((C_word*)((C_word*)t0)[5])[1];
f_21158(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);}}}

/* k21300 in k21294 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21302(C_word c,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_21302,c,av);}
a=C_alloc(6);
t2=(
/* irregex-core.scm:2508: nfa-add-epsilon! */
  f_21005(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);}}

/* k21307 in k21294 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21309(C_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_21309,c,av);}
/* irregex-core.scm:2507: add-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21168(t2,((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* k21318 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21320(C_word c,C_word *av){
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_21320,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_21334,a[2]=t5,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word)li272),tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
f_21334(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 k21318 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void f_21334(C_word t0,C_word 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_21334,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_21352,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:2519: add-char-state! */
t7=((C_word*)((C_word*)t0)[4])[1];
f_21246(t7,t5,t3,C_i_string_ref(t6,t2));}}

/* k21350 in lp2 in k21318 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21352(C_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_21352,c,av);}
/* irregex-core.scm:2518: lp2 */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21334(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* k21375 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21377(C_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_21377,c,av);}
/* irregex-core.scm:2522: add-char-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21246(t2,((C_word*)t0)[3],t1,C_u_i_car(((C_word*)t0)[4]));}

/* k21402 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21404(C_word c,C_word *av){
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_21404,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:2526: lp */
t4=((C_word*)((C_word*)t0)[3])[1];
f_21155(t4,((C_word*)t0)[4],t3,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}

/* k21433 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21435(C_word c,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_21435,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21442,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:2539: lp */
t3=((C_word*)((C_word*)t0)[4])[1];
f_21155(t3,t2,C_u_i_cdr(((C_word*)t0)[5]),((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);}

/* k21440 in k21433 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21442(C_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_21442,c,av);}
/* irregex-core.scm:2539: extend-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21229(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4]);}

/* k21452 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21454(C_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_21454,c,av);}
/* irregex-core.scm:2537: cset-case-insensitive */
f_28002(((C_word*)t0)[2],t1);}

/* k21482 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21484(C_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_21484,c,av);}
/* irregex-core.scm:2544: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21155(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void f_21498(C_word 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(7,0,5)))){
C_save_and_reclaim_args((void *)trf_21498,2,t0,t1);}
a=C_alloc(7);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21501,a[2]=((C_word*)t0)[2],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:2546: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_21155(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|2,a[1]=(C_word)f_21545,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(t2)){
t4=t3;
f_21545(t4,t2);}
else{
t4=C_eqp(((C_word*)t0)[9],lf[248]);
if(C_truep(t4)){
t5=t3;
f_21545(t5,t4);}
else{
t5=C_eqp(((C_word*)t0)[9],lf[235]);
t6=t3;
f_21545(t6,(C_truep(t5)?t5:C_eqp(((C_word*)t0)[9],lf[180])));}}}}

/* k21499 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21501(C_word c,C_word *av){
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_21501,c,av);}
a=C_alloc(7);
t2=C_i_caar(((C_word*)t0)[2]);
t3=(C_truep((C_truep(C_eqp(t2,lf[226]))?C_SCHEME_TRUE:(C_truep(C_eqp(t2,lf[157]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))?C_retrieve2(lf[65],C_text("chicken.irregex#flag-clear")):C_retrieve2(lf[64],C_text("chicken.irregex#flag-join")));
t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21507,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[226]))?C_SCHEME_TRUE:(C_truep(C_eqp(t6,lf[227]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
/* irregex-core.scm:2546: g4124 */
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:2546: g4124 */
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);}}}

/* k21505 in k21499 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21507(C_word c,C_word *av){
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_21507,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_21521,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:2555: new-state-number */
t4=((C_word*)((C_word*)t0)[6])[1];
f_21158(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);}}}

/* k21519 in k21505 in k21499 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21521(C_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_21521,c,av);}
/* irregex-core.scm:2555: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21155(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void f_21545(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word 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(12,0,5)))){
C_save_and_reclaim_args((void *)trf_21545,2,t0,t1);}
a=C_alloc(12);
t2=((C_word*)t0)[2];
if(C_truep(t1)){
t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_21548,a[2]=((C_word*)t2)[10],a[3]=((C_word*)t2)[4],a[4]=((C_word*)t2)[3],a[5]=((C_word*)t2)[2],a[6]=((C_word*)t2)[7],a[7]=((C_word*)t2)[6],a[8]=((C_word*)t2)[8],tmp=(C_word)a,a+=9,tmp);
t4=C_u_i_car(((C_word*)t2)[2]);
t5=C_fixnum_and(((C_word*)t2)[6],C_fix(2));
t6=C_eqp(C_fix(2),t5);
/* irregex-core.scm:2557: sre->cset */
f_26881(t3,t4,C_a_i_list(&a,1,t6));}
else{
t3=C_eqp(((C_word*)t2)[9],lf[104]);
if(C_truep(t3)){
t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_21572,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[11],a[4]=((C_word*)t2)[4],a[5]=((C_word*)t2)[5],a[6]=((C_word*)t2)[12],a[7]=((C_word*)t2)[3],a[8]=((C_word*)t2)[6],tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:2562: lp */
t5=((C_word*)((C_word*)t2)[3])[1];
f_21155(t5,t4,C_u_i_cdr(((C_word*)t2)[2]),((C_word*)t2)[7],((C_word*)t2)[6],((C_word*)t2)[8]);}
else{
t4=C_eqp(((C_word*)t2)[9],lf[132]);
if(C_truep(t4)){
t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21664,a[2]=((C_word*)t2)[12],a[3]=((C_word*)t2)[4],a[4]=((C_word*)t2)[2],a[5]=((C_word*)t2)[3],a[6]=((C_word*)t2)[6],a[7]=((C_word*)t2)[5],tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:2586: lp */
t6=((C_word*)((C_word*)t2)[3])[1];
f_21155(t6,t5,C_u_i_cdr(((C_word*)t2)[2]),((C_word*)t2)[7],((C_word*)t2)[6],((C_word*)t2)[8]);}
else{
t5=C_eqp(((C_word*)t2)[9],lf[130]);
t6=(C_truep(t5)?t5:C_eqp(((C_word*)t2)[9],lf[128]));
if(C_truep(t6)){
t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21698,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[12],a[4]=((C_word*)t2)[4],a[5]=((C_word*)t2)[3],a[6]=((C_word*)t2)[6],a[7]=((C_word*)t2)[5],tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:2595: lp */
t8=((C_word*)((C_word*)t2)[3])[1];
f_21155(t8,t7,C_u_i_cdr(((C_word*)t2)[2]),((C_word*)t2)[7],((C_word*)t2)[6],((C_word*)t2)[8]);}
else{
t7=C_eqp(((C_word*)t2)[9],lf[246]);
t8=(C_truep(t7)?t7:C_eqp(((C_word*)t2)[9],lf[109]));
if(C_truep(t8)){
t9=C_i_assq(C_u_i_car(((C_word*)t2)[2]),((C_word*)t2)[13]);
t10=C_i_cdr(t9);
t11=C_fixnum_shift_left(t10,C_fix(1));
t12=C_fixnum_plus(t11,C_fix(1));
t13=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_21758,a[2]=((C_word*)t2)[12],a[3]=t11,a[4]=t12,a[5]=((C_word*)t2)[4],a[6]=((C_word*)t2)[11],a[7]=((C_word*)t2)[5],a[8]=((C_word*)t2)[2],a[9]=((C_word*)t2)[3],a[10]=((C_word*)t2)[6],tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:2640: lp */
t14=((C_word*)((C_word*)t2)[3])[1];
f_21155(t14,t13,C_u_i_cdr(((C_word*)t2)[2]),((C_word*)t2)[7],((C_word*)t2)[6],((C_word*)t2)[8]);}
else{
t9=C_eqp(((C_word*)t2)[9],lf[120]);
t10=(C_truep(t9)?t9:C_eqp(((C_word*)t2)[9],lf[121]));
if(C_truep(t10)){
t11=C_i_assq(C_u_i_car(((C_word*)t2)[2]),((C_word*)t2)[13]);
t12=C_i_cdr(t11);
t13=C_fixnum_shift_left(t12,C_fix(1));
t14=C_fixnum_plus(t13,C_fix(1));
t15=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_21836,a[2]=((C_word*)t2)[12],a[3]=t13,a[4]=t14,a[5]=((C_word*)t2)[4],a[6]=((C_word*)t2)[11],a[7]=((C_word*)t2)[5],a[8]=((C_word*)t2)[3],a[9]=((C_word*)t2)[6],a[10]=((C_word*)t2)[2],tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:2653: lp */
t16=((C_word*)((C_word*)t2)[3])[1];
f_21155(t16,t15,C_u_i_cdr(((C_word*)t2)[2]),((C_word*)t2)[7],((C_word*)t2)[6],((C_word*)t2)[8]);}
else{
t11=C_i_caar(((C_word*)t2)[2]);
t12=C_i_assq(t11,C_retrieve2(lf[249],C_text("chicken.irregex#sre-named-definitions")));
if(C_truep(t12)){
t13=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_21903,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[3],a[4]=C_SCHEME_UNDEFINED,a[5]=((C_word*)t2)[7],a[6]=((C_word*)t2)[6],a[7]=((C_word*)t2)[8],a[8]=((C_word)li273),tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:2664: g4200 */
t14=t13;
f_21903(t14,((C_word*)t2)[4],t12);}
else{
t13=((C_word*)t2)[4];{
C_word av2[2];
av2[0]=t13;
av2[1]=C_SCHEME_FALSE;
((C_proc)(void*)(*((C_word*)t13+1)))(2,av2);}}}}}}}}}

/* k21546 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21548(C_word c,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_21548,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21555,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:2559: lp */
t3=((C_word*)((C_word*)t0)[4])[1];
f_21155(t3,t2,C_u_i_cdr(((C_word*)t0)[5]),((C_word*)t0)[6],((C_word*)t0)[7],((C_word*)t0)[8]);}

/* k21553 in k21546 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21555(C_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_21555,c,av);}
/* irregex-core.scm:2559: extend-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21229(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4]);}

/* k21570 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21572(C_word c,C_word *av){
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_21572,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_21588,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2567: new-state-number */
t4=((C_word*)((C_word*)t0)[5])[1];
f_21158(t4,t3,t1);}
else{
t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_21591,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_21649,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:2570: scheme#cddar */
t5=*((C_word*)lf[394]+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);}}}

/* k21586 in k21570 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21588(C_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_21588,c,av);}
/* irregex-core.scm:2567: add-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21168(t2,((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* k21589 in k21570 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21591(C_word c,C_word *av){
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_21591,c,av);}
a=C_alloc(15);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21594,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_21633,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:2575: scheme#cadar */
t4=*((C_word*)lf[393]+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_21594(2,av2);}}}

/* k21592 in k21589 in k21570 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21594(C_word c,C_word *av){
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_21594,c,av);}
a=C_alloc(14);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21600,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_21610,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21614,a[2]=((C_word*)t0)[6],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2580: scheme#max */
t5=*((C_word*)lf[255]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t5;
av2[1]=t4;
av2[2]=t1;
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t5+1)))(4,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);}}}

/* k21598 in k21592 in k21589 in k21570 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21600(C_word c,C_word *av){
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_21600,c,av);}
a=C_alloc(12);
t2=(
/* irregex-core.scm:2582: nfa-add-epsilon! */
  f_21005(C_a_i(&a,6),((C_word*)((C_word*)t0)[2])[1],t1,((C_word*)t0)[3],C_SCHEME_FALSE)
);
t3=(
/* irregex-core.scm:2583: nfa-add-epsilon! */
  f_21005(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);}}

/* k21608 in k21592 in k21589 in k21570 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21610(C_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_21610,c,av);}
/* irregex-core.scm:2580: add-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21168(t2,((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* k21612 in k21592 in k21589 in k21570 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21614(C_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_21614,c,av);}
/* irregex-core.scm:2580: new-state-number */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21158(t2,((C_word*)t0)[3],t1);}

/* k21623 in k21631 in k21589 in k21570 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21625(C_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_21625,c,av);}
/* irregex-core.scm:2575: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21155(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k21627 in k21631 in k21589 in k21570 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21629(C_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_21629,c,av);}
/* irregex-core.scm:2576: new-state-number */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21158(t2,((C_word*)t0)[3],t1);}

/* k21631 in k21589 in k21570 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21633(C_word c,C_word *av){
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_21633,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_21625,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_21629,a[2]=((C_word*)t0)[6],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2576: scheme#max */
t5=*((C_word*)lf[255]+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);}}

/* k21639 in k21647 in k21570 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21641(C_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_21641,c,av);}
/* irregex-core.scm:2570: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21155(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k21647 in k21570 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21649(C_word c,C_word *av){
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_21649,c,av);}
a=C_alloc(13);
t2=(
/* irregex-core.scm:2570: sre-alternate */
  f_18603(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_21641,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:2571: new-state-number */
t5=((C_word*)((C_word*)t0)[6])[1];
f_21158(t5,t4,((C_word*)t0)[5]);}

/* k21662 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21664(C_word c,C_word *av){
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_21664,c,av);}
a=C_alloc(12);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21670,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_21684,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:2590: new-state-number */
t5=((C_word*)((C_word*)t0)[7])[1];
f_21158(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);}}}

/* k21668 in k21662 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21670(C_word c,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_21670,c,av);}
a=C_alloc(6);
if(C_truep(t1)){
t2=(
/* irregex-core.scm:2592: nfa-add-epsilon! */
  f_21005(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);}}}

/* k21682 in k21662 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21684(C_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_21684,c,av);}
/* irregex-core.scm:2590: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21155(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k21696 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21698(C_word c,C_word *av){
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_21698,c,av);}
a=C_alloc(9);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21704,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21738,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:2599: new-state-number */
t4=((C_word*)((C_word*)t0)[7])[1];
f_21158(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);}}}

/* k21702 in k21696 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21704(C_word c,C_word *av){
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_21704,c,av);}
a=C_alloc(13);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21707,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[3],a[4]=t1,a[5]=((C_word*)t2)[4],tmp=(C_word)a,a+=6,tmp);
t4=C_i_cdar(((C_word*)t2)[2]);
t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_21734,a[2]=((C_word*)t2)[5],a[3]=t3,a[4]=t4,a[5]=((C_word*)t2)[6],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:2602: new-state-number */
t6=((C_word*)((C_word*)t2)[7])[1];
f_21158(t6,t5,t1);}

/* k21705 in k21702 in k21696 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21707(C_word c,C_word *av){
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_21707,c,av);}
a=C_alloc(12);
if(C_truep(t1)){
t2=C_i_caar(((C_word*)t0)[2]);
t3=C_eqp(lf[128],t2);
if(C_truep(t3)){
t4=(
/* irregex-core.scm:2607: nfa-add-epsilon! */
  f_21005(C_a_i(&a,6),((C_word*)((C_word*)t0)[3])[1],t1,((C_word*)t0)[4],C_SCHEME_FALSE)
);
t5=(
/* irregex-core.scm:2609: nfa-add-epsilon! */
  f_21005(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:2609: nfa-add-epsilon! */
  f_21005(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);}}}

/* k21732 in k21702 in k21696 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21734(C_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_21734,c,av);}
/* irregex-core.scm:2602: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21155(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k21736 in k21696 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21738(C_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_21738,c,av);}
/* irregex-core.scm:2598: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21155(t2,((C_word*)t0)[3],lf[395],t1,((C_word*)t0)[4],((C_word*)t0)[5]);}

/* k21756 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21758(C_word c,C_word *av){
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_21758,c,av);}
a=C_alloc(16);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_21764,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_21806,a[2]=((C_word*)t0)[6],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2642: new-state-number */
t4=((C_word*)((C_word*)t0)[7])[1];
f_21158(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);}}}

/* k21762 in k21756 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21764(C_word c,C_word *av){
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_21764,c,av);}
a=C_alloc(23);
t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_21767,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:2643: sre-sequence */
  f_18580(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_21794,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:2644: new-state-number */
t6=((C_word*)((C_word*)t0)[8])[1];
f_21158(t6,t5,t1);}

/* k21765 in k21762 in k21756 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21767(C_word c,C_word *av){
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_21767,c,av);}
a=C_alloc(13);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_21770,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_21786,a[2]=((C_word*)t0)[8],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2645: new-state-number */
t4=((C_word*)((C_word*)t0)[9])[1];
f_21158(t4,t3,t1);}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
f_21770(2,av2);}}}

/* k21768 in k21765 in k21762 in k21756 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21770(C_word c,C_word *av){
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_21770,c,av);}
a=C_alloc(12);
if(C_truep(t1)){
t2=(
/* irregex-core.scm:2647: nfa-add-epsilon! */
  f_21005(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:2648: nfa-add-epsilon! */
  f_21005(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);}}}

/* k21784 in k21765 in k21762 in k21756 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21786(C_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_21786,c,av);}
/* irregex-core.scm:2645: add-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21168(t2,((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* k21792 in k21762 in k21756 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21794(C_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_21794,c,av);}
/* irregex-core.scm:2643: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21155(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k21804 in k21756 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21806(C_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_21806,c,av);}
/* irregex-core.scm:2642: add-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21168(t2,((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* k21834 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21836(C_word c,C_word *av){
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_21836,c,av);}
a=C_alloc(16);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_21842,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_21884,a[2]=((C_word*)t0)[6],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2655: new-state-number */
t4=((C_word*)((C_word*)t0)[7])[1];
f_21158(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);}}}

/* k21840 in k21834 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21842(C_word c,C_word *av){
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_21842,c,av);}
a=C_alloc(17);
t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_21845,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_21880,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:2656: scheme#cddar */
t4=*((C_word*)lf[394]+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);}}

/* k21843 in k21840 in k21834 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21845(C_word c,C_word *av){
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_21845,c,av);}
a=C_alloc(13);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_21848,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_21864,a[2]=((C_word*)t0)[8],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2658: new-state-number */
t4=((C_word*)((C_word*)t0)[9])[1];
f_21158(t4,t3,t1);}
else{
t3=t2;{
C_word *av2=av;
av2[0]=t3;
av2[1]=C_SCHEME_FALSE;
f_21848(2,av2);}}}

/* k21846 in k21843 in k21840 in k21834 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21848(C_word c,C_word *av){
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_21848,c,av);}
a=C_alloc(12);
if(C_truep(t1)){
t2=(
/* irregex-core.scm:2660: nfa-add-epsilon! */
  f_21005(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:2661: nfa-add-epsilon! */
  f_21005(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);}}}

/* k21862 in k21843 in k21840 in k21834 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21864(C_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_21864,c,av);}
/* irregex-core.scm:2658: add-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21168(t2,((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* k21870 in k21878 in k21840 in k21834 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21872(C_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_21872,c,av);}
/* irregex-core.scm:2656: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21155(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5],((C_word*)t0)[6]);}

/* k21878 in k21840 in k21834 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21880(C_word c,C_word *av){
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_21880,c,av);}
a=C_alloc(13);
t2=(
/* irregex-core.scm:2656: sre-sequence */
  f_18580(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_21872,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:2657: new-state-number */
t5=((C_word*)((C_word*)t0)[6])[1];
f_21158(t5,t4,((C_word*)t0)[5]);}

/* k21882 in k21834 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21884(C_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_21884,c,av);}
/* irregex-core.scm:2655: add-state! */
t2=((C_word*)((C_word*)t0)[2])[1];
f_21168(t2,((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* g4200 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void f_21903(C_word 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_21903,3,t0,t1,t2);}
a=C_alloc(3);
t3=C_mutate(((C_word *)t0)+4,t1);
t4=C_i_cdr(t2);
if(C_truep(C_i_closurep(t4))){
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21921,a[2]=t0,tmp=(C_word)a,a+=3,tmp);{
C_word av2[4];
av2[0]=0;
av2[1]=t5;
av2[2]=C_u_i_cdr(t2);
av2[3]=C_i_cdar(((C_word*)t0)[2]);
C_apply(4,av2);}}
else{
/* irregex-core.scm:2670: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t5;
av2[1]=((C_word*)t0)[4];
av2[2]=lf[396];
av2[3]=C_i_caar(((C_word*)t0)[2]);
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}}

/* k21919 in g4200 in k21543 in k21496 in lp in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_21921(C_word c,C_word *av){
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,5)))){
C_save_and_reclaim((void *)f_21921,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_u_i_cdr(((C_word*)t2)[2]);
t4=C_a_i_cons(&a,2,t1,t3);
/* irregex-core.scm:2668: lp */
t5=((C_word*)((C_word*)t2)[3])[1];
f_21155(t5,((C_word*)t2)[4],t4,((C_word*)t2)[5],((C_word*)t2)[6],((C_word*)t2)[7]);}

/* k22047 in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22049(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_22049,c,av);}
a=C_alloc(3);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22055,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
t3=C_fixnum_plus(t1,C_fix(1));
/* irregex-core.scm:2676: 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);}}}

/* k22053 in k22047 in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22055(C_word c,C_word *av){
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,3)))){
C_save_and_reclaim((void *)f_22055,c,av);}
a=C_alloc(17);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22058,a[2]=((C_word*)t2)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t4=C_block_size(t1);
t5=C_a_i_fixnum_difference(&a,2,t4,C_fix(1));
t6=C_SCHEME_UNDEFINED;
t7=(*a=C_VECTOR_TYPE|1,a[1]=t6,tmp=(C_word)a,a+=2,tmp);
t8=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_22066,a[2]=((C_word*)t2)[3],a[3]=t1,a[4]=t7,a[5]=((C_word)li275),tmp=(C_word)a,a+=6,tmp));
t9=((C_word*)t7)[1];
f_22066(t9,t3,t5);}

/* k22056 in k22053 in k22047 in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22058(C_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_22058,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);}}

/* doloop4210 in k22053 in k22047 in k21151 in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void f_22066(C_word t0,C_word t1,C_word 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_22066,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 k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void f_22105(C_word t0,C_word 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_22105,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[246]);
t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_22140,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_22140(t10,t8);}
else{
t10=C_eqp(t7,lf[109]);
if(C_truep(t10)){
t11=t9;
f_22140(t11,t10);}
else{
t11=C_eqp(t7,lf[120]);
t12=t9;
f_22140(t12,(C_truep(t11)?t11:C_eqp(t7,lf[121])));}}}
else{
/* irregex-core.scm:2478: lp */
t13=t1;
t14=C_u_i_cdr(t2);
t15=t3;
t16=t4;
t1=t13;
t2=t14;
t3=t15;
t4=t16;
goto loop;}}}

/* k22138 in lp in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void f_22140(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,3)))){
C_save_and_reclaim_args((void *)trf_22140,2,t0,t1);}
a=C_alloc(6);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22147,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
t3=C_u_i_car(((C_word*)t0)[3]);
/* irregex-core.scm:2475: scheme#append */
t4=*((C_word*)lf[74]+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_22173,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:2477: scheme#append */
t3=*((C_word*)lf[74]+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);}}}

/* k22145 in k22138 in lp in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22147(C_word c,C_word *av){
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,4)))){
C_save_and_reclaim((void *)f_22147,c,av);}
a=C_alloc(6);
t2=((C_word*)t0)[2];
t3=C_fixnum_plus(((C_word*)t2)[2],C_fix(1));
t4=C_u_i_car(((C_word*)t2)[3]);
t5=C_a_i_cons(&a,2,t4,((C_word*)t2)[2]);
t6=C_a_i_cons(&a,2,t5,((C_word*)t2)[4]);
/* irregex-core.scm:2475: lp */
t7=((C_word*)((C_word*)t2)[5])[1];
f_22105(t7,((C_word*)t2)[6],t1,t3,t6);}

/* k22171 in k22138 in lp in k21148 in chicken.irregex#sre->nfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22173(C_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_22173,c,av);}
/* irregex-core.scm:2477: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_22105(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4],((C_word*)t0)[5]);}

/* chicken.irregex#make-mst in k19305 in k7970 in k7739 in k7736 */
static void f_22269(C_word 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_22269,2,t1,t2);}
a=C_alloc(14);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22273,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:2747: 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);}}

/* k22271 in chicken.irregex#make-mst in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22273(C_word c,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_22273,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22286,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2748: 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);}}

/* k22284 in k22271 in chicken.irregex#make-mst in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22286(C_word c,C_word *av){
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_22286,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 k19305 in k7970 in k7739 in k7736 */
static void f_22298(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_22298,2,t1,t2);}
a=C_alloc(4);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22302,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2755: %vector-copy */
f_7749(t3,t2);}

/* k22300 in chicken.irregex#mst-copy in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22302(C_word c,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_22302,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22309,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2756: %vector-copy */
f_7749(t2,C_i_vector_ref(((C_word*)t0)[3],C_fix(0)));}

/* k22307 in k22300 in chicken.irregex#mst-copy in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22309(C_word c,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_22309,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 k19305 in k7970 in k7739 in k7736 */
static void f_22315(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_22315,4,t1,t2,t3,t4);}
a=C_alloc(6);
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_22319,a[2]=t1,a[3]=t2,a[4]=t3,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:2760: make-mst */
f_22269(t5,t2);}

/* k22317 in chicken.irregex#nfa-state->mst in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22319(C_word c,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_22319,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22322,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2761: mst-add! */
f_22324(t2,((C_word*)t0)[3],t1,((C_word*)t0)[4],((C_word*)t0)[5]);}

/* k22320 in k22317 in chicken.irregex#nfa-state->mst in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22322(C_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_22322,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 k19305 in k7970 in k7739 in k7736 */
static void f_22324(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_22324,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_22331,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_22331(t15,C_i_vector_set(t3,C_fix(1),C_fixnum_plus(t14,C_fix(1))));}
else{
t12=t9;
f_22331(t12,C_SCHEME_UNDEFINED);}}

/* k22329 in chicken.irregex#mst-add! in k19305 in k7970 in k7739 in k7736 */
static void f_22331(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word 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_22331,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_22338,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=((C_word)li281),tmp=(C_word)a,a+=5,tmp);
t5=C_i_check_list_2(((C_word*)t0)[4],lf[307]);
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_22373,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_22386,a[2]=t4,a[3]=t8,a[4]=((C_word)li282),tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
f_22386(t10,t6,((C_word*)t0)[4]);}

/* g4268 in k22329 in chicken.irregex#mst-add! in k19305 in k7970 in k7739 in k7736 */
static C_word f_22338(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);}}

/* k22371 in k22329 in chicken.irregex#mst-add! in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22373(C_word c,C_word *av){
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_22373,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-loop4267 in k22329 in chicken.irregex#mst-add! in k19305 in k7970 in k7739 in k7736 */
static void f_22386(C_word 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_22386,3,t0,t1,t2);}
a=C_alloc(3);
if(C_truep(C_i_pairp(t2))){
t3=(
/* irregex-core.scm:2772: g4268 */
  f_22338(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);}}}

/* k22485 in k23379 in g4523 in lp2 in lp in k23321 in k23317 in k23313 in chicken.irregex#nfa-epsilon-closure in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22487(C_word c,C_word *av){
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(5,c,2)))){
C_save_and_reclaim((void *)f_22487,c,av);}
a=C_alloc(5);
t2=C_mutate(((C_word *)t0)+4,t1);
t3=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t4=t3;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_mutate(((C_word *)t0)+6,t5);
t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22493,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
t8=C_fixnum_plus(((C_word*)t0)[3],C_fix(3));
t9=C_i_vector_ref(((C_word*)t0)[2],t8);
if(C_truep(C_i_not(t9))){
t10=C_fixnum_plus(((C_word*)((C_word*)t0)[6])[1],((C_word*)t0)[3]);
t11=C_mutate(((C_word *)((C_word*)t0)[6])+1,t10);
t12=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t13=t7;
f_22493(t13,C_i_vector_set(((C_word*)t0)[2],C_fix(1),C_fixnum_plus(t12,C_fix(1))));}
else{
t10=t7;
f_22493(t10,C_SCHEME_UNDEFINED);}}

/* k22491 in k22485 in k23379 in g4523 in lp2 in lp in k23321 in k23317 in k23313 in chicken.irregex#nfa-epsilon-closure in k19305 in k7970 in k7739 in k7736 */
static void f_22493(C_word t0,C_word t1){
C_word tmp;
C_word 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(14,0,2)))){
C_save_and_reclaim_args((void *)trf_22493,2,t0,t1);}
a=C_alloc(14);
t2=((C_word*)t0)[2];
t3=C_i_vector_set(((C_word*)t2)[2],C_fixnum_plus(((C_word*)t2)[3],C_fix(3)),((C_word*)t2)[4]);
t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_22499,a[2]=((C_word*)t2)[5],a[3]=((C_word*)t2)[6],a[4]=((C_word*)t2)[2],a[5]=((C_word*)t2)[7],a[6]=((C_word*)t2)[3],a[7]=((C_word*)t2)[4],a[8]=((C_word*)t2)[8],a[9]=((C_word*)t2)[9],a[10]=((C_word*)t2)[10],tmp=(C_word)a,a+=11,tmp);
t5=C_i_memq(((C_word*)t2)[11],((C_word*)t2)[12]);
if(C_truep(C_i_not(t5))){
t6=C_fixnum_plus(((C_word*)((C_word*)t2)[6])[1],((C_word*)t2)[13]);
t7=C_mutate(((C_word *)((C_word*)t2)[6])+1,t6);
t8=C_a_i_cons(&a,2,((C_word*)t2)[11],((C_word*)t2)[12]);
t9=t4;
f_22499(t9,C_i_vector_set(((C_word*)t2)[14],((C_word*)t2)[13],t8));}
else{
t6=t4;
f_22499(t6,C_SCHEME_UNDEFINED);}}

/* k22497 in k22491 in k22485 in k23379 in g4523 in lp2 in lp in k23321 in k23317 in k23313 in chicken.irregex#nfa-epsilon-closure in k19305 in k7970 in k7739 in k7736 */
static void f_22499(C_word t0,C_word t1){
C_word tmp;
C_word 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_22499,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:3040: lp2 */
t9=((C_word*)((C_word*)t0)[9])[1];
f_23348(t9,((C_word*)t0)[10],t6,t8);}

/* lp in k23379 in g4523 in lp2 in lp in k23321 in k23317 in k23313 in chicken.irregex#nfa-epsilon-closure in k19305 in k7970 in k7739 in k7736 */
static void f_22552(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_22552,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:2803: scheme#append */
t9=*((C_word*)lf[74]+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:2804: lp */
t10=t1;
t11=t6;
t12=t8;
t1=t10;
t2=t11;
t3=t12;
goto loop;}}}

/* lp in lp in k22872 in lp2 in k22840 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_22623(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word 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_22623,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:2825: 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 k19305 in k7970 in k7739 in k7736 */
static void f_22676(C_word 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_22676,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_22685,a[2]=t5,a[3]=t2,a[4]=t7,a[5]=t3,a[6]=((C_word)li284),tmp=(C_word)a,a+=7,tmp));
t9=((C_word*)t7)[1];
f_22685(t9,t1,C_fix(3),t4);}

/* lp in chicken.irregex#mst-fold in k19305 in k7970 in k7739 in k7736 */
static void f_22685(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_22685,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_22705,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:2834: 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:2834: lp */
t10=t1;
t11=t6;
t12=t3;
t1=t10;
t2=t11;
t3=t12;
goto loop;}}}

/* k22703 in lp in chicken.irregex#mst-fold in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22705(C_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_22705,c,av);}
/* irregex-core.scm:2834: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_22685(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* doloop4368 in g4523 in lp2 in lp in k23321 in k23317 in k23313 in chicken.irregex#nfa-epsilon-closure in k19305 in k7970 in k7739 in k7736 */
static C_word f_22734(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 k19305 in k7970 in k7739 in k7736 */
static void f_22758(C_word t1,C_word t2,C_word t3){
C_word 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(16,0,4)))){
C_save_and_reclaim_args((void *)trf_22758,3,t1,t2,t3);}
a=C_alloc(16);
t4=C_i_pairp(t3);
t5=(C_truep(t4)?C_u_i_car(t3):C_SCHEME_FALSE);
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_22765,a[2]=t2,a[3]=t5,a[4]=t1,a[5]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=6,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:2883: nfa-state->mst */
f_22315(t6,t2,t9,C_SCHEME_END_OF_LIST);}

/* k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22765(C_word c,C_word *av){
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_22765,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+5,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22768,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2884: nfa-epsilon-closure */
f_23443(t3,((C_word*)t0)[2],((C_word*)t0)[5]);}

/* k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22768(C_word c,C_word *av){
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,5)))){
C_save_and_reclaim((void *)f_22768,c,av);}
a=C_alloc(7);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_22771,a[2]=C_SCHEME_UNDEFINED,a[3]=t1,a[4]=((C_word*)t2)[2],a[5]=((C_word*)t2)[3],a[6]=((C_word*)t2)[4],tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:2887: tag-set-commands-for-closure */
f_23458(t3,((C_word*)t2)[2],((C_word*)t2)[5],t1,C_SCHEME_END_OF_LIST);}

/* k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22771(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_22771,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+2,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22774,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2888: make-mst */
f_22269(t3,((C_word*)t0)[4]);}

/* k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22774(C_word c,C_word *av){
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(36,c,5)))){
C_save_and_reclaim((void *)f_22774,c,av);}
a=C_alloc(36);
t2=((C_word*)t0)[2];
t3=C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,((C_word*)t2)[2]);
t4=C_a_i_cons(&a,2,C_SCHEME_FALSE,t3);
t5=C_a_i_cons(&a,2,((C_word*)t2)[3],t4);
t6=C_a_i_list(&a,1,t5);
t7=C_a_i_list3(&a,3,t1,C_SCHEME_FALSE,t6);
t8=C_a_i_list1(&a,1,((C_word*)t2)[3]);
t9=C_a_i_list1(&a,1,t7);
t10=C_SCHEME_UNDEFINED;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_22790,a[2]=t7,a[3]=((C_word*)t2)[4],a[4]=((C_word*)t2)[5],a[5]=t11,a[6]=((C_word)li298),tmp=(C_word)a,a+=7,tmp));
t13=((C_word*)t11)[1];
f_22790(t13,((C_word*)t2)[6],t8,t9,C_fix(0));}

/* lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_22790(C_word t0,C_word 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_22790,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_22807,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2899: ##sys#fast-reverse */
t10=C_fast_retrieve(lf[70]);{
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:2903: 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_22842,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_23145,a[2]=((C_word*)t0)[3],a[3]=((C_word)li297),tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:2964: mst-fold */
f_22676(t8,t7,t9,C_SCHEME_END_OF_LIST);}}}}

/* k22805 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22807(C_word c,C_word *av){
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_22807,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_22969,a[2]=C_SCHEME_UNDEFINED,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_23091,a[2]=t4,a[3]=((C_word)li289),tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
f_23091(t6,t2,C_fix(0),t1,C_SCHEME_END_OF_LIST);}

/* k22840 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22842(C_word c,C_word *av){
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_22842,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_22846,a[2]=((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)li294),tmp=(C_word)a,a+=9,tmp));
t6=((C_word*)t4)[1];
f_22846(t6,((C_word*)t0)[8],t1,t2,C_SCHEME_END_OF_LIST);}

/* lp2 in k22840 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_22846(C_word t0,C_word 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_22846,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:2911: lp */
t8=((C_word*)((C_word*)t0)[4])[1];
f_22790(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_22874,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:2914: nfa-epsilon-closure */
f_23443(t5,((C_word*)t0)[7],C_i_cdar(t2));}}

/* k22872 in lp2 in k22840 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22874(C_word c,C_word *av){
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_22874,c,av);}
a=C_alloc(23);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_22877,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_22877(t9,t8);}
else{
t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_23776,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_23625,a[2]=t13,a[3]=t10,a[4]=t11,a[5]=t1,a[6]=((C_word)li293),tmp=(C_word)a,a+=7,tmp));
t15=((C_word*)t13)[1];
f_23625(t15,t9,((C_word*)t0)[8]);}}

/* k22875 in k22872 in lp2 in k22840 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_22877(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_22877,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_22883,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:2920: tag-set-commands-for-closure */
f_23458(t3,((C_word*)t0)[8],C_i_cdar(((C_word*)t0)[3]),((C_word*)t0)[2],t2);}

/* k22881 in k22875 in k22872 in lp2 in k22840 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22883(C_word c,C_word *av){
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_22883,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:2923: lp2 */
t10=((C_word*)((C_word*)t0)[8])[1];
f_22846(t10,((C_word*)t0)[9],t3,t4,t9);}

/* k22967 in k22805 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22969(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_22969,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+2,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22972,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2941: 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_i_length(((C_word*)t0)[4]);
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k22970 in k22967 in k22805 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22972(C_word c,C_word *av){
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,4)))){
C_save_and_reclaim((void *)f_22972,c,av);}
a=C_alloc(8);
t2=((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|5,a[1]=(C_word)f_22977,a[2]=t1,a[3]=((C_word*)t2)[2],a[4]=t4,a[5]=((C_word)li288),tmp=(C_word)a,a+=6,tmp));
t6=((C_word*)t4)[1];
f_22977(t6,((C_word*)t2)[3],C_fix(0),((C_word*)t2)[4]);}

/* doloop4425 in k22970 in k22967 in k22805 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_22977(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(9,0,2)))){
C_save_and_reclaim_args((void *)trf_22977,4,t0,t1,t2,t3);}
a=C_alloc(9);
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|8,a[1]=(C_word)f_22987,a[2]=((C_word*)t0)[3],a[3]=C_SCHEME_UNDEFINED,a[4]=((C_word*)t0)[2],a[5]=t2,a[6]=((C_word*)t0)[4],a[7]=t1,a[8]=t3,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:2945: scheme#cadar */
t5=*((C_word*)lf[393]+1);{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}}

/* k22985 in doloop4425 in k22970 in k22967 in k22805 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22987(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_22987,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+3,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22990,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2946: scheme#caddar */
t4=*((C_word*)lf[402]+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)[8];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k22988 in k22985 in doloop4425 in k22970 in k22967 in k22805 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_22990(C_word c,C_word *av){
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(28,c,3)))){
C_save_and_reclaim((void *)f_22990,c,av);}
a=C_alloc(28);
t2=((C_word*)t0)[2];
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=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_23010,a[2]=C_SCHEME_UNDEFINED,a[3]=((C_word*)t2)[2],a[4]=C_SCHEME_UNDEFINED,a[5]=((C_word)li286),tmp=(C_word)a,a+=6,tmp);
t8=C_i_check_list_2(t1,lf[212]);
t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_23051,a[2]=((C_word*)t2)[3],a[3]=((C_word*)t2)[4],a[4]=((C_word*)t2)[5],a[5]=((C_word*)t2)[6],a[6]=((C_word*)t2)[7],a[7]=((C_word*)t2)[8],tmp=(C_word)a,a+=8,tmp);
t10=C_SCHEME_UNDEFINED;
t11=(*a=C_VECTOR_TYPE|1,a[1]=t10,tmp=(C_word)a,a+=2,tmp);
t12=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_23053,a[2]=t5,a[3]=t11,a[4]=t7,a[5]=t6,a[6]=((C_word)li287),tmp=(C_word)a,a+=7,tmp));
t13=((C_word*)t11)[1];
f_23053(t13,t9,t1);}

/* g4439 in k22988 in k22985 in doloop4425 in k22970 in k22967 in k22805 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_23010(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word 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(3,0,2)))){
C_save_and_reclaim_args((void *)trf_23010,3,t0,t1,t2);}
a=C_alloc(3);
t3=C_mutate(((C_word *)t0)+2,t2);
t4=C_mutate(((C_word *)t0)+4,t1);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_23018,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(C_i_cadr(((C_word*)t0)[2]))){
t6=C_u_i_cdr(((C_word*)t0)[2]);
t7=C_u_i_car(t6);
t8=C_i_vector_length(t7);
t9=C_eqp(t8,C_fix(1));
if(C_truep(t9)){
t10=C_i_vector_ref(t7,C_fix(0));
t11=C_i_car(t10);
t12=C_i_vector_ref(t7,C_fix(0));
t13=C_i_char_equalp(t11,C_i_cdr(t12));
t14=t5;
f_23018(t14,(C_truep(t13)?C_i_car(C_i_vector_ref(t7,C_fix(0))):t7));}
else{
t10=t5;
f_23018(t10,(C_truep(C_SCHEME_FALSE)?C_i_car(C_i_vector_ref(t7,C_fix(0))):t7));}}
else{
t6=t5;
f_23018(t6,C_SCHEME_FALSE);}}

/* k23016 in g4439 in k22988 in k22985 in doloop4425 in k22970 in k22967 in k22805 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_23018(C_word t0,C_word 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(6,0,1)))){
C_save_and_reclaim_args((void *)trf_23018,2,t0,t1);}
a=C_alloc(6);
t2=((C_word*)t0)[2];
t3=C_i_assoc(C_u_i_car(((C_word*)t2)[2]),((C_word*)t2)[3]);
t4=C_i_cdr(t3);
t5=C_i_cddr(((C_word*)t2)[2]);
t6=C_a_i_cons(&a,2,t4,t5);
t7=((C_word*)t2)[4];{
C_word av2[2];
av2[0]=t7;
av2[1]=C_a_i_cons(&a,2,t1,t6);
((C_proc)(void*)(*((C_word*)t7+1)))(2,av2);}}

/* k23049 in k22988 in k22985 in doloop4425 in k22970 in k22967 in k22805 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23051(C_word c,C_word *av){
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_23051,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_22977(t5,((C_word*)t0)[6],t4,C_u_i_cdr(((C_word*)t0)[7]));}

/* map-loop4433 in k22988 in k22985 in doloop4425 in k22970 in k22967 in k22805 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_23053(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_23053,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_23078,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:2950: g4439 */
t4=((C_word*)t0)[4];
f_23010(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);}}}

/* k23076 in map-loop4433 in k22988 in k22985 in doloop4425 in k22970 in k22967 in k22805 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23078(C_word c,C_word *av){
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_23078,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_23053(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* lp in k22805 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_23091(C_word t0,C_word 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_23091,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:2939: lp */
t11=t1;
t12=t5;
t13=t6;
t14=t9;
t1=t11;
t2=t12;
t3=t13;
t4=t14;
goto loop;}}

/* k23128 in lp in a23144 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23130(C_word c,C_word *av){
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,5)))){
C_save_and_reclaim((void *)f_23130,c,av);}
a=C_alloc(12);
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|11,a[1]=(C_word)f_23207,a[2]=((C_word*)t0)[2],a[3]=C_SCHEME_UNDEFINED,a[4]=C_SCHEME_UNDEFINED,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[5],a[8]=((C_word*)t0)[6],a[9]=((C_word*)t0)[7],a[10]=((C_word*)t0)[8],a[11]=((C_word)li295),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:2971: g4488 */
t7=t6;
f_23207(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:3006: lp */
t9=((C_word*)((C_word*)t0)[3])[1];
f_23166(t9,((C_word*)t0)[9],t6,((C_word*)t0)[8],((C_word*)t0)[4],t8);}}

/* a23144 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23145(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_23145,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_23166,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t10,a[5]=((C_word)li296),tmp=(C_word)a,a+=6,tmp));
t12=((C_word*)t10)[1];
f_23166(t12,t1,t4,t7,t8,C_SCHEME_END_OF_LIST);}}

/* lp in a23144 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_23166(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_23166,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_23184,a[2]=t3,a[3]=t1,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2978: nfa-state->mst */
f_22315(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_23193,a[2]=t1,a[3]=t2,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:2982: mst-add! */
f_22324(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_23130,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:2962: cset-intersection */
t9=C_retrieve2(lf[406],C_text("chicken.irregex#cset-intersection"));{
C_word av2[4];
av2[0]=t9;
av2[1]=t8;
av2[2]=t3;
av2[3]=t7;
f_27866(4,av2);}}}}

/* k23182 in lp in a23144 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23184(C_word c,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_23184,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);}}

/* k23191 in lp in a23144 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23193(C_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_23193,c,av);}
/* irregex-core.scm:2983: scheme#append */
t2=*((C_word*)lf[74]+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);}}

/* g4488 in k23128 in lp in a23144 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_23207(C_word 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_23207,3,t0,t1,t2);}
a=C_alloc(3);
t3=C_mutate(((C_word *)t0)+3,t2);
t4=C_mutate(((C_word *)t0)+4,t1);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_23211,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:2986: cset-difference */
f_27670(t5,((C_word*)t0)[10],C_i_caar(((C_word*)t0)[2]));}

/* k23209 in g4488 in k23128 in lp in a23144 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23211(C_word c,C_word *av){
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,3)))){
C_save_and_reclaim((void *)f_23211,c,av);}
a=C_alloc(13);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_23214,a[2]=t1,a[3]=((C_word*)t2)[3],a[4]=C_SCHEME_UNDEFINED,a[5]=((C_word*)t2)[4],a[6]=((C_word*)t2)[2],a[7]=((C_word*)t2)[5],a[8]=((C_word*)t2)[6],a[9]=((C_word*)t2)[7],a[10]=((C_word*)t2)[8],a[11]=C_SCHEME_UNDEFINED,a[12]=((C_word*)t2)[9],tmp=(C_word)a,a+=13,tmp);
/* irregex-core.scm:2987: cset-difference */
f_27670(t3,C_i_caar(((C_word*)t2)[2]),((C_word*)t2)[10]);}

/* k23212 in k23209 in g4488 in k23128 in lp in a23144 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23214(C_word c,C_word *av){
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(3,c,2)))){
C_save_and_reclaim((void *)f_23214,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+11,t1);
t3=C_i_cdar(((C_word*)t0)[6]);
t4=C_mutate(((C_word *)t0)+4,t3);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_23220,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
t6=C_i_vector_length(((C_word*)t0)[11]);
t7=C_eqp(t6,C_fix(0));
if(C_truep(C_i_not(t7))){
/* irregex-core.scm:2991: mst-copy */
f_22298(t5,((C_word*)t0)[4]);}
else{
t8=t5;{
C_word *av2=av;
av2[0]=t8;
av2[1]=C_SCHEME_FALSE;
f_23220(2,av2);}}}

/* k23218 in k23212 in k23209 in g4488 in k23128 in lp in a23144 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23220(C_word c,C_word *av){
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_23220,c,av);}
a=C_alloc(17);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_23223,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[3],a[4]=((C_word*)t2)[4],a[5]=((C_word*)t2)[5],a[6]=((C_word*)t2)[6],a[7]=((C_word*)t2)[7],a[8]=((C_word*)t2)[8],a[9]=((C_word*)t2)[9],a[10]=((C_word*)t2)[10],tmp=(C_word)a,a+=11,tmp);
if(C_truep(t1)){
t4=C_a_i_cons(&a,2,((C_word*)t2)[11],t1);
t5=t3;
f_23223(t5,C_a_i_cons(&a,2,t4,((C_word*)t2)[12]));}
else{
t4=t3;
f_23223(t4,((C_word*)t2)[12]);}}

/* k23221 in k23218 in k23212 in k23209 in g4488 in k23128 in lp in a23144 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_23223(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_23223,2,t0,t1);}
a=C_alloc(10);
t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_23226,a[2]=((C_word*)t0)[2],a[3]=((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:2995: mst-add! */
f_22324(t2,((C_word*)t0)[9],((C_word*)t0)[4],((C_word*)t0)[8],((C_word*)t0)[10]);}

/* k23224 in k23221 in k23218 in k23212 in k23209 in g4488 in k23128 in lp in a23144 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23226(C_word c,C_word *av){
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_23226,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_23243,a[2]=((C_word*)t0)[5],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3002: scheme#append */
t6=*((C_word*)lf[74]+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:3003: lp */
t7=((C_word*)((C_word*)t0)[8])[1];
f_23166(t7,((C_word*)t0)[5],t4,((C_word*)t0)[2],((C_word*)t0)[9],t6);}}

/* k23241 in k23224 in k23221 in k23218 in k23212 in k23209 in g4488 in k23128 in lp in a23144 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23243(C_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_23243,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);}}

/* k23313 in chicken.irregex#nfa-epsilon-closure in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23315(C_word c,C_word *av){
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,3)))){
C_save_and_reclaim((void *)f_23315,c,av);}
a=C_alloc(8);
t2=C_mutate(((C_word *)t0)+4,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_23319,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
t4=C_i_vector_length(((C_word*)t0)[2]);
t5=C_a_i_fixnum_quotient_checked(&a,2,t4,C_fix(4));
/* irregex-core.scm:3017: scheme#make-vector */
t6=*((C_word*)lf[4]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t6;
av2[1]=t3;
av2[2]=t5;
av2[3]=C_fix(0);
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}

/* k23317 in k23313 in chicken.irregex#nfa-epsilon-closure in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23319(C_word c,C_word *av){
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_23319,c,av);}
a=C_alloc(6);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_23323,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[3],a[4]=((C_word*)t2)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:3018: mst-copy */
f_22298(t3,((C_word*)t2)[5]);}

/* k23321 in k23317 in k23313 in chicken.irregex#nfa-epsilon-closure in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23323(C_word c,C_word *av){
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_23323,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_23325,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word)li304),tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
f_23325(t5,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* lp in k23321 in k23317 in k23313 in chicken.irregex#nfa-epsilon-closure in k19305 in k7970 in k7739 in k7736 */
static void f_23325(C_word t0,C_word 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_23325,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:3023: nfa-get-epsilons */
  f_20971(((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_23348,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)li303),tmp=(C_word)a,a+=10,tmp));
t13=((C_word*)t11)[1];
f_23348(t13,t1,t8,t9);}}

/* lp2 in lp in k23321 in k23317 in k23313 in chicken.irregex#nfa-epsilon-closure in k19305 in k7970 in k7739 in k7736 */
static void f_23348(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_23348,4,t0,t1,t2,t3);}
a=C_alloc(18);
if(C_truep(C_i_nullp(t2))){
/* irregex-core.scm:3026: lp */
t4=((C_word*)((C_word*)t0)[2])[1];
f_23325(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_23377,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)li302),tmp=(C_word)a,a+=10,tmp);
/* irregex-core.scm:3033: g4523 */
t9=t8;
f_23377(t9,t1,t7);}
else{
t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_23405,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_23405(t20,C_i_vector_set(((C_word*)t0)[4],C_fixnum_plus(t4,C_fix(3)),((C_word*)t0)[8]));}
else{
t11=t8;
f_23405(t11,C_i_vector_set(((C_word*)t0)[4],C_fixnum_plus(t4,C_fix(3)),((C_word*)t0)[8]));}}}
else{
/* irregex-core.scm:3045: lp2 */
t21=t1;
t22=C_u_i_cdr(t2);
t23=t3;
t1=t21;
t2=t22;
t3=t23;
goto loop;}}}

/* g4523 in lp2 in lp in k23321 in k23317 in k23313 in chicken.irregex#nfa-epsilon-closure in k19305 in k7970 in k7739 in k7736 */
static void f_23377(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word 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_23377,3,t0,t1,t2);}
a=C_alloc(15);
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_23381,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_22734,a[2]=t6,a[3]=((C_word)li301),tmp=(C_word)a,a+=4,tmp);
t8=(
  f_22734(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_23381(t10,t8);}
else{
t9=t3;
f_23381(t9,t8);}}

/* k23379 in g4523 in lp2 in lp in k23321 in k23317 in k23313 in chicken.irregex#nfa-epsilon-closure in k19305 in k7970 in k7739 in k7736 */
static void f_23381(C_word t0,C_word t1){
C_word 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(23,0,4)))){
C_save_and_reclaim_args((void *)trf_23381,2,t0,t1);}
a=C_alloc(23);
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|14,a[1]=(C_word)f_22487,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=C_SCHEME_UNDEFINED,a[5]=((C_word*)t0)[5],a[6]=C_SCHEME_UNDEFINED,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]=t3,a[13]=((C_word*)t0)[3],a[14]=t2,tmp=(C_word)a,a+=15,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_22552,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t6,a[5]=((C_word)li300),tmp=(C_word)a,a+=6,tmp));
t8=((C_word*)t6)[1];
f_22552(t8,t4,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);}

/* k23403 in lp2 in lp in k23321 in k23317 in k23313 in chicken.irregex#nfa-epsilon-closure in k19305 in k7970 in k7739 in k7736 */
static void f_23405(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_23405,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:3044: lp2 */
t5=((C_word*)((C_word*)t0)[6])[1];
f_23348(t5,((C_word*)t0)[7],t2,t4);}

/* a23432 in chicken.irregex#nfa-epsilon-closure in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23433(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_23433,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 k19305 in k7970 in k7739 in k7736 */
static void f_23443(C_word t1,C_word t2,C_word t3){
C_word 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(14,0,5)))){
C_save_and_reclaim_args((void *)trf_23443,3,t1,t2,t3);}
a=C_alloc(14);
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_23453,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_23315,a[2]=t2,a[3]=t10,a[4]=C_SCHEME_UNDEFINED,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_23433,a[2]=((C_word)li305),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3013: mst-fold */
f_22676(t11,t3,t12,C_SCHEME_END_OF_LIST);}}

/* k23451 in chicken.irregex#nfa-epsilon-closure in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23453(C_word c,C_word *av){
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_23453,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 k19305 in k7970 in k7739 in k7736 */
static void f_23458(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_23458,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_23473,a[2]=t6,a[3]=t7,a[4]=t8,a[5]=t10,a[6]=t5,a[7]=((C_word)li310),tmp=(C_word)a,a+=8,tmp));
t12=((C_word*)t10)[1];
f_23473(t12,t1,C_fix(0),C_SCHEME_END_OF_LIST);}

/* lp in chicken.irregex#tag-set-commands-for-closure in k19305 in k7970 in k7739 in k7736 */
static void f_23473(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_23473,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_23493,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=t8,a[5]=((C_word*)t0)[6],a[6]=((C_word)li309),tmp=(C_word)a,a+=7,tmp));
t10=((C_word*)t8)[1];
f_23493(t10,t1,t5,t6,t3);}}

/* lp2 in lp in chicken.irregex#tag-set-commands-for-closure in k19305 in k7970 in k7739 in k7736 */
static void f_23493(C_word t0,C_word 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_23493,5,t0,t1,t2,t3,t4);}
a=C_alloc(19);
if(C_truep(C_i_nullp(t2))){
/* irregex-core.scm:3065: lp */
t5=((C_word*)((C_word*)t0)[2])[1];
f_23473(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_23516,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_23516(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_23548,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_23581,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li308),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3072: any */
f_9506(t9,t10,((C_word*)t0)[5]);}
else{
t9=t7;
f_23516(t9,C_SCHEME_FALSE);}}}}

/* k23514 in lp2 in lp in chicken.irregex#tag-set-commands-for-closure in k19305 in k7970 in k7739 in k7736 */
static void f_23516(C_word 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_23516,2,t0,t1);}
a=C_alloc(6);
if(C_truep(t1)){
/* irregex-core.scm:3082: lp2 */
t2=((C_word*)((C_word*)t0)[2])[1];
f_23493(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:3083: lp2 */
t6=((C_word*)((C_word*)t0)[2])[1];
f_23493(t6,((C_word*)t0)[3],t2,((C_word*)t0)[5],t5);}}

/* k23546 in lp2 in lp in chicken.irregex#tag-set-commands-for-closure in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23548(C_word c,C_word *av){
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_23548,c,av);}
a=C_alloc(8);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_23555,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_23557,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li307),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3078: any */
f_9506(t2,t3,((C_word*)t0)[5]);}
else{
t2=((C_word*)t0)[2];
f_23516(t2,C_SCHEME_FALSE);}}

/* k23553 in k23546 in lp2 in lp in chicken.irregex#tag-set-commands-for-closure in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23555(C_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_23555,c,av);}
t2=((C_word*)t0)[2];
f_23516(t2,C_i_not(t1));}

/* a23556 in k23546 in lp2 in lp in chicken.irregex#tag-set-commands-for-closure in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23557(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_23557,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);}}

/* a23580 in lp2 in lp in chicken.irregex#tag-set-commands-for-closure in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23581(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_23581,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 k22872 in lp2 in k22840 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_23625(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word 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_23625,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_23638,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_23760,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_22623,a[2]=t12,a[3]=t5,a[4]=((C_word*)t0)[5],a[5]=t14,a[6]=((C_word)li292),tmp=(C_word)a,a+=7,tmp));
t16=((C_word*)t14)[1];
f_22623(t16,t4,C_fix(3));}
else{
t12=t3;
f_23638(t12,C_SCHEME_TRUE);}}
else{
t9=t3;
f_23638(t9,C_SCHEME_TRUE);}}}

/* k23636 in lp in k22872 in lp2 in k22840 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_23638(C_word t0,C_word 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_23638,2,t0,t1);}
a=C_alloc(10);
if(C_truep(t1)){
/* irregex-core.scm:3100: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_23625(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_23652,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)li291),tmp=(C_word)a,a+=8,tmp));
t7=((C_word*)t5)[1];
f_23652(t7,((C_word*)t0)[3],t3,C_fix(0),C_SCHEME_END_OF_LIST);}}

/* lp2 in k23636 in lp in k22872 in lp2 in k22840 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_23652(C_word t0,C_word 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_23652,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_23679,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)li290),tmp=(C_word)a,a+=9,tmp));
t11=((C_word*)t9)[1];
f_23679(t11,t1,t6,t7,t4);}}

/* lp3 in lp2 in k23636 in lp in k22872 in lp2 in k22840 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void f_23679(C_word t0,C_word 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_23679,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:3110: lp2 */
t5=((C_word*)((C_word*)t0)[2])[1];
f_23652(t5,t1,((C_word*)t0)[3],C_fixnum_plus(((C_word*)t0)[4],C_fix(1)),t4);}
else{
/* irregex-core.scm:3111: lp */
t5=((C_word*)((C_word*)t0)[5])[1];
f_23625(t5,t1,C_i_cdr(((C_word*)t0)[6]));}}
else{
if(C_truep(C_i_nullp(t3))){
/* irregex-core.scm:3112: lp */
t5=((C_word*)((C_word*)t0)[5])[1];
f_23625(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:3113: 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:3113: lp3 */
t15=t1;
t16=t5;
t17=t6;
t18=t13;
t1=t15;
t2=t16;
t3=t17;
t4=t18;
goto loop;}}}}

/* k23758 in lp in k22872 in lp2 in k22840 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_23760(C_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_23760,c,av);}
t2=((C_word*)t0)[2];
f_23638(t2,C_i_not(t1));}

/* k23774 in k22872 in lp2 in k22840 in lp in k22772 in k22769 in k22766 in k22763 in chicken.irregex#nfa->dfa in k19305 in k7970 in k7739 in k7736 */
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;
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_23776,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_22877(t9,t1);}

/* k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_23786(C_word c,C_word *av){
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_23786,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_23795,a[2]=((C_word)li119),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_23835,a[2]=t7,a[3]=((C_word*)t0)[2],a[4]=((C_word)li186),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
f_23835(t9,((C_word*)t0)[4],((C_word*)t0)[5],C_fix(1),t4,t5);}

/* a23794 in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_23795(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_23795,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 k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_23835(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_23835,6,t0,t1,t2,t3,t4,t5);}
a=C_alloc(18);
t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_23838,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t4,a[5]=t5,a[6]=((C_word)li120),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_23861,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:3153: sre->cset */
f_26881(t7,t8,C_a_i_list(&a,1,t10));}
else{
t7=C_u_i_car(t2);
t8=C_eqp(t7,lf[180]);
t9=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_23877,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_23877(t10,t8);}
else{
t10=C_eqp(t7,lf[248]);
if(C_truep(t10)){
t11=t9;
f_23877(t11,t10);}
else{
t11=C_eqp(t7,lf[235]);
t12=t9;
f_23877(t12,(C_truep(t11)?t11:C_eqp(t7,lf[52])));}}}}
else{
if(C_truep(C_i_symbolp(t2))){
t7=C_eqp(t2,lf[125]);
if(C_truep(t7)){
t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25670,a[2]=t5,a[3]=((C_word)li173),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[126]);
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_25728,a[2]=t5,a[3]=((C_word)li174),tmp=(C_word)a,a+=4,tmp);
((C_proc)(void*)(*((C_word*)t9+1)))(2,av2);}}
else{
t9=C_eqp(t2,lf[187]);
if(C_truep(t9)){
t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25820,a[2]=t5,a[3]=((C_word)li175),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[196]);
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_25850,a[2]=t5,a[3]=((C_word)li176),tmp=(C_word)a,a+=4,tmp);
((C_proc)(void*)(*((C_word*)t11+1)))(2,av2);}}
else{
t11=C_eqp(t2,lf[184]);
if(C_truep(t11)){
t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25901,a[2]=t5,a[3]=((C_word)li177),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[188]);
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_26008,a[2]=t5,a[3]=((C_word)li178),tmp=(C_word)a,a+=4,tmp);
((C_proc)(void*)(*((C_word*)t13+1)))(2,av2);}}
else{
t13=C_eqp(t2,lf[197]);
if(C_truep(t13)){
t14=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_26041,a[2]=t5,a[3]=((C_word)li179),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[185]);
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_26106,a[2]=t5,a[3]=((C_word)li180),tmp=(C_word)a,a+=4,tmp);
((C_proc)(void*)(*((C_word*)t15+1)))(2,av2);}}
else{
t15=C_eqp(t2,lf[186]);
if(C_truep(t15)){
t16=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_26195,a[2]=t5,a[3]=((C_word)li181),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[111]);
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,C_retrieve2(lf[249],C_text("chicken.irregex#sre-named-definitions")));
if(C_truep(t17)){
/* irregex-core.scm:3594: rec */
t18=t6;
f_23838(t18,t1,C_i_cdr(t17));}
else{
/* irregex-core.scm:3595: chicken.base#error */
t18=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t18;
av2[1]=t1;
av2[2]=lf[250];
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_26317,a[2]=t5,a[3]=t2,a[4]=((C_word)li183),tmp=(C_word)a,a+=5,tmp):(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_26416,a[2]=t2,a[3]=t5,a[4]=((C_word)li185),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_26531,a[2]=t6,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* ##sys#string->list */
t8=C_fast_retrieve(lf[106]);{
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:3648: chicken.base#error */
t7=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t7;
av2[1]=t1;
av2[2]=lf[252];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}}}}}

/* rec in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_23838(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_23838,3,t0,t1,t2);}
/* irregex-core.scm:3148: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_23835(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5]);}

/* k23859 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_23861(C_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_23861,c,av);}
/* irregex-core.scm:3152: sre-cset->procedure */
f_26557(((C_word*)t0)[2],t1,((C_word*)t0)[3]);}

/* k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_23877(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word 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_23877,2,t0,t1);}
a=C_alloc(39);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_23884,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:3158: sre->cset */
f_26881(t2,((C_word*)t0)[5],C_a_i_list(&a,1,t4));}
else{
t2=C_eqp(((C_word*)t0)[6],lf[104]);
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_23904,a[2]=((C_word)li121),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:3163: rec */
t4=((C_word*)t0)[7];
f_23838(t4,((C_word*)t0)[2],C_i_cadr(((C_word*)t0)[5]));
default:
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_23924,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:3165: rec */
t5=((C_word*)t0)[7];
f_23838(t5,t4,C_i_cadr(((C_word*)t0)[5]));}}
else{
t3=C_eqp(((C_word*)t0)[6],lf[226]);
if(C_truep(t3)){
t4=(
/* irregex-core.scm:3175: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
t5=C_fixnum_not(C_fix(2));
/* irregex-core.scm:3175: lp */
t6=((C_word*)((C_word*)t0)[8])[1];
f_23835(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[227]);
if(C_truep(t4)){
t5=(
/* irregex-core.scm:3180: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
/* irregex-core.scm:3180: lp */
t6=((C_word*)((C_word*)t0)[8])[1];
f_23835(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[157]);
if(C_truep(t5)){
t6=(
/* irregex-core.scm:3185: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
/* irregex-core.scm:3185: lp */
t7=((C_word*)((C_word*)t0)[8])[1];
f_23835(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[158]);
if(C_truep(t6)){
t7=(
/* irregex-core.scm:3187: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
t8=C_fixnum_not(C_fix(32));
/* irregex-core.scm:3187: lp */
t9=((C_word*)((C_word*)t0)[8])[1];
f_23835(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[116]);
t8=(C_truep(t7)?t7:C_eqp(((C_word*)t0)[6],lf[228]));
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:3191: rec */
t10=((C_word*)t0)[7];
f_23838(t10,((C_word*)t0)[2],C_i_cadr(((C_word*)t0)[5]));
default:
t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_24078,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:3193: sre-sequence */
  f_18580(C_a_i(&a,3),C_i_cddr(((C_word*)t0)[5]))
);
t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_24097,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:3194: sre-count-submatches */
f_17374(t12,C_i_cadr(((C_word*)t0)[5]));}}
else{
t9=C_eqp(((C_word*)t0)[6],lf[132]);
if(C_truep(t9)){
t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24120,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t11=(
/* irregex-core.scm:3199: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
/* irregex-core.scm:3199: rec */
t12=((C_word*)t0)[7];
f_23838(t12,t10,t11);}
else{
t10=C_eqp(((C_word*)t0)[6],lf[133]);
if(C_truep(t10)){
t11=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24146,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t12=(
/* irregex-core.scm:3204: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
/* irregex-core.scm:3204: rec */
t13=((C_word*)t0)[7];
f_23838(t13,t11,t12);}
else{
t11=C_eqp(((C_word*)t0)[6],lf[128]);
if(C_truep(t11)){
t12=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_24175,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:3210: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
/* irregex-core.scm:3210: sre-empty? */
t14=C_retrieve2(lf[140],C_text("chicken.irregex#sre-empty?"));{
C_word av2[3];
av2[0]=t14;
av2[1]=t12;
av2[2]=t13;
f_16699(3,av2);}}
else{
t12=C_eqp(((C_word*)t0)[6],lf[129]);
if(C_truep(t12)){
t13=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_24220,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:3220: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
/* irregex-core.scm:3220: sre-empty? */
t15=C_retrieve2(lf[140],C_text("chicken.irregex#sre-empty?"));{
C_word av2[3];
av2[0]=t15;
av2[1]=t13;
av2[2]=t14;
f_16699(3,av2);}}
else{
t13=C_eqp(((C_word*)t0)[6],lf[130]);
if(C_truep(t13)){
t14=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_24274,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:3239: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
/* irregex-core.scm:3239: sre-empty? */
t16=C_retrieve2(lf[140],C_text("chicken.irregex#sre-empty?"));{
C_word av2[3];
av2[0]=t16;
av2[1]=t14;
av2[2]=t15;
f_16699(3,av2);}}
else{
t14=C_eqp(((C_word*)t0)[6],lf[135]);
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[134],t21);
/* irregex-core.scm:3254: rec */
t23=((C_word*)t0)[7];
f_23838(t23,((C_word*)t0)[2],t22);}
else{
t15=C_eqp(((C_word*)t0)[6],lf[136]);
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[134],t20);
/* irregex-core.scm:3256: rec */
t22=((C_word*)t0)[7];
f_23838(t22,((C_word*)t0)[2],t21);}
else{
t16=C_eqp(((C_word*)t0)[6],lf[134]);
if(C_truep(t16)){
t17=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_24376,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_24376(t24,C_fixnum_greaterp(t21,C_u_i_car(t23)));}
else{
t20=t17;
f_24376(t20,C_SCHEME_FALSE);}}
else{
t19=t17;
f_24376(t19,C_SCHEME_FALSE);}}
else{
t17=C_eqp(((C_word*)t0)[6],lf[131]);
if(C_truep(t17)){
t18=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_24528,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_24528(t25,C_fixnum_greaterp(t22,C_u_i_car(t24)));}
else{
t21=t18;
f_24528(t21,C_SCHEME_FALSE);}}
else{
t20=t18;
f_24528(t20,C_SCHEME_FALSE);}}
else{
t18=C_eqp(((C_word*)t0)[6],lf[232]);
if(C_truep(t18)){
t19=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24699,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[185]);
/* irregex-core.scm:3327: ##sys#append */
t22=*((C_word*)lf[119]+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[233]);
if(C_truep(t19)){
t20=C_a_i_list(&a,3,lf[104],lf[182],lf[234]);
t21=C_u_i_cdr(((C_word*)t0)[5]);
t22=C_a_i_cons(&a,2,lf[104],t21);
t23=C_a_i_list(&a,3,lf[235],t20,t22);
t24=C_a_i_list(&a,2,lf[130],t23);
t25=C_a_i_list(&a,4,lf[116],lf[184],t24,lf[185]);
/* irregex-core.scm:3329: rec */
t26=((C_word*)t0)[7];
f_23838(t26,((C_word*)t0)[2],t25);}
else{
t20=C_eqp(((C_word*)t0)[6],lf[236]);
if(C_truep(t20)){
t21=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24749,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3332: string->sre */
t22=C_fast_retrieve(lf[103]);{
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[112]);
if(C_truep(t21)){
t22=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24762,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
t23=(
/* irregex-core.scm:3335: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
t24=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24785,a[2]=((C_word)li150),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3335: lp */
t25=((C_word*)((C_word*)t0)[8])[1];
f_23835(t25,t22,t23,((C_word*)t0)[9],((C_word*)t0)[4],t24);}
else{
t22=C_eqp(((C_word*)t0)[6],lf[113]);
if(C_truep(t22)){
t23=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24797,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t24=(
/* irregex-core.scm:3345: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
t25=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24820,a[2]=((C_word)li153),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3345: lp */
t26=((C_word*)((C_word*)t0)[8])[1];
f_23835(t26,t23,t24,((C_word*)t0)[9],((C_word*)t0)[4],t25);}
else{
t23=C_eqp(((C_word*)t0)[6],lf[114]);
t24=(C_truep(t23)?t23:C_eqp(((C_word*)t0)[6],lf[115]));
if(C_truep(t24)){
t25=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24835,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_24907,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:3356: scheme#append */
t27=*((C_word*)lf[74]+1);{
C_word av2[4];
av2[0]=t27;
av2[1]=t26;
av2[2]=C_u_i_cdr(((C_word*)t0)[5]);
av2[3]=lf[239];
((C_proc)(void*)(*((C_word*)t27+1)))(4,av2);}}
else{
t25=C_eqp(((C_word*)t0)[6],lf[240]);
if(C_truep(t25)){
t26=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24918,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t27=(
/* irregex-core.scm:3372: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[5]))
);
t28=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24941,a[2]=((C_word)li162),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3372: lp */
t29=((C_word*)((C_word*)t0)[8])[1];
f_23835(t29,t26,t27,((C_word*)t0)[9],((C_word*)t0)[4],t28);}
else{
t26=C_eqp(((C_word*)t0)[6],lf[110]);
if(C_truep(t26)){
t27=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_24953,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_SCHEME_UNDEFINED,a[9]=((C_word*)t0)[3],tmp=(C_word)a,a+=10,tmp);
/* irregex-core.scm:3382: sre-count-submatches */
f_17374(t27,C_i_cadr(((C_word*)t0)[5]));}
else{
t27=C_eqp(((C_word*)t0)[6],lf[193]);
t28=(C_truep(t27)?t27:C_eqp(((C_word*)t0)[6],lf[192]));
if(C_truep(t28)){
t29=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_25109,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_25109(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_25109(2,av2);}}
else{
t33=C_u_i_cdr(((C_word*)t0)[5]);
/* irregex-core.scm:3414: chicken.base#error */
t34=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t34;
av2[1]=t29;
av2[2]=lf[244];
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[245]);
if(C_truep(t29)){
t30=(
/* irregex-core.scm:3454: sre-sequence */
  f_18580(C_a_i(&a,3),C_i_cdddr(((C_word*)t0)[5]))
);
t31=C_i_cadr(((C_word*)t0)[5]);
/* irregex-core.scm:3454: lp */
t32=((C_word*)((C_word*)t0)[8])[1];
f_23835(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[246]);
t31=(C_truep(t30)?t30:C_eqp(((C_word*)t0)[6],lf[109]));
if(C_truep(t31)){
t32=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25326,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t33=(
/* irregex-core.scm:3457: sre-sequence */
  f_18580(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_25435,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[3],a[4]=((C_word)li172),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3457: lp */
t36=((C_word*)((C_word*)t0)[8])[1];
f_23835(t36,t32,t33,t34,((C_word*)t0)[4],t35);}
else{
t32=C_eqp(((C_word*)t0)[6],lf[120]);
t33=(C_truep(t32)?t32:C_eqp(((C_word*)t0)[6],lf[121]));
if(C_truep(t33)){
t34=C_i_cddr(((C_word*)t0)[5]);
t35=C_a_i_cons(&a,2,lf[109],t34);
/* irregex-core.scm:3487: rec */
t36=((C_word*)t0)[7];
f_23838(t36,((C_word*)t0)[2],t35);}
else{
/* irregex-core.scm:3489: 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[247];
av2[3]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t34+1)))(4,av2);}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}

/* k23882 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_23884(C_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_23884,c,av);}
/* irregex-core.scm:3157: sre-cset->procedure */
f_26557(((C_word*)t0)[2],t1,((C_word*)t0)[3]);}

/* f_23904 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_23904(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_23904,c,av);}
/* irregex-core.scm:3162: fail */
t10=t9;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* k23922 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_23924(C_word c,C_word *av){
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_23924,c,av);}
a=C_alloc(15);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_23927,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t3=(
/* irregex-core.scm:3166: sre-alternate */
  f_18603(C_a_i(&a,3),C_i_cddr(((C_word*)t0)[3]))
);
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_23950,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:3167: sre-count-submatches */
f_17374(t4,C_i_cadr(((C_word*)t0)[3]));}

/* k23925 in k23922 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_23927(C_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_23927,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_23928,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word)li123),tmp=(C_word)a,a+=5,tmp);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* f_23928 in k23925 in k23922 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_23928(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_23928,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_23934,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)li122),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3171: 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);}}

/* a23933 */
static void C_ccall f_23934(C_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_23934,c,av);}
/* irregex-core.scm:3173: 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);}}

/* k23948 in k23922 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_23950(C_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_23950,c,av);}
/* irregex-core.scm:3166: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_23835(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]);}

/* k24076 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24078(C_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_24078,c,av);}
/* irregex-core.scm:3197: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_23835(t2,((C_word*)t0)[3],C_i_cadr(((C_word*)t0)[4]),((C_word*)t0)[5],((C_word*)t0)[6],t1);}

/* k24095 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24097(C_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_24097,c,av);}
/* irregex-core.scm:3193: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_23835(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]);}

/* k24118 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24120(C_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_24120,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_24121,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word)li125),tmp=(C_word)a,a+=5,tmp);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* f_24121 in k24118 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_24121(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_24121,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_24127,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)li124),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3201: 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);}}

/* a24126 */
static void C_ccall f_24127(C_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_24127,c,av);}
/* irregex-core.scm:3202: 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);}}

/* k24144 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24146(C_word c,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_24146,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24147,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word)li127),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_24147 in k24144 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_24147(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_24147,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_24153,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)li126),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3206: 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);}}

/* a24152 */
static void C_ccall f_24153(C_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_24153,c,av);}
/* irregex-core.scm:3207: 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);}}

/* k24173 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24175(C_word c,C_word *av){
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_24175,c,av);}
a=C_alloc(13);
if(C_truep(t1)){
/* irregex-core.scm:3211: 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=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24181,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t3=(
/* irregex-core.scm:3213: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[3]))
);
t4=C_a_i_list2(&a,2,lf[130],t3);
/* irregex-core.scm:3213: rec */
t5=((C_word*)t0)[5];
f_23838(t5,t2,t4);}}

/* k24179 in k24173 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_24181(C_word c,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_24181,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24182,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word)li129),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_24182 in k24179 in k24173 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_24182(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_24182,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_24188,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)li128),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3215: 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);}}

/* a24187 */
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 *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_24188,c,av);}
/* irregex-core.scm:3217: 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);}}

/* k24218 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24220(C_word c,C_word *av){
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_24220,c,av);}
a=C_alloc(15);
if(C_truep(t1)){
/* irregex-core.scm:3221: 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|4,a[1]=(C_word)f_24226,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:3225: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[3]))
);
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24244,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word)li133),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3225: lp */
t7=((C_word*)((C_word*)t0)[5])[1];
f_23835(t7,t4,t5,((C_word*)t0)[6],((C_word*)t0)[7],t6);}}

/* k24224 in k24218 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_24226(C_word c,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_24226,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_24228,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=((C_word)li131),tmp=(C_word)a,a+=5,tmp);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* f_24228 in k24224 in k24218 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_24228(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_24228,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_24234,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)li130),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3234: 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);}}

/* a24233 */
static void C_ccall f_24234(C_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_24234,c,av);}
/* irregex-core.scm:3236: 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);}}

/* a24243 in k24218 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_24244(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_24244,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_24250,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)li132),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3229: 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);}}

/* a24249 in a24243 in k24218 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_24250(C_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_24250,c,av);}
/* irregex-core.scm:3231: 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);}}

/* k24272 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
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;
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_24274,c,av);}
a=C_alloc(14);
if(C_truep(t1)){
/* irregex-core.scm:3240: 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[231];
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_24280,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
t5=(
/* irregex-core.scm:3244: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(((C_word*)t0)[3]))
);
t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24287,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word)li135),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3244: lp */
t7=((C_word*)((C_word*)t0)[5])[1];
f_23835(t7,t4,t5,((C_word*)t0)[6],((C_word*)t0)[7],t6);}}

/* k24278 in k24272 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_24280(C_word c,C_word *av){
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_24280,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);}}

/* a24286 in k24272 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 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 *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_24287,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_24293,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)li134),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3248: 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);}}

/* a24292 in a24286 in k24272 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_24293(C_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_24293,c,av);}
/* irregex-core.scm:3250: 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);}}

/* k24374 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_24376(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(3,0,2)))){
C_save_and_reclaim_args((void *)trf_24376,2,t0,t1);}
a=C_alloc(3);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24379,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(t1)){
t3=t2;
f_24379(t3,t1);}
else{
t3=C_u_i_cdr(((C_word*)t0)[3]);
t4=C_i_not(C_u_i_car(t3));
t5=t2;
f_24379(t5,(C_truep(t4)?C_i_caddr(((C_word*)t0)[3]):C_SCHEME_FALSE));}}

/* k24377 in k24374 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void f_24379(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word t12;
C_word t13;
C_word t14;
C_word t15;
C_word t16;
C_word t17;
C_word t18;
C_word t19;
C_word t20;
C_word t21;
C_word t22;
C_word t23;
C_word t24;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(28,0,10)))){
C_save_and_reclaim_args((void *)trf_24379,2,t0,t1);}
a=C_alloc(28);
t2=((C_word*)t0)[2];
if(C_truep(t1)){
t3=((C_word*)t2)[2];{
C_word av2[2];
av2[0]=t3;
av2[1]=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24380,a[2]=((C_word)li136),tmp=(C_word)a,a+=3,tmp);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}
else{
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
t11=C_u_i_cdr(((C_word*)t2)[3]);
t12=C_u_i_car(t11);
t13=C_i_caddr(((C_word*)t2)[3]);
t14=C_u_i_cdr(((C_word*)t2)[3]);
t15=C_u_i_cdr(t14);
t16=(
/* irregex-core.scm:3268: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(t15))
);
t17=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_24393,a[2]=t6,a[3]=((C_word*)t2)[4],a[4]=t4,a[5]=t10,a[6]=((C_word*)t2)[5],a[7]=t8,a[8]=((C_word*)t2)[6],a[9]=((C_word*)t2)[7],a[10]=((C_word)li139),tmp=(C_word)a,a+=11,tmp);
t18=C_set_block_item(t4,0,t12);
t19=C_set_block_item(t6,0,t13);
t20=C_set_block_item(t8,0,t16);
t21=C_set_block_item(t10,0,t17);
t22=(C_truep(C_i_zerop(((C_word*)t4)[1]))?(C_truep(((C_word*)t6)[1])?C_i_zerop(((C_word*)t6)[1]):C_SCHEME_FALSE):C_SCHEME_FALSE);
if(C_truep(t22)){
t23=((C_word*)t2)[2];{
C_word av2[2];
av2[0]=t23;
av2[1]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t23+1)))(2,av2);}}
else{
t23=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_24448,a[2]=t4,a[3]=((C_word*)t2)[4],a[4]=t10,a[5]=((C_word)li141),tmp=(C_word)a,a+=6,tmp);
t24=((C_word*)t2)[2];{
C_word av2[2];
av2[0]=t24;
av2[1]=t23;
((C_proc)(void*)(*((C_word*)t24+1)))(2,av2);}}}}

/* f_24380 in k24377 in k24374 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_24380(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_24380,c,av);}
/* irregex-core.scm:3263: fail */
t10=t9;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* body4768 in k24377 in k24374 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_24393(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_24393,c,av);}
a=C_alloc(8);
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_24399,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)li138),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3271: lp */
t4=((C_word*)((C_word*)t0)[6])[1];
f_23835(t4,t1,((C_word*)((C_word*)t0)[7])[1],((C_word*)t0)[8],((C_word*)t0)[9],t3);}

/* a24398 in body4768 in k24377 in k24374 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in ... */
static void C_ccall f_24399(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_24399,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:3276: 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_24412,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:3277: 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);}}}

/* k24410 in a24398 in body4768 in k24377 in k24374 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in ... */
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 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_24412,c,av);}
a=C_alloc(14);
t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_24417,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word)li137),tmp=(C_word)a,a+=14,tmp);
/* irregex-core.scm:3275: g4787 */
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);}}

/* a24416 in k24410 in a24398 in body4768 in k24377 in k24374 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in ... */
static void C_ccall f_24417(C_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_24417,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:3281: 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:3282: 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_24448 in k24377 in k24374 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 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=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_24448,c,av);}
a=C_alloc(13);
t10=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_24452,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:3286: 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);}}

/* k24450 */
static void C_ccall f_24452(C_word c,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_24452,c,av);}
a=C_alloc(13);
t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_24457,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word)li140),tmp=(C_word)a,a+=13,tmp);
/* irregex-core.scm:3285: g4799 */
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);}}

/* a24456 in k24450 */
static void C_ccall f_24457(C_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_24457,c,av);}
if(C_truep(C_i_zerop(((C_word*)((C_word*)t0)[2])[1]))){
/* irregex-core.scm:3289: 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:3290: 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);}}}

/* k24526 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void f_24528(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(3,0,2)))){
C_save_and_reclaim_args((void *)trf_24528,2,t0,t1);}
a=C_alloc(3);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24531,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(t1)){
t3=t2;
f_24531(t3,t1);}
else{
t3=C_u_i_cdr(((C_word*)t0)[3]);
t4=C_i_not(C_u_i_car(t3));
t5=t2;
f_24531(t5,(C_truep(t4)?C_i_caddr(((C_word*)t0)[3]):C_SCHEME_FALSE));}}

/* k24529 in k24526 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void f_24531(C_word t0,C_word t1){
C_word tmp;
C_word t2;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word 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_24531,2,t0,t1);}
a=C_alloc(28);
t2=((C_word*)t0)[2];
if(C_truep(t1)){
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24532,a[2]=((C_word)li142),tmp=(C_word)a,a+=3,tmp);
t4=((C_word*)t2)[2];{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}
else{
t3=C_SCHEME_UNDEFINED;
t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
t5=C_SCHEME_UNDEFINED;
t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
t9=C_SCHEME_UNDEFINED;
t10=(*a=C_VECTOR_TYPE|1,a[1]=t9,tmp=(C_word)a,a+=2,tmp);
t11=C_u_i_cdr(((C_word*)t2)[3]);
t12=C_u_i_car(t11);
t13=C_i_caddr(((C_word*)t2)[3]);
t14=C_u_i_cdr(((C_word*)t2)[3]);
t15=C_u_i_cdr(t14);
t16=(
/* irregex-core.scm:3302: sre-sequence */
  f_18580(C_a_i(&a,3),C_u_i_cdr(t15))
);
t17=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_24545,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word*)t2)[4],a[6]=((C_word*)t2)[5],a[7]=t8,a[8]=((C_word*)t2)[6],a[9]=((C_word*)t2)[7],a[10]=((C_word)li145),tmp=(C_word)a,a+=11,tmp);
t18=C_set_block_item(t4,0,t12);
t19=C_set_block_item(t6,0,t13);
t20=C_set_block_item(t8,0,t16);
t21=C_set_block_item(t10,0,t17);
t22=(C_truep(C_i_zerop(((C_word*)t4)[1]))?(C_truep(((C_word*)t6)[1])?C_i_zerop(((C_word*)t6)[1]):C_SCHEME_FALSE):C_SCHEME_FALSE);
t23=((C_word*)t2)[2];{
C_word av2[2];
av2[0]=t23;
av2[1]=(C_truep(t22)?((C_word*)t2)[4]:(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_24607,a[2]=t4,a[3]=t10,a[4]=((C_word*)t2)[4],a[5]=((C_word)li147),tmp=(C_word)a,a+=6,tmp));
((C_proc)(void*)(*((C_word*)t23+1)))(2,av2);}}}

/* f_24532 in k24529 in k24526 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_24532(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_24532,c,av);}
/* irregex-core.scm:3297: fail */
t10=t9;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* body4826 in k24529 in k24526 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_24545(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_24545,c,av);}
a=C_alloc(8);
t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_24551,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)li144),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3305: lp */
t4=((C_word*)((C_word*)t0)[6])[1];
f_23835(t4,t1,((C_word*)((C_word*)t0)[7])[1],((C_word*)t0)[8],((C_word*)t0)[9],t3);}

/* a24550 in body4826 in k24529 in k24526 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in ... */
static void C_ccall f_24551(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_24551,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_24561,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:3310: 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_24573,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)li143),tmp=(C_word)a,a+=14,tmp);
/* irregex-core.scm:3312: 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);}}}

/* k24559 in a24550 in body4826 in k24529 in k24526 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex 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,9)))){
C_save_and_reclaim((void *)f_24561,c,av);}
/* irregex-core.scm:3309: g4844 */
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);}}

/* a24572 in a24550 in body4826 in k24529 in k24526 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in ... */
static void C_ccall f_24573(C_word c,C_word *av){
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_24573,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:3315: 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_24586,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:3316: 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);}}}

/* k24584 in a24572 in a24550 in body4826 in k24529 in k24526 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in ... */
static void C_ccall f_24586(C_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_24586,c,av);}
/* irregex-core.scm:3314: g4847 */
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_24607 in k24529 in k24526 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_24607(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_24607,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_24617,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)li146),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3322: 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_24627,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:3325: 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);}}}

/* a24616 */
static void C_ccall f_24617(C_word c,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_24617,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_24621,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:3324: 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);}}

/* k24619 in a24616 */
static void C_ccall f_24621(C_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_24621,c,av);}
/* irregex-core.scm:3323: g4859 */
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);}}

/* k24625 */
static void C_ccall f_24627(C_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_24627,c,av);}
/* irregex-core.scm:3321: g4861 */
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);}}

/* k24697 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24699(C_word c,C_word *av){
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_24699,c,av);}
a=C_alloc(6);
t2=C_a_i_cons(&a,2,lf[184],t1);
t3=C_a_i_cons(&a,2,lf[116],t2);
/* irregex-core.scm:3327: rec */
t4=((C_word*)t0)[2];
f_23838(t4,((C_word*)t0)[3],t3);}

/* k24747 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24749(C_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_24749,c,av);}
/* irregex-core.scm:3332: rec */
t2=((C_word*)t0)[2];
f_23838(t2,((C_word*)t0)[3],t1);}

/* k24760 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24762(C_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_24762,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_24763,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word)li149),tmp=(C_word)a,a+=5,tmp);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* f_24763 in k24760 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_24763(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_24763,c,av);}
a=C_alloc(15);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_24770,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_24778,a[2]=((C_word)li148),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3340: 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);}}

/* k24768 */
static void C_ccall f_24770(C_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_24770,c,av);}
if(C_truep(t1)){
/* irregex-core.scm:3341: 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:3342: 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);}}}

/* a24777 */
static void C_ccall f_24778(C_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_24778,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);}}

/* a24784 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24785(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_24785,c,av);}
t10=t1;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t6;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* k24795 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24797(C_word c,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_24797,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24798,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word)li152),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_24798 in k24795 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_24798(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_24798,c,av);}
a=C_alloc(15);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_24805,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_24813,a[2]=((C_word)li151),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3350: 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);}}

/* k24803 */
static void C_ccall f_24805(C_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_24805,c,av);}
if(C_truep(t1)){
/* irregex-core.scm:3351: 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:3352: 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);}}}

/* a24812 */
static void C_ccall f_24813(C_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_24813,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);}}

/* a24819 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24820(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_24820,c,av);}
t10=t1;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t6;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* k24833 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24835(C_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_24835,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_24836,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word)li158),tmp=(C_word)a,a+=6,tmp);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* f_24836 in k24833 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_24836(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(28,c,7)))){
C_save_and_reclaim((void *)f_24836,c,av);}
a=C_alloc(28);
t10=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_24840,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,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]=((C_word*)t0)[4],a[14]=C_SCHEME_UNDEFINED,a[15]=C_SCHEME_UNDEFINED,a[16]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=17,tmp);
t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8945,a[2]=t4,a[3]=t2,a[4]=((C_word)li156),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_8972,a[2]=t4,a[3]=t6,a[4]=t2,a[5]=((C_word)li157),tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:403: make-irregex-chunker */
t15=C_fast_retrieve(lf[45]);{
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);}}

/* k24838 */
static void C_ccall f_24840(C_word c,C_word *av){
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_24840,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+14,t1);
t3=C_i_vector_ref(((C_word*)t0)[14],C_fix(1));
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24846,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3361: g4929 */
t5=t3;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t5;
av2[1]=t4;
av2[2]=C_i_car(((C_word*)t0)[6]);
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k24844 in k24838 */
static void C_ccall f_24846(C_word c,C_word *av){
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(3,c,2)))){
C_save_and_reclaim((void *)f_24846,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+15,t1);
t4=C_u_i_cdr(((C_word*)t2)[6]);
t5=C_mutate(((C_word *)t2)+16,t4);
t6=C_i_vector_ref(((C_word*)t2)[14],C_fix(3));
t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24853,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3361: g4933 */
t8=t6;{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t8;
av2[1]=t7;
av2[2]=C_u_i_car(((C_word*)t2)[6]);
((C_proc)(void*)(*((C_word*)t8+1)))(3,av2);}}

/* k24851 in k24844 in k24838 */
static void C_ccall f_24853(C_word c,C_word *av){
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(22,c,9)))){
C_save_and_reclaim((void *)f_24853,c,av);}
a=C_alloc(22);
t2=((C_word*)t0)[2];
t3=C_i_car(((C_word*)t2)[2]);
t4=C_eqp(t3,lf[114]);
t5=(C_truep(t4)?(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24881,a[2]=((C_word)li154),tmp=(C_word)a,a+=3,tmp):*((C_word*)lf[237]+1));
t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_24862,a[2]=((C_word*)t2)[3],a[3]=((C_word*)t2)[4],a[4]=((C_word*)t2)[5],a[5]=((C_word*)t2)[6],a[6]=((C_word*)t2)[7],a[7]=((C_word*)t2)[8],a[8]=((C_word*)t2)[9],a[9]=((C_word*)t2)[10],a[10]=((C_word*)t2)[11],a[11]=((C_word*)t2)[12],tmp=(C_word)a,a+=12,tmp);
t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_24872,a[2]=t5,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
t8=C_u_i_car(((C_word*)t2)[6]);
t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24876,a[2]=((C_word)li155),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3366: check */
t10=((C_word*)t2)[13];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t10;
av2[1]=t7;
av2[2]=((C_word*)t2)[14];
av2[3]=((C_word*)t2)[6];
av2[4]=t8;
av2[5]=((C_word*)t2)[15];
av2[6]=((C_word*)t2)[16];
av2[7]=t1;
av2[8]=((C_word*)t2)[11];
av2[9]=t9;
((C_proc)(void*)(*((C_word*)t10+1)))(10,av2);}}

/* k24860 in k24851 in k24844 in k24838 */
static void C_ccall f_24862(C_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_24862,c,av);}
if(C_truep(t1)){
/* irregex-core.scm:3368: 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:3369: 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);}}}

/* k24870 in k24851 in k24844 in k24838 */
static void C_ccall f_24872(C_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_24872,c,av);}
/* irregex-core.scm:3365: g4935 */
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);}}

/* a24875 in k24851 in k24844 in k24838 */
static void C_ccall f_24876(C_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_24876,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_24881 in k24851 in k24844 in k24838 */
static void C_ccall f_24881(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_24881,c,av);}
t3=t1;{
C_word *av2=av;
av2[0]=t3;
av2[1]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* a24897 in k24905 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_24898(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_24898,c,av);}
t10=t1;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t6;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* k24905 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24907(C_word c,C_word *av){
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_24907,c,av);}
a=C_alloc(9);
t2=C_a_i_cons(&a,2,lf[238],t1);
t3=(
/* irregex-core.scm:3355: sre-sequence */
  f_18580(C_a_i(&a,3),t2)
);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24898,a[2]=((C_word)li159),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3355: lp */
t5=((C_word*)((C_word*)t0)[2])[1];
f_23835(t5,((C_word*)t0)[3],t3,((C_word*)t0)[4],((C_word*)t0)[5],t4);}

/* k24916 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24918(C_word c,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_24918,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24919,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word)li161),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_24919 in k24916 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_24919(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_24919,c,av);}
a=C_alloc(14);
t10=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_24923,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_24934,a[2]=((C_word)li160),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3377: 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);}}

/* k24921 */
static void C_ccall f_24923(C_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_24923,c,av);}
if(C_truep(t1)){
/* irregex-core.scm:3379: 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:3380: 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);}}}

/* a24933 */
static void C_ccall f_24934(C_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_24934,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);}}

/* a24940 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24941(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_24941,c,av);}
t10=t1;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t6;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* k24951 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_24953(C_word c,C_word *av){
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_24953,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+8,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24956,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3383: lp */
t4=((C_word*)((C_word*)t0)[5])[1];
f_23835(t4,t3,C_i_caddr(((C_word*)t0)[2]),((C_word*)t0)[7],C_fixnum_plus(((C_word*)t0)[6],((C_word*)t0)[8]),((C_word*)t0)[9]);}

/* k24954 in k24951 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_24956(C_word c,C_word *av){
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(19,c,10)))){
C_save_and_reclaim((void *)f_24956,c,av);}
a=C_alloc(19);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_24959,a[2]=t1,a[3]=C_SCHEME_UNDEFINED,a[4]=((C_word*)t2)[3],a[5]=((C_word*)t2)[2],a[6]=((C_word*)t2)[4],a[7]=((C_word*)t2)[5],a[8]=((C_word*)t2)[6],a[9]=((C_word*)t2)[7],tmp=(C_word)a,a+=10,tmp);
t4=C_i_cdddr(((C_word*)t2)[2]);
if(C_truep(C_i_pairp(t4))){
t5=C_i_cadddr(((C_word*)t2)[2]);
t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_25072,a[2]=((C_word*)t2)[5],a[3]=t3,a[4]=t5,a[5]=((C_word*)t2)[6],a[6]=((C_word*)t2)[8],a[7]=((C_word*)t2)[7],a[8]=((C_word*)t2)[9],tmp=(C_word)a,a+=9,tmp);
t7=C_u_i_cdr(((C_word*)t2)[2]);
t8=C_u_i_cdr(t7);
/* irregex-core.scm:3387: sre-count-submatches */
f_17374(t6,C_u_i_car(t8));}
else{
t5=t3;{
C_word *av2=av;
av2[0]=t5;
av2[1]=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_25077,a[2]=((C_word)li166),tmp=(C_word)a,a+=3,tmp);
f_24959(2,av2);}}}

/* k24957 in k24954 in k24951 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 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 *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,2)))){
C_save_and_reclaim((void *)f_24959,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+3,t1);
t3=C_i_cadr(((C_word*)t0)[5]);
t4=C_i_numberp(t3);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_24968,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(t4)){
t6=t5;
f_24968(t6,t4);}
else{
t6=C_u_i_cdr(((C_word*)t0)[5]);
t7=t5;
f_24968(t7,C_i_symbolp(C_u_i_car(t6)));}}

/* k24966 in k24957 in k24954 in k24951 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in ... */
static void f_24968(C_word t0,C_word 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(5,0,5)))){
C_save_and_reclaim_args((void *)trf_24968,2,t0,t1);}
a=C_alloc(5);
t2=((C_word*)t0)[2];
if(C_truep(t1)){
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_24971,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[3],a[4]=((C_word*)t2)[4],tmp=(C_word)a,a+=5,tmp);
t4=C_u_i_cdr(((C_word*)t2)[5]);
if(C_truep(C_i_symbolp(C_u_i_car(t4)))){
t5=C_u_i_cdr(((C_word*)t2)[5]);
t6=C_i_assq(C_u_i_car(t5),((C_word*)((C_word*)t2)[6])[1]);
if(C_truep(t6)){
t7=t3;{
C_word av2[2];
av2[0]=t7;
av2[1]=C_i_cdr(t6);
f_24971(2,av2);}}
else{
/* irregex-core.scm:3399: chicken.base#error */
t7=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t7;
av2[1]=t3;
av2[2]=lf[241];
av2[3]=((C_word*)t2)[5];
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}}
else{
t5=t3;{
C_word av2[2];
av2[0]=t5;
av2[1]=C_i_cadr(((C_word*)t2)[5]);
f_24971(2,av2);}}}
else{
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25029,a[2]=((C_word*)t2)[3],a[3]=((C_word*)t2)[4],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3406: lp */
t4=((C_word*)((C_word*)t2)[7])[1];
f_23835(t4,t3,C_i_cadr(((C_word*)t2)[5]),((C_word*)t2)[8],((C_word*)t2)[9],((C_word*)t2)[2]);}}

/* k24969 in k24966 in k24957 in k24954 in k24951 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in ... */
static void C_ccall f_24971(C_word c,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_24971,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_24972,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word)li163),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_24972 in k24969 in k24966 in k24957 in k24954 in k24951 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in ... */
static void C_ccall f_24972(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_24972,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:3403: 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:3404: 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);}}}

/* k25027 in k24966 in k24957 in k24954 in k24951 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in ... */
static void C_ccall f_25029(C_word c,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_25029,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_25030,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word)li165),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_25030 in k25027 in k24966 in k24957 in k24954 in k24951 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in ... */
static void C_ccall f_25030(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_25030,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_25036,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)li164),tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3408: 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);}}

/* a25035 */
static void C_ccall f_25036(C_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_25036,c,av);}
/* irregex-core.scm:3409: 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);}}

/* k25070 in k24954 in k24951 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_25072(C_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_25072,c,av);}
/* irregex-core.scm:3385: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_23835(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_25077 in k24954 in k24951 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_25077(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_25077,c,av);}
/* irregex-core.scm:3391: fail */
t10=t9;{
C_word *av2=av;
av2[0]=t10;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t10+1)))(2,av2);}}

/* k25107 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_25109(C_word c,C_word *av){
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_25109,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_25112,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[192]);
if(C_truep(t3)){
t4=t2;
f_25112(t4,(C_truep(t3)?*((C_word*)lf[242]+1):*((C_word*)lf[243]+1)));}
else{
t4=C_fixnum_and(((C_word*)t0)[5],C_fix(2));
t5=C_eqp(C_fix(2),t4);
t6=t2;
f_25112(t6,(C_truep(t5)?*((C_word*)lf[242]+1):*((C_word*)lf[243]+1)));}}

/* k25110 in k25107 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void f_25112(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_25112,2,t0,t1);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_25113,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=((C_word)li168),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_25113 in k25110 in k25107 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in ... */
static void C_ccall f_25113(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_25113,c,av);}
a=C_alloc(13);
t10=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_25117,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:3420: irregex-match-substring */
t11=C_fast_retrieve(lf[40]);{
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);}}

/* k25115 */
static void C_ccall f_25117(C_word c,C_word *av){
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_25117,c,av);}
a=C_alloc(13);
if(C_truep(C_i_not(t1))){
/* irregex-core.scm:3422: 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_25135,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)li167),tmp=(C_word)a,a+=11,tmp));
t6=((C_word*)t4)[1];
f_25135(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 k25115 */
static void f_25135(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_25135,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_25148,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_25162,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:3433: 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_25180,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_25235,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:3440: 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);}}}

/* k25146 in lp in k25115 */
static void C_ccall f_25148(C_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_25148,c,av);}
if(C_truep(t1)){
/* irregex-core.scm:3435: 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:3437: 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);}}}

/* k25160 in lp in k25115 */
static void C_ccall f_25162(C_word c,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_25162,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_25166,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:3434: 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);}}

/* k25164 in k25160 in lp in k25115 */
static void C_ccall f_25166(C_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_25166,c,av);}
/* irregex-core.scm:3433: 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);}}

/* k25178 in lp in k25115 */
static void C_ccall f_25180(C_word c,C_word *av){
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_25180,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_25186,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],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:3442: g5045 */
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:3452: 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);}}}

/* k25184 in k25178 in lp in k25115 */
static void C_ccall f_25186(C_word c,C_word *av){
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_25186,c,av);}
a=C_alloc(11);
if(C_truep(t1)){
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_25199,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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_SCHEME_UNDEFINED,a[10]=((C_word*)t0)[8],tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:3444: g5047 */
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:3450: 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);}}}

/* k25197 in k25184 in k25178 in lp in k25115 */
static void C_ccall f_25199(C_word c,C_word *av){
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_25199,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+9,t1);
t3=C_i_vector_ref(((C_word*)t0)[2],C_fix(2));
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_25206,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3444: g5049 */
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)[8];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k25204 in k25197 in k25184 in k25178 in lp in k25115 */
static void C_ccall f_25206(C_word c,C_word *av){
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_25206,c,av);}
a=C_alloc(11);
t2=((C_word*)t0)[2];
t3=C_i_vector_ref(((C_word*)t2)[2],C_fix(3));
t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_25213,a[2]=((C_word*)t2)[3],a[3]=((C_word*)t2)[4],a[4]=((C_word*)t2)[5],a[5]=((C_word*)t2)[6],a[6]=((C_word*)t2)[7],a[7]=((C_word*)t2)[8],a[8]=((C_word*)t2)[9],a[9]=t1,a[10]=((C_word*)t2)[10],tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:3444: g5051 */
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*)t2)[8];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k25211 in k25204 in k25197 in k25184 in k25178 in lp in k25115 */
static void C_ccall f_25213(C_word c,C_word *av){
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_25213,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:3444: lp */
t5=((C_word*)((C_word*)t0)[5])[1];
f_25135(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));}

/* k25233 in lp in k25115 */
static void C_ccall f_25235(C_word c,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_25235,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_25239,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:3441: 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);}}

/* k25237 in k25233 in lp in k25115 */
static void C_ccall f_25239(C_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_25239,c,av);}
/* irregex-core.scm:3440: 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);}}

/* k25324 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_25326(C_word c,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_25326,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_25327,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word)li170),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_25327 in k25324 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_25327(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_25327,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_25375,a[2]=t8,a[3]=((C_word*)t0)[2],a[4]=t12,a[5]=t16,a[6]=t9,a[7]=((C_word)li169),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3479: 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);}}

/* a25374 */
static void C_ccall f_25375(C_word c,C_word *av){
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_25375,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:3485: 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);}}

/* a25434 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_25435(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_25435,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_25470,a[2]=t8,a[3]=((C_word*)t0)[2],a[4]=t13,a[5]=t16,a[6]=t9,a[7]=((C_word)li171),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3467: 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);}}

/* a25469 in a25434 in k23875 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 in ... */
static void C_ccall f_25470(C_word c,C_word *av){
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_25470,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:3473: 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_25670 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_25670(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(11,c,9)))){
C_save_and_reclaim((void *)f_25670,c,av);}
a=C_alloc(11);
if(C_truep(C_fixnum_lessp(t6,t7))){
/* irregex-core.scm:3495: 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|10,a[1]=(C_word)f_25690,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,a[5]=t3,a[6]=C_SCHEME_UNDEFINED,a[7]=C_SCHEME_UNDEFINED,a[8]=C_SCHEME_UNDEFINED,a[9]=t8,a[10]=t9,tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:3496: g5141 */
t12=t10;{
C_word *av2=av;
av2[0]=t12;
av2[1]=t11;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t12+1)))(3,av2);}}}

/* k25688 */
static void C_ccall f_25690(C_word c,C_word *av){
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_25690,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+6,t1);
if(C_truep(((C_word*)t0)[6])){
t3=C_i_vector_ref(((C_word*)t0)[4],C_fix(1));
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_25699,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3498: g5146 */
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);}}
else{
/* irregex-core.scm:3502: fail */
t3=((C_word*)t0)[10];{
C_word *av2=av;
av2[0]=t3;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k25697 in k25688 */
static void C_ccall f_25699(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_25699,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+7,t1);
t4=C_i_vector_ref(((C_word*)t2)[4],C_fix(2));
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_25705,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3498: g5148 */
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*)t2)[6];
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k25703 in k25697 in k25688 */
static void C_ccall f_25705(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_25705,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+8,t1);
t4=C_i_vector_ref(((C_word*)t2)[4],C_fix(3));
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_25711,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3498: g5150 */
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*)t2)[6];
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k25709 in k25703 in k25697 in k25688 */
static void C_ccall f_25711(C_word c,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,9)))){
C_save_and_reclaim((void *)f_25711,c,av);}
t2=((C_word*)t0)[2];
/* irregex-core.scm:3501: next */
t3=((C_word*)t2)[2];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t3;
av2[1]=((C_word*)t2)[3];
av2[2]=((C_word*)t2)[4];
av2[3]=((C_word*)t2)[5];
av2[4]=((C_word*)t2)[6];
av2[5]=((C_word*)t2)[7];
av2[6]=C_fixnum_plus(((C_word*)t2)[8],C_fix(1));
av2[7]=t1;
av2[8]=((C_word*)t2)[9];
av2[9]=((C_word*)t2)[10];
((C_proc)(void*)(*((C_word*)t3+1)))(10,av2);}}

/* f_25728 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_25728(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(11,c,9)))){
C_save_and_reclaim((void *)f_25728,c,av);}
a=C_alloc(11);
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:3507: 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:3508: 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|10,a[1]=(C_word)f_25765,a[2]=C_SCHEME_UNDEFINED,a[3]=C_SCHEME_UNDEFINED,a[4]=((C_word*)t0)[2],a[5]=t1,a[6]=t2,a[7]=t3,a[8]=C_SCHEME_UNDEFINED,a[9]=t8,a[10]=t9,tmp=(C_word)a,a+=11,tmp);
/* irregex-core.scm:3509: g5161 */
t12=t10;{
C_word *av2=av;
av2[0]=t12;
av2[1]=t11;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t12+1)))(3,av2);}}}

/* k25763 */
static void C_ccall f_25765(C_word c,C_word *av){
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_25765,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+8,t1);
if(C_truep(((C_word*)t0)[8])){
t3=C_i_vector_ref(((C_word*)t0)[6],C_fix(1));
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_25774,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3511: g5166 */
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)[8];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
/* irregex-core.scm:3517: fail */
t3=((C_word*)t0)[10];{
C_word *av2=av;
av2[0]=t3;
av2[1]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k25772 in k25763 */
static void C_ccall f_25774(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_25774,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+2,t1);
t4=C_i_vector_ref(((C_word*)t2)[6],C_fix(2));
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_25780,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3511: g5168 */
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*)t2)[8];
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k25778 in k25772 in k25763 */
static void C_ccall f_25780(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_25780,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+3,t1);
t4=C_i_vector_ref(((C_word*)t2)[6],C_fix(3));
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_25786,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3511: g5170 */
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*)t2)[8];
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k25784 in k25778 in k25772 in k25763 */
static void C_ccall f_25786(C_word c,C_word *av){
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,9)))){
C_save_and_reclaim((void *)f_25786,c,av);}
a=C_alloc(5);
t2=((C_word*)t0)[2];
t3=C_i_string_ref(((C_word*)t2)[2],((C_word*)t2)[3]);
t4=C_eqp(C_make_character(10),t3);
if(C_truep(C_i_not(t4))){
t5=C_a_i_fixnum_plus(&a,2,((C_word*)t2)[3],C_fix(1));
/* irregex-core.scm:3515: next */
t6=((C_word*)t2)[4];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t6;
av2[1]=((C_word*)t2)[5];
av2[2]=((C_word*)t2)[6];
av2[3]=((C_word*)t2)[7];
av2[4]=((C_word*)t2)[8];
av2[5]=((C_word*)t2)[2];
av2[6]=t5;
av2[7]=t1;
av2[8]=((C_word*)t2)[9];
av2[9]=((C_word*)t2)[10];
((C_proc)(void*)(*((C_word*)t6+1)))(10,av2);}}
else{
/* irregex-core.scm:3516: fail */
t5=((C_word*)t2)[10];{
C_word *av2=av;
av2[0]=t5;
av2[1]=((C_word*)t2)[5];
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}}

/* f_25820 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_25820(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_25820,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:3521: 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:3522: fail */
t13=t9;{
C_word *av2=av;
av2[0]=t13;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t13+1)))(2,av2);}}}

/* f_25850 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_25850(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(20,c,2)))){
C_save_and_reclaim((void *)f_25850,c,av);}
a=C_alloc(20);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_25857,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=C_i_vector_ref(t2,C_fix(2));
t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_25894,a[2]=t6,a[3]=t10,a[4]=t5,a[5]=t2,a[6]=t3,a[7]=t4,tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:3525: g5190 */
t13=t11;{
C_word *av2=av;
av2[0]=t13;
av2[1]=t12;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t13+1)))(3,av2);}}

/* k25855 */
static void C_ccall f_25857(C_word c,C_word *av){
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,9)))){
C_save_and_reclaim((void *)f_25857,c,av);}
t2=C_i_not(t1);
t3=(C_truep(t2)?t2:C_eqp(C_make_character(10),t1));
if(C_truep(t3)){
/* irregex-core.scm:3529: next */
t4=((C_word*)t0)[2];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t4;
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*)t4+1)))(10,av2);}}
else{
/* irregex-core.scm:3530: fail */
t4=((C_word*)t0)[11];{
C_word *av2=av;
av2[0]=t4;
av2[1]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k25892 */
static void C_ccall f_25894(C_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_25894,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_25857(2,av2);}}
else{
/* irregex-core.scm:3527: chunker-prev-char */
f_8849(((C_word*)t0)[3],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}}

/* f_25901 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_25901(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_25901,c,av);}
a=C_alloc(28);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_25908,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_25917,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_26001,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:3533: g5204 */
t14=t12;{
C_word *av2=av;
av2[0]=t14;
av2[1]=t13;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t14+1)))(3,av2);}}

/* k25906 */
static void f_25908(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_25908,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:3544: 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:3545: 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);}}}

/* k25915 */
static void f_25917(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(5,0,2)))){
C_save_and_reclaim_args((void *)trf_25917,2,t0,t1);}
a=C_alloc(5);
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_25908(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|4,a[1]=(C_word)f_25936,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[5],a[4]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3539: g5211 */
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_25908(t2,C_SCHEME_FALSE);}}

/* k25934 in k25915 */
static void C_ccall f_25936(C_word c,C_word *av){
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_25936,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+4,t1);
if(C_truep(((C_word*)t0)[4])){
t3=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_25953,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3542: g5214 */
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)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
t3=((C_word*)t0)[3];
f_25908(t3,C_SCHEME_FALSE);}}

/* k25951 in k25934 in k25915 */
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 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_25953,c,av);}
a=C_alloc(4);
t2=((C_word*)t0)[2];
t3=C_i_vector_ref(((C_word*)t2)[2],C_fix(2));
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_25960,a[2]=t1,a[3]=((C_word*)t2)[3],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3542: g5216 */
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*)t2)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k25958 in k25951 in k25934 in k25915 */
static void C_ccall f_25960(C_word c,C_word *av){
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_25960,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_25908(t4,(C_truep(t3)?t3:C_u_i_char_numericp(t2)));}

/* k25979 in k25999 */
static void C_ccall f_25981(C_word c,C_word *av){
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_25981,c,av);}
t2=C_i_not(t1);
if(C_truep(t2)){
t3=((C_word*)t0)[2];
f_25917(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_25917(t5,C_i_not(t4));}}

/* k25999 */
static void C_ccall f_26001(C_word c,C_word *av){
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_26001,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_25917(t6,C_i_not(t5));}
else{
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_25981,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3535: chunker-prev-char */
f_8849(t2,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}}

/* f_26008 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_26008(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_26008,c,av);}
a=C_alloc(15);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_26015,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_26034,a[2]=t10,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3548: g5227 */
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_26015(t11,C_SCHEME_FALSE);}}

/* k26013 */
static void f_26015(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_26015,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:3549: 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:3550: 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);}}}

/* k26032 */
static void C_ccall f_26034(C_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_26034,c,av);}
t2=((C_word*)t0)[2];
f_26015(t2,C_i_not(t1));}

/* f_26041 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_26041(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(17,c,2)))){
C_save_and_reclaim((void *)f_26041,c,av);}
a=C_alloc(17);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_26048,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_26048(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|4,a[1]=(C_word)f_26071,a[2]=t2,a[3]=t10,a[4]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3555: g5238 */
t13=t11;{
C_word *av2=av;
av2[0]=t13;
av2[1]=t12;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t13+1)))(3,av2);}}}

/* k26046 */
static void f_26048(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_26048,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:3561: 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:3562: 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);}}}

/* k26069 */
static void C_ccall f_26071(C_word c,C_word *av){
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_26071,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+4,t1);
if(C_truep(C_i_not(((C_word*)t0)[4]))){
t3=((C_word*)t0)[3];
f_26048(t3,C_SCHEME_TRUE);}
else{
t3=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26092,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3559: g5240 */
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)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}}

/* k26090 in k26069 */
static void C_ccall f_26092(C_word c,C_word *av){
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_26092,c,av);}
a=C_alloc(4);
t2=((C_word*)t0)[2];
t3=C_i_vector_ref(((C_word*)t2)[2],C_fix(2));
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_26099,a[2]=((C_word*)t2)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3559: g5242 */
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*)t2)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k26097 in k26090 in k26069 */
static void C_ccall f_26099(C_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_26099,c,av);}
t2=((C_word*)t0)[2];
f_26048(t2,C_eqp(C_make_character(10),C_i_string_ref(((C_word*)t0)[3],t1)));}

/* f_26106 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_26106(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_26106,c,av);}
a=C_alloc(23);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_26113,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_26122,a[2]=t6,a[3]=t5,a[4]=t10,a[5]=t2,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_26122(t15,C_i_not(t14));}
else{
t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26175,a[2]=t11,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3567: chunker-next-char */
f_8879(t12,t2,t4);}}

/* k26111 */
static void f_26113(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_26113,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:3573: 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:3574: 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);}}}

/* k26120 */
static void f_26122(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,2)))){
C_save_and_reclaim_args((void *)trf_26122,2,t0,t1);}
a=C_alloc(3);
if(C_truep(t1)){
t2=C_i_vector_ref(((C_word*)t0)[5],C_fix(2));
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26158,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3569: g5257 */
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)[4];
f_26113(t2,C_SCHEME_FALSE);}}

/* k26140 in k26156 in k26120 */
static void C_ccall f_26142(C_word c,C_word *av){
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_26142,c,av);}
t2=C_i_not(t1);
if(C_truep(t2)){
t3=((C_word*)t0)[2];
f_26113(t3,t2);}
else{
t3=C_u_i_char_alphabeticp(t1);
t4=((C_word*)t0)[2];
f_26113(t4,(C_truep(t3)?t3:C_u_i_char_numericp(t1)));}}

/* k26156 in k26120 */
static void C_ccall f_26158(C_word c,C_word *av){
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_26158,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
if(C_truep(C_fixnum_greaterp(((C_word*)t2)[2],t1))){
t3=C_fixnum_difference(((C_word*)t2)[2],C_fix(1));
t4=C_i_string_ref(((C_word*)t2)[3],t3);
t5=C_u_i_char_alphabeticp(t4);
t6=((C_word*)t2)[4];
f_26113(t6,(C_truep(t5)?t5:C_u_i_char_numericp(t4)));}
else{
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26142,a[2]=((C_word*)t2)[4],tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3571: chunker-prev-char */
f_8849(t3,((C_word*)t2)[5],((C_word*)t2)[6],((C_word*)t2)[7]);}}

/* k26173 */
static void C_ccall f_26175(C_word c,C_word *av){
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_26175,c,av);}
t2=C_i_not(t1);
if(C_truep(t2)){
t3=((C_word*)t0)[2];
f_26122(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_26122(t5,C_i_not(t4));}}

/* f_26195 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_26195(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_26195,c,av);}
a=C_alloc(12);
t10=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_26199,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_26199(2,av2);}}
else{
/* irregex-core.scm:3579: chunker-next-char */
f_8879(t10,t2,t4);}}

/* k26197 */
static void C_ccall f_26199(C_word c,C_word *av){
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_26199,c,av);}
a=C_alloc(21);
t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_26202,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=((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_26253,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:3580: g5273 */
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);}}

/* k26200 in k26197 */
static void C_ccall f_26202(C_word c,C_word *av){
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_26202,c,av);}
a=C_alloc(12);
t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_26208,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],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_26208(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_26208(t7,C_i_not(t6));}}
else{
t3=t2;
f_26208(t3,C_SCHEME_FALSE);}}
else{
t3=t2;
f_26208(t3,C_SCHEME_FALSE);}}

/* k26206 in k26200 in k26197 */
static void f_26208(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_26208,2,t0,t1);}
if(C_truep(t1)){
/* irregex-core.scm:3587: 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:3588: 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);}}}

/* k26251 in k26197 */
static void C_ccall f_26253(C_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_26253,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_26202(2,av2);}}
else{
/* irregex-core.scm:3582: chunker-prev-char */
f_8849(((C_word*)t0)[3],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}}

/* f_26317 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_26317(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_26317,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_26334,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:3601: g5300 */
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_26402,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:3613: scheme#char-ci=? */
t11=*((C_word*)lf[251]+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);}}}

/* k26332 */
static void C_ccall f_26334(C_word c,C_word *av){
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_26334,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_26336,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)li182),tmp=(C_word)a,a+=10,tmp));
t5=((C_word*)t3)[1];
f_26336(t5,((C_word*)t0)[8],t1);}

/* lp in k26332 */
static void f_26336(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(13,0,2)))){
C_save_and_reclaim_args((void *)trf_26336,3,t0,t1,t2);}
a=C_alloc(13);
if(C_truep(t2)){
t3=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t4=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_26346,a[2]=C_SCHEME_UNDEFINED,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=t2,a[7]=((C_word*)t0)[4],a[8]=((C_word*)t0)[5],a[9]=C_SCHEME_UNDEFINED,a[10]=((C_word*)t0)[6],a[11]=((C_word*)t0)[7],a[12]=((C_word*)t0)[8],tmp=(C_word)a,a+=13,tmp);
/* irregex-core.scm:3603: g5291 */
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:3612: 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);}}}

/* k26344 in lp in k26332 */
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 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_26346,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+9,t1);
t3=C_i_vector_ref(((C_word*)t0)[3],C_fix(2));
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26352,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3603: g5293 */
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);}}

/* k26350 in k26344 in lp in k26332 */
static void C_ccall f_26352(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_26352,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+2,t1);
t4=C_i_vector_ref(((C_word*)t2)[3],C_fix(3));
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26358,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3603: g5295 */
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*)t2)[6];
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k26356 in k26350 in k26344 in lp in k26332 */
static void C_ccall f_26358(C_word c,C_word *av){
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_26358,c,av);}
a=C_alloc(12);
t2=((C_word*)t0)[2];
if(C_truep(C_fixnum_greater_or_equal_p(((C_word*)t2)[2],t1))){
t3=C_i_vector_ref(((C_word*)t2)[3],C_fix(0));
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_26374,a[2]=((C_word*)t2)[4],a[3]=((C_word*)t2)[5],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3607: g5297 */
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*)t2)[6];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_26380,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[7],a[4]=((C_word*)t2)[5],a[5]=((C_word*)t2)[3],a[6]=((C_word*)t2)[8],a[7]=((C_word*)t2)[6],a[8]=((C_word*)t2)[9],a[9]=t1,a[10]=((C_word*)t2)[10],a[11]=((C_word*)t2)[11],tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3608: scheme#char-ci=? */
t4=*((C_word*)lf[251]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t2)[12];
av2[3]=C_i_string_ref(((C_word*)t2)[9],((C_word*)t2)[2]);
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}}

/* k26372 in k26356 in k26350 in k26344 in lp in k26332 */
static void C_ccall f_26374(C_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_26374,c,av);}
/* irregex-core.scm:3607: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_26336(t2,((C_word*)t0)[3],t1);}

/* k26378 in k26356 in k26350 in k26344 in lp in k26332 */
static void C_ccall f_26380(C_word c,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_26380,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:3609: 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:3611: 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);}}}

/* k26400 */
static void C_ccall f_26402(C_word c,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_26402,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:3614: 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:3615: 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_26416 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
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=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_26416,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_26433,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:3619: g5324 */
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:3632: 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:3633: fail */
t11=t9;{
C_word *av2=av;
av2[0]=t11;
av2[1]=t1;
((C_proc)(void*)(*((C_word*)t11+1)))(2,av2);}}}}

/* k26431 */
static void C_ccall f_26433(C_word c,C_word *av){
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_26433,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_26435,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)li184),tmp=(C_word)a,a+=10,tmp));
t5=((C_word*)t3)[1];
f_26435(t5,((C_word*)t0)[8],t1);}

/* lp in k26431 */
static void f_26435(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(13,0,2)))){
C_save_and_reclaim_args((void *)trf_26435,3,t0,t1,t2);}
a=C_alloc(13);
if(C_truep(t2)){
t3=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t4=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_26445,a[2]=C_SCHEME_UNDEFINED,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=t2,a[7]=C_SCHEME_UNDEFINED,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],tmp=(C_word)a,a+=13,tmp);
/* irregex-core.scm:3621: g5315 */
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:3630: 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);}}}

/* k26443 in lp in k26431 */
static void C_ccall f_26445(C_word c,C_word *av){
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_26445,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+7,t1);
t3=C_i_vector_ref(((C_word*)t0)[3],C_fix(2));
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26451,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3621: g5317 */
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);}}

/* k26449 in k26443 in lp in k26431 */
static void C_ccall f_26451(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_26451,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+2,t1);
t4=C_i_vector_ref(((C_word*)t2)[3],C_fix(3));
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26457,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3621: g5319 */
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*)t2)[6];
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k26455 in k26449 in k26443 in lp in k26431 */
static void C_ccall f_26457(C_word c,C_word *av){
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_26457,c,av);}
a=C_alloc(5);
t2=((C_word*)t0)[2];
if(C_truep(C_fixnum_greater_or_equal_p(((C_word*)t2)[2],t1))){
t3=C_i_vector_ref(((C_word*)t2)[3],C_fix(0));
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_26473,a[2]=((C_word*)t2)[4],a[3]=((C_word*)t2)[5],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3625: g5321 */
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*)t2)[6];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
t3=C_i_string_ref(((C_word*)t2)[7],((C_word*)t2)[2]);
if(C_truep(C_i_char_equalp(((C_word*)t2)[8],t3))){
t4=C_a_i_fixnum_plus(&a,2,((C_word*)t2)[2],C_fix(1));
/* irregex-core.scm:3627: next */
t5=((C_word*)t2)[9];{
C_word *av2;
if(c >= 10) {
  av2=av;
} else {
  av2=C_alloc(10);
}
av2[0]=t5;
av2[1]=((C_word*)t2)[5];
av2[2]=((C_word*)t2)[3];
av2[3]=((C_word*)t2)[10];
av2[4]=((C_word*)t2)[6];
av2[5]=((C_word*)t2)[7];
av2[6]=t4;
av2[7]=t1;
av2[8]=((C_word*)t2)[11];
av2[9]=((C_word*)t2)[12];
((C_proc)(void*)(*((C_word*)t5+1)))(10,av2);}}
else{
/* irregex-core.scm:3629: fail */
t4=((C_word*)t2)[12];{
C_word *av2=av;
av2[0]=t4;
av2[1]=((C_word*)t2)[5];
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}}

/* k26471 in k26455 in k26449 in k26443 in lp in k26431 */
static void C_ccall f_26473(C_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_26473,c,av);}
/* irregex-core.scm:3625: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_26435(t2,((C_word*)t0)[3],t1);}

/* k26529 in lp in k23784 in k16624 in k17482 in k17475 in k17472 in k16595 in k16592 in k16589 in k16586 in k16583 in k16577 in k16574 in k16571 in k16568 in chicken.irregex#sre->irregex in k7970 in k7739 in k7736 */
static void C_ccall f_26531(C_word c,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_26531,c,av);}
a=C_alloc(3);
t2=(
/* irregex-core.scm:3636: sre-sequence */
  f_18580(C_a_i(&a,3),t1)
);
/* irregex-core.scm:3636: rec */
t3=((C_word*)t0)[2];
f_23838(t3,((C_word*)t0)[3],t2);}

/* chicken.irregex#sre-cset->procedure in k19305 in k7970 in k7739 in k7736 */
static void f_26557(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_26557,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_26559,a[2]=t3,a[3]=t2,a[4]=((C_word)li312),tmp=(C_word)a,a+=5,tmp);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* f_26559 in chicken.irregex#sre-cset->procedure in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_26559(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_26559,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_26572,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:3660: cset-contains? */
f_27348(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|11,a[1]=(C_word)f_26591,a[2]=C_SCHEME_UNDEFINED,a[3]=((C_word*)t0)[2],a[4]=t1,a[5]=t2,a[6]=t3,a[7]=C_SCHEME_UNDEFINED,a[8]=C_SCHEME_UNDEFINED,a[9]=t8,a[10]=t9,a[11]=((C_word*)t0)[3],tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3663: g5365 */
t12=t10;{
C_word *av2=av;
av2[0]=t12;
av2[1]=t11;
av2[2]=t4;
((C_proc)(void*)(*((C_word*)t12+1)))(3,av2);}}}

/* k26570 */
static void C_ccall f_26572(C_word c,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_26572,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:3661: 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:3662: 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);}}}

/* k26589 */
static void C_ccall f_26591(C_word c,C_word *av){
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_26591,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+7,t1);
if(C_truep(((C_word*)t0)[7])){
t3=C_i_vector_ref(((C_word*)t0)[5],C_fix(1));
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26600,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3665: g5370 */
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)[7];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}
else{
/* irregex-core.scm:3671: fail */
t3=((C_word*)t0)[10];{
C_word *av2=av;
av2[0]=t3;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k26598 in k26589 */
static void C_ccall f_26600(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_26600,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+8,t1);
t4=C_i_vector_ref(((C_word*)t2)[5],C_fix(2));
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26606,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3665: g5372 */
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*)t2)[7];
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k26604 in k26598 in k26589 */
static void C_ccall f_26606(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_26606,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=C_mutate(((C_word *)t2)+2,t1);
t4=C_i_vector_ref(((C_word*)t2)[5],C_fix(3));
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26612,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3665: g5374 */
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*)t2)[7];
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k26610 in k26604 in k26598 in k26589 */
static void C_ccall f_26612(C_word c,C_word *av){
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_26612,c,av);}
a=C_alloc(12);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_26618,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[3],a[4]=((C_word*)t2)[4],a[5]=((C_word*)t2)[5],a[6]=((C_word*)t2)[6],a[7]=((C_word*)t2)[7],a[8]=((C_word*)t2)[8],a[9]=t1,a[10]=((C_word*)t2)[9],a[11]=((C_word*)t2)[10],tmp=(C_word)a,a+=12,tmp);
/* irregex-core.scm:3668: cset-contains? */
f_27348(t3,((C_word*)t2)[11],C_i_string_ref(((C_word*)t2)[8],((C_word*)t2)[2]));}

/* k26616 in k26610 in k26604 in k26598 in k26589 */
static void C_ccall f_26618(C_word c,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_26618,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:3669: 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:3670: 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 k19305 in k7970 in k7739 in k7736 */
static void f_26770(C_word t1,C_word 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_26770,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_26782,a[2]=t2,a[3]=t6,a[4]=((C_word)li314),tmp=(C_word)a,a+=5,tmp));
t8=((C_word*)t6)[1];
f_26782(t8,t1,t4,C_SCHEME_END_OF_LIST);}

/* lp in chicken.irregex#cset->plist in k19305 in k7970 in k7739 in k7736 */
static void f_26782(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_26782,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:3700: lp */
t13=t1;
t14=t5;
t15=t11;
t1=t13;
t2=t14;
t3=t15;
goto loop;}}

/* lp in k27147 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void f_26832(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_26832,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_26850,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:3707: cset-union */
t11=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
C_word av2[4];
av2[0]=t11;
av2[1]=t5;
av2[2]=t10;
av2[3]=t3;
f_27469(4,av2);}}}

/* k26848 in lp in k27147 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_26850(C_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_26850,c,av);}
/* irregex-core.scm:3707: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_26832(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* chicken.irregex#string->cset in k19305 in k7970 in k7739 in k7736 */
static void f_26861(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_26861,2,t1,t2);}
a=C_alloc(9);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26867,a[2]=((C_word)li316),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_26879,a[2]=t1,a[3]=t3,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
/* ##sys#string->list */
t6=C_fast_retrieve(lf[106]);{
C_word av2[3];
av2[0]=t6;
av2[1]=t5;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* a26866 in chicken.irregex#string->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_26867(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_26867,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:3812: cset-union */
t6=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
C_word *av2=av;
av2[0]=t6;
av2[1]=t1;
av2[2]=t3;
av2[3]=t5;
f_27469(4,av2);}}

/* k26877 in chicken.irregex#string->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_26879(C_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_26879,c,av);}
/* irregex-core.scm:3710: fold */
f_9594(((C_word*)t0)[2],((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void f_26881(C_word t1,C_word t2,C_word 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_26881,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_26891,a[2]=t7,a[3]=((C_word)li326),tmp=(C_word)a,a+=4,tmp));
t9=((C_word*)t7)[1];
f_26891(t9,t1,t2,t5);}

/* lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void f_26891(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_26891,4,t0,t1,t2,t3);}
a=C_alloc(18);
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_26894,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word)li318),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_26920,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3722: string->cset */
f_26861(t5,C_u_i_car(t2));}
else{
/* irregex-core.scm:3723: string->cset */
f_26861(t1,C_u_i_car(t2));}}
else{
t5=C_u_i_car(t2);
t6=C_eqp(t5,lf[180]);
if(C_truep(t6)){
t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_26941,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_26945,a[2]=t2,a[3]=t7,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3727: rec */
t9=t4;
f_26894(t9,t8,C_i_cadr(t2));}
else{
t7=C_eqp(t5,lf[235]);
if(C_truep(t7)){
t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_27009,a[2]=t2,a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3729: rec */
t9=t4;
f_26894(t9,t8,C_i_cadr(t2));}
else{
t8=C_eqp(t5,lf[248]);
if(C_truep(t8)){
t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27071,a[2]=((C_word)li321),tmp=(C_word)a,a+=3,tmp);
t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_27079,a[2]=t2,a[3]=t1,a[4]=t9,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:3732: rec */
t11=t4;
f_26894(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_27139,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27149,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_18759,a[2]=t14,a[3]=((C_word)li324),tmp=(C_word)a,a+=4,tmp));
t16=((C_word*)t14)[1];
f_18759(t16,t11,t12,C_SCHEME_END_OF_LIST);}
else{
t10=C_eqp(t5,lf[104]);
if(C_truep(t10)){
t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_27164,a[2]=t2,a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3740: rec */
t12=t4;
f_26894(t12,t11,C_i_cadr(t2));}
else{
t11=C_eqp(t5,lf[226]);
if(C_truep(t11)){
t12=(
/* irregex-core.scm:3742: sre-alternate */
  f_18603(C_a_i(&a,3),C_u_i_cdr(t2))
);
/* irregex-core.scm:3742: lp */
t17=t1;
t18=t12;
t19=C_SCHEME_FALSE;
t1=t17;
t2=t18;
t3=t19;
goto loop;}
else{
t12=C_eqp(t5,lf[227]);
if(C_truep(t12)){
t13=(
/* irregex-core.scm:3744: sre-alternate */
  f_18603(C_a_i(&a,3),C_u_i_cdr(t2))
);
/* irregex-core.scm:3744: lp */
t17=t1;
t18=t13;
t19=C_SCHEME_TRUE;
t1=t17;
t2=t18;
t3=t19;
goto loop;}
else{
/* irregex-core.scm:3746: chicken.base#error */
t13=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t13;
av2[1]=t1;
av2[2]=lf[407];
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:3748: cset-case-insensitive */
f_28002(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:3750: rec */
t6=t4;
f_26894(t6,t1,t5);}
else{
t5=C_i_assq(t2,C_retrieve2(lf[249],C_text("chicken.irregex#sre-named-definitions")));
if(C_truep(t5)){
/* irregex-core.scm:3754: rec */
t6=t4;
f_26894(t6,t1,C_i_cdr(t5));}
else{
/* irregex-core.scm:3755: chicken.base#error */
t6=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t6;
av2[1]=t1;
av2[2]=lf[408];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}}}}}

/* rec in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void f_26894(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_26894,3,t0,t1,t2);}
/* irregex-core.scm:3717: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_26891(t3,t1,t2,((C_word*)t0)[3]);}

/* k26918 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_26920(C_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_26920,c,av);}
/* irregex-core.scm:3722: cset-case-insensitive */
f_28002(((C_word*)t0)[2],t1);}

/* k26939 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_26941(C_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_26941,c,av);}
/* irregex-core.scm:3726: cset-complement */
f_27992(((C_word*)t0)[2],t1);}

/* k26943 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_26945(C_word c,C_word *av){
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_26945,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[212]);
t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_26958,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_26960,a[2]=t4,a[3]=t10,a[4]=((C_word*)t0)[4],a[5]=t5,a[6]=((C_word)li319),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
f_26960(t12,t8,t6);}

/* k26956 in k26943 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_26958(C_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_26958,c,av);}
/* irregex-core.scm:3727: fold */
f_9594(((C_word*)t0)[2],C_retrieve2(lf[163],C_text("chicken.irregex#cset-union")),((C_word*)t0)[3],t1);}

/* map-loop5431 in k26943 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void f_26960(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_26960,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_26985,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:3727: g5437 */
t4=((C_word*)t0)[4];
f_26894(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);}}}

/* k26983 in map-loop5431 in k26943 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_26985(C_word c,C_word *av){
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_26985,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_26960(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* k27007 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27009(C_word c,C_word *av){
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_27009,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[212]);
t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27022,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_27024,a[2]=t4,a[3]=t10,a[4]=((C_word*)t0)[4],a[5]=t5,a[6]=((C_word)li320),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
f_27024(t12,t8,t6);}

/* k27020 in k27007 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
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,4)))){
C_save_and_reclaim((void *)f_27022,c,av);}
/* irregex-core.scm:3729: fold */
f_9594(((C_word*)t0)[2],C_retrieve2(lf[406],C_text("chicken.irregex#cset-intersection")),((C_word*)t0)[3],t1);}

/* map-loop5457 in k27007 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void f_27024(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_27024,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_27049,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:3729: g5463 */
t4=((C_word*)t0)[4];
f_26894(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);}}}

/* k27047 in map-loop5457 in k27007 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27049(C_word c,C_word *av){
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_27049,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_27024(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* a27070 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27071(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_27071,c,av);}
/* irregex-core.scm:3731: cset-difference */
f_27670(t1,t3,t2);}

/* k27077 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27079(C_word c,C_word *av){
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_27079,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[212]);
t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_27092,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_27094,a[2]=t4,a[3]=t10,a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=((C_word)li322),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
f_27094(t12,t8,t6);}

/* k27090 in k27077 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27092(C_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_27092,c,av);}
/* irregex-core.scm:3731: fold */
f_9594(((C_word*)t0)[2],((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* map-loop5485 in k27077 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void f_27094(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_27094,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_27119,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:3733: g5491 */
t4=((C_word*)t0)[4];
f_26894(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);}}}

/* k27117 in map-loop5485 in k27077 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27119(C_word c,C_word *av){
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_27119,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_27094(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* k27137 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27139(C_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_27139,c,av);}
if(C_truep(((C_word*)t0)[2])){
/* irregex-core.scm:3737: cset-case-insensitive */
f_28002(((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);}}}

/* k27147 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27149(C_word c,C_word *av){
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_27149,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_26832,a[2]=t4,a[3]=((C_word)li323),tmp=(C_word)a,a+=4,tmp));
t6=((C_word*)t4)[1];
f_26832(t6,((C_word*)t0)[2],t1,t2);}

/* k27162 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27164(C_word c,C_word *av){
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_27164,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[212]);
t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27177,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_27179,a[2]=t4,a[3]=t10,a[4]=((C_word*)t0)[4],a[5]=t5,a[6]=((C_word)li325),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
f_27179(t12,t8,t6);}

/* k27175 in k27162 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27177(C_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_27177,c,av);}
/* irregex-core.scm:3740: fold */
f_9594(((C_word*)t0)[2],C_retrieve2(lf[163],C_text("chicken.irregex#cset-union")),((C_word*)t0)[3],t1);}

/* map-loop5512 in k27162 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void f_27179(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_27179,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_27204,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:3740: g5518 */
t4=((C_word*)t0)[4];
f_26894(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);}}}

/* k27202 in map-loop5512 in k27162 in lp in chicken.irregex#sre->cset in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27204(C_word c,C_word *av){
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_27204,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_27179(t5,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* k27324 in k13672 in k13665 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_27326(C_word c,C_word *av){
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_27326,c,av);}
a=C_alloc(9);
t2=((C_word*)t0)[2];
t3=C_a_i_cons(&a,2,lf[52],t1);
t4=((C_word*)t2)[2];{
C_word *av2=av;
av2[0]=t4;
av2[1]=C_a_i_list2(&a,2,t3,((C_word*)t2)[3]);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* a27327 in k13672 in k13665 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_27328(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_27328,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);}}

/* k27344 in k13672 in k13665 in go in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_27346(C_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_27346,c,av);}
/* irregex-core.scm:3759: fold */
f_9594(((C_word*)t0)[2],((C_word*)t0)[3],C_SCHEME_END_OF_LIST,t1);}

/* chicken.irregex#cset-contains? in k19305 in k7970 in k7739 in k7736 */
static void f_27348(C_word t1,C_word t2,C_word t3){
C_word 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_27348,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_27381,a[2]=t2,a[3]=t3,a[4]=t6,a[5]=((C_word)li328),tmp=(C_word)a,a+=6,tmp));
t8=((C_word*)t6)[1];
f_27381(t8,t1,C_fix(0),t4);}}

/* lp in chicken.irregex#cset-contains? in k19305 in k7970 in k7739 in k7736 */
static void f_27381(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_27381,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:3778: 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:3780: 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 k19305 in k7970 in k7739 in k7736 */
static C_word f_27433(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 k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27469(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_27469,c,av);}
a=C_alloc(4);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27477,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3788: scheme#vector->list */
t5=*((C_word*)lf[164]+1);{
C_word *av2=av;
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k27475 in chicken.irregex#cset-union in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27477(C_word c,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_27477,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27481,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[164]+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);}}

/* k27479 in k27475 in chicken.irregex#cset-union in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27481(C_word c,C_word *av){
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_27481,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_27483,a[2]=t3,a[3]=((C_word)li331),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_27483(t5,((C_word*)t0)[2],((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* union-range in k27479 in k27475 in chicken.irregex#cset-union in k19305 in k7970 in k7739 in k7736 */
static void f_27483(C_word t0,C_word 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_27483,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_27497,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27501,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27505,a[2]=t6,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3792: ##sys#fast-reverse */
t8=C_fast_retrieve(lf[70]);{
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_27518,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_27522,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27526,a[2]=t6,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3793: ##sys#fast-reverse */
t8=C_fast_retrieve(lf[70]);{
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:3801: 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:3803: 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:3805: char-ranges-union */
  f_27433(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:3805: 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:3809: char-ranges-union */
  f_27433(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:3808: union-range */
t22=t1;
t23=t17;
t24=t20;
t25=t4;
t1=t22;
t2=t23;
t3=t24;
t4=t25;
goto loop;}}}}}}

/* k27495 in union-range in k27479 in k27475 in chicken.irregex#cset-union in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27497(C_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_27497,c,av);}
/* irregex-core.scm:3792: scheme#list->vector */
t2=*((C_word*)lf[410]+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);}}

/* k27499 in union-range in k27479 in k27475 in chicken.irregex#cset-union in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27501(C_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_27501,c,av);}
/* irregex-core.scm:3792: ##sys#fast-reverse */
t2=C_fast_retrieve(lf[70]);{
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);}}

/* k27503 in union-range in k27479 in k27475 in chicken.irregex#cset-union in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27505(C_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_27505,c,av);}
/* irregex-core.scm:3792: scheme#append */
t2=*((C_word*)lf[74]+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);}}

/* k27516 in union-range in k27479 in k27475 in chicken.irregex#cset-union in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27518(C_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_27518,c,av);}
/* irregex-core.scm:3793: scheme#list->vector */
t2=*((C_word*)lf[410]+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 union-range in k27479 in k27475 in chicken.irregex#cset-union in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27522(C_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_27522,c,av);}
/* irregex-core.scm:3793: ##sys#fast-reverse */
t2=C_fast_retrieve(lf[70]);{
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);}}

/* k27524 in union-range in k27479 in k27475 in chicken.irregex#cset-union in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27526(C_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_27526,c,av);}
/* irregex-core.scm:3793: scheme#append */
t2=*((C_word*)lf[74]+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 k19305 in k7970 in k7739 in k7736 */
static void f_27670(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_27670,3,t1,t2,t3);}
a=C_alloc(4);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27678,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3821: scheme#vector->list */
t5=*((C_word*)lf[164]+1);{
C_word av2[3];
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k27676 in chicken.irregex#cset-difference in k19305 in k7970 in k7739 in k7736 */
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 *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(4,c,2)))){
C_save_and_reclaim((void *)f_27678,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27682,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[164]+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);}}

/* k27680 in k27676 in chicken.irregex#cset-difference in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27682(C_word c,C_word *av){
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_27682,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_27684,a[2]=t3,a[3]=((C_word)li333),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_27684(t5,((C_word*)t0)[2],((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* diff in k27680 in k27676 in chicken.irregex#cset-difference in k19305 in k7970 in k7739 in k7736 */
static void f_27684(C_word t0,C_word 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 *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(17,0,4)))){
C_save_and_reclaim_args((void *)trf_27684,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_27698,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3824: ##sys#fast-reverse */
t6=C_fast_retrieve(lf[70]);{
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_27711,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27715,a[2]=t5,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3825: ##sys#fast-reverse */
t7=C_fast_retrieve(lf[70]);{
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:3831: diff */
t19=t1;
t20=t9;
t21=t3;
t22=t10;
t1=t19;
t2=t20;
t3=t21;
t4=t22;
goto loop;}
else{
if(C_truep(C_i_char_greaterp(C_u_i_car(t5),C_u_i_cdr(t6)))){
/* irregex-core.scm:3833: diff */
t19=t1;
t20=t2;
t21=C_u_i_cdr(t3);
t22=t4;
t1=t19;
t2=t20;
t3=t21;
t4=t22;
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:3836: diff */
t19=t1;
t20=C_u_i_cdr(t2);
t21=t3;
t22=t4;
t1=t19;
t2=t20;
t3=t21;
t4=t22;
goto loop;}
else{
t11=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_27761,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_unfix(t15);
t17=C_make_character(t16);
t18=t11;
f_27761(t18,C_a_i_cons(&a,2,t12,t17));}
else{
t12=t11;
f_27761(t12,C_SCHEME_FALSE);}}}}}}}

/* k27696 in diff in k27680 in k27676 in chicken.irregex#cset-difference in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27698(C_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_27698,c,av);}
/* irregex-core.scm:3824: scheme#list->vector */
t2=*((C_word*)lf[410]+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);}}

/* k27709 in diff in k27680 in k27676 in chicken.irregex#cset-difference in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27711(C_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_27711,c,av);}
/* irregex-core.scm:3825: scheme#list->vector */
t2=*((C_word*)lf[410]+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);}}

/* k27713 in diff in k27680 in k27676 in chicken.irregex#cset-difference in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27715(C_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_27715,c,av);}
/* irregex-core.scm:3825: scheme#append */
t2=*((C_word*)lf[74]+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);}}

/* k27759 in diff in k27680 in k27676 in chicken.irregex#cset-difference in k19305 in k7970 in k7739 in k7736 */
static void f_27761(C_word t0,C_word t1){
C_word tmp;
C_word 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,2)))){
C_save_and_reclaim_args((void *)trf_27761,2,t0,t1);}
a=C_alloc(16);
t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_27764,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_unfix(t5);
t7=C_make_character(t6);
t8=C_u_i_cdr(((C_word*)t0)[7]);
t9=t2;
f_27764(t9,C_a_i_cons(&a,2,t7,t8));}
else{
t3=t2;
f_27764(t3,C_SCHEME_FALSE);}}

/* k27762 in k27759 in diff in k27680 in k27676 in chicken.irregex#cset-difference in k19305 in k7970 in k7739 in k7736 */
static void f_27764(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_27764,2,t0,t1);}
a=C_alloc(10);
t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_27771,a[2]=((C_word*)t0)[2],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_27771(t4,C_a_i_cons(&a,2,t1,t3));}
else{
t3=t2;
f_27771(t3,C_u_i_cdr(((C_word*)t0)[7]));}}

/* k27769 in k27762 in k27759 in diff in k27680 in k27676 in chicken.irregex#cset-difference in k19305 in k7970 in k7739 in k7736 */
static void f_27771(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_27771,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:3843: diff */
t3=((C_word*)((C_word*)t0)[4])[1];
f_27684(t3,((C_word*)t0)[5],t1,((C_word*)t0)[6],t2);}
else{
/* irregex-core.scm:3843: diff */
t2=((C_word*)((C_word*)t0)[4])[1];
f_27684(t2,((C_word*)t0)[5],t1,((C_word*)t0)[6],((C_word*)t0)[3]);}}

/* chicken.irregex#cset-intersection in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27866(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_27866,c,av);}
a=C_alloc(4);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27874,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3854: scheme#vector->list */
t5=*((C_word*)lf[164]+1);{
C_word *av2=av;
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k27872 in chicken.irregex#cset-intersection in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27874(C_word c,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_27874,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_27878,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3855: scheme#vector->list */
t3=*((C_word*)lf[164]+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);}}

/* k27876 in k27872 in chicken.irregex#cset-intersection in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27878(C_word c,C_word *av){
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_27878,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_27880,a[2]=t3,a[3]=((C_word)li335),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_27880(t5,((C_word*)t0)[2],((C_word*)t0)[3],t1,C_SCHEME_END_OF_LIST);}

/* intersect in k27876 in k27872 in chicken.irregex#cset-intersection in k19305 in k7970 in k7739 in k7736 */
static void f_27880(C_word t0,C_word 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_27880,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_27897,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3858: ##sys#fast-reverse */
t8=C_fast_retrieve(lf[70]);{
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:3863: 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:3865: 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:3869: intersect */
t25=t1;
t26=t20;
t27=t22;
t28=t23;
t1=t25;
t2=t26;
t3=t27;
t4=t28;
goto loop;}}}}

/* k27895 in intersect in k27876 in k27872 in chicken.irregex#cset-intersection in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_27897(C_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_27897,c,av);}
/* irregex-core.scm:3858: scheme#list->vector */
t2=*((C_word*)lf[410]+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 k19305 in k7970 in k7739 in k7736 */
static void f_27992(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_27992,2,t1,t2);}
a=C_alloc(4);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28000,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3876: sre->cset */
f_26881(t3,C_retrieve2(lf[53],C_text("chicken.irregex#*all-chars*")),C_SCHEME_END_OF_LIST);}

/* k27998 in chicken.irregex#cset-complement in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28000(C_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_28000,c,av);}
/* irregex-core.scm:3876: cset-difference */
f_27670(((C_word*)t0)[2],t1,((C_word*)t0)[3]);}

/* chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
static void f_28002(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_28002,2,t1,t2);}
a=C_alloc(3);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28010,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3880: scheme#vector->list */
t4=*((C_word*)lf[164]+1);{
C_word av2[3];
av2[0]=t4;
av2[1]=t3;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* k28008 in chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28010(C_word c,C_word *av){
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_28010,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_28012,a[2]=t3,a[3]=((C_word)li338),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_28012(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}

/* lp in k28008 in chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
static void f_28012(C_word t0,C_word 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_28012,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_28026,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3881: ##sys#fast-reverse */
t5=C_fast_retrieve(lf[70]);{
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_28032,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_28032(t7,C_u_i_char_alphabeticp(C_u_i_cdr(t6)));}
else{
t6=t4;
f_28032(t6,C_SCHEME_FALSE);}}}

/* k28024 in lp in k28008 in chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28026(C_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_28026,c,av);}
/* irregex-core.scm:3881: scheme#list->vector */
t2=*((C_word*)lf[410]+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);}}

/* k28030 in lp in k28008 in chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
static void f_28032(C_word t0,C_word t1){
C_word tmp;
C_word 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_28032,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_28041,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_28045,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28049,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28053,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_28077,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_28087,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3887: ##sys#fast-reverse */
t9=C_fast_retrieve(lf[70]);{
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_28096,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_28100,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28104,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28108,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_28118,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3892: ##sys#fast-reverse */
t8=C_fast_retrieve(lf[70]);{
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);}}}

/* k28039 in k28030 in lp in k28008 in chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28041(C_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_28041,c,av);}
/* irregex-core.scm:3884: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_28012(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* k28043 in k28030 in lp in k28008 in chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28045(C_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_28045,c,av);}
/* irregex-core.scm:3885: ##sys#fast-reverse */
t2=C_fast_retrieve(lf[70]);{
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);}}

/* k28047 in k28030 in lp in k28008 in chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28049(C_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_28049,c,av);}
/* irregex-core.scm:3886: scheme#vector->list */
t2=*((C_word*)lf[164]+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);}}

/* k28051 in k28030 in lp in k28008 in chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28053(C_word c,C_word *av){
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_28053,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:3887: cset-union */
t10=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
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_27469(4,av2);}}

/* k28075 in k28030 in lp in k28008 in chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28077(C_word c,C_word *av){
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_28077,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:3887: cset-union */
t4=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
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_27469(4,av2);}}

/* k28085 in k28030 in lp in k28008 in chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28087(C_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_28087,c,av);}
/* irregex-core.scm:3887: scheme#list->vector */
t2=*((C_word*)lf[410]+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);}}

/* k28094 in k28030 in lp in k28008 in chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28096(C_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_28096,c,av);}
/* irregex-core.scm:3891: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_28012(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* k28098 in k28030 in lp in k28008 in chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
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 *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(0,c,2)))){
C_save_and_reclaim((void *)f_28100,c,av);}
/* irregex-core.scm:3891: ##sys#fast-reverse */
t2=C_fast_retrieve(lf[70]);{
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);}}

/* k28102 in k28030 in lp in k28008 in chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28104(C_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_28104,c,av);}
/* irregex-core.scm:3891: scheme#vector->list */
t2=*((C_word*)lf[164]+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);}}

/* k28106 in k28030 in lp in k28008 in chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28108(C_word c,C_word *av){
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_28108,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:3892: cset-union */
t4=C_retrieve2(lf[163],C_text("chicken.irregex#cset-union"));{
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_27469(4,av2);}}

/* k28116 in k28030 in lp in k28008 in chicken.irregex#cset-case-insensitive in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28118(C_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_28118,c,av);}
/* irregex-core.scm:3892: scheme#list->vector */
t2=*((C_word*)lf[410]+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 k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28133(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_28133,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_28137,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:3899: chicken.base#error */
t9=*((C_word*)lf[30]+1);{
C_word *av2=av;
av2[0]=t9;
av2[1]=t7;
av2[2]=lf[412];
av2[3]=lf[415];
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_28137(2,av2);}}}

/* k28135 in chicken.irregex#irregex-fold/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28137(C_word c,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_28137,c,av);}
a=C_alloc(8);
t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_28140,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=C_SCHEME_UNDEFINED,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:3900: irregex */
t3=C_fast_retrieve(lf[218]);{
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);}}

/* k28138 in k28135 in chicken.irregex#irregex-fold/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28140(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_28140,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+4,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28143,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3901: irregex-new-matches */
f_7831(t3,((C_word*)t0)[4]);}

/* k28141 in k28138 in k28135 in chicken.irregex#irregex-fold/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28143(C_word c,C_word *av){
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,4)))){
C_save_and_reclaim((void *)f_28143,c,av);}
a=C_alloc(13);
t2=((C_word*)t0)[2];
t3=C_i_pairp(((C_word*)t2)[2]);
t4=(C_truep(t3)?C_u_i_car(((C_word*)t2)[2]):C_SCHEME_FALSE);
t5=(C_truep(t4)?t4:(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28334,a[2]=((C_word)li340),tmp=(C_word)a,a+=3,tmp));
t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_28152,a[2]=((C_word*)t2)[3],a[3]=t1,a[4]=t5,a[5]=((C_word*)t2)[4],a[6]=((C_word*)t2)[5],a[7]=((C_word*)t2)[6],a[8]=((C_word*)t2)[7],a[9]=((C_word*)t2)[2],tmp=(C_word)a,a+=10,tmp);
if(C_truep(C_i_pairp(((C_word*)t2)[2]))){
t7=C_i_pairp(C_u_i_cdr(((C_word*)t2)[2]));
t8=t6;
f_28152(t8,(C_truep(t7)?C_i_cadr(((C_word*)t2)[2]):C_fix(0)));}
else{
t7=t6;
f_28152(t7,C_fix(0));}}

/* k28150 in k28141 in k28138 in k28135 in chicken.irregex#irregex-fold/fast in k19305 in k7970 in k7739 in k7736 */
static void f_28152(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(13,0,2)))){
C_save_and_reclaim_args((void *)trf_28152,2,t0,t1);}
a=C_alloc(13);
t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_28155,a[2]=((C_word*)t0)[3],a[3]=C_SCHEME_UNDEFINED,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_SCHEME_UNDEFINED,a[9]=((C_word*)t0)[7],a[10]=C_SCHEME_UNDEFINED,a[11]=t1,a[12]=((C_word*)t0)[8],tmp=(C_word)a,a+=13,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_28155(t5,(C_truep(t4)?C_i_caddr(((C_word*)t0)[9]):C_i_string_length(((C_word*)t0)[2])));}
else{
t3=t2;
f_28155(t3,C_i_string_length(((C_word*)t0)[2]));}}
else{
t3=t2;
f_28155(t3,C_i_string_length(((C_word*)t0)[2]));}}

/* k28153 in k28150 in k28141 in k28138 in k28135 in chicken.irregex#irregex-fold/fast in k19305 in k7970 in k7739 in k7736 */
static void f_28155(C_word t0,C_word t1){
C_word tmp;
C_word 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(15,0,4)))){
C_save_and_reclaim_args((void *)trf_28155,2,t0,t1);}
a=C_alloc(15);
t2=C_mutate(((C_word *)t0)+3,t1);
t3=C_a_i_list3(&a,3,((C_word*)t0)[6],((C_word*)t0)[11],((C_word*)t0)[3]);
t4=C_mutate(((C_word *)t0)+10,t3);
t5=C_a_i_cons(&a,2,((C_word*)t0)[10],((C_word*)t0)[11]);
t6=C_mutate(((C_word *)t0)+8,t5);
t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28164,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(C_i_integerp(((C_word*)t0)[11]))){
t8=C_i_exactp(((C_word*)t0)[11]);
if(C_truep(C_i_not(t8))){
/* irregex-core.scm:3910: chicken.base#error */
t9=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t9;
av2[1]=t7;
av2[2]=lf[412];
av2[3]=lf[414];
av2[4]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t9+1)))(5,av2);}}
else{
t9=t7;{
C_word av2[2];
av2[0]=t9;
av2[1]=C_SCHEME_UNDEFINED;
f_28164(2,av2);}}}
else{
/* irregex-core.scm:3910: chicken.base#error */
t8=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t8;
av2[1]=t7;
av2[2]=lf[412];
av2[3]=lf[414];
av2[4]=((C_word*)t0)[11];
((C_proc)(void*)(*((C_word*)t8+1)))(5,av2);}}}

/* k28162 in k28153 in k28150 in k28141 in k28138 in k28135 in chicken.irregex#irregex-fold/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28164(C_word c,C_word *av){
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_28164,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28167,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
if(C_truep(C_i_integerp(((C_word*)t2)[3]))){
t4=C_i_exactp(((C_word*)t2)[3]);
if(C_truep(C_i_not(t4))){
/* irregex-core.scm:3912: 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]=t3;
av2[2]=lf[412];
av2[3]=lf[413];
av2[4]=((C_word*)t2)[3];
((C_proc)(void*)(*((C_word*)t5+1)))(5,av2);}}
else{
t5=t3;{
C_word *av2=av;
av2[0]=t5;
av2[1]=C_SCHEME_UNDEFINED;
f_28167(2,av2);}}}
else{
/* irregex-core.scm:3912: 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[412];
av2[3]=lf[413];
av2[4]=((C_word*)t2)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(5,av2);}}}

/* k28165 in k28162 in k28153 in k28150 in k28141 in k28138 in k28135 in chicken.irregex#irregex-fold/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28167(C_word c,C_word *av){
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,6)))){
C_save_and_reclaim((void *)f_28167,c,av);}
a=C_alloc(13);
t2=((C_word*)t0)[2];
t3=C_retrieve2(lf[286],C_text("chicken.irregex#irregex-basic-string-chunker"));
t4=C_i_setslot(((C_word*)t2)[2],C_fix(3),C_retrieve2(lf[286],C_text("chicken.irregex#irregex-basic-string-chunker")));
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|10,a[1]=(C_word)f_28175,a[2]=((C_word*)t2)[3],a[3]=((C_word*)t2)[4],a[4]=((C_word*)t2)[5],a[5]=((C_word*)t2)[6],a[6]=t6,a[7]=((C_word*)t2)[2],a[8]=((C_word*)t2)[7],a[9]=((C_word*)t2)[8],a[10]=((C_word)li341),tmp=(C_word)a,a+=11,tmp));
t8=((C_word*)t6)[1];
f_28175(t8,((C_word*)t2)[9],((C_word*)t2)[10],((C_word*)t2)[11],((C_word*)t2)[11],((C_word*)t2)[12]);}

/* lp in k28165 in k28162 in k28153 in k28150 in k28141 in k28138 in k28135 in chicken.irregex#irregex-fold/fast in k19305 in k7970 in k7739 in k7736 */
static void f_28175(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5){
C_word tmp;
C_word t6;
C_word t7;
C_word *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(12,0,7)))){
C_save_and_reclaim_args((void *)trf_28175,6,t0,t1,t2,t3,t4,t5);}
a=C_alloc(12);
if(C_truep(C_fixnum_greater_or_equal_p(t4,((C_word*)t0)[2]))){
/* irregex-core.scm:3916: finish */
t6=((C_word*)t0)[3];{
C_word av2[4];
av2[0]=t6;
av2[1]=t1;
av2[2]=t3;
av2[3]=t5;
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}
else{
t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_28188,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t3,a[5]=t5,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:3917: irregex-search/matches */
f_19442(t6,((C_word*)t0)[4],C_retrieve2(lf[286],C_text("chicken.irregex#irregex-basic-string-chunker")),((C_word*)t0)[9],t2,t4,((C_word*)t0)[7]);}}

/* k28186 in lp in k28165 in k28162 in k28153 in k28150 in k28141 in k28138 in k28135 in chicken.irregex#irregex-fold/fast in k19305 in k7970 in k7739 in k7736 */
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 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,4)))){
C_save_and_reclaim((void *)f_28188,c,av);}
a=C_alloc(11);
if(C_truep(C_i_not(t1))){
/* irregex-core.scm:3925: 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_slot(t2,C_fix(1));
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=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_28223,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t6,a[6]=t3,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:3928: kons */
t8=((C_word*)t0)[11];{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t8;
av2[1]=t7;
av2[2]=((C_word*)t0)[4];
av2[3]=t1;
av2[4]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t8+1)))(5,av2);}}}

/* k28221 in k28186 in lp in k28165 in k28162 in k28153 in k28150 in k28141 in k28138 in k28135 in chicken.irregex#irregex-fold/fast in k19305 in k7970 in k7739 in k7736 */
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;
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_28223,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_28226,a[2]=((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:3929: irregex-reset-matches! */
f_7854(t2,((C_word*)t0)[10]);}

/* k28224 in k28221 in k28186 in lp in k28165 in k28162 in k28153 in k28150 in k28141 in k28138 in k28135 in chicken.irregex#irregex-fold/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28226(C_word c,C_word *av){
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,5)))){
C_save_and_reclaim((void *)f_28226,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:3932: 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_a_i_list3(&a,3,((C_word*)t0)[8],((C_word*)t0)[5],((C_word*)t0)[9]);
/* irregex-core.scm:3935: lp */
t7=((C_word*)((C_word*)t0)[10])[1];
f_28175(t7,((C_word*)t0)[4],t6,((C_word*)t0)[5],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:3937: lp */
t7=((C_word*)((C_word*)t0)[10])[1];
f_28175(t7,((C_word*)t0)[4],t6,((C_word*)t0)[5],((C_word*)t0)[5],((C_word*)t0)[6]);}}}

/* f_28334 in k28141 in k28138 in k28135 in chicken.irregex#irregex-fold/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28334(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_28334,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 k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28351(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_28351,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_28355,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[412];
av2[3]=lf[417];
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_28355(2,av2);}}}

/* k28353 in chicken.irregex#irregex-fold in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28355(C_word c,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_28355,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28356,a[2]=((C_word*)t0)[2],a[3]=((C_word)li343),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]=C_retrieve2(lf[411],C_text("chicken.irregex#irregex-fold/fast"));
av2[3]=((C_word*)t0)[4];
av2[4]=t2;
av2[5]=((C_word*)t0)[5];
C_apply(6,av2);}}

/* kons2 in k28353 in chicken.irregex#irregex-fold in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28356(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_28356,c,av);}
a=C_alloc(6);
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28364,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:3941: irregex-copy-matches */
f_7863(t5,t3);}

/* k28362 in kons2 in k28353 in chicken.irregex#irregex-fold in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28364(C_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_28364,c,av);}
/* irregex-core.scm:3941: 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 k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28379(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 +9,c,2)))){
C_save_and_reclaim((void*)f_28379,c,av);}
a=C_alloc((c-7)*C_SIZEOF_PAIR+9);
t7=C_build_rest(&a,c,7,av);
C_word t8;
C_word t9;
t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_28383,a[2]=t7,a[3]=t6,a[4]=t5,a[5]=C_SCHEME_UNDEFINED,a[6]=t3,a[7]=t1,a[8]=t4,tmp=(C_word)a,a+=9,tmp);
/* irregex-core.scm:3945: irregex */
t9=C_fast_retrieve(lf[218]);{
C_word *av2=av;
av2[0]=t9;
av2[1]=t8;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t9+1)))(3,av2);}}

/* k28381 in chicken.irregex#irregex-fold/chunked/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28383(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_28383,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+5,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28386,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:3946: irregex-new-matches */
f_7831(t3,((C_word*)t0)[5]);}

/* k28384 in k28381 in chicken.irregex#irregex-fold/chunked/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28386(C_word c,C_word *av){
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(15,c,5)))){
C_save_and_reclaim((void *)f_28386,c,av);}
a=C_alloc(15);
t2=((C_word*)t0)[2];
t3=C_i_pairp(((C_word*)t2)[2]);
t4=(C_truep(t3)?C_u_i_car(((C_word*)t2)[2]):C_SCHEME_FALSE);
t5=(C_truep(t4)?t4:(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28554,a[2]=((C_word)li345),tmp=(C_word)a,a+=3,tmp));
t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_28395,a[2]=t1,a[3]=((C_word*)t2)[4],a[4]=t5,a[5]=((C_word*)t2)[5],a[6]=((C_word*)t2)[6],a[7]=C_SCHEME_UNDEFINED,a[8]=((C_word*)t2)[7],a[9]=((C_word*)t2)[3],a[10]=C_SCHEME_UNDEFINED,a[11]=((C_word*)t2)[8],tmp=(C_word)a,a+=12,tmp);
t7=C_i_pairp(((C_word*)t2)[2]);
t8=(C_truep(t7)?C_i_pairp(C_u_i_cdr(((C_word*)t2)[2])):C_SCHEME_FALSE);
if(C_truep(t8)){
t9=t6;{
C_word *av2=av;
av2[0]=t9;
av2[1]=C_i_cadr(((C_word*)t2)[2]);
f_28395(2,av2);}}
else{
/* irregex-core.scm:3948: g5742 */
t9=C_i_vector_ref(((C_word*)t2)[4],C_fix(2));{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t9;
av2[1]=t6;
av2[2]=((C_word*)t2)[3];
((C_proc)(void*)(*((C_word*)t9+1)))(3,av2);}}}

/* k28393 in k28384 in k28381 in chicken.irregex#irregex-fold/chunked/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28395(C_word c,C_word *av){
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_28395,c,av);}
a=C_alloc(6);
t2=C_mutate(((C_word *)t0)+10,t1);
t3=C_a_i_cons(&a,2,((C_word*)t0)[9],((C_word*)t0)[10]);
t4=C_mutate(((C_word *)t0)+7,t3);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28401,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(C_i_not(C_i_integerp(((C_word*)t0)[10])))){
/* irregex-core.scm:3952: 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]=t5;
av2[2]=lf[419];
av2[3]=lf[420];
av2[4]=((C_word*)t0)[10];
((C_proc)(void*)(*((C_word*)t6+1)))(5,av2);}}
else{
t6=t5;{
C_word *av2=av;
av2[0]=t6;
av2[1]=C_SCHEME_UNDEFINED;
f_28401(2,av2);}}}

/* k28399 in k28393 in k28384 in k28381 in chicken.irregex#irregex-fold/chunked/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28401(C_word c,C_word *av){
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,5)))){
C_save_and_reclaim((void *)f_28401,c,av);}
a=C_alloc(12);
t2=((C_word*)t0)[2];
t3=C_i_setslot(((C_word*)t2)[2],C_fix(3),((C_word*)t2)[3]);
t4=C_SCHEME_UNDEFINED;
t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
t6=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_28409,a[2]=((C_word*)t2)[4],a[3]=((C_word*)t2)[3],a[4]=t5,a[5]=((C_word*)t2)[5],a[6]=((C_word*)t2)[2],a[7]=((C_word*)t2)[6],a[8]=((C_word*)t2)[7],a[9]=((C_word)li346),tmp=(C_word)a,a+=10,tmp));
t7=((C_word*)t5)[1];
f_28409(t7,((C_word*)t2)[8],((C_word*)t2)[9],((C_word*)t2)[10],((C_word*)t2)[11]);}

/* lp in k28399 in k28393 in k28384 in k28381 in chicken.irregex#irregex-fold/chunked/fast in k19305 in k7970 in k7739 in k7736 */
static void f_28409(C_word 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_28409,5,t0,t1,t2,t3,t4);}
a=C_alloc(12);
if(C_truep(C_i_not(t2))){
/* irregex-core.scm:3956: 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_28422,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:3957: irregex-search/matches */
f_19442(t5,((C_word*)t0)[5],((C_word*)t0)[3],((C_word*)t0)[8],t2,t3,((C_word*)t0)[6]);}}

/* k28420 in lp in k28399 in k28393 in k28384 in k28381 in chicken.irregex#irregex-fold/chunked/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28422(C_word c,C_word *av){
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_28422,c,av);}
a=C_alloc(9);
if(C_truep(C_i_not(t1))){
/* irregex-core.scm:3959: 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_28496,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:3963: g5757 */
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_28499,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:3967: 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);}}}}

/* k28470 in k28494 in k28420 in lp in k28399 in k28393 in k28384 in k28381 in chicken.irregex#irregex-fold/chunked/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28472(C_word c,C_word *av){
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_28472,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_28482,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:3965: g5762 */
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);}}

/* k28480 in k28470 in k28494 in k28420 in lp in k28399 in k28393 in k28384 in k28381 in chicken.irregex#irregex-fold/chunked/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28482(C_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_28482,c,av);}
/* irregex-core.scm:3965: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_28409(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1,((C_word*)t0)[5]);}

/* k28494 in k28420 in lp in k28399 in k28393 in k28384 in k28381 in chicken.irregex#irregex-fold/chunked/fast in k19305 in k7970 in k7739 in k7736 */
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;
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_28496,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_28472,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:3964: g5760 */
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:3966: lp */
t2=((C_word*)((C_word*)t0)[4])[1];
f_28409(t2,((C_word*)t0)[5],((C_word*)t0)[7],C_fixnum_plus(((C_word*)t0)[2],C_fix(1)),((C_word*)t0)[6]);}}

/* k28497 in k28420 in lp in k28399 in k28393 in k28384 in k28381 in chicken.irregex#irregex-fold/chunked/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28499(C_word c,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_28499,c,av);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_28502,a[2]=((C_word*)t0)[2],a[3]=((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:3968: irregex-reset-matches! */
f_7854(t2,((C_word*)t0)[8]);}

/* k28500 in k28497 in k28420 in lp in k28399 in k28393 in k28384 in k28381 in chicken.irregex#irregex-fold/chunked/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28502(C_word c,C_word *av){
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_28502,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:3970: 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:3971: lp */
t5=((C_word*)((C_word*)t0)[8])[1];
f_28409(t5,((C_word*)t0)[4],((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[7]);}}

/* f_28554 in k28384 in k28381 in chicken.irregex#irregex-fold/chunked/fast in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28554(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_28554,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 k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28561(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_28561,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_28565,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:3974: 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[419];
av2[3]=lf[422];
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_28565(2,av2);}}}

/* k28563 in chicken.irregex#irregex-fold/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28565(C_word c,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_28565,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28566,a[2]=((C_word*)t0)[2],a[3]=((C_word)li348),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]=C_retrieve2(lf[418],C_text("chicken.irregex#irregex-fold/chunked/fast"));
av2[3]=((C_word*)t0)[4];
av2[4]=t2;
av2[5]=((C_word*)t0)[5];
C_apply(6,av2);}}

/* kons2 in k28563 in chicken.irregex#irregex-fold/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28566(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_28566,c,av);}
a=C_alloc(7);
t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_28574,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:3975: irregex-copy-matches */
f_7863(t6,t4);}

/* k28572 in kons2 in k28563 in chicken.irregex#irregex-fold/chunked in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28574(C_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_28574,c,av);}
/* irregex-core.scm:3975: 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 k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28589(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_28589,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_28593,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:3979: 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[425];
av2[3]=lf[426];
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_28593(2,av2);}}}

/* k28591 in chicken.irregex#irregex-replace in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28593(C_word c,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_28593,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28596,a[2]=((C_word*)t0)[2],a[3]=C_SCHEME_UNDEFINED,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:3980: irregex-search */
t3=C_fast_retrieve(lf[287]);{
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);}}

/* k28594 in k28591 in chicken.irregex#irregex-replace in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28596(C_word c,C_word *av){
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_28596,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+3,t1);
if(C_truep(((C_word*)t0)[3])){
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28610,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
t4=C_slot(((C_word*)t0)[3],C_fix(1));
t5=C_fixnum_times(C_fix(0),C_fix(4));
/* irregex-core.scm:3983: 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]=t3;
av2[2]=((C_word*)t0)[4];
av2[3]=C_slot(t4,C_fixnum_plus(C_fix(3),t5));
av2[4]=C_u_i_string_length(((C_word*)t0)[4]);
((C_proc)(void*)(*((C_word*)t6+1)))(5,av2);}}
else{
t3=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t3;
av2[1]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}}

/* k28608 in k28594 in k28591 in chicken.irregex#irregex-replace in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28610(C_word c,C_word *av){
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_28610,c,av);}
a=C_alloc(9);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28614,a[2]=t1,a[3]=((C_word*)t2)[2],tmp=(C_word)a,a+=4,tmp);
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_28618,a[2]=t3,a[3]=((C_word*)t2)[3],a[4]=((C_word*)t2)[4],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:3984: irregex-apply-match */
f_28758(t4,((C_word*)t2)[3],((C_word*)t2)[5]);}

/* k28612 in k28608 in k28594 in k28591 in chicken.irregex#irregex-replace in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28614(C_word c,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_28614,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,((C_word*)t0)[2],t1);
/* irregex-core.scm:3982: string-cat-reverse */
f_9317(((C_word*)t0)[3],t2);}

/* k28616 in k28608 in k28594 in k28591 in chicken.irregex#irregex-replace in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28618(C_word c,C_word *av){
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_28618,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28626,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:3985: 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);}}

/* k28624 in k28616 in k28608 in k28594 in k28591 in chicken.irregex#irregex-replace in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28626(C_word c,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_28626,c,av);}
a=C_alloc(3);
t2=C_a_i_list1(&a,1,t1);
/* irregex-core.scm:3984: scheme#append */
t3=*((C_word*)lf[74]+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 k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28665(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_28665,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_28669,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:3990: 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[428];
av2[3]=lf[429];
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_28669(2,av2);}}}

/* k28667 in chicken.irregex#irregex-replace/all in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28669(C_word c,C_word *av){
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_28669,c,av);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_28674,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word)li351),tmp=(C_word)a,a+=5,tmp);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28725,a[2]=((C_word*)t0)[3],a[3]=((C_word)li352),tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3991: irregex-fold/fast */
t4=C_retrieve2(lf[411],C_text("chicken.irregex#irregex-fold/fast"));{
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)[3];
av2[6]=t3;
f_28133(7,av2);}}

/* a28673 in k28667 in chicken.irregex#irregex-replace/all in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28674(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 *a;
if(c!=5) C_bad_argc_2(c,5,t0);
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(7,c,3)))){
C_save_and_reclaim((void *)f_28674,c,av);}
a=C_alloc(7);
t5=C_slot(t3,C_fix(1));
t6=C_slot(t5,C_fix(1));
if(C_truep(C_fixnum_greater_or_equal_p(t2,t6))){
t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28708,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:3996: irregex-apply-match */
f_28758(t7,t3,((C_word*)t0)[2]);}
else{
t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_28715,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=t6,tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:3997: irregex-apply-match */
f_28758(t7,t3,((C_word*)t0)[2]);}}

/* k28706 in a28673 in k28667 in chicken.irregex#irregex-replace/all in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28708(C_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_28708,c,av);}
/* irregex-core.scm:3996: scheme#append */
t2=*((C_word*)lf[74]+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);}}

/* k28713 in a28673 in k28667 in chicken.irregex#irregex-replace/all in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28715(C_word c,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_28715,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_28723,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:3998: 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);}}

/* k28721 in k28713 in a28673 in k28667 in chicken.irregex#irregex-replace/all in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28723(C_word c,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_28723,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:3997: scheme#append */
t3=*((C_word*)lf[74]+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);}}

/* a28724 in k28667 in chicken.irregex#irregex-replace/all in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28725(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_28725,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:4003: string-cat-reverse */
f_9317(t1,t3);}
else{
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_28746,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:4005: 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);}}}

/* k28744 in a28724 in k28667 in chicken.irregex#irregex-replace/all in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28746(C_word c,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_28746,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:4003: string-cat-reverse */
f_9317(((C_word*)t0)[3],t2);}

/* chicken.irregex#irregex-apply-match in k19305 in k7970 in k7739 in k7736 */
static void f_28758(C_word 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_28758,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_28764,a[2]=t5,a[3]=t2,a[4]=((C_word)li355),tmp=(C_word)a,a+=5,tmp));
t7=((C_word*)t5)[1];
f_28764(t7,t1,t3,C_SCHEME_END_OF_LIST);}

/* lp in chicken.irregex#irregex-apply-match in k19305 in k7970 in k7739 in k7736 */
static void f_28764(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_28764,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_28791,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:4014: irregex-match-substring */
t7=C_fast_retrieve(lf[40]);{
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_28816,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:4016: g5818 */
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[431]);
if(C_truep(t6)){
t7=C_u_i_cdr(t2);
t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_28842,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:4021: 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[432]);
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_28906,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:4028: 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_28968,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:4034: 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:4039: lp */
t16=t1;
t17=t5;
t18=t7;
t1=t16;
t2=t17;
t3=t18;
goto loop;}}}}}

/* k28789 in lp in chicken.irregex#irregex-apply-match in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28791(C_word c,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_28791,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[430],((C_word*)t0)[2]));
/* irregex-core.scm:4013: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_28764(t3,((C_word*)t0)[4],((C_word*)t0)[5],t2);}

/* k28814 in lp in chicken.irregex#irregex-apply-match in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28816(C_word c,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_28816,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:4016: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_28764(t3,((C_word*)t0)[4],((C_word*)t0)[5],t2);}

/* k28840 in lp in chicken.irregex#irregex-apply-match in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28842(C_word c,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_28842,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:4020: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_28764(t3,((C_word*)t0)[4],((C_word*)t0)[5],t2);}

/* k28904 in lp in chicken.irregex#irregex-apply-match in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28906(C_word c,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_28906,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:4027: lp */
t3=((C_word*)((C_word*)t0)[3])[1];
f_28764(t3,((C_word*)t0)[4],((C_word*)t0)[5],t2);}

/* g5845 in k28966 in lp in chicken.irregex#irregex-apply-match in k19305 in k7970 in k7739 in k7736 */
static void f_28938(C_word 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_28938,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:4035: lp */
t6=((C_word*)((C_word*)t0)[3])[1];
f_28764(t6,t1,t5,((C_word*)t0)[4]);}

/* k28966 in lp in chicken.irregex#irregex-apply-match in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28968(C_word c,C_word *av){
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_28968,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_28938,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li354),tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:4033: g5845 */
t4=t3;
f_28938(t4,((C_word*)t0)[6],t2);}
else{
/* irregex-core.scm:4037: 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[433];
av2[3]=C_u_i_car(((C_word*)t0)[3]);
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}}

/* chicken.irregex#irregex-extract in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28989(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_28989,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_28993,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:4042: 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[435];
av2[3]=lf[436];
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_28993(2,av2);}}}

/* k28991 in chicken.irregex#irregex-extract in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28993(C_word c,C_word *av){
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_28993,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_28998,a[2]=((C_word)li357),tmp=(C_word)a,a+=3,tmp);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29008,a[2]=((C_word)li358),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]=C_retrieve2(lf[411],C_text("chicken.irregex#irregex-fold/fast"));
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);}}

/* a28997 in k28991 in chicken.irregex#irregex-extract in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_28998(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_28998,c,av);}
a=C_alloc(4);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29006,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:4045: irregex-match-substring */
t6=C_fast_retrieve(lf[40]);{
C_word *av2=av;
av2[0]=t6;
av2[1]=t5;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k29004 in a28997 in k28991 in chicken.irregex#irregex-extract in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29006(C_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_29006,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);}}

/* a29007 in k28991 in chicken.irregex#irregex-extract in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29008(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_29008,c,av);}
/* irregex-core.scm:4048: ##sys#fast-reverse */
t4=C_fast_retrieve(lf[70]);{
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 k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29024(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_29024,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_29028,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:4052: 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[439];
av2[3]=lf[440];
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_29028(2,av2);}}}

/* k29026 in chicken.irregex#irregex-split in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29028(C_word c,C_word *av){
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_29028,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_29034,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_29034(t6,(C_truep(t5)?C_i_cadr(((C_word*)t0)[2]):C_i_string_length(((C_word*)t0)[3])));}
else{
t5=t4;
f_29034(t5,C_i_string_length(((C_word*)t0)[3]));}}

/* k29032 in k29026 in chicken.irregex#irregex-split in k19305 in k7970 in k7739 in k7736 */
static void f_29034(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_29034,2,t0,t1);}
a=C_alloc(9);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29039,a[2]=((C_word*)t0)[2],a[3]=((C_word)li360),tmp=(C_word)a,a+=4,tmp);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29097,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word)li362),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:4055: irregex-fold/fast */
t4=C_retrieve2(lf[411],C_text("chicken.irregex#irregex-fold/fast"));{
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_28133(9,av2);}}

/* a29038 in k29032 in k29026 in chicken.irregex#irregex-split in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29039(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 *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_29039,c,av);}
a=C_alloc(4);
t5=C_slot(t3,C_fix(1));
t6=C_slot(t5,C_fix(1));
t7=C_eqp(t2,t6);
if(C_truep(t7)){
t8=t1;{
C_word *av2=av;
av2[0]=t8;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t8+1)))(2,av2);}}
else{
t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29053,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
t9=C_slot(t3,C_fix(1));
/* irregex-core.scm:4062: scheme#substring */
t10=*((C_word*)lf[46]+1);{
C_word *av2=av;
av2[0]=t10;
av2[1]=t8;
av2[2]=((C_word*)t0)[2];
av2[3]=t2;
av2[4]=C_slot(t9,C_fix(1));
((C_proc)(void*)(*((C_word*)t10+1)))(5,av2);}}}

/* k29051 in a29038 in k29032 in k29026 in chicken.irregex#irregex-split in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29053(C_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_29053,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);}}

/* a29096 in k29032 in k29026 in chicken.irregex#irregex-split in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29097(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_29097,c,av);}
a=C_alloc(7);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29105,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_29105(t6,t3);}
else{
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29188,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:4066: 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);}}}

/* k29103 in a29096 in k29032 in k29026 in chicken.irregex#irregex-split in k19305 in k7970 in k7739 in k7736 */
static void f_29105(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_29105,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_29107,a[2]=t3,a[3]=((C_word)li361),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_29107(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}

/* lp in k29103 in a29096 in k29032 in k29026 in chicken.irregex#irregex-split in k19305 in k7970 in k7739 in k7736 */
static void f_29107(C_word t0,C_word 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(14,0,4)))){
C_save_and_reclaim_args((void *)trf_29107,5,t0,t1,t2,t3,t4);}
a=C_alloc(14);
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:4072: 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_29148,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:4075: scheme#string-append */
t11=*((C_word*)lf[438]+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:4078: lp */
t12=t1;
t13=t6;
t14=t8;
t15=C_SCHEME_FALSE;
t1=t12;
t2=t13;
t3=t14;
t4=t15;
goto loop;}}}

/* k29146 in lp in k29103 in a29096 in k29032 in k29026 in chicken.irregex#irregex-split in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29148(C_word c,C_word *av){
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_29148,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:4072: lp */
t4=((C_word*)((C_word*)t0)[3])[1];
f_29107(t4,((C_word*)t0)[4],((C_word*)t0)[5],t3,C_SCHEME_TRUE);}

/* k29186 in a29096 in k29032 in k29026 in chicken.irregex#irregex-split in k19305 in k7970 in k7739 in k7736 */
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 *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(3,c,1)))){
C_save_and_reclaim((void *)f_29188,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
f_29105(t2,C_a_i_cons(&a,2,t1,((C_word*)t0)[3]));}

/* chicken.irregex#string-scan-char in k19305 in k7970 in k7739 in k7736 */
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=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_29222,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_29235,a[2]=t5,a[3]=t2,a[4]=t3,a[5]=t9,a[6]=((C_word)li364),tmp=(C_word)a,a+=7,tmp));
t11=((C_word*)t9)[1];
f_29235(t11,t1,t7);}

/* scan in chicken.irregex#string-scan-char in k19305 in k7970 in k7739 in k7736 */
static void f_29235(C_word t0,C_word t1,C_word t2){
C_word 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_29235,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 k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29265(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_29265,c,av);}
a=C_alloc(6);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29273,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29277,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
/* ##sys#string->list */
t5=C_fast_retrieve(lf[106]);{
C_word *av2=av;
av2[0]=t5;
av2[1]=t4;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k29271 in chicken.irregex#irregex-quote in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29273(C_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_29273,c,av);}
/* ##sys#list->string */
t2=C_fast_retrieve(lf[442]);{
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);}}

/* k29275 in chicken.irregex#irregex-quote in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29277(C_word c,C_word *av){
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_29277,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_29279,a[2]=t3,a[3]=((C_word)li366),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_29279(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}

/* loop in k29275 in chicken.irregex#irregex-quote in k19305 in k7970 in k7739 in k7736 */
static void f_29279(C_word 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_29279,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_fast_retrieve(lf[70]);{
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_29298,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=C_retrieve2(lf[55],C_text("chicken.irregex#string-scan-char"));{
C_word av2[4];
av2[0]=t6;
av2[1]=t5;
av2[2]=lf[443];
av2[3]=t4;
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}}

/* k29296 in loop in k29275 in chicken.irregex#irregex-quote in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29298(C_word c,C_word *av){
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_29298,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_29279(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_29279(t4,((C_word*)t0)[6],t2,t3);}}

/* chicken.irregex#irregex-opt in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29322(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_29322,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[445];
((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_29459,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);}}}}

/* k29337 in k29494 in lp2 in lp1 in k29457 in chicken.irregex#irregex-opt in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29339(C_word c,C_word *av){
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_29339,c,av);}
a=C_alloc(9);
t2=((C_word*)t0)[2];
if(C_truep(t1)){
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29346,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[3],tmp=(C_word)a,a+=4,tmp);
/* ##sys#list->string */
t4=C_fast_retrieve(lf[442]);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t3=C_a_i_cons(&a,2,lf[104],((C_word*)t2)[4]);
t4=((C_word*)t2)[2];{
C_word *av2=av;
av2[0]=t4;
av2[1]=(C_truep(((C_word*)t2)[3])?C_a_i_list(&a,2,lf[132],t3):t3);
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}}

/* k29344 in k29337 in k29494 in lp2 in lp1 in k29457 in chicken.irregex#irregex-opt in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29346(C_word c,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_29346,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[132],t2):t2);
((C_proc)(void*)(*((C_word*)t3+1)))(2,av2);}}

/* k29367 in k29540 in lp2 in lp1 in k29457 in chicken.irregex#irregex-opt in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29369(C_word c,C_word *av){
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_29369,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_29390,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_29392,a[2]=t4,a[3]=t8,a[4]=t5,a[5]=((C_word)li368),tmp=(C_word)a,a+=6,tmp));
t10=((C_word*)t8)[1];
f_29392(t10,t6,((C_word*)t0)[3]);}
else{
t2=C_a_i_cons(&a,2,lf[116],((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_29476(t4,((C_word*)t0)[6],((C_word*)t0)[7],t3);}}

/* k29388 in k29367 in k29540 in lp2 in lp1 in k29457 in chicken.irregex#irregex-opt in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29390(C_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_29390,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[438]+1);
av2[3]=t1;
C_apply(4,av2);}}

/* map-loop6146 in k29367 in k29540 in lp2 in lp1 in k29457 in chicken.irregex#irregex-opt in k19305 in k7970 in k7739 in k7736 */
static void f_29392(C_word 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(17,0,2)))){
C_save_and_reclaim_args((void *)trf_29392,3,t0,t1,t2);}
a=C_alloc(17);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29402,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_29402(t6,C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST));}
else{
t5=t3;
f_29402(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);}}}

/* k29400 in map-loop6146 in k29367 in k29540 in lp2 in lp1 in k29457 in chicken.irregex#irregex-opt in k19305 in k7970 in k7739 in k7736 */
static void f_29402(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_29402,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_29392(t4,((C_word*)t0)[4],C_slot(((C_word*)t0)[5],C_fix(1)));}

/* a29428 in k29540 in lp2 in lp1 in k29457 in chicken.irregex#irregex-opt in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29429(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_29429,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);}}

/* k29457 in chicken.irregex#irregex-opt in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29459(C_word c,C_word *av){
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_29459,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_29464,a[2]=t1,a[3]=t3,a[4]=((C_word)li371),tmp=(C_word)a,a+=5,tmp));
t5=((C_word*)t3)[1];
f_29464(t5,((C_word*)t0)[2],((C_word*)t0)[3],C_SCHEME_FALSE);}

/* lp1 in k29457 in chicken.irregex#irregex-opt in k19305 in k7970 in k7739 in k7736 */
static void f_29464(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_29464,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_29476,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=((C_word)li370),tmp=(C_word)a,a+=6,tmp));
t7=((C_word*)t5)[1];
f_29476(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_29578,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 k29457 in chicken.irregex#irregex-opt in k19305 in k7970 in k7739 in k7736 */
static void f_29476(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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(19,0,3)))){
C_save_and_reclaim_args((void *)trf_29476,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|4,a[1]=(C_word)f_29496,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:47: ##sys#fast-reverse */
t6=C_fast_retrieve(lf[70]);{
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_unfix(t2);
t6=C_make_character(t5);
t7=C_i_vector_ref(((C_word*)t0)[3],t2);
t8=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
if(C_truep(C_i_nullp(t7))){
/* irregex-utils.scm:51: lp2 */
t12=t1;
t13=t8;
t14=t3;
t1=t12;
t2=t13;
t3=t14;
goto loop;}
else{
if(C_truep(C_i_equalp(t7,lf[447]))){
t9=C_a_i_cons(&a,2,t6,t3);
/* irregex-utils.scm:51: lp2 */
t12=t1;
t13=t8;
t14=t9;
t1=t12;
t2=t13;
t3=t14;
goto loop;}
else{
t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29534,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=t8,tmp=(C_word)a,a+=6,tmp);
t10=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_29542,a[2]=t6,a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=t1,a[6]=t8,a[7]=t9,tmp=(C_word)a,a+=8,tmp);
/* irregex-utils.scm:55: irregex-opt */
t11=C_fast_retrieve(lf[444]);{
C_word av2[3];
av2[0]=t11;
av2[1]=t10;
av2[2]=t7;
((C_proc)(void*)(*((C_word*)t11+1)))(3,av2);}}}}}

/* k29494 in lp2 in lp1 in k29457 in chicken.irregex#irregex-opt in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29496(C_word c,C_word *av){
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_29496,c,av);}
a=C_alloc(6);
t2=C_mutate(((C_word *)t0)+4,t1);
t3=C_i_cdr(((C_word*)t0)[4]);
if(C_truep(C_i_nullp(t3))){
t4=C_u_i_car(((C_word*)t0)[4]);
t5=((C_word*)t0)[2];{
C_word *av2=av;
av2[0]=t5;
av2[1]=(C_truep(((C_word*)t0)[3])?C_a_i_list(&a,2,lf[132],t4):t4);
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29339,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-utils.scm:31: every */
f_9549(t4,*((C_word*)lf[446]+1),((C_word*)t0)[4]);}}

/* k29532 in lp2 in lp1 in k29457 in chicken.irregex#irregex-opt in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29534(C_word c,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_29534,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_29476(t3,((C_word*)t0)[4],((C_word*)t0)[5],t2);}

/* k29540 in lp2 in lp1 in k29457 in chicken.irregex#irregex-opt in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29542(C_word c,C_word *av){
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_29542,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_29476(t6,((C_word*)t0)[5],((C_word*)t0)[6],t5);}
else{
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_29369,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_29429,a[2]=((C_word)li369),tmp=(C_word)a,a+=3,tmp);
/* irregex-utils.scm:35: every */
f_9549(t4,t5,t2);}}

/* k29576 in lp1 in k29457 in chicken.irregex#irregex-opt in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29578(C_word c,C_word *av){
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_29578,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_29464(t5,((C_word*)t0)[5],C_u_i_cdr(((C_word*)t0)[6]),((C_word*)t0)[7]);}

/* chicken.irregex#cset->string in k19305 in k7970 in k7739 in k7736 */
static void f_29592(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_29592,2,t1,t2);}
a=C_alloc(4);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29596,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-utils.scm:71: scheme#open-output-string */
t4=C_fast_retrieve(lf[452]);{
C_word av2[2];
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* k29594 in chicken.irregex#cset->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29596(C_word c,C_word *av){
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_29596,c,av);}
a=C_alloc(11);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29599,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_29604,a[2]=t4,a[3]=t1,a[4]=((C_word)li373),tmp=(C_word)a,a+=5,tmp));
t6=((C_word*)t4)[1];
f_29604(t6,t2,((C_word*)t0)[3]);}

/* k29597 in k29594 in chicken.irregex#cset->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29599(C_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_29599,c,av);}
/* irregex-utils.scm:82: scheme#get-output-string */
t2=C_fast_retrieve(lf[449]);{
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 k29594 in chicken.irregex#cset->string in k19305 in k7970 in k7739 in k7736 */
static void f_29604(C_word t0,C_word t1,C_word 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(22,0,2)))){
C_save_and_reclaim_args((void *)trf_29604,3,t0,t1,t2);}
a=C_alloc(22);
if(C_truep(C_i_pairp(t2))){
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29614,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_29625,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_29647,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_fast_retrieve(lf[441]);{
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_29662,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_fast_retrieve(lf[441]);{
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);}}}

/* k29612 in lp in k29594 in chicken.irregex#cset->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29614(C_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_29614,c,av);}
/* irregex-utils.scm:81: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_29604(t2,((C_word*)t0)[3],C_u_i_cdr(((C_word*)t0)[4]));}

/* k29623 in lp in k29594 in chicken.irregex#cset->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29625(C_word c,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_29625,c,av);}
a=C_alloc(3);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29628,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* ##sys#write-char/port */
t3=C_fast_retrieve(lf[451]);{
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);}}

/* k29626 in k29623 in lp in k29594 in chicken.irregex#cset->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29628(C_word c,C_word *av){
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_29628,c,av);}
a=C_alloc(12);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29635,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[3],tmp=(C_word)a,a+=4,tmp);
t4=C_i_cdar(((C_word*)t2)[4]);
t5=C_a_i_string(&a,1,t4);
/* irregex-utils.scm:79: irregex-quote */
t6=C_fast_retrieve(lf[441]);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t6;
av2[1]=t3;
av2[2]=t5;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k29633 in k29626 in k29623 in lp in k29594 in chicken.irregex#cset->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29635(C_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_29635,c,av);}
/* irregex-utils.scm:79: scheme#display */
t2=*((C_word*)lf[450]+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);}}

/* k29645 in lp in k29594 in chicken.irregex#cset->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29647(C_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_29647,c,av);}
/* irregex-utils.scm:77: scheme#display */
t2=*((C_word*)lf[450]+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);}}

/* k29660 in lp in k29594 in chicken.irregex#cset->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29662(C_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_29662,c,av);}
/* irregex-utils.scm:80: scheme#display */
t2=*((C_word*)lf[450]+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 k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29672(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_29672,c,av);}
a=C_alloc(4);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29676,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-utils.scm:85: scheme#open-output-string */
t4=C_fast_retrieve(lf[452]);{
C_word *av2=av;
av2[0]=t4;
av2[1]=t3;
((C_proc)(void*)(*((C_word*)t4+1)))(2,av2);}}

/* k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29676(C_word c,C_word *av){
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_29676,c,av);}
a=C_alloc(12);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29679,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_29684,a[2]=t1,a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=((C_word)li383),tmp=(C_word)a,a+=6,tmp));
t6=((C_word*)t4)[1];
f_29684(t6,t2,((C_word*)t0)[3]);}

/* k29677 in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29679(C_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_29679,c,av);}
/* irregex-utils.scm:153: scheme#get-output-string */
t2=C_fast_retrieve(lf[449]);{
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 k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void f_29684(C_word t0,C_word t1,C_word t2){
C_word tmp;
C_word t3;
C_word t4;
C_word t5;
C_word t6;
C_word 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_29684,3,t0,t1,t2);}
a=C_alloc(12);
if(C_truep(C_i_pairp(t2))){
t3=C_u_i_car(t2);
t4=C_eqp(t3,lf[228]);
t5=(C_truep(t4)?t4:C_eqp(t3,lf[116]));
if(C_truep(t5)){
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29707,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_29707(t9,(C_truep(t8)?C_i_not(C_eqp(t2,((C_word*)t0)[4])):C_SCHEME_FALSE));}
else{
t7=t6;
f_29707(t7,C_SCHEME_FALSE);}}
else{
t6=C_eqp(t3,lf[109]);
if(C_truep(t6)){
t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29804,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[450]+1);{
C_word av2[4];
av2[0]=t8;
av2[1]=t7;
av2[2]=lf[457];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t8+1)))(4,av2);}}
else{
t7=C_eqp(t3,lf[121]);
if(C_truep(t7)){
t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29846,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[450]+1);{
C_word av2[4];
av2[0]=t9;
av2[1]=t8;
av2[2]=lf[460];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t9+1)))(4,av2);}}
else{
t8=C_eqp(t3,lf[104]);
if(C_truep(t8)){
t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29900,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[450]+1);{
C_word av2[4];
av2[0]=t10;
av2[1]=t9;
av2[2]=lf[463];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t10+1)))(4,av2);}}
else{
t9=C_eqp(t3,lf[128]);
t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_29959,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_29959(t11,t9);}
else{
t11=C_eqp(t3,lf[130]);
if(C_truep(t11)){
t12=t10;
f_29959(t12,t11);}
else{
t12=C_eqp(t3,lf[132]);
if(C_truep(t12)){
t13=t10;
f_29959(t13,t12);}
else{
t13=C_eqp(t3,lf[129]);
t14=t10;
f_29959(t14,(C_truep(t13)?t13:C_eqp(t3,lf[133])));}}}}}}}}
else{
if(C_truep(C_i_symbolp(t2))){
t3=C_eqp(t2,lf[187]);
t4=(C_truep(t3)?t3:C_eqp(t2,lf[196]));
if(C_truep(t4)){
/* irregex-utils.scm:143: scheme#display */
t5=*((C_word*)lf[450]+1);{
C_word av2[4];
av2[0]=t5;
av2[1]=t1;
av2[2]=lf[482];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}
else{
t5=C_eqp(t2,lf[188]);
t6=(C_truep(t5)?t5:C_eqp(t2,lf[197]));
if(C_truep(t6)){
/* irregex-utils.scm:144: scheme#display */
t7=*((C_word*)lf[450]+1);{
C_word av2[4];
av2[0]=t7;
av2[1]=t1;
av2[2]=lf[483];
av2[3]=((C_word*)t0)[2];
((C_proc)(void*)(*((C_word*)t7+1)))(4,av2);}}
else{
t7=C_eqp(t2,lf[125]);
t8=(C_truep(t7)?t7:C_eqp(t2,lf[126]));
if(C_truep(t8)){
/* irregex-utils.scm:145: scheme#display */
t9=*((C_word*)lf[450]+1);{
C_word av2[4];
av2[0]=t9;
av2[1]=t1;
av2[2]=lf[484];
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[485];
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_30433,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
/* irregex-utils.scm:148: irregex-quote */
t4=C_fast_retrieve(lf[441]);{
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_30446,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_fast_retrieve(lf[441]);{
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[486];
av2[3]=t2;
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}}}}}

/* k29705 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void f_29707(C_word t0,C_word 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_29707,2,t0,t1);}
a=C_alloc(7);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29710,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-utils.scm:93: scheme#display */
t3=*((C_word*)lf[450]+1);{
C_word av2[4];
av2[0]=t3;
av2[1]=t2;
av2[2]=lf[455];
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[307]);
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_29752,a[2]=t5,a[3]=((C_word*)t0)[5],a[4]=((C_word)li376),tmp=(C_word)a,a+=5,tmp));
t7=((C_word*)t5)[1];
f_29752(t7,((C_word*)t0)[3],t2);}}

/* k29708 in k29705 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29710(C_word c,C_word *av){
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,3)))){
C_save_and_reclaim((void *)f_29710,c,av);}
a=C_alloc(11);
t2=((C_word*)t0)[2];
t3=C_u_i_cdr(((C_word*)t2)[2]);
t4=C_i_check_list_2(t3,lf[307]);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29717,a[2]=((C_word*)t2)[3],a[3]=((C_word*)t2)[4],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_29722,a[2]=t7,a[3]=((C_word*)t2)[5],a[4]=((C_word)li375),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
f_29722(t9,t5,t3);}

/* k29715 in k29708 in k29705 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29717(C_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_29717,c,av);}
/* irregex-utils.scm:93: scheme#display */
t2=*((C_word*)lf[450]+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-loop6249 in k29708 in k29705 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void f_29722(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_29722,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_29732,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:93: g6250 */
t4=((C_word*)((C_word*)t0)[3])[1];
f_29684(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);}}}

/* k29730 in for-each-loop6249 in k29708 in k29705 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29732(C_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_29732,c,av);}
t2=((C_word*)((C_word*)t0)[2])[1];
f_29722(t2,((C_word*)t0)[3],C_slot(((C_word*)t0)[4],C_fix(1)));}

/* for-each-loop6268 in k29705 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void f_29752(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_29752,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_29762,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:94: g6269 */
t4=((C_word*)((C_word*)t0)[3])[1];
f_29684(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);}}}

/* k29760 in for-each-loop6268 in k29705 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29762(C_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_29762,c,av);}
t2=((C_word*)((C_word*)t0)[2])[1];
f_29752(t2,((C_word*)t0)[3],C_slot(((C_word*)t0)[4],C_fix(1)));}

/* k29802 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29804(C_word c,C_word *av){
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_29804,c,av);}
a=C_alloc(11);
t2=C_u_i_cdr(((C_word*)t0)[2]);
t3=C_i_check_list_2(t2,lf[307]);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29811,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_29816,a[2]=t6,a[3]=((C_word*)t0)[5],a[4]=((C_word)li377),tmp=(C_word)a,a+=5,tmp));
t8=((C_word*)t6)[1];
f_29816(t8,t4,t2);}

/* k29809 in k29802 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29811(C_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_29811,c,av);}
/* irregex-utils.scm:96: scheme#display */
t2=*((C_word*)lf[450]+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-loop6285 in k29802 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void f_29816(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_29816,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_29826,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:96: g6286 */
t4=((C_word*)((C_word*)t0)[3])[1];
f_29684(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);}}}

/* k29824 in for-each-loop6285 in k29802 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29826(C_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_29826,c,av);}
t2=((C_word*)((C_word*)t0)[2])[1];
f_29816(t2,((C_word*)t0)[3],C_slot(((C_word*)t0)[4],C_fix(1)));}

/* k29844 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29846(C_word c,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_29846,c,av);}
a=C_alloc(3);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29849,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-utils.scm:98: scheme#display */
t3=*((C_word*)lf[450]+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);}}

/* k29847 in k29844 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29849(C_word c,C_word *av){
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_29849,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29852,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-utils.scm:98: scheme#display */
t4=*((C_word*)lf[450]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=lf[459];
av2[3]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}

/* k29850 in k29847 in k29844 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29852(C_word c,C_word *av){
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,3)))){
C_save_and_reclaim((void *)f_29852,c,av);}
a=C_alloc(11);
t2=((C_word*)t0)[2];
t3=C_i_cddr(((C_word*)t2)[2]);
t4=C_i_check_list_2(t3,lf[307]);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29861,a[2]=((C_word*)t2)[3],a[3]=((C_word*)t2)[4],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_29866,a[2]=t7,a[3]=((C_word*)t2)[5],a[4]=((C_word)li378),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
f_29866(t9,t5,t3);}

/* k29859 in k29850 in k29847 in k29844 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29861(C_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_29861,c,av);}
/* irregex-utils.scm:99: scheme#display */
t2=*((C_word*)lf[450]+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[458];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* for-each-loop6304 in k29850 in k29847 in k29844 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void f_29866(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_29866,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_29876,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:99: g6305 */
t4=((C_word*)((C_word*)t0)[3])[1];
f_29684(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);}}}

/* k29874 in for-each-loop6304 in k29850 in k29847 in k29844 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29876(C_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_29876,c,av);}
t2=((C_word*)((C_word*)t0)[2])[1];
f_29866(t2,((C_word*)t0)[3],C_slot(((C_word*)t0)[4],C_fix(1)));}

/* k29898 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29900(C_word c,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_29900,c,av);}
a=C_alloc(3);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29903,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-utils.scm:102: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_29684(t3,t2,C_i_cadr(((C_word*)t0)[4]));}

/* k29901 in k29898 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29903(C_word c,C_word *av){
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_29903,c,av);}
a=C_alloc(16);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29904,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[3],a[4]=((C_word)li379),tmp=(C_word)a,a+=5,tmp);
t4=C_i_cddr(((C_word*)t2)[4]);
t5=C_i_check_list_2(t4,lf[307]);
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29920,a[2]=((C_word*)t2)[5],a[3]=((C_word*)t2)[3],tmp=(C_word)a,a+=4,tmp);
t7=C_SCHEME_UNDEFINED;
t8=(*a=C_VECTOR_TYPE|1,a[1]=t7,tmp=(C_word)a,a+=2,tmp);
t9=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29925,a[2]=t8,a[3]=t3,a[4]=((C_word)li380),tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
f_29925(t10,t6,t4);}

/* g6326 in k29901 in k29898 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void f_29904(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_29904,3,t0,t1,t2);}
a=C_alloc(5);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29908,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[450]+1);{
C_word av2[4];
av2[0]=t4;
av2[1]=t3;
av2[2]=lf[461];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}

/* k29906 in g6326 in k29901 in k29898 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29908(C_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_29908,c,av);}
/* irregex-utils.scm:103: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_29684(t2,((C_word*)t0)[3],((C_word*)t0)[4]);}

/* k29918 in k29901 in k29898 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29920(C_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_29920,c,av);}
/* irregex-utils.scm:104: scheme#display */
t2=*((C_word*)lf[450]+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-loop6325 in k29901 in k29898 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void f_29925(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_29925,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_29935,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:103: g6326 */
t4=((C_word*)t0)[3];
f_29904(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);}}}

/* k29933 in for-each-loop6325 in k29901 in k29898 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29935(C_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_29935,c,av);}
t2=((C_word*)((C_word*)t0)[2])[1];
f_29925(t2,((C_word*)t0)[3],C_slot(((C_word*)t0)[4],C_fix(1)));}

/* k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void f_29959(C_word t0,C_word t1){
C_word tmp;
C_word 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,0,3)))){
C_save_and_reclaim_args((void *)trf_29959,2,t0,t1);}
a=C_alloc(11);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_29962,a[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]);
t4=C_i_pairp(t3);
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_29973,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);
if(C_truep(t4)){
t6=t5;
f_29973(t6,t4);}
else{
t6=C_u_i_cdr(((C_word*)t0)[3]);
if(C_truep(C_i_stringp(C_u_i_car(t6)))){
t7=C_u_i_cdr(((C_word*)t0)[3]);
t8=C_i_string_length(C_u_i_car(t7));
t9=t5;
f_29973(t9,C_i_not(C_eqp(C_fix(1),t8)));}
else{
t7=t5;
f_29973(t7,C_SCHEME_FALSE);}}}
else{
t2=C_eqp(((C_word*)t0)[6],lf[466]);
if(C_truep(t2)){
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_30056,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_30086,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
/* irregex-utils.scm:113: scheme#caadr */
t6=*((C_word*)lf[472]+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_30056(t5,C_SCHEME_FALSE);}}
else{
t3=C_eqp(((C_word*)t0)[6],lf[471]);
if(C_truep(t3)){
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_30099,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[450]+1);{
C_word av2[4];
av2[0]=t5;
av2[1]=t4;
av2[2]=lf[474];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}
else{
t4=C_eqp(((C_word*)t0)[6],lf[248]);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_30120,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
if(C_truep(t4)){
t6=t5;
f_30120(t6,t4);}
else{
t6=C_eqp(((C_word*)t0)[6],lf[235]);
if(C_truep(t6)){
t7=t5;
f_30120(t7,t6);}
else{
t7=C_eqp(((C_word*)t0)[6],lf[52]);
t8=t5;
f_30120(t8,(C_truep(t7)?t7:C_eqp(((C_word*)t0)[6],lf[180])));}}}}}}

/* k29960 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29962(C_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_29962,c,av);}
/* irregex-utils.scm:110: scheme#display */
t2=*((C_word*)lf[450]+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);}}

/* k29971 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void f_29973(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_29973,2,t0,t1);}
a=C_alloc(3);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_29976,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-utils.scm:108: scheme#display */
t3=*((C_word*)lf[450]+1);{
C_word av2[4];
av2[0]=t3;
av2[1]=t2;
av2[2]=lf[465];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t3+1)))(4,av2);}}
else{
/* irregex-utils.scm:109: lp */
t2=((C_word*)((C_word*)t0)[5])[1];
f_29684(t2,((C_word*)t0)[3],C_i_cadr(((C_word*)t0)[2]));}}

/* k29974 in k29971 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29976(C_word c,C_word *av){
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,3)))){
C_save_and_reclaim((void *)f_29976,c,av);}
a=C_alloc(11);
t2=((C_word*)t0)[2];
t3=C_u_i_cdr(((C_word*)t2)[2]);
t4=C_i_check_list_2(t3,lf[307]);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_29983,a[2]=((C_word*)t2)[3],a[3]=((C_word*)t2)[4],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_29988,a[2]=t7,a[3]=((C_word*)t2)[5],a[4]=((C_word)li381),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
f_29988(t9,t5,t3);}

/* k29981 in k29974 in k29971 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29983(C_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_29983,c,av);}
/* irregex-utils.scm:108: scheme#display */
t2=*((C_word*)lf[450]+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[464];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* for-each-loop6367 in k29974 in k29971 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void f_29988(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_29988,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_29998,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:108: g6368 */
t4=((C_word*)((C_word*)t0)[3])[1];
f_29684(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);}}}

/* k29996 in for-each-loop6367 in k29974 in k29971 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_29998(C_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_29998,c,av);}
t2=((C_word*)((C_word*)t0)[2])[1];
f_29988(t2,((C_word*)t0)[3],C_slot(((C_word*)t0)[4],C_fix(1)));}

/* k30054 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void f_30056(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_30056,2,t0,t1);}
a=C_alloc(3);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_30059,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-utils.scm:114: scheme#display */
t3=*((C_word*)lf[450]+1);{
C_word av2[4];
av2[0]=t3;
av2[1]=t2;
av2[2]=lf[469];
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[470];
av2[3]=((C_word*)t0)[4];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}}

/* k30057 in k30054 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30059(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_30059,c,av);}
a=C_alloc(11);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_30062,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[3],tmp=(C_word)a,a+=4,tmp);
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_30069,a[2]=t3,a[3]=((C_word*)t2)[3],tmp=(C_word)a,a+=4,tmp);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_30073,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
/* irregex-utils.scm:115: scheme#cdadr */
t6=*((C_word*)lf[468]+1);{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t6;
av2[1]=t5;
av2[2]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k30060 in k30057 in k30054 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30062(C_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_30062,c,av);}
/* irregex-utils.scm:116: scheme#display */
t2=*((C_word*)lf[450]+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[467];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k30067 in k30057 in k30054 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30069(C_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_30069,c,av);}
/* irregex-utils.scm:115: scheme#display */
t2=*((C_word*)lf[450]+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);}}

/* k30071 in k30057 in k30054 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30073(C_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_30073,c,av);}
/* irregex-utils.scm:115: cset->string */
f_29592(((C_word*)t0)[2],t1);}

/* k30084 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30086(C_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_30086,c,av);}
t2=((C_word*)t0)[2];
f_30056(t2,C_eqp(lf[471],t1));}

/* k30097 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30099(C_word c,C_word *av){
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_30099,c,av);}
a=C_alloc(8);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_30102,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_30109,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
/* irregex-utils.scm:120: cset->string */
f_29592(t3,C_u_i_cdr(((C_word*)t0)[4]));}

/* k30100 in k30097 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30102(C_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_30102,c,av);}
/* irregex-utils.scm:121: scheme#display */
t2=*((C_word*)lf[450]+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);}}

/* k30107 in k30097 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30109(C_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_30109,c,av);}
/* irregex-utils.scm:120: scheme#display */
t2=*((C_word*)lf[450]+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);}}

/* k30118 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void f_30120(C_word t0,C_word 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(6,0,3)))){
C_save_and_reclaim_args((void *)trf_30120,2,t0,t1);}
a=C_alloc(6);
t2=((C_word*)t0)[2];
if(C_truep(t1)){
t3=C_eqp(C_make_character(126),C_u_i_car(((C_word*)t2)[3]));
t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_30129,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[4],a[4]=((C_word*)t2)[3],a[5]=((C_word*)t2)[5],tmp=(C_word)a,a+=6,tmp);
if(C_truep(t3)){
t5=t4;
f_30129(t5,t3);}
else{
t5=C_eqp(lf[248],C_u_i_car(((C_word*)t2)[3]));
if(C_truep(t5)){
t6=C_i_pairp(C_u_i_cdr(((C_word*)t2)[3]));
t7=t4;
f_30129(t7,(C_truep(t6)?C_eqp(lf[125],C_i_cadr(((C_word*)t2)[3])):C_SCHEME_FALSE));}
else{
t6=t4;
f_30129(t6,C_SCHEME_FALSE);}}}
else{
t3=C_eqp(((C_word*)t2)[6],lf[226]);
t4=(C_truep(t3)?t3:C_eqp(((C_word*)t2)[6],lf[227]));
if(C_truep(t4)){
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_30205,a[2]=((C_word*)t2)[3],a[3]=((C_word*)t2)[2],a[4]=((C_word*)t2)[4],a[5]=((C_word*)t2)[5],tmp=(C_word)a,a+=6,tmp);
/* irregex-utils.scm:132: scheme#display */
t6=*((C_word*)lf[450]+1);{
C_word av2[4];
av2[0]=t6;
av2[1]=t5;
av2[2]=lf[480];
av2[3]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}
else{
if(C_truep(C_i_stringp(C_u_i_car(((C_word*)t2)[3])))){
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_30269,a[2]=((C_word*)t2)[5],a[3]=((C_word*)t2)[2],tmp=(C_word)a,a+=4,tmp);
/* ##sys#string->list */
t6=C_fast_retrieve(lf[106]);{
C_word av2[3];
av2[0]=t6;
av2[1]=t5;
av2[2]=C_u_i_car(((C_word*)t2)[3]);
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}
else{
/* irregex-utils.scm:140: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t5;
av2[1]=((C_word*)t2)[2];
av2[2]=lf[481];
av2[3]=((C_word*)t2)[3];
((C_proc)(void*)(*((C_word*)t5+1)))(4,av2);}}}}}

/* k30127 in k30118 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void f_30129(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_30129,2,t0,t1);}
a=C_alloc(5);
if(C_truep(t1)){
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_30132,a[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[450]+1);{
C_word av2[4];
av2[0]=t3;
av2[1]=t2;
av2[2]=lf[476];
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_30167,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_26881(t2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}}

/* k30130 in k30127 in k30118 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30132(C_word c,C_word *av){
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_30132,c,av);}
a=C_alloc(8);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_30135,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_30142,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_29592(t3,C_u_i_cdr(((C_word*)t0)[4]));}
else{
/* irregex-utils.scm:127: cset->string */
f_29592(t3,C_i_cddr(((C_word*)t0)[4]));}}

/* k30133 in k30130 in k30127 in k30118 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30135(C_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_30135,c,av);}
/* irregex-utils.scm:128: scheme#display */
t2=*((C_word*)lf[450]+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);}}

/* k30140 in k30130 in k30127 in k30118 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30142(C_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_30142,c,av);}
/* irregex-utils.scm:127: scheme#display */
t2=*((C_word*)lf[450]+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);}}

/* k30165 in k30127 in k30118 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30167(C_word c,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_30167,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[471],t1);
/* irregex-utils.scm:130: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_29684(t3,((C_word*)t0)[3],t2);}

/* k30203 in k30118 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30205(C_word c,C_word *av){
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_30205,c,av);}
a=C_alloc(3);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_30208,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
t3=C_eqp(C_u_i_car(((C_word*)t0)[2]),lf[226]);
if(C_truep(t3)){
/* irregex-utils.scm:133: scheme#display */
t4=*((C_word*)lf[450]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=t2;
av2[2]=lf[479];
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_30208(2,av2);}}}

/* k30206 in k30203 in k30118 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30208(C_word c,C_word *av){
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_30208,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_30211,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-utils.scm:134: scheme#display */
t4=*((C_word*)lf[450]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=lf[478];
av2[3]=((C_word*)t2)[4];
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}

/* k30209 in k30206 in k30203 in k30118 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30211(C_word c,C_word *av){
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,3)))){
C_save_and_reclaim((void *)f_30211,c,av);}
a=C_alloc(11);
t2=((C_word*)t0)[2];
t3=C_u_i_cdr(((C_word*)t2)[2]);
t4=C_i_check_list_2(t3,lf[307]);
t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_30218,a[2]=((C_word*)t2)[3],a[3]=((C_word*)t2)[4],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_30223,a[2]=t7,a[3]=((C_word*)t2)[5],a[4]=((C_word)li382),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
f_30223(t9,t5,t3);}

/* k30216 in k30209 in k30206 in k30203 in k30118 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30218(C_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_30218,c,av);}
/* irregex-utils.scm:136: scheme#display */
t2=*((C_word*)lf[450]+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[477];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* for-each-loop6422 in k30209 in k30206 in k30203 in k30118 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void f_30223(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_30223,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_30233,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
/* irregex-utils.scm:135: g6423 */
t4=((C_word*)((C_word*)t0)[3])[1];
f_29684(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);}}}

/* k30231 in for-each-loop6422 in k30209 in k30206 in k30203 in k30118 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30233(C_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_30233,c,av);}
t2=((C_word*)((C_word*)t0)[2])[1];
f_30223(t2,((C_word*)t0)[3],C_slot(((C_word*)t0)[4],C_fix(1)));}

/* k30267 in k30118 in k29957 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30269(C_word c,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_30269,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,lf[471],t1);
/* irregex-utils.scm:139: lp */
t3=((C_word*)((C_word*)t0)[2])[1];
f_29684(t3,((C_word*)t0)[3],t2);}

/* k30431 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30433(C_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_30433,c,av);}
/* irregex-utils.scm:148: scheme#display */
t2=*((C_word*)lf[450]+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);}}

/* k30444 in lp in k29674 in chicken.irregex#sre->string in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30446(C_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_30446,c,av);}
/* irregex-utils.scm:150: scheme#display */
t2=*((C_word*)lf[450]+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 k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30456(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_30456,c,av);}
a=C_alloc(6);
t3=C_i_check_string_2(t2,lf[488]);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_30467,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_30471,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
/* ##sys#string->list */
t6=C_fast_retrieve(lf[106]);{
C_word *av2=av;
av2[0]=t6;
av2[1]=t5;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k30465 in chicken.irregex#glob->sre in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30467(C_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_30467,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[228],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* k30469 in chicken.irregex#glob->sre in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30471(C_word c,C_word *av){
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_30471,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_30473,a[2]=t3,a[3]=((C_word)li386),tmp=(C_word)a,a+=4,tmp));
t5=((C_word*)t3)[1];
f_30473(t5,((C_word*)t0)[2],t1,C_SCHEME_TRUE);}

/* loop in k30469 in chicken.irregex#glob->sre in k19305 in k7970 in k7739 in k7736 */
static void f_30473(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_30473,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[489]);
t7=C_a_i_list(&a,2,lf[180],t6);
t8=C_a_i_list(&a,1,lf[490]);
t9=C_a_i_list(&a,2,lf[180],t8);
t10=C_a_i_list(&a,2,lf[128],t9);
t11=C_a_i_list(&a,3,lf[228],t7,t10);
t12=C_a_i_list(&a,1,lf[491]);
t13=C_a_i_list(&a,2,lf[180],t12);
t14=C_a_i_list(&a,2,lf[128],t13);
t15=C_a_i_list(&a,3,lf[104],t11,t14);
t16=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_30504,a[2]=t1,a[3]=t15,tmp=(C_word)a,a+=4,tmp);
/* irregex.scm:237: 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[492]);
t7=C_a_i_list(&a,2,lf[180],t6);
t8=C_a_i_list(&a,2,lf[128],t7);
t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_30551,a[2]=t1,a[3]=t8,tmp=(C_word)a,a+=4,tmp);
/* irregex.scm:238: 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_30571,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex.scm:239: 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_30581,a[2]=((C_word*)t0)[2],a[3]=t7,a[4]=((C_word)li385),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
f_30581(t9,t1,t5,C_SCHEME_END_OF_LIST);}
else{
t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_30732,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
/* irregex.scm:261: loop */
t18=t6;
t19=t5;
t20=C_u_i_memq(t4,lf[494]);
t1=t18;
t2=t19;
t3=t20;
goto loop;}}}}}

/* k30502 in loop in k30469 in chicken.irregex#glob->sre in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30504(C_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_30504,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);}}

/* k30549 in loop in k30469 in chicken.irregex#glob->sre in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30551(C_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_30551,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);}}

/* k30569 in loop in k30469 in chicken.irregex#glob->sre in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30571(C_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_30571,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[125],t1);
((C_proc)(void*)(*((C_word*)t2+1)))(2,av2);}}

/* loop2 in loop in k30469 in chicken.irregex#glob->sre in k19305 in k7970 in k7739 in k7736 */
static void f_30581(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_30581,4,t0,t1,t2,t3);}
a=C_alloc(7);
t4=C_i_pairp(t2);
if(C_truep(C_i_not(t4))){
/* irregex.scm:243: chicken.base#error */
t5=*((C_word*)lf[30]+1);{
C_word av2[5];
av2[0]=t5;
av2[1]=t1;
av2[2]=lf[488];
av2[3]=lf[493];
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[104],t3):C_i_car(t3));
t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_30608,a[2]=t1,a[3]=t8,tmp=(C_word)a,a+=4,tmp);
/* irregex.scm:249: loop */
t10=((C_word*)((C_word*)t0)[2])[1];
f_30473(t10,t9,C_u_i_cdr(t2),C_SCHEME_FALSE);}
else{
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_30630,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_30630(t9,C_i_char_equalp(C_make_character(45),C_u_i_car(t8)));}
else{
t8=t6;
f_30630(t8,C_SCHEME_FALSE);}}
else{
t7=t6;
f_30630(t7,C_SCHEME_FALSE);}}}}

/* k30606 in loop2 in loop in k30469 in chicken.irregex#glob->sre in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30608(C_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_30608,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);}}

/* k30628 in loop2 in loop in k30469 in chicken.irregex#glob->sre in k19305 in k7970 in k7739 in k7736 */
static void f_30630(C_word t0,C_word t1){
C_word tmp;
C_word 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_30630,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:253: loop2 */
t9=((C_word*)((C_word*)t0)[4])[1];
f_30581(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[180],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_30581(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:260: loop2 */
t7=((C_word*)((C_word*)t0)[4])[1];
f_30581(t7,((C_word*)t0)[5],t4,t6);}}}

/* k30730 in loop in k30469 in chicken.irregex#glob->sre in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_30732(C_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_30732,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);}}

/* a31196 in k19305 in k7970 in k7739 in k7736 */
static void C_ccall f_31197(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_31197,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[180],t4);
t6=C_a_i_list(&a,3,lf[116],t2,lf[125]);
t7=C_a_i_list(&a,3,lf[104],t5,t6);
t8=t1;{
C_word *av2=av;
av2[0]=t8;
av2[1]=C_a_i_list(&a,2,lf[128],t7);
((C_proc)(void*)(*((C_word*)t8+1)))(2,av2);}}

/* a31491 in k7970 in k7739 in k7736 */
static void C_ccall f_31492(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_31492,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);}}

/* a31494 in k7970 in k7739 in k7736 */
static void C_ccall f_31495(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_31495,c,av);}
/* irregex-core.scm:1972: 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);}}

/* a31591 in k7739 in k7736 */
static void C_ccall f_31592(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(5,c,2)))){
C_save_and_reclaim((void *)f_31592,c,av);}
a=C_alloc(5);
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_31596,a[2]=t1,a[3]=t3,a[4]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:163: 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);}}

/* k31594 in a31591 in k7739 in k7736 */
static void C_ccall f_31596(C_word c,C_word *av){
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_31596,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+4,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_31599,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:164: scheme#display */
t4=*((C_word*)lf[450]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=lf[501];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}

/* k31597 in k31594 in a31591 in k7739 in k7736 */
static void C_ccall f_31599(C_word c,C_word *av){
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_31599,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_31602,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:165: scheme#display */
t4=*((C_word*)lf[450]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=((C_word*)t2)[4];
av2[3]=((C_word*)t2)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}

/* k31600 in k31597 in k31594 in a31591 in k7739 in k7736 */
static void C_ccall f_31602(C_word c,C_word *av){
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_31602,c,av);}
a=C_alloc(3);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_31605,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:166: scheme#display */
t4=*((C_word*)lf[450]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t4;
av2[1]=t3;
av2[2]=lf[500];
av2[3]=((C_word*)t2)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(4,av2);}}

/* k31603 in k31600 in k31597 in k31594 in a31591 in k7739 in k7736 */
static void C_ccall f_31605(C_word c,C_word *av){
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(4,c,3)))){
C_save_and_reclaim((void *)f_31605,c,av);}
a=C_alloc(4);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_31608,a[2]=((C_word*)t2)[2],a[3]=((C_word*)t2)[3],tmp=(C_word)a,a+=4,tmp);
t4=C_eqp(((C_word*)t2)[4],C_fix(0));
t5=(C_truep(t4)?t4:C_fixnum_greaterp(((C_word*)t2)[4],C_fix(1)));
if(C_truep(t5)){
/* irregex-core.scm:167: scheme#display */
t6=*((C_word*)lf[450]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t6;
av2[1]=t3;
av2[2]=lf[499];
av2[3]=((C_word*)t2)[3];
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}
else{
/* irregex-core.scm:168: scheme#display */
t6=*((C_word*)lf[450]+1);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t6;
av2[1]=((C_word*)t2)[2];
av2[2]=lf[498];
av2[3]=((C_word*)t2)[3];
((C_proc)(void*)(*((C_word*)t6+1)))(4,av2);}}}

/* k31606 in k31603 in k31600 in k31597 in k31594 in a31591 in k7739 in k7736 */
static void C_ccall f_31608(C_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_31608,c,av);}
/* irregex-core.scm:168: scheme#display */
t2=*((C_word*)lf[450]+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[498];
av2[3]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t2+1)))(4,av2);}}

/* k7736 */
static void C_ccall f_7738(C_word c,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_7738,c,av);}
a=C_alloc(3);
t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7741,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);}}

/* k7739 in k7736 */
static void C_ccall f_7741(C_word c,C_word *av){
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,4)))){
C_save_and_reclaim((void *)f_7741,c,av);}
a=C_alloc(36);
t2=C_mutate(&lf[2] /* (set! chicken.irregex#%vector-copy ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7749,a[2]=((C_word)li0),tmp=(C_word)a,a+=3,tmp));
t3=C_mutate((C_word*)lf[5]+1 /* (set! chicken.irregex#irregex? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7762,a[2]=((C_word)li1),tmp=(C_word)a,a+=3,tmp));
t4=C_mutate((C_word*)lf[7]+1 /* (set! chicken.irregex#irregex-num-submatches ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7804,a[2]=((C_word)li2),tmp=(C_word)a,a+=3,tmp));
t5=C_mutate((C_word*)lf[9]+1 /* (set! chicken.irregex#irregex-names ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7822,a[2]=((C_word)li3),tmp=(C_word)a,a+=3,tmp));
t6=C_mutate(&lf[11] /* (set! chicken.irregex#irregex-new-matches ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7831,a[2]=((C_word)li4),tmp=(C_word)a,a+=3,tmp));
t7=C_mutate(&lf[13] /* (set! chicken.irregex#irregex-reset-matches! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7854,a[2]=((C_word)li5),tmp=(C_word)a,a+=3,tmp));
t8=C_mutate(&lf[15] /* (set! chicken.irregex#irregex-copy-matches ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7863,a[2]=((C_word)li6),tmp=(C_word)a,a+=3,tmp));
t9=C_mutate((C_word*)lf[16]+1 /* (set! chicken.irregex#irregex-match-data? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7895,a[2]=((C_word)li7),tmp=(C_word)a,a+=3,tmp));
t10=C_mutate((C_word*)lf[17]+1 /* (set! chicken.irregex#irregex-match-num-submatches ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7901,a[2]=((C_word)li8),tmp=(C_word)a,a+=3,tmp));
t11=C_mutate((C_word*)lf[19]+1 /* (set! chicken.irregex#irregex-match-names ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7926,a[2]=((C_word)li9),tmp=(C_word)a,a+=3,tmp));
t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7972,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_31592,a[2]=((C_word)li390),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:161: chicken.base#set-record-printer! */
t14=C_fast_retrieve(lf[502]);{
C_word *av2;
if(c >= 4) {
  av2=av;
} else {
  av2=C_alloc(4);
}
av2[0]=t14;
av2[1]=t12;
av2[2]=lf[12];
av2[3]=t13;
((C_proc)(void*)(*((C_word*)t14+1)))(4,av2);}}

/* chicken.irregex#%vector-copy in k7739 in k7736 */
static void f_7749(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_7749,2,t1,t2);}
a=C_alloc(4);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7753,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:93: 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);}}

/* k7751 in chicken.irregex#%vector-copy in k7739 in k7736 */
static void C_ccall f_7753(C_word c,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,4)))){
C_save_and_reclaim((void *)f_7753,c,av);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7756,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:90: scheme#vector-copy! */
t3=*((C_word*)lf[3]+1);{
C_word *av2;
if(c >= 5) {
  av2=av;
} else {
  av2=C_alloc(5);
}
av2[0]=t3;
av2[1]=t2;
av2[2]=t1;
av2[3]=C_fix(0);
av2[4]=((C_word*)t0)[3];
((C_proc)(void*)(*((C_word*)t3+1)))(5,av2);}}

/* k7754 in k7751 in chicken.irregex#%vector-copy in k7739 in k7736 */
static void C_ccall f_7756(C_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_7756,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 k7739 in k7736 */
static void C_ccall f_7762(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_7762,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 k7739 in k7736 */
static void C_ccall f_7804(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_7804,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 k7739 in k7736 */
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=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_7822,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 k7739 in k7736 */
static void f_7831(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_7831,2,t1,t2);}
a=C_alloc(7);
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7839,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7852,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:126: 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);}}

/* k7837 in chicken.irregex#irregex-new-matches in k7739 in k7736 */
static void C_ccall f_7839(C_word c,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_7839,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);}}

/* k7850 in chicken.irregex#irregex-new-matches in k7739 in k7736 */
static void C_ccall f_7852(C_word c,C_word *av){
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_7852,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:126: 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 k7739 in k7736 */
static void f_7854(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_7854,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_7861,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:129: 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);}}

/* k7859 in chicken.irregex#irregex-reset-matches! in k7739 in k7736 */
static void C_ccall f_7861(C_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_7861,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 k7739 in k7736 */
static void f_7863(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_7863,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_7877,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:135: %vector-copy */
f_7749(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);}}}

/* k7875 in chicken.irregex#irregex-copy-matches in k7739 in k7736 */
static void C_ccall f_7877(C_word c,C_word *av){
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_7877,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 k7739 in k7736 */
static void C_ccall f_7895(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_7895,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 k7739 in k7736 */
static void C_ccall f_7901(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_7901,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 k7739 in k7736 */
static void C_ccall f_7926(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_7926,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);}}

/* k7970 in k7739 in k7736 */
static void C_ccall f_7972(C_word c,C_word *av){
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 *a;
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(216,c,6)))){
C_save_and_reclaim((void *)f_7972,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_7987,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_8012,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_8041,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_8070,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_8163,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_8347,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_8410,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_8491,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_8581,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_8849,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_8879,a[2]=((C_word)li26),tmp=(C_word)a,a+=3,tmp));
t13=C_unfix(C_fix(0));
t14=C_make_character(t13);
t15=C_unfix(C_fix(55295));
t16=C_make_character(t15);
t17=C_unfix(C_fix(57344));
t18=C_make_character(t17);
t19=C_unfix(C_fix(1114111));
t20=C_make_character(t19);
t21=C_a_i_list(&a,5,lf[52],t14,t16,t18,t20);
t22=C_mutate(&lf[53] /* (set! chicken.irregex#*all-chars* ...) */,t21);
t23=lf[54] /* chicken.irregex#*allow-utf8-mode?* */ =C_SCHEME_FALSE;;
t24=C_mutate(&lf[55] /* (set! chicken.irregex#string-scan-char ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9026,a[2]=((C_word)li28),tmp=(C_word)a,a+=3,tmp));
t25=C_mutate(&lf[47] /* (set! chicken.irregex#string-cat-reverse ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9317,a[2]=((C_word)li32),tmp=(C_word)a,a+=3,tmp));
t26=C_mutate(&lf[58] /* (set! chicken.irregex#zero-to ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9370,a[2]=((C_word)li34),tmp=(C_word)a,a+=3,tmp));
t27=C_mutate(&lf[59] /* (set! chicken.irregex#find ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9407,a[2]=((C_word)li36),tmp=(C_word)a,a+=3,tmp));
t28=C_mutate(&lf[60] /* (set! chicken.irregex#last ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9468,a[2]=((C_word)li38),tmp=(C_word)a,a+=3,tmp));
t29=C_mutate(&lf[62] /* (set! chicken.irregex#any ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9506,a[2]=((C_word)li40),tmp=(C_word)a,a+=3,tmp));
t30=C_mutate(&lf[63] /* (set! chicken.irregex#every ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9549,a[2]=((C_word)li42),tmp=(C_word)a,a+=3,tmp));
t31=C_mutate(&lf[57] /* (set! chicken.irregex#fold ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9594,a[2]=((C_word)li44),tmp=(C_word)a,a+=3,tmp));
t32=C_mutate(&lf[64] /* (set! chicken.irregex#flag-join ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9924,a[2]=((C_word)li45),tmp=(C_word)a,a+=3,tmp));
t33=C_mutate(&lf[65] /* (set! chicken.irregex#flag-clear ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9933,a[2]=((C_word)li46),tmp=(C_word)a,a+=3,tmp));
t34=C_a_i_list1(&a,1,lf[66]);
t35=C_mutate(&lf[67] /* (set! chicken.irregex#close-token ...) */,t34);
t36=C_mutate(&lf[68] /* (set! chicken.irregex#with-read-from-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9951,a[2]=((C_word)li61),tmp=(C_word)a,a+=3,tmp));
t37=C_mutate(&lf[90] /* (set! chicken.irregex#symbol-list->flags ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10544,a[2]=((C_word)li63),tmp=(C_word)a,a+=3,tmp));
t38=C_mutate((C_word*)lf[102]+1 /* (set! chicken.irregex#maybe-string->sre ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10667,a[2]=((C_word)li64),tmp=(C_word)a,a+=3,tmp));
t39=C_mutate((C_word*)lf[103]+1 /* (set! chicken.irregex#string->sre ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10679,a[2]=((C_word)li91),tmp=(C_word)a,a+=3,tmp));
t40=C_a_i_cons(&a,2,C_make_character(110),C_make_character(10));
t41=C_unfix(C_fix(13));
t42=C_make_character(t41);
t43=C_a_i_cons(&a,2,C_make_character(114),t42);
t44=C_unfix(C_fix(9));
t45=C_make_character(t44);
t46=C_a_i_cons(&a,2,C_make_character(116),t45);
t47=C_unfix(C_fix(7));
t48=C_make_character(t47);
t49=C_a_i_cons(&a,2,C_make_character(97),t48);
t50=C_unfix(C_fix(27));
t51=C_make_character(t50);
t52=C_a_i_cons(&a,2,C_make_character(101),t51);
t53=C_unfix(C_fix(12));
t54=C_make_character(t53);
t55=C_a_i_cons(&a,2,C_make_character(102),t54);
t56=C_a_i_list(&a,6,t40,t43,t46,t49,t52,t55);
t57=C_mutate(&lf[169] /* (set! chicken.irregex#posix-escape-sequences ...) */,t56);
t58=C_mutate(&lf[170] /* (set! chicken.irregex#string-parse-hex-escape ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13507,a[2]=((C_word)li93),tmp=(C_word)a,a+=3,tmp));
t59=C_mutate(&lf[205] /* (set! chicken.irregex#high-char? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14226,a[2]=((C_word)li94),tmp=(C_word)a,a+=3,tmp));
t60=C_mutate(&lf[107] /* (set! chicken.irregex#utf8-string-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14247,a[2]=((C_word)li96),tmp=(C_word)a,a+=3,tmp));
t61=C_mutate(&lf[207] /* (set! chicken.irregex#utf8-lowest-digit-of-length ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14489,a[2]=((C_word)li97),tmp=(C_word)a,a+=3,tmp));
t62=C_mutate(&lf[209] /* (set! chicken.irregex#char->utf8-list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14565,a[2]=((C_word)li98),tmp=(C_word)a,a+=3,tmp));
t63=C_mutate(&lf[211] /* (set! chicken.irregex#unicode-range-helper ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14844,a[2]=((C_word)li101),tmp=(C_word)a,a+=3,tmp));
t64=C_mutate(&lf[213] /* (set! chicken.irregex#unicode-range-up-from ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14999,a[2]=((C_word)li104),tmp=(C_word)a,a+=3,tmp));
t65=C_mutate(&lf[214] /* (set! chicken.irregex#unicode-range-up-to ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15164,a[2]=((C_word)li107),tmp=(C_word)a,a+=3,tmp));
t66=C_mutate(&lf[215] /* (set! chicken.irregex#cset->utf8-pattern ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15852,a[2]=((C_word)li116),tmp=(C_word)a,a+=3,tmp));
t67=C_mutate((C_word*)lf[218]+1 /* (set! chicken.irregex#irregex ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16428,a[2]=((C_word)li117),tmp=(C_word)a,a+=3,tmp));
t68=C_mutate((C_word*)lf[220]+1 /* (set! chicken.irregex#string->irregex ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16556,a[2]=((C_word)li118),tmp=(C_word)a,a+=3,tmp));
t69=C_mutate((C_word*)lf[221]+1 /* (set! chicken.irregex#sre->irregex ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16566,a[2]=((C_word)li214),tmp=(C_word)a,a+=3,tmp));
t70=C_mutate(&lf[140] /* (set! chicken.irregex#sre-empty? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16699,a[2]=((C_word)li215),tmp=(C_word)a,a+=3,tmp));
t71=C_mutate(&lf[278] /* (set! chicken.irregex#sre-any? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16866,a[2]=((C_word)li216),tmp=(C_word)a,a+=3,tmp));
t72=C_mutate(&lf[137] /* (set! chicken.irregex#sre-repeater? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16967,a[2]=((C_word)li217),tmp=(C_word)a,a+=3,tmp));
t73=C_mutate(&lf[280] /* (set! chicken.irregex#sre-bos? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17012,a[2]=((C_word)li218),tmp=(C_word)a,a+=3,tmp));
t74=C_mutate(&lf[272] /* (set! chicken.irregex#sre-searcher? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17101,a[2]=((C_word)li219),tmp=(C_word)a,a+=3,tmp));
t75=C_mutate(&lf[254] /* (set! chicken.irregex#sre-consumer? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17218,a[2]=((C_word)li220),tmp=(C_word)a,a+=3,tmp));
t76=C_mutate(&lf[281] /* (set! chicken.irregex#sre-has-submatches? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17335,a[2]=((C_word)li221),tmp=(C_word)a,a+=3,tmp));
t77=C_mutate(&lf[225] /* (set! chicken.irregex#sre-count-submatches ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17374,a[2]=((C_word)li223),tmp=(C_word)a,a+=3,tmp));
t78=C_mutate(&lf[105] /* (set! chicken.irregex#sre-sequence ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18580,a[2]=((C_word)li224),tmp=(C_word)a,a+=3,tmp));
t79=C_mutate(&lf[108] /* (set! chicken.irregex#sre-alternate ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18603,a[2]=((C_word)li225),tmp=(C_word)a,a+=3,tmp));
t80=C_mutate(&lf[284] /* (set! chicken.irregex#sre-strip-submatches ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18626,a[2]=((C_word)li227),tmp=(C_word)a,a+=3,tmp));
t81=C_mutate(&lf[253] /* (set! chicken.irregex#sre-names ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18807,a[2]=((C_word)li228),tmp=(C_word)a,a+=3,tmp));
t82=C_mutate(&lf[285] /* (set! chicken.irregex#sre-sequence-names ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19093,a[2]=((C_word)li229),tmp=(C_word)a,a+=3,tmp));
t83=C_mutate(&lf[271] /* (set! chicken.irregex#sre-remove-initial-bos ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19125,a[2]=((C_word)li231),tmp=(C_word)a,a+=3,tmp));
t84=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19307,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
t85=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_31492,a[2]=((C_word)li388),tmp=(C_word)a,a+=3,tmp);
t86=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_31495,a[2]=((C_word)li389),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:1967: make-irregex-chunker */
t87=C_fast_retrieve(lf[45]);{
C_word *av2;
if(c >= 7) {
  av2=av;
} else {
  av2=C_alloc(7);
}
av2[0]=t87;
av2[1]=t84;
av2[2]=t85;
av2[3]=*((C_word*)lf[495]+1);
av2[4]=*((C_word*)lf[496]+1);
av2[5]=*((C_word*)lf[497]+1);
av2[6]=t86;
((C_proc)(void*)(*((C_word*)t87+1)))(7,av2);}}

/* k7983 in k8349 in chicken.irregex#irregex-match-valid-index? in k7970 in k7739 in k7736 */
static void C_ccall f_7985(C_word c,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_7985,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 k7970 in k7739 in k7736 */
static void C_ccall f_7987(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_7987,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_7991,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:236: irregex-match-numeric-index */
f_8163(t4,lf[23],t2,t3);}

/* k7989 in chicken.irregex#irregex-match-start-chunk in k7970 in k7739 in k7736 */
static void C_ccall f_7991(C_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_7991,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 k7970 in k7739 in k7736 */
static void C_ccall f_8012(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_8012,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_8016,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:239: irregex-match-numeric-index */
f_8163(t4,lf[25],t2,t3);}

/* k8014 in chicken.irregex#irregex-match-start-index in k7970 in k7739 in k7736 */
static void C_ccall f_8016(C_word c,C_word *av){
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_8016,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 k7970 in k7739 in k7736 */
static void C_ccall f_8041(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_8041,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_8045,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:242: irregex-match-numeric-index */
f_8163(t4,lf[27],t2,t3);}

/* k8043 in chicken.irregex#irregex-match-end-chunk in k7970 in k7739 in k7736 */
static void C_ccall f_8045(C_word c,C_word *av){
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_8045,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 k7970 in k7739 in k7736 */
static void C_ccall f_8070(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_8070,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_8074,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:245: irregex-match-numeric-index */
f_8163(t4,lf[29],t2,t3);}

/* k8072 in chicken.irregex#irregex-match-end-index in k7970 in k7739 in k7736 */
static void C_ccall f_8074(C_word c,C_word *av){
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_8074,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 k7970 in k7739 in k7736 */
static void f_8163(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_8163,4,t1,t2,t3,t4);}
a=C_alloc(6);
t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8345,a[2]=t1,a[3]=t2,a[4]=t3,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:272: 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);}}

/* k8229 in k8343 in chicken.irregex#irregex-match-numeric-index in k7970 in k7739 in k7736 */
static void f_8231(C_word 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_8231,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:283: 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);}}}

/* k8271 in k8343 in chicken.irregex#irregex-match-numeric-index in k7970 in k7739 in k7736 */
static void C_ccall f_8273(C_word c,C_word *av){
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_8273,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_8275,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_8275(t5,((C_word*)t0)[5],t1,C_SCHEME_TRUE);}

/* lp in k8271 in k8343 in chicken.irregex#irregex-match-numeric-index in k7970 in k7739 in k7736 */
static void f_8275(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_8275,4,t0,t1,t2,t3);}
if(C_truep(C_i_nullp(t2))){
if(C_truep(t3)){
/* irregex-core.scm:290: 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:294: 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:295: lp */
t11=t1;
t12=C_u_i_cdr(t2);
t13=t3;
t1=t11;
t2=t12;
t3=t13;
goto loop;}}}

/* k8343 in chicken.irregex#irregex-match-numeric-index in k7970 in k7739 in k7736 */
static void C_ccall f_8345(C_word c,C_word *av){
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_8345,c,av);}
a=C_alloc(11);
if(C_truep(C_i_not(t1))){
/* irregex-core.scm:273: 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_8231,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_8231(t11,C_fixnum_lessp(t8,t10));}
else{
t8=t6;
f_8231(t8,C_SCHEME_FALSE);}}
else{
/* irregex-core.scm:284: 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_8273,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:285: 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 k7970 in k7739 in k7736 */
static void C_ccall f_8347(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_8347,c,av);}
a=C_alloc(9);
t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8351,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_8408,a[2]=t4,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:298: 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);}}

/* k8349 in chicken.irregex#irregex-match-valid-index? in k7970 in k7739 in k7736 */
static void C_ccall f_8351(C_word c,C_word *av){
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_8351,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:302: 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_7985,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:231: 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);}}}

/* k8406 in chicken.irregex#irregex-match-valid-index? in k7970 in k7739 in k7736 */
static void C_ccall f_8408(C_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_8408,c,av);}
if(C_truep(C_i_not(t1))){
/* irregex-core.scm:299: 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_8351(2,av2);}}}

/* chicken.irregex#irregex-match-substring in k7970 in k7739 in k7736 */
static void C_ccall f_8410(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_8410,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_8414,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:307: irregex-match-numeric-index */
f_8163(t4,lf[41],t2,t3);}

/* k8412 in chicken.irregex#irregex-match-substring in k7970 in k7739 in k7736 */
static void C_ccall f_8414(C_word c,C_word *av){
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_8414,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:309: g893 */
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 k7970 in k7739 in k7736 */
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=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_8491,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_8495,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:317: irregex-match-numeric-index */
f_8163(t4,lf[44],t2,t3);}

/* k8493 in chicken.irregex#irregex-match-subchunk in k7970 in k7739 in k7736 */
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 t3;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word 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_8495,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:321: 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:322: 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 k7970 in k7739 in k7736 */
static void C_ccall f_8581(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_8581,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_8773,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_8756,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_8655,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_8615,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_8621,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_8621(t25,(C_truep(t24)?C_i_not(C_i_closurep(t17)):C_SCHEME_TRUE));}
else{
t24=t23;
f_8621(t24,C_SCHEME_TRUE);}}
else{
t24=t23;
f_8621(t24,C_SCHEME_TRUE);}}

/* k8613 in chicken.irregex#make-irregex-chunker in k7970 in k7739 in k7736 */
static void C_ccall f_8615(C_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_8615,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);}}

/* k8619 in chicken.irregex#make-irregex-chunker in k7970 in k7739 in k7736 */
static void f_8621(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_8621,2,t0,t1);}
a=C_alloc(7);
if(C_truep(t1)){
/* irregex-core.scm:360: 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_8655 in chicken.irregex#make-irregex-chunker in k7970 in k7739 in k7736 */
static void C_ccall f_8655(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_8655,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_8669,a[2]=t1,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:340: 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_8676,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:341: 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);}}}

/* k8667 */
static void C_ccall f_8669(C_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_8669,c,av);}
/* irregex-core.scm:340: 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);}}

/* k8674 */
static void C_ccall f_8676(C_word c,C_word *av){
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_8676,c,av);}
a=C_alloc(16);
t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8739,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_8743,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:342: 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 k8737 in k8674 */
static void f_8682(C_word t0,C_word 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_8682,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_8700,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8704,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:347: 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_8715,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:351: 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);}}}

/* k8698 in loop in k8737 in k8674 */
static void C_ccall f_8700(C_word c,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_8700,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:346: string-cat-reverse */
f_9317(((C_word*)t0)[3],t2);}

/* k8702 in loop in k8737 in k8674 */
static void C_ccall f_8704(C_word c,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_8704,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8708,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:348: 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);}}

/* k8706 in k8702 in loop in k8737 in k8674 */
static void C_ccall f_8708(C_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_8708,c,av);}
/* irregex-core.scm:347: 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);}}

/* k8713 in loop in k8737 in k8674 */
static void C_ccall f_8715(C_word c,C_word *av){
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_8715,c,av);}
a=C_alloc(12);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8723,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_8727,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:352: 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);}}

/* k8721 in k8713 in loop in k8737 in k8674 */
static void C_ccall f_8723(C_word c,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_8723,c,av);}
a=C_alloc(3);
t2=C_a_i_cons(&a,2,t1,((C_word*)t0)[2]);
/* irregex-core.scm:351: loop */
t3=((C_word*)((C_word*)t0)[3])[1];
f_8682(t3,((C_word*)t0)[4],((C_word*)t0)[5],t2);}

/* k8725 in k8713 in loop in k8737 in k8674 */
static void C_ccall f_8727(C_word c,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_8727,c,av);}
a=C_alloc(6);
t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8731,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:353: 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);}}

/* k8729 in k8725 in k8713 in loop in k8737 in k8674 */
static void C_ccall f_8731(C_word c,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_8731,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8735,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:354: 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);}}

/* k8733 in k8729 in k8725 in k8713 in loop in k8737 in k8674 */
static void C_ccall f_8735(C_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_8735,c,av);}
/* irregex-core.scm:352: 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);}}

/* k8737 in k8674 */
static void C_ccall f_8739(C_word c,C_word *av){
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_8739,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_8682,a[2]=((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_8682(t6,((C_word*)t0)[8],((C_word*)t0)[9],t2);}

/* k8741 in k8674 */
static void C_ccall f_8743(C_word c,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_8743,c,av);}
a=C_alloc(5);
t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8747,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:344: 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);}}

/* k8745 in k8741 in k8674 */
static void C_ccall f_8747(C_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_8747,c,av);}
/* irregex-core.scm:342: 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_8756 in chicken.irregex#make-irregex-chunker in k7970 in k7739 in k7736 */
static void C_ccall f_8756(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_8756,c,av);}
a=C_alloc(3);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8764,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:334: 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);}}

/* k8762 */
static void C_ccall f_8764(C_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_8764,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_8773 in chicken.irregex#make-irregex-chunker in k7970 in k7739 in k7736 */
static void C_ccall f_8773(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_8773,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 k7970 in k7739 in k7736 */
static void f_8831(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_8831,3,t0,t1,t2);}
a=C_alloc(6);
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8835,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:375: 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);}}

/* k8833 in lp in chicken.irregex#chunker-prev-char in k7970 in k7739 in k7736 */
static void C_ccall f_8835(C_word c,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_8835,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:378: lp */
t3=((C_word*)((C_word*)t0)[5])[1];
f_8831(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 k7970 in k7739 in k7736 */
static void f_8849(C_word 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(13,0,3)))){
C_save_and_reclaim_args((void *)trf_8849,4,t1,t2,t3,t4);}
a=C_alloc(13);
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8853,a[2]=t2,a[3]=t1,a[4]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=5,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_8853(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_8831,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_8831(t11,t5,t3);}}

/* k8851 in chicken.irregex#chunker-prev-char in k7970 in k7739 in k7736 */
static void C_ccall f_8853(C_word c,C_word *av){
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_8853,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+4,t1);
if(C_truep(((C_word*)t0)[4])){
t3=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8866,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:383: g992 */
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)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(3,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);}}}

/* k8864 in k8851 in chicken.irregex#chunker-prev-char in k7970 in k7739 in k7736 */
static void C_ccall f_8866(C_word c,C_word *av){
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_8866,c,av);}
a=C_alloc(4);
t2=((C_word*)t0)[2];
t3=C_i_vector_ref(((C_word*)t2)[2],C_fix(3));
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8877,a[2]=((C_word*)t2)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:384: g994 */
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*)t2)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k8875 in k8864 in k8851 in chicken.irregex#chunker-prev-char in k7970 in k7739 in k7736 */
static void C_ccall f_8877(C_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_8877,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 k7970 in k7739 in k7736 */
static void f_8879(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,2)))){
C_save_and_reclaim_args((void *)trf_8879,3,t1,t2,t3);}
a=C_alloc(5);
t4=C_i_vector_ref(t2,C_fix(0));
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8886,a[2]=t2,a[3]=t1,a[4]=C_SCHEME_UNDEFINED,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:387: g1000 */
t6=t4;{
C_word av2[3];
av2[0]=t6;
av2[1]=t5;
av2[2]=t3;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}

/* k8884 in chicken.irregex#chunker-next-char in k7970 in k7739 in k7736 */
static void C_ccall f_8886(C_word c,C_word *av){
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_8886,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+4,t1);
if(C_truep(((C_word*)t0)[4])){
t3=C_i_vector_ref(((C_word*)t0)[2],C_fix(1));
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8899,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:389: g1003 */
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)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(3,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);}}}

/* k8897 in k8884 in chicken.irregex#chunker-next-char in k7970 in k7739 in k7736 */
static void C_ccall f_8899(C_word c,C_word *av){
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_8899,c,av);}
a=C_alloc(4);
t2=((C_word*)t0)[2];
t3=C_i_vector_ref(((C_word*)t2)[2],C_fix(2));
t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8906,a[2]=((C_word*)t2)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:389: g1005 */
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*)t2)[4];
((C_proc)(void*)(*((C_word*)t5+1)))(3,av2);}}

/* k8904 in k8897 in k8884 in chicken.irregex#chunker-next-char in k7970 in k7739 in k7736 */
static void C_ccall f_8906(C_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_8906,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);}}

/* a8944 */
static void C_ccall f_8945(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_8945,c,av);}
t3=C_eqp(t2,((C_word*)t0)[2]);
if(C_truep(C_i_not(t3))){
/* irregex-core.scm:404: g1022 */
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);}}}

/* a8971 */
static void C_ccall f_8972(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(7,c,2)))){
C_save_and_reclaim((void *)f_8972,c,av);}
a=C_alloc(7);
t3=C_eqp(t2,((C_word*)t0)[2]);
if(C_truep(t3)){
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:412: g1033 */
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);}}}
else{
t4=C_i_vector_ref(((C_word*)t0)[4],C_fix(0));
t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9011,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=((C_word*)t0)[2],tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:413: g1029 */
t6=t4;{
C_word *av2=av;
av2[0]=t6;
av2[1]=t5;
av2[2]=t2;
((C_proc)(void*)(*((C_word*)t6+1)))(3,av2);}}}

/* k9002 in k9009 in a8971 */
static void C_ccall f_9004(C_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_9004,c,av);}
if(C_truep(C_i_not(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{
/* irregex-core.scm:412: g1033 */
t2=C_i_vector_ref(((C_word*)t0)[4],C_fix(3));{
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)[5];
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}}

/* k9009 in a8971 */
static void C_ccall f_9011(C_word c,C_word *av){
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_9011,c,av);}
a=C_alloc(6);
if(C_truep(C_i_not(t1))){
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(0));
t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9004,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);
/* irregex-core.scm:414: g1031 */
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{
/* irregex-core.scm:412: g1033 */
t2=C_i_vector_ref(((C_word*)t0)[2],C_fix(3));{
C_word *av2;
if(c >= 3) {
  av2=av;
} else {
  av2=C_alloc(3);
}
av2[0]=t2;
av2[1]=((C_word*)t0)[3];
av2[2]=((C_word*)t0)[5];
((C_proc)(void*)(*((C_word*)t2+1)))(3,av2);}}}

/* chicken.irregex#string-scan-char in k7970 in k7739 in k7736 */
static void C_ccall f_9026(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_9026,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_9039,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_9039(t11,t1,t7);}

/* scan in chicken.irregex#string-scan-char in k7970 in k7739 in k7736 */
static void f_9039(C_word t0,C_word t1,C_word t2){
C_word 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_9039,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:446: scan */
t8=t1;
t9=t6;
t1=t8;
t2=t9;
goto loop;}}}

/* scan in chicken.irregex#string-parse-hex-escape in k7970 in k7739 in k7736 */
static void f_9082(C_word t0,C_word t1,C_word t2){
C_word 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_9082,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:454: scan */
t8=t1;
t9=t6;
t1=t8;
t2=t9;
goto loop;}}}

/* scan in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_9139(C_word t0,C_word t1,C_word t2){
C_word 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_9139,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:461: scan */
t8=t1;
t9=t6;
t1=t8;
t2=t9;
goto loop;}}}

/* lp in k12408 in k12280 in k12264 in k12255 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_9177(C_word t0,C_word 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_9177,5,t0,t1,t2,t3,t4);}
a=C_alloc(23);
t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9180,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,a[6]=((C_word)li84),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_9201,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:467: collect */
t7=t5;
f_9180(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_9220,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:468: collect */
t11=t5;
f_9180(t11,t10);}
else{
t8=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
/* irregex-core.scm:469: lp */
t12=t1;
t13=t8;
t14=t3;
t15=t4;
t1=t12;
t2=t13;
t3=t14;
t4=t15;
goto loop;}}}

/* collect in lp in k12408 in k12280 in k12264 in k12255 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void f_9180(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_9180,2,t0,t1);}
a=C_alloc(4);
t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9188,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:466: 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);}}

/* k9186 in collect in lp in k12408 in k12280 in k12264 in k12255 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_9188(C_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_9188,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);}}

/* k9199 in lp in k12408 in k12280 in k12264 in k12255 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_9201(C_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_9201,c,av);}
/* irregex-core.scm:467: ##sys#fast-reverse */
t2=C_fast_retrieve(lf[70]);{
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);}}

/* k9218 in lp in k12408 in k12280 in k12264 in k12255 in lp in k10687 in k10681 in chicken.irregex#string->sre in k7970 in k7739 in k7736 */
static void C_ccall f_9220(C_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_9220,c,av);}
/* irregex-core.scm:468: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_9177(t2,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[5],t1);}

/* doloop1127 in lp in k9339 in k9323 in chicken.irregex#string-cat-reverse in k7970 in k7739 in k7736 */
static void f_9292(C_word t0,C_word t1,C_word t2,C_word t3){
C_word tmp;
C_word t4;
C_word t5;
C_word t6;
C_word t7;
C_word t8;
C_word t9;
C_word t10;
C_word t11;
C_word *a;
loop:
C_check_for_interrupt;
if(C_unlikely(!C_demand(C_calculate_demand(10,0,3)))){
C_save_and_reclaim_args((void *)trf_9292,4,t0,t1,t2,t3);}
a=C_alloc(10);
if(C_truep(C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[2]))){
t4=C_SCHEME_UNDEFINED;
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}
else{
t4=C_i_string_ref(((C_word*)t0)[3],t2);
t5=C_i_string_set(((C_word*)t0)[4],t3,t4);
t6=C_a_i_fixnum_plus(&a,2,t2,C_fix(1));
t7=C_a_i_fixnum_plus(&a,2,t3,C_fix(1));
t9=t1;
t10=t6;
t11=t7;
t1=t9;
t2=t10;
t3=t11;
goto loop;}}

/* chicken.irregex#string-cat-reverse in k7970 in k7739 in k7736 */
static void f_9317(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,4)))){
C_save_and_reclaim_args((void *)trf_9317,2,t1,t2);}
a=C_alloc(8);
t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9325,a[2]=t1,a[3]=C_SCHEME_UNDEFINED,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9327,a[2]=((C_word)li31),tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:493: fold */
f_9594(t3,t4,C_fix(0),t2);}

/* k9323 in chicken.irregex#string-cat-reverse in k7970 in k7739 in k7736 */
static void C_ccall f_9325(C_word c,C_word *av){
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,2)))){
C_save_and_reclaim((void *)f_9325,c,av);}
a=C_alloc(3);
t2=C_mutate(((C_word *)t0)+3,t1);
t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9341,a[2]=t0,tmp=(C_word)a,a+=3,tmp);
/* irregex-core.scm:497: scheme#make-string */
t4=*((C_word*)lf[56]+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)[3];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}

/* a9326 in chicken.irregex#string-cat-reverse in k7970 in k7739 in k7736 */
static void C_ccall f_9327(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_9327,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);}}

/* k9339 in k9323 in chicken.irregex#string-cat-reverse in k7970 in k7739 in k7736 */
static void C_ccall f_9341(C_word c,C_word *av){
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,4)))){
C_save_and_reclaim((void *)f_9341,c,av);}
a=C_alloc(11);
t2=((C_word*)t0)[2];
t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9344,a[2]=((C_word*)t2)[2],a[3]=t1,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|4,a[1]=(C_word)f_9346,a[2]=t5,a[3]=t1,a[4]=((C_word)li30),tmp=(C_word)a,a+=5,tmp));
t7=((C_word*)t5)[1];
f_9346(t7,t3,((C_word*)t2)[3],((C_word*)t2)[4]);}

/* k9342 in k9339 in k9323 in chicken.irregex#string-cat-reverse in k7970 in k7739 in k7736 */
static void C_ccall f_9344(C_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_9344,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);}}

/* lp in k9339 in k9323 in chicken.irregex#string-cat-reverse in k7970 in k7739 in k7736 */
static void f_9346(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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(15,0,4)))){
C_save_and_reclaim_args((void *)trf_9346,4,t0,t1,t2,t3);}
a=C_alloc(15);
if(C_truep(C_i_pairp(t3))){
t4=C_u_i_car(t3);
t5=C_i_string_length(t4);
t6=C_fixnum_difference(t2,t5);
t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9363,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t6,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
t8=C_SCHEME_UNDEFINED;
t9=(*a=C_VECTOR_TYPE|1,a[1]=t8,tmp=(C_word)a,a+=2,tmp);
t10=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9292,a[2]=t5,a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=t9,a[6]=((C_word)li29),tmp=(C_word)a,a+=7,tmp));
t11=((C_word*)t9)[1];
f_9292(t11,t7,C_fix(0),t6);}
else{
t4=C_SCHEME_UNDEFINED;
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=t4;
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}}

/* k9361 in lp in k9339 in k9323 in chicken.irregex#string-cat-reverse in k7970 in k7739 in k7736 */
static void C_ccall f_9363(C_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_9363,c,av);}
/* irregex-core.scm:504: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_9346(t2,((C_word*)t0)[3],((C_word*)t0)[4],C_u_i_cdr(((C_word*)t0)[5]));}

/* chicken.irregex#zero-to in k7970 in k7739 in k7736 */
static void f_9370(C_word 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_9370,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_9386,a[2]=t5,a[3]=((C_word)li33),tmp=(C_word)a,a+=4,tmp));
t7=((C_word*)t5)[1];
f_9386(t7,t1,t3,C_SCHEME_END_OF_LIST);}}

/* lp in chicken.irregex#zero-to in k7970 in k7739 in k7736 */
static void f_9386(C_word t0,C_word t1,C_word t2,C_word 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_9386,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:515: lp */
t7=t1;
t8=t4;
t9=t5;
t1=t7;
t2=t8;
t3=t9;
goto loop;}}

/* chicken.irregex#find in k7970 in k7739 in k7736 */
static void f_9407(C_word 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_9407,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_9413,a[2]=t5,a[3]=t2,a[4]=((C_word)li35),tmp=(C_word)a,a+=5,tmp));
t7=((C_word*)t5)[1];
f_9413(t7,t1,t3);}

/* lp in chicken.irregex#find in k7970 in k7739 in k7736 */
static void f_9413(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_9413,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_9426,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:522: 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);}}}

/* k9424 in lp in chicken.irregex#find in k7970 in k7739 in k7736 */
static void C_ccall f_9426(C_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_9426,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:523: lp */
t2=((C_word*)((C_word*)t0)[4])[1];
f_9413(t2,((C_word*)t0)[2],C_u_i_cdr(((C_word*)t0)[3]));}}

/* chicken.irregex#last in k7970 in k7739 in k7736 */
static void f_9468(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_9468,2,t1,t2);}
a=C_alloc(3);
t3=C_i_pairp(t2);
if(C_truep(C_i_not(t3))){
/* irregex-core.scm:533: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word av2[3];
av2[0]=t4;
av2[1]=t1;
av2[2]=lf[61];
((C_proc)(void*)(*((C_word*)t4+1)))(3,av2);}}
else{
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9483,a[2]=((C_word)li37),tmp=(C_word)a,a+=3,tmp);
t5=t1;{
C_word av2[2];
av2[0]=t5;
av2[1]=(
  f_9483(t2)
);
((C_proc)(void*)(*((C_word*)t5+1)))(2,av2);}}}

/* lp in chicken.irregex#last in k7970 in k7739 in k7736 */
static C_word f_9483(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 k7970 in k7739 in k7736 */
static void f_9506(C_word t1,C_word t2,C_word 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_9506,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_9522,a[2]=t2,a[3]=t7,a[4]=((C_word)li39),tmp=(C_word)a,a+=5,tmp));
t9=((C_word*)t7)[1];
f_9522(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 k7970 in k7739 in k7736 */
static void f_9522(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_9522,4,t0,t1,t2,t3);}
a=C_alloc(5);
if(C_truep(C_i_nullp(t3))){
/* irregex-core.scm:543: 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_9535,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:544: 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);}}}

/* k9533 in lp in chicken.irregex#any in k7970 in k7739 in k7736 */
static void C_ccall f_9535(C_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_9535,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:544: lp */
t2=((C_word*)((C_word*)t0)[3])[1];
f_9522(t2,((C_word*)t0)[2],C_i_car(((C_word*)t0)[4]),C_u_i_cdr(((C_word*)t0)[4]));}}

/* chicken.irregex#every in k7970 in k7739 in k7736 */
static void f_9549(C_word t1,C_word t2,C_word t3){
C_word 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_9549,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_9567,a[2]=t2,a[3]=t8,a[4]=((C_word)li41),tmp=(C_word)a,a+=5,tmp));
t10=((C_word*)t8)[1];
f_9567(t10,t1,t5,t6);}}

/* lp in chicken.irregex#every in k7970 in k7739 in k7736 */
static void f_9567(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_9567,4,t0,t1,t2,t3);}
a=C_alloc(5);
if(C_truep(C_i_nullp(t3))){
/* irregex-core.scm:550: 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_9583,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:551: 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);}}}

/* k9581 in lp in chicken.irregex#every in k7970 in k7739 in k7736 */
static void C_ccall f_9583(C_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_9583,c,av);}
if(C_truep(t1)){
/* irregex-core.scm:551: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_9567(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 k7970 in k7739 in k7736 */
static void f_9594(C_word 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_9594,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_9600,a[2]=t6,a[3]=t2,a[4]=((C_word)li43),tmp=(C_word)a,a+=5,tmp));
t8=((C_word*)t6)[1];
f_9600(t8,t1,t4,t3);}

/* lp in chicken.irregex#fold in k7970 in k7739 in k7736 */
static void f_9600(C_word 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_9600,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_9618,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:557: 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);}}}

/* k9616 in lp in chicken.irregex#fold in k7970 in k7739 in k7736 */
static void C_ccall f_9618(C_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_9618,c,av);}
/* irregex-core.scm:557: lp */
t2=((C_word*)((C_word*)t0)[2])[1];
f_9600(t2,((C_word*)t0)[3],((C_word*)t0)[4],t1);}

/* chicken.irregex#flag-join in k7970 in k7739 in k7736 */
static void C_ccall f_9924(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_9924,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 k7970 in k7739 in k7736 */
static void C_ccall f_9933(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_9933,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 k7970 in k7739 in k7736 */
static void f_9951(C_word 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_9951,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_9958,a[2]=t6,a[3]=t2,a[4]=t8,a[5]=((C_word)li59),tmp=(C_word)a,a+=6,tmp));
t12=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10523,a[2]=t2,a[3]=t4,a[4]=((C_word)li60),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:723: read */
t13=((C_word*)t8)[1];
f_9958(t13,t1,t3,t12);}

/* f_9958 in chicken.irregex#with-read-from-string in k7970 in k7739 in k7736 */
static void f_9958(C_word t0,C_word t1,C_word t2,C_word t3){
C_word 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_9958,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:640: chicken.base#error */
t4=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t4;
av2[1]=t1;
av2[2]=lf[69];
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_9985,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t7,a[6]=((C_word)li50),tmp=(C_word)a,a+=7,tmp));
t9=((C_word*)t7)[1];
f_9985(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:664: k */
t6=t3;{
C_word av2[4];
av2[0]=t6;
av2[1]=t1;
av2[2]=C_retrieve2(lf[67],C_text("chicken.irregex#close-token"));
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_10099,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)li51),tmp=(C_word)a,a+=8,tmp));
t9=((C_word*)t7)[1];
f_10099(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_10148,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t3,a[5]=((C_word)li52),tmp=(C_word)a,a+=6,tmp);
/* irregex-core.scm:671: 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_10176,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_10176(t10,C_eqp(C_make_character(64),C_i_string_ref(((C_word*)t0)[3],t9)));}
else{
t9=t7;
f_10176(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_10233,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t10,a[6]=((C_word)li55),tmp=(C_word)a,a+=7,tmp));
t12=((C_word*)t10)[1];
f_10233(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_10334,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word)li56),tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:693: 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_10352,a[2]=t3,a[3]=((C_word)li57),tmp=(C_word)a,a+=4,tmp);
/* irregex-core.scm:695: 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:706: 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:708: chicken.base#error */
t11=*((C_word*)lf[30]+1);{
C_word av2[4];
av2[0]=t11;
av2[1]=t1;
av2[2]=lf[84];
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:712: 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_10452,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)li58),tmp=(C_word)a,a+=8,tmp));
t11=((C_word*)t9)[1];
f_10452(t11,t1,t7);}}}}}}

/* lp */
static void f_9985(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_9985,4,t0,t1,t2,t3);}
a=C_alloc(8);
t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9991,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)li49),tmp=(C_word)a,a+=8,tmp);
/* irregex-core.scm:645: read */
t5=((C_word*)((C_word*)t0)[4])[1];
f_9958(t5,t1,t2,t4);}

/* a9990 in lp */
static void C_ccall f_9991(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_9991,c,av);}
a=C_alloc(7);
t4=C_eqp(t2,C_retrieve2(lf[67],C_text("chicken.irregex#close-token")));
if(C_truep(t4)){
t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10005,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
/* irregex-core.scm:650: ##sys#fast-reverse */
t6=C_fast_retrieve(lf[70]);{
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[71]);
if(C_truep(t5)){
if(C_truep(C_i_nullp(((C_word*)t0)[3]))){
/* irregex-core.scm:653: chicken.base#error */
t6=*((C_word*)lf[30]+1);{
C_word *av2=av;
av2[0]=t6;
av2[1]=t1;
av2[2]=lf[72];
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_10025,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)li48),tmp=(C_word)a,a+=7,tmp);
/* irregex-core.scm:654: read */
t7=((C_word*)((C_word*)t0)[5])[1];
f_9958(t7,t1,t3,t6);}}
else{
t6=C_a_i_cons(&a,2,t2,((C_word*)t0)[3]);
/* irregex-core.scm:662: lp */
t7=((C_word*)((C_word*)t0)[6])[1];
f_9985(t7,t1,t3,t6);}}}

/* toplevel */
static 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 t4;
C_word t5;
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(19,c,2));
if(C_unlikely(!C_demand(C_calculate_demand(19,c,2)))){
C_save_and_reclaim((void*)C_irregex_toplevel,c,av);}
toplevel_initialized=1;
if(C_unlikely(!C_demand_2(2387))){
C_save(t1);
C_rereclaim2(2387*sizeof(C_word),1);
t1=C_restore;}
a=C_alloc(19);
C_initialize_lf(lf,503);
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],19, C_text("scheme#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?"));
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?"));
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("\376\002\000\000\017\156\157\164\040\155\141\164\143\150\040\144\141\164\141\000"));
lf[32]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\023\164\157\157\040\155\141\156\171\040\141\162\147\165\155\145\156\164\163\000"));
lf[33]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\022\156\157\164\040\141\040\166\141\154\151\144\040\151\156\144\145\170\000"));
lf[34]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\025\156\157\164\040\141\156\040\145\170\141\143\164\040\151\156\164\145\147\145\162\000"));
lf[35]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\023\165\156\153\156\157\167\156\040\155\141\164\143\150\040\156\141\155\145\000"));
lf[36]=C_h_intern(&lf[36],42, C_text("chicken.irregex#irregex-match-valid-index?"));
lf[37]=C_h_intern(&lf[37],26, C_text("irregex-match-valid-index?"));
lf[38]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\025\156\157\164\040\141\156\040\145\170\141\143\164\040\151\156\164\145\147\145\162\000"));
lf[39]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\017\156\157\164\040\155\141\164\143\150\040\144\141\164\141\000"));
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("\376\002\000\000\061\164\150\151\163\040\143\150\165\156\153\040\164\171\160\145\040\144\157\145\163\040\156\157\164\040\163\165\160\160\157\162\164\040\155\141\164\143\150\040\163\165\142\143\150\165\156\153\163\000"));
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("\376\002\000\000\024\145\170\160\145\143\164\145\144\040\141\040\160\162\157\143\144\165\162\145\000"));
lf[52]=C_h_intern(&lf[52],1, C_text("/"));
lf[56]=C_h_intern(&lf[56],18, C_text("scheme#make-string"));
lf[61]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\036\143\141\156\047\164\040\164\141\153\145\040\154\141\163\164\040\157\146\040\145\155\160\164\171\040\154\151\163\164\000"));
lf[66]=C_h_intern(&lf[66],5, C_text("close"));
lf[69]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\032\165\156\164\145\162\155\151\156\141\164\145\144\040\145\155\142\145\144\144\145\144\040\123\122\105\000"));
lf[70]=C_h_intern(&lf[70],18, C_text("##sys#fast-reverse"));
lf[71]=C_h_intern(&lf[71],1, C_text("."));
lf[72]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\020\142\141\144\040\144\157\164\164\145\144\040\146\157\162\155\000"));
lf[73]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\020\142\141\144\040\144\157\164\164\145\144\040\146\157\162\155\000"));
lf[74]=C_h_intern(&lf[74],13, C_text("scheme#append"));
lf[75]=C_h_intern(&lf[75],5, C_text("quote"));
lf[76]=C_h_intern(&lf[76],10, C_text("quasiquote"));
lf[77]=C_h_intern(&lf[77],15, C_text("uquote-splicing"));
lf[78]=C_h_intern(&lf[78],7, C_text("unquote"));
lf[79]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\044\165\156\164\145\162\155\151\156\141\164\145\144\040\163\164\162\151\156\147\040\151\156\040\145\155\142\145\144\144\145\144\040\123\122\105\000"));
lf[80]=C_h_intern(&lf[80],5, C_text("space"));
lf[81]=C_h_intern(&lf[81],7, C_text("newline"));
lf[82]=C_h_intern(&lf[82],20, C_text("##sys#number->string"));
lf[83]=C_h_intern(&lf[83],21, C_text("scheme#symbol->string"));
lf[84]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\037\142\141\144\040\043\040\163\171\156\164\141\170\040\151\156\040\163\151\155\160\154\151\146\151\145\144\040\123\122\105\000"));
lf[85]=C_h_intern(&lf[85],21, C_text("scheme#string->symbol"));
lf[86]=C_h_intern(&lf[86],21, C_text("scheme#string->number"));
lf[87]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\377\012\000\000\073\376\003\000\000\002\376\377\012\000\000\050\376\003\000\000\002\376\377\012\000\000\051\376\003\000\000\002\376\377\012\000\000\042\376\003\000\000\002\376\377\012\000\000\043\376\003\000\000\002\376\377\012\000\000\134\376\377\016"));
lf[88]=C_h_intern(&lf[88],11, C_text("close-token"));
lf[89]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\026\165\156\145\170\160\145\143\164\145\144\040\047\051\047\040\151\156\040\123\122\105\000"));
lf[91]=C_h_intern(&lf[91],1, C_text("i"));
lf[92]=C_h_intern(&lf[92],1, C_text("m"));
lf[93]=C_h_intern(&lf[93],10, C_text("multi-line"));
lf[94]=C_h_intern(&lf[94],1, C_text("s"));
lf[95]=C_h_intern(&lf[95],11, C_text("single-line"));
lf[96]=C_h_intern(&lf[96],1, C_text("x"));
lf[97]=C_h_intern(&lf[97],12, C_text("ignore-space"));
lf[98]=C_h_intern(&lf[98],1, C_text("u"));
lf[99]=C_h_intern(&lf[99],4, C_text("utf8"));
lf[100]=C_h_intern(&lf[100],2, C_text("ci"));
lf[101]=C_h_intern(&lf[101],16, C_text("case-insensitive"));
lf[102]=C_h_intern(&lf[102],33, C_text("chicken.irregex#maybe-string->sre"));
lf[103]=C_h_intern(&lf[103],27, C_text("chicken.irregex#string->sre"));
lf[104]=C_h_intern(&lf[104],2, C_text("or"));
lf[106]=C_h_intern(&lf[106],18, C_text("##sys#string->list"));
lf[109]=C_h_intern(&lf[109],8, C_text("submatch"));
lf[110]=C_h_intern(&lf[110],2, C_text("if"));
lf[111]=C_h_intern(&lf[111],7, C_text("epsilon"));
lf[112]=C_h_intern(&lf[112],10, C_text("look-ahead"));
lf[113]=C_h_intern(&lf[113],14, C_text("neg-look-ahead"));
lf[114]=C_h_intern(&lf[114],11, C_text("look-behind"));
lf[115]=C_h_intern(&lf[115],15, C_text("neg-look-behind"));
lf[116]=C_h_intern(&lf[116],3, C_text("seq"));
lf[117]=C_h_intern(&lf[117],13, C_text("scheme#cddadr"));
lf[118]=C_h_intern(&lf[118],13, C_text("scheme#cadadr"));
lf[119]=C_h_intern(&lf[119],12, C_text("##sys#append"));
lf[120]=C_h_intern(&lf[120],2, C_text("=>"));
lf[121]=C_h_intern(&lf[121],14, C_text("submatch-named"));
lf[122]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\002\001\075\076\376\003\000\000\002\376\001\000\000\016\001\163\165\142\155\141\164\143\150\055\156\141\155\145\144\376\377\016"));
lf[123]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\006\001\141\164\157\155\151\143\376\003\000\000\002\376\001\000\000\002\001\151\146\376\003\000\000\002\376\001\000\000\012\001\154\157\157\153\055\141\150\145\141\144\376\003\000\000\002\376\001\000\000\016\001\156\145\147\055\154\157\157\153\055\141\150\145\141\144\376\003\000\000\002\376\001\000\000\013\001\154\157\157\153\055\142\145\150\151\156\144\376\003\000\000\002\376\001\000\000\017\001\156\145\147\055\154\157\157\153\055\142\145\150\151\156\144\376\003\000\000\002\376\001\000\000\002\001\075\076\376\003\000\000\002\376\001\000\000\016\001\163\165\142\155\141\164\143\150\055\156\141\155\145\144\376\003\000\000\002\376\001\000\000\006\001\167\057\165\164\146\070\376\003\000\000\002\376\001\000\000\010\001\167\057\156\157\165\164\146\070\376\377\016"));
lf[124]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\043\165\156\164\145\162\155\151\156\141\164\145\144\040\160\141\162\145\156\164\150\145\163\151\163\040\151\156\040\162\145\147\145\170\160\000"));
lf[125]=C_h_intern(&lf[125],3, C_text("any"));
lf[126]=C_h_intern(&lf[126],4, C_text("nonl"));
lf[127]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\035\077\040\143\141\156\047\164\040\146\157\154\154\157\167\040\145\155\160\164\171\040\160\141\164\164\145\162\156\000"));
lf[128]=C_h_intern(&lf[128],1, C_text("*"));
lf[129]=C_h_intern(&lf[129],2, C_text("*?"));
lf[130]=C_h_intern(&lf[130],1, C_text("+"));
lf[131]=C_h_intern(&lf[131],3, C_text("**?"));
lf[132]=C_h_intern(&lf[132],1, C_text("?"));
lf[133]=C_h_intern(&lf[133],2, C_text("??"));
lf[134]=C_h_intern(&lf[134],2, C_text("**"));
lf[135]=C_h_intern(&lf[135],1, C_text("="));
lf[136]=C_h_intern(&lf[136],2, C_text(">="));
lf[138]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\052\144\165\160\154\151\143\141\164\145\040\162\145\160\145\164\151\164\151\157\156\040\050\145\056\147\056\040\052\052\051\040\151\156\040\160\141\164\164\145\162\156\000"));
lf[139]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\046\143\141\156\047\164\040\162\145\160\145\141\164\040\145\155\160\164\171\040\160\141\164\164\145\162\156\040\050\145\056\147\056\040\050\051\052\051\000"));
lf[141]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\043\165\156\164\145\162\155\151\156\141\164\145\144\040\160\141\162\145\156\164\150\145\163\151\163\040\151\156\040\162\145\147\145\170\160\000"));
lf[142]=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[143]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\043\165\156\164\145\162\155\151\156\141\164\145\144\040\160\141\162\145\156\164\150\145\163\151\163\040\151\156\040\162\145\147\145\170\160\000"));
lf[144]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\040\165\156\164\145\162\155\151\156\141\164\145\144\040\050\052\047\056\056\056\051\040\123\122\105\040\145\163\143\141\160\145\000"));
lf[145]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\050\142\141\144\040\162\145\147\145\170\160\040\163\171\156\164\141\170\072\040\050\052\106\117\117\051\040\156\157\164\040\163\165\160\160\157\162\164\145\144\000"));
lf[146]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\012\001\154\157\157\153\055\141\150\145\141\144\376\377\016"));
lf[147]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\016\001\156\145\147\055\154\157\157\153\055\141\150\145\141\144\376\377\016"));
lf[148]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\043\165\156\164\145\162\155\151\156\141\164\145\144\040\160\141\162\145\156\164\150\145\163\151\163\040\151\156\040\162\145\147\145\170\160\000"));
lf[149]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\013\001\154\157\157\153\055\142\145\150\151\156\144\376\377\016"));
lf[150]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\017\001\156\145\147\055\154\157\157\153\055\142\145\150\151\156\144\376\377\016"));
lf[151]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\025\151\156\166\141\154\151\144\040\050\077\074\040\163\145\161\165\145\156\143\145\000"));
lf[152]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\006\001\141\164\157\155\151\143\376\377\016"));
lf[153]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\043\165\156\164\145\162\155\151\156\141\164\145\144\040\160\141\162\145\156\164\150\145\163\151\163\040\151\156\040\162\145\147\145\170\160\000"));
lf[154]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\036\151\156\166\141\154\151\144\040\143\157\156\144\151\164\151\157\156\141\154\040\162\145\146\145\162\145\156\143\145\000"));
lf[155]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\002\001\151\146\376\377\016"));
lf[156]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\037\165\156\163\165\160\160\157\162\164\145\144\040\120\145\162\154\055\163\164\171\154\145\040\143\154\165\163\164\145\162\000"));
lf[157]=C_h_intern(&lf[157],6, C_text("w/utf8"));
lf[158]=C_h_intern(&lf[158],8, C_text("w/noutf8"));
lf[159]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\023\151\156\143\157\155\160\154\145\164\145\040\143\154\165\163\164\145\162\000"));
lf[160]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\037\165\156\153\156\157\167\156\040\162\145\147\145\170\040\143\154\165\163\164\145\162\040\155\157\144\151\146\151\145\162\000"));
lf[161]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\027\164\157\157\040\155\141\156\171\040\051\047\163\040\151\156\040\162\145\147\145\170\160\000"));
lf[162]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\024\151\156\143\157\155\160\154\145\164\145\040\143\150\141\162\040\163\145\164\000"));
lf[164]=C_h_intern(&lf[164],19, C_text("scheme#vector->list"));
lf[167]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\015\142\141\144\040\143\150\141\162\055\163\145\164\000"));
lf[168]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\033\151\156\166\145\162\164\145\144\040\162\141\156\147\145\040\151\156\040\143\150\141\162\055\163\145\164\000"));
lf[171]=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[172]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\033\151\156\143\157\155\160\154\145\164\145\040\143\150\141\162\141\143\164\145\162\040\143\154\141\163\163\000"));
lf[174]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\042\143\157\154\154\141\164\151\156\147\040\163\145\161\165\145\156\143\145\163\040\156\157\164\040\163\165\160\160\157\162\164\145\144\000"));
lf[175]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\035\173\040\143\141\156\047\164\040\146\157\154\154\157\167\040\145\155\160\164\171\040\160\141\164\164\145\162\156\000"));
lf[176]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\036\151\156\166\141\154\151\144\040\173\156\175\040\162\145\160\145\164\151\164\151\157\156\040\163\171\156\164\141\170\000"));
lf[177]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\001\000"));
lf[178]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\033\151\156\143\157\155\160\154\145\164\145\040\145\163\143\141\160\145\040\163\145\161\165\145\156\143\145\000"));
lf[179]=C_h_intern(&lf[179],7, C_text("numeric"));
lf[180]=C_h_intern(&lf[180],1, C_text("~"));
lf[181]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\137\000"));
lf[182]=C_h_intern(&lf[182],12, C_text("alphanumeric"));
lf[183]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\137\000"));
lf[184]=C_h_intern(&lf[184],3, C_text("bow"));
lf[185]=C_h_intern(&lf[185],3, C_text("eow"));
lf[186]=C_h_intern(&lf[186],3, C_text("nwb"));
lf[187]=C_h_intern(&lf[187],3, C_text("bos"));
lf[188]=C_h_intern(&lf[188],3, C_text("eos"));
lf[189]=C_h_intern(&lf[189],5, C_text("reset"));
lf[190]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\377\012\000\000\074\376\003\000\000\002\376\377\012\000\000\173\376\003\000\000\002\376\377\012\000\000\047\376\377\016"));
lf[191]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\037\142\141\144\040\134\153\040\165\163\141\147\145\054\040\145\170\160\145\143\164\145\144\040\134\153\074\056\056\056\076\000"));
lf[192]=C_h_intern(&lf[192],10, C_text("backref-ci"));
lf[193]=C_h_intern(&lf[193],7, C_text("backref"));
lf[194]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\033\165\156\164\145\162\155\151\156\141\164\145\144\040\156\141\155\145\144\040\142\141\143\153\162\145\146\000"));
lf[195]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\030\165\156\153\156\157\167\156\040\145\163\143\141\160\145\040\163\145\161\165\145\156\143\145\000"));
lf[196]=C_h_intern(&lf[196],3, C_text("bol"));
lf[197]=C_h_intern(&lf[197],3, C_text("eol"));
lf[198]=C_h_intern(&lf[198],11, C_text("string->sre"));
lf[199]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\022\145\170\160\145\143\164\145\144\040\141\040\163\164\162\151\156\147\000"));
lf[200]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\026\151\156\143\157\155\160\154\145\164\145\040\150\145\170\040\145\163\143\141\160\145\000"));
lf[201]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\034\151\156\143\157\155\160\154\145\164\145\040\150\145\170\040\142\162\141\143\145\040\145\163\143\141\160\145\000"));
lf[202]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\025\142\141\144\040\150\145\170\040\142\162\141\143\145\040\145\163\143\141\160\145\000"));
lf[203]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\026\151\156\143\157\155\160\154\145\164\145\040\150\145\170\040\145\163\143\141\160\145\000"));
lf[204]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\017\142\141\144\040\150\145\170\040\145\163\143\141\160\145\000"));
lf[206]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\024\151\156\166\141\154\151\144\040\165\164\146\070\040\154\145\156\147\164\150\000"));
lf[208]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\024\151\156\166\141\154\151\144\040\165\164\146\070\040\154\145\156\147\164\150\000"));
lf[210]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\040\165\156\151\143\157\144\145\040\143\157\144\145\160\157\151\156\164\040\157\165\164\040\157\146\040\162\141\156\147\145\072\000"));
lf[212]=C_h_intern(&lf[212],3, C_text("map"));
lf[216]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\024\151\156\166\141\154\151\144\040\165\164\146\070\040\154\145\156\147\164\150\000"));
lf[218]=C_h_intern(&lf[218],23, C_text("chicken.irregex#irregex"));
lf[219]=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[220]=C_h_intern(&lf[220],31, C_text("chicken.irregex#string->irregex"));
lf[221]=C_h_intern(&lf[221],28, C_text("chicken.irregex#sre->irregex"));
lf[222]=C_h_intern(&lf[222],5, C_text("small"));
lf[223]=C_h_intern(&lf[223],4, C_text("fast"));
lf[226]=C_h_intern(&lf[226],6, C_text("w/case"));
lf[227]=C_h_intern(&lf[227],8, C_text("w/nocase"));
lf[228]=C_h_intern(&lf[228],1, C_text(":"));
lf[229]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\025\151\156\166\141\154\151\144\040\163\162\145\072\040\145\155\160\164\171\040\052\000"));
lf[230]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\026\151\156\166\141\154\151\144\040\163\162\145\072\040\145\155\160\164\171\040\052\077\000"));
lf[231]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\025\151\156\166\141\154\151\144\040\163\162\145\072\040\145\155\160\164\171\040\053\000"));
lf[232]=C_h_intern(&lf[232],4, C_text("word"));
lf[233]=C_h_intern(&lf[233],5, C_text("word+"));
lf[234]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\137\000"));
lf[235]=C_h_intern(&lf[235],1, C_text("&"));
lf[236]=C_h_intern(&lf[236],12, C_text("posix-string"));
lf[237]=C_h_intern(&lf[237],10, C_text("scheme#not"));
lf[238]=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\001\141\156\171\376\377\016"));
lf[239]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\003\001\145\157\163\376\377\016"));
lf[240]=C_h_intern(&lf[240],6, C_text("atomic"));
lf[241]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\040\165\156\153\156\157\167\156\040\156\141\155\145\144\040\142\141\143\153\162\145\146\040\151\156\040\123\122\105\040\111\106\000"));
lf[242]=C_h_intern(&lf[242],18, C_text("scheme#string-ci=?"));
lf[243]=C_h_intern(&lf[243],15, C_text("scheme#string=?"));
lf[244]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\026\165\156\153\156\157\167\156\040\142\141\143\153\162\145\146\145\162\145\156\143\145\000"));
lf[245]=C_h_intern(&lf[245],3, C_text("dsm"));
lf[246]=C_h_intern(&lf[246],1, C_text("$"));
lf[247]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\030\165\156\153\156\157\167\156\040\162\145\147\145\170\160\040\157\160\145\162\141\164\157\162\000"));
lf[248]=C_h_intern(&lf[248],1, C_text("-"));
lf[250]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\017\165\156\153\156\157\167\156\040\162\145\147\145\170\160\000"));
lf[251]=C_h_intern(&lf[251],16, C_text("scheme#char-ci=?"));
lf[252]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\017\165\156\153\156\157\167\156\040\162\145\147\145\170\160\000"));
lf[255]=C_h_intern(&lf[255],10, C_text("scheme#max"));
lf[256]=C_h_intern(&lf[256],10, C_text("scheme#min"));
lf[257]=C_h_intern(&lf[257],10, C_text("sre-length"));
lf[258]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\026\151\156\166\141\154\151\144\040\142\141\143\153\162\145\146\145\162\145\156\143\145\000"));
lf[259]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\036\151\156\166\141\154\151\144\040\146\157\162\167\141\162\144\040\142\141\143\153\162\145\146\145\162\145\156\143\145\000"));
lf[260]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\026\165\156\153\156\157\167\156\040\142\141\143\153\162\145\146\145\162\145\156\143\145\000"));
lf[261]=C_h_intern(&lf[261],3, C_text(">=?"));
lf[262]=C_h_intern(&lf[262],17, C_text("sre-length-ranges"));
lf[263]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\025\165\156\153\156\157\167\156\040\163\162\145\040\157\160\145\162\141\164\157\162\000"));
lf[264]=C_h_intern(&lf[264],2, C_text("=?"));
lf[265]=C_h_intern(&lf[265],6, C_text("commit"));
lf[266]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\014\165\156\153\156\157\167\156\040\163\162\145\000"));
lf[267]=C_h_intern(&lf[267],11, C_text("scheme#cons"));
lf[270]=C_h_intern(&lf[270],9, C_text("backtrack"));
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\003\001\141\156\171\376\377\016"));
lf[274]=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\001\156\157\156\154\376\377\016"));
lf[275]=C_h_intern(&lf[275],8, C_text("utf8-any"));
lf[276]=C_h_intern(&lf[276],9, C_text("utf8-nonl"));
lf[277]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\007\001\145\160\163\151\154\157\156\376\003\000\000\002\376\001\000\000\003\001\142\157\163\376\003\000\000\002\376\001\000\000\003\001\145\157\163\376\003\000\000\002\376\001\000\000\003\001\142\157\154\376\003\000\000\002\376\001\000\000\003\001\145\157\154\376\003\000\000\002\376\001\000\000\003\001\142\157\167\376\003\000\000\002\376\001\000\000\003\001\145\157\167\376\003\000\000\002\376\001\000\000\006\001\143\157\155\155\151\164\376\377\016"));
lf[279]=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\053\376\377\016"));
lf[282]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\001\001\044\376\003\000\000\002\376\001\000\000\010\001\163\165\142\155\141\164\143\150\376\003\000\000\002\376\001\000\000\002\001\075\076\376\003\000\000\002\376\001\000\000\016\001\163\165\142\155\141\164\143\150\055\156\141\155\145\144\376\377\016"));
lf[283]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\002\001\157\162\376\377\016"));
lf[287]=C_h_intern(&lf[287],30, C_text("chicken.irregex#irregex-search"));
lf[288]=C_h_intern(&lf[288],38, C_text("chicken.irregex#irregex-search/chunked"));
lf[289]=C_h_intern(&lf[289],14, C_text("irregex-search"));
lf[290]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\025\156\157\164\040\141\156\040\145\170\141\143\164\040\151\156\164\145\147\145\162\000"));
lf[291]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\025\156\157\164\040\141\156\040\145\170\141\143\164\040\151\156\164\145\147\145\162\000"));
lf[292]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\015\156\157\164\040\141\040\163\164\162\151\156\147\000"));
lf[294]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\017\156\157\164\040\141\156\040\151\156\164\145\147\145\162\000"));
lf[295]=C_h_intern(&lf[295],11, C_text("irregex-dfa"));
lf[298]=C_h_intern(&lf[298],11, C_text("irregex-nfa"));
lf[299]=C_h_intern(&lf[299],29, C_text("chicken.irregex#irregex-match"));
lf[300]=C_h_intern(&lf[300],37, C_text("chicken.irregex#irregex-match/chunked"));
lf[301]=C_h_intern(&lf[301],13, C_text("irregex-match"));
lf[302]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\025\156\157\164\040\141\156\040\145\170\141\143\164\040\151\156\164\145\147\145\162\000"));
lf[303]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\025\156\157\164\040\141\156\040\145\170\141\143\164\040\151\156\164\145\147\145\162\000"));
lf[304]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\015\156\157\164\040\141\040\163\164\162\151\156\147\000"));
lf[305]=C_h_intern(&lf[305],30, C_text("chicken.irregex#irregex-match?"));
lf[307]=C_h_intern(&lf[307],8, C_text("for-each"));
lf[308]=C_h_intern(&lf[308],10, C_text("alphabetic"));
lf[309]=C_h_intern(&lf[309],5, C_text("alpha"));
lf[310]=C_h_intern(&lf[310],8, C_text("alphanum"));
lf[311]=C_h_intern(&lf[311],5, C_text("alnum"));
lf[312]=C_h_intern(&lf[312],10, C_text("lower-case"));
lf[313]=C_h_intern(&lf[313],5, C_text("lower"));
lf[314]=C_h_intern(&lf[314],10, C_text("upper-case"));
lf[315]=C_h_intern(&lf[315],5, C_text("upper"));
lf[316]=C_h_intern(&lf[316],3, C_text("num"));
lf[317]=C_h_intern(&lf[317],5, C_text("digit"));
lf[318]=C_h_intern(&lf[318],11, C_text("punctuation"));
lf[319]=C_h_intern(&lf[319],5, C_text("punct"));
lf[320]=C_h_intern(&lf[320],7, C_text("graphic"));
lf[321]=C_h_intern(&lf[321],5, C_text("graph"));
lf[322]=C_h_intern(&lf[322],5, C_text("blank"));
lf[323]=C_h_intern(&lf[323],10, C_text("whitespace"));
lf[324]=C_h_intern(&lf[324],5, C_text("white"));
lf[325]=C_h_intern(&lf[325],8, C_text("printing"));
lf[326]=C_h_intern(&lf[326],5, C_text("print"));
lf[327]=C_h_intern(&lf[327],7, C_text("control"));
lf[328]=C_h_intern(&lf[328],5, C_text("cntrl"));
lf[329]=C_h_intern(&lf[329],9, C_text("hex-digit"));
lf[330]=C_h_intern(&lf[330],6, C_text("xdigit"));
lf[331]=C_h_intern(&lf[331],5, C_text("ascii"));
lf[332]=C_h_intern(&lf[332],10, C_text("ascii-nonl"));
lf[333]=C_h_intern(&lf[333],14, C_text("utf8-tail-char"));
lf[334]=C_h_intern(&lf[334],11, C_text("utf8-2-char"));
lf[335]=C_h_intern(&lf[335],11, C_text("utf8-3-char"));
lf[336]=C_h_intern(&lf[336],11, C_text("utf8-4-char"));
lf[337]=C_h_intern(&lf[337],7, C_text("integer"));
lf[338]=C_h_intern(&lf[338],4, C_text("real"));
lf[339]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\017\041\044\045\046\052\057\072\074\075\076\077\136\137\176\000"));
lf[340]=C_h_intern(&lf[340],14, C_text("symbol-initial"));
lf[341]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\005\053\055\056\100\000"));
lf[342]=C_h_intern(&lf[342],17, C_text("symbol-subsequent"));
lf[343]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\003\053\055\000"));
lf[344]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\056\000"));
lf[345]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\003\056\056\000"));
lf[346]=C_h_intern(&lf[346],6, C_text("symbol"));
lf[347]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\073\000"));
lf[348]=C_h_intern(&lf[348],10, C_text("sexp-space"));
lf[349]=C_h_intern(&lf[349],6, C_text("escape"));
lf[350]=C_h_intern(&lf[350],6, C_text("string"));
lf[351]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\003\061\062\000"));
lf[352]=C_h_intern(&lf[352],10, C_text("ipv4-digit"));
lf[353]=C_h_intern(&lf[353],12, C_text("ipv4-address"));
lf[354]=C_h_intern(&lf[354],12, C_text("ipv6-address"));
lf[355]=C_h_intern(&lf[355],10, C_text("ip-address"));
lf[356]=C_h_intern(&lf[356],11, C_text("domain-atom"));
lf[357]=C_h_intern(&lf[357],6, C_text("domain"));
lf[358]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\005\141\162\160\141\000"));
lf[359]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\004\143\157\155\000"));
lf[360]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\004\147\157\166\000"));
lf[361]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\004\155\151\154\000"));
lf[362]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\004\156\145\164\000"));
lf[363]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\004\157\162\147\000"));
lf[364]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\004\145\144\165\000"));
lf[365]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\005\141\145\162\157\000"));
lf[366]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\004\142\151\172\000"));
lf[367]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\005\143\157\157\160\000"));
lf[368]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\005\151\156\146\157\000"));
lf[369]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\007\155\165\163\145\165\155\000"));
lf[370]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\005\156\141\155\145\000"));
lf[371]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\004\160\162\157\000"));
lf[372]=C_h_intern(&lf[372],16, C_text("top-level-domain"));
lf[373]=C_h_intern(&lf[373],13, C_text("domain/common"));
lf[374]=C_h_intern(&lf[374],16, C_text("email-local-part"));
lf[375]=C_h_intern(&lf[375],5, C_text("email"));
lf[376]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\045\000"));
lf[377]=C_h_intern(&lf[377],8, C_text("url-char"));
lf[378]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\045\000"));
lf[379]=C_h_intern(&lf[379],14, C_text("url-final-char"));
lf[380]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\163\000"));
lf[381]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\072\000"));
lf[382]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\057\000"));
lf[383]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\077\000"));
lf[384]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\043\000"));
lf[385]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\057\000"));
lf[386]=C_h_intern(&lf[386],8, C_text("http-url"));
lf[387]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\005\150\164\164\160\000"));
lf[388]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\004\072\057\057\000"));
lf[391]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\001\000"));
lf[393]=C_h_intern(&lf[393],12, C_text("scheme#cadar"));
lf[394]=C_h_intern(&lf[394],12, C_text("scheme#cddar"));
lf[395]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\001\000\000\007\001\145\160\163\151\154\157\156\376\377\016"));
lf[396]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\035\156\157\156\055\160\162\157\143\145\144\165\162\145\040\151\156\040\157\160\040\160\157\163\151\164\151\157\156\000"));
lf[402]=C_h_intern(&lf[402],13, C_text("scheme#caddar"));
lf[407]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\042\156\157\164\040\141\040\166\141\154\151\144\040\163\162\145\040\143\150\141\162\055\163\145\164\040\157\160\145\162\141\164\157\162\000"));
lf[408]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\031\156\157\164\040\141\040\166\141\154\151\144\040\163\162\145\040\143\150\141\162\055\163\145\164\000"));
lf[410]=C_h_intern(&lf[410],19, C_text("scheme#list->vector"));
lf[412]=C_h_intern(&lf[412],12, C_text("irregex-fold"));
lf[413]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\025\156\157\164\040\141\156\040\145\170\141\143\164\040\151\156\164\145\147\145\162\000"));
lf[414]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\025\156\157\164\040\141\156\040\145\170\141\143\164\040\151\156\164\145\147\145\162\000"));
lf[415]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\015\156\157\164\040\141\040\163\164\162\151\156\147\000"));
lf[416]=C_h_intern(&lf[416],28, C_text("chicken.irregex#irregex-fold"));
lf[417]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\020\156\157\164\040\141\040\160\162\157\143\145\144\165\162\145\000"));
lf[419]=C_h_intern(&lf[419],20, C_text("irregex-fold/chunked"));
lf[420]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\017\156\157\164\040\141\156\040\151\156\164\145\147\145\162\000"));
lf[421]=C_h_intern(&lf[421],36, C_text("chicken.irregex#irregex-fold/chunked"));
lf[422]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\020\156\157\164\040\141\040\160\162\157\143\145\144\165\162\145\000"));
lf[423]=C_h_intern(&lf[423],31, C_text("chicken.irregex#irregex-replace"));
lf[425]=C_h_intern(&lf[425],15, C_text("irregex-replace"));
lf[426]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\015\156\157\164\040\141\040\163\164\162\151\156\147\000"));
lf[427]=C_h_intern(&lf[427],35, C_text("chicken.irregex#irregex-replace/all"));
lf[428]=C_h_intern(&lf[428],19, C_text("irregex-replace/all"));
lf[429]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\015\156\157\164\040\141\040\163\164\162\151\156\147\000"));
lf[430]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\001\000"));
lf[431]=C_h_intern(&lf[431],3, C_text("pre"));
lf[432]=C_h_intern(&lf[432],4, C_text("post"));
lf[433]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\032\165\156\153\156\157\167\156\040\155\141\164\143\150\040\162\145\160\154\141\143\145\155\145\156\164\000"));
lf[434]=C_h_intern(&lf[434],31, C_text("chicken.irregex#irregex-extract"));
lf[435]=C_h_intern(&lf[435],15, C_text("irregex-extract"));
lf[436]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\015\156\157\164\040\141\040\163\164\162\151\156\147\000"));
lf[437]=C_h_intern(&lf[437],29, C_text("chicken.irregex#irregex-split"));
lf[438]=C_h_intern(&lf[438],20, C_text("scheme#string-append"));
lf[439]=C_h_intern(&lf[439],13, C_text("irregex-split"));
lf[440]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\015\156\157\164\040\141\040\163\164\162\151\156\147\000"));
lf[441]=C_h_intern(&lf[441],29, C_text("chicken.irregex#irregex-quote"));
lf[442]=C_h_intern(&lf[442],18, C_text("##sys#list->string"));
lf[443]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\020\134\174\133\135\050\051\173\175\056\052\053\077\136\044\043\000"));
lf[444]=C_h_intern(&lf[444],27, C_text("chicken.irregex#irregex-opt"));
lf[445]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\001\000"));
lf[446]=C_h_intern(&lf[446],12, C_text("scheme#char?"));
lf[447]=C_decode_literal(C_heaptop,C_text("\376\003\000\000\002\376\002\000\000\001\000\376\377\016"));
lf[449]=C_h_intern(&lf[449],24, C_text("scheme#get-output-string"));
lf[450]=C_h_intern(&lf[450],14, C_text("scheme#display"));
lf[451]=C_h_intern(&lf[451],21, C_text("##sys#write-char/port"));
lf[452]=C_h_intern(&lf[452],25, C_text("scheme#open-output-string"));
lf[453]=C_h_intern(&lf[453],27, C_text("chicken.irregex#sre->string"));
lf[454]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\051\000"));
lf[455]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\004\050\077\072\000"));
lf[456]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\051\000"));
lf[457]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\050\000"));
lf[458]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\051\000"));
lf[459]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\076\000"));
lf[460]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\004\050\077\074\000"));
lf[461]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\174\000"));
lf[462]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\051\000"));
lf[463]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\004\050\077\072\000"));
lf[464]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\051\000"));
lf[465]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\004\050\077\072\000"));
lf[466]=C_h_intern(&lf[466],3, C_text("not"));
lf[467]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\135\000"));
lf[468]=C_h_intern(&lf[468],12, C_text("scheme#cdadr"));
lf[469]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\003\133\136\000"));
lf[470]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\051\143\141\156\047\164\040\162\145\160\162\145\163\145\156\164\040\147\145\156\145\162\141\154\040\047\156\157\164\047\040\151\156\040\163\164\162\151\156\147\163\000"));
lf[471]=C_h_intern(&lf[471],4, C_text("cset"));
lf[472]=C_h_intern(&lf[472],12, C_text("scheme#caadr"));
lf[473]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\135\000"));
lf[474]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\133\000"));
lf[475]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\135\000"));
lf[476]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\003\133\136\000"));
lf[477]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\051\000"));
lf[478]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\072\000"));
lf[479]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\055\000"));
lf[480]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\003\050\077\000"));
lf[481]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\025\165\156\153\156\157\167\156\040\163\162\145\040\157\160\145\162\141\164\157\162\000"));
lf[482]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\136\000"));
lf[483]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\044\000"));
lf[484]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\002\056\000"));
lf[485]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\023\165\156\153\156\157\167\156\040\163\162\145\040\163\171\155\142\157\154\000"));
lf[486]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\024\165\156\153\156\157\167\156\040\163\162\145\040\160\141\164\164\145\162\156\000"));
lf[487]=C_h_intern(&lf[487],25, C_text("chicken.irregex#glob->sre"));
lf[488]=C_h_intern(&lf[488],9, C_text("glob->sre"));
lf[489]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\004\056\057\134\000"));
lf[490]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\003\057\134\000"));
lf[491]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\004\056\057\134\000"));
lf[492]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\003\057\134\000"));
lf[493]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\042\165\156\145\170\160\145\143\164\145\144\040\145\156\144\040\157\146\040\143\150\141\162\141\143\164\145\162\040\143\154\141\163\163\000"));
lf[494]=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\057\376\377\016"));
lf[495]=C_h_intern(&lf[495],10, C_text("scheme#car"));
lf[496]=C_h_intern(&lf[496],11, C_text("scheme#cadr"));
lf[497]=C_h_intern(&lf[497],12, C_text("scheme#caddr"));
lf[498]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\003\051\076\000"));
lf[499]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\003\145\163\000"));
lf[500]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\012\040\163\165\142\155\141\164\143\150\000"));
lf[501]=C_decode_literal(C_heaptop,C_text("\376\002\000\000\021\043\074\162\145\147\145\170\160\055\155\141\164\143\150\040\050\000"));
lf[502]=C_h_intern(&lf[502],32, C_text("chicken.base#set-record-printer!"));
C_register_lf2(lf,503,create_ptable());{}
t2=C_a_i_provide(&a,1,lf[0]);
t3=C_a_i_provide(&a,1,lf[1]);
t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7738,a[2]=t1,tmp=(C_word)a,a+=3,tmp);{
C_word *av2=av;
av2[0]=C_SCHEME_UNDEFINED;
av2[1]=t4;
C_library_toplevel(2,av2);}}

#ifdef C_ENABLE_PTABLES
static C_PTABLE_ENTRY ptable[1216] = {
{C_text("f34268:irregex_2escm"),(void*)f34268},
{C_text("f34272:irregex_2escm"),(void*)f34272},
{C_text("f_10005:irregex_2escm"),(void*)f_10005},
{C_text("f_10025:irregex_2escm"),(void*)f_10025},
{C_text("f_10031:irregex_2escm"),(void*)f_10031},
{C_text("f_10048:irregex_2escm"),(void*)f_10048},
{C_text("f_10052:irregex_2escm"),(void*)f_10052},
{C_text("f_10099:irregex_2escm"),(void*)f_10099},
{C_text("f_10148:irregex_2escm"),(void*)f_10148},
{C_text("f_10176:irregex_2escm"),(void*)f_10176},
{C_text("f_10187:irregex_2escm"),(void*)f_10187},
{C_text("f_10233:irregex_2escm"),(void*)f_10233},
{C_text("f_10236:irregex_2escm"),(void*)f_10236},
{C_text("f_10250:irregex_2escm"),(void*)f_10250},
{C_text("f_10275:irregex_2escm"),(void*)f_10275},
{C_text("f_10282:irregex_2escm"),(void*)f_10282},
{C_text("f_10301:irregex_2escm"),(void*)f_10301},
{C_text("f_10334:irregex_2escm"),(void*)f_10334},
{C_text("f_10352:irregex_2escm"),(void*)f_10352},
{C_text("f_10372:irregex_2escm"),(void*)f_10372},
{C_text("f_10452:irregex_2escm"),(void*)f_10452},
{C_text("f_10462:irregex_2escm"),(void*)f_10462},
{C_text("f_10465:irregex_2escm"),(void*)f_10465},
{C_text("f_10472:irregex_2escm"),(void*)f_10472},
{C_text("f_10475:irregex_2escm"),(void*)f_10475},
{C_text("f_10523:irregex_2escm"),(void*)f_10523},
{C_text("f_10544:irregex_2escm"),(void*)f_10544},
{C_text("f_10550:irregex_2escm"),(void*)f_10550},
{C_text("f_10568:irregex_2escm"),(void*)f_10568},
{C_text("f_10579:irregex_2escm"),(void*)f_10579},
{C_text("f_10667:irregex_2escm"),(void*)f_10667},
{C_text("f_10679:irregex_2escm"),(void*)f_10679},
{C_text("f_10683:irregex_2escm"),(void*)f_10683},
{C_text("f_10689:irregex_2escm"),(void*)f_10689},
{C_text("f_10694:irregex_2escm"),(void*)f_10694},
{C_text("f_10697:irregex_2escm"),(void*)f_10697},
{C_text("f_10719:irregex_2escm"),(void*)f_10719},
{C_text("f_10736:irregex_2escm"),(void*)f_10736},
{C_text("f_10739:irregex_2escm"),(void*)f_10739},
{C_text("f_10741:irregex_2escm"),(void*)f_10741},
{C_text("f_10775:irregex_2escm"),(void*)f_10775},
{C_text("f_10789:irregex_2escm"),(void*)f_10789},
{C_text("f_10793:irregex_2escm"),(void*)f_10793},
{C_text("f_10795:irregex_2escm"),(void*)f_10795},
{C_text("f_10802:irregex_2escm"),(void*)f_10802},
{C_text("f_10811:irregex_2escm"),(void*)f_10811},
{C_text("f_10831:irregex_2escm"),(void*)f_10831},
{C_text("f_10835:irregex_2escm"),(void*)f_10835},
{C_text("f_10839:irregex_2escm"),(void*)f_10839},
{C_text("f_10867:irregex_2escm"),(void*)f_10867},
{C_text("f_10871:irregex_2escm"),(void*)f_10871},
{C_text("f_10874:irregex_2escm"),(void*)f_10874},
{C_text("f_10877:irregex_2escm"),(void*)f_10877},
{C_text("f_10880:irregex_2escm"),(void*)f_10880},
{C_text("f_10885:irregex_2escm"),(void*)f_10885},
{C_text("f_10888:irregex_2escm"),(void*)f_10888},
{C_text("f_10958:irregex_2escm"),(void*)f_10958},
{C_text("f_10974:irregex_2escm"),(void*)f_10974},
{C_text("f_11050:irregex_2escm"),(void*)f_11050},
{C_text("f_11061:irregex_2escm"),(void*)f_11061},
{C_text("f_11075:irregex_2escm"),(void*)f_11075},
{C_text("f_11097:irregex_2escm"),(void*)f_11097},
{C_text("f_11100:irregex_2escm"),(void*)f_11100},
{C_text("f_11112:irregex_2escm"),(void*)f_11112},
{C_text("f_11172:irregex_2escm"),(void*)f_11172},
{C_text("f_11201:irregex_2escm"),(void*)f_11201},
{C_text("f_11332:irregex_2escm"),(void*)f_11332},
{C_text("f_11338:irregex_2escm"),(void*)f_11338},
{C_text("f_11353:irregex_2escm"),(void*)f_11353},
{C_text("f_11424:irregex_2escm"),(void*)f_11424},
{C_text("f_11454:irregex_2escm"),(void*)f_11454},
{C_text("f_11464:irregex_2escm"),(void*)f_11464},
{C_text("f_11486:irregex_2escm"),(void*)f_11486},
{C_text("f_11521:irregex_2escm"),(void*)f_11521},
{C_text("f_11536:irregex_2escm"),(void*)f_11536},
{C_text("f_11562:irregex_2escm"),(void*)f_11562},
{C_text("f_11585:irregex_2escm"),(void*)f_11585},
{C_text("f_11608:irregex_2escm"),(void*)f_11608},
{C_text("f_11650:irregex_2escm"),(void*)f_11650},
{C_text("f_11673:irregex_2escm"),(void*)f_11673},
{C_text("f_11676:irregex_2escm"),(void*)f_11676},
{C_text("f_11702:irregex_2escm"),(void*)f_11702},
{C_text("f_11706:irregex_2escm"),(void*)f_11706},
{C_text("f_11710:irregex_2escm"),(void*)f_11710},
{C_text("f_11762:irregex_2escm"),(void*)f_11762},
{C_text("f_11787:irregex_2escm"),(void*)f_11787},
{C_text("f_11790:irregex_2escm"),(void*)f_11790},
{C_text("f_11820:irregex_2escm"),(void*)f_11820},
{C_text("f_11824:irregex_2escm"),(void*)f_11824},
{C_text("f_11839:irregex_2escm"),(void*)f_11839},
{C_text("f_11842:irregex_2escm"),(void*)f_11842},
{C_text("f_11863:irregex_2escm"),(void*)f_11863},
{C_text("f_11867:irregex_2escm"),(void*)f_11867},
{C_text("f_11890:irregex_2escm"),(void*)f_11890},
{C_text("f_11921:irregex_2escm"),(void*)f_11921},
{C_text("f_11924:irregex_2escm"),(void*)f_11924},
{C_text("f_11933:irregex_2escm"),(void*)f_11933},
{C_text("f_12077:irregex_2escm"),(void*)f_12077},
{C_text("f_12108:irregex_2escm"),(void*)f_12108},
{C_text("f_12199:irregex_2escm"),(void*)f_12199},
{C_text("f_12214:irregex_2escm"),(void*)f_12214},
{C_text("f_12234:irregex_2escm"),(void*)f_12234},
{C_text("f_12238:irregex_2escm"),(void*)f_12238},
{C_text("f_12257:irregex_2escm"),(void*)f_12257},
{C_text("f_12266:irregex_2escm"),(void*)f_12266},
{C_text("f_12282:irregex_2escm"),(void*)f_12282},
{C_text("f_12285:irregex_2escm"),(void*)f_12285},
{C_text("f_12288:irregex_2escm"),(void*)f_12288},
{C_text("f_12291:irregex_2escm"),(void*)f_12291},
{C_text("f_12300:irregex_2escm"),(void*)f_12300},
{C_text("f_12410:irregex_2escm"),(void*)f_12410},
{C_text("f_12486:irregex_2escm"),(void*)f_12486},
{C_text("f_12513:irregex_2escm"),(void*)f_12513},
{C_text("f_12536:irregex_2escm"),(void*)f_12536},
{C_text("f_12563:irregex_2escm"),(void*)f_12563},
{C_text("f_12590:irregex_2escm"),(void*)f_12590},
{C_text("f_12621:irregex_2escm"),(void*)f_12621},
{C_text("f_12656:irregex_2escm"),(void*)f_12656},
{C_text("f_12679:irregex_2escm"),(void*)f_12679},
{C_text("f_12702:irregex_2escm"),(void*)f_12702},
{C_text("f_12733:irregex_2escm"),(void*)f_12733},
{C_text("f_12756:irregex_2escm"),(void*)f_12756},
{C_text("f_12779:irregex_2escm"),(void*)f_12779},
{C_text("f_12802:irregex_2escm"),(void*)f_12802},
{C_text("f_12825:irregex_2escm"),(void*)f_12825},
{C_text("f_12848:irregex_2escm"),(void*)f_12848},
{C_text("f_12859:irregex_2escm"),(void*)f_12859},
{C_text("f_12879:irregex_2escm"),(void*)f_12879},
{C_text("f_12883:irregex_2escm"),(void*)f_12883},
{C_text("f_12907:irregex_2escm"),(void*)f_12907},
{C_text("f_12910:irregex_2escm"),(void*)f_12910},
{C_text("f_12913:irregex_2escm"),(void*)f_12913},
{C_text("f_12948:irregex_2escm"),(void*)f_12948},
{C_text("f_12952:irregex_2escm"),(void*)f_12952},
{C_text("f_12979:irregex_2escm"),(void*)f_12979},
{C_text("f_12987:irregex_2escm"),(void*)f_12987},
{C_text("f_13047:irregex_2escm"),(void*)f_13047},
{C_text("f_13090:irregex_2escm"),(void*)f_13090},
{C_text("f_13102:irregex_2escm"),(void*)f_13102},
{C_text("f_13111:irregex_2escm"),(void*)f_13111},
{C_text("f_13131:irregex_2escm"),(void*)f_13131},
{C_text("f_13135:irregex_2escm"),(void*)f_13135},
{C_text("f_13139:irregex_2escm"),(void*)f_13139},
{C_text("f_13191:irregex_2escm"),(void*)f_13191},
{C_text("f_13207:irregex_2escm"),(void*)f_13207},
{C_text("f_13271:irregex_2escm"),(void*)f_13271},
{C_text("f_13297:irregex_2escm"),(void*)f_13297},
{C_text("f_13326:irregex_2escm"),(void*)f_13326},
{C_text("f_13354:irregex_2escm"),(void*)f_13354},
{C_text("f_13375:irregex_2escm"),(void*)f_13375},
{C_text("f_13393:irregex_2escm"),(void*)f_13393},
{C_text("f_13507:irregex_2escm"),(void*)f_13507},
{C_text("f_13526:irregex_2escm"),(void*)f_13526},
{C_text("f_13538:irregex_2escm"),(void*)f_13538},
{C_text("f_13541:irregex_2escm"),(void*)f_13541},
{C_text("f_13575:irregex_2escm"),(void*)f_13575},
{C_text("f_13578:irregex_2escm"),(void*)f_13578},
{C_text("f_13622:irregex_2escm"),(void*)f_13622},
{C_text("f_13657:irregex_2escm"),(void*)f_13657},
{C_text("f_13667:irregex_2escm"),(void*)f_13667},
{C_text("f_13674:irregex_2escm"),(void*)f_13674},
{C_text("f_13695:irregex_2escm"),(void*)f_13695},
{C_text("f_13705:irregex_2escm"),(void*)f_13705},
{C_text("f_13722:irregex_2escm"),(void*)f_13722},
{C_text("f_13739:irregex_2escm"),(void*)f_13739},
{C_text("f_13750:irregex_2escm"),(void*)f_13750},
{C_text("f_13751:irregex_2escm"),(void*)f_13751},
{C_text("f_13772:irregex_2escm"),(void*)f_13772},
{C_text("f_13784:irregex_2escm"),(void*)f_13784},
{C_text("f_13794:irregex_2escm"),(void*)f_13794},
{C_text("f_13897:irregex_2escm"),(void*)f_13897},
{C_text("f_13906:irregex_2escm"),(void*)f_13906},
{C_text("f_13912:irregex_2escm"),(void*)f_13912},
{C_text("f_13915:irregex_2escm"),(void*)f_13915},
{C_text("f_13925:irregex_2escm"),(void*)f_13925},
{C_text("f_13932:irregex_2escm"),(void*)f_13932},
{C_text("f_13936:irregex_2escm"),(void*)f_13936},
{C_text("f_13980:irregex_2escm"),(void*)f_13980},
{C_text("f_14019:irregex_2escm"),(void*)f_14019},
{C_text("f_14029:irregex_2escm"),(void*)f_14029},
{C_text("f_14033:irregex_2escm"),(void*)f_14033},
{C_text("f_14037:irregex_2escm"),(void*)f_14037},
{C_text("f_14052:irregex_2escm"),(void*)f_14052},
{C_text("f_14060:irregex_2escm"),(void*)f_14060},
{C_text("f_14064:irregex_2escm"),(void*)f_14064},
{C_text("f_14083:irregex_2escm"),(void*)f_14083},
{C_text("f_14136:irregex_2escm"),(void*)f_14136},
{C_text("f_14150:irregex_2escm"),(void*)f_14150},
{C_text("f_14154:irregex_2escm"),(void*)f_14154},
{C_text("f_14158:irregex_2escm"),(void*)f_14158},
{C_text("f_14168:irregex_2escm"),(void*)f_14168},
{C_text("f_14226:irregex_2escm"),(void*)f_14226},
{C_text("f_14247:irregex_2escm"),(void*)f_14247},
{C_text("f_14250:irregex_2escm"),(void*)f_14250},
{C_text("f_14451:irregex_2escm"),(void*)f_14451},
{C_text("f_14489:irregex_2escm"),(void*)f_14489},
{C_text("f_14565:irregex_2escm"),(void*)f_14565},
{C_text("f_14706:irregex_2escm"),(void*)f_14706},
{C_text("f_14709:irregex_2escm"),(void*)f_14709},
{C_text("f_14730:irregex_2escm"),(void*)f_14730},
{C_text("f_14735:irregex_2escm"),(void*)f_14735},
{C_text("f_14770:irregex_2escm"),(void*)f_14770},
{C_text("f_14795:irregex_2escm"),(void*)f_14795},
{C_text("f_14799:irregex_2escm"),(void*)f_14799},
{C_text("f_14810:irregex_2escm"),(void*)f_14810},
{C_text("f_14818:irregex_2escm"),(void*)f_14818},
{C_text("f_14844:irregex_2escm"),(void*)f_14844},
{C_text("f_14874:irregex_2escm"),(void*)f_14874},
{C_text("f_14887:irregex_2escm"),(void*)f_14887},
{C_text("f_14895:irregex_2escm"),(void*)f_14895},
{C_text("f_14925:irregex_2escm"),(void*)f_14925},
{C_text("f_14927:irregex_2escm"),(void*)f_14927},
{C_text("f_14963:irregex_2escm"),(void*)f_14963},
{C_text("f_14999:irregex_2escm"),(void*)f_14999},
{C_text("f_15022:irregex_2escm"),(void*)f_15022},
{C_text("f_15024:irregex_2escm"),(void*)f_15024},
{C_text("f_15066:irregex_2escm"),(void*)f_15066},
{C_text("f_15076:irregex_2escm"),(void*)f_15076},
{C_text("f_15082:irregex_2escm"),(void*)f_15082},
{C_text("f_15108:irregex_2escm"),(void*)f_15108},
{C_text("f_15110:irregex_2escm"),(void*)f_15110},
{C_text("f_15150:irregex_2escm"),(void*)f_15150},
{C_text("f_15156:irregex_2escm"),(void*)f_15156},
{C_text("f_15164:irregex_2escm"),(void*)f_15164},
{C_text("f_15187:irregex_2escm"),(void*)f_15187},
{C_text("f_15189:irregex_2escm"),(void*)f_15189},
{C_text("f_15231:irregex_2escm"),(void*)f_15231},
{C_text("f_15241:irregex_2escm"),(void*)f_15241},
{C_text("f_15247:irregex_2escm"),(void*)f_15247},
{C_text("f_15273:irregex_2escm"),(void*)f_15273},
{C_text("f_15275:irregex_2escm"),(void*)f_15275},
{C_text("f_15315:irregex_2escm"),(void*)f_15315},
{C_text("f_15321:irregex_2escm"),(void*)f_15321},
{C_text("f_15340:irregex_2escm"),(void*)f_15340},
{C_text("f_15349:irregex_2escm"),(void*)f_15349},
{C_text("f_15361:irregex_2escm"),(void*)f_15361},
{C_text("f_15387:irregex_2escm"),(void*)f_15387},
{C_text("f_15393:irregex_2escm"),(void*)f_15393},
{C_text("f_15395:irregex_2escm"),(void*)f_15395},
{C_text("f_15449:irregex_2escm"),(void*)f_15449},
{C_text("f_15457:irregex_2escm"),(void*)f_15457},
{C_text("f_15464:irregex_2escm"),(void*)f_15464},
{C_text("f_15470:irregex_2escm"),(void*)f_15470},
{C_text("f_15516:irregex_2escm"),(void*)f_15516},
{C_text("f_15518:irregex_2escm"),(void*)f_15518},
{C_text("f_15574:irregex_2escm"),(void*)f_15574},
{C_text("f_15595:irregex_2escm"),(void*)f_15595},
{C_text("f_15620:irregex_2escm"),(void*)f_15620},
{C_text("f_15647:irregex_2escm"),(void*)f_15647},
{C_text("f_15677:irregex_2escm"),(void*)f_15677},
{C_text("f_15679:irregex_2escm"),(void*)f_15679},
{C_text("f_15794:irregex_2escm"),(void*)f_15794},
{C_text("f_15796:irregex_2escm"),(void*)f_15796},
{C_text("f_15852:irregex_2escm"),(void*)f_15852},
{C_text("f_15860:irregex_2escm"),(void*)f_15860},
{C_text("f_15862:irregex_2escm"),(void*)f_15862},
{C_text("f_15876:irregex_2escm"),(void*)f_15876},
{C_text("f_15880:irregex_2escm"),(void*)f_15880},
{C_text("f_15898:irregex_2escm"),(void*)f_15898},
{C_text("f_15907:irregex_2escm"),(void*)f_15907},
{C_text("f_15922:irregex_2escm"),(void*)f_15922},
{C_text("f_15974:irregex_2escm"),(void*)f_15974},
{C_text("f_15977:irregex_2escm"),(void*)f_15977},
{C_text("f_16034:irregex_2escm"),(void*)f_16034},
{C_text("f_16045:irregex_2escm"),(void*)f_16045},
{C_text("f_16047:irregex_2escm"),(void*)f_16047},
{C_text("f_16072:irregex_2escm"),(void*)f_16072},
{C_text("f_16095:irregex_2escm"),(void*)f_16095},
{C_text("f_16106:irregex_2escm"),(void*)f_16106},
{C_text("f_16108:irregex_2escm"),(void*)f_16108},
{C_text("f_16133:irregex_2escm"),(void*)f_16133},
{C_text("f_16149:irregex_2escm"),(void*)f_16149},
{C_text("f_16158:irregex_2escm"),(void*)f_16158},
{C_text("f_16164:irregex_2escm"),(void*)f_16164},
{C_text("f_16174:irregex_2escm"),(void*)f_16174},
{C_text("f_16181:irregex_2escm"),(void*)f_16181},
{C_text("f_16216:irregex_2escm"),(void*)f_16216},
{C_text("f_16218:irregex_2escm"),(void*)f_16218},
{C_text("f_16243:irregex_2escm"),(void*)f_16243},
{C_text("f_16272:irregex_2escm"),(void*)f_16272},
{C_text("f_16274:irregex_2escm"),(void*)f_16274},
{C_text("f_16299:irregex_2escm"),(void*)f_16299},
{C_text("f_16363:irregex_2escm"),(void*)f_16363},
{C_text("f_16376:irregex_2escm"),(void*)f_16376},
{C_text("f_16379:irregex_2escm"),(void*)f_16379},
{C_text("f_16381:irregex_2escm"),(void*)f_16381},
{C_text("f_16428:irregex_2escm"),(void*)f_16428},
{C_text("f_16435:irregex_2escm"),(void*)f_16435},
{C_text("f_16489:irregex_2escm"),(void*)f_16489},
{C_text("f_16556:irregex_2escm"),(void*)f_16556},
{C_text("f_16564:irregex_2escm"),(void*)f_16564},
{C_text("f_16566:irregex_2escm"),(void*)f_16566},
{C_text("f_16570:irregex_2escm"),(void*)f_16570},
{C_text("f_16573:irregex_2escm"),(void*)f_16573},
{C_text("f_16576:irregex_2escm"),(void*)f_16576},
{C_text("f_16579:irregex_2escm"),(void*)f_16579},
{C_text("f_16585:irregex_2escm"),(void*)f_16585},
{C_text("f_16588:irregex_2escm"),(void*)f_16588},
{C_text("f_16591:irregex_2escm"),(void*)f_16591},
{C_text("f_16594:irregex_2escm"),(void*)f_16594},
{C_text("f_16597:irregex_2escm"),(void*)f_16597},
{C_text("f_16612:irregex_2escm"),(void*)f_16612},
{C_text("f_16626:irregex_2escm"),(void*)f_16626},
{C_text("f_16631:irregex_2escm"),(void*)f_16631},
{C_text("f_16657:irregex_2escm"),(void*)f_16657},
{C_text("f_16661:irregex_2escm"),(void*)f_16661},
{C_text("f_16699:irregex_2escm"),(void*)f_16699},
{C_text("f_16716:irregex_2escm"),(void*)f_16716},
{C_text("f_16759:irregex_2escm"),(void*)f_16759},
{C_text("f_16866:irregex_2escm"),(void*)f_16866},
{C_text("f_16889:irregex_2escm"),(void*)f_16889},
{C_text("f_16967:irregex_2escm"),(void*)f_16967},
{C_text("f_17012:irregex_2escm"),(void*)f_17012},
{C_text("f_17029:irregex_2escm"),(void*)f_17029},
{C_text("f_17101:irregex_2escm"),(void*)f_17101},
{C_text("f_17105:irregex_2escm"),(void*)f_17105},
{C_text("f_17142:irregex_2escm"),(void*)f_17142},
{C_text("f_17218:irregex_2escm"),(void*)f_17218},
{C_text("f_17222:irregex_2escm"),(void*)f_17222},
{C_text("f_17259:irregex_2escm"),(void*)f_17259},
{C_text("f_17272:irregex_2escm"),(void*)f_17272},
{C_text("f_17335:irregex_2escm"),(void*)f_17335},
{C_text("f_17361:irregex_2escm"),(void*)f_17361},
{C_text("f_17374:irregex_2escm"),(void*)f_17374},
{C_text("f_17380:irregex_2escm"),(void*)f_17380},
{C_text("f_17401:irregex_2escm"),(void*)f_17401},
{C_text("f_17407:irregex_2escm"),(void*)f_17407},
{C_text("f_17437:irregex_2escm"),(void*)f_17437},
{C_text("f_17474:irregex_2escm"),(void*)f_17474},
{C_text("f_17477:irregex_2escm"),(void*)f_17477},
{C_text("f_17484:irregex_2escm"),(void*)f_17484},
{C_text("f_17486:irregex_2escm"),(void*)f_17486},
{C_text("f_17489:irregex_2escm"),(void*)f_17489},
{C_text("f_17529:irregex_2escm"),(void*)f_17529},
{C_text("f_17545:irregex_2escm"),(void*)f_17545},
{C_text("f_17558:irregex_2escm"),(void*)f_17558},
{C_text("f_17565:irregex_2escm"),(void*)f_17565},
{C_text("f_17598:irregex_2escm"),(void*)f_17598},
{C_text("f_17628:irregex_2escm"),(void*)f_17628},
{C_text("f_17643:irregex_2escm"),(void*)f_17643},
{C_text("f_17680:irregex_2escm"),(void*)f_17680},
{C_text("f_17696:irregex_2escm"),(void*)f_17696},
{C_text("f_17700:irregex_2escm"),(void*)f_17700},
{C_text("f_17713:irregex_2escm"),(void*)f_17713},
{C_text("f_17736:irregex_2escm"),(void*)f_17736},
{C_text("f_17739:irregex_2escm"),(void*)f_17739},
{C_text("f_17746:irregex_2escm"),(void*)f_17746},
{C_text("f_17748:irregex_2escm"),(void*)f_17748},
{C_text("f_17762:irregex_2escm"),(void*)f_17762},
{C_text("f_17776:irregex_2escm"),(void*)f_17776},
{C_text("f_17801:irregex_2escm"),(void*)f_17801},
{C_text("f_17805:irregex_2escm"),(void*)f_17805},
{C_text("f_17882:irregex_2escm"),(void*)f_17882},
{C_text("f_17895:irregex_2escm"),(void*)f_17895},
{C_text("f_17931:irregex_2escm"),(void*)f_17931},
{C_text("f_17940:irregex_2escm"),(void*)f_17940},
{C_text("f_18040:irregex_2escm"),(void*)f_18040},
{C_text("f_18049:irregex_2escm"),(void*)f_18049},
{C_text("f_18067:irregex_2escm"),(void*)f_18067},
{C_text("f_18070:irregex_2escm"),(void*)f_18070},
{C_text("f_18088:irregex_2escm"),(void*)f_18088},
{C_text("f_18135:irregex_2escm"),(void*)f_18135},
{C_text("f_18209:irregex_2escm"),(void*)f_18209},
{C_text("f_18237:irregex_2escm"),(void*)f_18237},
{C_text("f_18262:irregex_2escm"),(void*)f_18262},
{C_text("f_18281:irregex_2escm"),(void*)f_18281},
{C_text("f_18302:irregex_2escm"),(void*)f_18302},
{C_text("f_18312:irregex_2escm"),(void*)f_18312},
{C_text("f_18320:irregex_2escm"),(void*)f_18320},
{C_text("f_18548:irregex_2escm"),(void*)f_18548},
{C_text("f_18571:irregex_2escm"),(void*)f_18571},
{C_text("f_18580:irregex_2escm"),(void*)f_18580},
{C_text("f_18603:irregex_2escm"),(void*)f_18603},
{C_text("f_18626:irregex_2escm"),(void*)f_18626},
{C_text("f_18699:irregex_2escm"),(void*)f_18699},
{C_text("f_18724:irregex_2escm"),(void*)f_18724},
{C_text("f_18759:irregex_2escm"),(void*)f_18759},
{C_text("f_18782:irregex_2escm"),(void*)f_18782},
{C_text("f_18786:irregex_2escm"),(void*)f_18786},
{C_text("f_18807:irregex_2escm"),(void*)f_18807},
{C_text("f_18909:irregex_2escm"),(void*)f_18909},
{C_text("f_19093:irregex_2escm"),(void*)f_19093},
{C_text("f_19115:irregex_2escm"),(void*)f_19115},
{C_text("f_19121:irregex_2escm"),(void*)f_19121},
{C_text("f_19125:irregex_2escm"),(void*)f_19125},
{C_text("f_19142:irregex_2escm"),(void*)f_19142},
{C_text("f_19175:irregex_2escm"),(void*)f_19175},
{C_text("f_19212:irregex_2escm"),(void*)f_19212},
{C_text("f_19214:irregex_2escm"),(void*)f_19214},
{C_text("f_19239:irregex_2escm"),(void*)f_19239},
{C_text("f_19307:irregex_2escm"),(void*)f_19307},
{C_text("f_19309:irregex_2escm"),(void*)f_19309},
{C_text("f_19313:irregex_2escm"),(void*)f_19313},
{C_text("f_19322:irregex_2escm"),(void*)f_19322},
{C_text("f_19328:irregex_2escm"),(void*)f_19328},
{C_text("f_19331:irregex_2escm"),(void*)f_19331},
{C_text("f_19399:irregex_2escm"),(void*)f_19399},
{C_text("f_19403:irregex_2escm"),(void*)f_19403},
{C_text("f_19406:irregex_2escm"),(void*)f_19406},
{C_text("f_19409:irregex_2escm"),(void*)f_19409},
{C_text("f_19412:irregex_2escm"),(void*)f_19412},
{C_text("f_19442:irregex_2escm"),(void*)f_19442},
{C_text("f_19461:irregex_2escm"),(void*)f_19461},
{C_text("f_19486:irregex_2escm"),(void*)f_19486},
{C_text("f_19503:irregex_2escm"),(void*)f_19503},
{C_text("f_19507:irregex_2escm"),(void*)f_19507},
{C_text("f_19512:irregex_2escm"),(void*)f_19512},
{C_text("f_19519:irregex_2escm"),(void*)f_19519},
{C_text("f_19542:irregex_2escm"),(void*)f_19542},
{C_text("f_19552:irregex_2escm"),(void*)f_19552},
{C_text("f_19573:irregex_2escm"),(void*)f_19573},
{C_text("f_19591:irregex_2escm"),(void*)f_19591},
{C_text("f_19597:irregex_2escm"),(void*)f_19597},
{C_text("f_19611:irregex_2escm"),(void*)f_19611},
{C_text("f_19617:irregex_2escm"),(void*)f_19617},
{C_text("f_19624:irregex_2escm"),(void*)f_19624},
{C_text("f_19654:irregex_2escm"),(void*)f_19654},
{C_text("f_19667:irregex_2escm"),(void*)f_19667},
{C_text("f_19674:irregex_2escm"),(void*)f_19674},
{C_text("f_19681:irregex_2escm"),(void*)f_19681},
{C_text("f_19683:irregex_2escm"),(void*)f_19683},
{C_text("f_19691:irregex_2escm"),(void*)f_19691},
{C_text("f_19695:irregex_2escm"),(void*)f_19695},
{C_text("f_19704:irregex_2escm"),(void*)f_19704},
{C_text("f_19710:irregex_2escm"),(void*)f_19710},
{C_text("f_19713:irregex_2escm"),(void*)f_19713},
{C_text("f_19781:irregex_2escm"),(void*)f_19781},
{C_text("f_19785:irregex_2escm"),(void*)f_19785},
{C_text("f_19788:irregex_2escm"),(void*)f_19788},
{C_text("f_19803:irregex_2escm"),(void*)f_19803},
{C_text("f_19826:irregex_2escm"),(void*)f_19826},
{C_text("f_19837:irregex_2escm"),(void*)f_19837},
{C_text("f_19873:irregex_2escm"),(void*)f_19873},
{C_text("f_19883:irregex_2escm"),(void*)f_19883},
{C_text("f_19889:irregex_2escm"),(void*)f_19889},
{C_text("f_19895:irregex_2escm"),(void*)f_19895},
{C_text("f_19905:irregex_2escm"),(void*)f_19905},
{C_text("f_19907:irregex_2escm"),(void*)f_19907},
{C_text("f_19917:irregex_2escm"),(void*)f_19917},
{C_text("f_19936:irregex_2escm"),(void*)f_19936},
{C_text("f_19949:irregex_2escm"),(void*)f_19949},
{C_text("f_19981:irregex_2escm"),(void*)f_19981},
{C_text("f_20004:irregex_2escm"),(void*)f_20004},
{C_text("f_20009:irregex_2escm"),(void*)f_20009},
{C_text("f_20016:irregex_2escm"),(void*)f_20016},
{C_text("f_20067:irregex_2escm"),(void*)f_20067},
{C_text("f_20074:irregex_2escm"),(void*)f_20074},
{C_text("f_20077:irregex_2escm"),(void*)f_20077},
{C_text("f_20082:irregex_2escm"),(void*)f_20082},
{C_text("f_20134:irregex_2escm"),(void*)f_20134},
{C_text("f_20149:irregex_2escm"),(void*)f_20149},
{C_text("f_20185:irregex_2escm"),(void*)f_20185},
{C_text("f_20195:irregex_2escm"),(void*)f_20195},
{C_text("f_20205:irregex_2escm"),(void*)f_20205},
{C_text("f_20207:irregex_2escm"),(void*)f_20207},
{C_text("f_20265:irregex_2escm"),(void*)f_20265},
{C_text("f_20293:irregex_2escm"),(void*)f_20293},
{C_text("f_20297:irregex_2escm"),(void*)f_20297},
{C_text("f_20302:irregex_2escm"),(void*)f_20302},
{C_text("f_20322:irregex_2escm"),(void*)f_20322},
{C_text("f_20324:irregex_2escm"),(void*)f_20324},
{C_text("f_20349:irregex_2escm"),(void*)f_20349},
{C_text("f_20361:irregex_2escm"),(void*)f_20361},
{C_text("f_20364:irregex_2escm"),(void*)f_20364},
{C_text("f_20377:irregex_2escm"),(void*)f_20377},
{C_text("f_20381:irregex_2escm"),(void*)f_20381},
{C_text("f_20384:irregex_2escm"),(void*)f_20384},
{C_text("f_20389:irregex_2escm"),(void*)f_20389},
{C_text("f_20399:irregex_2escm"),(void*)f_20399},
{C_text("f_20402:irregex_2escm"),(void*)f_20402},
{C_text("f_20412:irregex_2escm"),(void*)f_20412},
{C_text("f_20447:irregex_2escm"),(void*)f_20447},
{C_text("f_20499:irregex_2escm"),(void*)f_20499},
{C_text("f_20511:irregex_2escm"),(void*)f_20511},
{C_text("f_20535:irregex_2escm"),(void*)f_20535},
{C_text("f_20536:irregex_2escm"),(void*)f_20536},
{C_text("f_20565:irregex_2escm"),(void*)f_20565},
{C_text("f_20574:irregex_2escm"),(void*)f_20574},
{C_text("f_20588:irregex_2escm"),(void*)f_20588},
{C_text("f_20607:irregex_2escm"),(void*)f_20607},
{C_text("f_20615:irregex_2escm"),(void*)f_20615},
{C_text("f_20625:irregex_2escm"),(void*)f_20625},
{C_text("f_20638:irregex_2escm"),(void*)f_20638},
{C_text("f_20663:irregex_2escm"),(void*)f_20663},
{C_text("f_20672:irregex_2escm"),(void*)f_20672},
{C_text("f_20708:irregex_2escm"),(void*)f_20708},
{C_text("f_20711:irregex_2escm"),(void*)f_20711},
{C_text("f_20750:irregex_2escm"),(void*)f_20750},
{C_text("f_20753:irregex_2escm"),(void*)f_20753},
{C_text("f_20778:irregex_2escm"),(void*)f_20778},
{C_text("f_20818:irregex_2escm"),(void*)f_20818},
{C_text("f_20846:irregex_2escm"),(void*)f_20846},
{C_text("f_20971:irregex_2escm"),(void*)f_20971},
{C_text("f_21005:irregex_2escm"),(void*)f_21005},
{C_text("f_21146:irregex_2escm"),(void*)f_21146},
{C_text("f_21150:irregex_2escm"),(void*)f_21150},
{C_text("f_21153:irregex_2escm"),(void*)f_21153},
{C_text("f_21155:irregex_2escm"),(void*)f_21155},
{C_text("f_21158:irregex_2escm"),(void*)f_21158},
{C_text("f_21168:irregex_2escm"),(void*)f_21168},
{C_text("f_21172:irregex_2escm"),(void*)f_21172},
{C_text("f_21181:irregex_2escm"),(void*)f_21181},
{C_text("f_21184:irregex_2escm"),(void*)f_21184},
{C_text("f_21193:irregex_2escm"),(void*)f_21193},
{C_text("f_21229:irregex_2escm"),(void*)f_21229},
{C_text("f_21240:irregex_2escm"),(void*)f_21240},
{C_text("f_21246:irregex_2escm"),(void*)f_21246},
{C_text("f_21263:irregex_2escm"),(void*)f_21263},
{C_text("f_21296:irregex_2escm"),(void*)f_21296},
{C_text("f_21302:irregex_2escm"),(void*)f_21302},
{C_text("f_21309:irregex_2escm"),(void*)f_21309},
{C_text("f_21320:irregex_2escm"),(void*)f_21320},
{C_text("f_21334:irregex_2escm"),(void*)f_21334},
{C_text("f_21352:irregex_2escm"),(void*)f_21352},
{C_text("f_21377:irregex_2escm"),(void*)f_21377},
{C_text("f_21404:irregex_2escm"),(void*)f_21404},
{C_text("f_21435:irregex_2escm"),(void*)f_21435},
{C_text("f_21442:irregex_2escm"),(void*)f_21442},
{C_text("f_21454:irregex_2escm"),(void*)f_21454},
{C_text("f_21484:irregex_2escm"),(void*)f_21484},
{C_text("f_21498:irregex_2escm"),(void*)f_21498},
{C_text("f_21501:irregex_2escm"),(void*)f_21501},
{C_text("f_21507:irregex_2escm"),(void*)f_21507},
{C_text("f_21521:irregex_2escm"),(void*)f_21521},
{C_text("f_21545:irregex_2escm"),(void*)f_21545},
{C_text("f_21548:irregex_2escm"),(void*)f_21548},
{C_text("f_21555:irregex_2escm"),(void*)f_21555},
{C_text("f_21572:irregex_2escm"),(void*)f_21572},
{C_text("f_21588:irregex_2escm"),(void*)f_21588},
{C_text("f_21591:irregex_2escm"),(void*)f_21591},
{C_text("f_21594:irregex_2escm"),(void*)f_21594},
{C_text("f_21600:irregex_2escm"),(void*)f_21600},
{C_text("f_21610:irregex_2escm"),(void*)f_21610},
{C_text("f_21614:irregex_2escm"),(void*)f_21614},
{C_text("f_21625:irregex_2escm"),(void*)f_21625},
{C_text("f_21629:irregex_2escm"),(void*)f_21629},
{C_text("f_21633:irregex_2escm"),(void*)f_21633},
{C_text("f_21641:irregex_2escm"),(void*)f_21641},
{C_text("f_21649:irregex_2escm"),(void*)f_21649},
{C_text("f_21664:irregex_2escm"),(void*)f_21664},
{C_text("f_21670:irregex_2escm"),(void*)f_21670},
{C_text("f_21684:irregex_2escm"),(void*)f_21684},
{C_text("f_21698:irregex_2escm"),(void*)f_21698},
{C_text("f_21704:irregex_2escm"),(void*)f_21704},
{C_text("f_21707:irregex_2escm"),(void*)f_21707},
{C_text("f_21734:irregex_2escm"),(void*)f_21734},
{C_text("f_21738:irregex_2escm"),(void*)f_21738},
{C_text("f_21758:irregex_2escm"),(void*)f_21758},
{C_text("f_21764:irregex_2escm"),(void*)f_21764},
{C_text("f_21767:irregex_2escm"),(void*)f_21767},
{C_text("f_21770:irregex_2escm"),(void*)f_21770},
{C_text("f_21786:irregex_2escm"),(void*)f_21786},
{C_text("f_21794:irregex_2escm"),(void*)f_21794},
{C_text("f_21806:irregex_2escm"),(void*)f_21806},
{C_text("f_21836:irregex_2escm"),(void*)f_21836},
{C_text("f_21842:irregex_2escm"),(void*)f_21842},
{C_text("f_21845:irregex_2escm"),(void*)f_21845},
{C_text("f_21848:irregex_2escm"),(void*)f_21848},
{C_text("f_21864:irregex_2escm"),(void*)f_21864},
{C_text("f_21872:irregex_2escm"),(void*)f_21872},
{C_text("f_21880:irregex_2escm"),(void*)f_21880},
{C_text("f_21884:irregex_2escm"),(void*)f_21884},
{C_text("f_21903:irregex_2escm"),(void*)f_21903},
{C_text("f_21921:irregex_2escm"),(void*)f_21921},
{C_text("f_22049:irregex_2escm"),(void*)f_22049},
{C_text("f_22055:irregex_2escm"),(void*)f_22055},
{C_text("f_22058:irregex_2escm"),(void*)f_22058},
{C_text("f_22066:irregex_2escm"),(void*)f_22066},
{C_text("f_22105:irregex_2escm"),(void*)f_22105},
{C_text("f_22140:irregex_2escm"),(void*)f_22140},
{C_text("f_22147:irregex_2escm"),(void*)f_22147},
{C_text("f_22173:irregex_2escm"),(void*)f_22173},
{C_text("f_22269:irregex_2escm"),(void*)f_22269},
{C_text("f_22273:irregex_2escm"),(void*)f_22273},
{C_text("f_22286:irregex_2escm"),(void*)f_22286},
{C_text("f_22298:irregex_2escm"),(void*)f_22298},
{C_text("f_22302:irregex_2escm"),(void*)f_22302},
{C_text("f_22309:irregex_2escm"),(void*)f_22309},
{C_text("f_22315:irregex_2escm"),(void*)f_22315},
{C_text("f_22319:irregex_2escm"),(void*)f_22319},
{C_text("f_22322:irregex_2escm"),(void*)f_22322},
{C_text("f_22324:irregex_2escm"),(void*)f_22324},
{C_text("f_22331:irregex_2escm"),(void*)f_22331},
{C_text("f_22338:irregex_2escm"),(void*)f_22338},
{C_text("f_22373:irregex_2escm"),(void*)f_22373},
{C_text("f_22386:irregex_2escm"),(void*)f_22386},
{C_text("f_22487:irregex_2escm"),(void*)f_22487},
{C_text("f_22493:irregex_2escm"),(void*)f_22493},
{C_text("f_22499:irregex_2escm"),(void*)f_22499},
{C_text("f_22552:irregex_2escm"),(void*)f_22552},
{C_text("f_22623:irregex_2escm"),(void*)f_22623},
{C_text("f_22676:irregex_2escm"),(void*)f_22676},
{C_text("f_22685:irregex_2escm"),(void*)f_22685},
{C_text("f_22705:irregex_2escm"),(void*)f_22705},
{C_text("f_22734:irregex_2escm"),(void*)f_22734},
{C_text("f_22758:irregex_2escm"),(void*)f_22758},
{C_text("f_22765:irregex_2escm"),(void*)f_22765},
{C_text("f_22768:irregex_2escm"),(void*)f_22768},
{C_text("f_22771:irregex_2escm"),(void*)f_22771},
{C_text("f_22774:irregex_2escm"),(void*)f_22774},
{C_text("f_22790:irregex_2escm"),(void*)f_22790},
{C_text("f_22807:irregex_2escm"),(void*)f_22807},
{C_text("f_22842:irregex_2escm"),(void*)f_22842},
{C_text("f_22846:irregex_2escm"),(void*)f_22846},
{C_text("f_22874:irregex_2escm"),(void*)f_22874},
{C_text("f_22877:irregex_2escm"),(void*)f_22877},
{C_text("f_22883:irregex_2escm"),(void*)f_22883},
{C_text("f_22969:irregex_2escm"),(void*)f_22969},
{C_text("f_22972:irregex_2escm"),(void*)f_22972},
{C_text("f_22977:irregex_2escm"),(void*)f_22977},
{C_text("f_22987:irregex_2escm"),(void*)f_22987},
{C_text("f_22990:irregex_2escm"),(void*)f_22990},
{C_text("f_23010:irregex_2escm"),(void*)f_23010},
{C_text("f_23018:irregex_2escm"),(void*)f_23018},
{C_text("f_23051:irregex_2escm"),(void*)f_23051},
{C_text("f_23053:irregex_2escm"),(void*)f_23053},
{C_text("f_23078:irregex_2escm"),(void*)f_23078},
{C_text("f_23091:irregex_2escm"),(void*)f_23091},
{C_text("f_23130:irregex_2escm"),(void*)f_23130},
{C_text("f_23145:irregex_2escm"),(void*)f_23145},
{C_text("f_23166:irregex_2escm"),(void*)f_23166},
{C_text("f_23184:irregex_2escm"),(void*)f_23184},
{C_text("f_23193:irregex_2escm"),(void*)f_23193},
{C_text("f_23207:irregex_2escm"),(void*)f_23207},
{C_text("f_23211:irregex_2escm"),(void*)f_23211},
{C_text("f_23214:irregex_2escm"),(void*)f_23214},
{C_text("f_23220:irregex_2escm"),(void*)f_23220},
{C_text("f_23223:irregex_2escm"),(void*)f_23223},
{C_text("f_23226:irregex_2escm"),(void*)f_23226},
{C_text("f_23243:irregex_2escm"),(void*)f_23243},
{C_text("f_23315:irregex_2escm"),(void*)f_23315},
{C_text("f_23319:irregex_2escm"),(void*)f_23319},
{C_text("f_23323:irregex_2escm"),(void*)f_23323},
{C_text("f_23325:irregex_2escm"),(void*)f_23325},
{C_text("f_23348:irregex_2escm"),(void*)f_23348},
{C_text("f_23377:irregex_2escm"),(void*)f_23377},
{C_text("f_23381:irregex_2escm"),(void*)f_23381},
{C_text("f_23405:irregex_2escm"),(void*)f_23405},
{C_text("f_23433:irregex_2escm"),(void*)f_23433},
{C_text("f_23443:irregex_2escm"),(void*)f_23443},
{C_text("f_23453:irregex_2escm"),(void*)f_23453},
{C_text("f_23458:irregex_2escm"),(void*)f_23458},
{C_text("f_23473:irregex_2escm"),(void*)f_23473},
{C_text("f_23493:irregex_2escm"),(void*)f_23493},
{C_text("f_23516:irregex_2escm"),(void*)f_23516},
{C_text("f_23548:irregex_2escm"),(void*)f_23548},
{C_text("f_23555:irregex_2escm"),(void*)f_23555},
{C_text("f_23557:irregex_2escm"),(void*)f_23557},
{C_text("f_23581:irregex_2escm"),(void*)f_23581},
{C_text("f_23625:irregex_2escm"),(void*)f_23625},
{C_text("f_23638:irregex_2escm"),(void*)f_23638},
{C_text("f_23652:irregex_2escm"),(void*)f_23652},
{C_text("f_23679:irregex_2escm"),(void*)f_23679},
{C_text("f_23760:irregex_2escm"),(void*)f_23760},
{C_text("f_23776:irregex_2escm"),(void*)f_23776},
{C_text("f_23786:irregex_2escm"),(void*)f_23786},
{C_text("f_23795:irregex_2escm"),(void*)f_23795},
{C_text("f_23835:irregex_2escm"),(void*)f_23835},
{C_text("f_23838:irregex_2escm"),(void*)f_23838},
{C_text("f_23861:irregex_2escm"),(void*)f_23861},
{C_text("f_23877:irregex_2escm"),(void*)f_23877},
{C_text("f_23884:irregex_2escm"),(void*)f_23884},
{C_text("f_23904:irregex_2escm"),(void*)f_23904},
{C_text("f_23924:irregex_2escm"),(void*)f_23924},
{C_text("f_23927:irregex_2escm"),(void*)f_23927},
{C_text("f_23928:irregex_2escm"),(void*)f_23928},
{C_text("f_23934:irregex_2escm"),(void*)f_23934},
{C_text("f_23950:irregex_2escm"),(void*)f_23950},
{C_text("f_24078:irregex_2escm"),(void*)f_24078},
{C_text("f_24097:irregex_2escm"),(void*)f_24097},
{C_text("f_24120:irregex_2escm"),(void*)f_24120},
{C_text("f_24121:irregex_2escm"),(void*)f_24121},
{C_text("f_24127:irregex_2escm"),(void*)f_24127},
{C_text("f_24146:irregex_2escm"),(void*)f_24146},
{C_text("f_24147:irregex_2escm"),(void*)f_24147},
{C_text("f_24153:irregex_2escm"),(void*)f_24153},
{C_text("f_24175:irregex_2escm"),(void*)f_24175},
{C_text("f_24181:irregex_2escm"),(void*)f_24181},
{C_text("f_24182:irregex_2escm"),(void*)f_24182},
{C_text("f_24188:irregex_2escm"),(void*)f_24188},
{C_text("f_24220:irregex_2escm"),(void*)f_24220},
{C_text("f_24226:irregex_2escm"),(void*)f_24226},
{C_text("f_24228:irregex_2escm"),(void*)f_24228},
{C_text("f_24234:irregex_2escm"),(void*)f_24234},
{C_text("f_24244:irregex_2escm"),(void*)f_24244},
{C_text("f_24250:irregex_2escm"),(void*)f_24250},
{C_text("f_24274:irregex_2escm"),(void*)f_24274},
{C_text("f_24280:irregex_2escm"),(void*)f_24280},
{C_text("f_24287:irregex_2escm"),(void*)f_24287},
{C_text("f_24293:irregex_2escm"),(void*)f_24293},
{C_text("f_24376:irregex_2escm"),(void*)f_24376},
{C_text("f_24379:irregex_2escm"),(void*)f_24379},
{C_text("f_24380:irregex_2escm"),(void*)f_24380},
{C_text("f_24393:irregex_2escm"),(void*)f_24393},
{C_text("f_24399:irregex_2escm"),(void*)f_24399},
{C_text("f_24412:irregex_2escm"),(void*)f_24412},
{C_text("f_24417:irregex_2escm"),(void*)f_24417},
{C_text("f_24448:irregex_2escm"),(void*)f_24448},
{C_text("f_24452:irregex_2escm"),(void*)f_24452},
{C_text("f_24457:irregex_2escm"),(void*)f_24457},
{C_text("f_24528:irregex_2escm"),(void*)f_24528},
{C_text("f_24531:irregex_2escm"),(void*)f_24531},
{C_text("f_24532:irregex_2escm"),(void*)f_24532},
{C_text("f_24545:irregex_2escm"),(void*)f_24545},
{C_text("f_24551:irregex_2escm"),(void*)f_24551},
{C_text("f_24561:irregex_2escm"),(void*)f_24561},
{C_text("f_24573:irregex_2escm"),(void*)f_24573},
{C_text("f_24586:irregex_2escm"),(void*)f_24586},
{C_text("f_24607:irregex_2escm"),(void*)f_24607},
{C_text("f_24617:irregex_2escm"),(void*)f_24617},
{C_text("f_24621:irregex_2escm"),(void*)f_24621},
{C_text("f_24627:irregex_2escm"),(void*)f_24627},
{C_text("f_24699:irregex_2escm"),(void*)f_24699},
{C_text("f_24749:irregex_2escm"),(void*)f_24749},
{C_text("f_24762:irregex_2escm"),(void*)f_24762},
{C_text("f_24763:irregex_2escm"),(void*)f_24763},
{C_text("f_24770:irregex_2escm"),(void*)f_24770},
{C_text("f_24778:irregex_2escm"),(void*)f_24778},
{C_text("f_24785:irregex_2escm"),(void*)f_24785},
{C_text("f_24797:irregex_2escm"),(void*)f_24797},
{C_text("f_24798:irregex_2escm"),(void*)f_24798},
{C_text("f_24805:irregex_2escm"),(void*)f_24805},
{C_text("f_24813:irregex_2escm"),(void*)f_24813},
{C_text("f_24820:irregex_2escm"),(void*)f_24820},
{C_text("f_24835:irregex_2escm"),(void*)f_24835},
{C_text("f_24836:irregex_2escm"),(void*)f_24836},
{C_text("f_24840:irregex_2escm"),(void*)f_24840},
{C_text("f_24846:irregex_2escm"),(void*)f_24846},
{C_text("f_24853:irregex_2escm"),(void*)f_24853},
{C_text("f_24862:irregex_2escm"),(void*)f_24862},
{C_text("f_24872:irregex_2escm"),(void*)f_24872},
{C_text("f_24876:irregex_2escm"),(void*)f_24876},
{C_text("f_24881:irregex_2escm"),(void*)f_24881},
{C_text("f_24898:irregex_2escm"),(void*)f_24898},
{C_text("f_24907:irregex_2escm"),(void*)f_24907},
{C_text("f_24918:irregex_2escm"),(void*)f_24918},
{C_text("f_24919:irregex_2escm"),(void*)f_24919},
{C_text("f_24923:irregex_2escm"),(void*)f_24923},
{C_text("f_24934:irregex_2escm"),(void*)f_24934},
{C_text("f_24941:irregex_2escm"),(void*)f_24941},
{C_text("f_24953:irregex_2escm"),(void*)f_24953},
{C_text("f_24956:irregex_2escm"),(void*)f_24956},
{C_text("f_24959:irregex_2escm"),(void*)f_24959},
{C_text("f_24968:irregex_2escm"),(void*)f_24968},
{C_text("f_24971:irregex_2escm"),(void*)f_24971},
{C_text("f_24972:irregex_2escm"),(void*)f_24972},
{C_text("f_25029:irregex_2escm"),(void*)f_25029},
{C_text("f_25030:irregex_2escm"),(void*)f_25030},
{C_text("f_25036:irregex_2escm"),(void*)f_25036},
{C_text("f_25072:irregex_2escm"),(void*)f_25072},
{C_text("f_25077:irregex_2escm"),(void*)f_25077},
{C_text("f_25109:irregex_2escm"),(void*)f_25109},
{C_text("f_25112:irregex_2escm"),(void*)f_25112},
{C_text("f_25113:irregex_2escm"),(void*)f_25113},
{C_text("f_25117:irregex_2escm"),(void*)f_25117},
{C_text("f_25135:irregex_2escm"),(void*)f_25135},
{C_text("f_25148:irregex_2escm"),(void*)f_25148},
{C_text("f_25162:irregex_2escm"),(void*)f_25162},
{C_text("f_25166:irregex_2escm"),(void*)f_25166},
{C_text("f_25180:irregex_2escm"),(void*)f_25180},
{C_text("f_25186:irregex_2escm"),(void*)f_25186},
{C_text("f_25199:irregex_2escm"),(void*)f_25199},
{C_text("f_25206:irregex_2escm"),(void*)f_25206},
{C_text("f_25213:irregex_2escm"),(void*)f_25213},
{C_text("f_25235:irregex_2escm"),(void*)f_25235},
{C_text("f_25239:irregex_2escm"),(void*)f_25239},
{C_text("f_25326:irregex_2escm"),(void*)f_25326},
{C_text("f_25327:irregex_2escm"),(void*)f_25327},
{C_text("f_25375:irregex_2escm"),(void*)f_25375},
{C_text("f_25435:irregex_2escm"),(void*)f_25435},
{C_text("f_25470:irregex_2escm"),(void*)f_25470},
{C_text("f_25670:irregex_2escm"),(void*)f_25670},
{C_text("f_25690:irregex_2escm"),(void*)f_25690},
{C_text("f_25699:irregex_2escm"),(void*)f_25699},
{C_text("f_25705:irregex_2escm"),(void*)f_25705},
{C_text("f_25711:irregex_2escm"),(void*)f_25711},
{C_text("f_25728:irregex_2escm"),(void*)f_25728},
{C_text("f_25765:irregex_2escm"),(void*)f_25765},
{C_text("f_25774:irregex_2escm"),(void*)f_25774},
{C_text("f_25780:irregex_2escm"),(void*)f_25780},
{C_text("f_25786:irregex_2escm"),(void*)f_25786},
{C_text("f_25820:irregex_2escm"),(void*)f_25820},
{C_text("f_25850:irregex_2escm"),(void*)f_25850},
{C_text("f_25857:irregex_2escm"),(void*)f_25857},
{C_text("f_25894:irregex_2escm"),(void*)f_25894},
{C_text("f_25901:irregex_2escm"),(void*)f_25901},
{C_text("f_25908:irregex_2escm"),(void*)f_25908},
{C_text("f_25917:irregex_2escm"),(void*)f_25917},
{C_text("f_25936:irregex_2escm"),(void*)f_25936},
{C_text("f_25953:irregex_2escm"),(void*)f_25953},
{C_text("f_25960:irregex_2escm"),(void*)f_25960},
{C_text("f_25981:irregex_2escm"),(void*)f_25981},
{C_text("f_26001:irregex_2escm"),(void*)f_26001},
{C_text("f_26008:irregex_2escm"),(void*)f_26008},
{C_text("f_26015:irregex_2escm"),(void*)f_26015},
{C_text("f_26034:irregex_2escm"),(void*)f_26034},
{C_text("f_26041:irregex_2escm"),(void*)f_26041},
{C_text("f_26048:irregex_2escm"),(void*)f_26048},
{C_text("f_26071:irregex_2escm"),(void*)f_26071},
{C_text("f_26092:irregex_2escm"),(void*)f_26092},
{C_text("f_26099:irregex_2escm"),(void*)f_26099},
{C_text("f_26106:irregex_2escm"),(void*)f_26106},
{C_text("f_26113:irregex_2escm"),(void*)f_26113},
{C_text("f_26122:irregex_2escm"),(void*)f_26122},
{C_text("f_26142:irregex_2escm"),(void*)f_26142},
{C_text("f_26158:irregex_2escm"),(void*)f_26158},
{C_text("f_26175:irregex_2escm"),(void*)f_26175},
{C_text("f_26195:irregex_2escm"),(void*)f_26195},
{C_text("f_26199:irregex_2escm"),(void*)f_26199},
{C_text("f_26202:irregex_2escm"),(void*)f_26202},
{C_text("f_26208:irregex_2escm"),(void*)f_26208},
{C_text("f_26253:irregex_2escm"),(void*)f_26253},
{C_text("f_26317:irregex_2escm"),(void*)f_26317},
{C_text("f_26334:irregex_2escm"),(void*)f_26334},
{C_text("f_26336:irregex_2escm"),(void*)f_26336},
{C_text("f_26346:irregex_2escm"),(void*)f_26346},
{C_text("f_26352:irregex_2escm"),(void*)f_26352},
{C_text("f_26358:irregex_2escm"),(void*)f_26358},
{C_text("f_26374:irregex_2escm"),(void*)f_26374},
{C_text("f_26380:irregex_2escm"),(void*)f_26380},
{C_text("f_26402:irregex_2escm"),(void*)f_26402},
{C_text("f_26416:irregex_2escm"),(void*)f_26416},
{C_text("f_26433:irregex_2escm"),(void*)f_26433},
{C_text("f_26435:irregex_2escm"),(void*)f_26435},
{C_text("f_26445:irregex_2escm"),(void*)f_26445},
{C_text("f_26451:irregex_2escm"),(void*)f_26451},
{C_text("f_26457:irregex_2escm"),(void*)f_26457},
{C_text("f_26473:irregex_2escm"),(void*)f_26473},
{C_text("f_26531:irregex_2escm"),(void*)f_26531},
{C_text("f_26557:irregex_2escm"),(void*)f_26557},
{C_text("f_26559:irregex_2escm"),(void*)f_26559},
{C_text("f_26572:irregex_2escm"),(void*)f_26572},
{C_text("f_26591:irregex_2escm"),(void*)f_26591},
{C_text("f_26600:irregex_2escm"),(void*)f_26600},
{C_text("f_26606:irregex_2escm"),(void*)f_26606},
{C_text("f_26612:irregex_2escm"),(void*)f_26612},
{C_text("f_26618:irregex_2escm"),(void*)f_26618},
{C_text("f_26770:irregex_2escm"),(void*)f_26770},
{C_text("f_26782:irregex_2escm"),(void*)f_26782},
{C_text("f_26832:irregex_2escm"),(void*)f_26832},
{C_text("f_26850:irregex_2escm"),(void*)f_26850},
{C_text("f_26861:irregex_2escm"),(void*)f_26861},
{C_text("f_26867:irregex_2escm"),(void*)f_26867},
{C_text("f_26879:irregex_2escm"),(void*)f_26879},
{C_text("f_26881:irregex_2escm"),(void*)f_26881},
{C_text("f_26891:irregex_2escm"),(void*)f_26891},
{C_text("f_26894:irregex_2escm"),(void*)f_26894},
{C_text("f_26920:irregex_2escm"),(void*)f_26920},
{C_text("f_26941:irregex_2escm"),(void*)f_26941},
{C_text("f_26945:irregex_2escm"),(void*)f_26945},
{C_text("f_26958:irregex_2escm"),(void*)f_26958},
{C_text("f_26960:irregex_2escm"),(void*)f_26960},
{C_text("f_26985:irregex_2escm"),(void*)f_26985},
{C_text("f_27009:irregex_2escm"),(void*)f_27009},
{C_text("f_27022:irregex_2escm"),(void*)f_27022},
{C_text("f_27024:irregex_2escm"),(void*)f_27024},
{C_text("f_27049:irregex_2escm"),(void*)f_27049},
{C_text("f_27071:irregex_2escm"),(void*)f_27071},
{C_text("f_27079:irregex_2escm"),(void*)f_27079},
{C_text("f_27092:irregex_2escm"),(void*)f_27092},
{C_text("f_27094:irregex_2escm"),(void*)f_27094},
{C_text("f_27119:irregex_2escm"),(void*)f_27119},
{C_text("f_27139:irregex_2escm"),(void*)f_27139},
{C_text("f_27149:irregex_2escm"),(void*)f_27149},
{C_text("f_27164:irregex_2escm"),(void*)f_27164},
{C_text("f_27177:irregex_2escm"),(void*)f_27177},
{C_text("f_27179:irregex_2escm"),(void*)f_27179},
{C_text("f_27204:irregex_2escm"),(void*)f_27204},
{C_text("f_27326:irregex_2escm"),(void*)f_27326},
{C_text("f_27328:irregex_2escm"),(void*)f_27328},
{C_text("f_27346:irregex_2escm"),(void*)f_27346},
{C_text("f_27348:irregex_2escm"),(void*)f_27348},
{C_text("f_27381:irregex_2escm"),(void*)f_27381},
{C_text("f_27433:irregex_2escm"),(void*)f_27433},
{C_text("f_27469:irregex_2escm"),(void*)f_27469},
{C_text("f_27477:irregex_2escm"),(void*)f_27477},
{C_text("f_27481:irregex_2escm"),(void*)f_27481},
{C_text("f_27483:irregex_2escm"),(void*)f_27483},
{C_text("f_27497:irregex_2escm"),(void*)f_27497},
{C_text("f_27501:irregex_2escm"),(void*)f_27501},
{C_text("f_27505:irregex_2escm"),(void*)f_27505},
{C_text("f_27518:irregex_2escm"),(void*)f_27518},
{C_text("f_27522:irregex_2escm"),(void*)f_27522},
{C_text("f_27526:irregex_2escm"),(void*)f_27526},
{C_text("f_27670:irregex_2escm"),(void*)f_27670},
{C_text("f_27678:irregex_2escm"),(void*)f_27678},
{C_text("f_27682:irregex_2escm"),(void*)f_27682},
{C_text("f_27684:irregex_2escm"),(void*)f_27684},
{C_text("f_27698:irregex_2escm"),(void*)f_27698},
{C_text("f_27711:irregex_2escm"),(void*)f_27711},
{C_text("f_27715:irregex_2escm"),(void*)f_27715},
{C_text("f_27761:irregex_2escm"),(void*)f_27761},
{C_text("f_27764:irregex_2escm"),(void*)f_27764},
{C_text("f_27771:irregex_2escm"),(void*)f_27771},
{C_text("f_27866:irregex_2escm"),(void*)f_27866},
{C_text("f_27874:irregex_2escm"),(void*)f_27874},
{C_text("f_27878:irregex_2escm"),(void*)f_27878},
{C_text("f_27880:irregex_2escm"),(void*)f_27880},
{C_text("f_27897:irregex_2escm"),(void*)f_27897},
{C_text("f_27992:irregex_2escm"),(void*)f_27992},
{C_text("f_28000:irregex_2escm"),(void*)f_28000},
{C_text("f_28002:irregex_2escm"),(void*)f_28002},
{C_text("f_28010:irregex_2escm"),(void*)f_28010},
{C_text("f_28012:irregex_2escm"),(void*)f_28012},
{C_text("f_28026:irregex_2escm"),(void*)f_28026},
{C_text("f_28032:irregex_2escm"),(void*)f_28032},
{C_text("f_28041:irregex_2escm"),(void*)f_28041},
{C_text("f_28045:irregex_2escm"),(void*)f_28045},
{C_text("f_28049:irregex_2escm"),(void*)f_28049},
{C_text("f_28053:irregex_2escm"),(void*)f_28053},
{C_text("f_28077:irregex_2escm"),(void*)f_28077},
{C_text("f_28087:irregex_2escm"),(void*)f_28087},
{C_text("f_28096:irregex_2escm"),(void*)f_28096},
{C_text("f_28100:irregex_2escm"),(void*)f_28100},
{C_text("f_28104:irregex_2escm"),(void*)f_28104},
{C_text("f_28108:irregex_2escm"),(void*)f_28108},
{C_text("f_28118:irregex_2escm"),(void*)f_28118},
{C_text("f_28133:irregex_2escm"),(void*)f_28133},
{C_text("f_28137:irregex_2escm"),(void*)f_28137},
{C_text("f_28140:irregex_2escm"),(void*)f_28140},
{C_text("f_28143:irregex_2escm"),(void*)f_28143},
{C_text("f_28152:irregex_2escm"),(void*)f_28152},
{C_text("f_28155:irregex_2escm"),(void*)f_28155},
{C_text("f_28164:irregex_2escm"),(void*)f_28164},
{C_text("f_28167:irregex_2escm"),(void*)f_28167},
{C_text("f_28175:irregex_2escm"),(void*)f_28175},
{C_text("f_28188:irregex_2escm"),(void*)f_28188},
{C_text("f_28223:irregex_2escm"),(void*)f_28223},
{C_text("f_28226:irregex_2escm"),(void*)f_28226},
{C_text("f_28334:irregex_2escm"),(void*)f_28334},
{C_text("f_28351:irregex_2escm"),(void*)f_28351},
{C_text("f_28355:irregex_2escm"),(void*)f_28355},
{C_text("f_28356:irregex_2escm"),(void*)f_28356},
{C_text("f_28364:irregex_2escm"),(void*)f_28364},
{C_text("f_28379:irregex_2escm"),(void*)f_28379},
{C_text("f_28383:irregex_2escm"),(void*)f_28383},
{C_text("f_28386:irregex_2escm"),(void*)f_28386},
{C_text("f_28395:irregex_2escm"),(void*)f_28395},
{C_text("f_28401:irregex_2escm"),(void*)f_28401},
{C_text("f_28409:irregex_2escm"),(void*)f_28409},
{C_text("f_28422:irregex_2escm"),(void*)f_28422},
{C_text("f_28472:irregex_2escm"),(void*)f_28472},
{C_text("f_28482:irregex_2escm"),(void*)f_28482},
{C_text("f_28496:irregex_2escm"),(void*)f_28496},
{C_text("f_28499:irregex_2escm"),(void*)f_28499},
{C_text("f_28502:irregex_2escm"),(void*)f_28502},
{C_text("f_28554:irregex_2escm"),(void*)f_28554},
{C_text("f_28561:irregex_2escm"),(void*)f_28561},
{C_text("f_28565:irregex_2escm"),(void*)f_28565},
{C_text("f_28566:irregex_2escm"),(void*)f_28566},
{C_text("f_28574:irregex_2escm"),(void*)f_28574},
{C_text("f_28589:irregex_2escm"),(void*)f_28589},
{C_text("f_28593:irregex_2escm"),(void*)f_28593},
{C_text("f_28596:irregex_2escm"),(void*)f_28596},
{C_text("f_28610:irregex_2escm"),(void*)f_28610},
{C_text("f_28614:irregex_2escm"),(void*)f_28614},
{C_text("f_28618:irregex_2escm"),(void*)f_28618},
{C_text("f_28626:irregex_2escm"),(void*)f_28626},
{C_text("f_28665:irregex_2escm"),(void*)f_28665},
{C_text("f_28669:irregex_2escm"),(void*)f_28669},
{C_text("f_28674:irregex_2escm"),(void*)f_28674},
{C_text("f_28708:irregex_2escm"),(void*)f_28708},
{C_text("f_28715:irregex_2escm"),(void*)f_28715},
{C_text("f_28723:irregex_2escm"),(void*)f_28723},
{C_text("f_28725:irregex_2escm"),(void*)f_28725},
{C_text("f_28746:irregex_2escm"),(void*)f_28746},
{C_text("f_28758:irregex_2escm"),(void*)f_28758},
{C_text("f_28764:irregex_2escm"),(void*)f_28764},
{C_text("f_28791:irregex_2escm"),(void*)f_28791},
{C_text("f_28816:irregex_2escm"),(void*)f_28816},
{C_text("f_28842:irregex_2escm"),(void*)f_28842},
{C_text("f_28906:irregex_2escm"),(void*)f_28906},
{C_text("f_28938:irregex_2escm"),(void*)f_28938},
{C_text("f_28968:irregex_2escm"),(void*)f_28968},
{C_text("f_28989:irregex_2escm"),(void*)f_28989},
{C_text("f_28993:irregex_2escm"),(void*)f_28993},
{C_text("f_28998:irregex_2escm"),(void*)f_28998},
{C_text("f_29006:irregex_2escm"),(void*)f_29006},
{C_text("f_29008:irregex_2escm"),(void*)f_29008},
{C_text("f_29024:irregex_2escm"),(void*)f_29024},
{C_text("f_29028:irregex_2escm"),(void*)f_29028},
{C_text("f_29034:irregex_2escm"),(void*)f_29034},
{C_text("f_29039:irregex_2escm"),(void*)f_29039},
{C_text("f_29053:irregex_2escm"),(void*)f_29053},
{C_text("f_29097:irregex_2escm"),(void*)f_29097},
{C_text("f_29105:irregex_2escm"),(void*)f_29105},
{C_text("f_29107:irregex_2escm"),(void*)f_29107},
{C_text("f_29148:irregex_2escm"),(void*)f_29148},
{C_text("f_29188:irregex_2escm"),(void*)f_29188},
{C_text("f_29222:irregex_2escm"),(void*)f_29222},
{C_text("f_29235:irregex_2escm"),(void*)f_29235},
{C_text("f_29265:irregex_2escm"),(void*)f_29265},
{C_text("f_29273:irregex_2escm"),(void*)f_29273},
{C_text("f_29277:irregex_2escm"),(void*)f_29277},
{C_text("f_29279:irregex_2escm"),(void*)f_29279},
{C_text("f_29298:irregex_2escm"),(void*)f_29298},
{C_text("f_29322:irregex_2escm"),(void*)f_29322},
{C_text("f_29339:irregex_2escm"),(void*)f_29339},
{C_text("f_29346:irregex_2escm"),(void*)f_29346},
{C_text("f_29369:irregex_2escm"),(void*)f_29369},
{C_text("f_29390:irregex_2escm"),(void*)f_29390},
{C_text("f_29392:irregex_2escm"),(void*)f_29392},
{C_text("f_29402:irregex_2escm"),(void*)f_29402},
{C_text("f_29429:irregex_2escm"),(void*)f_29429},
{C_text("f_29459:irregex_2escm"),(void*)f_29459},
{C_text("f_29464:irregex_2escm"),(void*)f_29464},
{C_text("f_29476:irregex_2escm"),(void*)f_29476},
{C_text("f_29496:irregex_2escm"),(void*)f_29496},
{C_text("f_29534:irregex_2escm"),(void*)f_29534},
{C_text("f_29542:irregex_2escm"),(void*)f_29542},
{C_text("f_29578:irregex_2escm"),(void*)f_29578},
{C_text("f_29592:irregex_2escm"),(void*)f_29592},
{C_text("f_29596:irregex_2escm"),(void*)f_29596},
{C_text("f_29599:irregex_2escm"),(void*)f_29599},
{C_text("f_29604:irregex_2escm"),(void*)f_29604},
{C_text("f_29614:irregex_2escm"),(void*)f_29614},
{C_text("f_29625:irregex_2escm"),(void*)f_29625},
{C_text("f_29628:irregex_2escm"),(void*)f_29628},
{C_text("f_29635:irregex_2escm"),(void*)f_29635},
{C_text("f_29647:irregex_2escm"),(void*)f_29647},
{C_text("f_29662:irregex_2escm"),(void*)f_29662},
{C_text("f_29672:irregex_2escm"),(void*)f_29672},
{C_text("f_29676:irregex_2escm"),(void*)f_29676},
{C_text("f_29679:irregex_2escm"),(void*)f_29679},
{C_text("f_29684:irregex_2escm"),(void*)f_29684},
{C_text("f_29707:irregex_2escm"),(void*)f_29707},
{C_text("f_29710:irregex_2escm"),(void*)f_29710},
{C_text("f_29717:irregex_2escm"),(void*)f_29717},
{C_text("f_29722:irregex_2escm"),(void*)f_29722},
{C_text("f_29732:irregex_2escm"),(void*)f_29732},
{C_text("f_29752:irregex_2escm"),(void*)f_29752},
{C_text("f_29762:irregex_2escm"),(void*)f_29762},
{C_text("f_29804:irregex_2escm"),(void*)f_29804},
{C_text("f_29811:irregex_2escm"),(void*)f_29811},
{C_text("f_29816:irregex_2escm"),(void*)f_29816},
{C_text("f_29826:irregex_2escm"),(void*)f_29826},
{C_text("f_29846:irregex_2escm"),(void*)f_29846},
{C_text("f_29849:irregex_2escm"),(void*)f_29849},
{C_text("f_29852:irregex_2escm"),(void*)f_29852},
{C_text("f_29861:irregex_2escm"),(void*)f_29861},
{C_text("f_29866:irregex_2escm"),(void*)f_29866},
{C_text("f_29876:irregex_2escm"),(void*)f_29876},
{C_text("f_29900:irregex_2escm"),(void*)f_29900},
{C_text("f_29903:irregex_2escm"),(void*)f_29903},
{C_text("f_29904:irregex_2escm"),(void*)f_29904},
{C_text("f_29908:irregex_2escm"),(void*)f_29908},
{C_text("f_29920:irregex_2escm"),(void*)f_29920},
{C_text("f_29925:irregex_2escm"),(void*)f_29925},
{C_text("f_29935:irregex_2escm"),(void*)f_29935},
{C_text("f_29959:irregex_2escm"),(void*)f_29959},
{C_text("f_29962:irregex_2escm"),(void*)f_29962},
{C_text("f_29973:irregex_2escm"),(void*)f_29973},
{C_text("f_29976:irregex_2escm"),(void*)f_29976},
{C_text("f_29983:irregex_2escm"),(void*)f_29983},
{C_text("f_29988:irregex_2escm"),(void*)f_29988},
{C_text("f_29998:irregex_2escm"),(void*)f_29998},
{C_text("f_30056:irregex_2escm"),(void*)f_30056},
{C_text("f_30059:irregex_2escm"),(void*)f_30059},
{C_text("f_30062:irregex_2escm"),(void*)f_30062},
{C_text("f_30069:irregex_2escm"),(void*)f_30069},
{C_text("f_30073:irregex_2escm"),(void*)f_30073},
{C_text("f_30086:irregex_2escm"),(void*)f_30086},
{C_text("f_30099:irregex_2escm"),(void*)f_30099},
{C_text("f_30102:irregex_2escm"),(void*)f_30102},
{C_text("f_30109:irregex_2escm"),(void*)f_30109},
{C_text("f_30120:irregex_2escm"),(void*)f_30120},
{C_text("f_30129:irregex_2escm"),(void*)f_30129},
{C_text("f_30132:irregex_2escm"),(void*)f_30132},
{C_text("f_30135:irregex_2escm"),(void*)f_30135},
{C_text("f_30142:irregex_2escm"),(void*)f_30142},
{C_text("f_30167:irregex_2escm"),(void*)f_30167},
{C_text("f_30205:irregex_2escm"),(void*)f_30205},
{C_text("f_30208:irregex_2escm"),(void*)f_30208},
{C_text("f_30211:irregex_2escm"),(void*)f_30211},
{C_text("f_30218:irregex_2escm"),(void*)f_30218},
{C_text("f_30223:irregex_2escm"),(void*)f_30223},
{C_text("f_30233:irregex_2escm"),(void*)f_30233},
{C_text("f_30269:irregex_2escm"),(void*)f_30269},
{C_text("f_30433:irregex_2escm"),(void*)f_30433},
{C_text("f_30446:irregex_2escm"),(void*)f_30446},
{C_text("f_30456:irregex_2escm"),(void*)f_30456},
{C_text("f_30467:irregex_2escm"),(void*)f_30467},
{C_text("f_30471:irregex_2escm"),(void*)f_30471},
{C_text("f_30473:irregex_2escm"),(void*)f_30473},
{C_text("f_30504:irregex_2escm"),(void*)f_30504},
{C_text("f_30551:irregex_2escm"),(void*)f_30551},
{C_text("f_30571:irregex_2escm"),(void*)f_30571},
{C_text("f_30581:irregex_2escm"),(void*)f_30581},
{C_text("f_30608:irregex_2escm"),(void*)f_30608},
{C_text("f_30630:irregex_2escm"),(void*)f_30630},
{C_text("f_30732:irregex_2escm"),(void*)f_30732},
{C_text("f_31197:irregex_2escm"),(void*)f_31197},
{C_text("f_31492:irregex_2escm"),(void*)f_31492},
{C_text("f_31495:irregex_2escm"),(void*)f_31495},
{C_text("f_31592:irregex_2escm"),(void*)f_31592},
{C_text("f_31596:irregex_2escm"),(void*)f_31596},
{C_text("f_31599:irregex_2escm"),(void*)f_31599},
{C_text("f_31602:irregex_2escm"),(void*)f_31602},
{C_text("f_31605:irregex_2escm"),(void*)f_31605},
{C_text("f_31608:irregex_2escm"),(void*)f_31608},
{C_text("f_7738:irregex_2escm"),(void*)f_7738},
{C_text("f_7741:irregex_2escm"),(void*)f_7741},
{C_text("f_7749:irregex_2escm"),(void*)f_7749},
{C_text("f_7753:irregex_2escm"),(void*)f_7753},
{C_text("f_7756:irregex_2escm"),(void*)f_7756},
{C_text("f_7762:irregex_2escm"),(void*)f_7762},
{C_text("f_7804:irregex_2escm"),(void*)f_7804},
{C_text("f_7822:irregex_2escm"),(void*)f_7822},
{C_text("f_7831:irregex_2escm"),(void*)f_7831},
{C_text("f_7839:irregex_2escm"),(void*)f_7839},
{C_text("f_7852:irregex_2escm"),(void*)f_7852},
{C_text("f_7854:irregex_2escm"),(void*)f_7854},
{C_text("f_7861:irregex_2escm"),(void*)f_7861},
{C_text("f_7863:irregex_2escm"),(void*)f_7863},
{C_text("f_7877:irregex_2escm"),(void*)f_7877},
{C_text("f_7895:irregex_2escm"),(void*)f_7895},
{C_text("f_7901:irregex_2escm"),(void*)f_7901},
{C_text("f_7926:irregex_2escm"),(void*)f_7926},
{C_text("f_7972:irregex_2escm"),(void*)f_7972},
{C_text("f_7985:irregex_2escm"),(void*)f_7985},
{C_text("f_7987:irregex_2escm"),(void*)f_7987},
{C_text("f_7991:irregex_2escm"),(void*)f_7991},
{C_text("f_8012:irregex_2escm"),(void*)f_8012},
{C_text("f_8016:irregex_2escm"),(void*)f_8016},
{C_text("f_8041:irregex_2escm"),(void*)f_8041},
{C_text("f_8045:irregex_2escm"),(void*)f_8045},
{C_text("f_8070:irregex_2escm"),(void*)f_8070},
{C_text("f_8074:irregex_2escm"),(void*)f_8074},
{C_text("f_8163:irregex_2escm"),(void*)f_8163},
{C_text("f_8231:irregex_2escm"),(void*)f_8231},
{C_text("f_8273:irregex_2escm"),(void*)f_8273},
{C_text("f_8275:irregex_2escm"),(void*)f_8275},
{C_text("f_8345:irregex_2escm"),(void*)f_8345},
{C_text("f_8347:irregex_2escm"),(void*)f_8347},
{C_text("f_8351:irregex_2escm"),(void*)f_8351},
{C_text("f_8408:irregex_2escm"),(void*)f_8408},
{C_text("f_8410:irregex_2escm"),(void*)f_8410},
{C_text("f_8414:irregex_2escm"),(void*)f_8414},
{C_text("f_8491:irregex_2escm"),(void*)f_8491},
{C_text("f_8495:irregex_2escm"),(void*)f_8495},
{C_text("f_8581:irregex_2escm"),(void*)f_8581},
{C_text("f_8615:irregex_2escm"),(void*)f_8615},
{C_text("f_8621:irregex_2escm"),(void*)f_8621},
{C_text("f_8655:irregex_2escm"),(void*)f_8655},
{C_text("f_8669:irregex_2escm"),(void*)f_8669},
{C_text("f_8676:irregex_2escm"),(void*)f_8676},
{C_text("f_8682:irregex_2escm"),(void*)f_8682},
{C_text("f_8700:irregex_2escm"),(void*)f_8700},
{C_text("f_8704:irregex_2escm"),(void*)f_8704},
{C_text("f_8708:irregex_2escm"),(void*)f_8708},
{C_text("f_8715:irregex_2escm"),(void*)f_8715},
{C_text("f_8723:irregex_2escm"),(void*)f_8723},
{C_text("f_8727:irregex_2escm"),(void*)f_8727},
{C_text("f_8731:irregex_2escm"),(void*)f_8731},
{C_text("f_8735:irregex_2escm"),(void*)f_8735},
{C_text("f_8739:irregex_2escm"),(void*)f_8739},
{C_text("f_8743:irregex_2escm"),(void*)f_8743},
{C_text("f_8747:irregex_2escm"),(void*)f_8747},
{C_text("f_8756:irregex_2escm"),(void*)f_8756},
{C_text("f_8764:irregex_2escm"),(void*)f_8764},
{C_text("f_8773:irregex_2escm"),(void*)f_8773},
{C_text("f_8831:irregex_2escm"),(void*)f_8831},
{C_text("f_8835:irregex_2escm"),(void*)f_8835},
{C_text("f_8849:irregex_2escm"),(void*)f_8849},
{C_text("f_8853:irregex_2escm"),(void*)f_8853},
{C_text("f_8866:irregex_2escm"),(void*)f_8866},
{C_text("f_8877:irregex_2escm"),(void*)f_8877},
{C_text("f_8879:irregex_2escm"),(void*)f_8879},
{C_text("f_8886:irregex_2escm"),(void*)f_8886},
{C_text("f_8899:irregex_2escm"),(void*)f_8899},
{C_text("f_8906:irregex_2escm"),(void*)f_8906},
{C_text("f_8945:irregex_2escm"),(void*)f_8945},
{C_text("f_8972:irregex_2escm"),(void*)f_8972},
{C_text("f_9004:irregex_2escm"),(void*)f_9004},
{C_text("f_9011:irregex_2escm"),(void*)f_9011},
{C_text("f_9026:irregex_2escm"),(void*)f_9026},
{C_text("f_9039:irregex_2escm"),(void*)f_9039},
{C_text("f_9082:irregex_2escm"),(void*)f_9082},
{C_text("f_9139:irregex_2escm"),(void*)f_9139},
{C_text("f_9177:irregex_2escm"),(void*)f_9177},
{C_text("f_9180:irregex_2escm"),(void*)f_9180},
{C_text("f_9188:irregex_2escm"),(void*)f_9188},
{C_text("f_9201:irregex_2escm"),(void*)f_9201},
{C_text("f_9220:irregex_2escm"),(void*)f_9220},
{C_text("f_9292:irregex_2escm"),(void*)f_9292},
{C_text("f_9317:irregex_2escm"),(void*)f_9317},
{C_text("f_9325:irregex_2escm"),(void*)f_9325},
{C_text("f_9327:irregex_2escm"),(void*)f_9327},
{C_text("f_9341:irregex_2escm"),(void*)f_9341},
{C_text("f_9344:irregex_2escm"),(void*)f_9344},
{C_text("f_9346:irregex_2escm"),(void*)f_9346},
{C_text("f_9363:irregex_2escm"),(void*)f_9363},
{C_text("f_9370:irregex_2escm"),(void*)f_9370},
{C_text("f_9386:irregex_2escm"),(void*)f_9386},
{C_text("f_9407:irregex_2escm"),(void*)f_9407},
{C_text("f_9413:irregex_2escm"),(void*)f_9413},
{C_text("f_9426:irregex_2escm"),(void*)f_9426},
{C_text("f_9468:irregex_2escm"),(void*)f_9468},
{C_text("f_9483:irregex_2escm"),(void*)f_9483},
{C_text("f_9506:irregex_2escm"),(void*)f_9506},
{C_text("f_9522:irregex_2escm"),(void*)f_9522},
{C_text("f_9535:irregex_2escm"),(void*)f_9535},
{C_text("f_9549:irregex_2escm"),(void*)f_9549},
{C_text("f_9567:irregex_2escm"),(void*)f_9567},
{C_text("f_9583:irregex_2escm"),(void*)f_9583},
{C_text("f_9594:irregex_2escm"),(void*)f_9594},
{C_text("f_9600:irregex_2escm"),(void*)f_9600},
{C_text("f_9618:irregex_2escm"),(void*)f_9618},
{C_text("f_9924:irregex_2escm"),(void*)f_9924},
{C_text("f_9933:irregex_2escm"),(void*)f_9933},
{C_text("f_9951:irregex_2escm"),(void*)f_9951},
{C_text("f_9958:irregex_2escm"),(void*)f_9958},
{C_text("f_9985:irregex_2escm"),(void*)f_9985},
{C_text("f_9991:irregex_2escm"),(void*)f_9991},
{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#%vector-copy! 
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		24
S|  bit-not		1
S|  bit-shr		10
S|  bit-shl		11
S|  bit-and		18
S|  bit-ior		11
S|  scheme#reverse		35
S|  make-irregex-match		1
o|eliminated procedure checks: 537 
o|eliminated procedure checks: 1 
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#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#- (quote 10) (quote 1)) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#- (quote 10) (quote 3)) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#+ (quote 10) (quote 17)) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#+ (quote 10) (quote 2)) 
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#char->integer (quote #\space)) 
o|folded constant expression: (scheme#- (quote 32) (quote 32)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#- (quote 32) (quote 1)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#- (quote 32) (quote 32)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 95)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#- (quote 32) (quote 32)) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#- (quote 10) (quote 1)) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#+ (quote 10) (quote 1)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 95)) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#+ (quote 10) (quote 3)) 
o|folded constant expression: (scheme#char->integer (quote #\newline)) 
o|folded constant expression: (scheme#+ (quote 10) (quote 3)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 96)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 161)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 162)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 191)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 192)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 207)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 208)) 
o|folded constant expression: (scheme#char->integer (quote #\space)) 
o|folded constant expression: (scheme#+ (quote 32) (quote 215)) 
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|  1 (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|  33 (scheme#cadr (pair * pair))
o|  2 (scheme#- integer integer)
o|  3 (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|  3 (scheme#char=? char char)
o|  264 (scheme#eqv? * (or eof null fixnum char boolean symbol keyword))
o|  215 (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: 3672 
(o e)|assignments to immediate values: 13 
o|dropping redundant toplevel assignment: chicken.irregex#%vector-copy 
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 chicken.irregex#%vector-copy!) 
o|contracted procedure: "(irregex-core.scm:94) 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: a7848 
o|substituted constant variable: a7846 
o|inlining procedure: k7865 
o|inlining procedure: k7865 
o|substituted constant variable: a7910 
o|inlining procedure: k7992 
o|contracted procedure: "(irregex-core.scm:237) g792793" 
o|inlining procedure: k7992 
o|inlining procedure: k8017 
o|contracted procedure: "(irregex-core.scm:240) g801802" 
o|inlining procedure: k8017 
o|inlining procedure: k8046 
o|contracted procedure: "(irregex-core.scm:243) g810811" 
o|inlining procedure: k8046 
o|inlining procedure: k8075 
o|inlining procedure: k8075 
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: k8165 
o|inlining procedure: k8165 
o|inlining procedure: k8180 
o|inlining procedure: k8180 
o|inlining procedure: k8196 
o|inlining procedure: k8232 
o|inlining procedure: k8232 
o|contracted procedure: "(irregex-core.scm:282) g858859" 
o|inlining procedure: k8240 
o|inlining procedure: k8240 
o|contracted procedure: "(irregex-core.scm:281) g851852" 
o|inlining procedure: k8210 
o|substituted constant variable: a8228 
o|inlining procedure: k8210 
o|inlining procedure: k8196 
o|inlining procedure: k8277 
o|inlining procedure: k8277 
o|inlining procedure: k8295 
o|inlining procedure: k8295 
o|contracted procedure: "(irregex-core.scm:292) g872873" 
o|inlining procedure: k8352 
o|contracted procedure: "(irregex-core.scm:303) g880881" 
o|inlining procedure: k8370 
o|substituted constant variable: a8388 
o|inlining procedure: k8370 
o|inlining procedure: k8352 
o|contracted procedure: "(irregex-core.scm:304) chicken.irregex#irregex-match-valid-named-index?" 
o|inlining procedure: k7976 
o|inlining procedure: k7976 
o|inlining procedure: k8418 
o|contracted procedure: "(irregex-core.scm:313) g903904" 
o|contracted procedure: "(irregex-core.scm:312) g899900" 
o|contracted procedure: "(irregex-core.scm:311) g895896" 
o|inlining procedure: "(irregex-core.scm:310) chicken.irregex#chunker-get-substring" 
o|inlining procedure: k8418 
o|inlining procedure: "(irregex-core.scm:308) chicken.irregex#irregex-match-chunker" 
o|inlining procedure: k8502 
o|inlining procedure: k8502 
o|contracted procedure: "(irregex-core.scm:325) g922923" 
o|contracted procedure: "(irregex-core.scm:324) g918919" 
o|contracted procedure: "(irregex-core.scm:323) g914915" 
o|inlining procedure: "(irregex-core.scm:319) chicken.irregex#chunker-get-subchunk" 
o|inlining procedure: "(irregex-core.scm:318) chicken.irregex#irregex-match-chunker" 
o|inlining procedure: k8626 
o|inlining procedure: k8638 
o|inlining procedure: k8638 
o|inlining procedure: k8626 
o|inlining procedure: k8657 
o|inlining procedure: k8657 
o|inlining procedure: k8684 
o|inlining procedure: k8684 
o|inlining procedure: k8854 
o|inlining procedure: "(irregex-core.scm:384) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:383) chicken.irregex#chunker-get-str" 
o|inlining procedure: k8854 
o|contracted procedure: "(irregex-core.scm:381) chicken.irregex#chunker-prev-chunk" 
o|inlining procedure: k8818 
o|inlining procedure: k8818 
o|inlining procedure: k8836 
o|inlining procedure: k8836 
o|inlining procedure: "(irregex-core.scm:373) chicken.irregex#chunker-get-next" 
o|inlining procedure: k8887 
o|inlining procedure: "(irregex-core.scm:390) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:389) chicken.irregex#chunker-get-str" 
o|inlining procedure: k8887 
o|inlining procedure: "(irregex-core.scm:387) chicken.irregex#chunker-get-next" 
o|inlining procedure: k9041 
o|inlining procedure: k9041 
o|substituted constant variable: a9058 
o|inlining procedure: k9238 
o|inlining procedure: k9238 
o|removed side-effect free assignment to unused variable: chicken.irregex#%substring=? 
o|contracted procedure: "(irregex-core.scm:492) chicken.irregex#string-cat-reverse/aux" 
o|inlining procedure: k9348 
o|contracted procedure: "(irregex-core.scm:503) chicken.irregex#%%string-copy!" 
o|inlining procedure: k9294 
o|inlining procedure: k9294 
o|substituted constant variable: a9308 
o|substituted constant variable: a9311 
o|inlining procedure: k9348 
o|inlining procedure: k9372 
o|inlining procedure: k9372 
o|inlining procedure: k9388 
o|inlining procedure: k9388 
o|inlining procedure: k9415 
o|inlining procedure: k9415 
o|removed side-effect free assignment to unused variable: chicken.irregex#find-tail 
o|inlining procedure: k9470 
o|inlining procedure: k9470 
o|inlining procedure: k9485 
o|inlining procedure: k9485 
o|inlining procedure: k9508 
o|inlining procedure: k9524 
o|inlining procedure: k9524 
o|inlining procedure: k9508 
o|inlining procedure: k9554 
o|inlining procedure: k9554 
o|inlining procedure: k9569 
o|inlining procedure: k9569 
o|inlining procedure: k9602 
o|inlining procedure: k9602 
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: k9926 
o|inlining procedure: k9926 
o|inlining procedure: k9960 
o|inlining procedure: k9960 
o|substituted constant variable: a9983 
o|inlining procedure: k9993 
o|inlining procedure: k9993 
o|inlining procedure: k10012 
o|inlining procedure: k10012 
o|inlining procedure: k10033 
o|inlining procedure: k10033 
o|substituted constant variable: chicken.irregex#dot-token 
o|inlining procedure: k10074 
o|substituted constant variable: a10085 
o|inlining procedure: k10074 
o|substituted constant variable: a10097 
o|inlining procedure: k10101 
o|inlining procedure: k10101 
o|substituted constant variable: a10127 
o|inlining procedure: k10132 
o|substituted constant variable: a10146 
o|substituted constant variable: a10163 
o|inlining procedure: k10132 
o|substituted constant variable: a10197 
o|substituted constant variable: a10199 
o|substituted constant variable: a10206 
o|substituted constant variable: a10213 
o|substituted constant variable: a10216 
o|inlining procedure: k10217 
o|substituted constant variable: a10228 
o|substituted constant variable: a10231 
o|inlining procedure: k10238 
o|inlining procedure: k10238 
o|inlining procedure: k10251 
o|inlining procedure: k10251 
o|substituted constant variable: a10278 
o|inlining procedure: k10283 
o|substituted constant variable: a10294 
o|substituted constant variable: a10297 
o|inlining procedure: k10283 
o|substituted constant variable: a10307 
o|substituted constant variable: a10309 
o|substituted constant variable: a10311 
o|inlining procedure: k10217 
o|inlining procedure: k10321 
o|substituted constant variable: a10332 
o|inlining procedure: k10321 
o|substituted constant variable: a10350 
o|inlining procedure: k10358 
o|inlining procedure: k10358 
o|substituted constant variable: a10374 
o|inlining procedure: k10370 
o|inlining procedure: k10370 
o|substituted constant variable: a10386 
o|substituted constant variable: a10388 
o|inlining procedure: k10389 
o|substituted constant variable: a10407 
o|substituted constant variable: a10408 
o|substituted constant variable: a10415 
o|inlining procedure: k10389 
o|substituted constant variable: a10423 
o|substituted constant variable: a10425 
o|substituted constant variable: a10427 
o|substituted constant variable: a10429 
o|substituted constant variable: a10432 
o|inlining procedure: k10433 
o|substituted constant variable: a10444 
o|inlining procedure: k10433 
o|substituted constant variable: a10450 
o|inlining procedure: k10454 
o|inlining procedure: k10473 
o|inlining procedure: k10473 
o|inlining procedure: k10454 
o|inlining procedure: k10492 
o|inlining procedure: k10492 
o|substituted constant variable: a10496 
o|substituted constant variable: a10501 
o|substituted constant variable: a10503 
o|substituted constant variable: a10505 
o|substituted constant variable: a10510 
o|substituted constant variable: a10512 
o|substituted constant variable: a10514 
o|substituted constant variable: a10516 
o|substituted constant variable: a10518 
o|inlining procedure: k10525 
o|inlining procedure: k10525 
o|inlining procedure: k10552 
o|inlining procedure: k10552 
o|inlining procedure: k10571 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|propagated global variable: r1057231810 chicken.irregex#~case-insensitive? 
o|inlining procedure: k10571 
o|substituted constant variable: chicken.irregex#~multi-line? 
o|inlining procedure: k10589 
o|substituted constant variable: chicken.irregex#~single-line? 
o|propagated global variable: r1059031814 chicken.irregex#~single-line? 
o|inlining procedure: k10589 
o|substituted constant variable: chicken.irregex#~ignore-space? 
o|inlining procedure: k10607 
o|substituted constant variable: chicken.irregex#~utf8? 
o|substituted constant variable: chicken.irregex#~none 
o|inlining procedure: k10607 
o|substituted constant variable: a10623 
o|substituted constant variable: a10625 
o|substituted constant variable: a10630 
o|substituted constant variable: a10632 
o|substituted constant variable: a10637 
o|substituted constant variable: a10639 
o|substituted constant variable: a10644 
o|substituted constant variable: a10646 
o|inlining procedure: k10650 
o|inlining procedure: k10650 
o|substituted constant variable: a10657 
o|substituted constant variable: a10659 
o|substituted constant variable: a10661 
o|substituted constant variable: chicken.irregex#~none 
o|inlining procedure: k10669 
o|inlining procedure: k10669 
o|inlining procedure: k10699 
o|inlining procedure: k10699 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k10721 
o|inlining procedure: k10743 
o|inlining procedure: k10743 
o|inlining procedure: k10721 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k10777 
o|inlining procedure: k10777 
o|inlining procedure: k10803 
o|inlining procedure: k10803 
o|inlining procedure: k10837 
o|inlining procedure: k10837 
o|contracted procedure: "(irregex-core.scm:781) chicken.irregex#utf8-backup-to-initial-char" 
o|inlining procedure: k14453 
o|inlining procedure: k14453 
o|substituted constant variable: a14476 
o|substituted constant variable: a14481 
o|substituted constant variable: a14483 
o|substituted constant variable: chicken.irregex#~utf8? 
o|inlining procedure: k10897 
o|inlining procedure: k10912 
o|substituted constant variable: a10931 
o|inlining procedure: k10924 
o|inlining procedure: k10924 
o|inlining procedure: k10912 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k10897 
o|substituted constant variable: a11039 
o|inlining procedure: k11032 
o|inlining procedure: k11032 
o|inlining procedure: k11076 
o|inlining procedure: k11076 
o|substituted constant variable: a11090 
o|substituted constant variable: a11098 
o|inlining procedure: k11113 
o|inlining procedure: k11113 
o|substituted constant variable: a11145 
o|substituted constant variable: a11148 
o|substituted constant variable: chicken.irregex#~single-line? 
o|inlining procedure: k11164 
o|substituted constant variable: a11190 
o|substituted constant variable: a11193 
o|inlining procedure: k11199 
o|inlining procedure: k11219 
o|inlining procedure: k11219 
o|inlining procedure: k11249 
o|inlining procedure: k11249 
o|inlining procedure: k11279 
o|inlining procedure: k11279 
o|substituted constant variable: a11307 
o|substituted constant variable: a11309 
o|substituted constant variable: a11311 
o|substituted constant variable: a11313 
o|substituted constant variable: a11315 
o|substituted constant variable: a11317 
o|inlining procedure: k11199 
o|inlining procedure: k11164 
o|inlining procedure: k11339 
o|inlining procedure: k11339 
o|substituted constant variable: a11362 
o|substituted constant variable: a11365 
o|inlining procedure: k11386 
o|substituted constant variable: a11397 
o|inlining procedure: k11402 
o|substituted constant variable: a11413 
o|substituted constant variable: a11416 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k11402 
o|substituted constant variable: a11430 
o|inlining procedure: k11435 
o|substituted constant variable: a11452 
o|inlining procedure: k11456 
o|inlining procedure: k11456 
o|substituted constant variable: a11494 
o|substituted constant variable: a11502 
o|substituted constant variable: a11509 
o|inlining procedure: k11435 
o|substituted constant variable: a11539 
o|inlining procedure: k11540 
o|substituted constant variable: a11551 
o|substituted constant variable: a11554 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k11540 
o|substituted constant variable: a11574 
o|substituted constant variable: a11577 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k11586 
o|substituted constant variable: a11597 
o|substituted constant variable: a11600 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k11586 
o|substituted constant variable: a11620 
o|inlining procedure: k11615 
o|inlining procedure: k11615 
o|substituted constant variable: a11639 
o|substituted constant variable: a11642 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k11651 
o|substituted constant variable: a11662 
o|substituted constant variable: a11665 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k11651 
o|substituted constant variable: a11713 
o|substituted constant variable: chicken.irregex#~save? 
o|substituted constant variable: a11725 
o|substituted constant variable: a11732 
o|substituted constant variable: a11734 
o|substituted constant variable: a11736 
o|substituted constant variable: a11739 
o|inlining procedure: k11740 
o|substituted constant variable: a11751 
o|substituted constant variable: a11754 
o|substituted constant variable: chicken.irregex#~save? 
o|inlining procedure: k11740 
o|substituted constant variable: a11774 
o|inlining procedure: k11769 
o|inlining procedure: k11769 
o|inlining procedure: k11791 
o|inlining procedure: k11791 
o|substituted constant variable: a11805 
o|substituted constant variable: a11808 
o|substituted constant variable: chicken.irregex#~save? 
o|substituted constant variable: a11827 
o|substituted constant variable: a11830 
o|inlining procedure: k11831 
o|substituted constant variable: a11848 
o|substituted constant variable: a11851 
o|substituted constant variable: chicken.irregex#~save? 
o|substituted constant variable: a11870 
o|substituted constant variable: a11873 
o|inlining procedure: k11831 
o|substituted constant variable: a11879 
o|substituted constant variable: a11882 
o|substituted constant variable: chicken.irregex#~save? 
o|substituted constant variable: a11897 
o|substituted constant variable: a11904 
o|inlining procedure: k11905 
o|inlining procedure: k11905 
o|substituted constant variable: a11919 
o|inlining procedure: k11926 
o|propagated global variable: r1192731895 chicken.irregex#flag-clear 
o|inlining procedure: k11926 
o|propagated global variable: r1192731900 chicken.irregex#flag-join 
o|inlining procedure: k11941 
o|inlining procedure: k11941 
o|inlining procedure: k11951 
o|inlining procedure: k11951 
o|substituted constant variable: chicken.irregex#~utf8? 
o|substituted constant variable: chicken.irregex#~utf8? 
o|inlining procedure: k11954 
o|inlining procedure: k11954 
o|substituted constant variable: a11977 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k11982 
o|substituted constant variable: a11993 
o|substituted constant variable: chicken.irregex#~multi-line? 
o|inlining procedure: k11982 
o|substituted constant variable: a12009 
o|substituted constant variable: chicken.irregex#~ignore-space? 
o|inlining procedure: k12014 
o|substituted constant variable: a12028 
o|substituted constant variable: chicken.irregex#~utf8? 
o|substituted constant variable: a12038 
o|inlining procedure: k12014 
o|substituted constant variable: a12050 
o|inlining procedure: k12055 
o|substituted constant variable: a12066 
o|substituted constant variable: a12069 
o|inlining procedure: k12055 
o|substituted constant variable: a12089 
o|substituted constant variable: a12092 
o|substituted constant variable: a12113 
o|substituted constant variable: a12115 
o|substituted constant variable: a12117 
o|substituted constant variable: a12119 
o|substituted constant variable: a12121 
o|substituted constant variable: a12123 
o|substituted constant variable: a12125 
o|substituted constant variable: a12127 
o|substituted constant variable: a12129 
o|substituted constant variable: a12131 
o|substituted constant variable: a12133 
o|substituted constant variable: a12135 
o|substituted constant variable: a12137 
o|substituted constant variable: a12139 
o|substituted constant variable: a12141 
o|substituted constant variable: a12144 
o|substituted constant variable: a12149 
o|substituted constant variable: a12152 
o|substituted constant variable: a12158 
o|substituted constant variable: a12161 
o|inlining procedure: k11386 
o|inlining procedure: k12168 
o|inlining procedure: k12168 
o|substituted constant variable: a12182 
o|substituted constant variable: a12185 
o|inlining procedure: k12204 
o|substituted constant variable: a12241 
o|contracted procedure: "(irregex-core.scm:1023) chicken.irregex#string-parse-cset" 
o|inlining procedure: k13624 
o|inlining procedure: k13624 
o|inlining procedure: k13642 
o|substituted constant variable: a13653 
o|inlining procedure: k13642 
o|contracted procedure: "(irregex-core.scm:1243) chicken.irregex#cset->sre" 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k13681 
o|substituted constant variable: a13701 
o|inlining procedure: k13706 
o|inlining procedure: k13706 
o|inlining procedure: k13724 
o|inlining procedure: k13724 
o|inlining procedure: k13748 
o|inlining procedure: k13748 
o|substituted constant variable: a13778 
o|inlining procedure: k13779 
o|substituted constant variable: a13801 
o|inlining procedure: k13779 
o|substituted constant variable: a13807 
o|substituted constant variable: a13825 
o|substituted constant variable: a13828 
o|substituted constant variable: a13829 
o|substituted constant variable: a13837 
o|substituted constant variable: a13841 
o|inlining procedure: k13845 
o|inlining procedure: k13845 
o|substituted constant variable: a13851 
o|substituted constant variable: a13858 
o|substituted constant variable: a13865 
o|inlining procedure: k13681 
o|inlining procedure: k13889 
o|substituted constant variable: a13921 
o|consed rest parameter at call site: "(irregex-core.scm:1279) chicken.irregex#sre->cset" 2 
o|substituted constant variable: a13939 
o|substituted constant variable: a13947 
o|substituted constant variable: a13958 
o|inlining procedure: k13889 
o|substituted constant variable: a13976 
o|substituted constant variable: a13985 
o|substituted constant variable: a13987 
o|substituted constant variable: a13989 
o|substituted constant variable: a13991 
o|substituted constant variable: a13993 
o|substituted constant variable: a13994 
o|substituted constant variable: a14001 
o|inlining procedure: k14002 
o|substituted constant variable: a14025 
o|consed rest parameter at call site: "(irregex-core.scm:1294) chicken.irregex#sre->cset" 2 
o|inlining procedure: k14042 
o|substituted constant variable: a14067 
o|inlining procedure: k14042 
o|substituted constant variable: a14079 
o|substituted constant variable: a14088 
o|inlining procedure: k14092 
o|inlining procedure: k14092 
o|inlining procedure: k14104 
o|inlining procedure: k14104 
o|substituted constant variable: a14117 
o|substituted constant variable: a14119 
o|substituted constant variable: a14121 
o|substituted constant variable: a14123 
o|substituted constant variable: a14125 
o|substituted constant variable: a14127 
o|substituted constant variable: a14130 
o|inlining procedure: k14002 
o|substituted constant variable: a14164 
o|substituted constant variable: a14177 
o|substituted constant variable: a14179 
o|substituted constant variable: a14181 
o|substituted constant variable: a14183 
o|inlining procedure: k14184 
o|inlining procedure: k14195 
o|inlining procedure: k14195 
o|inlining procedure: "(irregex-core.scm:1316) chicken.irregex#make-cset" 
o|substituted constant variable: chicken.irregex#~multi-line? 
o|inlining procedure: k14184 
o|inlining procedure: "(irregex-core.scm:1317) chicken.irregex#make-cset" 
o|substituted constant variable: chicken.irregex#~utf8? 
o|substituted constant variable: a14220 
o|inlining procedure: k12204 
o|substituted constant variable: a12253 
o|inlining procedure: k12248 
o|substituted constant variable: a12263 
o|inlining procedure: k12248 
o|inlining procedure: k12292 
o|inlining procedure: k12292 
o|substituted constant variable: a12315 
o|substituted constant variable: a12318 
o|inlining procedure: k12327 
o|substituted constant variable: a12335 
o|substituted constant variable: a12338 
o|inlining procedure: k12327 
o|substituted constant variable: a12352 
o|substituted constant variable: a12355 
o|inlining procedure: k12366 
o|inlining procedure: k12366 
o|contracted procedure: "(irregex-core.scm:1039) chicken.irregex#string-split-char" 
o|inlining procedure: k9189 
o|inlining procedure: k9189 
o|substituted constant variable: a9213 
o|substituted constant variable: a9216 
o|substituted constant variable: a9226 
o|substituted constant variable: a12413 
o|substituted constant variable: a12416 
o|inlining procedure: k12424 
o|inlining procedure: k12424 
o|substituted constant variable: a12430 
o|substituted constant variable: a12437 
o|substituted constant variable: a12444 
o|inlining procedure: k12445 
o|substituted constant variable: a12456 
o|inlining procedure: k12464 
o|substituted constant variable: a12475 
o|substituted constant variable: a12478 
o|inlining procedure: k12464 
o|substituted constant variable: a12498 
o|substituted constant variable: a12501 
o|inlining procedure: k12514 
o|substituted constant variable: a12525 
o|substituted constant variable: a12528 
o|inlining procedure: k12514 
o|substituted constant variable: a12548 
o|substituted constant variable: a12551 
o|inlining procedure: k12564 
o|substituted constant variable: a12575 
o|substituted constant variable: a12578 
o|inlining procedure: k12564 
o|substituted constant variable: a12606 
o|substituted constant variable: a12609 
o|inlining procedure: k12630 
o|substituted constant variable: a12641 
o|substituted constant variable: a12644 
o|inlining procedure: k12630 
o|substituted constant variable: a12668 
o|substituted constant variable: a12671 
o|inlining procedure: k12680 
o|substituted constant variable: a12691 
o|substituted constant variable: a12694 
o|inlining procedure: k12680 
o|substituted constant variable: a12714 
o|substituted constant variable: a12717 
o|inlining procedure: k12734 
o|substituted constant variable: a12745 
o|substituted constant variable: a12748 
o|inlining procedure: k12734 
o|substituted constant variable: a12768 
o|substituted constant variable: a12771 
o|inlining procedure: k12780 
o|substituted constant variable: a12791 
o|substituted constant variable: a12794 
o|inlining procedure: k12780 
o|substituted constant variable: a12814 
o|substituted constant variable: a12817 
o|inlining procedure: k12826 
o|substituted constant variable: a12837 
o|substituted constant variable: a12840 
o|inlining procedure: k12826 
o|substituted constant variable: a12886 
o|inlining procedure: k12887 
o|inlining procedure: k12917 
o|inlining procedure: k12917 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|substituted constant variable: a12961 
o|substituted constant variable: a12964 
o|contracted procedure: "(irregex-core.scm:1108) chicken.irregex#char-mirror" 
o|inlining procedure: k13474 
o|inlining procedure: k13474 
o|inlining procedure: k13486 
o|inlining procedure: k13486 
o|substituted constant variable: a13499 
o|substituted constant variable: a13501 
o|substituted constant variable: a13503 
o|substituted constant variable: a13505 
o|substituted constant variable: a12967 
o|substituted constant variable: a12970 
o|inlining procedure: k12887 
o|substituted constant variable: a12985 
o|inlining procedure: k12989 
o|inlining procedure: k12989 
o|substituted constant variable: a13013 
o|inlining procedure: k13008 
o|substituted constant variable: a13020 
o|inlining procedure: k13008 
o|substituted constant variable: a13036 
o|substituted constant variable: a13039 
o|substituted constant variable: a13057 
o|substituted constant variable: a13058 
o|substituted constant variable: a13065 
o|substituted constant variable: a13071 
o|substituted constant variable: a13072 
o|inlining procedure: k13077 
o|substituted constant variable: a13088 
o|inlining procedure: k13077 
o|substituted constant variable: a13142 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|substituted constant variable: a13158 
o|contracted procedure: "(irregex-core.scm:1149) chicken.irregex#string-scan-pred" 
o|inlining procedure: k9141 
o|inlining procedure: k9141 
o|substituted constant variable: a9158 
o|inlining procedure: k13159 
o|substituted constant variable: a13176 
o|substituted constant variable: a13179 
o|inlining procedure: k13159 
o|substituted constant variable: a13200 
o|substituted constant variable: a13203 
o|substituted constant variable: a13209 
o|substituted constant variable: a13211 
o|substituted constant variable: a13213 
o|substituted constant variable: a13215 
o|substituted constant variable: a13217 
o|substituted constant variable: a13219 
o|substituted constant variable: a13221 
o|substituted constant variable: a13223 
o|substituted constant variable: a13225 
o|substituted constant variable: a13227 
o|substituted constant variable: a13229 
o|substituted constant variable: a13231 
o|substituted constant variable: a13233 
o|substituted constant variable: a13235 
o|substituted constant variable: a13237 
o|substituted constant variable: a13239 
o|substituted constant variable: a13241 
o|substituted constant variable: a13243 
o|substituted constant variable: a13245 
o|substituted constant variable: a13248 
o|inlining procedure: k12445 
o|substituted constant variable: a13260 
o|substituted constant variable: a13263 
o|inlining procedure: k13272 
o|substituted constant variable: a13286 
o|substituted constant variable: a13289 
o|substituted constant variable: chicken.irregex#~multi-line? 
o|inlining procedure: k13272 
o|substituted constant variable: a13315 
o|substituted constant variable: a13318 
o|substituted constant variable: chicken.irregex#~multi-line? 
o|inlining procedure: k13330 
o|substituted constant variable: a13347 
o|substituted constant variable: a13350 
o|substituted constant variable: a13360 
o|substituted constant variable: chicken.irregex#~ignore-space? 
o|inlining procedure: k13330 
o|inlining procedure: k13367 
o|substituted constant variable: a13395 
o|substituted constant variable: a13398 
o|inlining procedure: k13367 
o|substituted constant variable: a13404 
o|substituted constant variable: chicken.irregex#~ignore-space? 
o|substituted constant variable: a13410 
o|substituted constant variable: a13412 
o|substituted constant variable: a13414 
o|substituted constant variable: a13416 
o|substituted constant variable: a13418 
o|substituted constant variable: a13420 
o|substituted constant variable: a13422 
o|substituted constant variable: a13424 
o|substituted constant variable: a13426 
o|substituted constant variable: a13428 
o|substituted constant variable: a13430 
o|substituted constant variable: a13435 
o|substituted constant variable: a13437 
o|substituted constant variable: a13439 
o|substituted constant variable: a13441 
o|inlining procedure: k13459 
o|inlining procedure: k13459 
o|inlining procedure: k13509 
o|inlining procedure: k13509 
o|inlining procedure: k13527 
o|inlining procedure: k13527 
o|contracted procedure: "(irregex-core.scm:1217) g18541855" 
o|substituted constant variable: a13560 
o|substituted constant variable: a13563 
o|contracted procedure: "(irregex-core.scm:1211) chicken.irregex#string-scan-char-escape" 
o|inlining procedure: k9084 
o|inlining procedure: k9084 
o|inlining procedure: k9096 
o|substituted constant variable: a9107 
o|inlining procedure: k9096 
o|substituted constant variable: a9113 
o|substituted constant variable: a9115 
o|inlining procedure: k13564 
o|inlining procedure: k13564 
o|substituted constant variable: a13594 
o|contracted procedure: "(irregex-core.scm:1225) g18591860" 
o|substituted constant variable: a13600 
o|substituted constant variable: a13603 
o|substituted constant variable: a13604 
o|substituted constant variable: a14231 
o|substituted constant variable: table1964 
o|inlining procedure: k14259 
o|inlining procedure: k14259 
o|contracted procedure: "(irregex-core.scm:1370) g19781979" 
o|inlining procedure: k14305 
o|contracted procedure: "(irregex-core.scm:1374) g19841985" 
o|inlining procedure: k14305 
o|contracted procedure: "(irregex-core.scm:1379) g19921993" 
o|substituted constant variable: a14437 
o|substituted constant variable: a14439 
o|substituted constant variable: a14441 
o|substituted constant variable: a14443 
o|inlining procedure: k14491 
o|inlining procedure: k14491 
o|inlining procedure: k14503 
o|inlining procedure: k14503 
o|substituted constant variable: a14519 
o|substituted constant variable: a14521 
o|substituted constant variable: a14523 
o|substituted constant variable: a14525 
o|inlining procedure: k14570 
o|inlining procedure: k14570 
o|inlining procedure: k14604 
o|inlining procedure: k14604 
o|substituted constant variable: a14694 
o|substituted constant variable: a14696 
o|substituted constant variable: a14698 
o|substituted constant variable: a14700 
o|inlining procedure: k14846 
o|inlining procedure: k14846 
o|inlining procedure: k14929 
o|contracted procedure: "(irregex-core.scm:1455) g21162125" 
o|contracted procedure: "(irregex-core.scm:1457) g21342135" 
o|contracted procedure: "(irregex-core.scm:1456) g21312132" 
o|inlining procedure: k14929 
o|inlining procedure: k14965 
o|contracted procedure: "(irregex-core.scm:1453) g20892098" 
o|inlining procedure: k14965 
o|contracted procedure: "(irregex-core.scm:1467) g21562157" 
o|contracted procedure: "(irregex-core.scm:1467) g21532154" 
o|contracted procedure: "(irregex-core.scm:1475) g21922193" 
o|contracted procedure: "(irregex-core.scm:1474) g21892190" 
o|inlining procedure: k15112 
o|contracted procedure: "(irregex-core.scm:1473) g21672176" 
o|inlining procedure: k15112 
o|contracted procedure: "(irregex-core.scm:1463) g21462147" 
o|contracted procedure: "(irregex-core.scm:1483) g22072208" 
o|contracted procedure: "(irregex-core.scm:1483) g22042205" 
o|contracted procedure: "(irregex-core.scm:1491) g22432244" 
o|contracted procedure: "(irregex-core.scm:1490) g22402241" 
o|inlining procedure: k15277 
o|contracted procedure: "(irregex-core.scm:1489) g22182227" 
o|inlining procedure: k15277 
o|contracted procedure: "(irregex-core.scm:1479) g21972198" 
o|inlining procedure: k15864 
o|inlining procedure: k15882 
o|inlining procedure: k15882 
o|inlining procedure: k15864 
o|contracted procedure: "(irregex-core.scm:1543) chicken.irregex#unicode-range->utf8-pattern" 
o|inlining procedure: k14710 
o|contracted procedure: "(irregex-core.scm:1428) chicken.irregex#unicode-range-climb-digits" 
o|inlining procedure: k15397 
o|contracted procedure: "(irregex-core.scm:1510) g23322341" 
o|contracted procedure: "(irregex-core.scm:1511) g23502351" 
o|contracted procedure: "(irregex-core.scm:1511) g23472348" 
o|inlining procedure: k15397 
o|contracted procedure: "(irregex-core.scm:1509) g23212322" 
o|contracted procedure: "(irregex-core.scm:1509) chicken.irregex#utf8-highest-digit-of-length" 
o|inlining procedure: k14529 
o|inlining procedure: k14529 
o|inlining procedure: k14541 
o|inlining procedure: k14541 
o|substituted constant variable: a14557 
o|substituted constant variable: a14559 
o|substituted constant variable: a14561 
o|substituted constant variable: a14563 
o|contracted procedure: "(irregex-core.scm:1508) g23182319" 
o|inlining procedure: k15520 
o|contracted procedure: "(irregex-core.scm:1521) g23872396" 
o|contracted procedure: "(irregex-core.scm:1522) g24052406" 
o|contracted procedure: "(irregex-core.scm:1522) g24022403" 
o|inlining procedure: k15520 
o|contracted procedure: "(irregex-core.scm:1520) g23762377" 
o|contracted procedure: "(irregex-core.scm:1516) g23702371" 
o|contracted procedure: "(irregex-core.scm:1519) g23732374" 
o|inlining procedure: k15597 
o|inlining procedure: k15597 
o|substituted constant variable: a15635 
o|inlining procedure: k15681 
o|contracted procedure: "(irregex-core.scm:1501) g22672276" 
o|contracted procedure: "(irregex-core.scm:1502) g22852286" 
o|contracted procedure: "(irregex-core.scm:1502) g22822283" 
o|inlining procedure: k15681 
o|contracted procedure: "(irregex-core.scm:1500) g22562257" 
o|contracted procedure: "(irregex-core.scm:1499) g22532254" 
o|inlining procedure: k14710 
o|inlining procedure: k14737 
o|inlining procedure: k14758 
o|inlining procedure: k14758 
o|contracted procedure: "(irregex-core.scm:1434) g20692070" 
o|inlining procedure: k14737 
o|contracted procedure: "(irregex-core.scm:1442) chicken.irregex#unicode-range-middle" 
o|inlining procedure: k15798 
o|contracted procedure: "(irregex-core.scm:1530) g24372446" 
o|contracted procedure: "(irregex-core.scm:1530) g24552456" 
o|contracted procedure: "(irregex-core.scm:1530) g24522453" 
o|inlining procedure: k15798 
o|contracted procedure: "(irregex-core.scm:1527) g24232424" 
o|contracted procedure: "(irregex-core.scm:1526) g24202421" 
o|inlining procedure: k16430 
o|inlining procedure: k16430 
o|inlining procedure: k16442 
o|inlining procedure: k16442 
o|inlining procedure: k16460 
o|inlining procedure: k16460 
o|inlining procedure: k16478 
o|inlining procedure: k16478 
o|inlining procedure: k16543 
o|inlining procedure: k16543 
o|inlining procedure: k16604 
o|inlining procedure: k16604 
o|contracted procedure: "(irregex-core.scm:1648) chicken.irregex#sre->procedure" 
o|inlining procedure: "(irregex-core.scm:3145) chicken.irregex#%irregex-match-fail-set!" 
o|inlining procedure: k23843 
o|consed rest parameter at call site: "(irregex-core.scm:3153) chicken.irregex#sre->cset" 2 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k23869 
o|consed rest parameter at call site: "(irregex-core.scm:3158) chicken.irregex#sre->cset" 2 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k23869 
o|inlining procedure: k23898 
o|inlining procedure: k23898 
o|substituted constant variable: a23964 
o|substituted constant variable: a23966 
o|inlining procedure: k23969 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k23969 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k24007 
o|substituted constant variable: chicken.irregex#~utf8? 
o|inlining procedure: k24007 
o|substituted constant variable: chicken.irregex#~utf8? 
o|inlining procedure: k24045 
o|inlining procedure: k24063 
o|inlining procedure: k24063 
o|substituted constant variable: a24107 
o|substituted constant variable: a24109 
o|inlining procedure: k24045 
o|inlining procedure: k24138 
o|inlining procedure: k24138 
o|inlining procedure: k24170 
o|inlining procedure: k24170 
o|inlining procedure: k24209 
o|inlining procedure: k24209 
o|inlining procedure: k24269 
o|inlining procedure: k24269 
o|inlining procedure: k24306 
o|inlining procedure: k24306 
o|inlining procedure: k24365 
o|inlining procedure: k24401 
o|inlining procedure: k24401 
o|inlining procedure: k24419 
o|inlining procedure: k24419 
o|inlining procedure: k24442 
o|inlining procedure: k24442 
o|inlining procedure: k24459 
o|inlining procedure: k24459 
o|inlining procedure: k24470 
o|inlining procedure: k24470 
o|inlining procedure: k24478 
o|inlining procedure: k24478 
o|inlining procedure: k24493 
o|inlining procedure: k24493 
o|inlining procedure: k24365 
o|inlining procedure: k24523 
o|inlining procedure: k24553 
o|inlining procedure: k24553 
o|inlining procedure: k24575 
o|inlining procedure: k24575 
o|inlining procedure: k24523 
o|inlining procedure: k24609 
o|inlining procedure: k24609 
o|inlining procedure: k24632 
o|inlining procedure: k24632 
o|inlining procedure: k24640 
o|inlining procedure: k24640 
o|inlining procedure: k24655 
o|inlining procedure: k24655 
o|inlining procedure: k24679 
o|inlining procedure: k24679 
o|inlining procedure: k24737 
o|inlining procedure: k24737 
o|inlining procedure: k24765 
o|inlining procedure: k24765 
o|inlining procedure: k24789 
o|inlining procedure: k24800 
o|inlining procedure: k24800 
o|inlining procedure: k24789 
o|inlining procedure: k24854 
o|inlining procedure: k24854 
o|inlining procedure: "(irregex-core.scm:3364) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:3362) chicken.irregex#chunker-get-str" 
o|contracted procedure: "(irregex-core.scm:3361) chicken.irregex#wrap-end-chunker" 
o|inlining procedure: k8947 
o|inlining procedure: "(irregex-core.scm:404) chicken.irregex#chunker-get-next" 
o|inlining procedure: k8947 
o|inlining procedure: k8974 
o|inlining procedure: k8974 
o|inlining procedure: "(irregex-core.scm:416) chicken.irregex#chunker-get-end" 
o|inlining procedure: k8989 
o|inlining procedure: "(irregex-core.scm:414) chicken.irregex#chunker-get-next" 
o|inlining procedure: k8989 
o|inlining procedure: "(irregex-core.scm:413) chicken.irregex#chunker-get-next" 
o|inlining procedure: "(irregex-core.scm:418) chicken.irregex#chunker-get-subchunk" 
o|inlining procedure: "(irregex-core.scm:417) chicken.irregex#chunker-get-substring" 
o|inlining procedure: "(irregex-core.scm:406) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:405) chicken.irregex#chunker-get-str" 
o|inlining procedure: k24910 
o|inlining procedure: k24924 
o|inlining procedure: k24924 
o|inlining procedure: k24910 
o|inlining procedure: k24960 
o|inlining procedure: k24974 
o|inlining procedure: k24974 
o|contracted procedure: "(irregex-core.scm:3402) g49894990" 
o|inlining procedure: k25009 
o|inlining procedure: k25009 
o|inlining procedure: k24960 
o|inlining procedure: k25098 
o|inlining procedure: k25118 
o|inlining procedure: k25118 
o|inlining procedure: k25137 
o|inlining procedure: k25137 
o|inlining procedure: k25187 
o|inlining procedure: "(irregex-core.scm:3447) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:3446) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3445) chicken.irregex#chunker-get-str" 
o|inlining procedure: k25187 
o|inlining procedure: "(irregex-core.scm:3442) chicken.irregex#chunker-get-next" 
o|inlining procedure: k25255 
o|inlining procedure: k25255 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k25271 
o|inlining procedure: k25271 
o|inlining procedure: k25098 
o|inlining procedure: k25315 
o|contracted procedure: "(irregex-core.scm:3476) g51025103" 
o|contracted procedure: "(irregex-core.scm:3475) g50985099" 
o|contracted procedure: "(irregex-core.scm:3462) g50685069" 
o|inlining procedure: k25315 
o|substituted constant variable: a25558 
o|substituted constant variable: a25560 
o|substituted constant variable: a25565 
o|substituted constant variable: a25567 
o|substituted constant variable: a25569 
o|substituted constant variable: a25574 
o|substituted constant variable: a25576 
o|substituted constant variable: a25578 
o|substituted constant variable: a25580 
o|substituted constant variable: a25585 
o|substituted constant variable: a25587 
o|substituted constant variable: a25589 
o|substituted constant variable: a25591 
o|substituted constant variable: a25593 
o|substituted constant variable: a25595 
o|substituted constant variable: a25597 
o|substituted constant variable: a25599 
o|substituted constant variable: a25601 
o|substituted constant variable: a25603 
o|substituted constant variable: a25605 
o|substituted constant variable: a25607 
o|substituted constant variable: a25609 
o|substituted constant variable: a25611 
o|substituted constant variable: a25613 
o|substituted constant variable: a25615 
o|substituted constant variable: a25620 
o|substituted constant variable: a25622 
o|substituted constant variable: a25624 
o|substituted constant variable: a25626 
o|substituted constant variable: a25628 
o|substituted constant variable: a25630 
o|substituted constant variable: a25632 
o|inlining procedure: k25636 
o|inlining procedure: k25636 
o|substituted constant variable: a25649 
o|substituted constant variable: a25651 
o|substituted constant variable: a25653 
o|substituted constant variable: a25655 
o|inlining procedure: k23843 
o|inlining procedure: k25664 
o|inlining procedure: k25672 
o|inlining procedure: k25672 
o|inlining procedure: "(irregex-core.scm:3500) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:3499) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3498) chicken.irregex#chunker-get-str" 
o|inlining procedure: "(irregex-core.scm:3496) chicken.irregex#chunker-get-next" 
o|inlining procedure: k25664 
o|inlining procedure: k25730 
o|substituted constant variable: a25747 
o|substituted constant variable: a25755 
o|inlining procedure: k25730 
o|inlining procedure: k25787 
o|substituted constant variable: a25798 
o|inlining procedure: k25787 
o|substituted constant variable: a25806 
o|inlining procedure: "(irregex-core.scm:3513) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:3512) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3511) chicken.irregex#chunker-get-str" 
o|inlining procedure: "(irregex-core.scm:3509) chicken.irregex#chunker-get-next" 
o|inlining procedure: k25814 
o|inlining procedure: k25822 
o|inlining procedure: k25822 
o|inlining procedure: k25814 
o|inlining procedure: k25852 
o|inlining procedure: k25852 
o|substituted constant variable: a25873 
o|inlining procedure: "(irregex-core.scm:3525) chicken.irregex#chunker-get-start" 
o|inlining procedure: k25895 
o|inlining procedure: k25903 
o|inlining procedure: k25903 
o|inlining procedure: k25918 
o|inlining procedure: k25918 
o|inlining procedure: "(irregex-core.scm:3543) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3542) chicken.irregex#chunker-get-str" 
o|inlining procedure: "(irregex-core.scm:3539) chicken.irregex#chunker-get-next" 
o|inlining procedure: k25985 
o|inlining procedure: k25985 
o|inlining procedure: "(irregex-core.scm:3533) chicken.irregex#chunker-get-start" 
o|inlining procedure: k25895 
o|inlining procedure: k26010 
o|inlining procedure: k26010 
o|inlining procedure: "(irregex-core.scm:3548) chicken.irregex#chunker-get-next" 
o|inlining procedure: k26035 
o|inlining procedure: k26043 
o|inlining procedure: k26043 
o|substituted constant variable: a26061 
o|inlining procedure: k26072 
o|inlining procedure: k26072 
o|substituted constant variable: a26081 
o|inlining procedure: "(irregex-core.scm:3560) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3559) chicken.irregex#chunker-get-str" 
o|inlining procedure: "(irregex-core.scm:3555) chicken.irregex#chunker-get-next" 
o|inlining procedure: k26035 
o|inlining procedure: k26108 
o|inlining procedure: k26108 
o|inlining procedure: k26123 
o|inlining procedure: k26123 
o|inlining procedure: "(irregex-core.scm:3569) chicken.irregex#chunker-get-start" 
o|inlining procedure: k26179 
o|inlining procedure: k26179 
o|inlining procedure: k26189 
o|inlining procedure: k26203 
o|inlining procedure: k26203 
o|inlining procedure: k26215 
o|inlining procedure: k26215 
o|inlining procedure: "(irregex-core.scm:3580) chicken.irregex#chunker-get-start" 
o|inlining procedure: k26189 
o|inlining procedure: k26272 
o|inlining procedure: k26272 
o|substituted constant variable: a26286 
o|substituted constant variable: a26288 
o|substituted constant variable: a26290 
o|substituted constant variable: a26292 
o|substituted constant variable: a26294 
o|substituted constant variable: a26296 
o|substituted constant variable: a26298 
o|substituted constant variable: a26300 
o|substituted constant variable: a26302 
o|substituted constant variable: a26304 
o|inlining procedure: k26305 
o|inlining procedure: k26319 
o|inlining procedure: k26338 
o|inlining procedure: "(irregex-core.scm:3607) chicken.irregex#chunker-get-next" 
o|inlining procedure: k26375 
o|substituted constant variable: a26386 
o|inlining procedure: k26375 
o|inlining procedure: "(irregex-core.scm:3605) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:3604) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3603) chicken.irregex#chunker-get-str" 
o|inlining procedure: k26338 
o|inlining procedure: "(irregex-core.scm:3601) chicken.irregex#chunker-get-next" 
o|inlining procedure: k26319 
o|substituted constant variable: a26408 
o|inlining procedure: k26418 
o|inlining procedure: k26437 
o|inlining procedure: "(irregex-core.scm:3625) chicken.irregex#chunker-get-next" 
o|inlining procedure: k26474 
o|substituted constant variable: a26485 
o|inlining procedure: k26474 
o|inlining procedure: "(irregex-core.scm:3623) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:3622) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3621) chicken.irregex#chunker-get-str" 
o|inlining procedure: k26437 
o|inlining procedure: "(irregex-core.scm:3619) chicken.irregex#chunker-get-next" 
o|inlining procedure: k26418 
o|substituted constant variable: a26507 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k26305 
o|substituted constant variable: chicken.irregex#~none 
o|inlining procedure: k16621 
o|substituted constant variable: chicken.irregex#~consumer? 
o|propagated global variable: r1662232477 chicken.irregex#~consumer? 
o|inlining procedure: k16621 
o|substituted constant variable: chicken.irregex#~none 
o|inlining procedure: k16628 
o|substituted constant variable: chicken.irregex#~searcher? 
o|propagated global variable: r1662932481 chicken.irregex#~searcher? 
o|substituted constant variable: chicken.irregex#~none 
o|inlining procedure: k16628 
o|substituted constant variable: chicken.irregex#~none 
o|contracted procedure: "(irregex-core.scm:1640) chicken.irregex#sre-length-ranges" 
o|inlining procedure: k17499 
o|inlining procedure: k17499 
o|inlining procedure: k17505 
o|inlining procedure: k17521 
o|inlining procedure: k17521 
o|inlining procedure: k17550 
o|inlining procedure: k17567 
o|inlining procedure: k17581 
o|inlining procedure: k17581 
o|inlining procedure: k17567 
o|inlining procedure: k17616 
o|inlining procedure: k17616 
o|inlining procedure: k17550 
o|inlining procedure: k17645 
o|inlining procedure: k17659 
o|inlining procedure: k17659 
o|inlining procedure: k17669 
o|inlining procedure: k17669 
o|inlining procedure: k17645 
o|inlining procedure: k17698 
o|inlining procedure: k17698 
o|inlining procedure: k17716 
o|inlining procedure: k17786 
o|inlining procedure: k17792 
o|inlining procedure: k17792 
o|inlining procedure: k17786 
o|inlining procedure: k17819 
o|inlining procedure: k17819 
o|inlining procedure: k17716 
o|inlining procedure: k17874 
o|inlining procedure: k17908 
o|inlining procedure: k17908 
o|inlining procedure: k17874 
o|inlining procedure: k17932 
o|inlining procedure: k17932 
o|inlining procedure: k17967 
o|inlining procedure: k17967 
o|inlining procedure: k18010 
o|inlining procedure: k18010 
o|inlining procedure: k18029 
o|inlining procedure: k18029 
o|inlining procedure: k18062 
o|inlining procedure: k18062 
o|inlining procedure: k18098 
o|inlining procedure: k18098 
o|inlining procedure: k18156 
o|inlining procedure: k18156 
o|inlining procedure: k18171 
o|inlining procedure: k18171 
o|inlining procedure: k18195 
o|inlining procedure: k18195 
o|inlining procedure: k18243 
o|inlining procedure: k18243 
o|inlining procedure: k18254 
o|substituted constant variable: a18291 
o|inlining procedure: k18283 
o|inlining procedure: k18283 
o|inlining procedure: k18254 
o|inlining procedure: k18309 
o|inlining procedure: k18309 
o|inlining procedure: k18340 
o|inlining procedure: k18340 
o|substituted constant variable: a18353 
o|substituted constant variable: a18355 
o|substituted constant variable: a18357 
o|substituted constant variable: a18359 
o|inlining procedure: k18363 
o|inlining procedure: k18363 
o|substituted constant variable: a18376 
o|substituted constant variable: a18378 
o|substituted constant variable: a18380 
o|substituted constant variable: a18382 
o|substituted constant variable: a18387 
o|substituted constant variable: a18389 
o|substituted constant variable: a18391 
o|substituted constant variable: a18396 
o|substituted constant variable: a18398 
o|substituted constant variable: a18403 
o|substituted constant variable: a18405 
o|substituted constant variable: a18410 
o|substituted constant variable: a18412 
o|inlining procedure: k18416 
o|inlining procedure: k18416 
o|substituted constant variable: a18429 
o|substituted constant variable: a18431 
o|substituted constant variable: a18433 
o|substituted constant variable: a18435 
o|substituted constant variable: a18437 
o|substituted constant variable: a18439 
o|substituted constant variable: a18441 
o|inlining procedure: k18445 
o|inlining procedure: k18445 
o|inlining procedure: k18457 
o|inlining procedure: k18457 
o|substituted constant variable: a18464 
o|substituted constant variable: a18466 
o|substituted constant variable: a18468 
o|substituted constant variable: a18470 
o|substituted constant variable: a18472 
o|substituted constant variable: a18474 
o|inlining procedure: k18478 
o|inlining procedure: k18478 
o|substituted constant variable: a18491 
o|substituted constant variable: a18493 
o|substituted constant variable: a18495 
o|substituted constant variable: a18497 
o|inlining procedure: k17505 
o|inlining procedure: k18509 
o|inlining procedure: k18509 
o|substituted constant variable: a18524 
o|substituted constant variable: a18532 
o|inlining procedure: k18528 
o|inlining procedure: k18528 
o|inlining procedure: k18546 
o|inlining procedure: k18546 
o|consed rest parameter at call site: "(irregex-core.scm:1636) chicken.irregex#nfa->dfa" 2 
o|substituted constant variable: a16650 
o|inlining procedure: k16652 
o|inlining procedure: k16652 
o|consed rest parameter at call site: "(irregex-core.scm:1632) chicken.irregex#nfa->dfa" 2 
o|substituted constant variable: a16685 
o|substituted constant variable: a16690 
o|inlining procedure: k16687 
o|inlining procedure: k16687 
o|contracted procedure: "(irregex-core.scm:1619) chicken.irregex#sre-adjust-utf8" 
o|inlining procedure: k15982 
o|inlining procedure: k16004 
o|inlining procedure: k16004 
o|inlining procedure: k16049 
o|inlining procedure: k16049 
o|inlining procedure: k16080 
o|inlining procedure: k16110 
o|inlining procedure: k16110 
o|inlining procedure: k16080 
o|inlining procedure: k16150 
o|inlining procedure: k16150 
o|inlining procedure: k16165 
o|inlining procedure: k16165 
o|consed rest parameter at call site: "(irregex-core.scm:1564) chicken.irregex#sre->cset" 2 
o|inlining procedure: k16182 
o|inlining procedure: k16197 
o|inlining procedure: k16197 
o|inlining procedure: k16220 
o|inlining procedure: k16220 
o|substituted constant variable: a16252 
o|substituted constant variable: a16254 
o|inlining procedure: k16182 
o|inlining procedure: k16276 
o|inlining procedure: k16276 
o|substituted constant variable: a16308 
o|inlining procedure: k16312 
o|inlining procedure: k16312 
o|substituted constant variable: a16325 
o|substituted constant variable: a16327 
o|substituted constant variable: a16329 
o|substituted constant variable: a16331 
o|substituted constant variable: a16333 
o|substituted constant variable: a16335 
o|substituted constant variable: a16337 
o|substituted constant variable: a16339 
o|inlining procedure: k15982 
o|inlining procedure: k16346 
o|inlining procedure: k16346 
o|inlining procedure: k16349 
o|inlining procedure: k16349 
o|inlining procedure: k16383 
o|contracted procedure: "(irregex-core.scm:1584) g26322641" 
o|inlining procedure: k16383 
o|inlining procedure: k16414 
o|inlining procedure: k16414 
o|substituted constant variable: a16424 
o|substituted constant variable: a16426 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|substituted constant variable: chicken.irregex#~utf8? 
o|inlining procedure: k16701 
o|inlining procedure: k16717 
o|inlining procedure: k16717 
o|inlining procedure: k16751 
o|inlining procedure: k16751 
o|inlining procedure: k16768 
o|inlining procedure: k16768 
o|inlining procedure: k16780 
o|inlining procedure: k16780 
o|inlining procedure: k16792 
o|inlining procedure: k16792 
o|substituted constant variable: a16805 
o|substituted constant variable: a16807 
o|substituted constant variable: a16809 
o|substituted constant variable: a16811 
o|substituted constant variable: a16813 
o|substituted constant variable: a16815 
o|substituted constant variable: a16817 
o|substituted constant variable: a16819 
o|substituted constant variable: a16821 
o|substituted constant variable: a16823 
o|inlining procedure: k16827 
o|inlining procedure: k16827 
o|inlining procedure: k16839 
o|inlining procedure: k16839 
o|substituted constant variable: a16852 
o|substituted constant variable: a16854 
o|substituted constant variable: a16856 
o|substituted constant variable: a16858 
o|substituted constant variable: a16860 
o|substituted constant variable: a16862 
o|inlining procedure: k16701 
o|substituted constant variable: a16864 
o|inlining procedure: k16871 
o|inlining procedure: k16871 
o|inlining procedure: k16881 
o|inlining procedure: k16896 
o|inlining procedure: k16896 
o|inlining procedure: k16881 
o|substituted constant variable: a16926 
o|inlining procedure: k16930 
o|inlining procedure: k16930 
o|inlining procedure: k16942 
o|inlining procedure: k16942 
o|substituted constant variable: a16955 
o|substituted constant variable: a16957 
o|substituted constant variable: a16959 
o|substituted constant variable: a16961 
o|substituted constant variable: a16963 
o|substituted constant variable: a16965 
o|substituted constant variable: a16977 
o|inlining procedure: k16969 
o|substituted constant variable: a16986 
o|inlining procedure: k16981 
o|inlining procedure: k16993 
o|inlining procedure: k16993 
o|inlining procedure: k16981 
o|inlining procedure: k16969 
o|inlining procedure: k17014 
o|inlining procedure: k17030 
o|inlining procedure: k17030 
o|inlining procedure: k17045 
o|inlining procedure: k17045 
o|substituted constant variable: a17057 
o|inlining procedure: k17061 
o|inlining procedure: k17061 
o|inlining procedure: k17073 
o|inlining procedure: k17073 
o|substituted constant variable: a17086 
o|substituted constant variable: a17088 
o|substituted constant variable: a17090 
o|substituted constant variable: a17092 
o|substituted constant variable: a17094 
o|substituted constant variable: a17096 
o|inlining procedure: k17014 
o|inlining procedure: k17106 
o|inlining procedure: k17106 
o|inlining procedure: k17116 
o|inlining procedure: k17116 
o|inlining procedure: k17143 
o|inlining procedure: k17143 
o|inlining procedure: k17158 
o|inlining procedure: k17158 
o|substituted constant variable: a17170 
o|inlining procedure: k17174 
o|inlining procedure: k17174 
o|inlining procedure: k17186 
o|inlining procedure: k17186 
o|substituted constant variable: a17199 
o|substituted constant variable: a17201 
o|substituted constant variable: a17203 
o|substituted constant variable: a17205 
o|substituted constant variable: a17207 
o|substituted constant variable: a17209 
o|substituted constant variable: a17214 
o|substituted constant variable: a17216 
o|inlining procedure: k17223 
o|inlining procedure: k17223 
o|inlining procedure: k17233 
o|inlining procedure: k17233 
o|inlining procedure: k17260 
o|inlining procedure: k17260 
o|inlining procedure: k17275 
o|inlining procedure: k17275 
o|substituted constant variable: a17287 
o|inlining procedure: k17291 
o|inlining procedure: k17291 
o|inlining procedure: k17303 
o|inlining procedure: k17303 
o|substituted constant variable: a17316 
o|substituted constant variable: a17318 
o|substituted constant variable: a17320 
o|substituted constant variable: a17322 
o|substituted constant variable: a17324 
o|substituted constant variable: a17326 
o|substituted constant variable: a17331 
o|substituted constant variable: a17333 
o|substituted constant variable: a17345 
o|inlining procedure: k17337 
o|inlining procedure: k17349 
o|inlining procedure: k17349 
o|inlining procedure: k17337 
o|inlining procedure: k17382 
o|inlining procedure: k17399 
o|inlining procedure: k17399 
o|inlining procedure: k17425 
o|inlining procedure: k17425 
o|substituted constant variable: a17443 
o|substituted constant variable: a17445 
o|inlining procedure: k17449 
o|inlining procedure: k17449 
o|substituted constant variable: a17462 
o|substituted constant variable: a17464 
o|substituted constant variable: a17466 
o|substituted constant variable: a17468 
o|inlining procedure: k17382 
o|inlining procedure: k18582 
o|inlining procedure: k18582 
o|inlining procedure: k18605 
o|inlining procedure: k18605 
o|inlining procedure: k18628 
o|inlining procedure: k18628 
o|inlining procedure: k18655 
o|inlining procedure: k18655 
o|inlining procedure: k18701 
o|inlining procedure: k18701 
o|substituted constant variable: a18733 
o|substituted constant variable: a18738 
o|substituted constant variable: a18740 
o|substituted constant variable: a18745 
o|substituted constant variable: a18747 
o|inlining procedure: k18809 
o|inlining procedure: k18809 
o|inlining procedure: k18840 
o|inlining procedure: k18840 
o|inlining procedure: k18901 
o|inlining procedure: k18901 
o|inlining procedure: k18931 
o|inlining procedure: k18931 
o|substituted constant variable: a18951 
o|substituted constant variable: a18953 
o|substituted constant variable: a18958 
o|substituted constant variable: a18960 
o|inlining procedure: k18964 
o|inlining procedure: k18964 
o|inlining procedure: k18976 
o|inlining procedure: k18976 
o|inlining procedure: k18988 
o|inlining procedure: k18988 
o|inlining procedure: k19000 
o|inlining procedure: k19000 
o|inlining procedure: k19012 
o|inlining procedure: k19012 
o|inlining procedure: k19024 
o|inlining procedure: k19024 
o|inlining procedure: k19036 
o|inlining procedure: k19036 
o|substituted constant variable: a19043 
o|substituted constant variable: a19045 
o|substituted constant variable: a19047 
o|substituted constant variable: a19049 
o|substituted constant variable: a19051 
o|substituted constant variable: a19053 
o|substituted constant variable: a19055 
o|substituted constant variable: a19057 
o|substituted constant variable: a19059 
o|substituted constant variable: a19061 
o|substituted constant variable: a19063 
o|substituted constant variable: a19065 
o|substituted constant variable: a19067 
o|substituted constant variable: a19069 
o|substituted constant variable: a19071 
o|substituted constant variable: a19073 
o|substituted constant variable: a19078 
o|substituted constant variable: a19080 
o|substituted constant variable: a19085 
o|substituted constant variable: a19087 
o|inlining procedure: k19095 
o|inlining procedure: k19095 
o|inlining procedure: k19127 
o|inlining procedure: k19143 
o|inlining procedure: k19143 
o|inlining procedure: k19193 
o|inlining procedure: k19216 
o|inlining procedure: k19216 
o|inlining procedure: k19193 
o|substituted constant variable: a19248 
o|inlining procedure: k19252 
o|inlining procedure: k19252 
o|inlining procedure: k19264 
o|inlining procedure: k19264 
o|inlining procedure: k19276 
o|inlining procedure: k19276 
o|substituted constant variable: a19289 
o|substituted constant variable: a19291 
o|substituted constant variable: a19293 
o|substituted constant variable: a19295 
o|substituted constant variable: a19297 
o|substituted constant variable: a19299 
o|substituted constant variable: a19301 
o|substituted constant variable: a19303 
o|inlining procedure: k19127 
o|inlining procedure: k19346 
o|inlining procedure: k19346 
o|inlining procedure: k19360 
o|inlining procedure: k19360 
o|inlining procedure: k19373 
o|inlining procedure: k19373 
o|inlining procedure: "(irregex-core.scm:1992) chicken.irregex#irregex-match-chunker-set!" 
o|inlining procedure: "(irregex-core.scm:1990) chicken.irregex#chunker-get-start" 
o|inlining procedure: k19444 
o|inlining procedure: k19456 
o|inlining procedure: k19456 
o|inlining procedure: k19481 
o|inlining procedure: k19514 
o|inlining procedure: k19514 
o|inlining procedure: k19543 
o|inlining procedure: k19543 
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-start" 
o|inlining procedure: k19481 
o|contracted procedure: "(irregex-core.scm:2009) chicken.irregex#dfa-match/shortest" 
o|inlining procedure: k20069 
o|inlining procedure: k20084 
o|inlining procedure: k20084 
o|inlining procedure: k20135 
o|substituted constant variable: a20143 
o|inlining procedure: k20135 
o|inlining procedure: k20154 
o|inlining procedure: k20154 
o|inlining procedure: k20186 
o|inlining procedure: k20186 
o|inlining procedure: "(irregex-core.scm:2143) chicken.irregex#dfa-finalizer" 
o|inlining procedure: k20069 
o|inlining procedure: "(irregex-core.scm:2135) chicken.irregex#dfa-init-state" 
o|inlining procedure: "(irregex-core.scm:2133) chicken.irregex#chunker-get-next" 
o|inlining procedure: "(irregex-core.scm:2132) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:2131) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:2130) chicken.irregex#chunker-get-str" 
o|substituted constant variable: chicken.irregex#~searcher? 
o|inlining procedure: k19444 
o|inlining procedure: "(irregex-core.scm:2032) chicken.irregex#%irregex-match-fail-set!" 
o|contracted procedure: "(irregex-core.scm:2031) chicken.irregex#irregex-search/backtrack" 
o|inlining procedure: k19601 
o|inlining procedure: k19601 
o|inlining procedure: k19619 
o|inlining procedure: k19619 
o|inlining procedure: k19655 
o|inlining procedure: "(irregex-core.scm:2059) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:2058) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:2057) chicken.irregex#chunker-get-str" 
o|inlining procedure: k19655 
o|substituted constant variable: chicken.irregex#~searcher? 
o|inlining procedure: "(irregex-core.scm:2039) chicken.irregex#chunker-get-next" 
o|inlining procedure: "(irregex-core.scm:2038) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:2037) chicken.irregex#chunker-get-str" 
o|contracted procedure: "(irregex-core.scm:2036) chicken.irregex#irregex-nfa" 
o|contracted procedure: "(irregex-core.scm:1999) chicken.irregex#irregex-dfa" 
o|inlining procedure: k19728 
o|inlining procedure: k19728 
o|inlining procedure: k19742 
o|inlining procedure: k19742 
o|inlining procedure: k19755 
o|inlining procedure: k19755 
o|inlining procedure: k19792 
o|inlining procedure: k19804 
o|inlining procedure: "(irregex-core.scm:2089) chicken.irregex#chunker-get-start" 
o|inlining procedure: k19804 
o|contracted procedure: "(irregex-core.scm:2083) g35193520" 
o|inlining procedure: "(irregex-core.scm:2083) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:2082) chicken.irregex#chunker-get-start" 
o|inlining procedure: k19792 
o|inlining procedure: k19909 
o|inlining procedure: "(irregex-core.scm:2105) chicken.irregex#%irregex-match-fail-set!" 
o|inlining procedure: k19921 
o|inlining procedure: "(irregex-core.scm:2108) chicken.irregex#%irregex-match-fail" 
o|inlining procedure: k19921 
o|inlining procedure: "(irregex-core.scm:2107) chicken.irregex#%irregex-match-fail" 
o|contracted procedure: "(irregex-core.scm:2103) g35593560" 
o|inlining procedure: "(irregex-core.scm:2102) chicken.irregex#chunker-get-end" 
o|contracted procedure: "(irregex-core.scm:2101) g35533554" 
o|inlining procedure: "(irregex-core.scm:2100) chicken.irregex#chunker-get-next" 
o|inlining procedure: k19909 
o|inlining procedure: "(irregex-core.scm:2095) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:2094) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:2093) chicken.irregex#chunker-get-str" 
o|inlining procedure: "(irregex-core.scm:2077) chicken.irregex#irregex-match-chunker-set!" 
o|inlining procedure: k20011 
o|inlining procedure: k20011 
o|removed unused formal parameters: (dfa3577) 
o|removed unused formal parameters: (dfa3580) 
o|substituted constant variable: a20232 
o|substituted constant variable: a20229 
o|inlining procedure: k20234 
o|inlining procedure: k20234 
o|substituted constant variable: a20248 
o|substituted constant variable: a20245 
o|inlining procedure: k20250 
o|inlining procedure: k20250 
o|inlining procedure: k20267 
o|inlining procedure: k20267 
o|inlining procedure: k20391 
o|inlining procedure: k20413 
o|inlining procedure: k20439 
o|inlining procedure: k20439 
o|contracted procedure: "(irregex-core.scm:2225) g37603761" 
o|inlining procedure: k20413 
o|inlining procedure: k20391 
o|inlining procedure: k20512 
o|substituted constant variable: a20520 
o|substituted constant variable: a20523 
o|inlining procedure: k20512 
o|substituted constant variable: a20529 
o|inlining procedure: k20617 
o|contracted procedure: "(irregex-core.scm:2255) g38033821" 
o|inlining procedure: k20617 
o|inlining procedure: k20640 
o|inlining procedure: k20640 
o|inlining procedure: k20674 
o|inlining procedure: k20674 
o|inlining procedure: "(irregex-core.scm:2241) chicken.irregex#dfa-cell-commands" 
o|inlining procedure: "(irregex-core.scm:2238) chicken.irregex#dfa-finalizer" 
o|inlining procedure: k20703 
o|inlining procedure: k20703 
o|inlining procedure: k20751 
o|inlining procedure: k20751 
o|contracted procedure: "(irregex-core.scm:2273) g38793880" 
o|inlining procedure: k20783 
o|inlining procedure: k20783 
o|inlining procedure: k20848 
o|inlining procedure: k20848 
o|inlining procedure: "(irregex-core.scm:2201) chicken.irregex#dfa-cell-commands" 
o|inlining procedure: "(irregex-core.scm:2192) chicken.irregex#dfa-finalizer" 
o|contracted procedure: "(irregex-core.scm:2189) chicken.irregex#make-initial-memory" 
o|substituted constant variable: a20294 
o|inlining procedure: k20304 
o|inlining procedure: k20304 
o|substituted constant variable: a20318 
o|inlining procedure: "(irregex-core.scm:2185) chicken.irregex#dfa-init-state" 
o|inlining procedure: "(irregex-core.scm:2184) chicken.irregex#chunker-get-next" 
o|inlining procedure: "(irregex-core.scm:2183) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:2182) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:2181) 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: k20973 
o|inlining procedure: k20973 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: k21010 
o|contracted procedure: "(irregex-core.scm:2433) chicken.irregex#nfa-set-epsilons!" 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: k21010 
o|contracted procedure: "(irregex-core.scm:2490) chicken.irregex#nfa-set-state-trans!" 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|substituted constant variable: a21191 
o|inlining procedure: k21195 
o|inlining procedure: k21195 
o|substituted constant variable: a21209 
o|substituted constant variable: a21215 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: k21231 
o|inlining procedure: k21231 
o|inlining procedure: k21251 
o|inlining procedure: k21251 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k21279 
o|inlining procedure: k21279 
o|inlining procedure: k21297 
o|inlining procedure: k21297 
o|inlining procedure: k21312 
o|substituted constant variable: a21332 
o|inlining procedure: k21336 
o|inlining procedure: k21336 
o|inlining procedure: k21312 
o|inlining procedure: k21382 
o|inlining procedure: k21402 
o|inlining procedure: k21402 
o|inlining procedure: k21382 
o|inlining procedure: k21427 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k21427 
o|inlining procedure: k21490 
o|substituted constant variable: a21529 
o|inlining procedure: k21523 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|propagated global variable: r2152433095 chicken.irregex#~case-insensitive? 
o|inlining procedure: k21523 
o|substituted constant variable: chicken.irregex#~utf8? 
o|propagated global variable: r2152433097 chicken.irregex#~utf8? 
o|substituted constant variable: a21534 
o|inlining procedure: k21490 
o|consed rest parameter at call site: "(irregex-core.scm:2557) chicken.irregex#sre->cset" 2 
o|substituted constant variable: chicken.irregex#~case-insensitive? 
o|inlining procedure: k21564 
o|inlining procedure: k21576 
o|inlining procedure: k21576 
o|inlining procedure: k21564 
o|inlining procedure: k21665 
o|inlining procedure: k21665 
o|inlining procedure: k21687 
o|inlining procedure: k21708 
o|inlining procedure: k21708 
o|inlining procedure: k21687 
o|inlining procedure: k21759 
o|inlining procedure: k21759 
o|inlining procedure: k21819 
o|inlining procedure: k21849 
o|inlining procedure: k21849 
o|inlining procedure: k21819 
o|inlining procedure: k21905 
o|inlining procedure: k21905 
o|substituted constant variable: a21952 
o|substituted constant variable: a21954 
o|substituted constant variable: a21959 
o|substituted constant variable: a21961 
o|substituted constant variable: a21966 
o|substituted constant variable: a21968 
o|substituted constant variable: a21970 
o|substituted constant variable: a21972 
o|inlining procedure: k21976 
o|inlining procedure: k21976 
o|substituted constant variable: a21989 
o|substituted constant variable: a21991 
o|substituted constant variable: a21993 
o|substituted constant variable: a21995 
o|inlining procedure: k21999 
o|inlining procedure: k21999 
o|substituted constant variable: a22012 
o|substituted constant variable: a22014 
o|substituted constant variable: a22016 
o|substituted constant variable: a22018 
o|substituted constant variable: a22023 
o|substituted constant variable: a22025 
o|inlining procedure: k22050 
o|substituted constant variable: a22064 
o|inlining procedure: k22068 
o|inlining procedure: k22068 
o|substituted constant variable: a22082 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: k22050 
o|inlining procedure: k22107 
o|inlining procedure: k22107 
o|inlining procedure: k22132 
o|inlining procedure: k22132 
o|inlining procedure: k22181 
o|inlining procedure: k22181 
o|substituted constant variable: a22194 
o|substituted constant variable: a22196 
o|substituted constant variable: a22198 
o|substituted constant variable: a22200 
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:2748) 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: k22347 
o|inlining procedure: k22347 
o|inlining procedure: "(irregex-core.scm:2781) chicken.irregex#mst-hash-set!" 
o|inlining procedure: k22388 
o|inlining procedure: k22388 
o|inlining procedure: "(irregex-core.scm:2771) chicken.irregex#mst-mappings-summary" 
o|inlining procedure: "(irregex-core.scm:2769) chicken.irregex#mst-num-states-set!" 
o|inlining procedure: "(irregex-core.scm:2769) chicken.irregex#mst-num-states" 
o|inlining procedure: "(irregex-core.scm:2766) chicken.irregex#mst-hash" 
o|inlining procedure: k22687 
o|inlining procedure: k22687 
o|substituted constant variable: a22701 
o|inlining procedure: k22703 
o|substituted constant variable: chicken.irregex#*mst-first-state-index* 
o|substituted constant variable: chicken.irregex#*mst-first-state-index* 
o|inlining procedure: k22703 
o|substituted constant variable: chicken.irregex#*mst-first-state-index* 
o|merged explicitly consed rest parameter: o4379 
o|inlining procedure: k22792 
o|contracted procedure: "(irregex-core.scm:2899) chicken.irregex#dfa-renumber" 
o|inlining procedure: k22979 
o|inlining procedure: k22979 
o|substituted constant variable: a22999 
o|contracted procedure: "(irregex-core.scm:2951) chicken.irregex#maybe-cset->char" 
o|inlining procedure: k26674 
o|inlining procedure: k26674 
o|substituted constant variable: a26713 
o|inlining procedure: k23055 
o|inlining procedure: k23055 
o|inlining procedure: k23093 
o|inlining procedure: k23093 
o|inlining procedure: "(irregex-core.scm:2898) chicken.irregex#nfa-highest-map-index" 
o|inlining procedure: k22792 
o|inlining procedure: k22824 
o|inlining procedure: k22824 
o|inlining procedure: k22848 
o|inlining procedure: k22848 
o|contracted procedure: "(irregex-core.scm:2916) chicken.irregex#find-reorder-commands" 
o|inlining procedure: k23771 
o|inlining procedure: k23771 
o|contracted procedure: "(irregex-core.scm:3123) chicken.irregex#nfa-set-reorder-commands!" 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: "(irregex-core.scm:2440) chicken.irregex#mst-hash" 
o|contracted procedure: "(irregex-core.scm:3122) chicken.irregex#find-reorder-commands-internal" 
o|inlining procedure: k23627 
o|inlining procedure: k23627 
o|inlining procedure: k23654 
o|inlining procedure: k23654 
o|inlining procedure: k23681 
o|inlining procedure: k23681 
o|inlining procedure: k23732 
o|inlining procedure: k23732 
o|inlining procedure: "(irregex-core.scm:3101) chicken.irregex#mst-mappings-summary" 
o|contracted procedure: "(irregex-core.scm:3099) chicken.irregex#mst-same-states?" 
o|inlining procedure: k22604 
o|inlining procedure: k22628 
o|inlining procedure: k22628 
o|substituted constant variable: a22642 
o|substituted constant variable: chicken.irregex#*mst-first-state-index* 
o|inlining procedure: "(irregex-core.scm:2819) chicken.irregex#mst-num-states" 
o|inlining procedure: "(irregex-core.scm:2819) chicken.irregex#mst-num-states" 
o|inlining procedure: k22604 
o|inlining procedure: "(irregex-core.scm:2818) chicken.irregex#mst-hash" 
o|inlining procedure: "(irregex-core.scm:2818) chicken.irregex#mst-hash" 
o|inlining procedure: "(irregex-core.scm:3095) chicken.irregex#mst-mappings-summary" 
o|inlining procedure: "(irregex-core.scm:3094) chicken.irregex#nfa-num-tags" 
o|contracted procedure: "(irregex-core.scm:3121) chicken.irregex#nfa-get-reorder-commands" 
o|inlining procedure: k21037 
o|inlining procedure: k21037 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: "(irregex-core.scm:2436) chicken.irregex#mst-hash" 
o|contracted procedure: "(irregex-core.scm:2906) chicken.irregex#get-distinct-transitions" 
o|inlining procedure: k23150 
o|inlining procedure: k23150 
o|inlining procedure: k23168 
o|inlining procedure: k23168 
o|inlining procedure: k23227 
o|inlining procedure: k23227 
o|inlining procedure: k23204 
o|inlining procedure: k23204 
o|contracted procedure: "(irregex-core.scm:2984) csets-intersect?4467" 
o|inlining procedure: k23131 
o|inlining procedure: k23131 
o|contracted procedure: "(irregex-core.scm:2967) chicken.irregex#nfa-get-state-trans" 
o|inlining procedure: k20947 
o|inlining procedure: k20947 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|contracted procedure: "(irregex-core.scm:2883) chicken.irregex#nfa-start-state" 
o|substituted constant variable: a20925 
o|inlining procedure: k23448 
o|inlining procedure: k23448 
o|contracted procedure: "(irregex-core.scm:3050) chicken.irregex#nfa-add-closure!" 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: "(irregex-core.scm:2448) chicken.irregex#mst-hash" 
o|contracted procedure: "(irregex-core.scm:3049) chicken.irregex#nfa-epsilon-closure-internal" 
o|inlining procedure: k23327 
o|inlining procedure: k23327 
o|inlining procedure: k23350 
o|inlining procedure: k23350 
o|contracted procedure: "(irregex-core.scm:3038) chicken.irregex#mst-add-tagged!" 
o|inlining procedure: "(irregex-core.scm:2813) chicken.irregex#mst-hash-set!" 
o|inlining procedure: "(irregex-core.scm:2808) chicken.irregex#mst-num-states-set!" 
o|inlining procedure: "(irregex-core.scm:2808) chicken.irregex#mst-num-states" 
o|inlining procedure: "(irregex-core.scm:2805) chicken.irregex#mst-hash" 
o|inlining procedure: k22554 
o|inlining procedure: k22554 
o|inlining procedure: "(irregex-core.scm:2797) chicken.irregex#mst-mappings-summary" 
o|contracted procedure: "(irregex-core.scm:3036) chicken.irregex#next-index-for-tag!" 
o|inlining procedure: k22724 
o|contracted procedure: "(irregex-core.scm:2845) chicken.irregex#nfa-set-highest-map-index!" 
o|inlining procedure: k22724 
o|inlining procedure: k22736 
o|inlining procedure: k22736 
o|inlining procedure: "(irregex-core.scm:2841) chicken.irregex#mst-mappings-summary" 
o|inlining procedure: "(irregex-core.scm:2840) chicken.irregex#nfa-highest-map-index" 
o|inlining procedure: k23374 
o|inlining procedure: k23374 
o|contracted procedure: "(irregex-core.scm:3043) chicken.irregex#mst-add/fast!" 
o|inlining procedure: "(irregex-core.scm:2790) chicken.irregex#mst-num-states-set!" 
o|inlining procedure: "(irregex-core.scm:2790) chicken.irregex#mst-num-states" 
o|inlining procedure: "(irregex-core.scm:2787) chicken.irregex#mst-hash-set!" 
o|inlining procedure: "(irregex-core.scm:2788) chicken.irregex#mst-hash" 
o|contracted procedure: "(irregex-core.scm:3048) chicken.irregex#nfa-get-closure" 
o|inlining procedure: k21094 
o|inlining procedure: k21094 
o|substituted constant variable: chicken.irregex#*nfa-num-fields* 
o|inlining procedure: "(irregex-core.scm:2444) chicken.irregex#mst-hash" 
o|inlining procedure: k23475 
o|inlining procedure: k23475 
o|inlining procedure: k23495 
o|inlining procedure: k23495 
o|inlining procedure: k23537 
o|inlining procedure: k23559 
o|inlining procedure: k23559 
o|inlining procedure: k23583 
o|inlining procedure: k23583 
o|inlining procedure: k23537 
o|inlining procedure: "(irregex-core.scm:3058) chicken.irregex#mst-mappings-summary" 
o|inlining procedure: "(irregex-core.scm:3057) chicken.irregex#mst-mappings-summary" 
o|inlining procedure: "(irregex-core.scm:3056) chicken.irregex#nfa-num-tags" 
o|inlining procedure: k26561 
o|substituted constant variable: a26578 
o|inlining procedure: k26561 
o|inlining procedure: k26613 
o|substituted constant variable: a26624 
o|inlining procedure: k26613 
o|inlining procedure: "(irregex-core.scm:3667) chicken.irregex#chunker-get-end" 
o|inlining procedure: "(irregex-core.scm:3666) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3665) chicken.irregex#chunker-get-str" 
o|inlining procedure: "(irregex-core.scm:3663) chicken.irregex#chunker-get-next" 
o|removed side-effect free assignment to unused variable: chicken.irregex#cset-size 
o|substituted constant variable: a26780 
o|inlining procedure: k26784 
o|inlining procedure: k26784 
o|inlining procedure: "(irregex-core.scm:3712) chicken.irregex#make-cset" 
o|merged explicitly consed rest parameter: o5413 
o|inlining procedure: k26899 
o|inlining procedure: k26911 
o|inlining procedure: k26911 
o|inlining procedure: k26929 
o|inlining procedure: k26962 
o|inlining procedure: k26962 
o|inlining procedure: k26929 
o|inlining procedure: k27026 
o|inlining procedure: k27026 
o|inlining procedure: k27061 
o|inlining procedure: k27096 
o|inlining procedure: k27096 
o|inlining procedure: k27061 
o|inlining procedure: k27140 
o|inlining procedure: k27140 
o|contracted procedure: "(irregex-core.scm:3735) chicken.irregex#plist->cset" 
o|inlining procedure: k26834 
o|inlining procedure: k26834 
o|inlining procedure: "(irregex-core.scm:3704) chicken.irregex#make-cset" 
o|contracted procedure: "(irregex-core.scm:3735) chicken.irregex#sre-flatten-ranges" 
o|inlining procedure: k18761 
o|inlining procedure: k18761 
o|inlining procedure: k27152 
o|inlining procedure: k27181 
o|inlining procedure: k27181 
o|inlining procedure: k27152 
o|inlining procedure: k27231 
o|inlining procedure: k27231 
o|substituted constant variable: a27250 
o|substituted constant variable: a27252 
o|substituted constant variable: a27254 
o|substituted constant variable: a27256 
o|substituted constant variable: a27258 
o|substituted constant variable: a27260 
o|substituted constant variable: a27262 
o|inlining procedure: k26899 
o|inlining procedure: k27271 
o|inlining procedure: k27271 
o|inlining procedure: k27284 
o|inlining procedure: k27284 
o|inlining procedure: k27353 
o|inlining procedure: k27353 
o|inlining procedure: k27368 
o|inlining procedure: k27368 
o|substituted constant variable: a27396 
o|inlining procedure: k27389 
o|inlining procedure: k27389 
o|inlining procedure: k27412 
o|inlining procedure: k27412 
o|substituted constant variable: a27428 
o|substituted constant variable: a27430 
o|inlining procedure: k27443 
o|inlining procedure: k27443 
o|inlining procedure: k27485 
o|inlining procedure: k27485 
o|substituted constant variable: a27541 
o|inlining procedure: k27533 
o|inlining procedure: k27533 
o|substituted constant variable: a27567 
o|inlining procedure: k27577 
o|inlining procedure: k27577 
o|inlining procedure: k27686 
o|inlining procedure: k27686 
o|inlining procedure: k27722 
o|inlining procedure: k27722 
o|inlining procedure: k27748 
o|inlining procedure: k27748 
o|inlining procedure: k27773 
o|inlining procedure: k27773 
o|contracted procedure: "(irregex-core.scm:3841) chicken.irregex#next-char" 
o|substituted constant variable: a27653 
o|contracted procedure: "(irregex-core.scm:3815) g55995600" 
o|contracted procedure: "(irregex-core.scm:3839) chicken.irregex#prev-char" 
o|substituted constant variable: a27668 
o|contracted procedure: "(irregex-core.scm:3818) g56045605" 
o|inlining procedure: k27882 
o|inlining procedure: k27882 
o|inlining procedure: k27915 
o|inlining procedure: k27915 
o|contracted procedure: "(irregex-core.scm:3868) chicken.irregex#min-char" 
o|inlining procedure: k27850 
o|inlining procedure: k27850 
o|contracted procedure: "(irregex-core.scm:3867) chicken.irregex#max-char" 
o|inlining procedure: k27859 
o|inlining procedure: k27859 
o|consed rest parameter at call site: "(irregex-core.scm:3876) chicken.irregex#sre->cset" 2 
o|inlining procedure: k28014 
o|inlining procedure: k28014 
o|inlining procedure: k28177 
o|inlining procedure: k28177 
o|inlining procedure: k28227 
o|inlining procedure: k28227 
o|substituted constant variable: chicken.irregex#~consumer? 
o|contracted procedure: "(irregex-core.scm:3926) g57005701" 
o|inlining procedure: "(irregex-core.scm:3913) chicken.irregex#irregex-match-chunker-set!" 
o|propagated global variable: str74433494 chicken.irregex#irregex-basic-string-chunker 
o|inlining procedure: k28272 
o|inlining procedure: k28272 
o|inlining procedure: k28286 
o|inlining procedure: k28286 
o|inlining procedure: k28305 
o|inlining procedure: k28305 
o|inlining procedure: k28411 
o|inlining procedure: k28411 
o|inlining procedure: k28455 
o|inlining procedure: "(irregex-core.scm:3965) chicken.irregex#chunker-get-start" 
o|inlining procedure: "(irregex-core.scm:3964) chicken.irregex#chunker-get-next" 
o|inlining procedure: "(irregex-core.scm:3963) chicken.irregex#chunker-get-end" 
o|inlining procedure: k28455 
o|substituted constant variable: chicken.irregex#~consumer? 
o|contracted procedure: "(irregex-core.scm:3960) g57525753" 
o|inlining procedure: "(irregex-core.scm:3953) chicken.irregex#irregex-match-chunker-set!" 
o|inlining procedure: "(irregex-core.scm:3950) chicken.irregex#chunker-get-start" 
o|inlining procedure: k28597 
o|contracted procedure: "(irregex-core.scm:3985) g57845785" 
o|inlining procedure: k28597 
o|inlining procedure: k28696 
o|inlining procedure: k28696 
o|contracted procedure: "(irregex-core.scm:3994) g57975798" 
o|inlining procedure: k28734 
o|inlining procedure: k28734 
o|inlining procedure: k28766 
o|inlining procedure: k28766 
o|inlining procedure: k28792 
o|inlining procedure: k28792 
o|inlining procedure: k28797 
o|inlining procedure: k28797 
o|inlining procedure: k28824 
o|contracted procedure: "(irregex-core.scm:4023) g58305831" 
o|contracted procedure: "(irregex-core.scm:4021) g58265827" 
o|inlining procedure: k28824 
o|contracted procedure: "(irregex-core.scm:4026) g58355836" 
o|inlining procedure: k28935 
o|inlining procedure: k28935 
o|substituted constant variable: a28970 
o|substituted constant variable: a28972 
o|inlining procedure: k29041 
o|inlining procedure: k29041 
o|contracted procedure: "(irregex-core.scm:4062) g58775878" 
o|contracted procedure: "(irregex-core.scm:4059) g58735874" 
o|inlining procedure: k29109 
o|inlining procedure: k29109 
o|inlining procedure: k29127 
o|inlining procedure: k29127 
o|inlining procedure: k29237 
o|inlining procedure: k29237 
o|substituted constant variable: a29254 
o|inlining procedure: k29281 
o|inlining procedure: k29281 
o|substituted constant variable: chicken.irregex#rx-special-chars 
o|inlining procedure: k29444 
o|inlining procedure: k29444 
o|inlining procedure: k29466 
o|inlining procedure: k29478 
o|contracted procedure: "(irregex-utils.scm:47) make-alt6128" 
o|inlining procedure: k29327 
o|inlining procedure: k29327 
o|inlining procedure: k29478 
o|substituted constant variable: a29511 
o|inlining procedure: k29513 
o|inlining procedure: k29513 
o|contracted procedure: "(irregex-utils.scm:55) make-seq6129" 
o|inlining procedure: k29357 
o|inlining procedure: k29357 
o|inlining procedure: k29394 
o|contracted procedure: "(irregex-utils.scm:36) g61526161" 
o|inlining procedure: k29379 
o|inlining procedure: k29379 
o|inlining procedure: k29394 
o|inlining procedure: k29434 
o|inlining procedure: k29434 
o|contracted procedure: "(irregex-utils.scm:49) g61846185" 
o|inlining procedure: k29466 
o|substituted constant variable: a29585 
o|inlining procedure: k29606 
o|inlining procedure: k29606 
o|inlining procedure: k29686 
o|inlining procedure: k29702 
o|inlining procedure: k29724 
o|inlining procedure: k29724 
o|inlining procedure: k29702 
o|inlining procedure: k29754 
o|inlining procedure: k29754 
o|inlining procedure: k29777 
o|inlining procedure: k29777 
o|inlining procedure: k29796 
o|inlining procedure: k29818 
o|inlining procedure: k29818 
o|inlining procedure: k29796 
o|inlining procedure: k29868 
o|inlining procedure: k29868 
o|inlining procedure: k29892 
o|inlining procedure: k29927 
o|inlining procedure: k29927 
o|inlining procedure: k29892 
o|inlining procedure: k29990 
o|inlining procedure: k29990 
o|inlining procedure: k30017 
o|substituted constant variable: a30030 
o|inlining procedure: k30017 
o|inlining procedure: k30045 
o|inlining procedure: k30045 
o|inlining procedure: k30112 
o|inlining procedure: k30144 
o|inlining procedure: k30144 
o|substituted constant variable: a30154 
o|consed rest parameter at call site: "(irregex-utils.scm:130) chicken.irregex#sre->cset" 2 
o|inlining procedure: k30168 
o|inlining procedure: k30168 
o|substituted constant variable: a30191 
o|inlining procedure: k30112 
o|inlining procedure: k30225 
o|inlining procedure: k30225 
o|inlining procedure: k30253 
o|inlining procedure: k30253 
o|substituted constant variable: a30281 
o|substituted constant variable: a30283 
o|inlining procedure: k30287 
o|inlining procedure: k30287 
o|substituted constant variable: a30300 
o|substituted constant variable: a30302 
o|substituted constant variable: a30304 
o|substituted constant variable: a30306 
o|substituted constant variable: a30308 
o|substituted constant variable: a30310 
o|inlining procedure: k30314 
o|inlining procedure: k30314 
o|inlining procedure: k30326 
o|inlining procedure: k30326 
o|substituted constant variable: a30333 
o|substituted constant variable: a30335 
o|substituted constant variable: a30337 
o|substituted constant variable: a30339 
o|substituted constant variable: a30341 
o|substituted constant variable: a30343 
o|substituted constant variable: a30345 
o|substituted constant variable: a30347 
o|substituted constant variable: a30352 
o|substituted constant variable: a30354 
o|inlining procedure: k29686 
o|inlining procedure: k30361 
o|inlining procedure: k30361 
o|inlining procedure: k30385 
o|inlining procedure: k30385 
o|substituted constant variable: a30404 
o|substituted constant variable: a30406 
o|substituted constant variable: a30411 
o|substituted constant variable: a30413 
o|substituted constant variable: a30418 
o|substituted constant variable: a30420 
o|inlining procedure: k30421 
o|inlining procedure: k30421 
o|inlining procedure: k30475 
o|inlining procedure: k30475 
o|inlining procedure: k30491 
o|inlining procedure: k30491 
o|substituted constant variable: a30564 
o|inlining procedure: k30560 
o|inlining procedure: k30560 
o|substituted constant variable: a30576 
o|inlining procedure: k30583 
o|inlining procedure: k30583 
o|substituted constant variable: a30624 
o|inlining procedure: k30625 
o|inlining procedure: k30625 
o|inlining procedure: k30700 
o|inlining procedure: k30700 
o|substituted constant variable: a30735 
o|contracted procedure: "(irregex-core.scm:2340) g39513952" 
o|contracted procedure: "(irregex-core.scm:2339) g39483949" 
o|contracted procedure: "(irregex-core.scm:2336) g39453946" 
o|contracted procedure: "(irregex-core.scm:2335) g39423943" 
o|contracted procedure: "(irregex-core.scm:2333) g39393940" 
o|contracted procedure: "(irregex-core.scm:2332) g39363937" 
o|contracted procedure: "(irregex-core.scm:2331) g39333934" 
o|contracted procedure: "(irregex-core.scm:2330) g39303931" 
o|contracted procedure: "(irregex-core.scm:2326) g39273928" 
o|contracted procedure: "(irregex-core.scm:2323) g39243925" 
o|contracted procedure: "(irregex-core.scm:2322) g39213922" 
o|contracted procedure: "(irregex-core.scm:2321) g39183919" 
o|contracted procedure: "(irregex-core.scm:2320) g39153916" 
o|contracted procedure: "(irregex-core.scm:2319) g39123913" 
o|contracted procedure: "(irregex-core.scm:2318) g39093910" 
o|contracted procedure: "(irregex-core.scm:2317) g39063907" 
o|contracted procedure: "(irregex-core.scm:2313) g39033904" 
o|contracted procedure: "(irregex-core.scm:2312) g39003901" 
o|contracted procedure: "(irregex-core.scm:2303) g38973898" 
o|contracted procedure: "(irregex-core.scm:1197) g18301831" 
o|contracted procedure: "(irregex-core.scm:1196) g18271828" 
o|contracted procedure: "(irregex-core.scm:1195) g18241825" 
o|contracted procedure: "(irregex-core.scm:1194) g18211822" 
o|contracted procedure: "(irregex-core.scm:1193) g18181819" 
o|contracted procedure: "(irregex-core.scm:426) g10481049" 
o|contracted procedure: "(irregex-core.scm:426) g10451046" 
o|contracted procedure: "(irregex-core.scm:425) g10421043" 
o|contracted procedure: "(irregex-core.scm:425) g10391040" 
o|inlining procedure: k31606 
o|inlining procedure: k31606 
o|simplifications: ((if . 8)) 
o|replaced variables: 7256 
o|removed binding forms: 776 
o|substituted constant variable: r786631625 
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: r799331627 
o|substituted constant variable: r801831629 
o|substituted constant variable: r804731631 
o|substituted constant variable: r807631633 
o|substituted constant variable: r823331640 
o|substituted constant variable: r824131641 
o|substituted constant variable: r824131642 
o|substituted constant variable: r821131644 
o|substituted constant variable: r837131652 
o|substituted constant variable: r797731654 
o|substituted constant variable: r797731655 
o|substituted constant variable: r841931662 
o|inlining procedure: k8626 
o|substituted constant variable: r863931683 
o|inlining procedure: k8626 
o|substituted constant variable: r862731684 
o|substituted constant variable: r862731684 
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: r885531701 
o|substituted constant variable: r881931702 
o|substituted constant variable: r888831722 
o|substituted constant variable: r904231728 
o|substituted constant variable: fstart1125 
o|substituted constant variable: r937331736 
o|substituted constant variable: r941631740 
o|substituted constant variable: r950931749 
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: (collect1352) 
o|substituted constant variable: r1035931782 
o|substituted constant variable: r1035931782 
o|inlining procedure: k10358 
o|inlining procedure: k10358 
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: k10571 
o|inlining procedure: k10571 
o|substituted constant variable: chicken.irregex#~single-line? 
o|propagated global variable: r1057233727 chicken.irregex#~single-line? 
o|propagated global variable: r1057233727 chicken.irregex#~single-line? 
o|inlining procedure: k10571 
o|inlining procedure: k10571 
o|inlining procedure: k10571 
o|substituted constant variable: r1060831817 
o|substituted constant variable: r1445431836 
o|converted assignments to bindings: (shift1521) 
o|substituted constant variable: r1107731849 
o|substituted constant variable: r1195231907 
o|substituted constant variable: r1195231907 
o|substituted constant variable: r1195231909 
o|substituted constant variable: r1195231909 
o|substituted constant variable: r1236731973 
o|substituted constant variable: c1090 
o|converted assignments to bindings: (collect1100) 
o|substituted constant variable: r1347532000 
o|substituted constant variable: r1348732002 
o|substituted constant variable: r914232012 
o|substituted constant variable: r908532030 
o|substituted constant variable: c1066 
o|folded constant expression: (scheme#eq? (quote #\}) (quote #\\)) 
o|substituted constant variable: c1066 
o|converted assignments to bindings: (byte1975) 
o|substituted constant variable: r1449232040 
o|substituted constant variable: r1450432042 
o|substituted constant variable: n2136 
o|substituted constant variable: n2133 
o|substituted constant variable: n2158 
o|substituted constant variable: n2194 
o|substituted constant variable: n2206 
o|substituted constant variable: n2242 
o|substituted constant variable: r1588332059 
o|substituted constant variable: r1588332059 
o|substituted constant variable: n2352 
o|substituted constant variable: n2349 
o|substituted constant variable: r1453032067 
o|substituted constant variable: r1454232069 
o|substituted constant variable: n2407 
o|substituted constant variable: n2404 
o|substituted constant variable: n2287 
o|substituted constant variable: n2284 
o|inlining procedure: k15727 
o|inlining procedure: k15727 
o|substituted constant variable: r1475932079 
o|substituted constant variable: r1475932079 
o|substituted constant variable: n2457 
o|substituted constant variable: n2454 
o|substituted constant variable: r2447132139 
o|substituted constant variable: r2447932141 
o|substituted constant variable: r2449432143 
o|substituted constant variable: r2463332154 
o|substituted constant variable: r2464132156 
o|substituted constant variable: r2465632158 
o|substituted constant variable: r894832187 
o|substituted constant variable: r899032201 
o|substituted constant variable: r2607332371 
o|substituted constant variable: r2621632404 
o|converted assignments to bindings: (rec4619) 
o|substituted constant variable: chicken.irregex#~consumer? 
o|substituted constant variable: chicken.irregex#~consumer? 
o|substituted constant variable: r1662232479 
o|substituted constant variable: r1662232479 
o|substituted constant variable: chicken.irregex#~searcher? 
o|substituted constant variable: chicken.irregex#~searcher? 
o|substituted constant variable: r1662932483 
o|substituted constant variable: r1662932483 
o|substituted constant variable: r1750032488 
o|substituted constant variable: r1750032488 
o|inlining procedure: k17581 
o|substituted constant variable: r1758232497 
o|substituted constant variable: r1758232497 
o|inlining procedure: k17616 
o|substituted constant variable: r1761732502 
o|substituted constant variable: r1761732502 
o|inlining procedure: k17659 
o|substituted constant variable: r1766032508 
o|substituted constant variable: r1766032508 
o|substituted constant variable: r1767032512 
o|substituted constant variable: r1767032512 
o|inlining procedure: k17698 
o|substituted constant variable: r1769932517 
o|substituted constant variable: r1769932517 
o|inlining procedure: k17786 
o|substituted constant variable: r1779332523 
o|substituted constant variable: r1778732524 
o|substituted constant variable: r1778732524 
o|inlining procedure: k17967 
o|substituted constant variable: r1796832543 
o|substituted constant variable: r1796832543 
o|inlining procedure: k18098 
o|substituted constant variable: r1809932553 
o|substituted constant variable: r1809932553 
o|substituted constant variable: r1815732556 
o|substituted constant variable: r1817232558 
o|inlining procedure: k18243 
o|substituted constant variable: r1824432563 
o|substituted constant variable: r1824432563 
o|substituted constant variable: r1828432566 
o|substituted constant variable: r1828432566 
o|converted assignments to bindings: (grow2979) 
o|substituted constant variable: r1665332603 
o|substituted constant variable: r1668832605 
o|substituted constant variable: r1668832606 
o|substituted constant variable: r1619832621 
o|substituted constant variable: r1634732631 
o|substituted constant variable: r1634732632 
o|substituted constant variable: r1641532638 
o|converted assignments to bindings: (rec2486) 
o|substituted constant variable: r1675232643 
o|substituted constant variable: r1689732659 
o|substituted constant variable: r1699432668 
o|substituted constant variable: r1698232669 
o|substituted constant variable: r1697032671 
o|substituted constant variable: r1703132674 
o|substituted constant variable: r1704632676 
o|substituted constant variable: r1714432687 
o|substituted constant variable: r1715932689 
o|substituted constant variable: r1726132699 
o|substituted constant variable: r1727632701 
o|substituted constant variable: r1733832709 
o|substituted constant variable: r1740032711 
o|substituted constant variable: r1740032711 
o|inlining procedure: k17399 
o|substituted constant variable: r1742632716 
o|substituted constant variable: r1858332720 
o|substituted constant variable: r1860632722 
o|substituted constant variable: r1934732770 
o|substituted constant variable: r1934732770 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r1936132774 
o|substituted constant variable: r1936132774 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r1937432777 
o|substituted constant variable: r1945732791 
o|substituted constant variable: r1954432796 
o|substituted constant variable: r1948232812 
o|substituted constant variable: r2008532814 
o|substituted constant variable: index3588 
o|substituted constant variable: index3588 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: index3588 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|inlining procedure: k20090 
o|inlining procedure: k20108 
o|inlining procedure: k20120 
o|substituted constant variable: r2013632817 
o|substituted constant variable: r2018732821 
o|substituted constant variable: r2007032828 
o|substituted constant variable: x75232857 
o|inlining procedure: k19574 
o|substituted constant variable: r1965632881 
o|substituted constant variable: r1972932899 
o|substituted constant variable: r1972932899 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r1974332903 
o|substituted constant variable: r1974332903 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r1975632906 
o|substituted constant variable: r1980532914 
o|substituted constant variable: n3522 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: x75232929 
o|substituted constant variable: r1992232939 
o|substituted constant variable: n3562 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: n3556 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: r1991032955 
o|substituted constant variable: r2001232977 
o|substituted constant variable: r2001232978 
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: r2023532981 
o|substituted constant variable: r2023532981 
o|substituted constant variable: r2025132985 
o|substituted constant variable: r2025132985 
o|substituted constant variable: r2044032991 
o|substituted constant variable: r2044032992 
o|inlining procedure: k20445 
o|substituted constant variable: r2041432993 
o|substituted constant variable: r2070433015 
o|inlining procedure: k20709 
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: r2097433064 
o|substituted constant variable: r2123233071 
o|substituted constant variable: r2129833077 
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: k21671 
o|substituted constant variable: r2166633107 
o|inlining procedure: k21771 
o|substituted constant variable: r2176033115 
o|substituted constant variable: r2205133131 
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: r2362833206 
o|substituted constant variable: r2260533234 
o|substituted constant variable: r2103833256 
o|substituted constant variable: r2313233271 
o|substituted constant variable: r2094833272 
o|substituted constant variable: r2109533355 
o|substituted constant variable: r2356033367 
o|substituted constant variable: r2358433369 
o|substituted constant variable: r2353833370 
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: (rec5421) 
o|substituted constant variable: r2735433450 
o|substituted constant variable: r2736933453 
o|substituted constant variable: r2741333457 
o|substituted constant variable: n5703 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: r2827333500 
o|substituted constant variable: r2827333500 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r2828733504 
o|substituted constant variable: r2828733504 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r2830633507 
o|substituted constant variable: n5755 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: n5787 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: n5800 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: r2879333550 
o|substituted constant variable: r2879333550 
o|substituted constant variable: n5833 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: n5829 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: n5838 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: n5880 
o|folded constant expression: (scheme#* (quote 0) (quote 4)) 
o|substituted constant variable: n5876 
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: r2923833566 
o|substituted constant variable: r2944533570 
o|substituted constant variable: r2977833600 
o|substituted constant variable: r3001833614 
o|substituted constant variable: r3016933623 
o|substituted constant variable: r3047633642 
o|substituted constant variable: r3070133653 
o|substituted constant variable: n3953 
o|substituted constant variable: n3950 
o|substituted constant variable: n3947 
o|substituted constant variable: n3944 
o|substituted constant variable: n3941 
o|substituted constant variable: n3938 
o|substituted constant variable: n3935 
o|substituted constant variable: n3932 
o|substituted constant variable: n3929 
o|substituted constant variable: n3926 
o|substituted constant variable: n3923 
o|substituted constant variable: n3920 
o|substituted constant variable: n3917 
o|substituted constant variable: n3914 
o|substituted constant variable: n3911 
o|substituted constant variable: n3908 
o|substituted constant variable: n3905 
o|substituted constant variable: n3902 
o|substituted constant variable: n3899 
o|substituted constant variable: n1832 
o|substituted constant variable: n1829 
o|substituted constant variable: n1826 
o|substituted constant variable: n1823 
o|substituted constant variable: n1820 
o|substituted constant variable: n1050 
o|substituted constant variable: n1047 
o|substituted constant variable: n1044 
o|substituted constant variable: n1041 
o|simplifications: ((let . 8)) 
o|replaced variables: 1152 
o|removed binding forms: 6562 
o|removed conditional forms: 1 
o|inlining procedure: k8254 
o|inlining procedure: k8254 
o|inlining procedure: k8613 
o|substituted constant variable: r862733668 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r862733670 
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: r1035933719 
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:743) chicken.irregex#flag-join" 
o|inlining procedure: "(irregex-core.scm:743) chicken.irregex#flag-join" 
o|substituted constant variable: r1057233725 
o|substituted constant variable: chicken.irregex#~single-line? 
o|inlining procedure: "(irregex-core.scm:743) chicken.irregex#flag-join" 
o|substituted constant variable: chicken.irregex#~single-line? 
o|propagated global variable: b128634214 chicken.irregex#~single-line? 
o|propagated global variable: b128634214 chicken.irregex#~single-line? 
o|inlining procedure: "(irregex-core.scm:743) chicken.irregex#flag-join" 
o|substituted constant variable: r1057233729 
o|inlining procedure: "(irregex-core.scm:743) chicken.irregex#flag-join" 
o|substituted constant variable: r1057233731 
o|inlining procedure: "(irregex-core.scm:743) chicken.irregex#flag-join" 
o|substituted constant variable: r1057233733 
o|contracted procedure: k10571 
o|inlining procedure: "(irregex-core.scm:765) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:770) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:779) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:823) chicken.irregex#flag-set?" 
o|inlining procedure: k11154 
o|inlining procedure: k11154 
o|inlining procedure: "(irregex-core.scm:858) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:900) chicken.irregex#flag-join" 
o|inlining procedure: "(irregex-core.scm:917) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:919) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:922) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:931) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:934) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:941) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:947) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:962) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:967) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:970) chicken.irregex#flag-clear" 
o|inlining procedure: chicken.irregex#flag-clear 
o|inlining procedure: chicken.irregex#flag-join 
o|inlining procedure: "(irregex-core.scm:981) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:980) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1239) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3812) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1240) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1238) chicken.irregex#cset-empty?" 
o|inlining procedure: "(irregex-core.scm:1250) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3812) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1259) chicken.irregex#range->cset" 
o|inlining procedure: "(irregex-core.scm:1267) chicken.irregex#utf8-start-char->length" 
o|inlining procedure: "(irregex-core.scm:1287) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3812) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1298) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3812) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1303) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3812) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1309) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3812) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1306) chicken.irregex#utf8-start-char->length" 
o|inlining procedure: "(irregex-core.scm:1310) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3812) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1315) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:1314) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1231) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1112) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1155) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:460) a13146" 
o|inlining procedure: "(irregex-core.scm:1173) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1176) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1179) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1183) chicken.irregex#flag-set?" 
o|inlining procedure: k13552 
o|contracted procedure: k9099 
o|inlining procedure: k13589 
o|inlining procedure: k14916 
o|removed call to pure procedure with unused result: "(irregex-core.scm:1455) ##sys#slot" 
o|inlining procedure: k14986 
o|inlining procedure: k15040 
o|inlining procedure: k15102 
o|inlining procedure: k15133 
o|inlining procedure: k15205 
o|inlining procedure: k15267 
o|inlining procedure: k15298 
o|inlining procedure: k15382 
o|removed call to pure procedure with unused result: "(irregex-core.scm:1510) ##sys#slot" 
o|inlining procedure: k15443 
o|inlining procedure: k15507 
o|removed call to pure procedure with unused result: "(irregex-core.scm:1521) ##sys#slot" 
o|inlining procedure: k15562 
o|inlining procedure: "(irregex-core.scm:1518) chicken.irregex#utf8-start-char->length" 
o|inlining procedure: k15668 
o|removed call to pure procedure with unused result: "(irregex-core.scm:1501) ##sys#slot" 
o|substituted constant variable: r1572833798 
o|substituted constant variable: r1572833798 
o|substituted constant variable: r1572833803 
o|substituted constant variable: r1572833803 
o|inlining procedure: k15785 
o|removed call to pure procedure with unused result: "(irregex-core.scm:1530) ##sys#slot" 
o|inlining procedure: "(irregex-core.scm:1541) chicken.irregex#high-char?" 
o|inlining procedure: "(irregex-core.scm:1541) chicken.irregex#high-char?" 
o|inlining procedure: "(irregex-core.scm:3153) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:3158) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:3177) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:3182) chicken.irregex#flag-join" 
o|inlining procedure: "(irregex-core.scm:3185) chicken.irregex#flag-join" 
o|inlining procedure: "(irregex-core.scm:3187) chicken.irregex#flag-clear" 
o|inlining procedure: "(irregex-core.scm:3416) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:3597) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1641) chicken.irregex#flag-join" 
o|inlining procedure: "(irregex-core.scm:1641) chicken.irregex#flag-join" 
o|inlining procedure: "(irregex-core.scm:1642) chicken.irregex#flag-join" 
o|inlining procedure: "(irregex-core.scm:1642) chicken.irregex#flag-join" 
o|substituted constant variable: r1758233833 
o|substituted constant variable: r1761733835 
o|substituted constant variable: r1766033839 
o|substituted constant variable: r1769933841 
o|substituted constant variable: r1778733845 
o|substituted constant variable: r1796833847 
o|substituted constant variable: r1809933849 
o|substituted constant variable: r1824433851 
o|inlining procedure: "(irregex-core.scm:1636) chicken.irregex#nfa-num-states" 
o|inlining procedure: "(irregex-core.scm:1632) chicken.irregex#nfa-num-states" 
o|inlining procedure: k16404 
o|inlining procedure: "(irregex-core.scm:1583) chicken.irregex#high-char?" 
o|inlining procedure: "(irregex-core.scm:1550) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:1549) chicken.irregex#flag-set?" 
o|substituted constant variable: r1740033871 
o|inlining procedure: k19339 
o|inlining procedure: k19353 
o|substituted constant variable: r2010933899 
o|folded constant expression: (scheme#+ (quote 3) (quote 0)) 
o|substituted constant variable: r2012133901 
o|folded constant expression: (scheme#+ (quote 2) (quote 0)) 
o|inlining procedure: "(irregex-core.scm:2156) chicken.irregex#dfa-next-state" 
o|inlining procedure: "(irregex-core.scm:2135) chicken.irregex#dfa-next-state" 
o|inlining procedure: "(irregex-core.scm:2001) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:2040) chicken.irregex#flag-set?" 
o|inlining procedure: k19721 
o|inlining procedure: k19735 
o|contracted procedure: k19857 
o|contracted procedure: k19969 
o|contracted procedure: k19997 
o|substituted constant variable: r204403299133930 
o|substituted constant variable: r204403299233931 
o|inlining procedure: k20694 
o|inlining procedure: "(irregex-core.scm:2237) chicken.irregex#dfa-next-state" 
o|substituted constant variable: r207043301533941 
o|inlining procedure: "(irregex-core.scm:2191) chicken.irregex#dfa-next-state" 
o|inlining procedure: "(irregex-core.scm:2498) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:2498) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:2499) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:2497) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:2536) chicken.irregex#flag-set?" 
o|inlining procedure: "(irregex-core.scm:2558) chicken.irregex#flag-set?" 
o|inlining procedure: k21711 
o|inlining procedure: "(irregex-core.scm:2747) chicken.irregex#nfa-num-states" 
o|inlining procedure: "(irregex-core.scm:2781) chicken.irregex#nfa-num-states" 
o|inlining procedure: "(irregex-core.scm:2767) chicken.irregex#mst-state-mappings" 
o|inlining procedure: "(irregex-core.scm:2910) chicken.irregex#mst-state-mappings" 
o|inlining procedure: k23758 
o|inlining procedure: k23758 
o|inlining procedure: "(irregex-core.scm:3000) chicken.irregex#cset-empty?" 
o|inlining procedure: "(irregex-core.scm:2990) chicken.irregex#cset-empty?" 
o|inlining procedure: "(irregex-core.scm:2963) chicken.irregex#cset-empty?" 
o|inlining procedure: k22957 
o|inlining procedure: "(irregex-core.scm:2412) chicken.irregex#nfa-num-states" 
o|inlining procedure: "(irregex-core.scm:2813) chicken.irregex#nfa-num-states" 
o|inlining procedure: "(irregex-core.scm:2806) chicken.irregex#mst-state-mappings" 
o|inlining procedure: "(irregex-core.scm:2789) chicken.irregex#nfa-num-states" 
o|inlining procedure: k22433 
o|inlining procedure: "(irregex-core.scm:2786) chicken.irregex#mst-state-mappings" 
o|inlining procedure: "(irregex-core.scm:3017) chicken.irregex#nfa-num-states" 
o|inlining procedure: "(irregex-core.scm:3711) chicken.irregex#cset-adjoin" 
o|inlining procedure: "(irregex-core.scm:3812) chicken.irregex#char->cset" 
o|inlining procedure: "(irregex-core.scm:3707) chicken.irregex#range->cset" 
o|inlining procedure: "(irregex-core.scm:3748) chicken.irregex#range->cset" 
o|inlining procedure: "(irregex-core.scm:3749) chicken.irregex#range->cset" 
o|inlining procedure: "(irregex-core.scm:3812) chicken.irregex#char->cset" 
o|inlining procedure: k27792 
o|inlining procedure: k27812 
o|inlining procedure: k27965 
o|inlining procedure: k27965 
o|inlining procedure: "(irregex-core.scm:3889) chicken.irregex#range->cset" 
o|inlining procedure: "(irregex-core.scm:3931) chicken.irregex#flag-set?" 
o|contracted procedure: k28212 
o|inlining procedure: k28265 
o|inlining procedure: k28279 
o|inlining procedure: k28293 
o|inlining procedure: k28293 
o|inlining procedure: k28320 
o|inlining procedure: "(irregex-core.scm:3969) chicken.irregex#flag-set?" 
o|contracted procedure: k28446 
o|contracted procedure: k28642 
o|contracted procedure: k28690 
o|contracted procedure: k28862 
o|contracted procedure: k28879 
o|contracted procedure: k28926 
o|contracted procedure: k29069 
o|contracted procedure: k29090 
o|inlining procedure: k29189 
o|inlining procedure: k29484 
o|inlining procedure: k29532 
o|inlining procedure: k29415 
o|inlining procedure: k31333 
o|inlining procedure: k31351 
o|inlining procedure: k31369 
o|inlining procedure: k31383 
o|inlining procedure: k31406 
o|inlining procedure: k31413 
o|inlining procedure: k31441 
o|inlining procedure: k31455 
o|inlining procedure: k31473 
o|inlining procedure: k31480 
o|inlining procedure: k31532 
o|inlining procedure: k31539 
o|inlining procedure: k31546 
o|inlining procedure: k31553 
o|inlining procedure: k31560 
o|inlining procedure: k31588 
o|replaced variables: 6 
o|removed binding forms: 1251 
o|substituted constant variable: r825534153 
o|substituted constant variable: r825534156 
o|removed side-effect free assignment to unused variable: chicken.irregex#flag-set? 
o|substituted constant variable: b128634206 
o|substituted constant variable: b128634206 
o|substituted constant variable: b128634210 
o|substituted constant variable: b128634210 
o|substituted constant variable: chicken.irregex#~single-line? 
o|substituted constant variable: chicken.irregex#~single-line? 
o|substituted constant variable: b128634218 
o|substituted constant variable: b128634218 
o|substituted constant variable: b128634222 
o|substituted constant variable: b128634222 
o|substituted constant variable: b128634226 
o|substituted constant variable: b128634226 
o|substituted constant variable: r10572 
o|substituted constant variable: i128234232 
o|substituted constant variable: i128234232 
o|substituted constant variable: i128234240 
o|substituted constant variable: i128234240 
o|substituted constant variable: i128234254 
o|substituted constant variable: i128234254 
o|substituted constant variable: i128234260 
o|substituted constant variable: i128234260 
o|substituted constant variable: r1115534266 
o|substituted constant variable: r1115534270 
o|substituted constant variable: i128234276 
o|substituted constant variable: i128234276 
o|substituted constant variable: b128634282 
o|substituted constant variable: b128634282 
o|substituted constant variable: b129034286 
o|substituted constant variable: b129034292 
o|substituted constant variable: b129034298 
o|substituted constant variable: b129034304 
o|substituted constant variable: b129034310 
o|substituted constant variable: b129034316 
o|substituted constant variable: b129034322 
o|substituted constant variable: b129034328 
o|substituted constant variable: b129034334 
o|substituted constant variable: b129034340 
o|substituted constant variable: i128234356 
o|substituted constant variable: i128234356 
o|substituted constant variable: i128234362 
o|substituted constant variable: i128234362 
o|substituted constant variable: ch559634370 
o|substituted constant variable: ch559634370 
o|substituted constant variable: ch559634370 
o|substituted constant variable: i128234381 
o|substituted constant variable: i128234381 
o|substituted constant variable: ch559634414 
o|substituted constant variable: ch559634414 
o|substituted constant variable: ch559634414 
o|substituted constant variable: ch538134473 
o|substituted constant variable: ch538134473 
o|substituted constant variable: i128234479 
o|substituted constant variable: i128234479 
o|substituted constant variable: i128234487 
o|substituted constant variable: i128234487 
o|substituted constant variable: i128234495 
o|substituted constant variable: i128234495 
o|substituted constant variable: i128234503 
o|substituted constant variable: i128234503 
o|substituted constant variable: i128234516 
o|substituted constant variable: i128234516 
o|substituted constant variable: i128234522 
o|substituted constant variable: i128234522 
o|substituted constant variable: i128234528 
o|substituted constant variable: i128234528 
o|substituted constant variable: i128234534 
o|substituted constant variable: i128234534 
o|substituted constant variable: r9100 
o|removed side-effect free assignment to unused variable: chicken.irregex#utf8-start-char->length 
o|contracted procedure: k14954 
o|contracted procedure: k14909 
o|contracted procedure: k15012 
o|contracted procedure: k15033 
o|contracted procedure: k15095 
o|contracted procedure: k15177 
o|contracted procedure: k15198 
o|contracted procedure: k15260 
o|contracted procedure: k15422 
o|contracted procedure: k15375 
o|contracted procedure: k15436 
o|inlining procedure: k15447 
o|inlining procedure: k15447 
o|inlining procedure: k15447 
o|inlining procedure: k15447 
o|contracted procedure: k15545 
o|contracted procedure: k15500 
o|contracted procedure: k15555 
o|contracted procedure: k15583 
o|contracted procedure: k15706 
o|contracted procedure: k15661 
o|contracted procedure: k15716 
o|inlining procedure: k15723 
o|inlining procedure: k15723 
o|contracted procedure: k14754 
o|contracted procedure: k15745 
o|contracted procedure: k15751 
o|contracted procedure: k15823 
o|contracted procedure: k15778 
o|contracted procedure: k16598 
o|substituted constant variable: i128234598 
o|substituted constant variable: i128234598 
o|substituted constant variable: i128234604 
o|substituted constant variable: i128234604 
o|substituted constant variable: b129034610 
o|substituted constant variable: b128634616 
o|substituted constant variable: b128634616 
o|substituted constant variable: b128634620 
o|substituted constant variable: b128634620 
o|substituted constant variable: b129034624 
o|substituted constant variable: i128234632 
o|substituted constant variable: i128234632 
o|substituted constant variable: i128234642 
o|substituted constant variable: i128234642 
o|substituted constant variable: b128634650 
o|substituted constant variable: b128634650 
o|substituted constant variable: b128634654 
o|substituted constant variable: b128634654 
o|substituted constant variable: b128634658 
o|substituted constant variable: a128534657 
o|substituted constant variable: b128634658 
o|substituted constant variable: a128534657 
o|substituted constant variable: b128634662 
o|substituted constant variable: a128534661 
o|substituted constant variable: b128634662 
o|substituted constant variable: a128534661 
o|substituted constant variable: i128234700 
o|substituted constant variable: i128234700 
o|substituted constant variable: i128234706 
o|substituted constant variable: i128234706 
o|substituted constant variable: r1934034716 
o|substituted constant variable: r1935434717 
o|contracted procedure: k20104 
o|contracted procedure: k20116 
o|substituted constant variable: i128234740 
o|substituted constant variable: i128234740 
o|substituted constant variable: i128234748 
o|substituted constant variable: i128234748 
o|substituted constant variable: r1972234752 
o|substituted constant variable: r1973634753 
o|substituted constant variable: r19858 
o|folded constant expression: (scheme#+ (quote 2) (quote 0)) 
o|substituted constant variable: r19970 
o|folded constant expression: (scheme#+ (quote 2) (quote 0)) 
o|substituted constant variable: r19998 
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: r2069534764 
o|removed side-effect free assignment to unused variable: chicken.irregex#nfa-num-states 
o|substituted constant variable: i128234804 
o|substituted constant variable: i128234804 
o|substituted constant variable: i128234812 
o|substituted constant variable: i128234812 
o|substituted constant variable: i128234818 
o|substituted constant variable: i128234818 
o|removed side-effect free assignment to unused variable: chicken.irregex#mst-state-mappings 
o|substituted constant variable: state423234857 
o|folded constant expression: (scheme#+ (quote 0) (quote 3)) 
o|substituted constant variable: r2375934867 
o|folded constant expression: (scheme#not (quote #f)) 
o|substituted constant variable: r2375934868 
o|folded constant expression: (scheme#not (quote #f)) 
o|contracted procedure: k23382 
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: i128235015 
o|substituted constant variable: i128235015 
o|substituted constant variable: r28213 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|substituted constant variable: r2826635021 
o|substituted constant variable: r2828035022 
o|substituted constant variable: r2829435023 
o|substituted constant variable: r2829435024 
o|substituted constant variable: r2832135025 
o|substituted constant variable: i128235028 
o|substituted constant variable: i128235028 
o|substituted constant variable: r28447 
o|folded constant expression: (scheme#+ (quote 2) (quote 0)) 
o|substituted constant variable: r28643 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|substituted constant variable: r28691 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|substituted constant variable: r28863 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|substituted constant variable: r28880 
o|substituted constant variable: r28927 
o|substituted constant variable: r29070 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|substituted constant variable: r29091 
o|folded constant expression: (scheme#+ (quote 1) (quote 0)) 
o|substituted constant variable: r2919035038 
o|contracted procedure: k29500 
o|contracted procedure: k31326 
o|contracted procedure: k31344 
o|contracted procedure: k31362 
o|contracted procedure: k31376 
o|contracted procedure: k31420 
o|contracted procedure: k31427 
o|contracted procedure: k31434 
o|contracted procedure: k31448 
o|contracted procedure: k31466 
o|contracted procedure: k31567 
o|contracted procedure: k31574 
o|contracted procedure: k31581 
o|replaced variables: 273 
o|removed binding forms: 138 
o|removed conditional forms: 27 
o|removed side-effect free assignment to unused variable: chicken.irregex#~single-line? 
o|substituted constant variable: r1544835154 
o|substituted constant variable: r1544835157 
o|substituted constant variable: r1544835160 
o|substituted constant variable: r1544835163 
o|inlining procedure: k16641 
o|inlining procedure: k16671 
o|substituted constant variable: r20105 
o|substituted constant variable: r20117 
o|contracted procedure: k19853 
o|contracted procedure: k19965 
o|contracted procedure: k19993 
o|inlining procedure: k22293 
o|inlining procedure: k22382 
o|contracted procedure: k2225534860 
o|inlining procedure: k20922 
o|inlining procedure: k22508 
o|inlining procedure: k22465 
o|inlining procedure: k23429 
o|contracted procedure: k28208 
o|contracted procedure: k28442 
o|contracted procedure: k28638 
o|contracted procedure: k28686 
o|contracted procedure: k28858 
o|contracted procedure: k29065 
o|contracted procedure: k29086 
o|replaced variables: 3 
o|removed binding forms: 354 
o|substituted constant variable: r19854 
o|substituted constant variable: r19966 
o|substituted constant variable: r19994 
o|substituted constant variable: r2225634858 
o|substituted constant variable: r28209 
o|substituted constant variable: r28443 
o|substituted constant variable: r28639 
o|substituted constant variable: r28687 
o|substituted constant variable: r28859 
o|substituted constant variable: r29066 
o|substituted constant variable: r29087 
o|removed binding forms: 17 
o|removed binding forms: 11 
o|simplifications: ((let . 241) (if . 174) (##core#call . 2959)) 
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#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#char=?	8
o|    scheme#length	6
o|    ##sys#check-list	32
o|    chicken.fixnum#fxshr	6
o|    chicken.fixnum#fxshl	6
o|    chicken.fixnum#fx<=	8
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	34
o|    ##sys#list	179
o|    scheme#string?	24
o|    scheme#char-whitespace?	2
o|    chicken.fixnum#fxnot	14
o|    chicken.fixnum#fxand	58
o|    chicken.fixnum#fxior	22
o|    scheme#car	78
o|    scheme#<=	5
o|    scheme#string-set!
o|    scheme#char-alphabetic?	7
o|    scheme#char-numeric?	5
o|    scheme#=	66
o|    scheme#-	20
o|    scheme#string-ref	69
o|    scheme#string-length	25
o|    scheme#list	49
o|    scheme#cons	223
o|    scheme#procedure?	10
o|    scheme#vector	26
o|    scheme#vector-ref	170
o|    scheme#assq	13
o|    scheme#not	101
o|    scheme#cdr	60
o|    scheme#pair?	124
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#>=	28
o|    scheme#<	21
o|    scheme#apply	16
o|    scheme#*	52
o|    scheme#+	148
o|    ##sys#size	6
o|    chicken.fixnum#fx/
o|    ##sys#make-structure	4
o|    ##sys#check-structure	6
o|    ##sys#slot	220
o|    ##sys#structure?	3
o|    scheme#vector-length	20
o|contracted procedure: k7758 
o|contracted procedure: k7806 
o|contracted procedure: k7824 
o|contracted procedure: k7841 
o|contracted procedure: k7856 
o|contracted procedure: k7868 
o|contracted procedure: k7879 
o|contracted procedure: k7883 
o|contracted procedure: k7887 
o|contracted procedure: k7891 
o|contracted procedure: k7903 
o|contracted procedure: k7916 
o|contracted procedure: k7912 
o|contracted procedure: k7907 
o|contracted procedure: k7928 
o|contracted procedure: k7947 
o|contracted procedure: k7955 
o|contracted procedure: k7951 
o|contracted procedure: k8001 
o|contracted procedure: k8005 
o|contracted procedure: k8026 
o|contracted procedure: k8034 
o|contracted procedure: k8030 
o|contracted procedure: k8055 
o|contracted procedure: k8063 
o|contracted procedure: k8059 
o|contracted procedure: k8168 
o|contracted procedure: k8339 
o|contracted procedure: k8177 
o|contracted procedure: k8335 
o|contracted procedure: k8183 
o|contracted procedure: k8193 
o|contracted procedure: k8199 
o|contracted procedure: k8237 
o|contracted procedure: k8251 
o|contracted procedure: k8247 
o|contracted procedure: k8243 
o|contracted procedure: k8207 
o|contracted procedure: k8213 
o|substituted constant variable: g36357 
o|contracted procedure: k8220 
o|contracted procedure: k8225 
o|contracted procedure: k8280 
o|contracted procedure: k8331 
o|contracted procedure: k8292 
o|contracted procedure: k8304 
o|contracted procedure: k8308 
o|contracted procedure: k8311 
o|contracted procedure: k8393 
o|contracted procedure: k8359 
o|contracted procedure: k8367 
o|contracted procedure: k8373 
o|substituted constant variable: g36363 
o|contracted procedure: k8380 
o|contracted procedure: k8385 
o|contracted procedure: k7979 
o|contracted procedure: k8399 
o|contracted procedure: k8415 
o|contracted procedure: k8421 
o|contracted procedure: k8434 
o|contracted procedure: k8438 
o|contracted procedure: k8441 
o|contracted procedure: k8451 
o|contracted procedure: k8459 
o|contracted procedure: k8455 
o|contracted procedure: k8462 
o|contracted procedure: k8472 
o|contracted procedure: k8480 
o|contracted procedure: k8476 
o|contracted procedure: k8483 
o|contracted procedure: k8496 
o|contracted procedure: k8499 
o|contracted procedure: k8505 
o|contracted procedure: k8524 
o|contracted procedure: k8528 
o|contracted procedure: k8531 
o|contracted procedure: k8541 
o|contracted procedure: k8549 
o|contracted procedure: k8545 
o|contracted procedure: k8552 
o|contracted procedure: k8562 
o|contracted procedure: k8570 
o|contracted procedure: k8566 
o|contracted procedure: k8573 
o|contracted procedure: k8775 
o|contracted procedure: k8583 
o|contracted procedure: k8586 
o|contracted procedure: k8769 
o|contracted procedure: k8589 
o|contracted procedure: k8765 
o|contracted procedure: k8592 
o|contracted procedure: k8595 
o|contracted procedure: k8752 
o|contracted procedure: k8598 
o|contracted procedure: k8748 
o|contracted procedure: k8601 
o|contracted procedure: k8604 
o|contracted procedure: k8660 
o|contracted procedure: k8678 
o|contracted procedure: k8687 
o|contracted procedure: k8694 
o|contracted procedure: k8717 
o|contracted procedure: k8651 
o|contracted procedure: k8607 
o|contracted procedure: k8647 
o|contracted procedure: k8610 
o|contracted procedure: k8629 
o|contracted procedure: k8635 
o|contracted procedure: k8641 
o|contracted procedure: k8626 
o|contracted procedure: k8861 
o|contracted procedure: k8872 
o|contracted procedure: k8868 
o|contracted procedure: k8821 
o|contracted procedure: k8824 
o|contracted procedure: k8839 
o|contracted procedure: k8881 
o|contracted procedure: k8894 
o|contracted procedure: k8901 
o|contracted procedure: k9021 
o|contracted procedure: k9028 
o|contracted procedure: k9064 
o|contracted procedure: k9035 
o|contracted procedure: k9044 
o|contracted procedure: k9061 
o|contracted procedure: k9050 
o|contracted procedure: k9235 
o|contracted procedure: k9351 
o|contracted procedure: k9355 
o|contracted procedure: k9358 
o|contracted procedure: k9297 
o|contracted procedure: k9313 
o|contracted procedure: k9300 
o|contracted procedure: k9333 
o|contracted procedure: k9375 
o|substituted constant variable: g36381 
o|contracted procedure: k9382 
o|contracted procedure: k9399 
o|contracted procedure: k9403 
o|contracted procedure: k9418 
o|contracted procedure: k9434 
o|contracted procedure: k9502 
o|contracted procedure: k9473 
o|contracted procedure: k9498 
o|contracted procedure: k9488 
o|contracted procedure: k9511 
o|contracted procedure: k9527 
o|contracted procedure: k9543 
o|contracted procedure: k9551 
o|contracted procedure: k9561 
o|contracted procedure: k9572 
o|contracted procedure: k9588 
o|contracted procedure: k9605 
o|contracted procedure: k9612 
o|contracted procedure: k9939 
o|contracted procedure: k9946 
o|contracted procedure: k9954 
o|contracted procedure: k9963 
o|contracted procedure: k9969 
o|contracted procedure: k9975 
o|contracted procedure: k9996 
o|contracted procedure: k10009 
o|contracted procedure: k10015 
o|contracted procedure: k10064 
o|contracted procedure: k10036 
o|contracted procedure: k10054 
o|contracted procedure: k10060 
o|contracted procedure: k10071 
o|contracted procedure: k10077 
o|contracted procedure: k10089 
o|contracted procedure: k10104 
o|contracted procedure: k10114 
o|contracted procedure: k10121 
o|contracted procedure: k10129 
o|contracted procedure: k10135 
o|contracted procedure: k10138 
o|contracted procedure: k10165 
o|contracted procedure: k10160 
o|contracted procedure: k10150 
o|contracted procedure: k10157 
o|contracted procedure: k10171 
o|contracted procedure: k10177 
o|contracted procedure: k10180 
o|contracted procedure: k10193 
o|contracted procedure: k10200 
o|contracted procedure: k10208 
o|contracted procedure: k10220 
o|contracted procedure: k10241 
o|contracted procedure: k10254 
o|contracted procedure: k10260 
o|contracted procedure: k10266 
o|contracted procedure: k10286 
o|contracted procedure: k10315 
o|contracted procedure: k10318 
o|contracted procedure: k10324 
o|contracted procedure: k10342 
o|contracted procedure: k10361 
o|contracted procedure: k10367 
o|contracted procedure: k10375 
o|contracted procedure: k10392 
o|contracted procedure: k10395 
o|contracted procedure: k10410 
o|contracted procedure: k10402 
o|contracted procedure: k10436 
o|contracted procedure: k10457 
o|contracted procedure: k10483 
o|contracted procedure: k10486 
o|contracted procedure: k10489 
o|contracted procedure: k10528 
o|contracted procedure: k10663 
o|contracted procedure: k10555 
o|contracted procedure: k10562 
o|contracted procedure: k10574 
o|inlining procedure: k10566 
o|contracted procedure: k10583 
o|contracted procedure: k10586 
o|inlining procedure: k10566 
o|contracted procedure: k10592 
o|contracted procedure: k10595 
o|contracted procedure: k10601 
o|contracted procedure: k10604 
o|contracted procedure: k10610 
o|contracted procedure: k10613 
o|inlining procedure: "(irregex-core.scm:743) chicken.irregex#flag-join" 
o|contracted procedure: k10647 
o|contracted procedure: k10672 
o|contracted procedure: k10684 
o|contracted procedure: k992034235 
o|contracted procedure: k10712 
o|substituted constant variable: g36414 
o|contracted procedure: k10702 
o|contracted procedure: k992034243 
o|contracted procedure: k10724 
o|substituted constant variable: g36418 
o|contracted procedure: k10731 
o|contracted procedure: k10746 
o|contracted procedure: k10749 
o|contracted procedure: k10752 
o|contracted procedure: k10760 
o|contracted procedure: k10768 
o|contracted procedure: k10780 
o|contracted procedure: k992034257 
o|contracted procedure: k10797 
o|substituted constant variable: g36432 
o|contracted procedure: k10806 
o|contracted procedure: k10815 
o|contracted procedure: k10825 
o|contracted procedure: k10844 
o|inlining procedure: k10837 
o|contracted procedure: k10857 
o|contracted procedure: k14456 
o|substituted constant variable: g36427 
o|contracted procedure: k14485 
o|contracted procedure: k14459 
o|contracted procedure: k14465 
o|contracted procedure: k14468 
o|substituted constant variable: g36431 
o|contracted procedure: k10900 
o|contracted procedure: k992034263 
o|contracted procedure: k10992 
o|substituted constant variable: g36434 
o|contracted procedure: k10906 
o|contracted procedure: k10989 
o|contracted procedure: k10915 
o|contracted procedure: k10978 
o|contracted procedure: k10921 
o|contracted procedure: k10928 
o|contracted procedure: k10935 
o|contracted procedure: k10942 
o|contracted procedure: k10968 
o|contracted procedure: k10985 
o|contracted procedure: k11029 
o|contracted procedure: k11005 
o|contracted procedure: k11023 
o|contracted procedure: k11036 
o|contracted procedure: k11044 
o|contracted procedure: k11055 
o|contracted procedure: k11069 
o|contracted procedure: k11083 
o|contracted procedure: k11087 
o|contracted procedure: k11091 
o|contracted procedure: k11106 
o|contracted procedure: k11116 
o|contracted procedure: k11122 
o|contracted procedure: k11131 
o|contracted procedure: k11137 
o|contracted procedure: k992034279 
o|contracted procedure: k11161 
o|substituted constant variable: g36438 
o|inlining procedure: k11150 
o|inlining procedure: k11150 
o|contracted procedure: k11167 
o|contracted procedure: k11176 
o|contracted procedure: k11182 
o|contracted procedure: k11195 
o|contracted procedure: k11204 
o|contracted procedure: k11211 
o|contracted procedure: k11222 
o|contracted procedure: k11233 
o|contracted procedure: k11229 
o|contracted procedure: k11241 
o|contracted procedure: k11252 
o|contracted procedure: k11263 
o|contracted procedure: k11274 
o|contracted procedure: k11270 
o|contracted procedure: k11282 
o|contracted procedure: k11293 
o|contracted procedure: k11297 
o|contracted procedure: k11289 
o|contracted procedure: k11324 
o|contracted procedure: k11327 
o|contracted procedure: k11382 
o|contracted procedure: k11333 
o|contracted procedure: k11371 
o|contracted procedure: k11375 
o|contracted procedure: k11367 
o|contracted procedure: k11379 
o|contracted procedure: k11389 
o|contracted procedure: k12155 
o|contracted procedure: k11405 
o|contracted procedure: k11418 
o|contracted procedure: k12146 
o|contracted procedure: k11438 
o|contracted procedure: k11504 
o|contracted procedure: k11444 
o|contracted procedure: k11459 
o|contracted procedure: k11472 
o|contracted procedure: k11476 
o|contracted procedure: k11480 
o|contracted procedure: k11496 
o|contracted procedure: k11491 
o|contracted procedure: k11510 
o|contracted procedure: k11516 
o|contracted procedure: k11526 
o|contracted procedure: k11530 
o|contracted procedure: k11543 
o|contracted procedure: k993934289 
o|contracted procedure: k11556 
o|contracted procedure: k11566 
o|contracted procedure: k993934295 
o|contracted procedure: k11579 
o|contracted procedure: k11589 
o|contracted procedure: k993934301 
o|contracted procedure: k11602 
o|contracted procedure: k11612 
o|contracted procedure: k11625 
o|contracted procedure: k11631 
o|contracted procedure: k993934307 
o|contracted procedure: k11644 
o|contracted procedure: k11654 
o|contracted procedure: k993934313 
o|contracted procedure: k11667 
o|contracted procedure: k11684 
o|contracted procedure: k11688 
o|contracted procedure: k993934319 
o|contracted procedure: k11692 
o|contracted procedure: k11696 
o|contracted procedure: k11727 
o|contracted procedure: k11717 
o|contracted procedure: k11743 
o|contracted procedure: k993934325 
o|contracted procedure: k11756 
o|contracted procedure: k11766 
o|contracted procedure: k11899 
o|contracted procedure: k11782 
o|contracted procedure: k11794 
o|contracted procedure: k993934331 
o|contracted procedure: k11810 
o|contracted procedure: k11814 
o|contracted procedure: k11892 
o|contracted procedure: k11834 
o|contracted procedure: k993934337 
o|contracted procedure: k11853 
o|contracted procedure: k11857 
o|contracted procedure: k993934343 
o|contracted procedure: k11884 
o|contracted procedure: k11908 
o|contracted procedure: k993934349 
o|contracted procedure: k992034365 
o|contracted procedure: k11935 
o|substituted constant variable: g36444 
o|contracted procedure: k992034359 
o|contracted procedure: k11938 
o|substituted constant variable: g36442 
o|contracted procedure: k11944 
o|contracted procedure: k11957 
o|contracted procedure: k11963 
o|contracted procedure: k11969 
o|contracted procedure: k11985 
o|contracted procedure: k12001 
o|contracted procedure: k12017 
o|contracted procedure: k12042 
o|contracted procedure: k12052 
o|contracted procedure: k12058 
o|contracted procedure: k12081 
o|contracted procedure: k12102 
o|contracted procedure: k12098 
o|contracted procedure: k12165 
o|contracted procedure: k12171 
o|contracted procedure: k12187 
o|contracted procedure: k12201 
o|contracted procedure: k12191 
o|contracted procedure: k12207 
o|contracted procedure: k12220 
o|contracted procedure: k12224 
o|contracted procedure: k12228 
o|contracted procedure: k13612 
o|contracted procedure: k992034490 
o|contracted procedure: k13618 
o|substituted constant variable: g36468 
o|contracted procedure: k13627 
o|contracted procedure: k13633 
o|contracted procedure: k13639 
o|contracted procedure: k2666834389 
o|contracted procedure: k13645 
o|contracted procedure: k2665834378 
o|contracted procedure: k2763634373 
o|contracted procedure: k992034384 
o|contracted procedure: k13658 
o|substituted constant variable: g36450 
o|contracted procedure: k13668 
o|contracted procedure: k27334 
o|contracted procedure: k27338 
o|contracted procedure: k13684 
o|contracted procedure: k13690 
o|contracted procedure: k2665834400 
o|contracted procedure: k2763634395 
o|contracted procedure: k13709 
o|contracted procedure: k13715 
o|contracted procedure: k13727 
o|contracted procedure: k2664834406 
o|contracted procedure: k13741 
o|contracted procedure: k13831 
o|contracted procedure: k13745 
o|contracted procedure: k13757 
o|contracted procedure: k13761 
o|contracted procedure: k1424334411 
o|contracted procedure: k13785 
o|contracted procedure: k13796 
o|inlining procedure: k13748 
o|inlining procedure: k13748 
o|contracted procedure: k13812 
o|substituted constant variable: g36452 
o|substituted constant variable: g36454 
o|contracted procedure: k13815 
o|contracted procedure: k13822 
o|contracted procedure: k13853 
o|contracted procedure: k13871 
o|contracted procedure: k13859 
o|contracted procedure: k13867 
o|contracted procedure: k13877 
o|contracted procedure: k13996 
o|contracted procedure: k13880 
o|contracted procedure: k13883 
o|contracted procedure: k13886 
o|contracted procedure: k13892 
o|contracted procedure: k13901 
o|contracted procedure: k13953 
o|contracted procedure: k13949 
o|contracted procedure: k13944 
o|contracted procedure: k13962 
o|contracted procedure: k13965 
o|contracted procedure: k2665834422 
o|contracted procedure: k2763634417 
o|contracted procedure: k14005 
o|contracted procedure: k14008 
o|contracted procedure: k14014 
o|contracted procedure: k14039 
o|contracted procedure: k14045 
o|contracted procedure: k2665834433 
o|contracted procedure: k2763634428 
o|contracted procedure: k14068 
o|contracted procedure: k14071 
o|contracted procedure: k2665834444 
o|contracted procedure: k2763634439 
o|contracted procedure: k14089 
o|contracted procedure: k14095 
o|contracted procedure: k14101 
o|contracted procedure: k14107 
o|contracted procedure: k1424334460 
o|contracted procedure: k14137 
o|contracted procedure: k14144 
o|contracted procedure: k2665834455 
o|contracted procedure: k2763634450 
o|contracted procedure: k2665834471 
o|contracted procedure: k2763634466 
o|contracted procedure: k14173 
o|substituted constant variable: g36459 
o|substituted constant variable: g36461 
o|contracted procedure: k14191 
o|contracted procedure: k992034482 
o|contracted procedure: k14198 
o|substituted constant variable: g36464 
o|contracted procedure: k2665834476 
o|inlining procedure: k14195 
o|inlining procedure: k14195 
o|contracted procedure: k14211 
o|contracted procedure: k14214 
o|contracted procedure: k14222 
o|contracted procedure: k12245 
o|contracted procedure: k12270 
o|contracted procedure: k12276 
o|contracted procedure: k12295 
o|contracted procedure: k12307 
o|contracted procedure: k12324 
o|contracted procedure: k12320 
o|contracted procedure: k12344 
o|contracted procedure: k12340 
o|contracted procedure: k12361 
o|contracted procedure: k12357 
o|contracted procedure: k12369 
o|contracted procedure: k12386 
o|contracted procedure: k12382 
o|contracted procedure: k12375 
o|contracted procedure: k12391 
o|contracted procedure: k12398 
o|contracted procedure: k12404 
o|contracted procedure: k9170 
o|contracted procedure: k9192 
o|contracted procedure: k9229 
o|contracted procedure: k9205 
o|contracted procedure: k12439 
o|contracted procedure: k12421 
o|contracted procedure: k12432 
o|contracted procedure: k12424 
o|contracted procedure: k12448 
o|contracted procedure: k12461 
o|contracted procedure: k12467 
o|contracted procedure: k12480 
o|contracted procedure: k12490 
o|contracted procedure: k12507 
o|contracted procedure: k12503 
o|contracted procedure: k12517 
o|contracted procedure: k12530 
o|contracted procedure: k12540 
o|contracted procedure: k12557 
o|contracted procedure: k12553 
o|contracted procedure: k12567 
o|contracted procedure: k12592 
o|contracted procedure: k12584 
o|contracted procedure: k12580 
o|contracted procedure: k12598 
o|contracted procedure: k12627 
o|contracted procedure: k12623 
o|contracted procedure: k12615 
o|contracted procedure: k12611 
o|contracted procedure: k12633 
o|contracted procedure: k12650 
o|contracted procedure: k12646 
o|contracted procedure: k12660 
o|contracted procedure: k12673 
o|contracted procedure: k12683 
o|contracted procedure: k12696 
o|contracted procedure: k12706 
o|contracted procedure: k12723 
o|contracted procedure: k12727 
o|contracted procedure: k12719 
o|contracted procedure: k12737 
o|contracted procedure: k12750 
o|contracted procedure: k12760 
o|contracted procedure: k12773 
o|contracted procedure: k12783 
o|contracted procedure: k12796 
o|contracted procedure: k12806 
o|contracted procedure: k12819 
o|contracted procedure: k12829 
o|contracted procedure: k12842 
o|contracted procedure: k12852 
o|contracted procedure: k12865 
o|contracted procedure: k12869 
o|contracted procedure: k12873 
o|contracted procedure: k12890 
o|contracted procedure: k12893 
o|contracted procedure: k12899 
o|contracted procedure: k992034498 
o|contracted procedure: k12953 
o|substituted constant variable: g36476 
o|contracted procedure: k12914 
o|contracted procedure: k12920 
o|contracted procedure: k12930 
o|contracted procedure: k12934 
o|contracted procedure: k12942 
o|contracted procedure: k12938 
o|contracted procedure: k13477 
o|contracted procedure: k13483 
o|contracted procedure: k13489 
o|contracted procedure: k13495 
o|contracted procedure: k12974 
o|contracted procedure: k12992 
o|contracted procedure: k12999 
o|contracted procedure: k13074 
o|contracted procedure: k13005 
o|contracted procedure: k13022 
o|contracted procedure: k13060 
o|contracted procedure: k13028 
o|contracted procedure: k13041 
o|contracted procedure: k13049 
o|contracted procedure: k13080 
o|contracted procedure: k13096 
o|contracted procedure: k13106 
o|contracted procedure: k13112 
o|contracted procedure: k992034506 
o|contracted procedure: k13143 
o|substituted constant variable: g36482 
o|contracted procedure: k13115 
o|contracted procedure: k13125 
o|contracted procedure: k13118 
o|contracted procedure: k9128 
o|contracted procedure: k9163 
o|contracted procedure: k9135 
o|contracted procedure: k9144 
o|contracted procedure: k9160 
o|contracted procedure: k1315334511 
o|contracted procedure: k9150 
o|contracted procedure: k13162 
o|contracted procedure: k13165 
o|contracted procedure: k13185 
o|contracted procedure: k13181 
o|contracted procedure: k13252 
o|contracted procedure: k13265 
o|contracted procedure: k13275 
o|contracted procedure: k992034519 
o|contracted procedure: k13298 
o|substituted constant variable: g36488 
o|contracted procedure: k13278 
o|contracted procedure: k13291 
o|contracted procedure: k13304 
o|contracted procedure: k992034525 
o|contracted procedure: k13327 
o|substituted constant variable: g36490 
o|contracted procedure: k13307 
o|contracted procedure: k13320 
o|contracted procedure: k13333 
o|contracted procedure: k992034531 
o|contracted procedure: k13339 
o|substituted constant variable: g36492 
o|contracted procedure: k13364 
o|contracted procedure: k992034537 
o|contracted procedure: k13370 
o|substituted constant variable: g36494 
o|contracted procedure: k13376 
o|contracted procedure: k13383 
o|contracted procedure: k13387 
o|contracted procedure: k13449 
o|contracted procedure: k13442 
o|contracted procedure: k31505 
o|contracted procedure: k31509 
o|contracted procedure: k31513 
o|contracted procedure: k31517 
o|contracted procedure: k31521 
o|contracted procedure: k31525 
o|contracted procedure: k13453 
o|contracted procedure: k13462 
o|contracted procedure: k13512 
o|contracted procedure: k13606 
o|contracted procedure: k13521 
o|contracted procedure: k13530 
o|contracted procedure: k9071 
o|contracted procedure: k9121 
o|contracted procedure: k9078 
o|contracted procedure: k9087 
o|contracted procedure: k9118 
o|contracted procedure: k9093 
o|contracted procedure: k13567 
o|contracted procedure: k14233 
o|contracted procedure: k14256 
o|contracted procedure: k14262 
o|contracted procedure: k14271 
o|contracted procedure: k14298 
o|contracted procedure: k14282 
o|contracted procedure: k14286 
o|contracted procedure: k14294 
o|contracted procedure: k14308 
o|contracted procedure: k14354 
o|contracted procedure: k14322 
o|contracted procedure: k14342 
o|contracted procedure: k14326 
o|contracted procedure: k14330 
o|contracted procedure: k14318 
o|contracted procedure: k14338 
o|contracted procedure: k14350 
o|contracted procedure: k14364 
o|contracted procedure: k14426 
o|contracted procedure: k14378 
o|contracted procedure: k14414 
o|contracted procedure: k14382 
o|contracted procedure: k14402 
o|contracted procedure: k14386 
o|contracted procedure: k14390 
o|contracted procedure: k14374 
o|contracted procedure: k14398 
o|contracted procedure: k14410 
o|contracted procedure: k14422 
o|contracted procedure: k14494 
o|contracted procedure: k14500 
o|contracted procedure: k14506 
o|contracted procedure: k14512 
o|contracted procedure: k14567 
o|contracted procedure: k14573 
o|contracted procedure: k14582 
o|contracted procedure: k14601 
o|contracted procedure: k14589 
o|contracted procedure: k14597 
o|contracted procedure: k14593 
o|contracted procedure: k14607 
o|contracted procedure: k14638 
o|contracted procedure: k14614 
o|contracted procedure: k14634 
o|contracted procedure: k14630 
o|contracted procedure: k14618 
o|contracted procedure: k14626 
o|contracted procedure: k14622 
o|contracted procedure: k14644 
o|contracted procedure: k14687 
o|contracted procedure: k14651 
o|contracted procedure: k14683 
o|contracted procedure: k14679 
o|contracted procedure: k14655 
o|contracted procedure: k14675 
o|contracted procedure: k14671 
o|contracted procedure: k14659 
o|contracted procedure: k14667 
o|contracted procedure: k14663 
o|contracted procedure: k14849 
o|contracted procedure: k14856 
o|contracted procedure: k14860 
o|contracted procedure: k14864 
o|contracted procedure: k14876 
o|contracted procedure: k14882 
o|contracted procedure: k14897 
o|contracted procedure: k14920 
o|contracted procedure: k14889 
o|contracted procedure: k14932 
o|contracted procedure: k14950 
o|contracted procedure: k14935 
o|contracted procedure: k14938 
o|contracted procedure: k14946 
o|contracted procedure: k14968 
o|contracted procedure: k14990 
o|contracted procedure: k14971 
o|contracted procedure: k14974 
o|contracted procedure: k14982 
o|contracted procedure: k15160 
o|contracted procedure: k15005 
o|contracted procedure: k15048 
o|contracted procedure: k15044 
o|contracted procedure: k15052 
o|contracted procedure: k15056 
o|contracted procedure: k15068 
o|contracted procedure: k15077 
o|contracted procedure: k15088 
o|contracted procedure: k15084 
o|contracted procedure: k15115 
o|contracted procedure: k15137 
o|contracted procedure: k15118 
o|contracted procedure: k15121 
o|contracted procedure: k15129 
o|contracted procedure: k15144 
o|contracted procedure: k15325 
o|contracted procedure: k15170 
o|contracted procedure: k15213 
o|contracted procedure: k15209 
o|contracted procedure: k15217 
o|contracted procedure: k15221 
o|contracted procedure: k15233 
o|contracted procedure: k15242 
o|contracted procedure: k15253 
o|contracted procedure: k15249 
o|contracted procedure: k15280 
o|contracted procedure: k15302 
o|contracted procedure: k15283 
o|contracted procedure: k15286 
o|contracted procedure: k15294 
o|contracted procedure: k15309 
o|contracted procedure: k15867 
o|contracted procedure: k15885 
o|contracted procedure: k15892 
o|contracted procedure: k15882 
o|contracted procedure: k15956 
o|contracted procedure: k1423334593 
o|contracted procedure: k15902 
o|contracted procedure: k15912 
o|contracted procedure: k15916 
o|contracted procedure: k14836 
o|contracted procedure: k14713 
o|contracted procedure: k14720 
o|contracted procedure: k15331 
o|contracted procedure: k15342 
o|contracted procedure: k15346 
o|contracted procedure: k15363 
o|contracted procedure: k15388 
o|contracted procedure: k15355 
o|contracted procedure: k15400 
o|contracted procedure: k15418 
o|contracted procedure: k15403 
o|contracted procedure: k15406 
o|contracted procedure: k15414 
o|contracted procedure: k15429 
o|contracted procedure: k15451 
o|contracted procedure: k14532 
o|contracted procedure: k14538 
o|contracted procedure: k14544 
o|contracted procedure: k14550 
o|contracted procedure: k15459 
o|contracted procedure: k15465 
o|contracted procedure: k15472 
o|contracted procedure: k15566 
o|contracted procedure: k15484 
o|contracted procedure: k15488 
o|contracted procedure: k15511 
o|contracted procedure: k15480 
o|contracted procedure: k15523 
o|contracted procedure: k15541 
o|contracted procedure: k15526 
o|contracted procedure: k15529 
o|contracted procedure: k15537 
o|contracted procedure: k15591 
o|contracted procedure: k15587 
o|contracted procedure: k1424334573 
o|contracted procedure: k15576 
o|contracted procedure: k15600 
o|contracted procedure: k15603 
o|contracted procedure: k15606 
o|contracted procedure: k15614 
o|contracted procedure: k15622 
o|contracted procedure: k15630 
o|contracted procedure: k15649 
o|contracted procedure: k15672 
o|contracted procedure: k15641 
o|contracted procedure: k15684 
o|contracted procedure: k15702 
o|contracted procedure: k15687 
o|contracted procedure: k15690 
o|contracted procedure: k15698 
o|contracted procedure: k15736 
o|contracted procedure: k15730 
o|substituted constant variable: g36525 
o|contracted procedure: k14828 
o|contracted procedure: k14832 
o|contracted procedure: k14740 
o|contracted procedure: k14761 
o|inlining procedure: k14747 
o|contracted procedure: k14758 
o|inlining procedure: k14747 
o|contracted procedure: k14820 
o|contracted procedure: k14782 
o|contracted procedure: k14789 
o|contracted procedure: k14804 
o|contracted procedure: k15848 
o|contracted procedure: k15844 
o|contracted procedure: k15840 
o|contracted procedure: k15836 
o|contracted procedure: k15829 
o|contracted procedure: k15762 
o|contracted procedure: k15766 
o|contracted procedure: k15789 
o|contracted procedure: k15758 
o|contracted procedure: k15801 
o|contracted procedure: k15819 
o|contracted procedure: k15804 
o|contracted procedure: k15807 
o|contracted procedure: k15815 
o|contracted procedure: k15932 
o|contracted procedure: k15943 
o|contracted procedure: k15936 
o|contracted procedure: k15952 
o|contracted procedure: k1423334588 
o|contracted procedure: k16439 
o|contracted procedure: k16540 
o|contracted procedure: k16445 
o|contracted procedure: k16536 
o|contracted procedure: k16454 
o|contracted procedure: k16532 
o|contracted procedure: k16463 
o|contracted procedure: k16528 
o|contracted procedure: k16472 
o|contracted procedure: k16524 
o|contracted procedure: k16481 
o|contracted procedure: k16490 
o|contracted procedure: k16493 
o|contracted procedure: k16511 
o|contracted procedure: k16496 
o|contracted procedure: k16507 
o|contracted procedure: k16503 
o|contracted procedure: k16499 
o|contracted procedure: k16514 
o|contracted procedure: k16546 
o|contracted procedure: k16580 
o|contracted procedure: k17478 
o|contracted procedure: k16617 
o|contracted procedure: k16601 
o|contracted procedure: k26535 
o|contracted procedure: k23791 
o|contracted procedure: k23827 
o|contracted procedure: k23831 
o|contracted procedure: k23797 
o|contracted procedure: k23821 
o|contracted procedure: k23800 
o|contracted procedure: k23817 
o|contracted procedure: k23803 
o|contracted procedure: k23813 
o|contracted procedure: k23806 
o|contracted procedure: k23809 
o|contracted procedure: k23846 
o|contracted procedure: k23852 
o|contracted procedure: k992034601 
o|contracted procedure: k23865 
o|substituted constant variable: g36536 
o|contracted procedure: k23872 
o|contracted procedure: k992034607 
o|contracted procedure: k23886 
o|substituted constant variable: g36538 
o|contracted procedure: k23892 
o|contracted procedure: k23895 
o|contracted procedure: k23901 
o|contracted procedure: k23912 
o|contracted procedure: k23919 
o|contracted procedure: k23944 
o|contracted procedure: k23952 
o|contracted procedure: k23956 
o|contracted procedure: k23960 
o|contracted procedure: k23972 
o|contracted procedure: k993934613 
o|contracted procedure: k23983 
o|contracted procedure: k23991 
o|contracted procedure: k24002 
o|contracted procedure: k24010 
o|contracted procedure: k24021 
o|contracted procedure: k24029 
o|contracted procedure: k993934627 
o|contracted procedure: k24040 
o|contracted procedure: k24048 
o|contracted procedure: k24051 
o|contracted procedure: k24054 
o|contracted procedure: k24060 
o|contracted procedure: k24066 
o|contracted procedure: k24073 
o|contracted procedure: k24083 
o|contracted procedure: k24091 
o|contracted procedure: k24099 
o|contracted procedure: k24103 
o|contracted procedure: k24115 
o|contracted procedure: k24141 
o|contracted procedure: k24167 
o|contracted procedure: k24194 
o|contracted procedure: k24212 
o|contracted procedure: k24266 
o|contracted procedure: k24309 
o|contracted procedure: k24324 
o|contracted procedure: k24328 
o|contracted procedure: k24320 
o|contracted procedure: k24316 
o|contracted procedure: k24340 
o|contracted procedure: k24355 
o|contracted procedure: k24359 
o|contracted procedure: k24351 
o|contracted procedure: k24347 
o|contracted procedure: k24368 
o|contracted procedure: k24387 
o|contracted procedure: k24422 
o|contracted procedure: k24432 
o|contracted procedure: k24481 
o|contracted procedure: k24514 
o|contracted procedure: k24490 
o|contracted procedure: k24510 
o|contracted procedure: k24496 
o|contracted procedure: k24520 
o|contracted procedure: k24539 
o|contracted procedure: k24556 
o|contracted procedure: k24566 
o|contracted procedure: k24591 
o|contracted procedure: k24643 
o|contracted procedure: k24676 
o|contracted procedure: k24652 
o|contracted procedure: k24672 
o|contracted procedure: k24658 
o|contracted procedure: k24682 
o|contracted procedure: k24693 
o|contracted procedure: k24689 
o|contracted procedure: k24703 
o|contracted procedure: k24709 
o|contracted procedure: k24728 
o|contracted procedure: k24732 
o|contracted procedure: k24724 
o|contracted procedure: k24720 
o|contracted procedure: k24716 
o|contracted procedure: k24740 
o|contracted procedure: k24751 
o|contracted procedure: k24757 
o|contracted procedure: k24792 
o|contracted procedure: k24827 
o|contracted procedure: k24830 
o|contracted procedure: k24841 
o|contracted procedure: k24848 
o|contracted procedure: k24884 
o|contracted procedure: k24878 
o|contracted procedure: k24857 
o|contracted procedure: k24890 
o|contracted procedure: k8960 
o|contracted procedure: k8950 
o|contracted procedure: k8953 
o|contracted procedure: k8964 
o|contracted procedure: k8968 
o|contracted procedure: k8977 
o|contracted procedure: k8983 
o|contracted procedure: k9006 
o|contracted procedure: k8992 
o|contracted procedure: k8999 
o|contracted procedure: k9013 
o|contracted procedure: k9017 
o|contracted procedure: k24901 
o|contracted procedure: k24913 
o|contracted procedure: k24948 
o|contracted procedure: k25052 
o|contracted procedure: k24963 
o|contracted procedure: k24983 
o|contracted procedure: k24991 
o|contracted procedure: k24987 
o|contracted procedure: k24994 
o|contracted procedure: k25003 
o|contracted procedure: k25006 
o|contracted procedure: k25042 
o|contracted procedure: k25083 
o|contracted procedure: k25055 
o|contracted procedure: k25062 
o|contracted procedure: k25066 
o|contracted procedure: k25087 
o|contracted procedure: k25091 
o|contracted procedure: k25095 
o|contracted procedure: k25101 
o|contracted procedure: k25104 
o|contracted procedure: k25121 
o|contracted procedure: k25131 
o|contracted procedure: k25249 
o|contracted procedure: k25140 
o|contracted procedure: k25153 
o|contracted procedure: k25168 
o|contracted procedure: k25172 
o|contracted procedure: k25181 
o|contracted procedure: k25194 
o|contracted procedure: k25201 
o|contracted procedure: k25208 
o|contracted procedure: k25220 
o|contracted procedure: k25245 
o|contracted procedure: k25241 
o|contracted procedure: k25252 
o|contracted procedure: k992034635 
o|contracted procedure: k25255 
o|substituted constant variable: g36556 
o|contracted procedure: k25287 
o|contracted procedure: k25263 
o|contracted procedure: k25268 
o|contracted procedure: k25293 
o|contracted procedure: k25308 
o|contracted procedure: k25304 
o|contracted procedure: k25312 
o|contracted procedure: k25318 
o|contracted procedure: k25321 
o|contracted procedure: k25335 
o|contracted procedure: k25339 
o|contracted procedure: k25342 
o|contracted procedure: k25351 
o|contracted procedure: k25359 
o|contracted procedure: k25355 
o|contracted procedure: k25362 
o|contracted procedure: k25419 
o|contracted procedure: k25423 
o|contracted procedure: k25365 
o|contracted procedure: k25407 
o|contracted procedure: k25415 
o|contracted procedure: k25411 
o|contracted procedure: k25368 
o|contracted procedure: k25399 
o|contracted procedure: k25403 
o|contracted procedure: k25377 
o|contracted procedure: k25387 
o|contracted procedure: k25395 
o|contracted procedure: k25391 
o|contracted procedure: k25380 
o|contracted procedure: k25431 
o|contracted procedure: k25443 
o|contracted procedure: k25451 
o|contracted procedure: k25447 
o|contracted procedure: k25454 
o|contracted procedure: k25518 
o|contracted procedure: k25526 
o|contracted procedure: k25522 
o|contracted procedure: k25460 
o|contracted procedure: k25506 
o|contracted procedure: k25514 
o|contracted procedure: k25510 
o|contracted procedure: k25463 
o|contracted procedure: k25494 
o|contracted procedure: k25502 
o|contracted procedure: k25498 
o|contracted procedure: k25472 
o|contracted procedure: k25482 
o|contracted procedure: k25490 
o|contracted procedure: k25486 
o|contracted procedure: k25475 
o|contracted procedure: k25534 
o|contracted procedure: k25537 
o|contracted procedure: k25548 
o|contracted procedure: k25544 
o|contracted procedure: k25633 
o|contracted procedure: k25639 
o|contracted procedure: k25661 
o|contracted procedure: k25667 
o|contracted procedure: k25675 
o|contracted procedure: k25682 
o|contracted procedure: k25685 
o|contracted procedure: k25694 
o|contracted procedure: k25700 
o|contracted procedure: k25706 
o|contracted procedure: k25716 
o|contracted procedure: k25725 
o|contracted procedure: k25733 
o|contracted procedure: k25757 
o|contracted procedure: k25752 
o|contracted procedure: k25739 
o|contracted procedure: k25760 
o|contracted procedure: k25769 
o|contracted procedure: k25775 
o|contracted procedure: k25781 
o|contracted procedure: k25808 
o|contracted procedure: k25803 
o|contracted procedure: k25790 
o|contracted procedure: k25817 
o|contracted procedure: k25841 
o|contracted procedure: k25834 
o|contracted procedure: k25825 
o|contracted procedure: k25847 
o|contracted procedure: k25858 
o|contracted procedure: k25861 
o|contracted procedure: k25889 
o|contracted procedure: k25875 
o|contracted procedure: k25882 
o|contracted procedure: k25898 
o|contracted procedure: k25921 
o|contracted procedure: k25928 
o|contracted procedure: k25931 
o|contracted procedure: k25948 
o|contracted procedure: k25955 
o|contracted procedure: k25944 
o|contracted procedure: k25996 
o|contracted procedure: k25961 
o|contracted procedure: k25976 
o|contracted procedure: k25972 
o|contracted procedure: k25982 
o|contracted procedure: k26005 
o|contracted procedure: k26022 
o|contracted procedure: k26029 
o|contracted procedure: k26038 
o|contracted procedure: k26055 
o|contracted procedure: k26063 
o|contracted procedure: k26066 
o|contracted procedure: k26075 
o|contracted procedure: k26087 
o|contracted procedure: k26094 
o|contracted procedure: k26083 
o|contracted procedure: k26103 
o|contracted procedure: k26153 
o|contracted procedure: k26126 
o|contracted procedure: k26137 
o|contracted procedure: k26133 
o|contracted procedure: k26143 
o|contracted procedure: k26159 
o|contracted procedure: k26170 
o|contracted procedure: k26176 
o|contracted procedure: k26192 
o|contracted procedure: k26248 
o|contracted procedure: k26234 
o|contracted procedure: k26241 
o|contracted procedure: k26254 
o|contracted procedure: k26266 
o|contracted procedure: k26269 
o|contracted procedure: k26279 
o|contracted procedure: k26308 
o|contracted procedure: k992034645 
o|contracted procedure: k26314 
o|substituted constant variable: g36592 
o|contracted procedure: k26322 
o|contracted procedure: k26329 
o|contracted procedure: k26341 
o|contracted procedure: k26347 
o|contracted procedure: k26353 
o|contracted procedure: k26362 
o|contracted procedure: k26369 
o|contracted procedure: k26391 
o|contracted procedure: k26413 
o|contracted procedure: k26421 
o|contracted procedure: k26428 
o|contracted procedure: k26440 
o|contracted procedure: k26446 
o|contracted procedure: k26452 
o|contracted procedure: k26461 
o|contracted procedure: k26468 
o|contracted procedure: k26490 
o|contracted procedure: k26477 
o|contracted procedure: k26512 
o|contracted procedure: k26499 
o|contracted procedure: k26518 
o|contracted procedure: k26548 
o|contracted procedure: k26539 
o|contracted procedure: k17495 
o|contracted procedure: k17499 
o|contracted procedure: k17508 
o|contracted procedure: k17514 
o|contracted procedure: k17524 
o|contracted procedure: k17536 
o|contracted procedure: k17547 
o|contracted procedure: k17553 
o|contracted procedure: k17570 
o|contracted procedure: k17577 
o|contracted procedure: k17581 
o|contracted procedure: k17594 
o|contracted procedure: k17604 
o|contracted procedure: k17608 
o|contracted procedure: k17612 
o|contracted procedure: k17616 
o|contracted procedure: k17634 
o|contracted procedure: k17648 
o|contracted procedure: k17655 
o|contracted procedure: k17659 
o|contracted procedure: k17676 
o|contracted procedure: k17686 
o|contracted procedure: k17690 
o|contracted procedure: k17719 
o|contracted procedure: k17725 
o|contracted procedure: k17754 
o|contracted procedure: k17758 
o|contracted procedure: k17813 
o|contracted procedure: k17806 
o|contracted procedure: k17768 
o|contracted procedure: k17772 
o|contracted procedure: k17782 
o|inlining procedure: k17786 
o|inlining procedure: k17786 
o|contracted procedure: k17831 
o|contracted procedure: k17816 
o|contracted procedure: k17819 
o|contracted procedure: k17835 
o|contracted procedure: k17844 
o|contracted procedure: k17852 
o|contracted procedure: k17867 
o|contracted procedure: k17863 
o|contracted procedure: k17871 
o|contracted procedure: k17877 
o|contracted procedure: k17891 
o|contracted procedure: k17904 
o|contracted procedure: k17897 
o|contracted procedure: k17911 
o|contracted procedure: k17908 
o|contracted procedure: k17923 
o|contracted procedure: k17926 
o|contracted procedure: k17935 
o|contracted procedure: k17985 
o|contracted procedure: k17947 
o|contracted procedure: k17981 
o|contracted procedure: k17953 
o|contracted procedure: k17977 
o|contracted procedure: k17956 
o|contracted procedure: k17963 
o|contracted procedure: k17967 
o|contracted procedure: k17996 
o|contracted procedure: k17992 
o|substituted constant variable: g36600 
o|contracted procedure: k18026 
o|contracted procedure: k18002 
o|contracted procedure: k18007 
o|contracted procedure: k18032 
o|contracted procedure: k18035 
o|contracted procedure: k18056 
o|contracted procedure: k18059 
o|contracted procedure: k18077 
o|contracted procedure: k18120 
o|contracted procedure: k18116 
o|contracted procedure: k18094 
o|contracted procedure: k18112 
o|contracted procedure: k18108 
o|contracted procedure: k18098 
o|contracted procedure: k18149 
o|contracted procedure: k18145 
o|contracted procedure: k18141 
o|contracted procedure: k18153 
o|contracted procedure: k18159 
o|contracted procedure: k18192 
o|contracted procedure: k18168 
o|contracted procedure: k18188 
o|contracted procedure: k18174 
o|contracted procedure: k18198 
o|contracted procedure: k18215 
o|contracted procedure: k18223 
o|contracted procedure: k18226 
o|contracted procedure: k18243 
o|contracted procedure: k18257 
o|contracted procedure: k18275 
o|contracted procedure: k18271 
o|contracted procedure: k18267 
o|contracted procedure: k18297 
o|contracted procedure: k18306 
o|contracted procedure: k18322 
o|contracted procedure: k18326 
o|contracted procedure: k18337 
o|contracted procedure: k18343 
o|contracted procedure: k18360 
o|contracted procedure: k18366 
o|contracted procedure: k18413 
o|contracted procedure: k18419 
o|contracted procedure: k18442 
o|contracted procedure: k18448 
o|contracted procedure: k18454 
o|contracted procedure: k18475 
o|contracted procedure: k18481 
o|contracted procedure: k18503 
o|contracted procedure: k18512 
o|contracted procedure: k18536 
o|contracted procedure: k18558 
o|contracted procedure: k18549 
o|contracted procedure: k18565 
o|contracted procedure: k18572 
o|contracted procedure: k2091434674 
o|contracted procedure: k16637 
o|contracted procedure: k2091434679 
o|contracted procedure: k16667 
o|contracted procedure: k16682 
o|contracted procedure: k16678 
o|contracted procedure: k992034709 
o|contracted procedure: k15966 
o|substituted constant variable: g36621 
o|contracted procedure: k992034703 
o|contracted procedure: k15970 
o|substituted constant variable: g36619 
o|contracted procedure: k15985 
o|contracted procedure: k15992 
o|contracted procedure: k16007 
o|contracted procedure: k16022 
o|contracted procedure: k16031 
o|contracted procedure: k16040 
o|contracted procedure: k16052 
o|contracted procedure: k16055 
o|contracted procedure: k16058 
o|contracted procedure: k16066 
o|contracted procedure: k16074 
o|contracted procedure: k16083 
o|contracted procedure: k16092 
o|contracted procedure: k16101 
o|contracted procedure: k16113 
o|contracted procedure: k16116 
o|contracted procedure: k16119 
o|contracted procedure: k16127 
o|contracted procedure: k16135 
o|contracted procedure: k16144 
o|contracted procedure: k16153 
o|contracted procedure: k16185 
o|contracted procedure: k16194 
o|contracted procedure: k16200 
o|contracted procedure: k16207 
o|contracted procedure: k16211 
o|contracted procedure: k16223 
o|contracted procedure: k16226 
o|contracted procedure: k16229 
o|contracted procedure: k16237 
o|contracted procedure: k16245 
o|contracted procedure: k16263 
o|contracted procedure: k16267 
o|contracted procedure: k16279 
o|contracted procedure: k16282 
o|contracted procedure: k16285 
o|contracted procedure: k16293 
o|contracted procedure: k16301 
o|contracted procedure: k16309 
o|contracted procedure: k16315 
o|contracted procedure: k16343 
o|contracted procedure: k16352 
o|contracted procedure: k16368 
o|contracted procedure: k16386 
o|contracted procedure: k16408 
o|contracted procedure: k16389 
o|contracted procedure: k16392 
o|contracted procedure: k16400 
o|contracted procedure: k16417 
o|contracted procedure: k1423334695 
o|contracted procedure: k16704 
o|contracted procedure: k16711 
o|contracted procedure: k16720 
o|contracted procedure: k16737 
o|contracted procedure: k16733 
o|contracted procedure: k16723 
o|contracted procedure: k16743 
o|contracted procedure: k16754 
o|inlining procedure: k16757 
o|contracted procedure: k16765 
o|inlining procedure: k16757 
o|contracted procedure: k16771 
o|contracted procedure: k16777 
o|contracted procedure: k16783 
o|contracted procedure: k16789 
o|contracted procedure: k16795 
o|contracted procedure: k16824 
o|contracted procedure: k16830 
o|contracted procedure: k16836 
o|contracted procedure: k16842 
o|contracted procedure: k16868 
o|contracted procedure: k16877 
o|contracted procedure: k16884 
o|contracted procedure: k16893 
o|contracted procedure: k16909 
o|contracted procedure: k16899 
o|contracted procedure: k16917 
o|contracted procedure: k16927 
o|contracted procedure: k16933 
o|contracted procedure: k16939 
o|contracted procedure: k16945 
o|contracted procedure: k16972 
o|contracted procedure: k16990 
o|contracted procedure: k17006 
o|contracted procedure: k16996 
o|contracted procedure: k17017 
o|contracted procedure: k17024 
o|contracted procedure: k17033 
o|contracted procedure: k17040 
o|contracted procedure: k17048 
o|contracted procedure: k17058 
o|contracted procedure: k17064 
o|contracted procedure: k17070 
o|contracted procedure: k17076 
o|contracted procedure: k17112 
o|contracted procedure: k17119 
o|contracted procedure: k17122 
o|contracted procedure: k17137 
o|contracted procedure: k17146 
o|contracted procedure: k17153 
o|contracted procedure: k17161 
o|contracted procedure: k17171 
o|contracted procedure: k17177 
o|contracted procedure: k17183 
o|contracted procedure: k17189 
o|contracted procedure: k17229 
o|contracted procedure: k17236 
o|contracted procedure: k17239 
o|contracted procedure: k17254 
o|contracted procedure: k17263 
o|contracted procedure: k17278 
o|contracted procedure: k17288 
o|contracted procedure: k17294 
o|contracted procedure: k17300 
o|contracted procedure: k17306 
o|contracted procedure: k17340 
o|contracted procedure: k17352 
o|contracted procedure: k17363 
o|contracted procedure: k17385 
o|inlining procedure: k17392 
o|contracted procedure: k17402 
o|inlining procedure: k17392 
o|contracted procedure: k17411 
o|contracted procedure: k17418 
o|contracted procedure: k17422 
o|contracted procedure: k17428 
o|contracted procedure: k17439 
o|inlining procedure: k17392 
o|contracted procedure: k17446 
o|contracted procedure: k17452 
o|contracted procedure: k18585 
o|contracted procedure: k18599 
o|contracted procedure: k18591 
o|contracted procedure: k18608 
o|contracted procedure: k18622 
o|contracted procedure: k18614 
o|contracted procedure: k18749 
o|contracted procedure: k18631 
o|contracted procedure: k18634 
o|contracted procedure: k18640 
o|contracted procedure: k18643 
o|contracted procedure: k18658 
o|contracted procedure: k18661 
o|contracted procedure: k18672 
o|contracted procedure: k18678 
o|contracted procedure: k18689 
o|contracted procedure: k18692 
o|contracted procedure: k18704 
o|contracted procedure: k18707 
o|contracted procedure: k18710 
o|contracted procedure: k18718 
o|contracted procedure: k18726 
o|contracted procedure: k19089 
o|contracted procedure: k18812 
o|contracted procedure: k18815 
o|contracted procedure: k18821 
o|contracted procedure: k18824 
o|contracted procedure: k18835 
o|contracted procedure: k18843 
o|contracted procedure: k18846 
o|contracted procedure: k18857 
o|contracted procedure: k18869 
o|contracted procedure: k18865 
o|contracted procedure: k18861 
o|contracted procedure: k18873 
o|contracted procedure: k18879 
o|contracted procedure: k18894 
o|contracted procedure: k18890 
o|contracted procedure: k18898 
o|contracted procedure: k18904 
o|contracted procedure: k18918 
o|contracted procedure: k18921 
o|contracted procedure: k18928 
o|contracted procedure: k18934 
o|contracted procedure: k18937 
o|contracted procedure: k18944 
o|contracted procedure: k18961 
o|contracted procedure: k18967 
o|contracted procedure: k18973 
o|contracted procedure: k18979 
o|contracted procedure: k18985 
o|contracted procedure: k18991 
o|contracted procedure: k18997 
o|contracted procedure: k19003 
o|contracted procedure: k19009 
o|contracted procedure: k19015 
o|contracted procedure: k19021 
o|contracted procedure: k19027 
o|contracted procedure: k19033 
o|contracted procedure: k19098 
o|contracted procedure: k19105 
o|contracted procedure: k19109 
o|contracted procedure: k19130 
o|contracted procedure: k19137 
o|contracted procedure: k19188 
o|contracted procedure: k19146 
o|contracted procedure: k19184 
o|contracted procedure: k19152 
o|contracted procedure: k19177 
o|contracted procedure: k19169 
o|contracted procedure: k19196 
o|contracted procedure: k19203 
o|contracted procedure: k19207 
o|contracted procedure: k19219 
o|contracted procedure: k19222 
o|contracted procedure: k19225 
o|contracted procedure: k19233 
o|contracted procedure: k19241 
o|contracted procedure: k19249 
o|contracted procedure: k19255 
o|contracted procedure: k19261 
o|contracted procedure: k19267 
o|contracted procedure: k19273 
o|contracted procedure: k19279 
o|contracted procedure: k19384 
o|contracted procedure: k19314 
o|contracted procedure: k19317 
o|contracted procedure: k19323 
o|contracted procedure: k19336 
o|contracted procedure: k19346 
o|contracted procedure: k19339 
o|contracted procedure: k19360 
o|contracted procedure: k19353 
o|contracted procedure: k19370 
o|contracted procedure: k19376 
o|contracted procedure: k19395 
o|contracted procedure: k19388 
o|contracted procedure: k19413 
o|contracted procedure: k19420 
o|contracted procedure: k19423 
o|contracted procedure: k19431 
o|contracted procedure: k19435 
o|contracted procedure: k7770 
o|contracted procedure: k19447 
o|contracted procedure: k19567 
o|contracted procedure: k992034743 
o|contracted procedure: k19453 
o|substituted constant variable: g36641 
o|contracted procedure: k19473 
o|contracted procedure: k19462 
o|contracted procedure: k19469 
o|contracted procedure: k19465 
o|contracted procedure: k19477 
o|contracted procedure: k19487 
o|contracted procedure: k19490 
o|contracted procedure: k19493 
o|contracted procedure: k19496 
o|contracted procedure: k19531 
o|contracted procedure: k19520 
o|contracted procedure: k19527 
o|contracted procedure: k19523 
o|contracted procedure: k19537 
o|contracted procedure: k19557 
o|contracted procedure: k19562 
o|contracted procedure: k20048 
o|contracted procedure: k20051 
o|contracted procedure: k20054 
o|contracted procedure: k20057 
o|contracted procedure: k20201 
o|contracted procedure: k20197 
o|contracted procedure: k2003034737 
o|contracted procedure: k20060 
o|contracted procedure: k20087 
o|contracted procedure: k20112 
o|contracted procedure: k20093 
o|contracted procedure: k20100 
o|contracted procedure: k20090 
o|contracted procedure: k20126 
o|contracted procedure: k20129 
o|contracted procedure: k2003034727 
o|contracted procedure: k20145 
o|contracted procedure: k20176 
o|contracted procedure: k20151 
o|contracted procedure: k20169 
o|contracted procedure: k20160 
o|contracted procedure: k20180 
o|contracted procedure: k19574 
o|contracted procedure: k7788 
o|contracted procedure: k19583 
o|contracted procedure: k19586 
o|contracted procedure: k19592 
o|contracted procedure: k19598 
o|contracted procedure: k19686 
o|contracted procedure: k992034751 
o|contracted procedure: k19604 
o|substituted constant variable: g36647 
o|contracted procedure: k19636 
o|contracted procedure: k19625 
o|contracted procedure: k19632 
o|contracted procedure: k19628 
o|contracted procedure: k19642 
o|contracted procedure: k19649 
o|contracted procedure: k19662 
o|contracted procedure: k19669 
o|contracted procedure: k19676 
o|contracted procedure: k19766 
o|contracted procedure: k19696 
o|contracted procedure: k19699 
o|contracted procedure: k19705 
o|contracted procedure: k19718 
o|contracted procedure: k19728 
o|contracted procedure: k19721 
o|contracted procedure: k19742 
o|contracted procedure: k19735 
o|contracted procedure: k19752 
o|contracted procedure: k19758 
o|contracted procedure: k19777 
o|contracted procedure: k19770 
o|contracted procedure: k19789 
o|contracted procedure: k19795 
o|contracted procedure: k19832 
o|contracted procedure: k19807 
o|contracted procedure: k19828 
o|contracted procedure: k19810 
o|contracted procedure: k19817 
o|contracted procedure: k19821 
o|contracted procedure: k19813 
o|contracted procedure: k19849 
o|contracted procedure: k19860 
o|contracted procedure: k19864 
o|contracted procedure: k19868 
o|contracted procedure: k19875 
o|contracted procedure: k19878 
o|contracted procedure: k19884 
o|contracted procedure: k19890 
o|contracted procedure: k19896 
o|contracted procedure: k19918 
o|contracted procedure: k19924 
o|contracted procedure: k19931 
o|contracted procedure: k19976 
o|contracted procedure: k19937 
o|contracted procedure: k19944 
o|contracted procedure: k19961 
o|contracted procedure: k19972 
o|contracted procedure: k19989 
o|contracted procedure: k20000 
o|contracted procedure: k20209 
o|contracted procedure: k20212 
o|contracted procedure: k20215 
o|contracted procedure: k20225 
o|contracted procedure: k20234 
o|contracted procedure: k20241 
o|contracted procedure: k20250 
o|contracted procedure: k20258 
o|contracted procedure: k20270 
o|contracted procedure: k20280 
o|contracted procedure: k20284 
o|contracted procedure: k20326 
o|contracted procedure: k20329 
o|contracted procedure: k20332 
o|contracted procedure: k20335 
o|contracted procedure: k20338 
o|contracted procedure: k20341 
o|contracted procedure: k20344 
o|contracted procedure: k20350 
o|contracted procedure: k2003034782 
o|contracted procedure: k20353 
o|contracted procedure: k20356 
o|contracted procedure: k20369 
o|contracted procedure: k20373 
o|contracted procedure: k20394 
o|contracted procedure: k20425 
o|contracted procedure: k20433 
o|contracted procedure: k20429 
o|contracted procedure: k20436 
o|contracted procedure: k20442 
o|contracted procedure: k20458 
o|contracted procedure: k20451 
o|contracted procedure: k20461 
o|contracted procedure: k20483 
o|contracted procedure: k20491 
o|contracted procedure: k20487 
o|contracted procedure: k20464 
o|contracted procedure: k20471 
o|contracted procedure: k20479 
o|contracted procedure: k20475 
o|contracted procedure: k20494 
o|contracted procedure: k2003034770 
o|contracted procedure: k20503 
o|contracted procedure: k20506 
o|contracted procedure: k20530 
o|contracted procedure: k20554 
o|contracted procedure: k20538 
o|contracted procedure: k20550 
o|contracted procedure: k20541 
o|contracted procedure: k20557 
o|contracted procedure: k20560 
o|contracted procedure: k20571 
o|contracted procedure: k20576 
o|contracted procedure: k20598 
o|contracted procedure: k20579 
o|contracted procedure: k20594 
o|contracted procedure: k20582 
o|contracted procedure: k20585 
o|contracted procedure: k20602 
o|contracted procedure: k20608 
o|contracted procedure: k20620 
o|contracted procedure: k20630 
o|contracted procedure: k20634 
o|contracted procedure: k20643 
o|contracted procedure: k20646 
o|contracted procedure: k20649 
o|contracted procedure: k20657 
o|contracted procedure: k20665 
o|contracted procedure: k20677 
o|contracted procedure: k20687 
o|contracted procedure: k20691 
o|contracted procedure: k20694 
o|contracted procedure: k20734 
o|contracted procedure: k20742 
o|contracted procedure: k20738 
o|contracted procedure: k20715 
o|contracted procedure: k20722 
o|contracted procedure: k20730 
o|contracted procedure: k20726 
o|contracted procedure: k20763 
o|contracted procedure: k20771 
o|contracted procedure: k20767 
o|contracted procedure: k20805 
o|contracted procedure: k20780 
o|contracted procedure: k20798 
o|contracted procedure: k20789 
o|contracted procedure: k20809 
o|contracted procedure: k20812 
o|contracted procedure: k20833 
o|contracted procedure: k20820 
o|contracted procedure: k20829 
o|contracted procedure: k20869 
o|contracted procedure: k20836 
o|contracted procedure: k20839 
o|contracted procedure: k20851 
o|contracted procedure: k20861 
o|contracted procedure: k20865 
o|contracted procedure: k20891 
o|contracted procedure: k20899 
o|contracted procedure: k20895 
o|contracted procedure: k20872 
o|contracted procedure: k20879 
o|contracted procedure: k20887 
o|contracted procedure: k20883 
o|contracted procedure: k20307 
o|contracted procedure: k20310 
o|contracted procedure: k30737 
o|contracted procedure: k31488 
o|contracted procedure: k31484 
o|contracted procedure: k30745 
o|contracted procedure: k30753 
o|contracted procedure: k30761 
o|contracted procedure: k30769 
o|contracted procedure: k30777 
o|contracted procedure: k30785 
o|contracted procedure: k30793 
o|contracted procedure: k30801 
o|contracted procedure: k30809 
o|contracted procedure: k30817 
o|contracted procedure: k30825 
o|contracted procedure: k30833 
o|contracted procedure: k30841 
o|contracted procedure: k30849 
o|contracted procedure: k30857 
o|contracted procedure: k30865 
o|contracted procedure: k30873 
o|contracted procedure: k30881 
o|contracted procedure: k30889 
o|contracted procedure: k30897 
o|contracted procedure: k30905 
o|contracted procedure: k30913 
o|contracted procedure: k30921 
o|contracted procedure: k30929 
o|contracted procedure: k30937 
o|contracted procedure: k31459 
o|contracted procedure: k30945 
o|contracted procedure: k30953 
o|contracted procedure: k30961 
o|contracted procedure: k30965 
o|contracted procedure: k31395 
o|contracted procedure: k31399 
o|contracted procedure: k30969 
o|contracted procedure: k31391 
o|contracted procedure: k31387 
o|contracted procedure: k30973 
o|contracted procedure: k30977 
o|contracted procedure: k31355 
o|contracted procedure: k30981 
o|contracted procedure: k31337 
o|contracted procedure: k30985 
o|contracted procedure: k31319 
o|contracted procedure: k30989 
o|contracted procedure: k30993 
o|contracted procedure: k30997 
o|contracted procedure: k31315 
o|contracted procedure: k31307 
o|contracted procedure: k31311 
o|contracted procedure: k31001 
o|contracted procedure: k31303 
o|contracted procedure: k31279 
o|contracted procedure: k31283 
o|contracted procedure: k31299 
o|contracted procedure: k31287 
o|contracted procedure: k31295 
o|contracted procedure: k31291 
o|contracted procedure: k31005 
o|contracted procedure: k31275 
o|contracted procedure: k31009 
o|contracted procedure: k31271 
o|contracted procedure: k31013 
o|contracted procedure: k31267 
o|contracted procedure: k31239 
o|contracted procedure: k31255 
o|contracted procedure: k31263 
o|contracted procedure: k31259 
o|contracted procedure: k31243 
o|contracted procedure: k31251 
o|contracted procedure: k31247 
o|contracted procedure: k31017 
o|contracted procedure: k31231 
o|contracted procedure: k31235 
o|contracted procedure: k31223 
o|contracted procedure: k31227 
o|contracted procedure: k31021 
o|contracted procedure: k31219 
o|contracted procedure: k31025 
o|contracted procedure: k31215 
o|contracted procedure: k31207 
o|contracted procedure: k31211 
o|contracted procedure: k31203 
o|contracted procedure: k31029 
o|contracted procedure: k31193 
o|contracted procedure: k31185 
o|contracted procedure: k31189 
o|contracted procedure: k31033 
o|contracted procedure: k31181 
o|contracted procedure: k31037 
o|contracted procedure: k31165 
o|contracted procedure: k31173 
o|contracted procedure: k31177 
o|contracted procedure: k31169 
o|contracted procedure: k31041 
o|contracted procedure: k31045 
o|contracted procedure: k31161 
o|contracted procedure: k31049 
o|contracted procedure: k31157 
o|contracted procedure: k31053 
o|contracted procedure: k31153 
o|contracted procedure: k31149 
o|contracted procedure: k31057 
o|contracted procedure: k31145 
o|contracted procedure: k31061 
o|contracted procedure: k31141 
o|contracted procedure: k31065 
o|contracted procedure: k31069 
o|contracted procedure: k31137 
o|contracted procedure: k31073 
o|contracted procedure: k31133 
o|contracted procedure: k31077 
o|contracted procedure: k31085 
o|contracted procedure: k31089 
o|contracted procedure: k31129 
o|contracted procedure: k31093 
o|contracted procedure: k31125 
o|contracted procedure: k31101 
o|contracted procedure: k31121 
o|contracted procedure: k31105 
o|contracted procedure: k31117 
o|contracted procedure: k31113 
o|contracted procedure: k31109 
o|contracted procedure: k31097 
o|contracted procedure: k31081 
o|contracted procedure: k30957 
o|contracted procedure: k30949 
o|contracted procedure: k30941 
o|contracted procedure: k30933 
o|contracted procedure: k30925 
o|contracted procedure: k30917 
o|contracted procedure: k30909 
o|contracted procedure: k30901 
o|contracted procedure: k30893 
o|contracted procedure: k30885 
o|contracted procedure: k30877 
o|contracted procedure: k30869 
o|contracted procedure: k30861 
o|contracted procedure: k30853 
o|contracted procedure: k30845 
o|contracted procedure: k30837 
o|contracted procedure: k30829 
o|contracted procedure: k30821 
o|contracted procedure: k30813 
o|contracted procedure: k30805 
o|contracted procedure: k30797 
o|contracted procedure: k30789 
o|contracted procedure: k30781 
o|contracted procedure: k30773 
o|contracted procedure: k30765 
o|contracted procedure: k30757 
o|contracted procedure: k30749 
o|contracted procedure: k30741 
o|contracted procedure: k20905 
o|contracted procedure: k20976 
o|substituted constant variable: g36676 
o|contracted procedure: k20987 
o|contracted procedure: k20983 
o|contracted procedure: k21028 
o|contracted procedure: k21013 
o|contracted procedure: k21024 
o|contracted procedure: k21020 
o|contracted procedure: k21001 
o|contracted procedure: k20997 
o|contracted procedure: k21164 
o|contracted procedure: k20967 
o|contracted procedure: k21173 
o|contracted procedure: k21221 
o|contracted procedure: k21225 
o|contracted procedure: k21176 
o|contracted procedure: k21188 
o|contracted procedure: k21198 
o|substituted constant variable: g36678 
o|contracted procedure: k21211 
o|contracted procedure: k21201 
o|contracted procedure: k21217 
o|contracted procedure: k21242 
o|contracted procedure: k992034807 
o|contracted procedure: k21254 
o|substituted constant variable: g36683 
o|contracted procedure: k2665834796 
o|contracted procedure: k21265 
o|contracted procedure: k2665834791 
o|contracted procedure: k21269 
o|contracted procedure: k2665834801 
o|contracted procedure: k21276 
o|contracted procedure: k21282 
o|contracted procedure: k22044 
o|contracted procedure: k21288 
o|contracted procedure: k21291 
o|contracted procedure: k21315 
o|contracted procedure: k21329 
o|contracted procedure: k21339 
o|substituted constant variable: g36686 
o|contracted procedure: k21346 
o|contracted procedure: k21358 
o|contracted procedure: k21354 
o|contracted procedure: k21368 
o|contracted procedure: k21385 
o|contracted procedure: k21388 
o|inlining procedure: k21398 
o|contracted procedure: k21416 
o|contracted procedure: k21407 
o|inlining procedure: k21398 
o|contracted procedure: k21424 
o|contracted procedure: k22027 
o|contracted procedure: k21430 
o|contracted procedure: k992034815 
o|contracted procedure: k21445 
o|substituted constant variable: g36689 
o|contracted procedure: k21456 
o|contracted procedure: k21463 
o|contracted procedure: k21466 
o|contracted procedure: k21472 
o|contracted procedure: k21475 
o|contracted procedure: k21493 
o|contracted procedure: k21531 
o|contracted procedure: k21502 
o|contracted procedure: k21515 
o|contracted procedure: k21540 
o|contracted procedure: k992034821 
o|contracted procedure: k21561 
o|substituted constant variable: g36691 
o|contracted procedure: k21567 
o|contracted procedure: k21651 
o|contracted procedure: k21579 
o|contracted procedure: k21619 
o|contracted procedure: k21635 
o|contracted procedure: k21659 
o|contracted procedure: k21678 
o|contracted procedure: k21690 
o|contracted procedure: k21693 
o|contracted procedure: k21724 
o|contracted procedure: k21717 
o|contracted procedure: k21728 
o|contracted procedure: k21744 
o|contracted procedure: k21747 
o|contracted procedure: k21814 
o|contracted procedure: k21810 
o|contracted procedure: k21750 
o|contracted procedure: k21753 
o|contracted procedure: k21788 
o|contracted procedure: k21800 
o|contracted procedure: k21822 
o|contracted procedure: k21825 
o|contracted procedure: k21892 
o|contracted procedure: k21888 
o|contracted procedure: k21828 
o|contracted procedure: k21831 
o|contracted procedure: k21866 
o|contracted procedure: k21945 
o|contracted procedure: k21897 
o|contracted procedure: k21938 
o|contracted procedure: k21908 
o|contracted procedure: k21915 
o|contracted procedure: k21927 
o|contracted procedure: k21934 
o|contracted procedure: k21973 
o|contracted procedure: k21979 
o|contracted procedure: k21996 
o|contracted procedure: k22002 
o|contracted procedure: k22061 
o|contracted procedure: k22071 
o|substituted constant variable: g36694 
o|contracted procedure: k22084 
o|contracted procedure: k22074 
o|contracted procedure: k22093 
o|contracted procedure: k22089 
o|contracted procedure: k22097 
o|contracted procedure: k22101 
o|contracted procedure: k22211 
o|contracted procedure: k22110 
o|contracted procedure: k22120 
o|contracted procedure: k22113 
o|contracted procedure: k22116 
o|contracted procedure: k22207 
o|contracted procedure: k22126 
o|contracted procedure: k22129 
o|contracted procedure: k22135 
o|contracted procedure: k22149 
o|contracted procedure: k22157 
o|contracted procedure: k22153 
o|contracted procedure: k22178 
o|contracted procedure: k22184 
o|contracted procedure: k22265 
o|contracted procedure: k22274 
o|contracted procedure: k22277 
o|contracted procedure: k22280 
o|contracted procedure: k22288 
o|contracted procedure: k2091434833 
o|contracted procedure: k22303 
o|contracted procedure: k22311 
o|contracted procedure: k22326 
o|contracted procedure: k22335 
o|contracted procedure: k22340 
o|contracted procedure: k22344 
o|contracted procedure: k22365 
o|contracted procedure: k22350 
o|contracted procedure: k22354 
o|contracted procedure: k22361 
o|contracted procedure: k22368 
o|contracted procedure: k2091434838 
o|contracted procedure: k22378 
o|contracted procedure: k22391 
o|contracted procedure: k22401 
o|contracted procedure: k22405 
o|contracted procedure: k2225534846 
o|contracted procedure: k22427 
o|contracted procedure: k22408 
o|contracted procedure: k22412 
o|contracted procedure: k22423 
o|contracted procedure: k22419 
o|contracted procedure: k22678 
o|contracted procedure: k22690 
o|contracted procedure: k22693 
o|contracted procedure: k22960 
o|contracted procedure: k22760 
o|contracted procedure: k22953 
o|contracted procedure: k22949 
o|contracted procedure: k22945 
o|contracted procedure: k22941 
o|contracted procedure: k22775 
o|contracted procedure: k22782 
o|contracted procedure: k22786 
o|contracted procedure: k22795 
o|contracted procedure: k22815 
o|contracted procedure: k22811 
o|contracted procedure: k22798 
o|contracted procedure: k22982 
o|contracted procedure: k23007 
o|contracted procedure: k23032 
o|contracted procedure: k23024 
o|contracted procedure: k23028 
o|contracted procedure: k23020 
o|contracted procedure: k23037 
o|contracted procedure: k26684 
o|contracted procedure: k26710 
o|contracted procedure: k26687 
o|contracted procedure: k26706 
o|contracted procedure: k26694 
o|contracted procedure: k26702 
o|contracted procedure: k26698 
o|contracted procedure: k23046 
o|contracted procedure: k23003 
o|contracted procedure: k22991 
o|contracted procedure: k23058 
o|contracted procedure: k23061 
o|contracted procedure: k23064 
o|contracted procedure: k23072 
o|contracted procedure: k23080 
o|contracted procedure: k23087 
o|contracted procedure: k23096 
o|contracted procedure: k23103 
o|contracted procedure: k23107 
o|contracted procedure: k23119 
o|contracted procedure: k23115 
o|contracted procedure: k23111 
o|contracted procedure: k22934 
o|contracted procedure: k22827 
o|contracted procedure: k22851 
o|contracted procedure: k22854 
o|contracted procedure: k22869 
o|contracted procedure: k22861 
o|contracted procedure: k22865 
o|contracted procedure: k22878 
o|contracted procedure: k22884 
o|contracted procedure: k22893 
o|contracted procedure: k22909 
o|contracted procedure: k22913 
o|contracted procedure: k22905 
o|contracted procedure: k22901 
o|contracted procedure: k22897 
o|contracted procedure: k22923 
o|contracted procedure: k21056 
o|contracted procedure: k21052 
o|contracted procedure: k21048 
o|contracted procedure: k21044 
o|contracted procedure: k21034 
o|contracted procedure: k23768 
o|contracted procedure: k21085 
o|contracted procedure: k21081 
o|contracted procedure: k21062 
o|contracted procedure: k21073 
o|contracted procedure: k21077 
o|contracted procedure: k21069 
o|contracted procedure: k23777 
o|contracted procedure: k23615 
o|contracted procedure: k23618 
o|contracted procedure: k23630 
o|contracted procedure: k23754 
o|contracted procedure: k23648 
o|contracted procedure: k23657 
o|contracted procedure: k23664 
o|contracted procedure: k23671 
o|contracted procedure: k23675 
o|contracted procedure: k23684 
o|contracted procedure: k23690 
o|contracted procedure: k23697 
o|contracted procedure: k23704 
o|contracted procedure: k23710 
o|contracted procedure: k23717 
o|contracted procedure: k23724 
o|contracted procedure: k23728 
o|contracted procedure: k23735 
o|contracted procedure: k23742 
o|contracted procedure: k23732 
o|contracted procedure: k23762 
o|contracted procedure: k22668 
o|contracted procedure: k22672 
o|contracted procedure: k22607 
o|contracted procedure: k22660 
o|contracted procedure: k22664 
o|contracted procedure: k22613 
o|contracted procedure: k22616 
o|contracted procedure: k22625 
o|contracted procedure: k22656 
o|contracted procedure: k22644 
o|contracted procedure: k22652 
o|contracted procedure: k22648 
o|contracted procedure: k22634 
o|contracted procedure: k22930 
o|contracted procedure: k23153 
o|contracted procedure: k23160 
o|contracted procedure: k23171 
o|contracted procedure: k23178 
o|contracted procedure: k23303 
o|contracted procedure: k23188 
o|contracted procedure: k23198 
o|contracted procedure: k23299 
o|contracted procedure: k2666834887 
o|contracted procedure: k23138 
o|contracted procedure: k23134 
o|contracted procedure: k23201 
o|contracted procedure: k23215 
o|contracted procedure: k2666834877 
o|contracted procedure: k23230 
o|contracted procedure: k23237 
o|contracted procedure: k23256 
o|contracted procedure: k23252 
o|contracted procedure: k23263 
o|contracted procedure: k2666834882 
o|contracted procedure: k23273 
o|contracted procedure: k23266 
o|contracted procedure: k23277 
o|contracted procedure: k23281 
o|contracted procedure: k23293 
o|contracted procedure: k20950 
o|substituted constant variable: g36736 
o|contracted procedure: k20957 
o|contracted procedure: k2091434897 
o|contracted procedure: k21113 
o|contracted procedure: k21109 
o|contracted procedure: k21105 
o|contracted procedure: k21101 
o|contracted procedure: k21091 
o|contracted procedure: k23445 
o|contracted procedure: k21142 
o|contracted procedure: k21138 
o|contracted procedure: k21119 
o|contracted procedure: k21130 
o|contracted procedure: k21134 
o|contracted procedure: k21126 
o|contracted procedure: k23454 
o|contracted procedure: k23330 
o|contracted procedure: k23333 
o|contracted procedure: k23353 
o|contracted procedure: k23359 
o|contracted procedure: k23425 
o|contracted procedure: k23365 
o|contracted procedure: k23368 
o|contracted procedure: k23371 
o|contracted procedure: k22479 
o|contracted procedure: k22482 
o|contracted procedure: k22488 
o|contracted procedure: k2091434902 
o|contracted procedure: k22504 
o|contracted procedure: k22500 
o|contracted procedure: k23389 
o|contracted procedure: k23397 
o|contracted procedure: k23393 
o|contracted procedure: k22526 
o|contracted procedure: k22511 
o|contracted procedure: k22515 
o|contracted procedure: k22522 
o|contracted procedure: k2225534908 
o|contracted procedure: k22548 
o|contracted procedure: k22529 
o|contracted procedure: k22533 
o|contracted procedure: k22544 
o|contracted procedure: k22540 
o|contracted procedure: k22557 
o|contracted procedure: k22564 
o|contracted procedure: k22598 
o|contracted procedure: k22570 
o|contracted procedure: k22581 
o|contracted procedure: k22577 
o|contracted procedure: k22592 
o|contracted procedure: k22715 
o|contracted procedure: k22754 
o|contracted procedure: k22718 
o|contracted procedure: k22727 
o|contracted procedure: k22724 
o|contracted procedure: k22750 
o|contracted procedure: k22739 
o|contracted procedure: k22746 
o|contracted procedure: k23416 
o|contracted procedure: k23412 
o|contracted procedure: k2225534924 
o|contracted procedure: k22473 
o|contracted procedure: k22439 
o|contracted procedure: k22469 
o|contracted procedure: k22461 
o|contracted procedure: k2091434917 
o|contracted procedure: k22457 
o|contracted procedure: k22442 
o|contracted procedure: k22453 
o|contracted procedure: k22449 
o|contracted procedure: k22433 
o|contracted procedure: k2091434933 
o|contracted procedure: k23439 
o|contracted procedure: k23460 
o|contracted procedure: k23463 
o|contracted procedure: k23466 
o|contracted procedure: k23478 
o|contracted procedure: k23485 
o|contracted procedure: k23489 
o|contracted procedure: k23498 
o|contracted procedure: k23505 
o|contracted procedure: k23609 
o|contracted procedure: k23511 
o|contracted procedure: k23532 
o|contracted procedure: k23528 
o|contracted procedure: k23605 
o|contracted procedure: k23540 
o|contracted procedure: k23577 
o|contracted procedure: k23562 
o|contracted procedure: k23569 
o|contracted procedure: k23573 
o|contracted procedure: k23601 
o|contracted procedure: k23586 
o|contracted procedure: k23593 
o|contracted procedure: k23597 
o|contracted procedure: k26564 
o|contracted procedure: k26583 
o|contracted procedure: k26586 
o|contracted procedure: k26595 
o|contracted procedure: k26601 
o|contracted procedure: k26607 
o|contracted procedure: k26629 
o|contracted procedure: k26777 
o|contracted procedure: k26787 
o|substituted constant variable: g36772 
o|contracted procedure: k26794 
o|contracted procedure: k26818 
o|contracted procedure: k26802 
o|contracted procedure: k26814 
o|contracted procedure: k26810 
o|contracted procedure: k26806 
o|contracted procedure: k26798 
o|contracted procedure: k2665834950 
o|contracted procedure: k2763634945 
o|contracted procedure: k26873 
o|contracted procedure: k27313 
o|contracted procedure: k26887 
o|contracted procedure: k26902 
o|contracted procedure: k26908 
o|contracted procedure: k26932 
o|contracted procedure: k26947 
o|contracted procedure: k26950 
o|contracted procedure: k26953 
o|contracted procedure: k26965 
o|contracted procedure: k26968 
o|contracted procedure: k26971 
o|contracted procedure: k26979 
o|contracted procedure: k26987 
o|contracted procedure: k26994 
o|contracted procedure: k27000 
o|contracted procedure: k27011 
o|contracted procedure: k27014 
o|contracted procedure: k27017 
o|contracted procedure: k27029 
o|contracted procedure: k27032 
o|contracted procedure: k27035 
o|contracted procedure: k27043 
o|contracted procedure: k27051 
o|contracted procedure: k27058 
o|contracted procedure: k27064 
o|contracted procedure: k27081 
o|contracted procedure: k27084 
o|contracted procedure: k27087 
o|contracted procedure: k27099 
o|contracted procedure: k27102 
o|contracted procedure: k27105 
o|contracted procedure: k27113 
o|contracted procedure: k27121 
o|contracted procedure: k27128 
o|contracted procedure: k27134 
o|contracted procedure: k26828 
o|contracted procedure: k26837 
o|contracted procedure: k26844 
o|contracted procedure: k2664834962 
o|contracted procedure: k26852 
o|contracted procedure: k18764 
o|contracted procedure: k18803 
o|contracted procedure: k18773 
o|contracted procedure: k18797 
o|contracted procedure: k27155 
o|contracted procedure: k27166 
o|contracted procedure: k27169 
o|contracted procedure: k27172 
o|contracted procedure: k27184 
o|contracted procedure: k27187 
o|contracted procedure: k27190 
o|contracted procedure: k27198 
o|contracted procedure: k27206 
o|contracted procedure: k27213 
o|contracted procedure: k27219 
o|contracted procedure: k27234 
o|contracted procedure: k27268 
o|contracted procedure: k2664834978 
o|contracted procedure: k27278 
o|contracted procedure: k2664834984 
o|contracted procedure: k27287 
o|contracted procedure: k27294 
o|contracted procedure: k27297 
o|contracted procedure: k27307 
o|contracted procedure: k27350 
o|contracted procedure: k27356 
o|contracted procedure: k27362 
o|contracted procedure: k27365 
o|contracted procedure: k27424 
o|contracted procedure: k27383 
o|contracted procedure: k27386 
o|contracted procedure: k27400 
o|contracted procedure: k27409 
o|contracted procedure: k27415 
o|contracted procedure: k27461 
o|contracted procedure: k27465 
o|contracted procedure: k27455 
o|contracted procedure: k27439 
o|contracted procedure: k27446 
o|contracted procedure: k27488 
o|contracted procedure: k27509 
o|contracted procedure: k27527 
o|contracted procedure: k27530 
o|contracted procedure: k27626 
o|contracted procedure: k27538 
o|contracted procedure: k27622 
o|contracted procedure: k27543 
o|contracted procedure: k27552 
o|contracted procedure: k27559 
o|contracted procedure: k27564 
o|contracted procedure: k27574 
o|contracted procedure: k27580 
o|contracted procedure: k27587 
o|contracted procedure: k27604 
o|contracted procedure: k27689 
o|contracted procedure: k27702 
o|contracted procedure: k27716 
o|contracted procedure: k27719 
o|contracted procedure: k27840 
o|contracted procedure: k27844 
o|contracted procedure: k27725 
o|contracted procedure: k27734 
o|contracted procedure: k27740 
o|contracted procedure: k27821 
o|contracted procedure: k27751 
o|contracted procedure: k27773 
o|contracted procedure: k27785 
o|contracted procedure: k27650 
o|contracted procedure: k27803 
o|contracted procedure: k27665 
o|contracted procedure: k27885 
o|contracted procedure: k27888 
o|contracted procedure: k27898 
o|contracted procedure: k27901 
o|contracted procedure: k27981 
o|contracted procedure: k27985 
o|contracted procedure: k27907 
o|contracted procedure: k27918 
o|contracted procedure: k27862 
o|contracted procedure: k27961 
o|contracted procedure: k27853 
o|contracted procedure: k27926 
o|contracted procedure: k27952 
o|contracted procedure: k27933 
o|contracted procedure: k27944 
o|contracted procedure: k27937 
o|contracted procedure: k27941 
o|contracted procedure: k28017 
o|contracted procedure: k2664835010 
o|contracted procedure: k28055 
o|contracted procedure: k28067 
o|contracted procedure: k28071 
o|contracted procedure: k28079 
o|contracted procedure: k28110 
o|contracted procedure: k28129 
o|contracted procedure: k28119 
o|contracted procedure: k28336 
o|contracted procedure: k28144 
o|contracted procedure: k28147 
o|contracted procedure: k28156 
o|contracted procedure: k28159 
o|contracted procedure: k28168 
o|contracted procedure: k28180 
o|contracted procedure: k28192 
o|contracted procedure: k28204 
o|contracted procedure: k28215 
o|contracted procedure: k28261 
o|contracted procedure: k992035018 
o|contracted procedure: k28230 
o|substituted constant variable: g36805 
o|contracted procedure: k28239 
o|contracted procedure: k28246 
o|contracted procedure: k28250 
o|contracted procedure: k28257 
o|contracted procedure: k28272 
o|contracted procedure: k28265 
o|contracted procedure: k28286 
o|contracted procedure: k28279 
o|contracted procedure: k28302 
o|contracted procedure: k28308 
o|contracted procedure: k28315 
o|contracted procedure: k28293 
o|contracted procedure: k28326 
o|contracted procedure: k28320 
o|contracted procedure: k28347 
o|contracted procedure: k28340 
o|contracted procedure: k28375 
o|contracted procedure: k28368 
o|contracted procedure: k28556 
o|contracted procedure: k28387 
o|contracted procedure: k28390 
o|contracted procedure: k28396 
o|contracted procedure: k28402 
o|contracted procedure: k28414 
o|contracted procedure: k28426 
o|contracted procedure: k28438 
o|contracted procedure: k28449 
o|contracted procedure: k28491 
o|contracted procedure: k28464 
o|contracted procedure: k28467 
o|contracted procedure: k28477 
o|contracted procedure: k28487 
o|contracted procedure: k28516 
o|contracted procedure: k992035031 
o|contracted procedure: k28506 
o|substituted constant variable: g36813 
o|contracted procedure: k28520 
o|contracted procedure: k28526 
o|contracted procedure: k28546 
o|contracted procedure: k28534 
o|contracted procedure: k28540 
o|contracted procedure: k28585 
o|contracted procedure: k28578 
o|contracted procedure: k28604 
o|contracted procedure: k28620 
o|contracted procedure: k28634 
o|contracted procedure: k28645 
o|contracted procedure: k28661 
o|contracted procedure: k28654 
o|contracted procedure: k28682 
o|contracted procedure: k28693 
o|contracted procedure: k28699 
o|contracted procedure: k28717 
o|contracted procedure: k28727 
o|contracted procedure: k28737 
o|contracted procedure: k28734 
o|contracted procedure: k28754 
o|contracted procedure: k28747 
o|contracted procedure: k28769 
o|contracted procedure: k28776 
o|contracted procedure: k28785 
o|contracted procedure: k28800 
o|contracted procedure: k28809 
o|contracted procedure: k28820 
o|contracted procedure: k28827 
o|contracted procedure: k28836 
o|contracted procedure: k28875 
o|contracted procedure: k28882 
o|contracted procedure: k28844 
o|contracted procedure: k28854 
o|contracted procedure: k28865 
o|contracted procedure: k28888 
o|contracted procedure: k28922 
o|contracted procedure: k28929 
o|contracted procedure: k28891 
o|contracted procedure: k28900 
o|contracted procedure: k28912 
o|contracted procedure: k28932 
o|contracted procedure: k28948 
o|contracted procedure: k28952 
o|contracted procedure: k28944 
o|contracted procedure: k28979 
o|contracted procedure: k29020 
o|contracted procedure: k29013 
o|contracted procedure: k29206 
o|contracted procedure: k29029 
o|contracted procedure: k29082 
o|contracted procedure: k29093 
o|contracted procedure: k29044 
o|contracted procedure: k29061 
o|contracted procedure: k29072 
o|contracted procedure: k29112 
o|contracted procedure: k29176 
o|contracted procedure: k29118 
o|contracted procedure: k29130 
o|contracted procedure: k29137 
o|inlining procedure: k29127 
o|inlining procedure: k29127 
o|contracted procedure: k29152 
o|contracted procedure: k29156 
o|contracted procedure: k29170 
o|contracted procedure: k29179 
o|contracted procedure: k29198 
o|contracted procedure: k29189 
o|contracted procedure: k29217 
o|contracted procedure: k29210 
o|contracted procedure: k29224 
o|contracted procedure: k29260 
o|contracted procedure: k29231 
o|contracted procedure: k29240 
o|contracted procedure: k29257 
o|contracted procedure: k29246 
o|contracted procedure: k29284 
o|contracted procedure: k29290 
o|contracted procedure: k29309 
o|contracted procedure: k29305 
o|contracted procedure: k29318 
o|contracted procedure: k29447 
o|contracted procedure: k29588 
o|contracted procedure: k29453 
o|contracted procedure: k29469 
o|contracted procedure: k29481 
o|substituted constant variable: g36840 
o|contracted procedure: k29351 
o|contracted procedure: k29330 
o|inlining procedure: k29484 
o|inlining procedure: k29484 
o|contracted procedure: k29503 
o|contracted procedure: k29516 
o|contracted procedure: k29522 
o|inlining procedure: k29513 
o|inlining procedure: k29513 
o|contracted procedure: k29536 
o|contracted procedure: k29441 
o|contracted procedure: k29360 
o|inlining procedure: k29513 
o|contracted procedure: k29374 
o|contracted procedure: k29397 
o|contracted procedure: k29403 
o|contracted procedure: k29411 
o|contracted procedure: k29419 
o|contracted procedure: k29382 
o|contracted procedure: k29415 
o|contracted procedure: k29431 
o|contracted procedure: k29543 
o|contracted procedure: k29546 
o|contracted procedure: k29552 
o|contracted procedure: k29560 
o|contracted procedure: k29580 
o|contracted procedure: k29572 
o|contracted procedure: k29563 
o|contracted procedure: k29609 
o|contracted procedure: k29620 
o|contracted procedure: k29641 
o|contracted procedure: k29637 
o|contracted procedure: k29653 
o|contracted procedure: k29649 
o|contracted procedure: k29664 
o|contracted procedure: k29689 
o|contracted procedure: k29696 
o|contracted procedure: k29699 
o|contracted procedure: k29712 
o|contracted procedure: k29727 
o|contracted procedure: k29737 
o|contracted procedure: k29741 
o|contracted procedure: k29745 
o|contracted procedure: k29757 
o|contracted procedure: k29767 
o|contracted procedure: k29771 
o|contracted procedure: k29774 
o|contracted procedure: k29791 
o|contracted procedure: k29780 
o|contracted procedure: k29787 
o|contracted procedure: k29799 
o|contracted procedure: k29806 
o|contracted procedure: k29821 
o|contracted procedure: k29831 
o|contracted procedure: k29835 
o|contracted procedure: k29841 
o|contracted procedure: k29853 
o|contracted procedure: k29856 
o|contracted procedure: k29871 
o|contracted procedure: k29881 
o|contracted procedure: k29885 
o|contracted procedure: k29889 
o|contracted procedure: k29895 
o|contracted procedure: k29912 
o|contracted procedure: k29915 
o|contracted procedure: k29930 
o|contracted procedure: k29940 
o|contracted procedure: k29944 
o|contracted procedure: k29948 
o|contracted procedure: k29954 
o|contracted procedure: k30042 
o|contracted procedure: k29968 
o|contracted procedure: k29978 
o|contracted procedure: k29993 
o|contracted procedure: k30003 
o|contracted procedure: k30007 
o|contracted procedure: k30014 
o|contracted procedure: k30020 
o|contracted procedure: k30032 
o|contracted procedure: k30027 
o|contracted procedure: k30048 
o|contracted procedure: k30088 
o|contracted procedure: k30077 
o|contracted procedure: k30094 
o|contracted procedure: k30115 
o|contracted procedure: k30124 
o|contracted procedure: k30147 
o|contracted procedure: k30144 
o|contracted procedure: k30161 
o|contracted procedure: k30171 
o|contracted procedure: k30177 
o|contracted procedure: k30184 
o|contracted procedure: k30197 
o|contracted procedure: k30200 
o|contracted procedure: k30213 
o|contracted procedure: k30228 
o|contracted procedure: k30238 
o|contracted procedure: k30242 
o|contracted procedure: k30245 
o|contracted procedure: k30256 
o|contracted procedure: k30263 
o|contracted procedure: k30284 
o|contracted procedure: k30290 
o|contracted procedure: k30311 
o|contracted procedure: k30317 
o|contracted procedure: k30323 
o|contracted procedure: k30358 
o|contracted procedure: k30364 
o|contracted procedure: k30367 
o|contracted procedure: k30376 
o|contracted procedure: k30379 
o|contracted procedure: k30388 
o|contracted procedure: k30391 
o|contracted procedure: k30424 
o|contracted procedure: k30437 
o|contracted procedure: k30448 
o|contracted procedure: k30458 
o|contracted procedure: k30478 
o|contracted procedure: k30481 
o|contracted procedure: k30488 
o|contracted procedure: k30538 
o|contracted procedure: k30522 
o|contracted procedure: k30534 
o|contracted procedure: k30530 
o|contracted procedure: k30526 
o|contracted procedure: k30506 
o|contracted procedure: k30518 
o|contracted procedure: k30514 
o|contracted procedure: k30510 
o|contracted procedure: k30498 
o|contracted procedure: k30557 
o|contracted procedure: k30553 
o|contracted procedure: k30545 
o|contracted procedure: k30723 
o|contracted procedure: k30586 
o|contracted procedure: k30719 
o|contracted procedure: k30595 
o|contracted procedure: k30621 
o|contracted procedure: k30611 
o|contracted procedure: k30602 
o|contracted procedure: k30635 
o|contracted procedure: k30643 
o|contracted procedure: k30639 
o|contracted procedure: k30687 
o|contracted procedure: k30655 
o|contracted procedure: k30662 
o|contracted procedure: k30670 
o|contracted procedure: k30666 
o|contracted procedure: k30682 
o|contracted procedure: k30697 
o|contracted procedure: k30713 
o|contracted procedure: k30703 
o|contracted procedure: k31501 
o|contracted procedure: k31612 
o|contracted procedure: k31615 
o|simplifications: ((if . 14) (let . 674)) 
o|replaced variables: 212 
o|removed binding forms: 2691 
o|inlining procedure: "(irregex-core.scm:246) chicken.irregex#%irregex-match-end-index" 
o|inlining procedure: "(irregex-core.scm:314) chicken.irregex#%irregex-match-end-index" 
o|inlining procedure: "(irregex-core.scm:326) chicken.irregex#%irregex-match-end-index" 
(o x)|known list op on rest arg sublist: ##core#rest-car o929 0 
(o x)|known list op on rest arg sublist: ##core#rest-cdr o929 0 
(o x)|known list op on rest arg sublist: ##core#rest-car o1055 0 
o|contracted procedure: k10107 
o|substituted constant variable: b128636904 
o|substituted constant variable: b128636904 
o|inlining procedure: "(irregex-core.scm:767) chicken.irregex#char-altcase" 
o|contracted procedure: k11062 
o|contracted procedure: k13615 
o|contracted procedure: k13842 
o|inlining procedure: k8980 
o|inlining procedure: k8980 
o|inlining procedure: k8980 
o|inlining procedure: "(irregex-core.scm:3464) chicken.irregex#%irregex-match-end-index" 
o|inlining procedure: "(irregex-core.scm:3538) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3541) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3534) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3536) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3570) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3572) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3566) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3568) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3585) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3586) chicken.irregex#char-alphanumeric?" 
o|inlining procedure: "(irregex-core.scm:3584) chicken.irregex#char-alphanumeric?" 
o|contracted procedure: k17728 
o|substituted constant variable: r1778736971 
o|inlining procedure: k17399 
o|inlining procedure: k19711 
o|inlining procedure: "(irregex-core.scm:2084) chicken.irregex#%irregex-match-end-index" 
o|inlining procedure: "(irregex-core.scm:2104) chicken.irregex#%irregex-match-end-index" 
o|contracted procedure: k20218 
o|inlining procedure: "(irregex-core.scm:2496) chicken.irregex#char-altcase" 
o|inlining procedure: "(irregex-core.scm:2770) chicken.irregex#mst-state-mappings-set!" 
o|inlining procedure: k26677 
o|inlining procedure: k26677 
o|contracted procedure: k23147 
o|inlining procedure: "(irregex-core.scm:2809) chicken.irregex#mst-state-mappings-set!" 
o|inlining procedure: "(irregex-core.scm:2791) chicken.irregex#mst-state-mappings-set!" 
o|inlining procedure: "(irregex-core.scm:2791) chicken.irregex#mst-state-mappings-set!" 
o|inlining procedure: "(irregex-core.scm:3890) chicken.irregex#char-altcase" 
o|inlining procedure: "(irregex-core.scm:3889) chicken.irregex#char-altcase" 
o|inlining procedure: "(irregex-core.scm:3927) chicken.irregex#%irregex-match-end-index" 
o|inlining procedure: "(irregex-core.scm:3961) chicken.irregex#%irregex-match-end-index" 
o|inlining procedure: "(irregex-core.scm:3983) 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 o6106 0 
o|inlining procedure: k29532 
o|simplifications: ((if . 3) (let . 6)) 
o|replaced variables: 10 
o|removed binding forms: 272 
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: k10850 
o|removed side-effect free assignment to unused variable: chicken.irregex#char-altcase 
o|substituted constant variable: r898137243 
o|substituted constant variable: n74737330 
o|substituted constant variable: n74737335 
o|removed side-effect free assignment to unused variable: chicken.irregex#mst-state-mappings-set! 
o|substituted constant variable: r2667837378 
o|contracted procedure: k22821 
o|substituted constant variable: n74737457 
o|contracted procedure: k28458 
o|substituted constant variable: n74737464 
o|substituted constant variable: n74737471 
o|substituted constant variable: n74737476 
o|simplifications: ((let . 9) (if . 3)) 
o|replaced variables: 74 
o|removed binding forms: 17 
o|removed conditional forms: 1 
o|inlining procedure: k8487 
o|inlining procedure: k8577 
o|inlining procedure: k10709 
o|inlining procedure: k25968 
o|inlining procedure: k25992 
o|inlining procedure: k26166 
o|inlining procedure: k26186 
o|inlining procedure: k26231 
o|inlining procedure: k19951 
o|inlining procedure: k28063 
o|inlining procedure: k28649 
o|inlining procedure: k28908 
o|removed binding forms: 76 
o|contracted procedure: k25457 
o|contracted procedure: k26221 
o|contracted procedure: k19839 
o|contracted procedure: k21248 
o|contracted procedure: k22332 
o|contracted procedure: k22494 
o|contracted procedure: k28059 
o|contracted procedure: k28218 
o|contracted procedure: k28452 
o|simplifications: ((let . 5)) 
o|removed binding forms: 21 
o|direct leaf routine/allocation: lp1178 0 
o|direct leaf routine/allocation: cased-char1456 9 
o|direct leaf routine/allocation: join1642 0 
o|direct leaf routine/allocation: new-res1643 6 
o|direct leaf routine/allocation: g19041905 6 
o|direct leaf routine/allocation: byte1975 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: g36383645 20 
o|direct leaf routine/allocation: g37933811 3 
o|direct leaf routine/allocation: g37093716 3 
o|direct leaf routine/allocation: chicken.irregex#nfa-get-epsilons 0 
o|direct leaf routine/allocation: g42684275 3 
o|direct leaf routine/allocation: doloop43684369 0 
o|direct leaf routine/allocation: chicken.irregex#char-ranges-union 6 
o|converted assignments to bindings: (lp1178) 
o|contracted procedure: "(irregex-core.scm:771) k10764" 
o|contracted procedure: "(irregex-core.scm:819) k10894" 
o|contracted procedure: "(irregex-core.scm:822) k10903" 
o|contracted procedure: "(irregex-core.scm:837) k10946" 
o|contracted procedure: "(irregex-core.scm:840) k10960" 
o|contracted procedure: "(irregex-core.scm:841) k10964" 
o|contracted procedure: "(irregex-core.scm:887) k11342" 
o|contracted procedure: "(irregex-core.scm:991) k11979" 
o|contracted procedure: "(irregex-core.scm:993) k11995" 
o|contracted procedure: "(irregex-core.scm:995) k12011" 
o|contracted procedure: "(irregex-core.scm:998) k12030" 
o|contracted procedure: "(irregex-core.scm:1003) k12071" 
o|contracted procedure: "(irregex-core.scm:1006) k12094" 
o|inlining procedure: "(irregex-core.scm:1260) k13748" 
o|contracted procedure: "(irregex-core.scm:1371) k14302" 
o|contracted procedure: "(irregex-core.scm:1372) k14290" 
o|contracted procedure: "(irregex-core.scm:1375) k14358" 
o|contracted procedure: "(irregex-core.scm:1376) k14346" 
o|contracted procedure: "(irregex-core.scm:1377) k14334" 
o|contracted procedure: "(irregex-core.scm:1380) k14430" 
o|contracted procedure: "(irregex-core.scm:1381) k14418" 
o|contracted procedure: "(irregex-core.scm:1382) k14406" 
o|contracted procedure: "(irregex-core.scm:1383) k14394" 
o|contracted procedure: "(irregex-core.scm:1452) k14868" 
o|contracted procedure: "(irregex-core.scm:1464) k15016" 
o|contracted procedure: "(irregex-core.scm:1471) k15060" 
o|contracted procedure: "(irregex-core.scm:1480) k15181" 
o|contracted procedure: "(irregex-core.scm:1487) k15225" 
o|contracted procedure: "(irregex-core.scm:1495) k14724" 
o|inlining procedure: "(irregex-core.scm:1428) k15920" 
o|contracted procedure: "(irregex-core.scm:1498) k15637" 
o|contracted procedure: "(irregex-core.scm:1515) k15476" 
o|contracted procedure: "(irregex-core.scm:1528) k14812" 
o|contracted procedure: "(irregex-core.scm:3166) k23940" 
o|contracted procedure: "(irregex-core.scm:3175) k23979" 
o|contracted procedure: "(irregex-core.scm:3180) k23998" 
o|contracted procedure: "(irregex-core.scm:3185) k24017" 
o|contracted procedure: "(irregex-core.scm:3187) k24036" 
o|contracted procedure: "(irregex-core.scm:3193) k24087" 
o|contracted procedure: "(irregex-core.scm:3199) k24133" 
o|contracted procedure: "(irregex-core.scm:3204) k24159" 
o|contracted procedure: "(irregex-core.scm:3213) k24198" 
o|contracted procedure: "(irregex-core.scm:3210) k24204" 
o|contracted procedure: "(irregex-core.scm:3225) k24240" 
o|contracted procedure: "(irregex-core.scm:3220) k24258" 
o|contracted procedure: "(irregex-core.scm:3244) k24283" 
o|contracted procedure: "(irregex-core.scm:3239) k24301" 
o|contracted procedure: "(irregex-core.scm:3268) k24390" 
o|contracted procedure: "(irregex-core.scm:3302) k24542" 
o|contracted procedure: "(irregex-core.scm:3335) k24781" 
o|contracted procedure: "(irregex-core.scm:3345) k24816" 
o|contracted procedure: "(irregex-core.scm:3355) k24894" 
o|contracted procedure: "(irregex-core.scm:3372) k24937" 
o|contracted procedure: "(irregex-core.scm:3454) k25300" 
o|contracted procedure: "(irregex-core.scm:3457) k25427" 
o|contracted procedure: "(irregex-core.scm:3636) k26525" 
o|contracted procedure: "(irregex-core.scm:1795) k17859" 
o|contracted procedure: "(irregex-core.scm:1819) k18045" 
o|contracted procedure: "(irregex-core.scm:1830) k18084" 
o|contracted procedure: "(irregex-core.scm:1834) k18131" 
o|contracted procedure: "(irregex-core.scm:1838) k18205" 
o|contracted procedure: "(irregex-core.scm:1842) k18233" 
o|contracted procedure: "(irregex-core.scm:1555) k15999" 
o|contracted procedure: "(irregex-core.scm:1556) k16014" 
o|contracted procedure: "(irregex-core.scm:1571) k16188" 
o|contracted procedure: "(irregex-core.scm:1697) k17129" 
o|contracted procedure: "(irregex-core.scm:1708) k17246" 
o|contracted procedure: "(irregex-core.scm:1897) k18650" 
o|contracted procedure: "(irregex-core.scm:1898) k18668" 
o|contracted procedure: "(irregex-core.scm:1899) k18685" 
o|contracted procedure: "(irregex-core.scm:1919) k18831" 
o|contracted procedure: "(irregex-core.scm:1921) k18853" 
o|contracted procedure: "(irregex-core.scm:1925) k18886" 
o|contracted procedure: "(irregex-core.scm:2162) k20273" 
o|contracted procedure: "(irregex-core.scm:2246) k20680" 
o|contracted procedure: "(irregex-core.scm:2198) k20854" 
o|contracted procedure: "(irregex-core.scm:2431) k21007" 
o|contracted procedure: "(irregex-core.scm:2570) k21643" 
o|contracted procedure: "(irregex-core.scm:2643) k21796" 
o|contracted procedure: "(irregex-core.scm:2656) k21874" 
o|contracted procedure: "(irregex-core.scm:2772) k22394" 
o|contracted procedure: "(irregex-core.scm:3023) k23342" 
o|contracted procedure: k22721 
o|converted assignments to bindings: (doloop43684369) 
o|contracted procedure: "(irregex-core.scm:3742) k27226" 
o|contracted procedure: "(irregex-core.scm:3744) k27241" 
o|contracted procedure: "(irregex-core.scm:3805) k27593" 
o|contracted procedure: "(irregex-core.scm:3809) k27608" 
o|simplifications: ((if . 1) (let . 2)) 
o|removed binding forms: 85 
o|contracted procedure: "(irregex-core.scm:1797) k17887" 
o|replaced variables: 10 
o|removed binding forms: 1 
o|simplifications: ((if . 6)) 
o|removed binding forms: 10 
o|contracted procedure: k24404 
o|contracted procedure: k24445 
o|contracted procedure: k24578 
o|contracted procedure: k24604 
o|removed binding forms: 4 
o|direct leaf routine/allocation: shift1521 6 
o|direct leaf routine/allocation: chicken.irregex#nfa-add-epsilon! 6 
o|contracted procedure: "(irregex-core.scm:822) k10999" 
o|contracted procedure: "(irregex-core.scm:844) k11014" 
o|contracted procedure: "(irregex-core.scm:2508) k21303" 
o|contracted procedure: "(irregex-core.scm:2582) k21601" 
o|contracted procedure: "(irregex-core.scm:2583) k21604" 
o|contracted procedure: "(irregex-core.scm:2592) k21671" 
o|contracted procedure: "(irregex-core.scm:2607) k21711" 
o|inlining procedure: "(irregex-core.scm:2609) k21708" 
o|contracted procedure: "(irregex-core.scm:2647) k21774" 
o|contracted procedure: "(irregex-core.scm:2648) k21771" 
o|contracted procedure: "(irregex-core.scm:2660) k21852" 
o|contracted procedure: "(irregex-core.scm:2661) k21849" 
o|removed binding forms: 11 
o|contracted procedure: "(irregex-core.scm:2609) k21708" 
o|removed binding forms: 1 
o|customizable procedures: (k30628 loop26485 loop6470 k29957 k30118 for-each-loop64226432 k30127 k30054 chicken.irregex#cset->string k29971 for-each-loop63676377 g63266333 for-each-loop63256337 for-each-loop63046314 for-each-loop62856295 k29705 for-each-loop62686278 lp6226 for-each-loop62496259 lp6208 lp16172 k29400 map-loop61466164 lp26175 loop6117 scan6108 k29032 k29103 lp5883 g58455846 lp5808 chicken.irregex#irregex-apply-match lp5745 chicken.irregex#irregex-copy-matches k28150 k28153 chicken.irregex#irregex-reset-matches! lp5691 k28030 lp5658 intersect5639 k27759 k27762 k27769 diff5610 union-range5579 lp5560 map-loop55125529 lp3214 lp5403 map-loop54855502 map-loop54575474 rec5421 map-loop54315448 lp5414 lp5397 k23514 lp24554 lp4551 k23403 g45234524 k23379 lp4315 k22491 k22497 lp24509 lp4503 chicken.irregex#mst-fold g44884489 chicken.irregex#cset-difference chicken.irregex#mst-copy k23221 lp4476 chicken.irregex#nfa-state->mst chicken.irregex#nfa-epsilon-closure lp4344 k23636 lp34585 lp24581 lp4579 k22875 chicken.irregex#tag-set-commands-for-closure lp24401 lp4390 lp4420 g44394448 map-loop44334455 doloop44254426 k23016 lp4356 k22329 for-each-loop42674286 chicken.irregex#make-mst chicken.irregex#mst-add! k22138 lp4025 doloop42104211 k21496 k21543 g42004201 chicken.irregex#string->cset add-char-state!4059 lp24091 lp4051 extend-state!4058 new-state-number4056 add-state!4057 doloop40644065 k21170 doloop36683669 k20359 for-each-loop37083720 k20748 k20706 for-each-loop37923816 g38323841 map-loop38263848 for-each-loop38023855 lp23734 k20397 chicken.irregex#finalize! lp13725 for-each-loop36373658 k19915 lp3543 k19702 lp3459 lp13594 chicken.irregex#find chicken.irregex#cset-contains? lp23601 lp23425 lp13421 chicken.irregex#dfa-match/longest chicken.irregex#irregex-new-matches chicken.irregex#irregex-search/matches k19320 k19140 map-loop33293346 k18907 chicken.irregex#sre-sequence-names map-loop31883205 k17405 k17257 k17140 k17027 k16887 k16714 k16757 chicken.irregex#every k16361 map-loop26262644 k16147 map-loop25922609 rec2486 map-loop25662583 chicken.irregex#any chicken.irregex#cset->utf8-pattern g25292538 map-loop25232541 g25022511 map-loop24962514 adjust2478 g27382739 chicken.irregex#sre->nfa g27492750 chicken.irregex#nfa->dfa k17527 k17556 k17880 k18260 k18300 g31513152 k18279 k18065 k18068 k17938 k17744 lp23021 lp23009 lp2969 grow2979 chicken.irregex#sre-names lp5310 lp5286 k26206 chicken.irregex#chunker-next-char k26120 k26111 k26046 k26013 k25915 k25906 chicken.irregex#chunker-prev-char k23875 k25110 lp5025 k24966 k24526 k24529 k24374 k24377 chicken.irregex#sre-count-submatches rec4619 chicken.irregex#sre-cset->procedure lp4610 chicken.irregex#cset->plist k15905 chicken.irregex#char->utf8-list map-loop24312458 chicken.irregex#unicode-range-up-from lp2062 k15645 map-loop22612288 g23032312 map-loop22972360 map-loop23812408 chicken.irregex#utf8-lowest-digit-of-length k15359 chicken.irregex#zero-to map-loop23262353 chicken.irregex#unicode-range-up-to lp2467 map-loop22122230 map-loop21612179 map-loop20832101 map-loop21102137 chicken.irregex#unicode-range-helper scan1069 chicken.irregex#symbol-list->flags scan1081 lp21772 k12905 k12255 lp1092 collect1100 k12298 k14134 k14017 k13904 chicken.irregex#sre->cset k13693 k13770 k13782 chicken.irregex#string-parse-hex-escape chicken.irregex#cset-case-insensitive chicken.irregex#cset-complement go1870 lp21634 chicken.irregex#with-read-from-string k11462 save1461 collect/single1459 k11199 lp1450 collect/terms1460 collect1458 chicken.irregex#last k10872 k10875 lp1513 lp2006 chicken.irregex#utf8-string-ref k10809 cased-string1457 map-loop14701487 k10577 k10566 lp1415 k10460 scan1385 scan1348 collect1352 k10174 skip1330 lp1316 read1303 lp1207 lp1198 lp1185 lp1159 lp1152 chicken.irregex#fold doloop11271128 lp1141 scan1057 lp981 k8619 loop953 chicken.irregex#string-cat-reverse lp864 k8229 chicken.irregex#irregex-match-numeric-index chicken.irregex#%vector-copy) 
o|shared closure containers: 76 
o|shared closure users: 100 
o|calls to known targets: 1151 
o|identified direct recursive calls: f_8275 2 
o|identified direct recursive calls: f_9039 1 
o|identified direct recursive calls: f_9292 1 
o|identified direct recursive calls: f_9386 1 
o|identified direct recursive calls: f_9483 1 
o|identified direct recursive calls: f_10099 1 
o|identified direct recursive calls: f_10233 1 
o|identified direct recursive calls: f_9958 4 
o|identified direct recursive calls: f_10741 1 
o|identified direct recursive calls: f_14451 1 
o|identified direct recursive calls: f_10885 2 
o|identified direct recursive calls: f_11921 6 
o|identified direct recursive calls: f_9177 1 
o|identified direct recursive calls: f_12987 2 
o|identified direct recursive calls: f_9139 1 
o|identified direct recursive calls: f_10694 3 
o|identified direct recursive calls: f_9082 1 
o|identified direct recursive calls: f_14927 1 
o|identified direct recursive calls: f_14963 1 
o|identified direct recursive calls: f_15110 1 
o|identified direct recursive calls: f_15275 1 
o|identified direct recursive calls: f_15395 1 
o|identified direct recursive calls: f_15518 1 
o|identified direct recursive calls: f_15679 1 
o|identified direct recursive calls: f_15796 1 
o|identified direct recursive calls: f_14735 1 
o|identified direct recursive calls: f_17486 1 
o|identified direct recursive calls: f_16381 1 
o|identified direct recursive calls: f_15974 2 
o|identified direct recursive calls: f_16967 1 
o|identified direct recursive calls: f_18626 3 
o|identified direct recursive calls: f_18807 3 
o|identified direct recursive calls: f_20265 1 
o|identified direct recursive calls: f_20672 1 
o|identified direct recursive calls: f_20846 1 
o|identified direct recursive calls: f_21193 1 
o|identified direct recursive calls: f_21155 4 
o|identified direct recursive calls: f_22066 1 
o|identified direct recursive calls: f_22105 1 
o|identified direct recursive calls: f_22386 1 
o|identified direct recursive calls: f_22685 1 
o|identified direct recursive calls: f_23091 1 
o|identified direct recursive calls: f_23679 2 
o|identified direct recursive calls: f_22623 1 
o|identified direct recursive calls: f_22790 1 
o|identified direct recursive calls: f_22552 1 
o|identified direct recursive calls: f_22734 1 
o|identified direct recursive calls: f_23348 1 
o|identified direct recursive calls: f_26782 1 
o|identified direct recursive calls: f_18759 1 
o|identified direct recursive calls: f_26891 2 
o|identified direct recursive calls: f_27381 2 
o|identified direct recursive calls: f_27483 4 
o|identified direct recursive calls: f_27684 3 
o|identified direct recursive calls: f_27880 3 
o|identified direct recursive calls: f_28764 1 
o|identified direct recursive calls: f_29107 2 
o|identified direct recursive calls: f_29235 1 
o|identified direct recursive calls: f_29476 2 
o|identified direct recursive calls: f_29464 1 
o|identified direct recursive calls: f_30473 4 
o|fast box initializations: 142 
o|fast global references: 365 
o|fast global assignments: 79 
o|dropping unused closure argument: f_10544 
o|dropping unused closure argument: f_13507 
o|dropping unused closure argument: f_14247 
o|dropping unused closure argument: f_14489 
o|dropping unused closure argument: f_14565 
o|dropping unused closure argument: f_14844 
o|dropping unused closure argument: f_14999 
o|dropping unused closure argument: f_15164 
o|dropping unused closure argument: f_15852 
o|dropping unused closure argument: f_16967 
o|dropping unused closure argument: f_17374 
o|dropping unused closure argument: f_18580 
o|dropping unused closure argument: f_18603 
o|dropping unused closure argument: f_18807 
o|dropping unused closure argument: f_19093 
o|dropping unused closure argument: f_19442 
o|dropping unused closure argument: f_20205 
o|dropping unused closure argument: f_20324 
o|dropping unused closure argument: f_20971 
o|dropping unused closure argument: f_21005 
o|dropping unused closure argument: f_21146 
o|dropping unused closure argument: f_22269 
o|dropping unused closure argument: f_22298 
o|dropping unused closure argument: f_22315 
o|dropping unused closure argument: f_22324 
o|dropping unused closure argument: f_22676 
o|dropping unused closure argument: f_22758 
o|dropping unused closure argument: f_23443 
o|dropping unused closure argument: f_23458 
o|dropping unused closure argument: f_26557 
o|dropping unused closure argument: f_26770 
o|dropping unused closure argument: f_26861 
o|dropping unused closure argument: f_26881 
o|dropping unused closure argument: f_27348 
o|dropping unused closure argument: f_27433 
o|dropping unused closure argument: f_27670 
o|dropping unused closure argument: f_27992 
o|dropping unused closure argument: f_28002 
o|dropping unused closure argument: f_28758 
o|dropping unused closure argument: f_29592 
o|dropping unused closure argument: f_7749 
o|dropping unused closure argument: f_7831 
o|dropping unused closure argument: f_7854 
o|dropping unused closure argument: f_7863 
o|dropping unused closure argument: f_8163 
o|dropping unused closure argument: f_8849 
o|dropping unused closure argument: f_8879 
o|dropping unused closure argument: f_9317 
o|dropping unused closure argument: f_9370 
o|dropping unused closure argument: f_9407 
o|dropping unused closure argument: f_9468 
o|dropping unused closure argument: f_9483 
o|dropping unused closure argument: f_9506 
o|dropping unused closure argument: f_9549 
o|dropping unused closure argument: f_9594 
o|dropping unused closure argument: f_9951 
*/
/* end of file */
