14 |
object V4; |
object V4; |
15 |
V3= Cnil; |
V3= Cnil; |
16 |
V4= Cnil; |
V4= Cnil; |
17 |
if(!(endp((V2)))){ |
if(!(endp_prop((V2)))){ |
18 |
goto T3;} |
goto T3;} |
19 |
(void)((*(LnkLI38))(VV[0],small_fixnum(1),small_fixnum(0))); |
(void)((*(LnkLI38))(VV[0],small_fixnum(1),small_fixnum(0))); |
20 |
goto T3; |
goto T3; |
21 |
T3:; |
T3:; |
22 |
if(!(endp(cdr((V2))))){ |
if(!(endp_prop(cdr((V2))))){ |
23 |
goto T7;} |
goto T7;} |
24 |
{object V5 = (*(LnkLI39))((V2)); |
{object V5 = (*(LnkLI39))((V2)); |
25 |
VMR1(V5)} |
VMR1(V5)} |
51 |
bds_bind(VV[1],symbol_value(VV[1])); |
bds_bind(VV[1],symbol_value(VV[1])); |
52 |
V11= Cnil; |
V11= Cnil; |
53 |
V12= Cnil; |
V12= Cnil; |
54 |
if(!(endp(cdr((V10))))){ |
if(!(endp_prop(cdr((V10))))){ |
55 |
goto T19;} |
goto T19;} |
56 |
V11= (*(LnkLI43))((V9)); |
V11= (*(LnkLI43))((V9)); |
57 |
bds_bind(VV[2],VV[3]); |
bds_bind(VV[2],VV[3]); |
77 |
V16= car((V15)); |
V16= car((V15)); |
78 |
goto T41; |
goto T41; |
79 |
T41:; |
T41:; |
80 |
if(!(endp((V15)))){ |
if(!(endp_prop((V15)))){ |
81 |
goto T42;} |
goto T42;} |
82 |
goto T37; |
goto T37; |
83 |
goto T42; |
goto T42; |
122 |
object V22; |
object V22; |
123 |
V21= (VFUN_NARGS=0,(*(LnkLI48))()); |
V21= (VFUN_NARGS=0,(*(LnkLI48))()); |
124 |
V22= Cnil; |
V22= Cnil; |
125 |
if(!(endp((V20)))){ |
if(!(endp_prop((V20)))){ |
126 |
goto T72;} |
goto T72;} |
127 |
(void)((*(LnkLI38))(VV[8],small_fixnum(1),small_fixnum(0))); |
(void)((*(LnkLI38))(VV[8],small_fixnum(1),small_fixnum(0))); |
128 |
goto T72; |
goto T72; |
170 |
V32= car((V31)); |
V32= car((V31)); |
171 |
goto T99; |
goto T99; |
172 |
T99:; |
T99:; |
173 |
if(!(endp((V31)))){ |
if(!(endp_prop((V31)))){ |
174 |
goto T100;} |
goto T100;} |
175 |
goto T95; |
goto T95; |
176 |
goto T100; |
goto T100; |
294 |
V46= car((V45)); |
V46= car((V45)); |
295 |
goto T166; |
goto T166; |
296 |
T166:; |
T166:; |
297 |
if(!(endp((V45)))){ |
if(!(endp_prop((V45)))){ |
298 |
goto T167;} |
goto T167;} |
299 |
goto T162; |
goto T162; |
300 |
goto T167; |
goto T167; |
337 |
register object V55; |
register object V55; |
338 |
V54= (VFUN_NARGS=0,(*(LnkLI48))()); |
V54= (VFUN_NARGS=0,(*(LnkLI48))()); |
339 |
V55= Cnil; |
V55= Cnil; |
340 |
if(endp((V53))){ |
if(endp_prop((V53))){ |
341 |
goto T188;} |
goto T188;} |
342 |
if(!(endp(cdr((V53))))){ |
if(!(endp_prop(cdr((V53))))){ |
343 |
goto T187;} |
goto T187;} |
344 |
goto T188; |
goto T188; |
345 |
T188:; |
T188:; |
346 |
(void)((*(LnkLI38))(VV[19],small_fixnum(2),small_fixnum(0))); |
(void)((*(LnkLI38))(VV[19],small_fixnum(2),small_fixnum(0))); |
347 |
goto T187; |
goto T187; |
348 |
T187:; |
T187:; |
349 |
if(endp(cddr((V53)))){ |
if(endp_prop(cddr((V53)))){ |
350 |
goto T192;} |
goto T192;} |
351 |
V56 = make_fixnum((long)length((V53))); |
V56 = make_fixnum((long)length((V53))); |
352 |
(void)((*(LnkLI55))(VV[19],small_fixnum(2),V56)); |
(void)((*(LnkLI55))(VV[19],small_fixnum(2),V56)); |
358 |
V58= car((V57)); |
V58= car((V57)); |
359 |
goto T199; |
goto T199; |
360 |
T199:; |
T199:; |
361 |
if(!(endp((V57)))){ |
if(!(endp_prop((V57)))){ |
362 |
goto T200;} |
goto T200;} |
363 |
goto T195; |
goto T195; |
364 |
goto T200; |
goto T200; |
472 |
V80= (V77); |
V80= (V77); |
473 |
goto T246; |
goto T246; |
474 |
T246:; |
T246:; |
475 |
if(!(endp((V80)))){ |
if(!(endp_prop((V80)))){ |
476 |
goto T247;} |
goto T247;} |
477 |
goto T244; |
goto T244; |
478 |
goto T247; |
goto T247; |
481 |
V81= car((V80)); |
V81= car((V80)); |
482 |
princ_str("\n if(vs_base<vs_top){",VV[6]); |
princ_str("\n if(vs_base<vs_top){",VV[6]); |
483 |
(void)((*(LnkLI60))(VV[11],car((V81)),cadr((V81)))); |
(void)((*(LnkLI60))(VV[11],car((V81)),cadr((V81)))); |
484 |
if(endp(cdr((V80)))){ |
if(endp_prop(cdr((V80)))){ |
485 |
goto T256;} |
goto T256;} |
486 |
princ_str("\n vs_base++;",VV[6]); |
princ_str("\n vs_base++;",VV[6]); |
487 |
goto T256; |
goto T256; |
540 |
V94= Cnil; |
V94= Cnil; |
541 |
V95= Cnil; |
V95= Cnil; |
542 |
bds_bind(VV[31],symbol_value(VV[31])); |
bds_bind(VV[31],symbol_value(VV[31])); |
543 |
if(endp((V86))){ |
if(endp_prop((V86))){ |
544 |
goto T286;} |
goto T286;} |
545 |
if(!(endp(cdr((V86))))){ |
if(!(endp_prop(cdr((V86))))){ |
546 |
goto T285;} |
goto T285;} |
547 |
goto T286; |
goto T286; |
548 |
T286:; |
T286:; |
586 |
V98= car((V97)); |
V98= car((V97)); |
587 |
goto T299; |
goto T299; |
588 |
T299:; |
T299:; |
589 |
if(!(endp((V97)))){ |
if(!(endp_prop((V97)))){ |
590 |
goto T300;} |
goto T300;} |
591 |
goto T295; |
goto T295; |
592 |
goto T300; |
goto T300; |
607 |
V101= car((V100)); |
V101= car((V100)); |
608 |
goto T320; |
goto T320; |
609 |
T320:; |
T320:; |
610 |
if(!(endp((V100)))){ |
if(!(endp_prop((V100)))){ |
611 |
goto T321;} |
goto T321;} |
612 |
goto T316; |
goto T316; |
613 |
goto T321; |
goto T321; |
629 |
V104= car((V103)); |
V104= car((V103)); |
630 |
goto T341; |
goto T341; |
631 |
T341:; |
T341:; |
632 |
if(!(endp((V103)))){ |
if(!(endp_prop((V103)))){ |
633 |
goto T342;} |
goto T342;} |
634 |
goto T337; |
goto T337; |
635 |
goto T342; |
goto T342; |
672 |
V116= car((V115)); |
V116= car((V115)); |
673 |
goto T360; |
goto T360; |
674 |
T360:; |
T360:; |
675 |
if(!(endp((V115)))){ |
if(!(endp_prop((V115)))){ |
676 |
goto T361;} |
goto T361;} |
677 |
goto T356; |
goto T356; |
678 |
goto T361; |
goto T361; |
727 |
V120= (V109); |
V120= (V109); |
728 |
goto T393; |
goto T393; |
729 |
T393:; |
T393:; |
730 |
if(!(endp((V120)))){ |
if(!(endp_prop((V120)))){ |
731 |
goto T394;} |
goto T394;} |
732 |
bds_unwind1; |
bds_unwind1; |
733 |
bds_unwind1; |
bds_unwind1; |
748 |
princ_char(59,VV[6]); |
princ_char(59,VV[6]); |
749 |
princ_char(125,VV[6]); |
princ_char(125,VV[6]); |
750 |
(void)((*(LnkLI71))(car((V120)),VV[37])); |
(void)((*(LnkLI71))(car((V120)),VV[37])); |
751 |
if(endp(cdr((V120)))){ |
if(endp_prop(cdr((V120)))){ |
752 |
goto T412;} |
goto T412;} |
753 |
princ_str("\n vs_base++;",VV[6]); |
princ_str("\n vs_base++;",VV[6]); |
754 |
goto T412; |
goto T412; |
775 |
V124= car((V123)); |
V124= car((V123)); |
776 |
goto T436; |
goto T436; |
777 |
T436:; |
T436:; |
778 |
if(!(endp((V123)))){ |
if(!(endp_prop((V123)))){ |
779 |
goto T437;} |
goto T437;} |
780 |
goto T432; |
goto T432; |
781 |
goto T437; |
goto T437; |