19 |
goto T2;} |
goto T2;} |
20 |
vs_top=(vs_base=base+2)+1; |
vs_top=(vs_base=base+2)+1; |
21 |
return; |
return; |
22 |
goto T2; |
goto T2; |
23 |
T2:; |
T2:; |
24 |
{register object V2; |
{register object V2; |
25 |
vs_base=vs_top; |
vs_base=vs_top; |
44 |
if(!(type_of((V7))==t_symbol)){ |
if(!(type_of((V7))==t_symbol)){ |
45 |
goto T5;} |
goto T5;} |
46 |
V7= symbol_name((V7)); |
V7= symbol_name((V7)); |
47 |
goto T5; |
goto T5; |
48 |
T5:; |
T5:; |
49 |
vs_base=vs_top; |
vs_base=vs_top; |
50 |
Llist_all_packages(); |
Llist_all_packages(); |
56 |
{object V11 = Cnil; |
{object V11 = Cnil; |
57 |
VMR2(V11)}} |
VMR2(V11)}} |
58 |
base[0]=V8=MMcons(Cnil,Cnil); |
base[0]=V8=MMcons(Cnil,Cnil); |
59 |
goto T9; |
goto T9; |
60 |
T9:; |
T9:; |
61 |
{object V13; |
{object V13; |
62 |
object V14; |
object V14; |
71 |
V14= vs_base[0]; |
V14= vs_base[0]; |
72 |
vs_top=sup; |
vs_top=sup; |
73 |
goto T17; |
goto T17; |
74 |
goto T15; |
goto T15; |
75 |
T15:; |
T15:; |
76 |
V13= Cnil; |
V13= Cnil; |
77 |
goto T16; |
goto T16; |
78 |
T16:; |
T16:; |
79 |
V14= Cnil; |
V14= Cnil; |
80 |
goto T17; |
goto T17; |
81 |
T17:; |
T17:; |
82 |
if(((V14))==(VV[6])){ |
if(((V14))==(VV[6])){ |
83 |
goto T18;} |
goto T18;} |
84 |
if(!(((V14))==(VV[7]))){ |
if(!(((V14))==(VV[7]))){ |
85 |
goto T19;} |
goto T19;} |
86 |
goto T18; |
goto T18; |
87 |
T18:; |
T18:; |
88 |
(V8->c.c_cdr)= make_cons((V13),Cnil); |
(V8->c.c_cdr)= make_cons((V13),Cnil); |
89 |
goto T11; |
goto T11; |
90 |
goto T19; |
goto T19; |
91 |
T19:; |
T19:; |
92 |
(V8->c.c_cdr)= Cnil;} |
(V8->c.c_cdr)= Cnil;} |
93 |
goto T11; |
goto T11; |
94 |
T11:; |
T11:; |
95 |
{object cdr_V8=MMcdr(V8);while(!endp(cdr_V8)) {cdr_V8=MMcdr(cdr_V8);V8=MMcdr(V8);}} |
{object cdr_V8=MMcdr(V8);while(!endp(cdr_V8)) {cdr_V8=MMcdr(cdr_V8);V8=MMcdr(V8);}} |
96 |
V9=MMcdr(V9); |
V9=MMcdr(V9); |
335 |
V75= number_minus(V78,V79); |
V75= number_minus(V78,V79); |
336 |
V76= make_fixnum((long)length((V73))); |
V76= make_fixnum((long)length((V73))); |
337 |
V77= small_fixnum(0); |
V77= small_fixnum(0); |
338 |
goto T50; |
goto T50; |
339 |
T50:; |
T50:; |
340 |
if(!(number_compare((V77),(V75))>0)){ |
if(!(number_compare((V77),(V75))>0)){ |
341 |
goto T51;} |
goto T51;} |
342 |
{object V80 = Cnil; |
{object V80 = Cnil; |
343 |
VMR6(V80)} |
VMR6(V80)} |
344 |
goto T51; |
goto T51; |
345 |
T51:; |
T51:; |
346 |
base[0]= (V73); |
base[0]= (V73); |
347 |
base[1]= (V74); |
base[1]= (V74); |
356 |
goto T55;} |
goto T55;} |
357 |
{object V81 = Ct; |
{object V81 = Ct; |
358 |
VMR6(V81)} |
VMR6(V81)} |
359 |
goto T55; |
goto T55; |
360 |
T55:; |
T55:; |
361 |
V77= one_plus((V77)); |
V77= one_plus((V77)); |
362 |
goto T50;} |
goto T50;} |
386 |
goto T73;} |
goto T73;} |
387 |
princ_str(" Special form",Cnil); |
princ_str(" Special form",Cnil); |
388 |
goto T68; |
goto T68; |
389 |
goto T73; |
goto T73; |
390 |
T73:; |
T73:; |
391 |
base[0]= (V83); |
base[0]= (V83); |
392 |
vs_top=(vs_base=base+0)+1; |
vs_top=(vs_base=base+0)+1; |
396 |
goto T77;} |
goto T77;} |
397 |
princ_str(" Macro",Cnil); |
princ_str(" Macro",Cnil); |
398 |
goto T68; |
goto T68; |
399 |
goto T77; |
goto T77; |
400 |
T77:; |
T77:; |
401 |
princ_str(" Function",Cnil); |
princ_str(" Function",Cnil); |
402 |
goto T68; |
goto T68; |
403 |
T68:; |
T68:; |
404 |
base[0]= (V83); |
base[0]= (V83); |
405 |
vs_top=(vs_base=base+0)+1; |
vs_top=(vs_base=base+0)+1; |
415 |
goto T86;} |
goto T86;} |
416 |
princ_str(" Constant: ",Cnil); |
princ_str(" Constant: ",Cnil); |
417 |
goto T84; |
goto T84; |
418 |
goto T86; |
goto T86; |
419 |
T86:; |
T86:; |
420 |
princ_str(" has value: ",Cnil); |
princ_str(" has value: ",Cnil); |
421 |
goto T84; |
goto T84; |
422 |
T84:; |
T84:; |
423 |
base[0]= (V83); |
base[0]= (V83); |
424 |
vs_top=(vs_base=base+0)+1; |
vs_top=(vs_base=base+0)+1; |
426 |
vs_top=sup; |
vs_top=sup; |
427 |
V84= vs_base[0]; |
V84= vs_base[0]; |
428 |
(void)(prin1(V84,Cnil)); |
(void)(prin1(V84,Cnil)); |
429 |
goto T80; |
goto T80; |
430 |
T80:; |
T80:; |
431 |
{object V85 = terpri(Cnil); |
{object V85 = terpri(Cnil); |
432 |
VMR7(V85)} |
VMR7(V85)} |
450 |
else { |
else { |
451 |
V88= first;} |
V88= first;} |
452 |
--narg; goto T92; |
--narg; goto T92; |
453 |
goto T91; |
goto T91; |
454 |
T91:; |
T91:; |
455 |
V88= Cnil; |
V88= Cnil; |
456 |
goto T92; |
goto T92; |
457 |
T92:; |
T92:; |
458 |
{register object V89; |
{register object V89; |
459 |
V89= Cnil; |
V89= Cnil; |
472 |
goto T106;} |
goto T106;} |
473 |
V90= V88; |
V90= V88; |
474 |
goto T104; |
goto T104; |
475 |
goto T106; |
goto T106; |
476 |
T106:; |
T106:; |
477 |
base[0]= coerce_to_string(V88); |
base[0]= coerce_to_string(V88); |
478 |
vs_top=(vs_base=base+0)+1; |
vs_top=(vs_base=base+0)+1; |
479 |
Lfind_package(); |
Lfind_package(); |
480 |
vs_top=sup; |
vs_top=sup; |
481 |
V90= vs_base[0]; |
V90= vs_base[0]; |
482 |
goto T104; |
goto T104; |
483 |
T104:; |
T104:; |
484 |
V91= Cnil; |
V91= Cnil; |
485 |
V92= Cnil; |
V92= Cnil; |
492 |
V96= vs_base[0]; |
V96= vs_base[0]; |
493 |
V94= make_cons((V90),V96); |
V94= make_cons((V90),V96); |
494 |
V95= car((V94)); |
V95= car((V94)); |
495 |
goto T115; |
goto T115; |
496 |
T115:; |
T115:; |
497 |
if(!(endp_prop((V94)))){ |
if(!(endp_prop((V94)))){ |
498 |
goto T116;} |
goto T116;} |
499 |
V91= Cnil; |
V91= Cnil; |
500 |
goto T103; |
goto T103; |
501 |
goto T116; |
goto T116; |
502 |
T116:; |
T116:; |
503 |
{long V97; |
{long V97; |
504 |
long V98; |
long V98; |
512 |
V98= fix(vs_base[0]); |
V98= fix(vs_base[0]); |
513 |
vs_top=sup; |
vs_top=sup; |
514 |
goto T127; |
goto T127; |
515 |
goto T125; |
goto T125; |
516 |
T125:; |
T125:; |
517 |
V97= fix(Cnil); |
V97= fix(Cnil); |
518 |
goto T126; |
goto T126; |
519 |
T126:; |
T126:; |
520 |
V98= fix(Cnil); |
V98= fix(Cnil); |
521 |
goto T127; |
goto T127; |
522 |
T127:; |
T127:; |
523 |
if(((V90))==((V95))){ |
if(((V90))==((V95))){ |
524 |
goto T128;} |
goto T128;} |
525 |
V98= 0; |
V98= 0; |
526 |
goto T128; |
goto T128; |
527 |
T128:; |
T128:; |
528 |
{object V99; |
{object V99; |
529 |
object V100; |
object V100; |
531 |
V102 = make_fixnum(V97); |
V102 = make_fixnum(V97); |
532 |
V99= number_plus(V101,V102); |
V99= number_plus(V101,V102); |
533 |
V100= small_fixnum(0); |
V100= small_fixnum(0); |
534 |
goto T135; |
goto T135; |
535 |
T135:; |
T135:; |
536 |
if(!(number_compare((V100),(V99))>=0)){ |
if(!(number_compare((V100),(V99))>=0)){ |
537 |
goto T136;} |
goto T136;} |
538 |
goto T122; |
goto T122; |
539 |
goto T136; |
goto T136; |
540 |
T136:; |
T136:; |
541 |
V103 = make_fixnum(V98); |
V103 = make_fixnum(V98); |
542 |
if(!(number_compare((V100),V103)<0)){ |
if(!(number_compare((V100),V103)<0)){ |
548 |
vs_top=sup; |
vs_top=sup; |
549 |
V92= vs_base[0]; |
V92= vs_base[0]; |
550 |
goto T143; |
goto T143; |
551 |
goto T145; |
goto T145; |
552 |
T145:; |
T145:; |
553 |
base[3]= (V95); |
base[3]= (V95); |
554 |
V104 = make_fixnum(V98); |
V104 = make_fixnum(V98); |
557 |
siLpackage_external(); |
siLpackage_external(); |
558 |
vs_top=sup; |
vs_top=sup; |
559 |
V92= vs_base[0]; |
V92= vs_base[0]; |
560 |
goto T143; |
goto T143; |
561 |
T143:; |
T143:; |
562 |
goto T141; |
goto T141; |
563 |
T141:; |
T141:; |
564 |
if(((V92))!=Cnil){ |
if(((V92))!=Cnil){ |
565 |
goto T151;} |
goto T151;} |
566 |
goto T142; |
goto T142; |
567 |
goto T151; |
goto T151; |
568 |
T151:; |
T151:; |
569 |
V91= car((V92)); |
V91= car((V92)); |
570 |
if(((V95))==((V90))){ |
if(((V95))==((V90))){ |
582 |
V105= vs_base[0]; |
V105= vs_base[0]; |
583 |
if(!((VV[31])==(car(V105)))){ |
if(!((VV[31])==(car(V105)))){ |
584 |
goto T156;} |
goto T156;} |
585 |
goto T157; |
goto T157; |
586 |
T157:; |
T157:; |
587 |
V106= coerce_to_string((V91)); |
V106= coerce_to_string((V91)); |
588 |
if(((*(LnkLI62))((V87),/* INLINE-ARGS */V106))==Cnil){ |
if(((*(LnkLI62))((V87),/* INLINE-ARGS */V106))==Cnil){ |
589 |
goto T166;} |
goto T166;} |
590 |
V89= make_cons((V91),(V89)); |
V89= make_cons((V91),(V89)); |
591 |
goto T166; |
goto T166; |
592 |
T166:; |
T166:; |
593 |
goto T156; |
goto T156; |
594 |
T156:; |
T156:; |
595 |
V92= cdr((V92)); |
V92= cdr((V92)); |
596 |
goto T141; |
goto T141; |
597 |
goto T142; |
goto T142; |
598 |
T142:; |
T142:; |
599 |
goto T139; |
goto T139; |
600 |
goto T139; |
goto T139; |
601 |
T139:; |
T139:; |
602 |
V100= one_plus((V100)); |
V100= one_plus((V100)); |
603 |
goto T135;}} |
goto T135;}} |
604 |
goto T122; |
goto T122; |
605 |
T122:; |
T122:; |
606 |
V94= cdr((V94)); |
V94= cdr((V94)); |
607 |
V95= car((V94)); |
V95= car((V94)); |
608 |
goto T115;}} |
goto T115;}} |
609 |
goto T103; |
goto T103; |
610 |
T103:; |
T103:; |
611 |
{object V107; |
{object V107; |
612 |
base[0]= (V88); |
base[0]= (V88); |
614 |
Lpackage_use_list(); |
Lpackage_use_list(); |
615 |
vs_top=sup; |
vs_top=sup; |
616 |
V107= vs_base[0]; |
V107= vs_base[0]; |
617 |
goto T183; |
goto T183; |
618 |
T183:; |
T183:; |
619 |
if(((V107))!=Cnil){ |
if(((V107))!=Cnil){ |
620 |
goto T184;} |
goto T184;} |
621 |
goto T99; |
goto T99; |
622 |
goto T184; |
goto T184; |
623 |
T184:; |
T184:; |
624 |
{object V108; |
{object V108; |
625 |
object V109; |
object V109; |
634 |
goto T192;} |
goto T192;} |
635 |
V108= (V111); |
V108= (V111); |
636 |
goto T189; |
goto T189; |
637 |
goto T192; |
goto T192; |
638 |
T192:; |
T192:; |
639 |
base[0]= coerce_to_string((V111)); |
base[0]= coerce_to_string((V111)); |
640 |
vs_top=(vs_base=base+0)+1; |
vs_top=(vs_base=base+0)+1; |
641 |
Lfind_package(); |
Lfind_package(); |
642 |
vs_top=sup; |
vs_top=sup; |
643 |
V108= vs_base[0];} |
V108= vs_base[0];} |
644 |
goto T189; |
goto T189; |
645 |
T189:; |
T189:; |
646 |
V109= Cnil; |
V109= Cnil; |
647 |
V110= Cnil; |
V110= Cnil; |
653 |
vs_top=sup; |
vs_top=sup; |
654 |
V112= vs_base[0]; |
V112= vs_base[0]; |
655 |
V113= small_fixnum(0); |
V113= small_fixnum(0); |
656 |
goto T200; |
goto T200; |
657 |
T200:; |
T200:; |
658 |
if(!(number_compare((V113),(V112))>=0)){ |
if(!(number_compare((V113),(V112))>=0)){ |
659 |
goto T201;} |
goto T201;} |
660 |
V109= Cnil; |
V109= Cnil; |
661 |
goto T188; |
goto T188; |
662 |
goto T201; |
goto T201; |
663 |
T201:; |
T201:; |
664 |
base[1]= (V108); |
base[1]= (V108); |
665 |
base[2]= (V113); |
base[2]= (V113); |
667 |
siLpackage_external(); |
siLpackage_external(); |
668 |
vs_top=sup; |
vs_top=sup; |
669 |
V110= vs_base[0]; |
V110= vs_base[0]; |
670 |
goto T208; |
goto T208; |
671 |
T208:; |
T208:; |
672 |
if(((V110))!=Cnil){ |
if(((V110))!=Cnil){ |
673 |
goto T213;} |
goto T213;} |
674 |
goto T209; |
goto T209; |
675 |
goto T213; |
goto T213; |
676 |
T213:; |
T213:; |
677 |
V109= car((V110)); |
V109= car((V110)); |
678 |
V114= coerce_to_string((V109)); |
V114= coerce_to_string((V109)); |
679 |
if(((*(LnkLI62))((V87),/* INLINE-ARGS */V114))==Cnil){ |
if(((*(LnkLI62))((V87),/* INLINE-ARGS */V114))==Cnil){ |
680 |
goto T218;} |
goto T218;} |
681 |
V89= make_cons((V109),(V89)); |
V89= make_cons((V109),(V89)); |
682 |
goto T218; |
goto T218; |
683 |
T218:; |
T218:; |
684 |
V110= cdr((V110)); |
V110= cdr((V110)); |
685 |
goto T208; |
goto T208; |
686 |
goto T209; |
goto T209; |
687 |
T209:; |
T209:; |
688 |
goto T206; |
goto T206; |
689 |
goto T206; |
goto T206; |
690 |
T206:; |
T206:; |
691 |
V113= one_plus((V113)); |
V113= one_plus((V113)); |
692 |
goto T200;}} |
goto T200;}} |
693 |
goto T188; |
goto T188; |
694 |
T188:; |
T188:; |
695 |
V107= cdr((V107)); |
V107= cdr((V107)); |
696 |
goto T183;} |
goto T183;} |
697 |
goto T101; |
goto T101; |
698 |
T101:; |
T101:; |
699 |
{object V115; |
{object V115; |
700 |
object V116; |
object V116; |
703 |
vs_top=sup; |
vs_top=sup; |
704 |
V115= vs_base[0]; |
V115= vs_base[0]; |
705 |
V116= car((V115)); |
V116= car((V115)); |
706 |
goto T233; |
goto T233; |
707 |
T233:; |
T233:; |
708 |
if(!(endp_prop((V115)))){ |
if(!(endp_prop((V115)))){ |
709 |
goto T234;} |
goto T234;} |
710 |
goto T99; |
goto T99; |
711 |
goto T234; |
goto T234; |
712 |
T234:; |
T234:; |
713 |
{object V117; |
{object V117; |
714 |
register object V118; |
register object V118; |
721 |
goto T241;} |
goto T241;} |
722 |
V117= V116; |
V117= V116; |
723 |
goto T239; |
goto T239; |
724 |
goto T241; |
goto T241; |
725 |
T241:; |
T241:; |
726 |
base[2]= coerce_to_string(V116); |
base[2]= coerce_to_string(V116); |
727 |
vs_top=(vs_base=base+2)+1; |
vs_top=(vs_base=base+2)+1; |
728 |
Lfind_package(); |
Lfind_package(); |
729 |
vs_top=sup; |
vs_top=sup; |
730 |
V117= vs_base[0]; |
V117= vs_base[0]; |
731 |
goto T239; |
goto T239; |
732 |
T239:; |
T239:; |
733 |
V118= Cnil; |
V118= Cnil; |
734 |
V119= Cnil; |
V119= Cnil; |
741 |
V123= vs_base[0]; |
V123= vs_base[0]; |
742 |
V121= make_cons((V117),V123); |
V121= make_cons((V117),V123); |
743 |
V122= car((V121)); |
V122= car((V121)); |
744 |
goto T250; |
goto T250; |
745 |
T250:; |
T250:; |
746 |
if(!(endp_prop((V121)))){ |
if(!(endp_prop((V121)))){ |
747 |
goto T251;} |
goto T251;} |
748 |
V118= Cnil; |
V118= Cnil; |
749 |
goto T238; |
goto T238; |
750 |
goto T251; |
goto T251; |
751 |
T251:; |
T251:; |
752 |
{long V124; |
{long V124; |
753 |
long V125; |
long V125; |
761 |
V125= fix(vs_base[0]); |
V125= fix(vs_base[0]); |
762 |
vs_top=sup; |
vs_top=sup; |
763 |
goto T262; |
goto T262; |
764 |
goto T260; |
goto T260; |
765 |
T260:; |
T260:; |
766 |
V124= fix(Cnil); |
V124= fix(Cnil); |
767 |
goto T261; |
goto T261; |
768 |
T261:; |
T261:; |
769 |
V125= fix(Cnil); |
V125= fix(Cnil); |
770 |
goto T262; |
goto T262; |
771 |
T262:; |
T262:; |
772 |
if(((V117))==((V122))){ |
if(((V117))==((V122))){ |
773 |
goto T263;} |
goto T263;} |
774 |
V125= 0; |
V125= 0; |
775 |
goto T263; |
goto T263; |
776 |
T263:; |
T263:; |
777 |
{object V126; |
{object V126; |
778 |
register object V127; |
register object V127; |
780 |
V129 = make_fixnum(V124); |
V129 = make_fixnum(V124); |
781 |
V126= number_plus(V128,V129); |
V126= number_plus(V128,V129); |
782 |
V127= small_fixnum(0); |
V127= small_fixnum(0); |
783 |
goto T270; |
goto T270; |
784 |
T270:; |
T270:; |
785 |
if(!(number_compare((V127),(V126))>=0)){ |
if(!(number_compare((V127),(V126))>=0)){ |
786 |
goto T271;} |
goto T271;} |
787 |
goto T257; |
goto T257; |
788 |
goto T271; |
goto T271; |
789 |
T271:; |
T271:; |
790 |
V130 = make_fixnum(V125); |
V130 = make_fixnum(V125); |
791 |
if(!(number_compare((V127),V130)<0)){ |
if(!(number_compare((V127),V130)<0)){ |
797 |
vs_top=sup; |
vs_top=sup; |
798 |
V119= vs_base[0]; |
V119= vs_base[0]; |
799 |
goto T278; |
goto T278; |
800 |
goto T280; |
goto T280; |
801 |
T280:; |
T280:; |
802 |
base[5]= (V122); |
base[5]= (V122); |
803 |
V131 = make_fixnum(V125); |
V131 = make_fixnum(V125); |
806 |
siLpackage_external(); |
siLpackage_external(); |
807 |
vs_top=sup; |
vs_top=sup; |
808 |
V119= vs_base[0]; |
V119= vs_base[0]; |
809 |
goto T278; |
goto T278; |
810 |
T278:; |
T278:; |
811 |
goto T276; |
goto T276; |
812 |
T276:; |
T276:; |
813 |
if(((V119))!=Cnil){ |
if(((V119))!=Cnil){ |
814 |
goto T286;} |
goto T286;} |
815 |
goto T277; |
goto T277; |
816 |
goto T286; |
goto T286; |
817 |
T286:; |
T286:; |
818 |
V118= car((V119)); |
V118= car((V119)); |
819 |
if(((V122))==((V117))){ |
if(((V122))==((V117))){ |
831 |
V132= vs_base[0]; |
V132= vs_base[0]; |
832 |
if(!((VV[31])==(car(V132)))){ |
if(!((VV[31])==(car(V132)))){ |
833 |
goto T291;} |
goto T291;} |
834 |
goto T292; |
goto T292; |
835 |
T292:; |
T292:; |
836 |
V133= coerce_to_string((V118)); |
V133= coerce_to_string((V118)); |
837 |
if(((*(LnkLI62))((V87),/* INLINE-ARGS */V133))==Cnil){ |
if(((*(LnkLI62))((V87),/* INLINE-ARGS */V133))==Cnil){ |
838 |
goto T302;} |
goto T302;} |
839 |
V89= make_cons((V118),(V89)); |
V89= make_cons((V118),(V89)); |
840 |
goto T302; |
goto T302; |
841 |
T302:; |
T302:; |
842 |
goto T291; |
goto T291; |
843 |
T291:; |
T291:; |
844 |
V119= cdr((V119)); |
V119= cdr((V119)); |
845 |
goto T276; |
goto T276; |
846 |
goto T277; |
goto T277; |
847 |
T277:; |
T277:; |
848 |
goto T274; |
goto T274; |
849 |
goto T274; |
goto T274; |
850 |
T274:; |
T274:; |
851 |
V127= one_plus((V127)); |
V127= one_plus((V127)); |
852 |
goto T270;}} |
goto T270;}} |
853 |
goto T257; |
goto T257; |
854 |
T257:; |
T257:; |
855 |
V121= cdr((V121)); |
V121= cdr((V121)); |
856 |
V122= car((V121)); |
V122= car((V121)); |
857 |
goto T250;}} |
goto T250;}} |
858 |
goto T238; |
goto T238; |
859 |
T238:; |
T238:; |
860 |
V115= cdr((V115)); |
V115= cdr((V115)); |
861 |
V116= car((V115)); |
V116= car((V115)); |
862 |
goto T233;} |
goto T233;} |
863 |
goto T99; |
goto T99; |
864 |
T99:; |
T99:; |
865 |
V134= symbol_function(VV[19]); |
V134= symbol_function(VV[19]); |
866 |
base[0]= (VFUN_NARGS=3,(*(LnkLI63))((V89),VV[43],V134)); |
base[0]= (VFUN_NARGS=3,(*(LnkLI63))((V89),VV[43],V134)); |
892 |
V137=(base[1]); |
V137=(base[1]); |
893 |
vs_top=sup; |
vs_top=sup; |
894 |
goto T327; |
goto T327; |
895 |
goto T326; |
goto T326; |
896 |
T326:; |
T326:; |
897 |
V137= Cnil; |
V137= Cnil; |
898 |
goto T327; |
goto T327; |
899 |
T327:; |
T327:; |
900 |
{register object V138; |
{register object V138; |
901 |
register object V139; |
register object V139; |
902 |
V138= (VFUN_NARGS=2,(*(LnkLI66))((V136),(V137))); |
V138= (VFUN_NARGS=2,(*(LnkLI66))((V136),(V137))); |
903 |
V139= car((V138)); |
V139= car((V138)); |
904 |
goto T333; |
goto T333; |
905 |
T333:; |
T333:; |
906 |
if(!(endp_prop((V138)))){ |
if(!(endp_prop((V138)))){ |
907 |
goto T334;} |
goto T334;} |
908 |
goto T329; |
goto T329; |
909 |
goto T334; |
goto T334; |
910 |
T334:; |
T334:; |
911 |
(void)((*(LnkLI67))((V139))); |
(void)((*(LnkLI67))((V139))); |
912 |
V138= cdr((V138)); |
V138= cdr((V138)); |
913 |
V139= car((V138)); |
V139= car((V138)); |
914 |
goto T333;} |
goto T333;} |
915 |
goto T329; |
goto T329; |
916 |
T329:; |
T329:; |
917 |
vs_base=vs_top=base+2; |
vs_base=vs_top=base+2; |
918 |
vs_base[0]=Cnil; |
vs_base[0]=Cnil; |
1001 |
vs_top=(vs_base=base+6)+2; |
vs_top=(vs_base=base+6)+2; |
1002 |
(void) (*Lnk68)(); |
(void) (*Lnk68)(); |
1003 |
vs_top=sup; |
vs_top=sup; |
1004 |
goto T355; |
goto T355; |
1005 |
T355:; |
T355:; |
1006 |
V151= list(2,VV[47],base[3]); |
V151= list(2,VV[47],base[3]); |
1007 |
V152= list(2,(V142),list(3,VV[10],Ct,list(4,VV[2],/* INLINE-ARGS */V151,list(2,VV[48],base[3]),base[3]))); |
V152= list(2,(V142),list(3,VV[10],Ct,list(4,VV[2],/* INLINE-ARGS */V151,list(2,VV[48],base[3]),base[3]))); |