23 |
goto T6;} |
goto T6;} |
24 |
if(endp(cddr((V2)))){ |
if(endp(cddr((V2)))){ |
25 |
goto T6;} |
goto T6;} |
26 |
V5 = make_fixnum(length((V2))); |
V5 = make_fixnum((long)length((V2))); |
27 |
(void)((*(LnkLI210))(VV[0],small_fixnum(2),V5)); |
(void)((*(LnkLI210))(VV[0],small_fixnum(2),V5)); |
28 |
goto T6; |
goto T6; |
29 |
T6:; |
T6:; |
38 |
T12:; |
T12:; |
39 |
if(!(type_of(car((V2)))==t_string)){ |
if(!(type_of(car((V2)))==t_string)){ |
40 |
goto T19;} |
goto T19;} |
41 |
V6 = make_fixnum(length(car((V2)))); |
V6 = make_fixnum((long)length(car((V2)))); |
42 |
if(number_compare(V6,symbol_value(VV[1]))<=0){ |
if(number_compare(V6,symbol_value(VV[1]))<=0){ |
43 |
goto T18;} |
goto T18;} |
44 |
goto T19; |
goto T19; |
116 |
goto T36; |
goto T36; |
117 |
goto T38; |
goto T38; |
118 |
T38:; |
T38:; |
119 |
if(!((length((V17)))==(1))){ |
if(!(((long)length((V17)))==(1))){ |
120 |
goto T55;} |
goto T55;} |
121 |
princ_str("\n princ_char(",VV[7]); |
princ_str("\n princ_char(",VV[7]); |
122 |
base[0]= aref1((V17),0); |
base[0]= aref1((V17),0); |
143 |
princ_str("\n princ_str(\"",VV[7]); |
princ_str("\n princ_str(\"",VV[7]); |
144 |
{register long V22; |
{register long V22; |
145 |
register long V23; |
register long V23; |
146 |
V22= length((V17)); |
V22= (long)length((V17)); |
147 |
V23= 0; |
V23= 0; |
148 |
goto T77; |
goto T77; |
149 |
T77:; |
T77:; |
190 |
(void)((*(LnkLI213))((V24)));} |
(void)((*(LnkLI213))((V24)));} |
191 |
goto T82; |
goto T82; |
192 |
T82:; |
T82:; |
193 |
V23= (V23)+1; |
V23= (long)(V23)+1; |
194 |
goto T77;} |
goto T77;} |
195 |
goto T73; |
goto T73; |
196 |
T73:; |
T73:; |
252 |
goto T126;} |
goto T126;} |
253 |
if(endp(cdr((V33)))){ |
if(endp(cdr((V33)))){ |
254 |
goto T126;} |
goto T126;} |
255 |
V36 = make_fixnum(length((V33))); |
V36 = make_fixnum((long)length((V33))); |
256 |
(void)((*(LnkLI210))(VV[11],small_fixnum(1),V36)); |
(void)((*(LnkLI210))(VV[11],small_fixnum(1),V36)); |
257 |
goto T126; |
goto T126; |
258 |
T126:; |
T126:; |
314 |
goto T148;} |
goto T148;} |
315 |
goto T149; |
goto T149; |
316 |
T149:; |
T149:; |
317 |
V45 = make_fixnum(length((V43))); |
V45 = make_fixnum((long)length((V43))); |
318 |
(void)((*(LnkLI209))(VV[18],small_fixnum(2),V45)); |
(void)((*(LnkLI209))(VV[18],small_fixnum(2),V45)); |
319 |
goto T148; |
goto T148; |
320 |
T148:; |
T148:; |
557 |
T295:; |
T295:; |
558 |
(void)((*(LnkLI213))(V96)); |
(void)((*(LnkLI213))(V96)); |
559 |
princ_char(40,VV[7]); |
princ_char(40,VV[7]); |
560 |
V97 = make_fixnum(length((V93))); |
V97 = make_fixnum((long)length((V93))); |
561 |
(void)((*(LnkLI213))(V97)); |
(void)((*(LnkLI213))(V97)); |
562 |
princ_char(44,VV[7]); |
princ_char(44,VV[7]); |
563 |
(void)((*(LnkLI227))((V92),Cnil)); |
(void)((*(LnkLI227))((V92),Cnil)); |
614 |
goto T340; |
goto T340; |
615 |
T340:; |
T340:; |
616 |
princ_char(40,VV[7]); |
princ_char(40,VV[7]); |
617 |
V106= (V106)+1; |
V106= (long)(V106)+1; |
618 |
goto T339;} |
goto T339;} |
619 |
goto T335; |
goto T335; |
620 |
T335:; |
T335:; |
631 |
goto T355; |
goto T355; |
632 |
T355:; |
T355:; |
633 |
princ_str("\n )->c.c_cdr",VV[7]); |
princ_str("\n )->c.c_cdr",VV[7]); |
634 |
V108= (V108)+1; |
V108= (long)(V108)+1; |
635 |
goto T354;} |
goto T354;} |
636 |
goto T350; |
goto T350; |
637 |
T350:; |
T350:; |
655 |
goto T375; |
goto T375; |
656 |
T375:; |
T375:; |
657 |
princ_char(40,VV[7]); |
princ_char(40,VV[7]); |
658 |
V111= (V111)+1; |
V111= (long)(V111)+1; |
659 |
goto T374;} |
goto T374;} |
660 |
goto T370; |
goto T370; |
661 |
T370:; |
T370:; |
672 |
goto T390; |
goto T390; |
673 |
T390:; |
T390:; |
674 |
princ_str("\n )->c.c_cdr",VV[7]); |
princ_str("\n )->c.c_cdr",VV[7]); |
675 |
V113= (V113)+1; |
V113= (long)(V113)+1; |
676 |
goto T389;} |
goto T389;} |
677 |
goto T385; |
goto T385; |
678 |
T385:; |
T385:; |
679 |
princ_str(")->c.c_car;",VV[7]); |
princ_str(")->c.c_car;",VV[7]); |
680 |
V102= (V102)+1; |
V102= (long)(V102)+1; |
681 |
V103= cdr((V103)); |
V103= cdr((V103)); |
682 |
goto T325;} |
goto T325;} |
683 |
goto T322; |
goto T322; |
754 |
goto T433;} |
goto T433;} |
755 |
goto T434; |
goto T434; |
756 |
T434:; |
T434:; |
757 |
V124 = make_fixnum(length((V122))); |
V124 = make_fixnum((long)length((V122))); |
758 |
(void)((*(LnkLI209))(VV[41],small_fixnum(2),V124)); |
(void)((*(LnkLI209))(VV[41],small_fixnum(2),V124)); |
759 |
goto T433; |
goto T433; |
760 |
T433:; |
T433:; |
761 |
if(endp(cddr((V122)))){ |
if(endp(cddr((V122)))){ |
762 |
goto T438;} |
goto T438;} |
763 |
V125 = make_fixnum(length((V122))); |
V125 = make_fixnum((long)length((V122))); |
764 |
(void)((*(LnkLI210))(VV[41],small_fixnum(2),V125)); |
(void)((*(LnkLI210))(VV[41],small_fixnum(2),V125)); |
765 |
goto T438; |
goto T438; |
766 |
T438:; |
T438:; |
821 |
goto T462;} |
goto T462;} |
822 |
goto T463; |
goto T463; |
823 |
T463:; |
T463:; |
824 |
V133 = make_fixnum(length((V131))); |
V133 = make_fixnum((long)length((V131))); |
825 |
(void)((*(LnkLI209))(VV[44],small_fixnum(2),V133)); |
(void)((*(LnkLI209))(VV[44],small_fixnum(2),V133)); |
826 |
goto T462; |
goto T462; |
827 |
T462:; |
T462:; |
828 |
if(endp(cddr((V131)))){ |
if(endp(cddr((V131)))){ |
829 |
goto T467;} |
goto T467;} |
830 |
V134 = make_fixnum(length((V131))); |
V134 = make_fixnum((long)length((V131))); |
831 |
(void)((*(LnkLI210))(VV[44],small_fixnum(2),V134)); |
(void)((*(LnkLI210))(VV[44],small_fixnum(2),V134)); |
832 |
goto T467; |
goto T467; |
833 |
T467:; |
T467:; |
888 |
goto T491;} |
goto T491;} |
889 |
goto T492; |
goto T492; |
890 |
T492:; |
T492:; |
891 |
V142 = make_fixnum(length((V140))); |
V142 = make_fixnum((long)length((V140))); |
892 |
(void)((*(LnkLI209))(VV[46],small_fixnum(2),V142)); |
(void)((*(LnkLI209))(VV[46],small_fixnum(2),V142)); |
893 |
goto T491; |
goto T491; |
894 |
T491:; |
T491:; |
895 |
if(endp(cddr((V140)))){ |
if(endp(cddr((V140)))){ |
896 |
goto T496;} |
goto T496;} |
897 |
V143 = make_fixnum(length((V140))); |
V143 = make_fixnum((long)length((V140))); |
898 |
(void)((*(LnkLI210))(VV[46],small_fixnum(2),V143)); |
(void)((*(LnkLI210))(VV[46],small_fixnum(2),V143)); |
899 |
goto T496; |
goto T496; |
900 |
T496:; |
T496:; |
920 |
goto T500;} |
goto T500;} |
921 |
goto T501; |
goto T501; |
922 |
T501:; |
T501:; |
923 |
V149 = make_fixnum(length((V147))); |
V149 = make_fixnum((long)length((V147))); |
924 |
(void)((*(LnkLI209))(VV[49],small_fixnum(2),V149)); |
(void)((*(LnkLI209))(VV[49],small_fixnum(2),V149)); |
925 |
goto T500; |
goto T500; |
926 |
T500:; |
T500:; |
932 |
T506:; |
T506:; |
933 |
if(!((caddr((V147)))==(VV[51]))){ |
if(!((caddr((V147)))==(VV[51]))){ |
934 |
goto T509;} |
goto T509;} |
935 |
if(!((length((V147)))==(4))){ |
if(!(((long)length((V147)))==(4))){ |
936 |
goto T509;} |
goto T509;} |
937 |
{register object x= cadddr((V147)),V151= VV[52]; |
{register object x= cadddr((V147)),V151= VV[52]; |
938 |
while(!endp(V151)) |
while(!endp(V151)) |
1054 |
goto T569;} |
goto T569;} |
1055 |
goto T570; |
goto T570; |
1056 |
T570:; |
T570:; |
1057 |
V167 = make_fixnum(length((V165))); |
V167 = make_fixnum((long)length((V165))); |
1058 |
(void)((*(LnkLI209))(VV[57],small_fixnum(2),V167)); |
(void)((*(LnkLI209))(VV[57],small_fixnum(2),V167)); |
1059 |
goto T569; |
goto T569; |
1060 |
T569:; |
T569:; |
1066 |
T575:; |
T575:; |
1067 |
if(!((caddr((V165)))==(VV[51]))){ |
if(!((caddr((V165)))==(VV[51]))){ |
1068 |
goto T578;} |
goto T578;} |
1069 |
if(!((length((V165)))==(4))){ |
if(!(((long)length((V165)))==(4))){ |
1070 |
goto T578;} |
goto T578;} |
1071 |
{register object x= cadddr((V165)),V169= VV[59]; |
{register object x= cadddr((V165)),V169= VV[59]; |
1072 |
while(!endp(V169)) |
while(!endp(V169)) |
1685 |
goto T775;} |
goto T775;} |
1686 |
goto T776; |
goto T776; |
1687 |
T776:; |
T776:; |
1688 |
V259 = make_fixnum(length((V257))); |
V259 = make_fixnum((long)length((V257))); |
1689 |
(void)((*(LnkLI209))(VV[102],small_fixnum(2),V259)); |
(void)((*(LnkLI209))(VV[102],small_fixnum(2),V259)); |
1690 |
goto T775; |
goto T775; |
1691 |
T775:; |
T775:; |
1693 |
goto T780;} |
goto T780;} |
1694 |
if(endp(cdddr((V257)))){ |
if(endp(cdddr((V257)))){ |
1695 |
goto T780;} |
goto T780;} |
1696 |
V260 = make_fixnum(length((V257))); |
V260 = make_fixnum((long)length((V257))); |
1697 |
(void)((*(LnkLI210))(VV[102],small_fixnum(3),V260)); |
(void)((*(LnkLI210))(VV[102],small_fixnum(3),V260)); |
1698 |
goto T780; |
goto T780; |
1699 |
T780:; |
T780:; |
2131 |
V322= list(2,(V319),(V317)); |
V322= list(2,(V319),(V317)); |
2132 |
V323= make_cons(/* INLINE-ARGS */V322,Cnil); |
V323= make_cons(/* INLINE-ARGS */V322,Cnil); |
2133 |
V324= list(2,VV[135],(V319)); |
V324= list(2,VV[135],(V319)); |
2134 |
if(!((length((V320)))<(3))){ |
if(!(((long)length((V320)))<(3))){ |
2135 |
goto T958;} |
goto T958;} |
2136 |
{object V327; |
{object V327; |
2137 |
object V328= (V320); |
object V328= (V320); |
2268 |
goto T978; |
goto T978; |
2269 |
goto T983; |
goto T983; |
2270 |
T983:; |
T983:; |
2271 |
if((length(cdar((V355))))==(2)){ |
if(((long)length(cdar((V355))))==(2)){ |
2272 |
goto T985;} |
goto T985;} |
2273 |
V356= Cnil; |
V356= Cnil; |
2274 |
goto T978; |
goto T978; |
2303 |
goto TTL; |
goto TTL; |
2304 |
TTL:; |
TTL:; |
2305 |
{register object V365; |
{register object V365; |
2306 |
if((length((V364)))==(2)){ |
if(((long)length((V364)))==(2)){ |
2307 |
goto T994;} |
goto T994;} |
2308 |
V365= Cnil; |
V365= Cnil; |
2309 |
goto T993; |
goto T993; |
2570 |
goto T1047;} |
goto T1047;} |
2571 |
goto T1048; |
goto T1048; |
2572 |
T1048:; |
T1048:; |
2573 |
V400 = make_fixnum(length((V398))); |
V400 = make_fixnum((long)length((V398))); |
2574 |
(void)((*(LnkLI209))(VV[151],small_fixnum(3),V400)); |
(void)((*(LnkLI209))(VV[151],small_fixnum(3),V400)); |
2575 |
goto T1047; |
goto T1047; |
2576 |
T1047:; |
T1047:; |
2577 |
if(endp(cdddr((V398)))){ |
if(endp(cdddr((V398)))){ |
2578 |
goto T1054;} |
goto T1054;} |
2579 |
V401 = make_fixnum(length((V398))); |
V401 = make_fixnum((long)length((V398))); |
2580 |
(void)((*(LnkLI209))(VV[151],small_fixnum(3),V401)); |
(void)((*(LnkLI209))(VV[151],small_fixnum(3),V401)); |
2581 |
goto T1054; |
goto T1054; |
2582 |
T1054:; |
T1054:; |
3130 |
goto TTL; |
goto TTL; |
3131 |
TTL:; |
TTL:; |
3132 |
{register object V549; |
{register object V549; |
3133 |
V549= Cnil;switch(length((V548))){ |
V549= Cnil;switch((long)length((V548))){ |
3134 |
case 2: |
case 2: |
3135 |
goto T1226; |
goto T1226; |
3136 |
T1226:; |
T1226:; |
3279 |
goto T1263;} |
goto T1263;} |
3280 |
goto T1264; |
goto T1264; |
3281 |
T1264:; |
T1264:; |
3282 |
V575 = make_fixnum(length((V573))); |
V575 = make_fixnum((long)length((V573))); |
3283 |
(void)((*(LnkLI209))(VV[151],small_fixnum(2),V575)); |
(void)((*(LnkLI209))(VV[151],small_fixnum(2),V575)); |
3284 |
goto T1263; |
goto T1263; |
3285 |
T1263:; |
T1263:; |
3286 |
if(endp(cddr((V573)))){ |
if(endp(cddr((V573)))){ |
3287 |
goto T1268;} |
goto T1268;} |
3288 |
V576 = make_fixnum(length((V573))); |
V576 = make_fixnum((long)length((V573))); |
3289 |
(void)((*(LnkLI209))(VV[151],small_fixnum(2),V576)); |
(void)((*(LnkLI209))(VV[151],small_fixnum(2),V576)); |
3290 |
goto T1268; |
goto T1268; |
3291 |
T1268:; |
T1268:; |
3348 |
goto T1296; |
goto T1296; |
3349 |
T1296:; |
T1296:; |
3350 |
princ_str("cdr(",VV[7]); |
princ_str("cdr(",VV[7]); |
3351 |
V588= (V588)+1; |
V588= (long)(V588)+1; |
3352 |
goto T1295;} |
goto T1295;} |
3353 |
goto T1291; |
goto T1291; |
3354 |
T1291:; |
T1291:; |
3365 |
goto T1312; |
goto T1312; |
3366 |
T1312:; |
T1312:; |
3367 |
princ_char(41,VV[7]); |
princ_char(41,VV[7]); |
3368 |
V590= (V590)+1; |
V590= (long)(V590)+1; |
3369 |
goto T1311;} |
goto T1311;} |
3370 |
goto T1307; |
goto T1307; |
3371 |
T1307:; |
T1307:; |
3395 |
goto T1340; |
goto T1340; |
3396 |
T1340:; |
T1340:; |
3397 |
princ_str("\n ->c.c_cdr",VV[7]); |
princ_str("\n ->c.c_cdr",VV[7]); |
3398 |
V592= (V592)+1; |
V592= (long)(V592)+1; |
3399 |
goto T1339;} |
goto T1339;} |
3400 |
goto T1335; |
goto T1335; |
3401 |
T1335:; |
T1335:; |
3468 |
return;} |
return;} |
3469 |
} |
} |
3470 |
} |
} |
3471 |
static object LnkTLI264(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[264],(void **)&LnkLI264,ap);} /* FIND */ |
static object LnkTLI264(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[264],(void **)&LnkLI264,ap);va_end(ap);return V1;} /* FIND */ |
3472 |
static object LnkTLI259(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[259],(void **)&LnkLI259,1,ap);} /* CMP-MACROEXPAND */ |
static object LnkTLI259(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[259],(void **)&LnkLI259,1,ap);va_end(ap);return V1;} /* CMP-MACROEXPAND */ |
3473 |
static void LnkT258(){ call_or_link(VV[258],(void **)&Lnk258);} /* CMP-EVAL */ |
static void LnkT258(){ call_or_link(VV[258],(void **)&Lnk258);} /* CMP-EVAL */ |
3474 |
static object LnkTLI257(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[257],(void **)&LnkLI257,1,ap);} /* CONSTANT-FOLD-P */ |
static object LnkTLI257(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[257],(void **)&LnkLI257,1,ap);va_end(ap);return V1;} /* CONSTANT-FOLD-P */ |
3475 |
static object LnkTLI250(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[250],(void **)&LnkLI250,2,ap);} /* CFAST-WRITE */ |
static object LnkTLI250(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[250],(void **)&LnkLI250,2,ap);va_end(ap);return V1;} /* CFAST-WRITE */ |
3476 |
static object LnkTLI249(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[249],(void **)&LnkLI249,2,ap);} /* FAST-READ */ |
static object LnkTLI249(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[249],(void **)&LnkLI249,2,ap);va_end(ap);return V1;} /* FAST-READ */ |
3477 |
static object LnkTLI248(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[248],(void **)&LnkLI248,1,ap);} /* CONS-TO-LISTA */ |
static object LnkTLI248(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[248],(void **)&LnkLI248,1,ap);va_end(ap);return V1;} /* CONS-TO-LISTA */ |
3478 |
static object LnkTLI247(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[247],(void **)&LnkLI247,1,ap);} /* NAME-SD1 */ |
static object LnkTLI247(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[247],(void **)&LnkLI247,1,ap);va_end(ap);return V1;} /* NAME-SD1 */ |
3479 |
static object LnkTLI246(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[246],(void **)&LnkLI246,1,ap);} /* GET-INCLUDED */ |
static object LnkTLI246(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[246],(void **)&LnkLI246,1,ap);va_end(ap);return V1;} /* GET-INCLUDED */ |
3480 |
static object LnkTLI245(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[245],(void **)&LnkLI245,2,ap);} /* STRUCT-TYPE-OPT */ |
static object LnkTLI245(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[245],(void **)&LnkLI245,2,ap);va_end(ap);return V1;} /* STRUCT-TYPE-OPT */ |
3481 |
static object LnkTLI244(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[244],(void **)&LnkLI244,1,ap);} /* NORMALIZE-TYPE */ |
static object LnkTLI244(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[244],(void **)&LnkLI244,1,ap);va_end(ap);return V1;} /* NORMALIZE-TYPE */ |
3482 |
static object LnkTLI243(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[243],(void **)&LnkLI243,ap);} /* POSITION */ |
static object LnkTLI243(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[243],(void **)&LnkLI243,ap);va_end(ap);return V1;} /* POSITION */ |
3483 |
static object LnkTLI242(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[242],(void **)&LnkLI242,1,ap);} /* BEST-ARRAY-ELEMENT-TYPE */ |
static object LnkTLI242(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[242],(void **)&LnkLI242,1,ap);va_end(ap);return V1;} /* BEST-ARRAY-ELEMENT-TYPE */ |
3484 |
static object LnkTLI241(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[241],(void **)&LnkLI241,1,ap);} /* TYPE-FILTER */ |
static object LnkTLI241(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[241],(void **)&LnkLI241,1,ap);va_end(ap);return V1;} /* TYPE-FILTER */ |
3485 |
static object LnkTLI240(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[240],(void **)&LnkLI240,1,ap);} /* REPLACE-CONSTANT */ |
static object LnkTLI240(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[240],(void **)&LnkLI240,1,ap);va_end(ap);return V1;} /* REPLACE-CONSTANT */ |
3486 |
static object LnkTLI239(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[239],(void **)&LnkLI239,1,ap);} /* RESULT-TYPE */ |
static object LnkTLI239(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[239],(void **)&LnkLI239,1,ap);va_end(ap);return V1;} /* RESULT-TYPE */ |
3487 |
static void LnkT238(){ call_or_link(VV[238],(void **)&Lnk238);} /* FIXNUMP */ |
static void LnkT238(){ call_or_link(VV[238],(void **)&Lnk238);} /* FIXNUMP */ |
3488 |
static void LnkT237(){ call_or_link(VV[237],(void **)&Lnk237);} /* SUBTYPEP */ |
static void LnkT237(){ call_or_link(VV[237],(void **)&Lnk237);} /* SUBTYPEP */ |
3489 |
static void LnkT236(){ call_or_link(VV[236],(void **)&Lnk236);} /* WT-INLINE-LOC */ |
static void LnkT236(){ call_or_link(VV[236],(void **)&Lnk236);} /* WT-INLINE-LOC */ |
3490 |
static object LnkTLI235(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[235],(void **)&LnkLI235,1,ap);} /* C1EXPR */ |
static object LnkTLI235(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[235],(void **)&LnkLI235,1,ap);va_end(ap);return V1;} /* C1EXPR */ |
3491 |
static object LnkTLI234(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[234],(void **)&LnkLI234,1,ap);} /* INLINE-BOOLE3-STRING */ |
static object LnkTLI234(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[234],(void **)&LnkLI234,1,ap);va_end(ap);return V1;} /* INLINE-BOOLE3-STRING */ |
3492 |
static object LnkTLI233(){return call_proc0(VV[233],(void **)&LnkLI233);} /* CLOSE-INLINE-BLOCKS */ |
static object LnkTLI233(){return call_proc0(VV[233],(void **)&LnkLI233);} /* CLOSE-INLINE-BLOCKS */ |
3493 |
static object LnkTLI232(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[232],(void **)&LnkLI232,ap);} /* INLINE-ARGS */ |
static object LnkTLI232(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[232],(void **)&LnkLI232,ap);va_end(ap);return V1;} /* INLINE-ARGS */ |
3494 |
static object LnkTLI231(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[231],(void **)&LnkLI231,2,ap);} /* ADD-INFO */ |
static object LnkTLI231(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[231],(void **)&LnkLI231,2,ap);va_end(ap);return V1;} /* ADD-INFO */ |
3495 |
static void LnkT230(){ call_or_link(VV[230],(void **)&Lnk230);} /* C2EXPR */ |
static void LnkT230(){ call_or_link(VV[230],(void **)&Lnk230);} /* C2EXPR */ |
3496 |
static object LnkTLI229(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[229],(void **)&LnkLI229,1,ap);} /* C2BIND */ |
static object LnkTLI229(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[229],(void **)&LnkLI229,1,ap);va_end(ap);return V1;} /* C2BIND */ |
3497 |
static object LnkTLI228(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[228],(void **)&LnkLI228,1,ap);} /* WT-VS */ |
static object LnkTLI228(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[228],(void **)&LnkLI228,1,ap);va_end(ap);return V1;} /* WT-VS */ |
3498 |
static object LnkTLI227(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[227],(void **)&LnkLI227,2,ap);} /* WT-VAR */ |
static object LnkTLI227(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[227],(void **)&LnkLI227,2,ap);va_end(ap);return V1;} /* WT-VAR */ |
3499 |
static object LnkTLI226(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[226],(void **)&LnkLI226,ap);} /* MAKE-VAR */ |
static object LnkTLI226(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[226],(void **)&LnkLI226,ap);va_end(ap);return V1;} /* MAKE-VAR */ |
3500 |
static object LnkTLI225(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[225],(void **)&LnkLI225,ap);} /* CMPERR */ |
static object LnkTLI225(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[225],(void **)&LnkLI225,ap);va_end(ap);return V1;} /* CMPERR */ |
3501 |
static object LnkTLI224(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[224],(void **)&LnkLI224,ap);} /* C2FUNCALL */ |
static object LnkTLI224(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[224],(void **)&LnkLI224,ap);va_end(ap);return V1;} /* C2FUNCALL */ |
3502 |
static object LnkTLI223(){return call_proc0(VV[223],(void **)&LnkLI223);} /* VS-PUSH */ |
static object LnkTLI223(){return call_proc0(VV[223],(void **)&LnkLI223);} /* VS-PUSH */ |
3503 |
static object LnkTLI222(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[222],(void **)&LnkLI222,1,ap);} /* C2EXPR* */ |
static object LnkTLI222(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[222],(void **)&LnkLI222,1,ap);va_end(ap);return V1;} /* C2EXPR* */ |
3504 |
static object LnkTLI221(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[221],(void **)&LnkLI221,1,ap);} /* SAVE-FUNOB */ |
static object LnkTLI221(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[221],(void **)&LnkLI221,1,ap);va_end(ap);return V1;} /* SAVE-FUNOB */ |
3505 |
static object LnkTLI220(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[220],(void **)&LnkLI220,5,ap);} /* C1APPLY-OPTIMIZE */ |
static object LnkTLI220(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[220],(void **)&LnkLI220,5,ap);va_end(ap);return V1;} /* C1APPLY-OPTIMIZE */ |
3506 |
static object LnkTLI219(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[219],(void **)&LnkLI219,2,ap);} /* C1ARGS */ |
static object LnkTLI219(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[219],(void **)&LnkLI219,2,ap);va_end(ap);return V1;} /* C1ARGS */ |
3507 |
static void LnkT218(){ call_or_link(VV[218],(void **)&Lnk218);} /* COPY-INFO */ |
static void LnkT218(){ call_or_link(VV[218],(void **)&Lnk218);} /* COPY-INFO */ |
3508 |
static object LnkTLI217(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[217],(void **)&LnkLI217,1,ap);} /* C1FUNOB */ |
static object LnkTLI217(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[217],(void **)&LnkLI217,1,ap);va_end(ap);return V1;} /* C1FUNOB */ |
3509 |
static object LnkTLI216(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[216],(void **)&LnkLI216,1,ap);} /* ADD-OBJECT */ |
static object LnkTLI216(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[216],(void **)&LnkLI216,1,ap);va_end(ap);return V1;} /* ADD-OBJECT */ |
3510 |
static object LnkTLI215(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[215],(void **)&LnkLI215,4,ap);} /* C2CALL-GLOBAL */ |
static object LnkTLI215(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[215],(void **)&LnkLI215,4,ap);va_end(ap);return V1;} /* C2CALL-GLOBAL */ |
3511 |
static object LnkTLI214(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[214],(void **)&LnkLI214,ap);} /* UNWIND-EXIT */ |
static object LnkTLI214(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[214],(void **)&LnkLI214,ap);va_end(ap);return V1;} /* UNWIND-EXIT */ |
3512 |
static object LnkTLI213(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[213],(void **)&LnkLI213,1,ap);} /* WT1 */ |
static object LnkTLI213(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[213],(void **)&LnkLI213,1,ap);va_end(ap);return V1;} /* WT1 */ |
3513 |
static object LnkTLI212(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[212],(void **)&LnkLI212,2,ap);} /* C1EXPR* */ |
static object LnkTLI212(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[212],(void **)&LnkLI212,2,ap);va_end(ap);return V1;} /* C1EXPR* */ |
3514 |
static object LnkTLI211(){return call_proc0(VV[211],(void **)&LnkLI211);} /* C1NIL */ |
static object LnkTLI211(){return call_proc0(VV[211],(void **)&LnkLI211);} /* C1NIL */ |
3515 |
static object LnkTLI210(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[210],(void **)&LnkLI210,3,ap);} /* TOO-MANY-ARGS */ |
static object LnkTLI210(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[210],(void **)&LnkLI210,3,ap);va_end(ap);return V1;} /* TOO-MANY-ARGS */ |
3516 |
static object LnkTLI209(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_proc(VV[209],(void **)&LnkLI209,3,ap);} /* TOO-FEW-ARGS */ |
static object LnkTLI209(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[209],(void **)&LnkLI209,3,ap);va_end(ap);return V1;} /* TOO-FEW-ARGS */ |
3517 |
static object LnkTLI208(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[208],(void **)&LnkLI208,ap);} /* MAKE-INFO */ |
static object LnkTLI208(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[208],(void **)&LnkLI208,ap);va_end(ap);return V1;} /* MAKE-INFO */ |
3518 |
|
|
3519 |
#ifdef SYSTEM_SPECIAL_INIT |
#ifdef SYSTEM_SPECIAL_INIT |
3520 |
SYSTEM_SPECIAL_INIT |
SYSTEM_SPECIAL_INIT |