srfi-13.c

Scheme跨平台编译器

/* Generated from srfi-13.scm by the CHICKEN compiler
   http://www.call-with-current-continuation.org
   2008-09-23 22:55
   Version 3.3.0 - linux-unix-gnu-x86	[ manyargs dload ptables applyhook ]
   SVN rev. 11106	compiled 2008-07-08 on galinha (Linux)
   command line: srfi-13.scm -quiet -no-trace -optimize-level 2 -include-path . -include-path ./ -explicit-use -output-file srfi-13.c
   unit: srfi_13
*/

#include "chicken.h"

static C_PTABLE_ENTRY *create_ptable(void);
C_noret_decl(C_srfi_14_toplevel)
C_externimport void C_ccall C_srfi_14_toplevel(C_word c,C_word d,C_word k) C_noret;

static C_TLS C_word lf[160];
static double C_possibly_force_alignment;
static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,7),40,97,49,52,54,50,41,0};
static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,20),40,97,49,52,57,56,32,101,110,100,49,48,32,97,114,103,115,49,49,41,0,0,0,0};
static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,39),40,115,116,114,105,110,103,45,112,97,114,115,101,45,115,116,97,114,116,43,101,110,100,32,112,114,111,99,50,32,115,51,32,97,114,103,115,52,41,0};
static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,7),40,97,49,53,51,49,41,0};
static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,28),40,97,49,53,51,55,32,114,101,115,116,49,54,32,115,116,97,114,116,49,55,32,101,110,100,49,56,41,0,0,0,0};
static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,48),40,115,116,114,105,110,103,45,112,97,114,115,101,45,102,105,110,97,108,45,115,116,97,114,116,43,101,110,100,32,112,114,111,99,49,51,32,115,49,52,32,97,114,103,115,49,53,41};
static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,38),40,115,117,98,115,116,114,105,110,103,45,115,112,101,99,45,111,107,63,32,115,49,57,32,115,116,97,114,116,50,48,32,101,110,100,50,49,41,0,0};
static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,47),40,99,104,101,99,107,45,115,117,98,115,116,114,105,110,103,45,115,112,101,99,32,112,114,111,99,50,50,32,115,50,51,32,115,116,97,114,116,50,52,32,101,110,100,50,53,41,0};
static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,44),40,115,117,98,115,116,114,105,110,103,47,115,104,97,114,101,100,32,115,50,54,32,115,116,97,114,116,50,55,32,46,32,109,97,121,98,101,45,101,110,100,50,56,41,0,0,0,0};
static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,37),40,37,115,117,98,115,116,114,105,110,103,47,115,104,97,114,101,100,32,115,51,54,32,115,116,97,114,116,51,55,32,101,110,100,51,56,41,0,0,0};
static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,7),40,97,49,54,55,51,41,0};
static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,21),40,97,49,54,55,57,32,115,116,97,114,116,52,49,32,101,110,100,52,50,41,0,0,0};
static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,37),40,115,116,114,105,110,103,45,99,111,112,121,32,115,51,57,32,46,32,109,97,121,98,101,45,115,116,97,114,116,43,101,110,100,52,48,41,0,0,0};
static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,7),40,97,49,54,57,49,41,0};
static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,21),40,97,49,54,57,55,32,115,116,97,114,116,52,54,32,101,110,100,52,55,41,0,0,0};
static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,43),40,115,116,114,105,110,103,45,109,97,112,32,112,114,111,99,52,51,32,115,52,52,32,46,32,109,97,121,98,101,45,115,116,97,114,116,43,101,110,100,52,53,41,0,0,0,0,0};
static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,14),40,100,111,53,52,32,105,53,54,32,106,53,55,41,0,0};
static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,38),40,37,115,116,114,105,110,103,45,109,97,112,32,112,114,111,99,52,56,32,115,52,57,32,115,116,97,114,116,53,48,32,101,110,100,53,49,41,0,0};
static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,7),40,97,49,55,53,50,41,0};
static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,21),40,97,49,55,53,56,32,115,116,97,114,116,54,52,32,101,110,100,54,53,41,0,0,0};
static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,44),40,115,116,114,105,110,103,45,109,97,112,33,32,112,114,111,99,54,49,32,115,54,50,32,46,32,109,97,121,98,101,45,115,116,97,114,116,43,101,110,100,54,51,41,0,0,0,0};
static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,10),40,100,111,55,48,32,105,55,50,41,0,0,0,0,0,0};
static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,39),40,37,115,116,114,105,110,103,45,109,97,112,33,32,112,114,111,99,54,54,32,115,54,55,32,115,116,97,114,116,54,56,32,101,110,100,54,57,41,0};
static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,7),40,97,49,56,48,51,41,0};
static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,12),40,108,112,32,118,56,50,32,105,56,51,41,0,0,0,0};
static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,21),40,97,49,56,48,57,32,115,116,97,114,116,55,57,32,101,110,100,56,48,41,0,0,0};
static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,51),40,115,116,114,105,110,103,45,102,111,108,100,32,107,111,110,115,55,53,32,107,110,105,108,55,54,32,115,55,55,32,46,32,109,97,121,98,101,45,115,116,97,114,116,43,101,110,100,55,56,41,0,0,0,0,0};
static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,7),40,97,49,56,52,53,41,0};
static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,12),40,108,112,32,118,57,50,32,105,57,51,41,0,0,0,0};
static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,21),40,97,49,56,53,49,32,115,116,97,114,116,56,57,32,101,110,100,57,48,41,0,0,0};
static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,57),40,115,116,114,105,110,103,45,102,111,108,100,45,114,105,103,104,116,32,107,111,110,115,56,53,32,107,110,105,108,56,54,32,115,56,55,32,46,32,109,97,121,98,101,45,115,116,97,114,116,43,101,110,100,56,56,41,0,0,0,0,0,0,0};
static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,13),40,102,95,50,48,53,48,32,120,49,48,56,41,0,0,0};
static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,14),40,108,112,32,99,104,117,110,107,115,49,51,52,41,0,0};
static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,18),40,108,112,50,32,105,49,49,55,32,115,101,101,100,49,49,56,41,0,0,0,0,0,0};
static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,59),40,108,112,32,99,104,117,110,107,115,49,49,48,32,110,99,104,97,114,115,49,49,49,32,99,104,117,110,107,49,49,50,32,99,104,117,110,107,45,108,101,110,49,49,51,32,105,49,49,52,32,115,101,101,100,49,49,53,41,0,0,0,0,0};
static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,54),40,115,116,114,105,110,103,45,117,110,102,111,108,100,32,112,57,53,32,102,57,54,32,103,57,55,32,115,101,101,100,57,56,32,46,32,98,97,115,101,43,109,97,107,101,45,102,105,110,97,108,57,57,41,0,0};
static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,13),40,102,95,50,50,51,57,32,120,49,54,48,41,0,0,0};
static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,14),40,108,112,32,99,104,117,110,107,115,49,56,56,41,0,0};
static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,18),40,108,112,50,32,105,49,54,57,32,115,101,101,100,49,55,48,41,0,0,0,0,0,0};
static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,59),40,108,112,32,99,104,117,110,107,115,49,54,50,32,110,99,104,97,114,115,49,54,51,32,99,104,117,110,107,49,54,52,32,99,104,117,110,107,45,108,101,110,49,54,53,32,105,49,54,54,32,115,101,101,100,49,54,55,41,0,0,0,0,0};
static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,65),40,115,116,114,105,110,103,45,117,110,102,111,108,100,45,114,105,103,104,116,32,112,49,52,55,32,102,49,52,56,32,103,49,52,57,32,115,101,101,100,49,53,48,32,46,32,98,97,115,101,43,109,97,107,101,45,102,105,110,97,108,49,53,49,41,0,0,0,0,0,0,0};
static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,7),40,97,50,50,54,50,41,0};
static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,9),40,108,112,32,105,50,48,53,41,0,0,0,0,0,0,0};
static C_char C_TLS li43[] C_aligned={C_lihdr(0,0,23),40,97,50,50,54,56,32,115,116,97,114,116,50,48,50,32,101,110,100,50,48,51,41,0};
static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,51),40,115,116,114,105,110,103,45,102,111,114,45,101,97,99,104,32,112,114,111,99,49,57,57,32,115,50,48,48,32,46,32,109,97,121,98,101,45,115,116,97,114,116,43,101,110,100,50,48,49,41,0,0,0,0,0};
static C_char C_TLS li45[] C_aligned={C_lihdr(0,0,7),40,97,50,51,48,51,41,0};
static C_char C_TLS li46[] C_aligned={C_lihdr(0,0,9),40,108,112,32,105,50,49,52,41,0,0,0,0,0,0,0};
static C_char C_TLS li47[] C_aligned={C_lihdr(0,0,23),40,97,50,51,48,57,32,115,116,97,114,116,50,49,49,32,101,110,100,50,49,50,41,0};
static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,57),40,115,116,114,105,110,103,45,102,111,114,45,101,97,99,104,45,105,110,100,101,120,32,112,114,111,99,50,48,56,32,115,50,48,57,32,46,32,109,97,121,98,101,45,115,116,97,114,116,43,101,110,100,50,49,48,41,0,0,0,0,0,0,0};
static C_char C_TLS li49[] C_aligned={C_lihdr(0,0,7),40,97,50,51,52,48,41,0};
static C_char C_TLS li50[] C_aligned={C_lihdr(0,0,4),40,108,112,41,0,0,0,0};
static C_char C_TLS li51[] C_aligned={C_lihdr(0,0,9),40,108,112,32,105,50,50,56,41,0,0,0,0,0,0,0};
static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,9),40,108,112,32,105,50,51,53,41,0,0,0,0,0,0,0};
static C_char C_TLS li53[] C_aligned={C_lihdr(0,0,23),40,97,50,51,52,54,32,115,116,97,114,116,50,50,48,32,101,110,100,50,50,49,41,0};
static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,52),40,115,116,114,105,110,103,45,101,118,101,114,121,32,99,114,105,116,101,114,105,97,50,49,55,32,115,50,49,56,32,46,32,109,97,121,98,101,45,115,116,97,114,116,43,101,110,100,50,49,57,41,0,0,0,0};
static C_char C_TLS li55[] C_aligned={C_lihdr(0,0,7),40,97,50,52,55,48,41,0};
static C_char C_TLS li56[] C_aligned={C_lihdr(0,0,4),40,108,112,41,0,0,0,0};
static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,9),40,108,112,32,105,50,53,48,41,0,0,0,0,0,0,0};
static C_char C_TLS li58[] C_aligned={C_lihdr(0,0,9),40,108,112,32,105,50,53,53,41,0,0,0,0,0,0,0};
static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,23),40,97,50,52,55,54,32,115,116,97,114,116,50,52,50,32,101,110,100,50,52,51,41,0};
static C_char C_TLS li60[] C_aligned={C_lihdr(0,0,50),40,115,116,114,105,110,103,45,97,110,121,32,99,114,105,116,101,114,105,97,50,51,57,32,115,50,52,48,32,46,32,109,97,121,98,101,45,115,116,97,114,116,43,101,110,100,50,52,49,41,0,0,0,0,0,0};
static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,12),40,100,111,50,54,52,32,105,50,54,54,41,0,0,0,0};
static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,32),40,115,116,114,105,110,103,45,116,97,98,117,108,97,116,101,32,112,114,111,99,50,54,49,32,108,101,110,50,54,50,41};
static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,14),40,108,112,32,105,50,56,48,32,106,50,56,49,41,0,0};
static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,71),40,37,115,116,114,105,110,103,45,112,114,101,102,105,120,45,108,101,110,103,116,104,32,115,49,50,55,49,32,115,116,97,114,116,49,50,55,50,32,101,110,100,49,50,55,51,32,115,50,50,55,52,32,115,116,97,114,116,50,50,55,53,32,101,110,100,50,50,55,54,41,0};
static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,14),40,108,112,32,105,50,57,52,32,106,50,57,53,41,0,0};
static C_char C_TLS li66[] C_aligned={C_lihdr(0,0,71),40,37,115,116,114,105,110,103,45,115,117,102,102,105,120,45,108,101,110,103,116,104,32,115,49,50,56,53,32,115,116,97,114,116,49,50,56,54,32,101,110,100,49,50,56,55,32,115,50,50,56,56,32,115,116,97,114,116,50,50,56,57,32,101,110,100,50,50,57,48,41,0};
static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,14),40,108,112,32,105,51,48,56,32,106,51,48,57,41,0,0};
static C_char C_TLS li68[] C_aligned={C_lihdr(0,0,74),40,37,115,116,114,105,110,103,45,112,114,101,102,105,120,45,108,101,110,103,116,104,45,99,105,32,115,49,50,57,57,32,115,116,97,114,116,49,51,48,48,32,101,110,100,49,51,48,49,32,115,50,51,48,50,32,115,116,97,114,116,50,51,48,51,32,101,110,100,50,51,48,52,41,0,0,0,0,0,0};
static C_char C_TLS li69[] C_aligned={C_lihdr(0,0,14),40,108,112,32,105,51,50,50,32,106,51,50,51,41,0,0};
static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,74),40,37,115,116,114,105,110,103,45,115,117,102,102,105,120,45,108,101,110,103,116,104,45,99,105,32,115,49,51,49,51,32,115,116,97,114,116,49,51,49,52,32,101,110,100,49,51,49,53,32,115,50,51,49,54,32,115,116,97,114,116,50,51,49,55,32,101,110,100,50,51,49,56,41,0,0,0,0,0,0};
static C_char C_TLS li71[] C_aligned={C_lihdr(0,0,7),40,97,50,57,53,53,41,0};
static C_char C_TLS li72[] C_aligned={C_lihdr(0,0,7),40,97,50,57,54,55,41,0};
static C_char C_TLS li73[] C_aligned={C_lihdr(0,0,25),40,97,50,57,55,51,32,115,116,97,114,116,50,51,51,54,32,101,110,100,50,51,51,55,41,0,0,0,0,0,0,0};
static C_char C_TLS li74[] C_aligned={C_lihdr(0,0,33),40,97,50,57,54,49,32,103,51,51,49,51,51,51,32,115,116,97,114,116,49,51,51,52,32,101,110,100,49,51,51,53,41,0,0,0,0,0,0,0};
static C_char C_TLS li75[] C_aligned={C_lihdr(0,0,57),40,115,116,114,105,110,103,45,112,114,101,102,105,120,45,108,101,110,103,116,104,32,115,49,51,50,55,32,115,50,51,50,56,32,46,32,109,97,121,98,101,45,115,116,97,114,116,115,43,101,110,100,115,51,50,57,41,0,0,0,0,0,0,0};
static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,7),40,97,50,57,56,53,41,0};
static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,7),40,97,50,57,57,55,41,0};
static C_char C_TLS li78[] C_aligned={C_lihdr(0,0,25),40,97,51,48,48,51,32,115,116,97,114,116,50,51,52,55,32,101,110,100,50,51,52,56,41,0,0,0,0,0,0,0};
static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,33),40,97,50,57,57,49,32,103,51,52,50,51,52,52,32,115,116,97,114,116,49,51,52,53,32,101,110,100,49,51,52,54,41,0,0,0,0,0,0,0};
static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,57),40,115,116,114,105,110,103,45,115,117,102,102,105,120,45,108,101,110,103,116,104,32,115,49,51,51,56,32,115,50,51,51,57,32,46,32,109,97,121,98,101,45,115,116,97,114,116,115,43,101,110,100,115,51,52,48,41,0,0,0,0,0,0,0};
static C_char C_TLS li81[] C_aligned={C_lihdr(0,0,7),40,97,51,48,49,53,41,0};
static C_char C_TLS li82[] C_aligned={C_lihdr(0,0,7),40,97,51,48,50,55,41,0};
static C_char C_TLS li83[] C_aligned={C_lihdr(0,0,25),40,97,51,48,51,51,32,115,116,97,114,116,50,51,53,56,32,101,110,100,50,51,53,57,41,0,0,0,0,0,0,0};
static C_char C_TLS li84[] C_aligned={C_lihdr(0,0,33),40,97,51,48,50,49,32,103,51,53,51,51,53,53,32,115,116,97,114,116,49,51,53,54,32,101,110,100,49,51,53,55,41,0,0,0,0,0,0,0};
static C_char C_TLS li85[] C_aligned={C_lihdr(0,0,60),40,115,116,114,105,110,103,45,112,114,101,102,105,120,45,108,101,110,103,116,104,45,99,105,32,115,49,51,52,57,32,115,50,51,53,48,32,46,32,109,97,121,98,101,45,115,116,97,114,116,115,43,101,110,100,115,51,53,49,41,0,0,0,0};
static C_char C_TLS li86[] C_aligned={C_lihdr(0,0,7),40,97,51,48,52,53,41,0};
static C_char C_TLS li87[] C_aligned={C_lihdr(0,0,7),40,97,51,48,53,55,41,0};
static C_char C_TLS li88[] C_aligned={C_lihdr(0,0,25),40,97,51,48,54,51,32,115,116,97,114,116,50,51,54,57,32,101,110,100,50,51,55,48,41,0,0,0,0,0,0,0};
static C_char C_TLS li89[] C_aligned={C_lihdr(0,0,33),40,97,51,48,53,49,32,103,51,54,52,51,54,54,32,115,116,97,114,116,49,51,54,55,32,101,110,100,49,51,54,56,41,0,0,0,0,0,0,0};
static C_char C_TLS li90[] C_aligned={C_lihdr(0,0,60),40,115,116,114,105,110,103,45,115,117,102,102,105,120,45,108,101,110,103,116,104,45,99,105,32,115,49,51,54,48,32,115,50,51,54,49,32,46,32,109,97,121,98,101,45,115,116,97,114,116,115,43,101,110,100,115,51,54,50,41,0,0,0,0};
static C_char C_TLS li91[] C_aligned={C_lihdr(0,0,7),40,97,51,48,55,53,41,0};
static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,7),40,97,51,48,56,55,41,0};
static C_char C_TLS li93[] C_aligned={C_lihdr(0,0,25),40,97,51,48,57,51,32,115,116,97,114,116,50,51,56,48,32,101,110,100,50,51,56,49,41,0,0,0,0,0,0,0};
static C_char C_TLS li94[] C_aligned={C_lihdr(0,0,33),40,97,51,48,56,49,32,103,51,55,53,51,55,55,32,115,116,97,114,116,49,51,55,56,32,101,110,100,49,51,55,57,41,0,0,0,0,0,0,0};
static C_char C_TLS li95[] C_aligned={C_lihdr(0,0,51),40,115,116,114,105,110,103,45,112,114,101,102,105,120,63,32,115,49,51,55,49,32,115,50,51,55,50,32,46,32,109,97,121,98,101,45,115,116,97,114,116,115,43,101,110,100,115,51,55,51,41,0,0,0,0,0};
static C_char C_TLS li96[] C_aligned={C_lihdr(0,0,7),40,97,51,49,48,53,41,0};
static C_char C_TLS li97[] C_aligned={C_lihdr(0,0,7),40,97,51,49,49,55,41,0};
static C_char C_TLS li98[] C_aligned={C_lihdr(0,0,25),40,97,51,49,50,51,32,115,116,97,114,116,50,51,57,49,32,101,110,100,50,51,57,50,41,0,0,0,0,0,0,0};