539 |
T109:; |
T109:; |
540 |
if(!(type_of((V69))==t_cons)){ |
if(!(type_of((V69))==t_cons)){ |
541 |
goto T113;} |
goto T113;} |
542 |
|
{register object V70; |
543 |
V70= list(3,car((V69)),VV[38],cadr((V69))); |
V70= list(3,car((V69)),VV[38],cadr((V69))); |
544 |
V67= make_cons(/* INLINE-ARGS */V70,(V67)); |
V67= make_cons((V70),(V67));} |
545 |
goto T113; |
goto T113; |
546 |
T113:; |
T113:; |
547 |
V68= cdr((V68)); |
V68= cdr((V68)); |
550 |
goto T104; |
goto T104; |
551 |
T104:; |
T104:; |
552 |
if(((V67))==Cnil){ |
if(((V67))==Cnil){ |
553 |
goto T122;} |
goto T123;} |
554 |
V71= nreverse((V67)); |
V71= nreverse((V67)); |
555 |
V67= list(3,Cnil,/* INLINE-ARGS */V71,Cnil); |
V67= list(3,Cnil,/* INLINE-ARGS */V71,Cnil); |
556 |
goto T122; |
goto T123; |
557 |
T122:; |
T123:; |
558 |
{object V72; |
{object V72; |
559 |
V73= list(2,VV[35],(V66)); |
V73= list(2,VV[35],(V66)); |
560 |
base[0]= list(3,VV[39],/* INLINE-ARGS */V73,list(2,VV[35],(V67))); |
base[0]= list(3,VV[39],/* INLINE-ARGS */V73,list(2,VV[35],(V67))); |
564 |
vs_top=sup; |
vs_top=sup; |
565 |
V72= vs_base[0]; |
V72= vs_base[0]; |
566 |
if((car((V72)))==Cnil){ |
if((car((V72)))==Cnil){ |
567 |
goto T130;} |
goto T131;} |
568 |
bds_bind(VV[3],VV[2]); |
bds_bind(VV[3],VV[2]); |
569 |
setq(VV[5],number_plus(symbol_value(VV[5]),small_fixnum(1))); |
setq(VV[5],number_plus(symbol_value(VV[5]),small_fixnum(1))); |
570 |
(void)((*(LnkLI58))()); |
(void)((*(LnkLI58))()); |
577 |
{object V74 = list(3,VV[41],VV[42],list(2,VV[35],(V66))); |
{object V74 = list(3,VV[41],VV[42],list(2,VV[35],(V66))); |
578 |
bds_unwind1; |
bds_unwind1; |
579 |
VMR16(V74)} |
VMR16(V74)} |
580 |
goto T130; |
goto T131; |
581 |
T130:; |
T131:; |
582 |
{object V75 = cadr((V72)); |
{object V75 = cadr((V72)); |
583 |
VMR16(V75)}}} |
VMR16(V75)}}} |
584 |
base[0]=base[0]; |
base[0]=base[0]; |
599 |
register object V80; |
register object V80; |
600 |
V79= symbol_value(VV[37]); |
V79= symbol_value(VV[37]); |
601 |
V80= car((V79)); |
V80= car((V79)); |
|
goto T144; |
|
|
T144:; |
|
|
if(!(endp_prop((V79)))){ |
|
|
goto T145;} |
|
|
goto T140; |
|
602 |
goto T145; |
goto T145; |
603 |
T145:; |
T145:; |
604 |
|
if(!(endp_prop((V79)))){ |
605 |
|
goto T146;} |
606 |
|
goto T141; |
607 |
|
goto T146; |
608 |
|
T146:; |
609 |
if(!(type_of((V80))==t_cons)){ |
if(!(type_of((V80))==t_cons)){ |
610 |
goto T149;} |
goto T150;} |
611 |
|
{register object V81; |
612 |
V81= list(3,car((V80)),VV[38],cadr((V80))); |
V81= list(3,car((V80)),VV[38],cadr((V80))); |
613 |
V78= make_cons(/* INLINE-ARGS */V81,(V78)); |
V78= make_cons((V81),(V78));} |
614 |
goto T149; |
goto T150; |
615 |
T149:; |
T150:; |
616 |
V79= cdr((V79)); |
V79= cdr((V79)); |
617 |
V80= car((V79)); |
V80= car((V79)); |
618 |
goto T144;} |
goto T145;} |
619 |
goto T140; |
goto T141; |
620 |
T140:; |
T141:; |
621 |
{object V82; |
{object V82; |
622 |
V83= list(2,VV[35],(V77)); |
V83= list(2,VV[35],(V77)); |
623 |
base[0]= list(3,VV[43],/* INLINE-ARGS */V83,list(2,VV[35],(V78))); |
base[0]= list(3,VV[43],/* INLINE-ARGS */V83,list(2,VV[35],(V78))); |
627 |
vs_top=sup; |
vs_top=sup; |
628 |
V82= vs_base[0]; |
V82= vs_base[0]; |
629 |
if((car((V82)))==Cnil){ |
if((car((V82)))==Cnil){ |
630 |
goto T162;} |
goto T164;} |
631 |
bds_bind(VV[3],VV[2]); |
bds_bind(VV[3],VV[2]); |
632 |
setq(VV[5],number_plus(symbol_value(VV[5]),small_fixnum(1))); |
setq(VV[5],number_plus(symbol_value(VV[5]),small_fixnum(1))); |
633 |
(void)((*(LnkLI58))()); |
(void)((*(LnkLI58))()); |
640 |
{object V84 = list(3,VV[41],VV[45],list(2,VV[35],(V77))); |
{object V84 = list(3,VV[41],VV[45],list(2,VV[35],(V77))); |
641 |
bds_unwind1; |
bds_unwind1; |
642 |
VMR17(V84)} |
VMR17(V84)} |
643 |
goto T162; |
goto T164; |
644 |
T162:; |
T164:; |
645 |
{object V85 = cadr((V82)); |
{object V85 = cadr((V82)); |
646 |
VMR17(V85)}}} |
VMR17(V85)}}} |
647 |
base[0]=base[0]; |
base[0]=base[0]; |
662 |
register object V94; |
register object V94; |
663 |
V93= symbol_value(VV[37]); |
V93= symbol_value(VV[37]); |
664 |
V94= car((V93)); |
V94= car((V93)); |
665 |
goto T176; |
goto T178; |
666 |
T176:; |
T178:; |
667 |
if(!(endp_prop((V93)))){ |
if(!(endp_prop((V93)))){ |
668 |
goto T177;} |
goto T179;} |
669 |
goto T172; |
goto T174; |
670 |
goto T177; |
goto T179; |
671 |
T177:; |
T179:; |
672 |
if(!(type_of((V94))==t_cons)){ |
if(!(type_of((V94))==t_cons)){ |
673 |
goto T181;} |
goto T183;} |
674 |
|
{register object V95; |
675 |
V95= list(3,car((V94)),VV[38],cadr((V94))); |
V95= list(3,car((V94)),VV[38],cadr((V94))); |
676 |
V92= make_cons(/* INLINE-ARGS */V95,(V92)); |
V92= make_cons((V95),(V92));} |
677 |
goto T181; |
goto T183; |
678 |
T181:; |
T183:; |
679 |
V93= cdr((V93)); |
V93= cdr((V93)); |
680 |
V94= car((V93)); |
V94= car((V93)); |
681 |
goto T176;} |
goto T178;} |
682 |
goto T172; |
goto T174; |
683 |
T172:; |
T174:; |
684 |
if(symbol_value(VV[46])==Cnil){ |
if(symbol_value(VV[46])==Cnil){ |
685 |
goto T190;} |
goto T193;} |
686 |
(void)((*(LnkLI61))((V90))); |
(void)((*(LnkLI61))((V90))); |
687 |
goto T190; |
goto T193; |
688 |
T190:; |
T193:; |
689 |
if(((V92))==Cnil){ |
if(((V92))==Cnil){ |
690 |
goto T191;} |
goto T194;} |
691 |
V96= nreverse((V92)); |
V96= nreverse((V92)); |
692 |
V92= list(3,Cnil,/* INLINE-ARGS */V96,Cnil); |
V92= list(3,Cnil,/* INLINE-ARGS */V96,Cnil); |
693 |
goto T191; |
goto T194; |
694 |
T191:; |
T194:; |
695 |
{object V97; |
{object V97; |
696 |
V98= list(2,VV[35],(V89)); |
V98= list(2,VV[35],(V89)); |
697 |
V99= list(2,VV[35],make_cons((V90),(V91))); |
V99= list(2,VV[35],make_cons((V90),(V91))); |
702 |
vs_top=sup; |
vs_top=sup; |
703 |
V97= vs_base[0]; |
V97= vs_base[0]; |
704 |
if((car((V97)))==Cnil){ |
if((car((V97)))==Cnil){ |
705 |
goto T199;} |
goto T202;} |
706 |
bds_bind(VV[3],VV[2]); |
bds_bind(VV[3],VV[2]); |
707 |
setq(VV[5],number_plus(symbol_value(VV[5]),small_fixnum(1))); |
setq(VV[5],number_plus(symbol_value(VV[5]),small_fixnum(1))); |
708 |
(void)((*(LnkLI58))()); |
(void)((*(LnkLI58))()); |
715 |
{object V100 = list(3,VV[41],VV[50],list(2,VV[35],make_cons((V90),(V91)))); |
{object V100 = list(3,VV[41],VV[50],list(2,VV[35],make_cons((V90),(V91)))); |
716 |
bds_unwind1; |
bds_unwind1; |
717 |
VMR18(V100)} |
VMR18(V100)} |
718 |
goto T199; |
goto T202; |
719 |
T199:; |
T202:; |
720 |
{object V101 = cadr((V97)); |
{object V101 = cadr((V97)); |
721 |
VMR18(V101)}}} |
VMR18(V101)}}} |
722 |
base[0]=base[0]; |
base[0]=base[0]; |
786 |
vs_top=sup; |
vs_top=sup; |
787 |
V114= vs_base[0]; |
V114= vs_base[0]; |
788 |
V115= Cnil; |
V115= Cnil; |
789 |
goto T221; |
goto T224; |
790 |
T221:; |
T224:; |
791 |
V115= car((V114)); |
V115= car((V114)); |
792 |
if(!(type_of((V115))==t_symbol)){ |
if(!(type_of((V115))==t_symbol)){ |
793 |
goto T226;} |
goto T229;} |
794 |
if((get((V115),VV[57],Cnil))==Cnil){ |
if((get((V115),VV[57],Cnil))==Cnil){ |
795 |
goto T226;} |
goto T229;} |
796 |
V114= cddr((V114)); |
V114= cddr((V114)); |
797 |
(void)(remprop((V112),(V115))); |
(void)(remprop((V112),(V115))); |
798 |
goto T224; |
goto T227; |
799 |
goto T226; |
goto T229; |
800 |
T226:; |
T229:; |
801 |
V114= cddr((V114)); |
V114= cddr((V114)); |
802 |
goto T224; |
goto T227; |
803 |
T224:; |
T227:; |
804 |
if(!(((V114))==Cnil)){ |
if(!(((V114))==Cnil)){ |
805 |
goto T234;} |
goto T237;} |
806 |
goto T233; |
goto T236; |
807 |
goto T234; |
goto T237; |
808 |
T234:; |
T237:; |
809 |
goto T221; |
goto T224; |
810 |
goto T233; |
goto T236; |
811 |
T233:; |
T236:; |
812 |
goto T219; |
goto T222; |
813 |
goto T219; |
goto T222; |
814 |
T219:; |
T222:; |
815 |
{object V116 = (*(LnkLI64))((V112),(V113)); |
{object V116 = (*(LnkLI64))((V112),(V113)); |
816 |
VMR21(V116)}} |
VMR21(V116)}} |
817 |
base[0]=base[0]; |
base[0]=base[0]; |