100 |
|
|
101 |
register object V17;register object V18; |
register object V17;register object V18; |
102 |
{ VMB2 VMS2 VMV2 |
{ VMB2 VMS2 VMV2 |
103 |
goto TTL; |
goto TTL; |
104 |
TTL:; |
TTL:; |
105 |
if(!(type_of((V17))==t_symbol)){ |
if(!(type_of((V17))==t_symbol)){ |
106 |
goto T36;} |
goto T36;} |
346 |
|
|
347 |
object V47;register object V48; |
object V47;register object V48; |
348 |
{ VMB13 VMS13 VMV13 |
{ VMB13 VMS13 VMV13 |
349 |
goto TTL; |
goto TTL; |
350 |
TTL:; |
TTL:; |
351 |
if(type_of((V47))==t_symbol){ |
if(type_of((V47))==t_symbol){ |
352 |
goto T55;} |
goto T55;} |
386 |
|
|
387 |
object V56; |
object V56; |
388 |
{ VMB14 VMS14 VMV14 |
{ VMB14 VMS14 VMV14 |
389 |
goto TTL; |
goto TTL; |
390 |
TTL:;{object V57; |
TTL:;{object V57; |
391 |
base[0]= (V56); |
base[0]= (V56); |
392 |
base[1]= VV[31]; |
base[1]= VV[31]; |
412 |
|
|
413 |
object V61; |
object V61; |
414 |
{ VMB15 VMS15 VMV15 |
{ VMB15 VMS15 VMV15 |
415 |
goto TTL; |
goto TTL; |
416 |
TTL:; |
TTL:; |
417 |
{object V62; |
{object V62; |
418 |
if(type_of((V61))==t_symbol){ |
if(type_of((V61))==t_symbol){ |
450 |
static object LI16() |
static object LI16() |
451 |
|
|
452 |
{ VMB16 VMS16 VMV16 |
{ VMB16 VMS16 VMV16 |
453 |
goto TTL; |
goto TTL; |
454 |
TTL:; |
TTL:; |
455 |
if((symbol_value(VV[34]))==Cnil){ |
if((symbol_value(VV[34]))==Cnil){ |
456 |
goto T87;} |
goto T87;} |
472 |
static object LI17() |
static object LI17() |
473 |
|
|
474 |
{ VMB17 VMS17 VMV17 |
{ VMB17 VMS17 VMV17 |
475 |
goto TTL; |
goto TTL; |
476 |
TTL:; |
TTL:; |
477 |
{object V69= symbol_value(VV[35]); |
{object V69= symbol_value(VV[35]); |
478 |
if((V69!= VV[36]))goto T95; |
if((V69!= VV[36]))goto T95; |
503 |
static object LI18() |
static object LI18() |
504 |
|
|
505 |
{ VMB18 VMS18 VMV18 |
{ VMB18 VMS18 VMV18 |
506 |
goto TTL; |
goto TTL; |
507 |
TTL:; |
TTL:; |
508 |
{object V74 = car(symbol_value(VV[34])); |
{object V74 = car(symbol_value(VV[34])); |
509 |
VMR18(V74)} |
VMR18(V74)} |
515 |
|
|
516 |
register object V76; |
register object V76; |
517 |
{ VMB19 VMS19 VMV19 |
{ VMB19 VMS19 VMV19 |
518 |
goto TTL; |
goto TTL; |
519 |
TTL:; |
TTL:; |
520 |
{register object V77; |
{register object V77; |
521 |
V77= car((V76)); |
V77= car((V76)); |
552 |
object V83; |
object V83; |
553 |
{ VMB20 VMS20 VMV20 |
{ VMB20 VMS20 VMV20 |
554 |
bds_check; |
bds_check; |
555 |
goto TTL; |
goto TTL; |
556 |
TTL:; |
TTL:; |
557 |
{register object V84; |
{register object V84; |
558 |
V84= Cnil; |
V84= Cnil; |
726 |
static object LI21() |
static object LI21() |
727 |
|
|
728 |
{ VMB21 VMS21 VMV21 |
{ VMB21 VMS21 VMV21 |
729 |
goto TTL; |
goto TTL; |
730 |
TTL:; |
TTL:; |
731 |
{object V103; |
{object V103; |
732 |
V104= (*(LnkLI254))(); |
V104= (*(LnkLI254))(); |
821 |
|
|
822 |
object V117; |
object V117; |
823 |
{ VMB22 VMS22 VMV22 |
{ VMB22 VMS22 VMV22 |
824 |
goto TTL; |
goto TTL; |
825 |
TTL:; |
TTL:; |
826 |
{register object V118; |
{register object V118; |
827 |
register object V119; |
register object V119; |
1010 |
static object LI24() |
static object LI24() |
1011 |
|
|
1012 |
{ VMB24 VMS24 VMV24 |
{ VMB24 VMS24 VMV24 |
1013 |
goto TTL; |
goto TTL; |
1014 |
TTL:; |
TTL:; |
1015 |
{register object V140; |
{register object V140; |
1016 |
V140= Cnil; |
V140= Cnil; |
1055 |
|
|
1056 |
object V145; |
object V145; |
1057 |
{ VMB25 VMS25 VMV25 |
{ VMB25 VMS25 VMV25 |
1058 |
goto TTL; |
goto TTL; |
1059 |
TTL:; |
TTL:; |
1060 |
{object V146; |
{object V146; |
1061 |
V146= (*(LnkLI13))((V145)); |
V146= (*(LnkLI13))((V145)); |
1161 |
static object LI26() |
static object LI26() |
1162 |
|
|
1163 |
{ VMB26 VMS26 VMV26 |
{ VMB26 VMS26 VMV26 |
1164 |
goto TTL; |
goto TTL; |
1165 |
TTL:; |
TTL:; |
1166 |
{register object V157; |
{register object V157; |
1167 |
register object V158; |
register object V158; |
1283 |
static object LI27() |
static object LI27() |
1284 |
|
|
1285 |
{ VMB27 VMS27 VMV27 |
{ VMB27 VMS27 VMV27 |
1286 |
goto TTL; |
goto TTL; |
1287 |
TTL:; |
TTL:; |
1288 |
{object V166; |
{object V166; |
1289 |
object V167; |
object V167; |
1333 |
|
|
1334 |
object V180; |
object V180; |
1335 |
{ VMB28 VMS28 VMV28 |
{ VMB28 VMS28 VMV28 |
1336 |
goto TTL; |
goto TTL; |
1337 |
TTL:;{object V181; |
TTL:;{object V181; |
1338 |
{register object x= (V180),V183= symbol_value(VV[52]); |
{register object x= (V180),V183= symbol_value(VV[52]); |
1339 |
while(!endp(V183)) |
while(!endp(V183)) |
1370 |
static object LI29() |
static object LI29() |
1371 |
|
|
1372 |
{ VMB29 VMS29 VMV29 |
{ VMB29 VMS29 VMV29 |
1373 |
goto TTL; |
goto TTL; |
1374 |
TTL:; |
TTL:; |
1375 |
{register object V189; |
{register object V189; |
1376 |
register object V190; |
register object V190; |
1538 |
object V219;object V220;object V221; |
object V219;object V220;object V221; |
1539 |
{ VMB30 VMS30 VMV30 |
{ VMB30 VMS30 VMV30 |
1540 |
bds_check; |
bds_check; |
1541 |
goto TTL; |
goto TTL; |
1542 |
TTL:; |
TTL:; |
1543 |
{register object V222; |
{register object V222; |
1544 |
V222= Cnil; |
V222= Cnil; |
1600 |
|
|
1601 |
object V232;register object V233; |
object V232;register object V233; |
1602 |
{ VMB31 VMS31 VMV31 |
{ VMB31 VMS31 VMV31 |
1603 |
goto TTL; |
goto TTL; |
1604 |
TTL:; |
TTL:; |
1605 |
if(symbol_value(VV[47])==Cnil){ |
if(symbol_value(VV[47])==Cnil){ |
1606 |
goto T582;} |
goto T582;} |
1659 |
static object LI32() |
static object LI32() |
1660 |
|
|
1661 |
{ VMB32 VMS32 VMV32 |
{ VMB32 VMS32 VMV32 |
1662 |
goto TTL; |
goto TTL; |
1663 |
TTL:; |
TTL:; |
1664 |
base[0]= VV[124]; |
base[0]= VV[124]; |
1665 |
vs_top=(vs_base=base+0)+1; |
vs_top=(vs_base=base+0)+1; |
1676 |
|
|
1677 |
register object V240;object V241; |
register object V240;object V241; |
1678 |
{ VMB33 VMS33 VMV33 |
{ VMB33 VMS33 VMV33 |
1679 |
goto TTL; |
goto TTL; |
1680 |
TTL:; |
TTL:; |
1681 |
{register object V242; |
{register object V242; |
1682 |
V242= Cnil; |
V242= Cnil; |
2338 |
|
|
2339 |
{ VMB39 VMS39 VMV39 |
{ VMB39 VMS39 VMV39 |
2340 |
bds_check; |
bds_check; |
2341 |
goto TTL; |
goto TTL; |
2342 |
TTL:; |
TTL:; |
2343 |
{register object V324; |
{register object V324; |
2344 |
register object V325; |
register object V325; |
2827 |
|
|
2828 |
object V388;object V389; |
object V388;object V389; |
2829 |
{ VMB41 VMS41 VMV41 |
{ VMB41 VMS41 VMV41 |
2830 |
goto TTL; |
goto TTL; |
2831 |
TTL:; |
TTL:; |
2832 |
if(symbol_value(VV[53])==Cnil){ |
if(symbol_value(VV[53])==Cnil){ |
2833 |
goto T1079;} |
goto T1079;} |
2932 |
|
|
2933 |
register object V405; |
register object V405; |
2934 |
{ VMB42 VMS42 VMV42 |
{ VMB42 VMS42 VMV42 |
2935 |
goto TTL; |
goto TTL; |
2936 |
TTL:; |
TTL:; |
2937 |
if((symbol_value(VV[53]))==Cnil){ |
if((symbol_value(VV[53]))==Cnil){ |
2938 |
goto T1128;} |
goto T1128;} |
3104 |
|
|
3105 |
object V436;object V437; |
object V436;object V437; |
3106 |
{ VMB44 VMS44 VMV44 |
{ VMB44 VMS44 VMV44 |
3107 |
goto TTL; |
goto TTL; |
3108 |
TTL:; |
TTL:; |
3109 |
V438= list(3,VV[195],(V436),small_fixnum(0)); |
V438= list(3,VV[195],(V436),small_fixnum(0)); |
3110 |
{object V439 = list(4,VV[97],/* INLINE-ARGS */V438,VV[56],list(3,VV[195],(V436),list(3,VV[144],(V436),(V437)))); |
{object V439 = list(4,VV[97],/* INLINE-ARGS */V438,VV[56],list(3,VV[195],(V436),list(3,VV[144],(V436),(V437)))); |
3117 |
|
|
3118 |
register object V442;object V443; |
register object V442;object V443; |
3119 |
{ VMB45 VMS45 VMV45 |
{ VMB45 VMS45 VMV45 |
3120 |
goto TTL; |
goto TTL; |
3121 |
TTL:; |
TTL:; |
3122 |
V444= list(3,VV[15],(V442),small_fixnum(0)); |
V444= list(3,VV[15],(V442),small_fixnum(0)); |
3123 |
V445= list(3,VV[15],(V442),list(3,VV[196],(V442),(V443))); |
V445= list(3,VV[15],(V442),list(3,VV[196],(V442),(V443))); |
3131 |
|
|
3132 |
register object V449;object V450; |
register object V449;object V450; |
3133 |
{ VMB46 VMS46 VMV46 |
{ VMB46 VMS46 VMV46 |
3134 |
goto TTL; |
goto TTL; |
3135 |
TTL:; |
TTL:; |
3136 |
V451= list(3,VV[195],(V449),Cnil); |
V451= list(3,VV[195],(V449),Cnil); |
3137 |
V452= list(3,VV[15],(V449),list(3,VV[198],(V449),(V450))); |
V452= list(3,VV[15],(V449),list(3,VV[198],(V449),(V450))); |
3145 |
|
|
3146 |
register object V456;object V457; |
register object V456;object V457; |
3147 |
{ VMB47 VMS47 VMV47 |
{ VMB47 VMS47 VMV47 |
3148 |
goto TTL; |
goto TTL; |
3149 |
TTL:; |
TTL:; |
3150 |
V458= list(3,VV[195],(V456),Cnil); |
V458= list(3,VV[195],(V456),Cnil); |
3151 |
V459= list(3,VV[15],(V456),list(3,VV[199],(V456),(V457))); |
V459= list(3,VV[15],(V456),list(3,VV[199],(V456),(V457))); |
3159 |
|
|
3160 |
object V463;object V464; |
object V463;object V464; |
3161 |
{ VMB48 VMS48 VMV48 |
{ VMB48 VMS48 VMV48 |
3162 |
goto TTL; |
goto TTL; |
3163 |
TTL:; |
TTL:; |
3164 |
V465= list(3,VV[195],(V463),small_fixnum(0)); |
V465= list(3,VV[195],(V463),small_fixnum(0)); |
3165 |
{object V466 = list(4,VV[97],/* INLINE-ARGS */V465,VV[56],list(3,VV[5],(V464),list(3,VV[15],(V463),list(2,VV[200],(V463))))); |
{object V466 = list(4,VV[97],/* INLINE-ARGS */V465,VV[56],list(3,VV[5],(V464),list(3,VV[15],(V463),list(2,VV[200],(V463))))); |
3172 |
|
|
3173 |
object V469;object V470; |
object V469;object V470; |
3174 |
{ VMB49 VMS49 VMV49 |
{ VMB49 VMS49 VMV49 |
3175 |
goto TTL; |
goto TTL; |
3176 |
TTL:; |
TTL:; |
3177 |
{object V471 = list(2,VV[56],list(3,VV[197],(V470),list(2,VV[59],(V470)))); |
{object V471 = list(2,VV[56],list(3,VV[197],(V470),list(2,VV[59],(V470)))); |
3178 |
VMR49(V471)} |
VMR49(V471)} |
3184 |
|
|
3185 |
object V474;object V475; |
object V474;object V475; |
3186 |
{ VMB50 VMS50 VMV50 |
{ VMB50 VMS50 VMV50 |
3187 |
goto TTL; |
goto TTL; |
3188 |
TTL:; |
TTL:; |
3189 |
V476= list(3,VV[195],(V474),Ct); |
V476= list(3,VV[195],(V474),Ct); |
3190 |
{object V477 = list(4,VV[97],/* INLINE-ARGS */V476,VV[56],list(3,VV[5],list(2,VV[140],(V475)),VV[201])); |
{object V477 = list(4,VV[97],/* INLINE-ARGS */V476,VV[56],list(3,VV[5],list(2,VV[140],(V475)),VV[201])); |
3197 |
|
|
3198 |
object V480;object V481; |
object V480;object V481; |
3199 |
{ VMB51 VMS51 VMV51 |
{ VMB51 VMS51 VMV51 |
3200 |
goto TTL; |
goto TTL; |
3201 |
TTL:; |
TTL:; |
3202 |
V482= list(3,VV[195],(V480),Ct); |
V482= list(3,VV[195],(V480),Ct); |
3203 |
{object V483 = list(4,VV[97],/* INLINE-ARGS */V482,VV[56],list(3,VV[5],(V481),VV[202])); |
{object V483 = list(4,VV[97],/* INLINE-ARGS */V482,VV[56],list(3,VV[5],(V481),VV[202])); |
3210 |
|
|
3211 |
object V485; |
object V485; |
3212 |
{ VMB52 VMS52 VMV52 |
{ VMB52 VMS52 VMV52 |
3213 |
goto TTL; |
goto TTL; |
3214 |
TTL:; |
TTL:; |
3215 |
base[0]= VV[91]; |
base[0]= VV[91]; |
3216 |
base[1]= VV[203]; |
base[1]= VV[203]; |
3242 |
|
|
3243 |
object V488; |
object V488; |
3244 |
{ VMB53 VMS53 VMV53 |
{ VMB53 VMS53 VMV53 |
3245 |
goto TTL; |
goto TTL; |
3246 |
TTL:; |
TTL:; |
3247 |
{object V489; |
{object V489; |
3248 |
vs_base=vs_top; |
vs_base=vs_top; |
3260 |
|
|
3261 |
register object V492; |
register object V492; |
3262 |
{ VMB54 VMS54 VMV54 |
{ VMB54 VMS54 VMV54 |
3263 |
goto TTL; |
goto TTL; |
3264 |
TTL:; |
TTL:; |
3265 |
if(!(type_of((V492))==t_cons)){ |
if(!(type_of((V492))==t_cons)){ |
3266 |
goto T1196;} |
goto T1196;} |
3283 |
|
|
3284 |
object V497;object V498; |
object V497;object V498; |
3285 |
{ VMB55 VMS55 VMV55 |
{ VMB55 VMS55 VMV55 |
3286 |
goto TTL; |
goto TTL; |
3287 |
TTL:; |
TTL:; |
3288 |
{object V499 = list(3,VV[212],list(2,VV[213],listA(3,VV[214],(V497),VV[215])),(V498)); |
{object V499 = list(3,VV[212],list(2,VV[213],listA(3,VV[214],(V497),VV[215])),(V498)); |
3289 |
VMR55(V499)} |
VMR55(V499)} |
3295 |
|
|
3296 |
object V502;object V503; |
object V502;object V503; |
3297 |
{ VMB56 VMS56 VMV56 |
{ VMB56 VMS56 VMV56 |
3298 |
goto TTL; |
goto TTL; |
3299 |
TTL:; |
TTL:; |
3300 |
{object V504 = list(3,VV[216],list(2,(V502),list(2,VV[217],(V503))),VV[181]); |
{object V504 = list(3,VV[216],list(2,(V502),list(2,VV[217],(V503))),VV[181]); |
3301 |
VMR56(V504)} |
VMR56(V504)} |
3406 |
|
|
3407 |
register object V527;object V528; |
register object V527;object V528; |
3408 |
{ VMB58 VMS58 VMV58 |
{ VMB58 VMS58 VMV58 |
3409 |
goto TTL; |
goto TTL; |
3410 |
TTL:; |
TTL:; |
3411 |
{object V529; |
{object V529; |
3412 |
V530= (*(LnkLI254))(); |
V530= (*(LnkLI254))(); |
3430 |
VOL object V535; |
VOL object V535; |
3431 |
{ VMB59 VMS59 VMV59 |
{ VMB59 VMS59 VMV59 |
3432 |
bds_check; |
bds_check; |
3433 |
goto TTL; |
goto TTL; |
3434 |
TTL:; |
TTL:; |
3435 |
{object V536; |
{object V536; |
3436 |
V536= (*(LnkLI13))(car((V535))); |
V536= (*(LnkLI13))(car((V535))); |
3779 |
|
|
3780 |
object V621;object V622; |
object V621;object V622; |
3781 |
{ VMB60 VMS60 VMV60 |
{ VMB60 VMS60 VMV60 |
3782 |
goto TTL; |
goto TTL; |
3783 |
TTL:; |
TTL:; |
3784 |
{register object V623; |
{register object V623; |
3785 |
base[0]= VV[228]; |
base[0]= VV[228]; |
3814 |
|
|
3815 |
object V629;object V630;object V631;object V632; |
object V629;object V630;object V631;object V632; |
3816 |
{ VMB61 VMS61 VMV61 |
{ VMB61 VMS61 VMV61 |
3817 |
goto TTL; |
goto TTL; |
3818 |
TTL:;{object V633; |
TTL:;{object V633; |
3819 |
V633= (*(LnkLI10))((V631),VV[223]); |
V633= (*(LnkLI10))((V631),VV[223]); |
3820 |
if(V633==Cnil)goto T1557; |
if(V633==Cnil)goto T1557; |
3839 |
|
|
3840 |
register object V640;object V641;object V642;object V643; |
register object V640;object V641;object V642;object V643; |
3841 |
{ VMB62 VMS62 VMV62 |
{ VMB62 VMS62 VMV62 |
3842 |
goto TTL; |
goto TTL; |
3843 |
TTL:;{object V644; |
TTL:;{object V644; |
3844 |
V644= (*(LnkLI10))((V642),VV[223]); |
V644= (*(LnkLI10))((V642),VV[223]); |
3845 |
if(V644==Cnil)goto T1561; |
if(V644==Cnil)goto T1561; |
3940 |
|
|
3941 |
object V658;object V659; |
object V658;object V659; |
3942 |
{ VMB64 VMS64 VMV64 |
{ VMB64 VMS64 VMV64 |
3943 |
goto TTL; |
goto TTL; |
3944 |
TTL:; |
TTL:; |
3945 |
V660= list(3,VV[236],(V659),(V658)); |
V660= list(3,VV[236],(V659),(V658)); |
3946 |
V661= list(2,VV[238],list(3,VV[15],VV[239],list(3,VV[119],(V659),VV[240]))); |
V661= list(2,VV[238],list(3,VV[15],VV[239],list(3,VV[119],(V659),VV[240]))); |
3954 |
|
|
3955 |
register object V665;object V666; |
register object V665;object V666; |
3956 |
{ VMB65 VMS65 VMV65 |
{ VMB65 VMS65 VMV65 |
3957 |
goto TTL; |
goto TTL; |
3958 |
TTL:; |
TTL:; |
3959 |
{register object V667; |
{register object V667; |
3960 |
vs_base=vs_top; |
vs_base=vs_top; |