68 |
T28:; |
T28:; |
69 |
if(((V4))==Cnil){ |
if(((V4))==Cnil){ |
70 |
goto T26;} |
goto T26;} |
71 |
V9= list(3,VV[5],VV[6],list(3,VV[7],VV[8],car((V4)))); |
V9= list(3,VV[5],VV[6],list(3,VV[7],VV[8],list(2,VV[9],car((V4))))); |
72 |
V7= make_cons(/* INLINE-ARGS */V9,cdr((V6))); |
V7= make_cons(/* INLINE-ARGS */V9,cdr((V6))); |
73 |
goto T13; |
goto T13; |
74 |
goto T26; |
goto T26; |
75 |
T26:; |
T26:; |
76 |
V10= list(3,VV[9],VV[8],list(2,VV[10],car((V6)))); |
V10= list(3,VV[10],VV[8],list(2,VV[9],car((V6)))); |
77 |
V7= make_cons(/* INLINE-ARGS */V10,cdr((V6))); |
V7= make_cons(/* INLINE-ARGS */V10,cdr((V6))); |
78 |
goto T13; |
goto T13; |
79 |
T13:; |
T13:; |
367 |
base[0]= (V47); |
base[0]= (V47); |
368 |
base[1]= (V48); |
base[1]= (V48); |
369 |
base[2]= VV[30]; |
base[2]= VV[30]; |
370 |
base[3]= VV[9]; |
base[3]= VV[10]; |
371 |
vs_top=(vs_base=base+0)+4; |
vs_top=(vs_base=base+0)+4; |
372 |
Lmember(); |
Lmember(); |
373 |
vs_top=sup; |
vs_top=sup; |
391 |
base[0]= (V56); |
base[0]= (V56); |
392 |
base[1]= VV[31]; |
base[1]= VV[31]; |
393 |
base[2]= VV[30]; |
base[2]= VV[30]; |
394 |
base[3]= VV[9]; |
base[3]= VV[10]; |
395 |
vs_top=(vs_base=base+0)+4; |
vs_top=(vs_base=base+0)+4; |
396 |
Lmember(); |
Lmember(); |
397 |
vs_top=sup; |
vs_top=sup; |
401 |
VMR14(V58)} |
VMR14(V58)} |
402 |
goto T67; |
goto T67; |
403 |
T67:;} |
T67:;} |
404 |
{object V59 = (VFUN_NARGS=4,(*(LnkLI249))((V56),symbol_value(VV[28]),VV[30],VV[9])); |
{object V59 = (VFUN_NARGS=4,(*(LnkLI249))((V56),symbol_value(VV[28]),VV[30],VV[10])); |
405 |
VMR14(V59)} |
VMR14(V59)} |
406 |
base[0]=base[0]; |
base[0]=base[0]; |
407 |
return Cnil; |
return Cnil; |
424 |
base[0]= (V61); |
base[0]= (V61); |
425 |
base[1]= symbol_value(VV[32]); |
base[1]= symbol_value(VV[32]); |
426 |
base[2]= VV[30]; |
base[2]= VV[30]; |
427 |
base[3]= VV[9]; |
base[3]= VV[10]; |
428 |
base[4]= VV[33]; |
base[4]= VV[33]; |
429 |
base[5]= VV[17]; |
base[5]= VV[17]; |
430 |
vs_top=(vs_base=base+0)+6; |
vs_top=(vs_base=base+0)+6; |
616 |
goto T126; |
goto T126; |
617 |
T126:; |
T126:; |
618 |
{object V88; |
{object V88; |
619 |
V88= list(3,VV[59],VV[60],list(4,VV[61],VV[62],list(2,VV[10],(VV[51]->s.s_dbind)),VV[63])); |
V88= list(3,VV[59],VV[60],list(4,VV[61],VV[62],list(2,VV[9],(VV[51]->s.s_dbind)),VV[63])); |
620 |
V85= make_cons((V88),(V85));} |
V85= make_cons((V88),(V85));} |
621 |
{object V89; |
{object V89; |
622 |
V89= list(3,VV[64],Cnil,list(3,VV[61],VV[65],list(2,VV[10],(V86)))); |
V89= list(3,VV[64],Cnil,list(3,VV[61],VV[65],list(2,VV[9],(V86)))); |
623 |
V85= make_cons((V89),(V85));} |
V85= make_cons((V89),(V85));} |
624 |
{object V90; |
{object V90; |
625 |
V90= list(3,VV[66],Cnil,list(3,VV[61],VV[67],list(2,VV[10],(V86)))); |
V90= list(3,VV[66],Cnil,list(3,VV[61],VV[67],list(2,VV[9],(V86)))); |
626 |
V85= make_cons((V90),(V85));} |
V85= make_cons((V90),(V85));} |
627 |
if((VV[45]->s.s_dbind)==Cnil){ |
if((VV[45]->s.s_dbind)==Cnil){ |
628 |
goto T147;} |
goto T147;} |
731 |
{object V103; |
{object V103; |
732 |
V104= (*(LnkLI254))(); |
V104= (*(LnkLI254))(); |
733 |
V103= (*(LnkLI13))(/* INLINE-ARGS */V104); |
V103= (*(LnkLI13))(/* INLINE-ARGS */V104); |
734 |
if(((*(LnkLI9))((V103),VV[78]))==Cnil){ |
if(((*(LnkLI10))((V103),VV[78]))==Cnil){ |
735 |
goto T192;} |
goto T192;} |
736 |
(void)((*(LnkLI255))()); |
(void)((*(LnkLI255))()); |
737 |
setq(VV[51],(*(LnkLI255))());} |
setq(VV[51],(*(LnkLI255))());} |
758 |
goto T207; |
goto T207; |
759 |
goto T211; |
goto T211; |
760 |
T211:; |
T211:; |
761 |
if(((*(LnkLI9))((V107),VV[25]))==Cnil){ |
if(((*(LnkLI10))((V107),VV[25]))==Cnil){ |
762 |
goto T214;} |
goto T214;} |
763 |
(void)((*(LnkLI257))()); |
(void)((*(LnkLI257))()); |
764 |
goto T207; |
goto T207; |
765 |
goto T214; |
goto T214; |
766 |
T214:; |
T214:; |
767 |
if(((*(LnkLI9))((V107),VV[79]))==Cnil){ |
if(((*(LnkLI10))((V107),VV[79]))==Cnil){ |
768 |
goto T217;} |
goto T217;} |
769 |
{register object V109; |
{register object V109; |
770 |
V110= (*(LnkLI255))(); |
V110= (*(LnkLI255))(); |
773 |
goto T207;} |
goto T207;} |
774 |
goto T217; |
goto T217; |
775 |
T217:; |
T217:; |
776 |
if(((*(LnkLI9))((V107),VV[82]))==Cnil){ |
if(((*(LnkLI10))((V107),VV[82]))==Cnil){ |
777 |
goto T222;} |
goto T222;} |
778 |
{register object V111; |
{register object V111; |
779 |
V112= (*(LnkLI255))(); |
V112= (*(LnkLI255))(); |
782 |
goto T207;} |
goto T207;} |
783 |
goto T222; |
goto T222; |
784 |
T222:; |
T222:; |
785 |
if(((*(LnkLI9))((V107),VV[56]))==Cnil){ |
if(((*(LnkLI10))((V107),VV[56]))==Cnil){ |
786 |
goto T227;} |
goto T227;} |
787 |
V113= (*(LnkLI258))(); |
V113= (*(LnkLI258))(); |
788 |
setq(VV[49],append(/* INLINE-ARGS */V113,symbol_value(VV[49]))); |
setq(VV[49],append(/* INLINE-ARGS */V113,symbol_value(VV[49]))); |
789 |
goto T207; |
goto T207; |
790 |
goto T227; |
goto T227; |
791 |
T227:; |
T227:; |
792 |
if(((*(LnkLI9))((V107),VV[84]))==Cnil){ |
if(((*(LnkLI10))((V107),VV[84]))==Cnil){ |
793 |
goto T231;} |
goto T231;} |
794 |
V114= (*(LnkLI259))(); |
V114= (*(LnkLI259))(); |
795 |
setq(VV[49],append(/* INLINE-ARGS */V114,symbol_value(VV[49]))); |
setq(VV[49],append(/* INLINE-ARGS */V114,symbol_value(VV[49]))); |
840 |
T248:; |
T248:; |
841 |
{register object V121; |
{register object V121; |
842 |
V121= (*(LnkLI13))((V120)); |
V121= (*(LnkLI13))((V120)); |
843 |
if(((*(LnkLI9))((V121),VV[86]))==Cnil){ |
if(((*(LnkLI10))((V121),VV[86]))==Cnil){ |
844 |
goto T257;} |
goto T257;} |
845 |
(void)((*(LnkLI262))((V120))); |
(void)((*(LnkLI262))((V120))); |
846 |
goto T254; |
goto T254; |
847 |
goto T257; |
goto T257; |
848 |
T257:; |
T257:; |
849 |
if(((*(LnkLI9))((V121),Cnil))==Cnil){ |
if(((*(LnkLI10))((V121),Cnil))==Cnil){ |
850 |
goto T260;} |
goto T260;} |
851 |
goto T254; |
goto T254; |
852 |
goto T260; |
goto T260; |
853 |
T260:; |
T260:; |
854 |
if(((*(LnkLI9))((V121),VV[87]))==Cnil){ |
if(((*(LnkLI10))((V121),VV[87]))==Cnil){ |
855 |
goto T263;} |
goto T263;} |
856 |
(void)((VFUN_NARGS=0,(*(LnkLI263))())); |
(void)((VFUN_NARGS=0,(*(LnkLI263))())); |
857 |
goto T254; |
goto T254; |
858 |
goto T263; |
goto T263; |
859 |
T263:; |
T263:; |
860 |
if(((*(LnkLI9))((V121),VV[77]))==Cnil){ |
if(((*(LnkLI10))((V121),VV[77]))==Cnil){ |
861 |
goto T266;} |
goto T266;} |
862 |
V122= (*(LnkLI255))(); |
V122= (*(LnkLI255))(); |
863 |
(void)((VFUN_NARGS=2,(*(LnkLI264))(/* INLINE-ARGS */V122,Ct))); |
(void)((VFUN_NARGS=2,(*(LnkLI264))(/* INLINE-ARGS */V122,Ct))); |
864 |
goto T254; |
goto T254; |
865 |
goto T266; |
goto T266; |
866 |
T266:; |
T266:; |
867 |
if(((*(LnkLI9))((V121),VV[88]))==Cnil){ |
if(((*(LnkLI10))((V121),VV[88]))==Cnil){ |
868 |
goto T269;} |
goto T269;} |
869 |
setq(VV[47],(*(LnkLI255))()); |
setq(VV[47],(*(LnkLI255))()); |
870 |
goto T254; |
goto T254; |
871 |
goto T269; |
goto T269; |
872 |
T269:; |
T269:; |
873 |
if(((*(LnkLI9))((V121),VV[89]))==Cnil){ |
if(((*(LnkLI10))((V121),VV[89]))==Cnil){ |
874 |
goto T273;} |
goto T273;} |
875 |
V123= (*(LnkLI258))(); |
V123= (*(LnkLI258))(); |
876 |
setq(VV[42],append(/* INLINE-ARGS */V123,symbol_value(VV[42]))); |
setq(VV[42],append(/* INLINE-ARGS */V123,symbol_value(VV[42]))); |
877 |
goto T254; |
goto T254; |
878 |
goto T273; |
goto T273; |
879 |
T273:; |
T273:; |
880 |
if(((*(LnkLI9))((V121),VV[90]))==Cnil){ |
if(((*(LnkLI10))((V121),VV[90]))==Cnil){ |
881 |
goto T277;} |
goto T277;} |
882 |
V124= (*(LnkLI258))(); |
V124= (*(LnkLI258))(); |
883 |
setq(VV[41],append(/* INLINE-ARGS */V124,symbol_value(VV[41]))); |
setq(VV[41],append(/* INLINE-ARGS */V124,symbol_value(VV[41]))); |
884 |
goto T254; |
goto T254; |
885 |
goto T277; |
goto T277; |
886 |
T277:; |
T277:; |
887 |
if(((*(LnkLI9))((V121),VV[91]))==Cnil){ |
if(((*(LnkLI10))((V121),VV[91]))==Cnil){ |
888 |
goto T281;} |
goto T281;} |
889 |
(void)((VFUN_NARGS=2,(*(LnkLI263))(Cnil,Ct))); |
(void)((VFUN_NARGS=2,(*(LnkLI263))(Cnil,Ct))); |
890 |
goto T254; |
goto T254; |
951 |
{object V129; |
{object V129; |
952 |
V130= (*(LnkLI254))(); |
V130= (*(LnkLI254))(); |
953 |
V129= (*(LnkLI13))(/* INLINE-ARGS */V130); |
V129= (*(LnkLI13))(/* INLINE-ARGS */V130); |
954 |
if(((*(LnkLI9))((V129),VV[94]))==Cnil){ |
if(((*(LnkLI10))((V129),VV[94]))==Cnil){ |
955 |
goto T307;} |
goto T307;} |
956 |
(void)((*(LnkLI255))()); |
(void)((*(LnkLI255))()); |
957 |
if(!(type_of((V128))==t_symbol)){ |
if(!(type_of((V128))==t_symbol)){ |
977 |
{object V132; |
{object V132; |
978 |
V133= (*(LnkLI254))(); |
V133= (*(LnkLI254))(); |
979 |
V132= (*(LnkLI13))(/* INLINE-ARGS */V133); |
V132= (*(LnkLI13))(/* INLINE-ARGS */V133); |
980 |
if(((*(LnkLI9))((V132),VV[5]))==Cnil){ |
if(((*(LnkLI10))((V132),VV[5]))==Cnil){ |
981 |
goto T317;} |
goto T317;} |
982 |
(void)((*(LnkLI255))()); |
(void)((*(LnkLI255))()); |
983 |
{object V134; |
{object V134; |
984 |
V135= (*(LnkLI255))(); |
V135= (*(LnkLI255))(); |
985 |
V134= (*(LnkLI13))(/* INLINE-ARGS */V135); |
V134= (*(LnkLI13))(/* INLINE-ARGS */V135); |
986 |
if(((*(LnkLI9))((V134),VV[87]))==Cnil){ |
if(((*(LnkLI10))((V134),VV[87]))==Cnil){ |
987 |
goto T322;} |
goto T322;} |
988 |
{object V136 = (VFUN_NARGS=1,(*(LnkLI263))(Ct)); |
{object V136 = (VFUN_NARGS=1,(*(LnkLI263))(Ct)); |
989 |
VMR23(V136)} |
VMR23(V136)} |
990 |
goto T322; |
goto T322; |
991 |
T322:; |
T322:; |
992 |
if(((*(LnkLI9))((V134),VV[91]))==Cnil){ |
if(((*(LnkLI10))((V134),VV[91]))==Cnil){ |
993 |
goto T325;} |
goto T325;} |
994 |
{object V137 = (VFUN_NARGS=2,(*(LnkLI263))(Ct,Ct)); |
{object V137 = (VFUN_NARGS=2,(*(LnkLI263))(Ct,Ct)); |
995 |
VMR23(V137)} |
VMR23(V137)} |
1060 |
TTL:; |
TTL:; |
1061 |
{object V146; |
{object V146; |
1062 |
V146= (*(LnkLI13))((V145)); |
V146= (*(LnkLI13))((V145)); |
1063 |
if(((*(LnkLI9))((V146),VV[97]))==Cnil){ |
if(((*(LnkLI10))((V146),VV[97]))==Cnil){ |
1064 |
goto T350;} |
goto T350;} |
1065 |
{object V147; |
{object V147; |
1066 |
V147= (*(LnkLI258))(); |
V147= (*(LnkLI258))(); |
1139 |
goto T356;}} |
goto T356;}} |
1140 |
goto T350; |
goto T350; |
1141 |
T350:; |
T350:; |
1142 |
if(((*(LnkLI9))((V146),VV[99]))==Cnil){ |
if(((*(LnkLI10))((V146),VV[99]))==Cnil){ |
1143 |
goto T386;} |
goto T386;} |
1144 |
V154= (*(LnkLI258))(); |
V154= (*(LnkLI258))(); |
1145 |
setq(VV[43],append(/* INLINE-ARGS */V154,symbol_value(VV[43]))); |
setq(VV[43],append(/* INLINE-ARGS */V154,symbol_value(VV[43]))); |
1206 |
goto T403; |
goto T403; |
1207 |
goto T410; |
goto T410; |
1208 |
T410:; |
T410:; |
1209 |
if(((*(LnkLI9))((V160),VV[101]))==Cnil){ |
if(((*(LnkLI10))((V160),VV[101]))==Cnil){ |
1210 |
goto T419;} |
goto T419;} |
1211 |
if(!(eql(VV[100],(V158)))){ |
if(!(eql(VV[100],(V158)))){ |
1212 |
goto T422;} |
goto T422;} |
1222 |
goto T403; |
goto T403; |
1223 |
goto T419; |
goto T419; |
1224 |
T419:; |
T419:; |
1225 |
if(((*(LnkLI9))((V160),VV[56]))==Cnil){ |
if(((*(LnkLI10))((V160),VV[56]))==Cnil){ |
1226 |
goto T428;} |
goto T428;} |
1227 |
if(!(eql(VV[100],(V158)))){ |
if(!(eql(VV[100],(V158)))){ |
1228 |
goto T431;} |
goto T431;} |
1238 |
goto T403; |
goto T403; |
1239 |
goto T428; |
goto T428; |
1240 |
T428:; |
T428:; |
1241 |
if(((*(LnkLI9))((V160),VV[5]))==Cnil){ |
if(((*(LnkLI10))((V160),VV[5]))==Cnil){ |
1242 |
goto T437;} |
goto T437;} |
1243 |
if(!(eql(VV[5],(V158)))){ |
if(!(eql(VV[5],(V158)))){ |
1244 |
goto T440;} |
goto T440;} |
1293 |
V167= Cnil; |
V167= Cnil; |
1294 |
V168= Cnil; |
V168= Cnil; |
1295 |
{object V169; |
{object V169; |
1296 |
if(((*(LnkLI9))(symbol_value(VV[35]),VV[104]))==Cnil){ |
if(((*(LnkLI10))(symbol_value(VV[35]),VV[104]))==Cnil){ |
1297 |
goto T453;} |
goto T453;} |
1298 |
V169= list(2,VV[105],(*(LnkLI255))()); |
V169= list(2,VV[105],(*(LnkLI255))()); |
1299 |
goto T451; |
goto T451; |
1306 |
{object V170; |
{object V170; |
1307 |
V171= (*(LnkLI254))(); |
V171= (*(LnkLI254))(); |
1308 |
V170= (*(LnkLI13))(/* INLINE-ARGS */V171); |
V170= (*(LnkLI13))(/* INLINE-ARGS */V171); |
1309 |
if(((*(LnkLI9))((V170),VV[106]))==Cnil){ |
if(((*(LnkLI10))((V170),VV[106]))==Cnil){ |
1310 |
goto T457;} |
goto T457;} |
1311 |
(void)((*(LnkLI255))()); |
(void)((*(LnkLI255))()); |
1312 |
V167= Ct; |
V167= Ct; |
1396 |
{object V194; |
{object V194; |
1397 |
V195= (*(LnkLI255))(); |
V195= (*(LnkLI255))(); |
1398 |
V194= (*(LnkLI13))(/* INLINE-ARGS */V195); |
V194= (*(LnkLI13))(/* INLINE-ARGS */V195); |
1399 |
if(((*(LnkLI9))((V194),VV[108]))==Cnil){ |
if(((*(LnkLI10))((V194),VV[108]))==Cnil){ |
1400 |
goto T485;} |
goto T485;} |
1401 |
V189= (*(LnkLI255))(); |
V189= (*(LnkLI255))(); |
1402 |
(void)((VFUN_NARGS=6,(*(LnkLI267))((V189),Cnil,Cnil,Ct,Cnil,Ct))); |
(void)((VFUN_NARGS=6,(*(LnkLI267))((V189),Cnil,Cnil,Ct,Cnil,Ct))); |
1421 |
T482:; |
T482:; |
1422 |
{object V197; |
{object V197; |
1423 |
V197= (*(LnkLI13))((V192)); |
V197= (*(LnkLI13))((V192)); |
1424 |
if(((*(LnkLI9))((V197),VV[110]))==Cnil){ |
if(((*(LnkLI10))((V197),VV[110]))==Cnil){ |
1425 |
goto T497;} |
goto T497;} |
1426 |
V190= (*(LnkLI270))((V189)); |
V190= (*(LnkLI270))((V189)); |
1427 |
if((symbol_value(VV[111]))==Cnil){ |
if((symbol_value(VV[111]))==Cnil){ |
1440 |
T503:; |
T503:; |
1441 |
{object V199; |
{object V199; |
1442 |
V199= (*(LnkLI13))((V192)); |
V199= (*(LnkLI13))((V192)); |
1443 |
if(((*(LnkLI9))((V199),VV[114]))==Cnil){ |
if(((*(LnkLI10))((V199),VV[114]))==Cnil){ |
1444 |
goto T497;} |
goto T497;} |
1445 |
if(!(type_of((V193))==t_cons||((V193))==Cnil)){ |
if(!(type_of((V193))==t_cons||((V193))==Cnil)){ |
1446 |
goto T515;} |
goto T515;} |
1470 |
{object V201; |
{object V201; |
1471 |
{object V202; |
{object V202; |
1472 |
V202= (*(LnkLI13))((V192)); |
V202= (*(LnkLI13))((V192)); |
1473 |
if(((*(LnkLI9))((V202),VV[117]))==Cnil){ |
if(((*(LnkLI10))((V202),VV[117]))==Cnil){ |
1474 |
goto T533;} |
goto T533;} |
1475 |
{object V203; |
{object V203; |
1476 |
V204= list(3,VV[15],list(2,VV[18],(V190)),(V191)); |
V204= list(3,VV[15],list(2,VV[18],(V190)),(V191)); |
1487 |
goto T530;} |
goto T530;} |
1488 |
goto T533; |
goto T533; |
1489 |
T533:; |
T533:; |
1490 |
if(((*(LnkLI9))((V202),VV[27]))==Cnil){ |
if(((*(LnkLI10))((V202),VV[27]))==Cnil){ |
1491 |
goto T540;} |
goto T540;} |
1492 |
if((symbol_value(VV[111]))==Cnil){ |
if((symbol_value(VV[111]))==Cnil){ |
1493 |
goto T543;} |
goto T543;} |
1505 |
goto T540; |
goto T540; |
1506 |
T540:; |
T540:; |
1507 |
V192= (*(LnkLI13))((V192)); |
V192= (*(LnkLI13))((V192)); |
1508 |
if(((VFUN_NARGS=4,(*(LnkLI249))((V192),symbol_value(VV[28]),VV[30],VV[9])))==Cnil){ |
if(((VFUN_NARGS=4,(*(LnkLI249))((V192),symbol_value(VV[28]),VV[30],VV[10])))==Cnil){ |
1509 |
goto T548;} |
goto T548;} |
1510 |
V201= (*(LnkLI271))((V192),(V189),(V191)); |
V201= (*(LnkLI271))((V192),(V189),(V191)); |
1511 |
goto T530; |
goto T530; |
1545 |
V222= Cnil; |
V222= Cnil; |
1546 |
{object V223; |
{object V223; |
1547 |
object V224; |
object V224; |
1548 |
V223= (VFUN_NARGS=4,(*(LnkLI249))((V219),symbol_value(VV[28]),VV[30],VV[9])); |
V223= (VFUN_NARGS=4,(*(LnkLI249))((V219),symbol_value(VV[28]),VV[30],VV[10])); |
1549 |
V224= get((V223),VV[121],Cnil); |
V224= get((V223),VV[121],Cnil); |
1550 |
{object V225; |
{object V225; |
1551 |
V225= ( |
V225= ( |
1571 |
goto T567; |
goto T567; |
1572 |
goto T571; |
goto T571; |
1573 |
T571:; |
T571:; |
1574 |
if(((*(LnkLI9))((V227),VV[56]))==Cnil){ |
if(((*(LnkLI10))((V227),VV[56]))==Cnil){ |
1575 |
goto T574;} |
goto T574;} |
1576 |
V222= (*(LnkLI258))(); |
V222= (*(LnkLI258))(); |
1577 |
goto T567; |
goto T567; |
1796 |
V249= (V240); |
V249= (V240); |
1797 |
goto T648; |
goto T648; |
1798 |
T648:; |
T648:; |
1799 |
V250= list(3,VV[80],list(3,VV[129],V249,list(2,VV[10],(V242))),VV[130]); |
V250= list(3,VV[80],list(3,VV[129],V249,list(2,VV[9],(V242))),VV[130]); |
1800 |
if((V246)!=Cnil){ |
if((V246)!=Cnil){ |
1801 |
V251= (V246); |
V251= (V246); |
1802 |
goto T655;} |
goto T655;} |
2366 |
T854:; |
T854:; |
2367 |
{register object V330; |
{register object V330; |
2368 |
V330= (*(LnkLI13))((V329)); |
V330= (*(LnkLI13))((V329)); |
2369 |
if(((*(LnkLI9))((V330),VV[136]))==Cnil){ |
if(((*(LnkLI10))((V330),VV[136]))==Cnil){ |
2370 |
goto T860;} |
goto T860;} |
2371 |
{object V331; |
{object V331; |
2372 |
base[1]= VV[137]; |
base[1]= VV[137]; |
2385 |
goto T857;} |
goto T857;} |
2386 |
goto T860; |
goto T860; |
2387 |
T860:; |
T860:; |
2388 |
if(((*(LnkLI9))((V330),VV[141]))==Cnil){ |
if(((*(LnkLI10))((V330),VV[141]))==Cnil){ |
2389 |
goto T873;} |
goto T873;} |
2390 |
{register object V334; |
{register object V334; |
2391 |
if(!(type_of((V326))==t_symbol)){ |
if(!(type_of((V326))==t_symbol)){ |
2416 |
goto T857;} |
goto T857;} |
2417 |
goto T873; |
goto T873; |
2418 |
T873:; |
T873:; |
2419 |
if(((*(LnkLI9))((V330),VV[143]))==Cnil){ |
if(((*(LnkLI10))((V330),VV[143]))==Cnil){ |
2420 |
goto T891;} |
goto T891;} |
2421 |
V337= (*(LnkLI255))(); |
V337= (*(LnkLI255))(); |
2422 |
V325= (VFUN_NARGS=6,(*(LnkLI274))((V325),(V326),/* INLINE-ARGS */V337,Cnil,Cnil,VV[144])); |
V325= (VFUN_NARGS=6,(*(LnkLI274))((V325),(V326),/* INLINE-ARGS */V337,Cnil,Cnil,VV[144])); |
2423 |
goto T857; |
goto T857; |
2424 |
goto T891; |
goto T891; |
2425 |
T891:; |
T891:; |
2426 |
if(((*(LnkLI9))((V330),VV[145]))==Cnil){ |
if(((*(LnkLI10))((V330),VV[145]))==Cnil){ |
2427 |
goto T895;} |
goto T895;} |
2428 |
V338= (*(LnkLI255))(); |
V338= (*(LnkLI255))(); |
2429 |
V325= (VFUN_NARGS=6,(*(LnkLI274))((V325),(V326),/* INLINE-ARGS */V338,Cnil,Cnil,VV[146])); |
V325= (VFUN_NARGS=6,(*(LnkLI274))((V325),(V326),/* INLINE-ARGS */V338,Cnil,Cnil,VV[146])); |
2430 |
goto T857; |
goto T857; |
2431 |
goto T895; |
goto T895; |
2432 |
T895:; |
T895:; |
2433 |
if(((*(LnkLI9))((V330),VV[147]))==Cnil){ |
if(((*(LnkLI10))((V330),VV[147]))==Cnil){ |
2434 |
goto T899;} |
goto T899;} |
2435 |
V324= (*(LnkLI255))(); |
V324= (*(LnkLI255))(); |
2436 |
if(((V325))==Cnil){ |
if(((V325))==Cnil){ |
2486 |
goto T857; |
goto T857; |
2487 |
goto T899; |
goto T899; |
2488 |
T899:; |
T899:; |
2489 |
if(((*(LnkLI9))((V330),VV[157]))==Cnil){ |
if(((*(LnkLI10))((V330),VV[157]))==Cnil){ |
2490 |
goto T931;} |
goto T931;} |
2491 |
V342= (*(LnkLI255))(); |
V342= (*(LnkLI255))(); |
2492 |
V325= (VFUN_NARGS=6,(*(LnkLI274))((V325),(V326),Cnil,/* INLINE-ARGS */V342,Cnil,VV[144])); |
V325= (VFUN_NARGS=6,(*(LnkLI274))((V325),(V326),Cnil,/* INLINE-ARGS */V342,Cnil,VV[144])); |
2493 |
goto T857; |
goto T857; |
2494 |
goto T931; |
goto T931; |
2495 |
T931:; |
T931:; |
2496 |
if(((*(LnkLI9))((V330),VV[158]))==Cnil){ |
if(((*(LnkLI10))((V330),VV[158]))==Cnil){ |
2497 |
goto T935;} |
goto T935;} |
2498 |
V343= (*(LnkLI255))(); |
V343= (*(LnkLI255))(); |
2499 |
V325= (VFUN_NARGS=6,(*(LnkLI274))((V325),(V326),Cnil,/* INLINE-ARGS */V343,Cnil,VV[146])); |
V325= (VFUN_NARGS=6,(*(LnkLI274))((V325),(V326),Cnil,/* INLINE-ARGS */V343,Cnil,VV[146])); |
2500 |
goto T857; |
goto T857; |
2501 |
goto T935; |
goto T935; |
2502 |
T935:; |
T935:; |
2503 |
if(((*(LnkLI9))((V330),VV[159]))==Cnil){ |
if(((*(LnkLI10))((V330),VV[159]))==Cnil){ |
2504 |
goto T939;} |
goto T939;} |
2505 |
V344= (*(LnkLI255))(); |
V344= (*(LnkLI255))(); |
2506 |
V325= (VFUN_NARGS=7,(*(LnkLI274))((V325),(V326),Cnil,/* INLINE-ARGS */V344,Cnil,Cnil,Ct)); |
V325= (VFUN_NARGS=7,(*(LnkLI274))((V325),(V326),Cnil,/* INLINE-ARGS */V344,Cnil,Cnil,Ct)); |
2905 |
V400= Cnil; |
V400= Cnil; |
2906 |
goto T1111; |
goto T1111; |
2907 |
T1111:; |
T1111:; |
2908 |
if(((*(LnkLI9))((V399),VV[77]))!=Cnil){ |
if(((*(LnkLI10))((V399),VV[77]))!=Cnil){ |
2909 |
goto T1112;} |
goto T1112;} |
2910 |
(void)((*(LnkLI266))()); |
(void)((*(LnkLI266))()); |
2911 |
if((V400)==Cnil){ |
if((V400)==Cnil){ |
3063 |
if((V416)==Cnil){ |
if((V416)==Cnil){ |
3064 |
V423= Cnil; |
V423= Cnil; |
3065 |
goto T1162;} |
goto T1162;} |
3066 |
V424= list(3,VV[191],list(2,VV[10],(V412)),(V416)); |
V424= list(3,VV[191],list(2,VV[9],(V412)),(V416)); |
3067 |
V423= make_cons(/* INLINE-ARGS */V424,Cnil); |
V423= make_cons(/* INLINE-ARGS */V424,Cnil); |
3068 |
goto T1162; |
goto T1162; |
3069 |
T1162:; |
T1162:; |
3070 |
V425= list(2,VV[10],(V412)); |
V425= list(2,VV[9],(V412)); |
3071 |
base[3]= Cnil; |
base[3]= Cnil; |
3072 |
base[4]= VV[192]; |
base[4]= VV[192]; |
3073 |
base[5]= (V415); |
base[5]= (V415); |
3084 |
Lintern(); |
Lintern(); |
3085 |
vs_top=sup; |
vs_top=sup; |
3086 |
V426= vs_base[0]; |
V426= vs_base[0]; |
3087 |
V427= list(3,VV[7],/* INLINE-ARGS */V425,V426); |
V427= list(3,VV[7],/* INLINE-ARGS */V425,list(2,VV[9],V426)); |
3088 |
V428= list(3,VV[15],/* INLINE-ARGS */V427,list(2,VV[10],(V419))); |
V428= list(3,VV[15],/* INLINE-ARGS */V427,list(2,VV[9],(V419))); |
3089 |
V429= list(2,VV[10],(V412)); |
V429= list(2,VV[9],(V412)); |
3090 |
base[3]= Cnil; |
base[3]= Cnil; |
3091 |
base[4]= VV[194]; |
base[4]= VV[194]; |
3092 |
base[5]= (V415); |
base[5]= (V415); |
3103 |
Lintern(); |
Lintern(); |
3104 |
vs_top=sup; |
vs_top=sup; |
3105 |
V430= vs_base[0]; |
V430= vs_base[0]; |
3106 |
V431= list(3,VV[7],/* INLINE-ARGS */V429,V430); |
V431= list(3,VV[7],/* INLINE-ARGS */V429,list(2,VV[9],V430)); |
3107 |
V432= list(2,/* INLINE-ARGS */V428,list(3,VV[15],/* INLINE-ARGS */V431,list(2,VV[10],(V413)))); |
V432= list(2,/* INLINE-ARGS */V428,list(3,VV[15],/* INLINE-ARGS */V431,list(2,VV[9],(V413)))); |
3108 |
{object V433 = listA(4,VV[188],VV[189],/* INLINE-ARGS */V422,append(V423,/* INLINE-ARGS */V432)); |
{object V433 = listA(4,VV[188],VV[189],/* INLINE-ARGS */V422,append(V423,/* INLINE-ARGS */V432)); |
3109 |
bds_unwind1; |
bds_unwind1; |
3110 |
VMR43(V433)}} |
VMR43(V433)}} |
3365 |
{register object V517; |
{register object V517; |
3366 |
V517= (*(LnkLI13))(car((V515))); |
V517= (*(LnkLI13))(car((V515))); |
3367 |
{register object V518; |
{register object V518; |
3368 |
V518= (*(LnkLI9))((V517),VV[219]); |
V518= (*(LnkLI10))((V517),VV[219]); |
3369 |
if(((V518))==Cnil){ |
if(((V518))==Cnil){ |
3370 |
goto T1220;} |
goto T1220;} |
3371 |
goto T1216; |
goto T1216; |
3372 |
goto T1220; |
goto T1220; |
3373 |
T1220:; |
T1220:; |
3374 |
if(((*(LnkLI9))((V517),VV[220]))==Cnil){ |
if(((*(LnkLI10))((V517),VV[220]))==Cnil){ |
3375 |
goto T1223;} |
goto T1223;} |
3376 |
V513= Ct; |
V513= Ct; |
3377 |
goto T1216; |
goto T1216; |
3378 |
goto T1223; |
goto T1223; |
3379 |
T1223:; |
T1223:; |
3380 |
{register object V519; |
{register object V519; |
3381 |
V519= (*(LnkLI9))((V517),VV[147]); |
V519= (*(LnkLI10))((V517),VV[147]); |
3382 |
if(((V519))==Cnil){ |
if(((V519))==Cnil){ |
3383 |
goto T1228;} |
goto T1228;} |
3384 |
goto T1216; |
goto T1216; |
3427 |
{object V529; |
{object V529; |
3428 |
V530= (*(LnkLI254))(); |
V530= (*(LnkLI254))(); |
3429 |
V529= (*(LnkLI13))(/* INLINE-ARGS */V530); |
V529= (*(LnkLI13))(/* INLINE-ARGS */V530); |
3430 |
if(((*(LnkLI9))((V529),VV[223]))==Cnil){ |
if(((*(LnkLI10))((V529),VV[223]))==Cnil){ |
3431 |
goto T1246;} |
goto T1246;} |
3432 |
(void)((*(LnkLI255))()); |
(void)((*(LnkLI255))()); |
3433 |
V531= list(3,VV[139],(V527),(V528)); |
V531= list(3,VV[139],(V527),(V528)); |
3451 |
{object V536; |
{object V536; |
3452 |
V536= (*(LnkLI13))(car((V535))); |
V536= (*(LnkLI13))(car((V535))); |
3453 |
{object V537; |
{object V537; |
3454 |
V537= (*(LnkLI9))((V536),VV[25]); |
V537= (*(LnkLI10))((V536),VV[25]); |
3455 |
if(((V537))==Cnil){ |
if(((V537))==Cnil){ |
3456 |
goto T1253;} |
goto T1253;} |
3457 |
goto T1249; |
goto T1249; |
3689 |
goto T1470; |
goto T1470; |
3690 |
T1470:; |
T1470:; |
3691 |
{object V597; |
{object V597; |
3692 |
V598= list(3,VV[66],Cnil,list(3,VV[61],VV[225],list(2,VV[10],(V539)))); |
V598= list(3,VV[66],Cnil,list(3,VV[61],VV[225],list(2,VV[9],(V539)))); |
3693 |
V599= make_cons(/* INLINE-ARGS */V598,Cnil); |
V599= make_cons(/* INLINE-ARGS */V598,Cnil); |
3694 |
base[4]= nreverse(symbol_value(VV[48])); |
base[4]= nreverse(symbol_value(VV[48])); |
3695 |
if(((VV[53]->s.s_dbind))==Cnil){ |
if(((VV[53]->s.s_dbind))==Cnil){ |
3832 |
{ VMB61 VMS61 VMV61 |
{ VMB61 VMS61 VMV61 |
3833 |
goto TTL; |
goto TTL; |
3834 |
TTL:;{object V633; |
TTL:;{object V633; |
3835 |
V633= (*(LnkLI9))((V631),VV[223]); |
V633= (*(LnkLI10))((V631),VV[223]); |
3836 |
if(V633==Cnil)goto T1557; |
if(V633==Cnil)goto T1557; |
3837 |
goto T1556; |
goto T1556; |
3838 |
goto T1557; |
goto T1557; |
3857 |
{ VMB62 VMS62 VMV62 |
{ VMB62 VMS62 VMV62 |
3858 |
goto TTL; |
goto TTL; |
3859 |
TTL:;{object V644; |
TTL:;{object V644; |
3860 |
V644= (*(LnkLI9))((V642),VV[223]); |
V644= (*(LnkLI10))((V642),VV[223]); |
3861 |
if(V644==Cnil)goto T1561; |
if(V644==Cnil)goto T1561; |
3862 |
goto T1560; |
goto T1560; |
3863 |
goto T1561; |
goto T1561; |
4022 |
static object LnkTLI257(){return call_proc0(VV[257],(void **)&LnkLI257);} /* PARSE-LOOP-FOR */ |
static object LnkTLI257(){return call_proc0(VV[257],(void **)&LnkLI257);} /* PARSE-LOOP-FOR */ |
4023 |
static object LnkTLI256(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[256],(void **)&LnkLI256,1,ap);va_end(ap);return V1;} /* PARSE-NO-BODY */ |
static object LnkTLI256(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[256],(void **)&LnkLI256,1,ap);va_end(ap);return V1;} /* PARSE-NO-BODY */ |
4024 |
static object LnkTLI255(){return call_proc0(VV[255],(void **)&LnkLI255);} /* LOOP-POP */ |
static object LnkTLI255(){return call_proc0(VV[255],(void **)&LnkLI255);} /* LOOP-POP */ |
4025 |
static object LnkTLI9(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[9],(void **)&LnkLI9,2,ap);va_end(ap);return V1;} /* L-EQUAL */ |
static object LnkTLI10(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[10],(void **)&LnkLI10,2,ap);va_end(ap);return V1;} /* L-EQUAL */ |
4026 |
static object LnkTLI254(){return call_proc0(VV[254],(void **)&LnkLI254);} /* LOOP-PEEK */ |
static object LnkTLI254(){return call_proc0(VV[254],(void **)&LnkLI254);} /* LOOP-PEEK */ |
4027 |
static object LnkTLI13(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[13],(void **)&LnkLI13,1,ap);va_end(ap);return V1;} /* TRANSLATE-NAME */ |
static object LnkTLI13(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[13],(void **)&LnkLI13,1,ap);va_end(ap);return V1;} /* TRANSLATE-NAME */ |
4028 |
static object LnkTLI253(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[253],(void **)&LnkLI253,1,ap);va_end(ap);return V1;} /* LOOP-LET-BINDINGS */ |
static object LnkTLI253(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[253],(void **)&LnkLI253,1,ap);va_end(ap);return V1;} /* LOOP-LET-BINDINGS */ |