📄 srfi-4.c
字号:
/* Generated from srfi-4.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-4.scm -quiet -no-trace -optimize-level 2 -include-path . -include-path ./ -explicit-use -output-file srfi-4.c unit: srfi_4*/#include "chicken.h"#define C_u8peek(b, i) C_fix(((unsigned char *)C_data_pointer(b))[ C_unfix(i) ])#define C_s8peek(b, i) C_fix(((char *)C_data_pointer(b))[ C_unfix(i) ])#define C_u16peek(b, i) C_fix(((unsigned short *)C_data_pointer(b))[ C_unfix(i) ])#define C_s16peek(b, i) C_fix(((short *)C_data_pointer(b))[ C_unfix(i) ])#ifdef C_SIXTY_FOUR# define C_a_u32peek(ptr, d, b, i) C_fix(((C_u32 *)C_data_pointer(b))[ C_unfix(i) ])# define C_a_s32peek(ptr, d, b, i) C_fix(((C_s32 *)C_data_pointer(b))[ C_unfix(i) ])#else# define C_a_u32peek(ptr, d, b, i) C_unsigned_int_to_num(ptr, ((C_u32 *)C_data_pointer(b))[ C_unfix(i) ])# define C_a_s32peek(ptr, d, b, i) C_int_to_num(ptr, ((C_s32 *)C_data_pointer(b))[ C_unfix(i) ])#endif#define C_f32peek(b, i) (C_temporary_flonum = ((float *)C_data_pointer(b))[ C_unfix(i) ], C_SCHEME_UNDEFINED)#define C_f64peek(b, i) (C_temporary_flonum = ((double *)C_data_pointer(b))[ C_unfix(i) ], C_SCHEME_UNDEFINED)#define C_u8poke(b, i, x) ((((unsigned char *)C_data_pointer(b))[ C_unfix(i) ] = C_unfix(x)), C_SCHEME_UNDEFINED)#define C_s8poke(b, i, x) ((((char *)C_data_pointer(b))[ C_unfix(i) ] = C_unfix(x)), C_SCHEME_UNDEFINED)#define C_u16poke(b, i, x) ((((unsigned short *)C_data_pointer(b))[ C_unfix(i) ] = C_unfix(x)), C_SCHEME_UNDEFINED)#define C_s16poke(b, i, x) ((((short *)C_data_pointer(b))[ C_unfix(i) ] = C_unfix(x)), C_SCHEME_UNDEFINED)#define C_u32poke(b, i, x) ((((C_u32 *)C_data_pointer(b))[ C_unfix(i) ] = C_num_to_unsigned_int(x)), C_SCHEME_UNDEFINED)#define C_s32poke(b, i, x) ((((C_s32 *)C_data_pointer(b))[ C_unfix(i) ] = C_num_to_int(x)), C_SCHEME_UNDEFINED)#define C_f32poke(b, i, x) ((((float *)C_data_pointer(b))[ C_unfix(i) ] = C_flonum_magnitude(x)), C_SCHEME_UNDEFINED)#define C_f64poke(b, i, x) ((((double *)C_data_pointer(b))[ C_unfix(i) ] = C_flonum_magnitude(x)), C_SCHEME_UNDEFINED)#define C_copy_subvector(to, from, start_to, start_from, bytes) \ (C_memcpy((C_char *)C_data_pointer(to) + C_unfix(start_to), (C_char *)C_data_pointer(from) + C_unfix(start_from), C_unfix(bytes)), \ C_SCHEME_UNDEFINED)static C_PTABLE_ENTRY *create_ptable(void);static C_TLS C_word lf[192];static double C_possibly_force_alignment;static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,46),40,35,35,115,121,115,35,99,104,101,99,107,45,101,120,97,99,116,45,105,110,116,101,114,118,97,108,32,110,48,32,102,114,111,109,49,32,116,111,50,32,108,111,99,51,41,0,0};static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,49),40,35,35,115,121,115,35,99,104,101,99,107,45,105,110,101,120,97,99,116,45,105,110,116,101,114,118,97,108,32,110,55,32,102,114,111,109,56,32,116,111,57,32,108,111,99,49,48,41,0,0,0,0,0,0,0};static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,28),40,35,35,115,121,115,35,117,56,118,101,99,116,111,114,45,114,101,102,32,118,49,52,32,105,49,53,41,0,0,0,0};static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,28),40,35,35,115,121,115,35,115,56,118,101,99,116,111,114,45,114,101,102,32,118,49,54,32,105,49,55,41,0,0,0,0};static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,29),40,35,35,115,121,115,35,117,49,54,118,101,99,116,111,114,45,114,101,102,32,118,49,56,32,105,49,57,41,0,0,0};static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,29),40,35,35,115,121,115,35,115,49,54,118,101,99,116,111,114,45,114,101,102,32,118,50,48,32,105,50,49,41,0,0,0};static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,29),40,35,35,115,121,115,35,117,51,50,118,101,99,116,111,114,45,114,101,102,32,118,50,50,32,105,50,51,41,0,0,0};static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,29),40,35,35,115,121,115,35,115,51,50,118,101,99,116,111,114,45,114,101,102,32,118,50,52,32,105,50,53,41,0,0,0};static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,29),40,35,35,115,121,115,35,102,51,50,118,101,99,116,111,114,45,114,101,102,32,118,50,54,32,105,50,55,41,0,0,0};static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,29),40,35,35,115,121,115,35,102,54,52,118,101,99,116,111,114,45,114,101,102,32,118,50,57,32,105,51,48,41,0,0,0};static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,33),40,35,35,115,121,115,35,117,56,118,101,99,116,111,114,45,115,101,116,33,32,118,51,50,32,105,51,51,32,120,51,52,41,0,0,0,0,0,0,0};static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,33),40,35,35,115,121,115,35,115,56,118,101,99,116,111,114,45,115,101,116,33,32,118,51,53,32,105,51,54,32,120,51,55,41,0,0,0,0,0,0,0};static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,117,49,54,118,101,99,116,111,114,45,115,101,116,33,32,118,51,56,32,105,51,57,32,120,52,48,41,0,0,0,0,0,0};static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,115,49,54,118,101,99,116,111,114,45,115,101,116,33,32,118,52,49,32,105,52,50,32,120,52,51,41,0,0,0,0,0,0};static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,30),40,35,35,115,121,115,35,117,51,50,118,101,99,116,111,114,45,115,101,116,33,32,105,52,53,32,120,52,54,41,0,0};static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,30),40,35,35,115,121,115,35,115,51,50,118,101,99,116,111,114,45,115,101,116,33,32,105,52,56,32,120,52,57,41,0,0};static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,102,51,50,118,101,99,116,111,114,45,115,101,116,33,32,118,53,48,32,105,53,49,32,120,53,50,41,0,0,0,0,0,0};static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,34),40,35,35,115,121,115,35,102,54,52,118,101,99,116,111,114,45,115,101,116,33,32,118,53,51,32,105,53,52,32,120,53,53,41,0,0,0,0,0,0};static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,11),40,102,95,57,52,48,32,118,54,48,41,0,0,0,0,0};static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,25),40,108,101,110,32,116,97,103,53,55,32,115,104,105,102,116,53,56,32,108,111,99,53,57,41,0,0,0,0,0,0,0};static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,15),40,102,95,57,56,51,32,118,56,48,32,105,56,49,41,0};static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,26),40,103,101,116,32,108,101,110,103,116,104,55,55,32,97,99,99,55,56,32,108,111,99,55,57,41,0,0,0,0,0,0};static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,19),40,102,95,57,57,55,32,118,56,55,32,105,56,56,32,120,56,57,41,0,0,0,0,0};static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,26),40,115,101,116,32,108,101,110,103,116,104,56,52,32,117,112,100,56,53,32,108,111,99,56,54,41,0,0,0,0,0,0};static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,20),40,102,95,49,48,49,52,32,118,57,54,32,105,57,55,32,120,57,56,41,0,0,0,0};static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,27),40,115,101,116,117,32,108,101,110,103,116,104,57,51,32,117,112,100,57,52,32,108,111,99,57,53,41,0,0,0,0,0};static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,23),40,102,95,49,49,48,51,32,118,49,50,52,32,105,49,50,53,32,120,49,50,54,41,0};static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,30),40,115,101,116,102,32,108,101,110,103,116,104,49,50,49,32,117,112,100,49,50,50,32,108,111,99,49,50,51,41,0,0};static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,23),40,102,95,49,48,54,55,32,118,49,49,53,32,105,49,49,54,32,120,49,49,55,41,0};static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,23),40,102,95,49,48,52,48,32,118,49,48,54,32,105,49,48,55,32,120,49,48,56,41,0};static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,18),40,101,120,116,45,102,114,101,101,32,97,49,53,55,49,54,48,41,0,0,0,0,0,0};static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,29),40,97,108,108,111,99,32,108,111,99,49,54,51,32,108,101,110,49,54,52,32,101,120,116,63,49,54,53,41,0,0,0};static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,28),40,114,101,108,101,97,115,101,45,110,117,109,98,101,114,45,118,101,99,116,111,114,32,118,49,55,49,41,0,0,0,0};static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,12),40,100,111,49,56,57,32,105,49,57,49,41,0,0,0,0};static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,33),40,98,111,100,121,49,55,56,32,105,110,105,116,49,56,53,32,101,120,116,63,49,56,54,32,102,105,110,63,49,56,55,41,0,0,0,0,0,0,0};static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,37),40,100,101,102,45,102,105,110,63,49,56,50,32,37,105,110,105,116,49,55,53,49,57,56,32,37,101,120,116,63,49,55,54,49,57,57,41,0,0,0};static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,25),40,100,101,102,45,101,120,116,63,49,56,49,32,37,105,110,105,116,49,55,53,50,48,49,41,0,0,0,0,0,0,0};static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,13),40,100,101,102,45,105,110,105,116,49,56,48,41,0,0,0};static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,32),40,109,97,107,101,45,117,56,118,101,99,116,111,114,32,108,101,110,49,55,51,32,46,32,103,49,55,50,49,55,52,41};static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,12),40,100,111,50,50,55,32,105,50,50,57,41,0,0,0,0};static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,25),40,98,111,100,121,50,49,54,32,105,110,105,116,50,50,51,32,101,120,116,63,50,50,52,41,0,0,0,0,0,0,0};static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,36),40,100,101,102,45,102,105,110,50,50,48,32,37,105,110,105,116,50,49,51,50,51,54,32,37,101,120,116,63,50,49,52,50,51,55,41,0,0,0,0};static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,25),40,100,101,102,45,101,120,116,63,50,49,57,32,37,105,110,105,116,50,49,51,50,51,57,41,0,0,0,0,0,0,0};static C_char C_TLS li43[] C_aligned={C_lihdr(0,0,13),40,100,101,102,45,105,110,105,116,50,49,56,41,0,0,0};static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,32),40,109,97,107,101,45,115,56,118,101,99,116,111,114,32,108,101,110,50,49,49,32,46,32,103,50,49,48,50,49,50,41};static C_char C_TLS li45[] 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 li46[] C_aligned={C_lihdr(0,0,25),40,98,111,100,121,50,53,51,32,105,110,105,116,50,54,48,32,101,120,116,63,50,54,49,41,0,0,0,0,0,0,0};static C_char C_TLS li47[] C_aligned={C_lihdr(0,0,36),40,100,101,102,45,102,105,110,50,53,55,32,37,105,110,105,116,50,53,48,50,55,51,32,37,101,120,116,63,50,53,49,50,55,52,41,0,0,0,0};static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,25),40,100,101,102,45,101,120,116,63,50,53,54,32,37,105,110,105,116,50,53,48,50,55,54,41,0,0,0,0,0,0,0};static C_char C_TLS li49[] C_aligned={C_lihdr(0,0,13),40,100,101,102,45,105,110,105,116,50,53,53,41,0,0,0};static C_char C_TLS li50[] C_aligned={C_lihdr(0,0,33),40,109,97,107,101,45,117,49,54,118,101,99,116,111,114,32,108,101,110,50,52,56,32,46,32,103,50,52,55,50,52,57,41,0,0,0,0,0,0,0};static C_char C_TLS li51[] C_aligned={C_lihdr(0,0,12),40,100,111,51,48,49,32,105,51,48,51,41,0,0,0,0};static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,25),40,98,111,100,121,50,57,48,32,105,110,105,116,50,57,55,32,101,120,116,63,50,57,56,41,0,0,0,0,0,0,0};static C_char C_TLS li53[] C_aligned={C_lihdr(0,0,36),40,100,101,102,45,102,105,110,50,57,52,32,37,105,110,105,116,50,56,55,51,49,48,32,37,101,120,116,63,50,56,56,51,49,49,41,0,0,0,0};static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,25),40,100,101,102,45,101,120,116,63,50,57,51,32,37,105,110,105,116,50,56,55,51,49,51,41,0,0,0,0,0,0,0};static C_char C_TLS li55[] C_aligned={C_lihdr(0,0,13),40,100,101,102,45,105,110,105,116,50,57,50,41,0,0,0};static C_char C_TLS li56[] C_aligned={C_lihdr(0,0,33),40,109,97,107,101,45,115,49,54,118,101,99,116,111,114,32,108,101,110,50,56,53,32,46,32,103,50,56,52,50,56,54,41,0,0,0,0,0,0,0};static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,7),40,100,111,51,51,56,41,0};static C_char C_TLS li58[] C_aligned={C_lihdr(0,0,25),40,98,111,100,121,51,50,55,32,105,110,105,116,51,51,52,32,101,120,116,63,51,51,53,41,0,0,0,0,0,0,0};static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,36),40,100,101,102,45,102,105,110,51,51,49,32,37,105,110,105,116,51,50,52,51,52,55,32,37,101,120,116,63,51,50,53,51,52,56,41,0,0,0,0};static C_char C_TLS li60[] C_aligned={C_lihdr(0,0,25),40,100,101,102,45,101,120,116,63,51,51,48,32,37,105,110,105,116,51,50,52,51,53,48,41,0,0,0,0,0,0,0};static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,13),40,100,101,102,45,105,110,105,116,51,50,57,41,0,0,0};static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,33),40,109,97,107,101,45,117,51,50,118,101,99,116,111,114,32,108,101,110,51,50,50,32,46,32,103,51,50,49,51,50,51,41,0,0,0,0,0,0,0};static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,7),40,100,111,51,55,53,41,0};static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,25),40,98,111,100,121,51,54,52,32,105,110,105,116,51,55,49,32,101,120,116,63,51,55,50,41,0,0,0,0,0,0,0};static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,36),40,100,101,102,45,102,105,110,51,54,56,32,37,105,110,105,116,51,54,49,51,56,52,32,37,101,120,116,63,51,54,50,51,56,53,41,0,0,0,0};static C_char C_TLS li66[] C_aligned={C_lihdr(0,0,25),40,100,101,102,45,101,120,116,63,51,54,55,32,37,105,110,105,116,51,54,49,51,56,55,41,0,0,0,0,0,0,0};static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,13),40,100,101,102,45,105,110,105,116,51,54,54,41,0,0,0};static C_char C_TLS li68[] C_aligned={C_lihdr(0,0,33),40,109,97,107,101,45,115,51,50,118,101,99,116,111,114,32,108,101,110,51,53,57,32,46,32,103,51,53,56,51,54,48,41,0,0,0,0,0,0,0};static C_char C_TLS li69[] C_aligned={C_lihdr(0,0,12),40,100,111,52,49,50,32,105,52,49,52,41,0,0,0,0};static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,25),40,98,111,100,121,52,48,49,32,105,110,105,116,52,48,56,32,101,120,116,63,52,48,57,41,0,0,0,0,0,0,0};static C_char C_TLS li71[] C_aligned={C_lihdr(0,0,36),40,100,101,102,45,102,105,110,52,48,53,32,37,105,110,105,116,51,57,56,52,50,50,32,37,101,120,116,63,51,57,57,52,50,51,41,0,0,0,0};static C_char C_TLS li72[] C_aligned={C_lihdr(0,0,25),40,100,101,102,45,101,120,116,63,52,48,52,32,37,105,110,105,116,51,57,56,52,50,53,41,0,0,0,0,0,0,0};static C_char C_TLS li73[] C_aligned={C_lihdr(0,0,13),40,100,101,102,45,105,110,105,116,52,48,51,41,0,0,0};static C_char C_TLS li74[] C_aligned={C_lihdr(0,0,33),40,109,97,107,101,45,102,51,50,118,101,99,116,111,114,32,108,101,110,51,57,54,32,46,32,103,51,57,53,51,57,55,41,0,0,0,0,0,0,0};static C_char C_TLS li75[] C_aligned={C_lihdr(0,0,12),40,100,111,52,53,48,32,105,52,53,50,41,0,0,0,0};static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,25),40,98,111,100,121,52,51,57,32,105,110,105,116,52,52,54,32,101,120,116,63,52,52,55,41,0,0,0,0,0,0,0};static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,36),40,100,101,102,45,102,105,110,52,52,51,32,37,105,110,105,116,52,51,54,52,54,48,32,37,101,120,116,63,52,51,55,52,54,49,41,0,0,0,0};static C_char C_TLS li78[] C_aligned={C_lihdr(0,0,25),40,100,101,102,45,101,120,116,63,52,52,50,32,37,105,110,105,116,52,51,54,52,54,51,41,0,0,0,0,0,0,0};static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,13),40,100,101,102,45,105,110,105,116,52,52,49,41,0,0,0};static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,33),40,109,97,107,101,45,102,54,52,118,101,99,116,111,114,32,108,101,110,52,51,52,32,46,32,103,52,51,51,52,51,53,41,0,0,0,0,0,0,0};static C_char C_TLS li81[] C_aligned={C_lihdr(0,0,17),40,100,111,52,56,54,32,112,52,56,56,32,105,52,56,57,41,0,0,0,0,0,0,0};static C_char C_TLS li82[] C_aligned={C_lihdr(0,0,15),40,102,95,50,50,49,53,32,108,115,116,52,56,51,41,0};static C_char C_TLS li83[] C_aligned={C_lihdr(0,0,28),40,105,110,105,116,32,109,97,107,101,52,56,48,32,115,101,116,52,56,49,32,108,111,99,52,56,50,41,0,0,0,0};static C_char C_TLS li84[] C_aligned={C_lihdr(0,0,18),40,117,56,118,101,99,116,111,114,32,46,32,120,115,53,48,50,41,0,0,0,0,0,0};static C_char C_TLS li85[] C_aligned={C_lihdr(0,0,18),40,115,56,118,101,99,116,111,114,32,46,32,120,115,53,48,52,41,0,0,0,0,0,0};static C_char C_TLS li86[] C_aligned={C_lihdr(0,0,19),40,117,49,54,118,101,99,116,111,114,32,46,32,120,115,53,48,54,41,0,0,0,0,0};static C_char C_TLS li87[] C_aligned={C_lihdr(0,0,19),40,115,49,54,118,101,99,116,111,114,32,46,32,120,115,53,48,56,41,0,0,0,0,0};static C_char C_TLS li88[] C_aligned={C_lihdr(0,0,19),40,117,51,50,118,101,99,116,111,114,32,46,32,120,115,53,49,48,41,0,0,0,0,0};static C_char C_TLS li89[] C_aligned={C_lihdr(0,0,19),40,115,51,50,118,101,99,116,111,114,32,46,32,120,115,53,49,50,41,0,0,0,0,0};static C_char C_TLS li90[] C_aligned={C_lihdr(0,0,19),40,102,51,50,118,101,99,116,111,114,32,46,32,120,115,53,49,52,41,0,0,0,0,0};static C_char C_TLS li91[] C_aligned={C_lihdr(0,0,19),40,102,54,52,118,101,99,116,111,114,32,46,32,120,115,53,49,54,41,0,0,0,0,0};static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,11),40,108,111,111,112,32,105,53,50,52,41,0,0,0,0,0};static C_char C_TLS li93[] C_aligned={C_lihdr(0,0,13),40,102,95,50,51,51,51,32,118,53,50,49,41,0,0,0};static C_char C_TLS li94[] C_aligned={C_lihdr(0,0,23),40,105,110,105,116,32,108,101,110,103,116,104,53,49,57,32,114,101,102,53,50,48,41,0};static C_char C_TLS li95[] C_aligned={C_lihdr(0,0,16),40,117,56,118,101,99,116,111,114,63,32,120,53,51,52,41};static C_char C_TLS li96[] C_aligned={C_lihdr(0,0,16),40,115,56,118,101,99,116,111,114,63,32,120,53,51,53,41};static C_char C_TLS li97[] C_aligned={C_lihdr(0,0,17),40,117,49,54,118,101,99,116,111,114,63,32,120,53,51,54,41,0,0,0,0,0,0,0};static C_char C_TLS li98[] C_aligned={C_lihdr(0,0,17),40,115,49,54,118,101,99,116,111,114,63,32,120,53,51,55,41,0,0,0,0,0,0,0};static C_char C_TLS li99[] C_aligned={C_lihdr(0,0,17),40,117,51,50,118,101,99,116,111,114,63,32,120,53,51,56,41,0,0,0,0,0,0,0};static C_char C_TLS li100[] C_aligned={C_lihdr(0,0,17),40,115,51,50,118,101,99,116,111,114,63,32,120,53,51,57,41,0,0,0,0,0,0,0};static C_char C_TLS li101[] C_aligned={C_lihdr(0,0,17),40,102,51,50,118,101,99,116,111,114,63,32,120,53,52,48,41,0,0,0,0,0,0,0};static C_char C_TLS li102[] C_aligned={C_lihdr(0,0,17),40,102,54,52,118,101,99,116,111,114,63,32,120,53,52,49,41,0,0,0,0,0,0,0};static C_char C_TLS li103[] C_aligned={C_lihdr(0,0,13),40,102,95,50,52,52,56,32,118,53,52,56,41,0,0,0};static C_char C_TLS li104[] C_aligned={C_lihdr(0,0,20),40,112,97,99,107,32,116,97,103,53,52,54,32,108,111,99,53,52,55,41,0,0,0,0};static C_char C_TLS li105[] C_aligned={C_lihdr(0,0,13),40,102,95,50,52,53,57,32,118,53,53,50,41,0,0,0};static C_char C_TLS li106[] C_aligned={C_lihdr(0,0,25),40,112,97,99,107,45,99,111,112,121,32,116,97,103,53,53,48,32,108,111,99,53,53,49,41,0,0,0,0,0,0,0};static C_char C_TLS li107[] C_aligned={C_lihdr(0,0,15),40,102,95,50,52,55,55,32,115,116,114,53,53,57,41,0};static C_char C_TLS li108[] C_aligned={C_lihdr(0,0,28),40,117,110,112,97,99,107,32,116,97,103,53,53,54,32,115,122,53,53,55,32,108,111,99,53,53,56,41,0,0,0,0};static C_char C_TLS li109[] C_aligned={C_lihdr(0,0,15),40,102,95,50,53,48,54,32,115,116,114,53,54,55,41,0};static C_char C_TLS li110[] C_aligned={C_lihdr(0,0,33),40,117,110,112,97,99,107,45,99,111,112,121,32,116,97,103,53,54,52,32,115,122,53,54,53,32,108,111,99,53,54,54,41,0,0,0,0,0,0,0};static C_char C_TLS li111[] C_aligned={C_lihdr(0,0,38),40,35,35,115,121,115,35,117,115,101,114,45,114,101,97,100,45,104,111,111,107,32,99,104,97,114,54,50,55,32,112,111,114,116,54,50,56,41,0,0};static C_char C_TLS li112[] C_aligned={C_lihdr(0,0,48),40,35,35,115,121,115,35,117,115,101,114,45,112,114,105,110,116,45,104,111,111,107,32,120,54,51,55,32,114,101,97,100,97,98,108,101,54,51,56,32,112,111,114,116,54,51,57,41};static C_char C_TLS li113[] C_aligned={C_lihdr(0,0,48),40,115,117,98,118,101,99,116,111,114,32,118,54,52,51,32,116,54,52,52,32,101,115,54,52,53,32,102,114,111,109,54,52,54,32,116,111,54,52,55,32,108,111,99,54,52,56,41};static C_char C_TLS li114[] C_aligned={C_lihdr(0,0,32),40,115,117,98,117,56,118,101,99,116,111,114,32,118,54,54,48,32,102,114,111,109,54,54,49,32,116,111,54,54,50,41};static C_char C_TLS li115[] C_aligned={C_lihdr(0,0,33),40,115,117,98,117,49,54,118,101,99,116,111,114,32,118,54,54,51,32,102,114,111,109,54,54,52,32,116,111,54,54,53,41,0,0,0,0,0,0,0};static C_char C_TLS li116[] C_aligned={C_lihdr(0,0,33),40,115,117,98,117,51,50,118,101,99,116,111,114,32,118,54,54,54,32,102,114,111,109,54,54,55,32,116,111,54,54,56,41,0,0,0,0,0,0,0};static C_char C_TLS li117[] C_aligned={C_lihdr(0,0,32),40,115,117,98,115,56,118,101,99,116,111,114,32,118,54,54,57,32,102,114,111,109,54,55,48,32,116,111,54,55,49,41};static C_char C_TLS li118[] C_aligned={C_lihdr(0,0,33),40,115,117,98,115,49,54,118,101,99,116,111,114,32,118,54,55,50,32,102,114,111,109,54,55,51,32,116,111,54,55,52,41,0,0,0,0,0,0,0};static C_char C_TLS li119[] C_aligned={C_lihdr(0,0,33),40,115,117,98,115,51,50,118,101,99,116,111,114,32,118,54,55,53,32,102,114,111,109,54,55,54,32,116,111,54,55,55,41,0,0,0,0,0,0,0};static C_char C_TLS li120[] C_aligned={C_lihdr(0,0,33),40,115,117,98,102,51,50,118,101,99,116,111,114,32,118,54,55,56,32,102,114,111,109,54,55,57,32,116,111,54,56,48,41,0,0,0,0,0,0,0};static C_char C_TLS li121[] C_aligned={C_lihdr(0,0,33),40,115,117,98,102,54,52,118,101,99,116,111,114,32,118,54,56,49,32,102,114,111,109,54,56,50,32,116,111,54,56,51,41,0,0,0,0,0,0,0};static C_char C_TLS li122[] C_aligned={C_lihdr(0,0,12),40,100,111,55,48,49,32,105,55,48,51,41,0,0,0,0};static C_char C_TLS li123[] C_aligned={C_lihdr(0,0,31),40,98,111,100,121,54,57,48,32,112,111,114,116,54,57,55,32,102,114,111,109,54,57,56,32,116,111,54,57,57,41,0};static C_char C_TLS li124[] C_aligned={C_lihdr(0,0,35),40,100,101,102,45,116,111,54,57,52,32,37,112,111,114,116,54,56,55,55,48,57,32,37,102,114,111,109,54,56,56,55,49,48,41,0,0,0,0,0};static C_char C_TLS li125[] C_aligned={C_lihdr(0,0,25),40,100,101,102,45,102,114,111,109,54,57,51,32,37,112,111,114,116,54,56,55,55,49,50,41,0,0,0,0,0,0,0};static C_char C_TLS li126[] C_aligned={C_lihdr(0,0,13),40,100,101,102,45,112,111,114,116,54,57,50,41,0,0,0};static C_char C_TLS li127[] C_aligned={C_lihdr(0,0,31),40,119,114,105,116,101,45,117,56,118,101,99,116,111,114,32,118,54,56,53,32,46,32,103,54,56,52,54,56,54,41,0};static C_char C_TLS li128[] C_aligned={C_lihdr(0,0,26),40,98,111,100,121,55,50,54,32,112,111,114,116,55,51,50,32,115,116,97,114,116,55,51,51,41,0,0,0,0,0,0};static C_char C_TLS li129[] C_aligned={C_lihdr(0,0,26),40,100,101,102,45,115,116,97,114,116,55,50,57,32,37,112,111,114,116,55,50,52,55,52,49,41,0,0,0,0,0,0};static C_char C_TLS li130[] C_aligned={C_lihdr(0,0,13),40,100,101,102,45,112,111,114,116,55,50,56,41,0,0,0};static C_char C_TLS li131[] C_aligned={C_lihdr(0,0,39),40,114,101,97,100,45,117,56,118,101,99,116,111,114,33,32,110,55,50,49,32,100,101,115,116,55,50,50,32,46,32,103,55,50,48,55,50,51,41,0};static C_char C_TLS li132[] C_aligned={C_lihdr(0,0,18),40,119,114,97,112,32,115,116,114,55,53,48,32,110,55,53,49,41,0,0,0,0,0,0};static C_char C_TLS li133[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};static C_char C_TLS li134[] C_aligned={C_lihdr(0,0,19),40,98,111,100,121,55,53,57,32,110,55,54,53,32,112,55,54,54,41,0,0,0,0,0};static C_char C_TLS li135[] C_aligned={C_lihdr(0,0,19),40,100,101,102,45,112,55,54,50,32,37,110,55,53,55,55,56,48,41,0,0,0,0,0};static C_char C_TLS li136[] C_aligned={C_lihdr(0,0,10),40,100,101,102,45,110,55,54,49,41,0,0,0,0,0,0};static C_char C_TLS li137[] C_aligned={C_lihdr(0,0,25),40,114,101,97,100,45,117,56,118,101,99,116,111,114,32,46,32,103,55,53,53,55,53,54,41,0,0,0,0,0,0,0};static C_char C_TLS li138[] C_aligned={C_lihdr(0,0,10),40,116,111,112,108,101,118,101,108,41,0,0,0,0,0,0};/* from ext-free in k1185 in k1181 in k1177 in k1173 in k1169 in k1165 in k1161 in k1157 in k1153 in k1149 in k1137 in k1133 in k1129 in k1125 in k977 in k973 in k969 in k965 in k961 in k957 in k953 in k949 */#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockendstatic C_word C_fcall stub158(C_word C_buf,C_word C_a0) C_regparm;C_regparm static C_word C_fcall stub158(C_word C_buf,C_word C_a0){C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;C_word bv=(C_word )(C_a0);C_free((void *)C_block_item(bv, 1));C_ret:#undef returnreturn C_r;}/* from k1191 */#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockendstatic C_word C_fcall stub153(C_word C_buf,C_word C_a0) C_regparm;C_regparm static C_word C_fcall stub153(C_word C_buf,C_word C_a0){C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;int bytes=(int )C_unfix(C_a0);C_word *buf = (C_word *)C_malloc(bytes + sizeof(C_header));if(buf == NULL) return(C_SCHEME_FALSE);C_block_header(buf) = C_make_header(C_BYTEVECTOR_TYPE, bytes);return(buf);C_ret:#undef returnreturn C_r;}C_noret_decl(C_srfi_4_toplevel)C_externexport void C_ccall C_srfi_4_toplevel(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_951)static void C_ccall f_951(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_955)static void C_ccall f_955(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_959)static void C_ccall f_959(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_963)static void C_ccall f_963(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_967)static void C_ccall f_967(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_971)static void C_ccall f_971(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_975)static void C_ccall f_975(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_979)static void C_ccall f_979(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_1127)static void C_ccall f_1127(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_1131)static void C_ccall f_1131(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_1135)static void C_ccall f_1135(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_1139)static void C_ccall f_1139(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_1151)static void C_ccall f_1151(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_1155)static void C_ccall f_1155(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_3322)static void C_ccall f_3322(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_1159)static void C_ccall f_1159(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_3318)static void C_ccall f_3318(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_1163)static void C_ccall f_1163(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_3314)static void C_ccall f_3314(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_1167)static void C_ccall f_1167(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_3310)static void C_ccall f_3310(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_1171)static void C_ccall f_1171(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_3306)static void C_ccall f_3306(C_word c,C_word t0,C_word t1) C_noret;C_noret_decl(f_1175)static void C_ccall f_1175(C_word c,C_word t0,C_word t1) C_noret;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -