Welcome, guest! Login / Register - Why register?
Psst.. new poll here.
[email protected] webmail now available. Want one? Go here.
Cannot use outlook/hotmail/live here to register as they blocking our mail servers. #microsoftdeez
Obey the Epel!

Paste

Pasted as C by pscat ( 13 years ago )
#ifdef ECL_DYNAMIC_VV
static cl_object *VV;
#else
static cl_object VV[VM];
#endif

#ifdef __cplusplus
extern "C" {
#endif
static cl_object L2in_koi_7(cl_object );
#define VT2 cl_object T0;
#define VLEX2 volatile cl_object lex0[4];
#define CLSR2
#define STCK2
static cl_object LC1leter_iter(volatile cl_object  *, cl_object , cl_object );
#define VT3 cl_object T0,T1;
#define VLEX3
#define CLSR3
#define STCK3
static cl_object L3in_bin_koi_7(cl_object );
#define VT4 cl_object T0,T1;
#define VLEX4
#define CLSR4
#define STCK4
static cl_object L4hex_str__bin(cl_object );
#define VT5
#define VLEX5
#define CLSR5
#define STCK5
static cl_object L5list_of_pairs__list_of_string(cl_object );
#define VT6 cl_object T0,T1,T2,T3;
#define VLEX6
#define CLSR6
#define STCK6
static cl_object L6in_string(cl_object );
#define VT7
#define VLEX7
#define CLSR7
#define STCK7
static cl_object L7xor_lists_of_bin_str(cl_object , cl_object );
#define VT8 cl_object T0,T1;
#define VLEX8
#define CLSR8
#define STCK8
static cl_object L8xor_bit_str(cl_narg, cl_object , cl_object , ...);
#define VT9 cl_object T0,T1,T2;
#define VLEX9
#define CLSR9
#define STCK9
static cl_object L9xor(cl_object , cl_object );
#define VT10
#define VLEX10
#define CLSR10
#define STCK10
static cl_object L14start_gui();
#define VT11 cl_object T0;
#define VLEX11
#define CLSR11
#define STCK11 cl_object env0; cl_object CLV0,CLV1,CLV2,CLV3,CLV4,CLV5,CLV6,CLV7,CLV8;
static cl_object LC10__g20(cl_narg, ...);
#define VT12
#define VLEX12
#define CLSR12
#define STCK12 cl_object CLV0,CLV1,CLV2,CLV3,CLV4,CLV5,CLV6,CLV7,CLV8;
static cl_object LC11__g21(cl_narg, ...);
#define VT13
#define VLEX13
#define CLSR13
#define STCK13 cl_object CLV0,CLV1,CLV2,CLV3,CLV4,CLV5,CLV6,CLV7,CLV8;
static cl_object LC12__g22(cl_narg, ...);
#define VT14
#define VLEX14
#define CLSR14
#define STCK14 cl_object CLV0,CLV1,CLV2,CLV3,CLV4,CLV5,CLV6,CLV7,CLV8;
static cl_object LC13__g23(cl_narg, ...);
#define VT15
#define VLEX15
#define CLSR15
#define STCK15 cl_object CLV0,CLV1,CLV2,CLV3,CLV4,CLV5,CLV6,CLV7,CLV8;
static cl_object L15set_lisp_logo(cl_object );
#define VT16 cl_object T0,T1,T2;
#define VLEX16
#define CLSR16
#define STCK16
static cl_object L16update_symbols_and_bit_counts(cl_object , cl_object , cl_object );
#define VT17 cl_object T0;
#define VLEX17
#define CLSR17
#define STCK17
static cl_object L17update_lcd(cl_object , cl_object );
#define VT18
#define VLEX18
#define CLSR18
#define STCK18
static cl_object L18update_text_edit_from_in_koi_7(cl_object , cl_object );
#define VT19 cl_object T0,T1,T2;
#define VLEX19
#define CLSR19
#define STCK19
static cl_object L19update_xor(cl_object , cl_object , cl_object );
#define VT20 cl_object T0,T1,T2;
#define VLEX20
#define CLSR20
#define STCK20
#define VT1
#define VLEX1
#define CLSR1
#define STCK1
static cl_object Cblock;
#define VM1 0
#define VM20 3
#define VM19 3
#define VM18 0
#define VM17 1
#define VM16 3
#define VM15 0
#define VM14 0
#define VM13 0
#define VM12 0
#define VM11 1
#define VM10 0
#define VM9 3
#define VM8 2
#define VM7 0
#define VM6 4
#define VM5 0
#define VM4 2
#define VM3 2
#define VM2 1
#define VM 78
#define VMtemp 5
#ifdef __cplusplus
}
#endif
/*
 * Exported Lisp functions
 */
#define compiler_cfuns_size 14
static const struct ecl_cfun compiler_cfuns[] = {
 /*t,m,narg,padding,name,block,entry*/
{0,0,1,0,MAKE_FIXNUM(52),MAKE_FIXNUM(5),(cl_objectfn)L2in_koi_7,Cnil,MAKE_FIXNUM(468)},
{0,0,1,0,MAKE_FIXNUM(54),MAKE_FIXNUM(6),(cl_objectfn)L3in_bin_koi_7,Cnil,MAKE_FIXNUM(1566)},
{0,0,1,0,MAKE_FIXNUM(55),MAKE_FIXNUM(7),(cl_objectfn)L4hex_str__bin,Cnil,MAKE_FIXNUM(1686)},
{0,0,1,0,MAKE_FIXNUM(56),MAKE_FIXNUM(9),(cl_objectfn)L5list_of_pairs__list_of_string,Cnil,MAKE_FIXNUM(1844)},
{0,0,1,0,MAKE_FIXNUM(57),MAKE_FIXNUM(11),(cl_objectfn)L6in_string,Cnil,MAKE_FIXNUM(1981)},
{0,0,2,0,MAKE_FIXNUM(58),MAKE_FIXNUM(12),(cl_objectfn)L7xor_lists_of_bin_str,Cnil,MAKE_FIXNUM(2118)},
{0,0,-1,0,MAKE_FIXNUM(59),MAKE_FIXNUM(14),(cl_objectfn)L8xor_bit_str,Cnil,MAKE_FIXNUM(2186)},
{0,0,2,0,MAKE_FIXNUM(60),MAKE_FIXNUM(15),(cl_objectfn)L9xor,Cnil,MAKE_FIXNUM(2655)},
{0,0,0,0,MAKE_FIXNUM(62),MAKE_FIXNUM(32),(cl_objectfn)L14start_gui,Cnil,MAKE_FIXNUM(2864)},
{0,0,1,0,MAKE_FIXNUM(71),MAKE_FIXNUM(39),(cl_objectfn)L15set_lisp_logo,Cnil,MAKE_FIXNUM(4554)},
{0,0,3,0,MAKE_FIXNUM(74),MAKE_FIXNUM(41),(cl_objectfn)L16update_symbols_and_bit_counts,Cnil,MAKE_FIXNUM(4772)},
{0,0,2,0,MAKE_FIXNUM(75),MAKE_FIXNUM(43),(cl_objectfn)L17update_lcd,Cnil,MAKE_FIXNUM(5008)},
{0,0,2,0,MAKE_FIXNUM(76),MAKE_FIXNUM(44),(cl_objectfn)L18update_text_edit_from_in_koi_7,Cnil,MAKE_FIXNUM(5070)},
{0,0,3,0,MAKE_FIXNUM(77),MAKE_FIXNUM(50),(cl_objectfn)L19update_xor,Cnil,MAKE_FIXNUM(5221)},
};

 

Revise this Paste

Your Name: Code Language: