2 |
#include "cmpinclude.h" |
#include "cmpinclude.h" |
3 |
#include "clcs_condition_definitions.h" |
#include "clcs_condition_definitions.h" |
4 |
void init_clcs_condition_definitions(){do_init(VV);} |
void init_clcs_condition_definitions(){do_init(VV);} |
5 |
/* local entry for function progn 'compile1789 */ |
/* local entry for function progn 'compile2182 */ |
6 |
|
|
7 |
static object LI1() |
static object LI1() |
8 |
|
|
20 |
base[0]=base[0]; |
base[0]=base[0]; |
21 |
return Cnil; |
return Cnil; |
22 |
} |
} |
23 |
/* local entry for function progn 'compile1789 */ |
/* local entry for function progn 'compile2202 */ |
24 |
|
|
25 |
static object LI2() |
static object LI2() |
26 |
|
|
84 |
base[0]=base[0]; |
base[0]=base[0]; |
85 |
return Cnil; |
return Cnil; |
86 |
} |
} |
87 |
/* function definition for Defclass WARNING1791 */ |
/* function definition for Defclass WARNING2248 */ |
88 |
|
|
89 |
static void L3() |
static void L3() |
90 |
{register object *base=vs_base; |
{register object *base=vs_base; |
103 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
104 |
return; |
return; |
105 |
} |
} |
106 |
/* local entry for function progn 'compile1791 */ |
/* local entry for function progn 'compile2264 */ |
107 |
|
|
108 |
static object LI4() |
static object LI4() |
109 |
|
|
118 |
base[0]=base[0]; |
base[0]=base[0]; |
119 |
return Cnil; |
return Cnil; |
120 |
} |
} |
121 |
/* local entry for function progn 'compile1792 */ |
/* local entry for function progn 'compile2281 */ |
122 |
|
|
123 |
static object LI5() |
static object LI5() |
124 |
|
|
136 |
base[0]=base[0]; |
base[0]=base[0]; |
137 |
return Cnil; |
return Cnil; |
138 |
} |
} |
139 |
/* local entry for function progn 'compile1792 */ |
/* local entry for function progn 'compile2305 */ |
140 |
|
|
141 |
static object LI6() |
static object LI6() |
142 |
|
|
148 |
VMR6(V11)} |
VMR6(V11)} |
149 |
return Cnil; |
return Cnil; |
150 |
} |
} |
151 |
/* local entry for function progn 'compile1792 */ |
/* local entry for function progn 'compile2317 */ |
152 |
|
|
153 |
static object LI7() |
static object LI7() |
154 |
|
|
159 |
VMR7(V12)} |
VMR7(V12)} |
160 |
return Cnil; |
return Cnil; |
161 |
} |
} |
162 |
/* function definition for Defclass SERIOUS-CONDITION1792 */ |
/* function definition for Defclass SERIOUS-CONDITION2337 */ |
163 |
|
|
164 |
static void L8() |
static void L8() |
165 |
{register object *base=vs_base; |
{register object *base=vs_base; |
178 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
179 |
return; |
return; |
180 |
} |
} |
181 |
/* local entry for function progn 'compile1792 */ |
/* local entry for function progn 'compile2353 */ |
182 |
|
|
183 |
static object LI9() |
static object LI9() |
184 |
|
|
193 |
base[0]=base[0]; |
base[0]=base[0]; |
194 |
return Cnil; |
return Cnil; |
195 |
} |
} |
196 |
/* local entry for function progn 'compile1793 */ |
/* local entry for function progn 'compile2370 */ |
197 |
|
|
198 |
static object LI10() |
static object LI10() |
199 |
|
|
211 |
base[0]=base[0]; |
base[0]=base[0]; |
212 |
return Cnil; |
return Cnil; |
213 |
} |
} |
214 |
/* local entry for function progn 'compile1793 */ |
/* local entry for function progn 'compile2394 */ |
215 |
|
|
216 |
static object LI11() |
static object LI11() |
217 |
|
|
223 |
VMR11(V16)} |
VMR11(V16)} |
224 |
return Cnil; |
return Cnil; |
225 |
} |
} |
226 |
/* local entry for function progn 'compile1793 */ |
/* local entry for function progn 'compile2406 */ |
227 |
|
|
228 |
static object LI12() |
static object LI12() |
229 |
|
|
234 |
VMR12(V17)} |
VMR12(V17)} |
235 |
return Cnil; |
return Cnil; |
236 |
} |
} |
237 |
/* function definition for Defclass ERROR1793 */ |
/* function definition for Defclass ERROR2426 */ |
238 |
|
|
239 |
static void L13() |
static void L13() |
240 |
{register object *base=vs_base; |
{register object *base=vs_base; |
253 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
254 |
return; |
return; |
255 |
} |
} |
256 |
/* local entry for function progn 'compile1793 */ |
/* local entry for function progn 'compile2442 */ |
257 |
|
|
258 |
static object LI14() |
static object LI14() |
259 |
|
|
268 |
base[0]=base[0]; |
base[0]=base[0]; |
269 |
return Cnil; |
return Cnil; |
270 |
} |
} |
271 |
/* local entry for function progn 'compile1794 */ |
/* local entry for function progn 'compile2459 */ |
272 |
|
|
273 |
static object LI15() |
static object LI15() |
274 |
|
|
286 |
base[0]=base[0]; |
base[0]=base[0]; |
287 |
return Cnil; |
return Cnil; |
288 |
} |
} |
289 |
/* local entry for function progn 'compile1794 */ |
/* local entry for function progn 'compile2483 */ |
290 |
|
|
291 |
static object LI16() |
static object LI16() |
292 |
|
|
298 |
VMR16(V21)} |
VMR16(V21)} |
299 |
return Cnil; |
return Cnil; |
300 |
} |
} |
301 |
/* local entry for function progn 'compile1794 */ |
/* local entry for function progn 'compile2495 */ |
302 |
|
|
303 |
static object LI17() |
static object LI17() |
304 |
|
|
343 |
return; |
return; |
344 |
} |
} |
345 |
} |
} |
346 |
/* function definition for Defclass SIMPLE-CONDITION1794 */ |
/* function definition for Defclass SIMPLE-CONDITION2523 */ |
347 |
|
|
348 |
static void L19() |
static void L19() |
349 |
{register object *base=vs_base; |
{register object *base=vs_base; |
378 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
379 |
return; |
return; |
380 |
} |
} |
381 |
/* local entry for function progn 'compile1796 */ |
/* local entry for function progn 'compile2541 */ |
382 |
|
|
383 |
static object LI20() |
static object LI20() |
384 |
|
|
393 |
base[0]=base[0]; |
base[0]=base[0]; |
394 |
return Cnil; |
return Cnil; |
395 |
} |
} |
396 |
/* local entry for function progn 'compile1797 */ |
/* local entry for function progn 'compile2558 */ |
397 |
|
|
398 |
static object LI21() |
static object LI21() |
399 |
|
|
411 |
base[0]=base[0]; |
base[0]=base[0]; |
412 |
return Cnil; |
return Cnil; |
413 |
} |
} |
414 |
/* local entry for function progn 'compile1797 */ |
/* local entry for function progn 'compile2582 */ |
415 |
|
|
416 |
static object LI22() |
static object LI22() |
417 |
|
|
423 |
VMR22(V31)} |
VMR22(V31)} |
424 |
return Cnil; |
return Cnil; |
425 |
} |
} |
426 |
/* local entry for function progn 'compile1797 */ |
/* local entry for function progn 'compile2598 */ |
427 |
|
|
428 |
static object LI23() |
static object LI23() |
429 |
|
|
605 |
T110:; |
T110:; |
606 |
base[4]= VV[47]; |
base[4]= VV[47]; |
607 |
vs_top=(vs_base=base+4)+1; |
vs_top=(vs_base=base+4)+1; |
608 |
Lerror(); |
(void) (*Lnk273)(); |
609 |
return; |
return; |
610 |
goto T107; |
goto T107; |
611 |
T107:; |
T107:; |
612 |
base[4]= (V35); |
base[4]= (V35); |
613 |
base[5]= (V36); |
base[5]= (V36); |
614 |
vs_top=(vs_base=base+4)+2; |
vs_top=(vs_base=base+4)+2; |
615 |
(void) (*Lnk273)(); |
(void) (*Lnk274)(); |
616 |
return; |
return; |
617 |
} |
} |
618 |
} |
} |
619 |
/* local entry for function progn 'compile1814 */ |
/* local entry for function progn 'compile2791 */ |
620 |
|
|
621 |
static object LI25() |
static object LI25() |
622 |
|
|
628 |
base[2]= Cnil; |
base[2]= Cnil; |
629 |
base[3]= VV[49]; |
base[3]= VV[49]; |
630 |
base[4]= VV[50]; |
base[4]= VV[50]; |
631 |
V50= symbol_function(VV[274]); |
V50= symbol_function(VV[275]); |
632 |
base[5]= listA(3,VV[51],V50,VV[52]); |
base[5]= listA(3,VV[51],V50,VV[52]); |
633 |
base[6]= Cnil; |
base[6]= Cnil; |
634 |
vs_top=(vs_base=base+0)+7; |
vs_top=(vs_base=base+0)+7; |
635 |
(void) (*Lnk275)(); |
(void) (*Lnk276)(); |
636 |
vs_top=sup; |
vs_top=sup; |
637 |
{object V51 = Cnil; |
{object V51 = Cnil; |
638 |
VMR25(V51)} |
VMR25(V51)} |
639 |
base[0]=base[0]; |
base[0]=base[0]; |
640 |
return Cnil; |
return Cnil; |
641 |
} |
} |
642 |
/* local entry for function progn 'compile1814 */ |
/* local entry for function progn 'compile2799 */ |
643 |
|
|
644 |
static object LI26() |
static object LI26() |
645 |
|
|
650 |
VMR26(V52)} |
VMR26(V52)} |
651 |
return Cnil; |
return Cnil; |
652 |
} |
} |
653 |
/* function definition for Defclass SIMPLE-WARNING1814 */ |
/* function definition for Defclass SIMPLE-WARNING2819 */ |
654 |
|
|
655 |
static void L27() |
static void L27() |
656 |
{register object *base=vs_base; |
{register object *base=vs_base; |
669 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
670 |
return; |
return; |
671 |
} |
} |
672 |
/* local entry for function progn 'compile1814 */ |
/* local entry for function progn 'compile2835 */ |
673 |
|
|
674 |
static object LI28() |
static object LI28() |
675 |
|
|
677 |
goto TTL; |
goto TTL; |
678 |
TTL:; |
TTL:; |
679 |
vs_base=vs_top; |
vs_base=vs_top; |
680 |
(void) (*Lnk276)(); |
(void) (*Lnk277)(); |
681 |
vs_top=sup; |
vs_top=sup; |
682 |
{object V53 = Cnil; |
{object V53 = Cnil; |
683 |
VMR28(V53)} |
VMR28(V53)} |
684 |
base[0]=base[0]; |
base[0]=base[0]; |
685 |
return Cnil; |
return Cnil; |
686 |
} |
} |
687 |
/* local entry for function progn 'compile1815 */ |
/* local entry for function progn 'compile2852 */ |
688 |
|
|
689 |
static object LI29() |
static object LI29() |
690 |
|
|
702 |
base[0]=base[0]; |
base[0]=base[0]; |
703 |
return Cnil; |
return Cnil; |
704 |
} |
} |
705 |
/* local entry for function progn 'compile1815 */ |
/* local entry for function progn 'compile2876 */ |
706 |
|
|
707 |
static object LI30() |
static object LI30() |
708 |
|
|
714 |
VMR30(V56)} |
VMR30(V56)} |
715 |
return Cnil; |
return Cnil; |
716 |
} |
} |
717 |
/* local entry for function progn 'compile1815 */ |
/* local entry for function progn 'compile2888 */ |
718 |
|
|
719 |
static object LI31() |
static object LI31() |
720 |
|
|
725 |
VMR31(V57)} |
VMR31(V57)} |
726 |
return Cnil; |
return Cnil; |
727 |
} |
} |
728 |
/* function definition for Defclass SIMPLE-ERROR1815 */ |
/* function definition for Defclass SIMPLE-ERROR2908 */ |
729 |
|
|
730 |
static void L32() |
static void L32() |
731 |
{register object *base=vs_base; |
{register object *base=vs_base; |
744 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
745 |
return; |
return; |
746 |
} |
} |
747 |
/* local entry for function progn 'compile1815 */ |
/* local entry for function progn 'compile2924 */ |
748 |
|
|
749 |
static object LI33() |
static object LI33() |
750 |
|
|
752 |
goto TTL; |
goto TTL; |
753 |
TTL:; |
TTL:; |
754 |
vs_base=vs_top; |
vs_base=vs_top; |
755 |
(void) (*Lnk277)(); |
(void) (*Lnk278)(); |
756 |
vs_top=sup; |
vs_top=sup; |
757 |
{object V58 = Cnil; |
{object V58 = Cnil; |
758 |
VMR33(V58)} |
VMR33(V58)} |
759 |
base[0]=base[0]; |
base[0]=base[0]; |
760 |
return Cnil; |
return Cnil; |
761 |
} |
} |
762 |
/* local entry for function progn 'compile1816 */ |
/* local entry for function progn 'compile2941 */ |
763 |
|
|
764 |
static object LI34() |
static object LI34() |
765 |
|
|
777 |
base[0]=base[0]; |
base[0]=base[0]; |
778 |
return Cnil; |
return Cnil; |
779 |
} |
} |
780 |
/* local entry for function progn 'compile1816 */ |
/* local entry for function progn 'compile2965 */ |
781 |
|
|
782 |
static object LI35() |
static object LI35() |
783 |
|
|
789 |
VMR35(V61)} |
VMR35(V61)} |
790 |
return Cnil; |
return Cnil; |
791 |
} |
} |
792 |
/* local entry for function progn 'compile1816 */ |
/* local entry for function progn 'compile2977 */ |
793 |
|
|
794 |
static object LI36() |
static object LI36() |
795 |
|
|
800 |
VMR36(V62)} |
VMR36(V62)} |
801 |
return Cnil; |
return Cnil; |
802 |
} |
} |
803 |
/* function definition for Defclass STORAGE-CONDITION1816 */ |
/* function definition for Defclass STORAGE-CONDITION2997 */ |
804 |
|
|
805 |
static void L37() |
static void L37() |
806 |
{register object *base=vs_base; |
{register object *base=vs_base; |
819 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
820 |
return; |
return; |
821 |
} |
} |
822 |
/* local entry for function progn 'compile1816 */ |
/* local entry for function progn 'compile3013 */ |
823 |
|
|
824 |
static object LI38() |
static object LI38() |
825 |
|
|
827 |
goto TTL; |
goto TTL; |
828 |
TTL:; |
TTL:; |
829 |
vs_base=vs_top; |
vs_base=vs_top; |
830 |
(void) (*Lnk278)(); |
(void) (*Lnk279)(); |
831 |
vs_top=sup; |
vs_top=sup; |
832 |
{object V63 = Cnil; |
{object V63 = Cnil; |
833 |
VMR38(V63)} |
VMR38(V63)} |
834 |
base[0]=base[0]; |
base[0]=base[0]; |
835 |
return Cnil; |
return Cnil; |
836 |
} |
} |
837 |
/* local entry for function progn 'compile1817 */ |
/* local entry for function progn 'compile3030 */ |
838 |
|
|
839 |
static object LI39() |
static object LI39() |
840 |
|
|
852 |
base[0]=base[0]; |
base[0]=base[0]; |
853 |
return Cnil; |
return Cnil; |
854 |
} |
} |
855 |
/* local entry for function progn 'compile1817 */ |
/* local entry for function progn 'compile3054 */ |
856 |
|
|
857 |
static object LI40() |
static object LI40() |
858 |
|
|
864 |
VMR40(V66)} |
VMR40(V66)} |
865 |
return Cnil; |
return Cnil; |
866 |
} |
} |
867 |
/* local entry for function progn 'compile1817 */ |
/* local entry for function progn 'compile3066 */ |
868 |
|
|
869 |
static object LI41() |
static object LI41() |
870 |
|
|
875 |
VMR41(V67)} |
VMR41(V67)} |
876 |
return Cnil; |
return Cnil; |
877 |
} |
} |
878 |
/* function definition for Defclass STACK-OVERFLOW1817 */ |
/* function definition for Defclass STACK-OVERFLOW3086 */ |
879 |
|
|
880 |
static void L42() |
static void L42() |
881 |
{register object *base=vs_base; |
{register object *base=vs_base; |
894 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
895 |
return; |
return; |
896 |
} |
} |
897 |
/* local entry for function progn 'compile1817 */ |
/* local entry for function progn 'compile3102 */ |
898 |
|
|
899 |
static object LI43() |
static object LI43() |
900 |
|
|
902 |
goto TTL; |
goto TTL; |
903 |
TTL:; |
TTL:; |
904 |
vs_base=vs_top; |
vs_base=vs_top; |
905 |
(void) (*Lnk279)(); |
(void) (*Lnk280)(); |
906 |
vs_top=sup; |
vs_top=sup; |
907 |
{object V68 = Cnil; |
{object V68 = Cnil; |
908 |
VMR43(V68)} |
VMR43(V68)} |
909 |
base[0]=base[0]; |
base[0]=base[0]; |
910 |
return Cnil; |
return Cnil; |
911 |
} |
} |
912 |
/* local entry for function progn 'compile1818 */ |
/* local entry for function progn 'compile3119 */ |
913 |
|
|
914 |
static object LI44() |
static object LI44() |
915 |
|
|
927 |
base[0]=base[0]; |
base[0]=base[0]; |
928 |
return Cnil; |
return Cnil; |
929 |
} |
} |
930 |
/* local entry for function progn 'compile1818 */ |
/* local entry for function progn 'compile3143 */ |
931 |
|
|
932 |
static object LI45() |
static object LI45() |
933 |
|
|
939 |
VMR45(V71)} |
VMR45(V71)} |
940 |
return Cnil; |
return Cnil; |
941 |
} |
} |
942 |
/* local entry for function progn 'compile1818 */ |
/* local entry for function progn 'compile3155 */ |
943 |
|
|
944 |
static object LI46() |
static object LI46() |
945 |
|
|
950 |
VMR46(V72)} |
VMR46(V72)} |
951 |
return Cnil; |
return Cnil; |
952 |
} |
} |
953 |
/* function definition for Defclass STORAGE-EXHAUSTED1818 */ |
/* function definition for Defclass STORAGE-EXHAUSTED3175 */ |
954 |
|
|
955 |
static void L47() |
static void L47() |
956 |
{register object *base=vs_base; |
{register object *base=vs_base; |
969 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
970 |
return; |
return; |
971 |
} |
} |
972 |
/* local entry for function progn 'compile1818 */ |
/* local entry for function progn 'compile3191 */ |
973 |
|
|
974 |
static object LI48() |
static object LI48() |
975 |
|
|
977 |
goto TTL; |
goto TTL; |
978 |
TTL:; |
TTL:; |
979 |
vs_base=vs_top; |
vs_base=vs_top; |
980 |
(void) (*Lnk280)(); |
(void) (*Lnk281)(); |
981 |
vs_top=sup; |
vs_top=sup; |
982 |
{object V73 = Cnil; |
{object V73 = Cnil; |
983 |
VMR48(V73)} |
VMR48(V73)} |
984 |
base[0]=base[0]; |
base[0]=base[0]; |
985 |
return Cnil; |
return Cnil; |
986 |
} |
} |
987 |
/* local entry for function progn 'compile1819 */ |
/* local entry for function progn 'compile3208 */ |
988 |
|
|
989 |
static object LI49() |
static object LI49() |
990 |
|
|
1002 |
base[0]=base[0]; |
base[0]=base[0]; |
1003 |
return Cnil; |
return Cnil; |
1004 |
} |
} |
1005 |
/* local entry for function progn 'compile1819 */ |
/* local entry for function progn 'compile3232 */ |
1006 |
|
|
1007 |
static object LI50() |
static object LI50() |
1008 |
|
|
1014 |
VMR50(V76)} |
VMR50(V76)} |
1015 |
return Cnil; |
return Cnil; |
1016 |
} |
} |
1017 |
/* local entry for function progn 'compile1819 */ |
/* local entry for function progn 'compile3244 */ |
1018 |
|
|
1019 |
static object LI51() |
static object LI51() |
1020 |
|
|
1025 |
VMR51(V77)} |
VMR51(V77)} |
1026 |
return Cnil; |
return Cnil; |
1027 |
} |
} |
1028 |
/* function definition for Defclass TYPE-ERROR1819 */ |
/* function definition for Defclass TYPE-ERROR3264 */ |
1029 |
|
|
1030 |
static void L52() |
static void L52() |
1031 |
{register object *base=vs_base; |
{register object *base=vs_base; |
1045 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
1046 |
return; |
return; |
1047 |
} |
} |
1048 |
/* local entry for function progn 'compile1821 */ |
/* local entry for function progn 'compile3282 */ |
1049 |
|
|
1050 |
static object LI53() |
static object LI53() |
1051 |
|
|
1053 |
goto TTL; |
goto TTL; |
1054 |
TTL:; |
TTL:; |
1055 |
vs_base=vs_top; |
vs_base=vs_top; |
1056 |
(void) (*Lnk281)(); |
(void) (*Lnk282)(); |
1057 |
vs_top=sup; |
vs_top=sup; |
1058 |
{object V79 = Cnil; |
{object V79 = Cnil; |
1059 |
VMR53(V79)} |
VMR53(V79)} |
1060 |
base[0]=base[0]; |
base[0]=base[0]; |
1061 |
return Cnil; |
return Cnil; |
1062 |
} |
} |
1063 |
/* local entry for function progn 'compile1822 */ |
/* local entry for function progn 'compile3299 */ |
1064 |
|
|
1065 |
static object LI54() |
static object LI54() |
1066 |
|
|
1078 |
base[0]=base[0]; |
base[0]=base[0]; |
1079 |
return Cnil; |
return Cnil; |
1080 |
} |
} |
1081 |
/* local entry for function progn 'compile1822 */ |
/* local entry for function progn 'compile3323 */ |
1082 |
|
|
1083 |
static object LI55() |
static object LI55() |
1084 |
|
|
1090 |
VMR55(V82)} |
VMR55(V82)} |
1091 |
return Cnil; |
return Cnil; |
1092 |
} |
} |
1093 |
/* local entry for function progn 'compile1822 */ |
/* local entry for function progn 'compile3339 */ |
1094 |
|
|
1095 |
static object LI56() |
static object LI56() |
1096 |
|
|
1272 |
T276:; |
T276:; |
1273 |
base[4]= VV[47]; |
base[4]= VV[47]; |
1274 |
vs_top=(vs_base=base+4)+1; |
vs_top=(vs_base=base+4)+1; |
1275 |
Lerror(); |
(void) (*Lnk273)(); |
1276 |
return; |
return; |
1277 |
goto T273; |
goto T273; |
1278 |
T273:; |
T273:; |
1280 |
base[5]= VV[81]; |
base[5]= VV[81]; |
1281 |
base[7]= V86; |
base[7]= V86; |
1282 |
vs_top=(vs_base=base+7)+1; |
vs_top=(vs_base=base+7)+1; |
1283 |
(void) (*Lnk282)(Lclptr282); |
(void) (*Lnk283)(Lclptr283); |
1284 |
vs_top=sup; |
vs_top=sup; |
1285 |
base[6]= vs_base[0]; |
base[6]= vs_base[0]; |
1286 |
base[8]= V86; |
base[8]= V86; |
1287 |
vs_top=(vs_base=base+8)+1; |
vs_top=(vs_base=base+8)+1; |
1288 |
(void) (*Lnk283)(Lclptr283); |
(void) (*Lnk284)(Lclptr284); |
1289 |
vs_top=sup; |
vs_top=sup; |
1290 |
base[7]= vs_base[0]; |
base[7]= vs_base[0]; |
1291 |
vs_top=(vs_base=base+4)+4; |
vs_top=(vs_base=base+4)+4; |
1293 |
return; |
return; |
1294 |
} |
} |
1295 |
} |
} |
1296 |
/* local entry for function progn 'compile1839 */ |
/* local entry for function progn 'compile3536 */ |
1297 |
|
|
1298 |
static object LI58() |
static object LI58() |
1299 |
|
|
1305 |
base[2]= Cnil; |
base[2]= Cnil; |
1306 |
base[3]= VV[82]; |
base[3]= VV[82]; |
1307 |
base[4]= VV[83]; |
base[4]= VV[83]; |
1308 |
V103= symbol_function(VV[284]); |
V103= symbol_function(VV[285]); |
1309 |
base[5]= listA(3,VV[51],V103,VV[84]); |
base[5]= listA(3,VV[51],V103,VV[84]); |
1310 |
base[6]= Cnil; |
base[6]= Cnil; |
1311 |
vs_top=(vs_base=base+0)+7; |
vs_top=(vs_base=base+0)+7; |
1312 |
(void) (*Lnk275)(); |
(void) (*Lnk276)(); |
1313 |
vs_top=sup; |
vs_top=sup; |
1314 |
{object V104 = Cnil; |
{object V104 = Cnil; |
1315 |
VMR58(V104)} |
VMR58(V104)} |
1316 |
base[0]=base[0]; |
base[0]=base[0]; |
1317 |
return Cnil; |
return Cnil; |
1318 |
} |
} |
1319 |
/* local entry for function progn 'compile1839 */ |
/* local entry for function progn 'compile3544 */ |
1320 |
|
|
1321 |
static object LI59() |
static object LI59() |
1322 |
|
|
1327 |
VMR59(V105)} |
VMR59(V105)} |
1328 |
return Cnil; |
return Cnil; |
1329 |
} |
} |
1330 |
/* function definition for Defclass SIMPLE-TYPE-ERROR1839 */ |
/* function definition for Defclass SIMPLE-TYPE-ERROR3564 */ |
1331 |
|
|
1332 |
static void L60() |
static void L60() |
1333 |
{register object *base=vs_base; |
{register object *base=vs_base; |
1346 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
1347 |
return; |
return; |
1348 |
} |
} |
1349 |
/* local entry for function progn 'compile1839 */ |
/* local entry for function progn 'compile3580 */ |
1350 |
|
|
1351 |
static object LI61() |
static object LI61() |
1352 |
|
|
1354 |
goto TTL; |
goto TTL; |
1355 |
TTL:; |
TTL:; |
1356 |
vs_base=vs_top; |
vs_base=vs_top; |
1357 |
(void) (*Lnk285)(); |
(void) (*Lnk286)(); |
1358 |
vs_top=sup; |
vs_top=sup; |
1359 |
{object V106 = Cnil; |
{object V106 = Cnil; |
1360 |
VMR61(V106)} |
VMR61(V106)} |
1361 |
base[0]=base[0]; |
base[0]=base[0]; |
1362 |
return Cnil; |
return Cnil; |
1363 |
} |
} |
1364 |
/* local entry for function progn 'compile1840 */ |
/* local entry for function progn 'compile3597 */ |
1365 |
|
|
1366 |
static object LI62() |
static object LI62() |
1367 |
|
|
1379 |
base[0]=base[0]; |
base[0]=base[0]; |
1380 |
return Cnil; |
return Cnil; |
1381 |
} |
} |
1382 |
/* local entry for function progn 'compile1840 */ |
/* local entry for function progn 'compile3621 */ |
1383 |
|
|
1384 |
static object LI63() |
static object LI63() |
1385 |
|
|
1391 |
VMR63(V109)} |
VMR63(V109)} |
1392 |
return Cnil; |
return Cnil; |
1393 |
} |
} |
1394 |
/* local entry for function progn 'compile1840 */ |
/* local entry for function progn 'compile3633 */ |
1395 |
|
|
1396 |
static object LI64() |
static object LI64() |
1397 |
|
|
1402 |
VMR64(V110)} |
VMR64(V110)} |
1403 |
return Cnil; |
return Cnil; |
1404 |
} |
} |
1405 |
/* function definition for Defclass CASE-FAILURE1840 */ |
/* function definition for Defclass CASE-FAILURE3653 */ |
1406 |
|
|
1407 |
static void L65() |
static void L65() |
1408 |
{register object *base=vs_base; |
{register object *base=vs_base; |
1422 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
1423 |
return; |
return; |
1424 |
} |
} |
1425 |
/* local entry for function progn 'compile1842 */ |
/* local entry for function progn 'compile3671 */ |
1426 |
|
|
1427 |
static object LI66() |
static object LI66() |
1428 |
|
|
1430 |
goto TTL; |
goto TTL; |
1431 |
TTL:; |
TTL:; |
1432 |
vs_base=vs_top; |
vs_base=vs_top; |
1433 |
(void) (*Lnk286)(); |
(void) (*Lnk287)(); |
1434 |
vs_top=sup; |
vs_top=sup; |
1435 |
{object V112 = Cnil; |
{object V112 = Cnil; |
1436 |
VMR66(V112)} |
VMR66(V112)} |
1437 |
base[0]=base[0]; |
base[0]=base[0]; |
1438 |
return Cnil; |
return Cnil; |
1439 |
} |
} |
1440 |
/* local entry for function progn 'compile1843 */ |
/* local entry for function progn 'compile3688 */ |
1441 |
|
|
1442 |
static object LI67() |
static object LI67() |
1443 |
|
|
1455 |
base[0]=base[0]; |
base[0]=base[0]; |
1456 |
return Cnil; |
return Cnil; |
1457 |
} |
} |
1458 |
/* local entry for function progn 'compile1843 */ |
/* local entry for function progn 'compile3712 */ |
1459 |
|
|
1460 |
static object LI68() |
static object LI68() |
1461 |
|
|
1467 |
VMR68(V115)} |
VMR68(V115)} |
1468 |
return Cnil; |
return Cnil; |
1469 |
} |
} |
1470 |
/* local entry for function progn 'compile1843 */ |
/* local entry for function progn 'compile3728 */ |
1471 |
|
|
1472 |
static object LI69() |
static object LI69() |
1473 |
|
|
1649 |
T394:; |
T394:; |
1650 |
base[4]= VV[47]; |
base[4]= VV[47]; |
1651 |
vs_top=(vs_base=base+4)+1; |
vs_top=(vs_base=base+4)+1; |
1652 |
Lerror(); |
(void) (*Lnk273)(); |
1653 |
return; |
return; |
1654 |
goto T391; |
goto T391; |
1655 |
T391:; |
T391:; |
1657 |
base[5]= VV[100]; |
base[5]= VV[100]; |
1658 |
base[7]= V119; |
base[7]= V119; |
1659 |
vs_top=(vs_base=base+7)+1; |
vs_top=(vs_base=base+7)+1; |
1660 |
(void) (*Lnk282)(Lclptr282); |
(void) (*Lnk283)(Lclptr283); |
1661 |
vs_top=sup; |
vs_top=sup; |
1662 |
base[6]= vs_base[0]; |
base[6]= vs_base[0]; |
1663 |
base[8]= V119; |
base[8]= V119; |
1664 |
vs_top=(vs_base=base+8)+1; |
vs_top=(vs_base=base+8)+1; |
1665 |
(void) (*Lnk287)(Lclptr287); |
(void) (*Lnk288)(Lclptr288); |
1666 |
vs_top=sup; |
vs_top=sup; |
1667 |
base[7]= vs_base[0]; |
base[7]= vs_base[0]; |
1668 |
base[9]= V119; |
base[9]= V119; |
1669 |
vs_top=(vs_base=base+9)+1; |
vs_top=(vs_base=base+9)+1; |
1670 |
(void) (*Lnk288)(Lclptr288); |
(void) (*Lnk289)(Lclptr289); |
1671 |
vs_top=sup; |
vs_top=sup; |
1672 |
base[8]= vs_base[0]; |
base[8]= vs_base[0]; |
1673 |
vs_top=(vs_base=base+4)+5; |
vs_top=(vs_base=base+4)+5; |
1675 |
return; |
return; |
1676 |
} |
} |
1677 |
} |
} |
1678 |
/* local entry for function progn 'compile1860 */ |
/* local entry for function progn 'compile3925 */ |
1679 |
|
|
1680 |
static object LI71() |
static object LI71() |
1681 |
|
|
1687 |
base[2]= Cnil; |
base[2]= Cnil; |
1688 |
base[3]= VV[101]; |
base[3]= VV[101]; |
1689 |
base[4]= VV[102]; |
base[4]= VV[102]; |
1690 |
V136= symbol_function(VV[289]); |
V136= symbol_function(VV[290]); |
1691 |
base[5]= listA(3,VV[51],V136,VV[103]); |
base[5]= listA(3,VV[51],V136,VV[103]); |
1692 |
base[6]= Cnil; |
base[6]= Cnil; |
1693 |
vs_top=(vs_base=base+0)+7; |
vs_top=(vs_base=base+0)+7; |
1694 |
(void) (*Lnk275)(); |
(void) (*Lnk276)(); |
1695 |
vs_top=sup; |
vs_top=sup; |
1696 |
{object V137 = Cnil; |
{object V137 = Cnil; |
1697 |
VMR71(V137)} |
VMR71(V137)} |
1698 |
base[0]=base[0]; |
base[0]=base[0]; |
1699 |
return Cnil; |
return Cnil; |
1700 |
} |
} |
1701 |
/* local entry for function progn 'compile1860 */ |
/* local entry for function progn 'compile3933 */ |
1702 |
|
|
1703 |
static object LI72() |
static object LI72() |
1704 |
|
|
1709 |
VMR72(V138)} |
VMR72(V138)} |
1710 |
return Cnil; |
return Cnil; |
1711 |
} |
} |
1712 |
/* function definition for Defclass PROGRAM-ERROR1860 */ |
/* function definition for Defclass PROGRAM-ERROR3953 */ |
1713 |
|
|
1714 |
static void L73() |
static void L73() |
1715 |
{register object *base=vs_base; |
{register object *base=vs_base; |
1728 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
1729 |
return; |
return; |
1730 |
} |
} |
1731 |
/* local entry for function progn 'compile1860 */ |
/* local entry for function progn 'compile3969 */ |
1732 |
|
|
1733 |
static object LI74() |
static object LI74() |
1734 |
|
|
1736 |
goto TTL; |
goto TTL; |
1737 |
TTL:; |
TTL:; |
1738 |
vs_base=vs_top; |
vs_base=vs_top; |
1739 |
(void) (*Lnk290)(); |
(void) (*Lnk291)(); |
1740 |
vs_top=sup; |
vs_top=sup; |
1741 |
{object V139 = Cnil; |
{object V139 = Cnil; |
1742 |
VMR74(V139)} |
VMR74(V139)} |
1743 |
base[0]=base[0]; |
base[0]=base[0]; |
1744 |
return Cnil; |
return Cnil; |
1745 |
} |
} |
1746 |
/* local entry for function progn 'compile1861 */ |
/* local entry for function progn 'compile3986 */ |
1747 |
|
|
1748 |
static object LI75() |
static object LI75() |
1749 |
|
|
1761 |
base[0]=base[0]; |
base[0]=base[0]; |
1762 |
return Cnil; |
return Cnil; |
1763 |
} |
} |
1764 |
/* local entry for function progn 'compile1861 */ |
/* local entry for function progn 'compile4010 */ |
1765 |
|
|
1766 |
static object LI76() |
static object LI76() |
1767 |
|
|
1773 |
VMR76(V142)} |
VMR76(V142)} |
1774 |
return Cnil; |
return Cnil; |
1775 |
} |
} |
1776 |
/* local entry for function progn 'compile1861 */ |
/* local entry for function progn 'compile4022 */ |
1777 |
|
|
1778 |
static object LI77() |
static object LI77() |
1779 |
|
|
1784 |
VMR77(V143)} |
VMR77(V143)} |
1785 |
return Cnil; |
return Cnil; |
1786 |
} |
} |
1787 |
/* function definition for Defclass CONTROL-ERROR1861 */ |
/* function definition for Defclass CONTROL-ERROR4042 */ |
1788 |
|
|
1789 |
static void L78() |
static void L78() |
1790 |
{register object *base=vs_base; |
{register object *base=vs_base; |
1803 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
1804 |
return; |
return; |
1805 |
} |
} |
1806 |
/* local entry for function progn 'compile1861 */ |
/* local entry for function progn 'compile4058 */ |
1807 |
|
|
1808 |
static object LI79() |
static object LI79() |
1809 |
|
|
1811 |
goto TTL; |
goto TTL; |
1812 |
TTL:; |
TTL:; |
1813 |
vs_base=vs_top; |
vs_base=vs_top; |
1814 |
(void) (*Lnk291)(); |
(void) (*Lnk292)(); |
1815 |
vs_top=sup; |
vs_top=sup; |
1816 |
{object V144 = Cnil; |
{object V144 = Cnil; |
1817 |
VMR79(V144)} |
VMR79(V144)} |
1818 |
base[0]=base[0]; |
base[0]=base[0]; |
1819 |
return Cnil; |
return Cnil; |
1820 |
} |
} |
1821 |
/* local entry for function progn 'compile1862 */ |
/* local entry for function progn 'compile4075 */ |
1822 |
|
|
1823 |
static object LI80() |
static object LI80() |
1824 |
|
|
1836 |
base[0]=base[0]; |
base[0]=base[0]; |
1837 |
return Cnil; |
return Cnil; |
1838 |
} |
} |
1839 |
/* local entry for function progn 'compile1862 */ |
/* local entry for function progn 'compile4099 */ |
1840 |
|
|
1841 |
static object LI81() |
static object LI81() |
1842 |
|
|
1848 |
VMR81(V147)} |
VMR81(V147)} |
1849 |
return Cnil; |
return Cnil; |
1850 |
} |
} |
1851 |
/* local entry for function progn 'compile1862 */ |
/* local entry for function progn 'compile4111 */ |
1852 |
|
|
1853 |
static object LI82() |
static object LI82() |
1854 |
|
|
1859 |
VMR82(V148)} |
VMR82(V148)} |
1860 |
return Cnil; |
return Cnil; |
1861 |
} |
} |
1862 |
/* function definition for Defclass STREAM-ERROR1862 */ |
/* function definition for Defclass STREAM-ERROR4131 */ |
1863 |
|
|
1864 |
static void L83() |
static void L83() |
1865 |
{register object *base=vs_base; |
{register object *base=vs_base; |
1879 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
1880 |
return; |
return; |
1881 |
} |
} |
1882 |
/* local entry for function progn 'compile1863 */ |
/* local entry for function progn 'compile4148 */ |
1883 |
|
|
1884 |
static object LI84() |
static object LI84() |
1885 |
|
|
1887 |
goto TTL; |
goto TTL; |
1888 |
TTL:; |
TTL:; |
1889 |
vs_base=vs_top; |
vs_base=vs_top; |
1890 |
(void) (*Lnk292)(); |
(void) (*Lnk293)(); |
1891 |
vs_top=sup; |
vs_top=sup; |
1892 |
{object V150 = Cnil; |
{object V150 = Cnil; |
1893 |
VMR84(V150)} |
VMR84(V150)} |
1894 |
base[0]=base[0]; |
base[0]=base[0]; |
1895 |
return Cnil; |
return Cnil; |
1896 |
} |
} |
1897 |
/* local entry for function progn 'compile1864 */ |
/* local entry for function progn 'compile4165 */ |
1898 |
|
|
1899 |
static object LI85() |
static object LI85() |
1900 |
|
|
1912 |
base[0]=base[0]; |
base[0]=base[0]; |
1913 |
return Cnil; |
return Cnil; |
1914 |
} |
} |
1915 |
/* local entry for function progn 'compile1864 */ |
/* local entry for function progn 'compile4189 */ |
1916 |
|
|
1917 |
static object LI86() |
static object LI86() |
1918 |
|
|
1924 |
VMR86(V153)} |
VMR86(V153)} |
1925 |
return Cnil; |
return Cnil; |
1926 |
} |
} |
1927 |
/* local entry for function progn 'compile1864 */ |
/* local entry for function progn 'compile4201 */ |
1928 |
|
|
1929 |
static object LI87() |
static object LI87() |
1930 |
|
|
1935 |
VMR87(V154)} |
VMR87(V154)} |
1936 |
return Cnil; |
return Cnil; |
1937 |
} |
} |
1938 |
/* function definition for Defclass END-OF-FILE1864 */ |
/* function definition for Defclass END-OF-FILE4221 */ |
1939 |
|
|
1940 |
static void L88() |
static void L88() |
1941 |
{register object *base=vs_base; |
{register object *base=vs_base; |
1954 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
1955 |
return; |
return; |
1956 |
} |
} |
1957 |
/* local entry for function progn 'compile1864 */ |
/* local entry for function progn 'compile4237 */ |
1958 |
|
|
1959 |
static object LI89() |
static object LI89() |
1960 |
|
|
1962 |
goto TTL; |
goto TTL; |
1963 |
TTL:; |
TTL:; |
1964 |
vs_base=vs_top; |
vs_base=vs_top; |
1965 |
(void) (*Lnk293)(); |
(void) (*Lnk294)(); |
1966 |
vs_top=sup; |
vs_top=sup; |
1967 |
{object V155 = Cnil; |
{object V155 = Cnil; |
1968 |
VMR89(V155)} |
VMR89(V155)} |
1969 |
base[0]=base[0]; |
base[0]=base[0]; |
1970 |
return Cnil; |
return Cnil; |
1971 |
} |
} |
1972 |
/* local entry for function progn 'compile1865 */ |
/* local entry for function progn 'compile4254 */ |
1973 |
|
|
1974 |
static object LI90() |
static object LI90() |
1975 |
|
|
1987 |
base[0]=base[0]; |
base[0]=base[0]; |
1988 |
return Cnil; |
return Cnil; |
1989 |
} |
} |
1990 |
/* local entry for function progn 'compile1865 */ |
/* local entry for function progn 'compile4278 */ |
1991 |
|
|
1992 |
static object LI91() |
static object LI91() |
1993 |
|
|
1999 |
VMR91(V158)} |
VMR91(V158)} |
2000 |
return Cnil; |
return Cnil; |
2001 |
} |
} |
2002 |
/* local entry for function progn 'compile1865 */ |
/* local entry for function progn 'compile4294 */ |
2003 |
|
|
2004 |
static object LI92() |
static object LI92() |
2005 |
|
|
2181 |
T540:; |
T540:; |
2182 |
base[4]= VV[47]; |
base[4]= VV[47]; |
2183 |
vs_top=(vs_base=base+4)+1; |
vs_top=(vs_base=base+4)+1; |
2184 |
Lerror(); |
(void) (*Lnk273)(); |
2185 |
return; |
return; |
2186 |
goto T537; |
goto T537; |
2187 |
T537:; |
T537:; |
2189 |
base[5]= VV[123]; |
base[5]= VV[123]; |
2190 |
base[7]= V162; |
base[7]= V162; |
2191 |
vs_top=(vs_base=base+7)+1; |
vs_top=(vs_base=base+7)+1; |
2192 |
(void) (*Lnk294)(Lclptr294); |
(void) (*Lnk295)(Lclptr295); |
2193 |
vs_top=sup; |
vs_top=sup; |
2194 |
base[6]= vs_base[0]; |
base[6]= vs_base[0]; |
2195 |
vs_top=(vs_base=base+4)+3; |
vs_top=(vs_base=base+4)+3; |
2197 |
return; |
return; |
2198 |
} |
} |
2199 |
} |
} |
2200 |
/* local entry for function progn 'compile1882 */ |
/* local entry for function progn 'compile4491 */ |
2201 |
|
|
2202 |
static object LI94() |
static object LI94() |
2203 |
|
|
2209 |
base[2]= Cnil; |
base[2]= Cnil; |
2210 |
base[3]= VV[124]; |
base[3]= VV[124]; |
2211 |
base[4]= VV[125]; |
base[4]= VV[125]; |
2212 |
V179= symbol_function(VV[295]); |
V179= symbol_function(VV[296]); |
2213 |
base[5]= listA(3,VV[51],V179,VV[126]); |
base[5]= listA(3,VV[51],V179,VV[126]); |
2214 |
base[6]= Cnil; |
base[6]= Cnil; |
2215 |
vs_top=(vs_base=base+0)+7; |
vs_top=(vs_base=base+0)+7; |
2216 |
(void) (*Lnk275)(); |
(void) (*Lnk276)(); |
2217 |
vs_top=sup; |
vs_top=sup; |
2218 |
{object V180 = Cnil; |
{object V180 = Cnil; |
2219 |
VMR94(V180)} |
VMR94(V180)} |
2220 |
base[0]=base[0]; |
base[0]=base[0]; |
2221 |
return Cnil; |
return Cnil; |
2222 |
} |
} |
2223 |
/* local entry for function progn 'compile1882 */ |
/* local entry for function progn 'compile4499 */ |
2224 |
|
|
2225 |
static object LI95() |
static object LI95() |
2226 |
|
|
2231 |
VMR95(V181)} |
VMR95(V181)} |
2232 |
return Cnil; |
return Cnil; |
2233 |
} |
} |
2234 |
/* function definition for Defclass FILE-ERROR1882 */ |
/* function definition for Defclass FILE-ERROR4519 */ |
2235 |
|
|
2236 |
static void L96() |
static void L96() |
2237 |
{register object *base=vs_base; |
{register object *base=vs_base; |
2251 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
2252 |
return; |
return; |
2253 |
} |
} |
2254 |
/* local entry for function progn 'compile1883 */ |
/* local entry for function progn 'compile4536 */ |
2255 |
|
|
2256 |
static object LI97() |
static object LI97() |
2257 |
|
|
2259 |
goto TTL; |
goto TTL; |
2260 |
TTL:; |
TTL:; |
2261 |
vs_base=vs_top; |
vs_base=vs_top; |
2262 |
(void) (*Lnk296)(); |
(void) (*Lnk297)(); |
2263 |
vs_top=sup; |
vs_top=sup; |
2264 |
{object V183 = Cnil; |
{object V183 = Cnil; |
2265 |
VMR97(V183)} |
VMR97(V183)} |
2266 |
base[0]=base[0]; |
base[0]=base[0]; |
2267 |
return Cnil; |
return Cnil; |
2268 |
} |
} |
2269 |
/* local entry for function progn 'compile1884 */ |
/* local entry for function progn 'compile4553 */ |
2270 |
|
|
2271 |
static object LI98() |
static object LI98() |
2272 |
|
|
2284 |
base[0]=base[0]; |
base[0]=base[0]; |
2285 |
return Cnil; |
return Cnil; |
2286 |
} |
} |
2287 |
/* local entry for function progn 'compile1884 */ |
/* local entry for function progn 'compile4577 */ |
2288 |
|
|
2289 |
static object LI99() |
static object LI99() |
2290 |
|
|
2296 |
VMR99(V186)} |
VMR99(V186)} |
2297 |
return Cnil; |
return Cnil; |
2298 |
} |
} |
2299 |
/* local entry for function progn 'compile1884 */ |
/* local entry for function progn 'compile4589 */ |
2300 |
|
|
2301 |
static object LI100() |
static object LI100() |
2302 |
|
|
2307 |
VMR100(V187)} |
VMR100(V187)} |
2308 |
return Cnil; |
return Cnil; |
2309 |
} |
} |
2310 |
/* function definition for Defclass PACKAGE-ERROR1884 */ |
/* function definition for Defclass PACKAGE-ERROR4609 */ |
2311 |
|
|
2312 |
static void L101() |
static void L101() |
2313 |
{register object *base=vs_base; |
{register object *base=vs_base; |
2327 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
2328 |
return; |
return; |
2329 |
} |
} |
2330 |
/* local entry for function progn 'compile1886 */ |
/* local entry for function progn 'compile4627 */ |
2331 |
|
|
2332 |
static object LI102() |
static object LI102() |
2333 |
|
|
2335 |
goto TTL; |
goto TTL; |
2336 |
TTL:; |
TTL:; |
2337 |
vs_base=vs_top; |
vs_base=vs_top; |
2338 |
(void) (*Lnk297)(); |
(void) (*Lnk298)(); |
2339 |
vs_top=sup; |
vs_top=sup; |
2340 |
{object V189 = Cnil; |
{object V189 = Cnil; |
2341 |
VMR102(V189)} |
VMR102(V189)} |
2342 |
base[0]=base[0]; |
base[0]=base[0]; |
2343 |
return Cnil; |
return Cnil; |
2344 |
} |
} |
2345 |
/* local entry for function progn 'compile1887 */ |
/* local entry for function progn 'compile4644 */ |
2346 |
|
|
2347 |
static object LI103() |
static object LI103() |
2348 |
|
|
2360 |
base[0]=base[0]; |
base[0]=base[0]; |
2361 |
return Cnil; |
return Cnil; |
2362 |
} |
} |
2363 |
/* local entry for function progn 'compile1887 */ |
/* local entry for function progn 'compile4668 */ |
2364 |
|
|
2365 |
static object LI104() |
static object LI104() |
2366 |
|
|
2372 |
VMR104(V192)} |
VMR104(V192)} |
2373 |
return Cnil; |
return Cnil; |
2374 |
} |
} |
2375 |
/* local entry for function progn 'compile1887 */ |
/* local entry for function progn 'compile4684 */ |
2376 |
|
|
2377 |
static object LI105() |
static object LI105() |
2378 |
|
|
2554 |
T656:; |
T656:; |
2555 |
base[4]= VV[47]; |
base[4]= VV[47]; |
2556 |
vs_top=(vs_base=base+4)+1; |
vs_top=(vs_base=base+4)+1; |
2557 |
Lerror(); |
(void) (*Lnk273)(); |
2558 |
return; |
return; |
2559 |
goto T653; |
goto T653; |
2560 |
T653:; |
T653:; |
2562 |
base[5]= VV[146]; |
base[5]= VV[146]; |
2563 |
base[7]= V196; |
base[7]= V196; |
2564 |
vs_top=(vs_base=base+7)+1; |
vs_top=(vs_base=base+7)+1; |
2565 |
(void) (*Lnk298)(Lclptr298); |
(void) (*Lnk299)(Lclptr299); |
2566 |
vs_top=sup; |
vs_top=sup; |
2567 |
base[6]= vs_base[0]; |
base[6]= vs_base[0]; |
2568 |
base[8]= V196; |
base[8]= V196; |
2569 |
vs_top=(vs_base=base+8)+1; |
vs_top=(vs_base=base+8)+1; |
2570 |
(void) (*Lnk299)(Lclptr299); |
(void) (*Lnk300)(Lclptr300); |
2571 |
vs_top=sup; |
vs_top=sup; |
2572 |
base[7]= vs_base[0]; |
base[7]= vs_base[0]; |
2573 |
vs_top=(vs_base=base+4)+4; |
vs_top=(vs_base=base+4)+4; |
2575 |
return; |
return; |
2576 |
} |
} |
2577 |
} |
} |
2578 |
/* local entry for function progn 'compile1904 */ |
/* local entry for function progn 'compile4881 */ |
2579 |
|
|
2580 |
static object LI107() |
static object LI107() |
2581 |
|
|
2587 |
base[2]= Cnil; |
base[2]= Cnil; |
2588 |
base[3]= VV[147]; |
base[3]= VV[147]; |
2589 |
base[4]= VV[148]; |
base[4]= VV[148]; |
2590 |
V213= symbol_function(VV[300]); |
V213= symbol_function(VV[301]); |
2591 |
base[5]= listA(3,VV[51],V213,VV[149]); |
base[5]= listA(3,VV[51],V213,VV[149]); |
2592 |
base[6]= Cnil; |
base[6]= Cnil; |
2593 |
vs_top=(vs_base=base+0)+7; |
vs_top=(vs_base=base+0)+7; |
2594 |
(void) (*Lnk275)(); |
(void) (*Lnk276)(); |
2595 |
vs_top=sup; |
vs_top=sup; |
2596 |
{object V214 = Cnil; |
{object V214 = Cnil; |
2597 |
VMR107(V214)} |
VMR107(V214)} |
2598 |
base[0]=base[0]; |
base[0]=base[0]; |
2599 |
return Cnil; |
return Cnil; |
2600 |
} |
} |
2601 |
/* local entry for function progn 'compile1904 */ |
/* local entry for function progn 'compile4889 */ |
2602 |
|
|
2603 |
static object LI108() |
static object LI108() |
2604 |
|
|
2609 |
VMR108(V215)} |
VMR108(V215)} |
2610 |
return Cnil; |
return Cnil; |
2611 |
} |
} |
2612 |
/* function definition for Defclass CELL-ERROR1904 */ |
/* function definition for Defclass CELL-ERROR4909 */ |
2613 |
|
|
2614 |
static void L109() |
static void L109() |
2615 |
{register object *base=vs_base; |
{register object *base=vs_base; |
2629 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
2630 |
return; |
return; |
2631 |
} |
} |
2632 |
/* local entry for function progn 'compile1905 */ |
/* local entry for function progn 'compile4926 */ |
2633 |
|
|
2634 |
static object LI110() |
static object LI110() |
2635 |
|
|
2637 |
goto TTL; |
goto TTL; |
2638 |
TTL:; |
TTL:; |
2639 |
vs_base=vs_top; |
vs_base=vs_top; |
2640 |
(void) (*Lnk301)(); |
(void) (*Lnk302)(); |
2641 |
vs_top=sup; |
vs_top=sup; |
2642 |
{object V217 = Cnil; |
{object V217 = Cnil; |
2643 |
VMR110(V217)} |
VMR110(V217)} |
2644 |
base[0]=base[0]; |
base[0]=base[0]; |
2645 |
return Cnil; |
return Cnil; |
2646 |
} |
} |
2647 |
/* local entry for function progn 'compile1906 */ |
/* local entry for function progn 'compile4943 */ |
2648 |
|
|
2649 |
static object LI111() |
static object LI111() |
2650 |
|
|
2662 |
base[0]=base[0]; |
base[0]=base[0]; |
2663 |
return Cnil; |
return Cnil; |
2664 |
} |
} |
2665 |
/* local entry for function progn 'compile1906 */ |
/* local entry for function progn 'compile4967 */ |
2666 |
|
|
2667 |
static object LI112() |
static object LI112() |
2668 |
|
|
2674 |
VMR112(V220)} |
VMR112(V220)} |
2675 |
return Cnil; |
return Cnil; |
2676 |
} |
} |
2677 |
/* local entry for function progn 'compile1906 */ |
/* local entry for function progn 'compile4979 */ |
2678 |
|
|
2679 |
static object LI113() |
static object LI113() |
2680 |
|
|
2685 |
VMR113(V221)} |
VMR113(V221)} |
2686 |
return Cnil; |
return Cnil; |
2687 |
} |
} |
2688 |
/* function definition for Defclass UNBOUND-VARIABLE1906 */ |
/* function definition for Defclass UNBOUND-VARIABLE4999 */ |
2689 |
|
|
2690 |
static void L114() |
static void L114() |
2691 |
{register object *base=vs_base; |
{register object *base=vs_base; |
2704 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
2705 |
return; |
return; |
2706 |
} |
} |
2707 |
/* local entry for function progn 'compile1906 */ |
/* local entry for function progn 'compile5015 */ |
2708 |
|
|
2709 |
static object LI115() |
static object LI115() |
2710 |
|
|
2712 |
goto TTL; |
goto TTL; |
2713 |
TTL:; |
TTL:; |
2714 |
vs_base=vs_top; |
vs_base=vs_top; |
2715 |
(void) (*Lnk302)(); |
(void) (*Lnk303)(); |
2716 |
vs_top=sup; |
vs_top=sup; |
2717 |
{object V222 = Cnil; |
{object V222 = Cnil; |
2718 |
VMR115(V222)} |
VMR115(V222)} |
2719 |
base[0]=base[0]; |
base[0]=base[0]; |
2720 |
return Cnil; |
return Cnil; |
2721 |
} |
} |
2722 |
/* local entry for function progn 'compile1907 */ |
/* local entry for function progn 'compile5032 */ |
2723 |
|
|
2724 |
static object LI116() |
static object LI116() |
2725 |
|
|
2737 |
base[0]=base[0]; |
base[0]=base[0]; |
2738 |
return Cnil; |
return Cnil; |
2739 |
} |
} |
2740 |
/* local entry for function progn 'compile1907 */ |
/* local entry for function progn 'compile5056 */ |
2741 |
|
|
2742 |
static object LI117() |
static object LI117() |
2743 |
|
|
2749 |
VMR117(V225)} |
VMR117(V225)} |
2750 |
return Cnil; |
return Cnil; |
2751 |
} |
} |
2752 |
/* local entry for function progn 'compile1907 */ |
/* local entry for function progn 'compile5072 */ |
2753 |
|
|
2754 |
static object LI118() |
static object LI118() |
2755 |
|
|
2931 |
T774:; |
T774:; |
2932 |
base[4]= VV[47]; |
base[4]= VV[47]; |
2933 |
vs_top=(vs_base=base+4)+1; |
vs_top=(vs_base=base+4)+1; |
2934 |
Lerror(); |
(void) (*Lnk273)(); |
2935 |
return; |
return; |
2936 |
goto T771; |
goto T771; |
2937 |
T771:; |
T771:; |
2939 |
base[5]= VV[162]; |
base[5]= VV[162]; |
2940 |
base[7]= V229; |
base[7]= V229; |
2941 |
vs_top=(vs_base=base+7)+1; |
vs_top=(vs_base=base+7)+1; |
2942 |
(void) (*Lnk303)(Lclptr303); |
(void) (*Lnk304)(Lclptr304); |
2943 |
vs_top=sup; |
vs_top=sup; |
2944 |
base[6]= vs_base[0]; |
base[6]= vs_base[0]; |
2945 |
vs_top=(vs_base=base+4)+3; |
vs_top=(vs_base=base+4)+3; |
2947 |
return; |
return; |
2948 |
} |
} |
2949 |
} |
} |
2950 |
/* local entry for function progn 'compile1924 */ |
/* local entry for function progn 'compile5269 */ |
2951 |
|
|
2952 |
static object LI120() |
static object LI120() |
2953 |
|
|
2959 |
base[2]= Cnil; |
base[2]= Cnil; |
2960 |
base[3]= VV[163]; |
base[3]= VV[163]; |
2961 |
base[4]= VV[164]; |
base[4]= VV[164]; |
2962 |
V246= symbol_function(VV[304]); |
V246= symbol_function(VV[305]); |
2963 |
base[5]= listA(3,VV[51],V246,VV[165]); |
base[5]= listA(3,VV[51],V246,VV[165]); |
2964 |
base[6]= Cnil; |
base[6]= Cnil; |
2965 |
vs_top=(vs_base=base+0)+7; |
vs_top=(vs_base=base+0)+7; |
2966 |
(void) (*Lnk275)(); |
(void) (*Lnk276)(); |
2967 |
vs_top=sup; |
vs_top=sup; |
2968 |
{object V247 = Cnil; |
{object V247 = Cnil; |
2969 |
VMR120(V247)} |
VMR120(V247)} |
2970 |
base[0]=base[0]; |
base[0]=base[0]; |
2971 |
return Cnil; |
return Cnil; |
2972 |
} |
} |
2973 |
/* local entry for function progn 'compile1924 */ |
/* local entry for function progn 'compile5277 */ |
2974 |
|
|
2975 |
static object LI121() |
static object LI121() |
2976 |
|
|
2981 |
VMR121(V248)} |
VMR121(V248)} |
2982 |
return Cnil; |
return Cnil; |
2983 |
} |
} |
2984 |
/* function definition for Defclass UNDEFINED-FUNCTION1924 */ |
/* function definition for Defclass UNDEFINED-FUNCTION5297 */ |
2985 |
|
|
2986 |
static void L122() |
static void L122() |
2987 |
{register object *base=vs_base; |
{register object *base=vs_base; |
3000 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
3001 |
return; |
return; |
3002 |
} |
} |
3003 |
/* local entry for function progn 'compile1924 */ |
/* local entry for function progn 'compile5313 */ |
3004 |
|
|
3005 |
static object LI123() |
static object LI123() |
3006 |
|
|
3008 |
goto TTL; |
goto TTL; |
3009 |
TTL:; |
TTL:; |
3010 |
vs_base=vs_top; |
vs_base=vs_top; |
3011 |
(void) (*Lnk305)(); |
(void) (*Lnk306)(); |
3012 |
vs_top=sup; |
vs_top=sup; |
3013 |
{object V249 = Cnil; |
{object V249 = Cnil; |
3014 |
VMR123(V249)} |
VMR123(V249)} |
3015 |
base[0]=base[0]; |
base[0]=base[0]; |
3016 |
return Cnil; |
return Cnil; |
3017 |
} |
} |
3018 |
/* local entry for function progn 'compile1925 */ |
/* local entry for function progn 'compile5330 */ |
3019 |
|
|
3020 |
static object LI124() |
static object LI124() |
3021 |
|
|
3033 |
base[0]=base[0]; |
base[0]=base[0]; |
3034 |
return Cnil; |
return Cnil; |
3035 |
} |
} |
3036 |
/* local entry for function progn 'compile1925 */ |
/* local entry for function progn 'compile5354 */ |
3037 |
|
|
3038 |
static object LI125() |
static object LI125() |
3039 |
|
|
3045 |
VMR125(V252)} |
VMR125(V252)} |
3046 |
return Cnil; |
return Cnil; |
3047 |
} |
} |
3048 |
/* local entry for function progn 'compile1925 */ |
/* local entry for function progn 'compile5370 */ |
3049 |
|
|
3050 |
static object LI126() |
static object LI126() |
3051 |
|
|
3227 |
T877:; |
T877:; |
3228 |
base[4]= VV[47]; |
base[4]= VV[47]; |
3229 |
vs_top=(vs_base=base+4)+1; |
vs_top=(vs_base=base+4)+1; |
3230 |
Lerror(); |
(void) (*Lnk273)(); |
3231 |
return; |
return; |
3232 |
goto T874; |
goto T874; |
3233 |
T874:; |
T874:; |
3235 |
base[5]= VV[173]; |
base[5]= VV[173]; |
3236 |
base[7]= V256; |
base[7]= V256; |
3237 |
vs_top=(vs_base=base+7)+1; |
vs_top=(vs_base=base+7)+1; |
3238 |
(void) (*Lnk303)(Lclptr303); |
(void) (*Lnk304)(Lclptr304); |
3239 |
vs_top=sup; |
vs_top=sup; |
3240 |
base[6]= vs_base[0]; |
base[6]= vs_base[0]; |
3241 |
vs_top=(vs_base=base+4)+3; |
vs_top=(vs_base=base+4)+3; |
3243 |
return; |
return; |
3244 |
} |
} |
3245 |
} |
} |
3246 |
/* local entry for function progn 'compile1942 */ |
/* local entry for function progn 'compile5567 */ |
3247 |
|
|
3248 |
static object LI128() |
static object LI128() |
3249 |
|
|
3255 |
base[2]= Cnil; |
base[2]= Cnil; |
3256 |
base[3]= VV[174]; |
base[3]= VV[174]; |
3257 |
base[4]= VV[175]; |
base[4]= VV[175]; |
3258 |
V273= symbol_function(VV[306]); |
V273= symbol_function(VV[307]); |
3259 |
base[5]= listA(3,VV[51],V273,VV[176]); |
base[5]= listA(3,VV[51],V273,VV[176]); |
3260 |
base[6]= Cnil; |
base[6]= Cnil; |
3261 |
vs_top=(vs_base=base+0)+7; |
vs_top=(vs_base=base+0)+7; |
3262 |
(void) (*Lnk275)(); |
(void) (*Lnk276)(); |
3263 |
vs_top=sup; |
vs_top=sup; |
3264 |
{object V274 = Cnil; |
{object V274 = Cnil; |
3265 |
VMR128(V274)} |
VMR128(V274)} |
3266 |
base[0]=base[0]; |
base[0]=base[0]; |
3267 |
return Cnil; |
return Cnil; |
3268 |
} |
} |
3269 |
/* local entry for function progn 'compile1942 */ |
/* local entry for function progn 'compile5575 */ |
3270 |
|
|
3271 |
static object LI129() |
static object LI129() |
3272 |
|
|
3277 |
VMR129(V275)} |
VMR129(V275)} |
3278 |
return Cnil; |
return Cnil; |
3279 |
} |
} |
3280 |
/* function definition for Defclass ARITHMETIC-ERROR1942 */ |
/* function definition for Defclass ARITHMETIC-ERROR5595 */ |
3281 |
|
|
3282 |
static void L130() |
static void L130() |
3283 |
{register object *base=vs_base; |
{register object *base=vs_base; |
3297 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
3298 |
return; |
return; |
3299 |
} |
} |
3300 |
/* local entry for function progn 'compile1943 */ |
/* local entry for function progn 'compile5612 */ |
3301 |
|
|
3302 |
static object LI131() |
static object LI131() |
3303 |
|
|
3305 |
goto TTL; |
goto TTL; |
3306 |
TTL:; |
TTL:; |
3307 |
vs_base=vs_top; |
vs_base=vs_top; |
3308 |
(void) (*Lnk307)(); |
(void) (*Lnk308)(); |
3309 |
vs_top=sup; |
vs_top=sup; |
3310 |
{object V277 = Cnil; |
{object V277 = Cnil; |
3311 |
VMR131(V277)} |
VMR131(V277)} |
3312 |
base[0]=base[0]; |
base[0]=base[0]; |
3313 |
return Cnil; |
return Cnil; |
3314 |
} |
} |
3315 |
/* local entry for function progn 'compile1944 */ |
/* local entry for function progn 'compile5629 */ |
3316 |
|
|
3317 |
static object LI132() |
static object LI132() |
3318 |
|
|
3330 |
base[0]=base[0]; |
base[0]=base[0]; |
3331 |
return Cnil; |
return Cnil; |
3332 |
} |
} |
3333 |
/* local entry for function progn 'compile1944 */ |
/* local entry for function progn 'compile5653 */ |
3334 |
|
|
3335 |
static object LI133() |
static object LI133() |
3336 |
|
|
3342 |
VMR133(V280)} |
VMR133(V280)} |
3343 |
return Cnil; |
return Cnil; |
3344 |
} |
} |
3345 |
/* local entry for function progn 'compile1944 */ |
/* local entry for function progn 'compile5665 */ |
3346 |
|
|
3347 |
static object LI134() |
static object LI134() |
3348 |
|
|
3353 |
VMR134(V281)} |
VMR134(V281)} |
3354 |
return Cnil; |
return Cnil; |
3355 |
} |
} |
3356 |
/* function definition for Defclass DIVISION-BY-ZERO1944 */ |
/* function definition for Defclass DIVISION-BY-ZERO5685 */ |
3357 |
|
|
3358 |
static void L135() |
static void L135() |
3359 |
{register object *base=vs_base; |
{register object *base=vs_base; |
3372 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
3373 |
return; |
return; |
3374 |
} |
} |
3375 |
/* local entry for function progn 'compile1944 */ |
/* local entry for function progn 'compile5701 */ |
3376 |
|
|
3377 |
static object LI136() |
static object LI136() |
3378 |
|
|
3380 |
goto TTL; |
goto TTL; |
3381 |
TTL:; |
TTL:; |
3382 |
vs_base=vs_top; |
vs_base=vs_top; |
3383 |
(void) (*Lnk308)(); |
(void) (*Lnk309)(); |
3384 |
vs_top=sup; |
vs_top=sup; |
3385 |
{object V282 = Cnil; |
{object V282 = Cnil; |
3386 |
VMR136(V282)} |
VMR136(V282)} |
3387 |
base[0]=base[0]; |
base[0]=base[0]; |
3388 |
return Cnil; |
return Cnil; |
3389 |
} |
} |
3390 |
/* local entry for function progn 'compile1945 */ |
/* local entry for function progn 'compile5718 */ |
3391 |
|
|
3392 |
static object LI137() |
static object LI137() |
3393 |
|
|
3405 |
base[0]=base[0]; |
base[0]=base[0]; |
3406 |
return Cnil; |
return Cnil; |
3407 |
} |
} |
3408 |
/* local entry for function progn 'compile1945 */ |
/* local entry for function progn 'compile5742 */ |
3409 |
|
|
3410 |
static object LI138() |
static object LI138() |
3411 |
|
|
3417 |
VMR138(V285)} |
VMR138(V285)} |
3418 |
return Cnil; |
return Cnil; |
3419 |
} |
} |
3420 |
/* local entry for function progn 'compile1945 */ |
/* local entry for function progn 'compile5754 */ |
3421 |
|
|
3422 |
static object LI139() |
static object LI139() |
3423 |
|
|
3428 |
VMR139(V286)} |
VMR139(V286)} |
3429 |
return Cnil; |
return Cnil; |
3430 |
} |
} |
3431 |
/* function definition for Defclass FLOATING-POINT-OVERFLOW1945 */ |
/* function definition for Defclass FLOATING-POINT-OVERFLOW5774 */ |
3432 |
|
|
3433 |
static void L140() |
static void L140() |
3434 |
{register object *base=vs_base; |
{register object *base=vs_base; |
3447 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
3448 |
return; |
return; |
3449 |
} |
} |
3450 |
/* local entry for function progn 'compile1945 */ |
/* local entry for function progn 'compile5790 */ |
3451 |
|
|
3452 |
static object LI141() |
static object LI141() |
3453 |
|
|
3455 |
goto TTL; |
goto TTL; |
3456 |
TTL:; |
TTL:; |
3457 |
vs_base=vs_top; |
vs_base=vs_top; |
3458 |
(void) (*Lnk309)(); |
(void) (*Lnk310)(); |
3459 |
vs_top=sup; |
vs_top=sup; |
3460 |
{object V287 = Cnil; |
{object V287 = Cnil; |
3461 |
VMR141(V287)} |
VMR141(V287)} |
3462 |
base[0]=base[0]; |
base[0]=base[0]; |
3463 |
return Cnil; |
return Cnil; |
3464 |
} |
} |
3465 |
/* local entry for function progn 'compile1946 */ |
/* local entry for function progn 'compile5807 */ |
3466 |
|
|
3467 |
static object LI142() |
static object LI142() |
3468 |
|
|
3480 |
base[0]=base[0]; |
base[0]=base[0]; |
3481 |
return Cnil; |
return Cnil; |
3482 |
} |
} |
3483 |
/* local entry for function progn 'compile1946 */ |
/* local entry for function progn 'compile5831 */ |
3484 |
|
|
3485 |
static object LI143() |
static object LI143() |
3486 |
|
|
3492 |
VMR143(V290)} |
VMR143(V290)} |
3493 |
return Cnil; |
return Cnil; |
3494 |
} |
} |
3495 |
/* local entry for function progn 'compile1946 */ |
/* local entry for function progn 'compile5843 */ |
3496 |
|
|
3497 |
static object LI144() |
static object LI144() |
3498 |
|
|
3503 |
VMR144(V291)} |
VMR144(V291)} |
3504 |
return Cnil; |
return Cnil; |
3505 |
} |
} |
3506 |
/* function definition for Defclass FLOATING-POINT-UNDERFLOW1946 */ |
/* function definition for Defclass FLOATING-POINT-UNDERFLOW5863 */ |
3507 |
|
|
3508 |
static void L145() |
static void L145() |
3509 |
{register object *base=vs_base; |
{register object *base=vs_base; |
3522 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
3523 |
return; |
return; |
3524 |
} |
} |
3525 |
/* local entry for function progn 'compile1946 */ |
/* local entry for function progn 'compile5879 */ |
3526 |
|
|
3527 |
static object LI146() |
static object LI146() |
3528 |
|
|
3530 |
goto TTL; |
goto TTL; |
3531 |
TTL:; |
TTL:; |
3532 |
vs_base=vs_top; |
vs_base=vs_top; |
3533 |
(void) (*Lnk310)(); |
(void) (*Lnk311)(); |
3534 |
vs_top=sup; |
vs_top=sup; |
3535 |
{object V292 = Cnil; |
{object V292 = Cnil; |
3536 |
VMR146(V292)} |
VMR146(V292)} |
3537 |
base[0]=base[0]; |
base[0]=base[0]; |
3538 |
return Cnil; |
return Cnil; |
3539 |
} |
} |
3540 |
/* local entry for function progn 'compile1947 */ |
/* local entry for function progn 'compile5896 */ |
3541 |
|
|
3542 |
static object LI147() |
static object LI147() |
3543 |
|
|
3555 |
base[0]=base[0]; |
base[0]=base[0]; |
3556 |
return Cnil; |
return Cnil; |
3557 |
} |
} |
3558 |
/* local entry for function progn 'compile1947 */ |
/* local entry for function progn 'compile5920 */ |
3559 |
|
|
3560 |
static object LI148() |
static object LI148() |
3561 |
|
|
3567 |
VMR148(V295)} |
VMR148(V295)} |
3568 |
return Cnil; |
return Cnil; |
3569 |
} |
} |
3570 |
/* local entry for function progn 'compile1947 */ |
/* local entry for function progn 'compile5932 */ |
3571 |
|
|
3572 |
static object LI149() |
static object LI149() |
3573 |
|
|
3578 |
VMR149(V296)} |
VMR149(V296)} |
3579 |
return Cnil; |
return Cnil; |
3580 |
} |
} |
3581 |
/* function definition for Defclass ABORT-FAILURE1947 */ |
/* function definition for Defclass ABORT-FAILURE5952 */ |
3582 |
|
|
3583 |
static void L150() |
static void L150() |
3584 |
{register object *base=vs_base; |
{register object *base=vs_base; |
3597 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
3598 |
return; |
return; |
3599 |
} |
} |
3600 |
/* local entry for function progn 'compile1947 */ |
/* local entry for function progn 'compile5968 */ |
3601 |
|
|
3602 |
static object LI151() |
static object LI151() |
3603 |
|
|
3605 |
goto TTL; |
goto TTL; |
3606 |
TTL:; |
TTL:; |
3607 |
vs_base=vs_top; |
vs_base=vs_top; |
3608 |
(void) (*Lnk311)(); |
(void) (*Lnk312)(); |
3609 |
vs_top=sup; |
vs_top=sup; |
3610 |
{object V297 = Cnil; |
{object V297 = Cnil; |
3611 |
VMR151(V297)} |
VMR151(V297)} |
3612 |
base[0]=base[0]; |
base[0]=base[0]; |
3613 |
return Cnil; |
return Cnil; |
3614 |
} |
} |
3615 |
/* local entry for function progn 'compile1948 */ |
/* local entry for function progn 'compile5985 */ |
3616 |
|
|
3617 |
static object LI152() |
static object LI152() |
3618 |
|
|
3630 |
base[0]=base[0]; |
base[0]=base[0]; |
3631 |
return Cnil; |
return Cnil; |
3632 |
} |
} |
3633 |
/* local entry for function progn 'compile1948 */ |
/* local entry for function progn 'compile6009 */ |
3634 |
|
|
3635 |
static object LI153() |
static object LI153() |
3636 |
|
|
3642 |
VMR153(V300)} |
VMR153(V300)} |
3643 |
return Cnil; |
return Cnil; |
3644 |
} |
} |
3645 |
/* local entry for function progn 'compile1948 */ |
/* local entry for function progn 'compile6025 */ |
3646 |
|
|
3647 |
static object LI154() |
static object LI154() |
3648 |
|
|
3824 |
T1032:; |
T1032:; |
3825 |
base[4]= VV[47]; |
base[4]= VV[47]; |
3826 |
vs_top=(vs_base=base+4)+1; |
vs_top=(vs_base=base+4)+1; |
3827 |
Lerror(); |
(void) (*Lnk273)(); |
3828 |
return; |
return; |
3829 |
goto T1029; |
goto T1029; |
3830 |
T1029:; |
T1029:; |
3835 |
return; |
return; |
3836 |
} |
} |
3837 |
} |
} |
3838 |
/* local entry for function progn 'compile1965 */ |
/* local entry for function progn 'compile6226 */ |
3839 |
|
|
3840 |
static object LI156() |
static object LI156() |
3841 |
|
|
3847 |
base[2]= Cnil; |
base[2]= Cnil; |
3848 |
base[3]= VV[200]; |
base[3]= VV[200]; |
3849 |
base[4]= VV[201]; |
base[4]= VV[201]; |
3850 |
V321= symbol_function(VV[312]); |
V321= symbol_function(VV[313]); |
3851 |
base[5]= listA(3,VV[51],V321,VV[202]); |
base[5]= listA(3,VV[51],V321,VV[202]); |
3852 |
base[6]= Cnil; |
base[6]= Cnil; |
3853 |
vs_top=(vs_base=base+0)+7; |
vs_top=(vs_base=base+0)+7; |
3854 |
(void) (*Lnk275)(); |
(void) (*Lnk276)(); |
3855 |
vs_top=sup; |
vs_top=sup; |
3856 |
{object V322 = Cnil; |
{object V322 = Cnil; |
3857 |
VMR156(V322)} |
VMR156(V322)} |
3858 |
base[0]=base[0]; |
base[0]=base[0]; |
3859 |
return Cnil; |
return Cnil; |
3860 |
} |
} |
3861 |
/* local entry for function progn 'compile1965 */ |
/* local entry for function progn 'compile6234 */ |
3862 |
|
|
3863 |
static object LI157() |
static object LI157() |
3864 |
|
|
3869 |
VMR157(V323)} |
VMR157(V323)} |
3870 |
return Cnil; |
return Cnil; |
3871 |
} |
} |
3872 |
/* function definition for Defclass INTERNAL-ERROR1965 */ |
/* function definition for Defclass INTERNAL-ERROR6254 */ |
3873 |
|
|
3874 |
static void L158() |
static void L158() |
3875 |
{register object *base=vs_base; |
{register object *base=vs_base; |
3903 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
3904 |
return; |
return; |
3905 |
} |
} |
3906 |
/* local entry for function progn 'compile1966 */ |
/* local entry for function progn 'compile6271 */ |
3907 |
|
|
3908 |
static object LI159() |
static object LI159() |
3909 |
|
|
3911 |
goto TTL; |
goto TTL; |
3912 |
TTL:; |
TTL:; |
3913 |
vs_base=vs_top; |
vs_base=vs_top; |
3914 |
(void) (*Lnk313)(); |
(void) (*Lnk314)(); |
3915 |
vs_top=sup; |
vs_top=sup; |
3916 |
{object V325 = Cnil; |
{object V325 = Cnil; |
3917 |
VMR159(V325)} |
VMR159(V325)} |
3918 |
base[0]=base[0]; |
base[0]=base[0]; |
3919 |
return Cnil; |
return Cnil; |
3920 |
} |
} |
3921 |
/* local entry for function progn 'compile1967 */ |
/* local entry for function progn 'compile6288 */ |
3922 |
|
|
3923 |
static object LI160() |
static object LI160() |
3924 |
|
|
3936 |
base[0]=base[0]; |
base[0]=base[0]; |
3937 |
return Cnil; |
return Cnil; |
3938 |
} |
} |
3939 |
/* local entry for function progn 'compile1967 */ |
/* local entry for function progn 'compile6312 */ |
3940 |
|
|
3941 |
static object LI161() |
static object LI161() |
3942 |
|
|
3948 |
VMR161(V328)} |
VMR161(V328)} |
3949 |
return Cnil; |
return Cnil; |
3950 |
} |
} |
3951 |
/* local entry for function progn 'compile1967 */ |
/* local entry for function progn 'compile6328 */ |
3952 |
|
|
3953 |
static object LI162() |
static object LI162() |
3954 |
|
|
4130 |
T1145:; |
T1145:; |
4131 |
base[4]= VV[47]; |
base[4]= VV[47]; |
4132 |
vs_top=(vs_base=base+4)+1; |
vs_top=(vs_base=base+4)+1; |
4133 |
Lerror(); |
(void) (*Lnk273)(); |
4134 |
return; |
return; |
4135 |
goto T1142; |
goto T1142; |
4136 |
T1142:; |
T1142:; |
4138 |
V348= (V333); |
V348= (V333); |
4139 |
base[4]= V332; |
base[4]= V332; |
4140 |
vs_top=(vs_base=base+4)+1; |
vs_top=(vs_base=base+4)+1; |
4141 |
(void) (*Lnk314)(Lclptr314); |
(void) (*Lnk315)(Lclptr315); |
4142 |
vs_top=sup; |
vs_top=sup; |
4143 |
if((vs_base[0])==Cnil){ |
if((vs_base[0])==Cnil){ |
4144 |
goto T1212;} |
goto T1212;} |
4146 |
base[5]= VV[214]; |
base[5]= VV[214]; |
4147 |
base[7]= V332; |
base[7]= V332; |
4148 |
vs_top=(vs_base=base+7)+1; |
vs_top=(vs_base=base+7)+1; |
4149 |
(void) (*Lnk314)(Lclptr314); |
(void) (*Lnk315)(Lclptr315); |
4150 |
vs_top=sup; |
vs_top=sup; |
4151 |
base[6]= vs_base[0]; |
base[6]= vs_base[0]; |
4152 |
vs_top=(vs_base=base+4)+3; |
vs_top=(vs_base=base+4)+3; |
4299 |
T1221:; |
T1221:; |
4300 |
base[4]= VV[47]; |
base[4]= VV[47]; |
4301 |
vs_top=(vs_base=base+4)+1; |
vs_top=(vs_base=base+4)+1; |
4302 |
Lerror(); |
(void) (*Lnk273)(); |
4303 |
return;} |
return;} |
4304 |
} |
} |
4305 |
} |
} |
4306 |
/* local entry for function progn 'compile1988 */ |
/* local entry for function progn 'compile6641 */ |
4307 |
|
|
4308 |
static object LI164() |
static object LI164() |
4309 |
|
|
4315 |
base[2]= Cnil; |
base[2]= Cnil; |
4316 |
base[3]= VV[218]; |
base[3]= VV[218]; |
4317 |
base[4]= VV[219]; |
base[4]= VV[219]; |
4318 |
V361= symbol_function(VV[315]); |
V361= symbol_function(VV[316]); |
4319 |
base[5]= listA(3,VV[51],V361,VV[220]); |
base[5]= listA(3,VV[51],V361,VV[220]); |
4320 |
base[6]= Cnil; |
base[6]= Cnil; |
4321 |
vs_top=(vs_base=base+0)+7; |
vs_top=(vs_base=base+0)+7; |
4322 |
(void) (*Lnk275)(); |
(void) (*Lnk276)(); |
4323 |
vs_top=sup; |
vs_top=sup; |
4324 |
{object V362 = Cnil; |
{object V362 = Cnil; |
4325 |
VMR164(V362)} |
VMR164(V362)} |
4326 |
base[0]=base[0]; |
base[0]=base[0]; |
4327 |
return Cnil; |
return Cnil; |
4328 |
} |
} |
4329 |
/* local entry for function progn 'compile1988 */ |
/* local entry for function progn 'compile6649 */ |
4330 |
|
|
4331 |
static object LI165() |
static object LI165() |
4332 |
|
|
4353 |
TTL:; |
TTL:; |
4354 |
base[2]= (V364); |
base[2]= (V364); |
4355 |
vs_top=(vs_base=base+2)+1; |
vs_top=(vs_base=base+2)+1; |
4356 |
(void) (*Lnk314)(Lclptr314); |
(void) (*Lnk315)(Lclptr315); |
4357 |
vs_top=sup; |
vs_top=sup; |
4358 |
if((vs_base[0])==Cnil){ |
if((vs_base[0])==Cnil){ |
4359 |
goto T1298;} |
goto T1298;} |
4361 |
base[3]= VV[221]; |
base[3]= VV[221]; |
4362 |
base[5]= (V364); |
base[5]= (V364); |
4363 |
vs_top=(vs_base=base+5)+1; |
vs_top=(vs_base=base+5)+1; |
4364 |
(void) (*Lnk314)(Lclptr314); |
(void) (*Lnk315)(Lclptr315); |
4365 |
vs_top=sup; |
vs_top=sup; |
4366 |
base[4]= vs_base[0]; |
base[4]= vs_base[0]; |
4367 |
vs_top=(vs_base=base+2)+3; |
vs_top=(vs_base=base+2)+3; |
4389 |
return; |
return; |
4390 |
} |
} |
4391 |
} |
} |
4392 |
/* function definition for Defclass INTERNAL-SIMPLE-ERROR1988 */ |
/* function definition for Defclass INTERNAL-SIMPLE-ERROR6681 */ |
4393 |
|
|
4394 |
static void L167() |
static void L167() |
4395 |
{register object *base=vs_base; |
{register object *base=vs_base; |
4408 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
4409 |
return; |
return; |
4410 |
} |
} |
4411 |
/* local entry for function progn 'compile1988 */ |
/* local entry for function progn 'compile6697 */ |
4412 |
|
|
4413 |
static object LI168() |
static object LI168() |
4414 |
|
|
4416 |
goto TTL; |
goto TTL; |
4417 |
TTL:; |
TTL:; |
4418 |
vs_base=vs_top; |
vs_base=vs_top; |
4419 |
(void) (*Lnk316)(); |
(void) (*Lnk317)(); |
4420 |
vs_top=sup; |
vs_top=sup; |
4421 |
{object V367 = Cnil; |
{object V367 = Cnil; |
4422 |
VMR168(V367)} |
VMR168(V367)} |
4423 |
base[0]=base[0]; |
base[0]=base[0]; |
4424 |
return Cnil; |
return Cnil; |
4425 |
} |
} |
4426 |
/* local entry for function progn 'compile1989 */ |
/* local entry for function progn 'compile6714 */ |
4427 |
|
|
4428 |
static object LI169() |
static object LI169() |
4429 |
|
|
4441 |
base[0]=base[0]; |
base[0]=base[0]; |
4442 |
return Cnil; |
return Cnil; |
4443 |
} |
} |
4444 |
/* local entry for function progn 'compile1989 */ |
/* local entry for function progn 'compile6738 */ |
4445 |
|
|
4446 |
static object LI170() |
static object LI170() |
4447 |
|
|
4453 |
VMR170(V370)} |
VMR170(V370)} |
4454 |
return Cnil; |
return Cnil; |
4455 |
} |
} |
4456 |
/* local entry for function progn 'compile1989 */ |
/* local entry for function progn 'compile6754 */ |
4457 |
|
|
4458 |
static object LI171() |
static object LI171() |
4459 |
|
|
4635 |
T1333:; |
T1333:; |
4636 |
base[4]= VV[47]; |
base[4]= VV[47]; |
4637 |
vs_top=(vs_base=base+4)+1; |
vs_top=(vs_base=base+4)+1; |
4638 |
Lerror(); |
(void) (*Lnk273)(); |
4639 |
return; |
return; |
4640 |
goto T1330; |
goto T1330; |
4641 |
T1330:; |
T1330:; |
4642 |
base[4]= (V374); |
base[4]= (V374); |
4643 |
base[5]= (V375); |
base[5]= (V375); |
4644 |
vs_top=(vs_base=base+4)+2; |
vs_top=(vs_base=base+4)+2; |
4645 |
(void) (*Lnk317)(); |
(void) (*Lnk318)(); |
4646 |
return; |
return; |
4647 |
} |
} |
4648 |
} |
} |
4649 |
/* local entry for function progn 'compile2006 */ |
/* local entry for function progn 'compile6947 */ |
4650 |
|
|
4651 |
static object LI173() |
static object LI173() |
4652 |
|
|
4658 |
base[2]= Cnil; |
base[2]= Cnil; |
4659 |
base[3]= VV[229]; |
base[3]= VV[229]; |
4660 |
base[4]= VV[230]; |
base[4]= VV[230]; |
4661 |
V389= symbol_function(VV[318]); |
V389= symbol_function(VV[319]); |
4662 |
base[5]= listA(3,VV[51],V389,VV[231]); |
base[5]= listA(3,VV[51],V389,VV[231]); |
4663 |
base[6]= Cnil; |
base[6]= Cnil; |
4664 |
vs_top=(vs_base=base+0)+7; |
vs_top=(vs_base=base+0)+7; |
4665 |
(void) (*Lnk275)(); |
(void) (*Lnk276)(); |
4666 |
vs_top=sup; |
vs_top=sup; |
4667 |
{object V390 = Cnil; |
{object V390 = Cnil; |
4668 |
VMR173(V390)} |
VMR173(V390)} |
4669 |
base[0]=base[0]; |
base[0]=base[0]; |
4670 |
return Cnil; |
return Cnil; |
4671 |
} |
} |
4672 |
/* local entry for function progn 'compile2006 */ |
/* local entry for function progn 'compile6955 */ |
4673 |
|
|
4674 |
static object LI174() |
static object LI174() |
4675 |
|
|
4680 |
VMR174(V391)} |
VMR174(V391)} |
4681 |
return Cnil; |
return Cnil; |
4682 |
} |
} |
4683 |
/* function definition for Defclass INTERNAL-TYPE-ERROR2006 */ |
/* function definition for Defclass INTERNAL-TYPE-ERROR6975 */ |
4684 |
|
|
4685 |
static void L175() |
static void L175() |
4686 |
{register object *base=vs_base; |
{register object *base=vs_base; |
4699 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
4700 |
return; |
return; |
4701 |
} |
} |
4702 |
/* local entry for function progn 'compile2006 */ |
/* local entry for function progn 'compile6991 */ |
4703 |
|
|
4704 |
static object LI176() |
static object LI176() |
4705 |
|
|
4707 |
goto TTL; |
goto TTL; |
4708 |
TTL:; |
TTL:; |
4709 |
vs_base=vs_top; |
vs_base=vs_top; |
4710 |
(void) (*Lnk319)(); |
(void) (*Lnk320)(); |
4711 |
vs_top=sup; |
vs_top=sup; |
4712 |
{object V392 = Cnil; |
{object V392 = Cnil; |
4713 |
VMR176(V392)} |
VMR176(V392)} |
4714 |
base[0]=base[0]; |
base[0]=base[0]; |
4715 |
return Cnil; |
return Cnil; |
4716 |
} |
} |
4717 |
/* local entry for function progn 'compile2007 */ |
/* local entry for function progn 'compile7008 */ |
4718 |
|
|
4719 |
static object LI177() |
static object LI177() |
4720 |
|
|
4732 |
base[0]=base[0]; |
base[0]=base[0]; |
4733 |
return Cnil; |
return Cnil; |
4734 |
} |
} |
4735 |
/* local entry for function progn 'compile2007 */ |
/* local entry for function progn 'compile7032 */ |
4736 |
|
|
4737 |
static object LI178() |
static object LI178() |
4738 |
|
|
4744 |
VMR178(V395)} |
VMR178(V395)} |
4745 |
return Cnil; |
return Cnil; |
4746 |
} |
} |
4747 |
/* local entry for function progn 'compile2007 */ |
/* local entry for function progn 'compile7044 */ |
4748 |
|
|
4749 |
static object LI179() |
static object LI179() |
4750 |
|
|
4755 |
VMR179(V396)} |
VMR179(V396)} |
4756 |
return Cnil; |
return Cnil; |
4757 |
} |
} |
4758 |
/* function definition for Defclass INTERNAL-PACKAGE-ERROR2007 */ |
/* function definition for Defclass INTERNAL-PACKAGE-ERROR7064 */ |
4759 |
|
|
4760 |
static void L180() |
static void L180() |
4761 |
{register object *base=vs_base; |
{register object *base=vs_base; |
4774 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
4775 |
return; |
return; |
4776 |
} |
} |
4777 |
/* local entry for function progn 'compile2007 */ |
/* local entry for function progn 'compile7080 */ |
4778 |
|
|
4779 |
static object LI181() |
static object LI181() |
4780 |
|
|
4782 |
goto TTL; |
goto TTL; |
4783 |
TTL:; |
TTL:; |
4784 |
vs_base=vs_top; |
vs_base=vs_top; |
4785 |
(void) (*Lnk320)(); |
(void) (*Lnk321)(); |
4786 |
vs_top=sup; |
vs_top=sup; |
4787 |
{object V397 = Cnil; |
{object V397 = Cnil; |
4788 |
VMR181(V397)} |
VMR181(V397)} |
4789 |
base[0]=base[0]; |
base[0]=base[0]; |
4790 |
return Cnil; |
return Cnil; |
4791 |
} |
} |
4792 |
/* local entry for function progn 'compile2008 */ |
/* local entry for function progn 'compile7097 */ |
4793 |
|
|
4794 |
static object LI182() |
static object LI182() |
4795 |
|
|
4807 |
base[0]=base[0]; |
base[0]=base[0]; |
4808 |
return Cnil; |
return Cnil; |
4809 |
} |
} |
4810 |
/* local entry for function progn 'compile2008 */ |
/* local entry for function progn 'compile7121 */ |
4811 |
|
|
4812 |
static object LI183() |
static object LI183() |
4813 |
|
|
4819 |
VMR183(V400)} |
VMR183(V400)} |
4820 |
return Cnil; |
return Cnil; |
4821 |
} |
} |
4822 |
/* local entry for function progn 'compile2008 */ |
/* local entry for function progn 'compile7133 */ |
4823 |
|
|
4824 |
static object LI184() |
static object LI184() |
4825 |
|
|
4830 |
VMR184(V401)} |
VMR184(V401)} |
4831 |
return Cnil; |
return Cnil; |
4832 |
} |
} |
4833 |
/* function definition for Defclass INTERNAL-SIMPLE-PROGRAM-ERROR2008 */ |
/* function definition for Defclass INTERNAL-SIMPLE-PROGRAM-ERROR7153 */ |
4834 |
|
|
4835 |
static void L185() |
static void L185() |
4836 |
{register object *base=vs_base; |
{register object *base=vs_base; |
4849 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
4850 |
return; |
return; |
4851 |
} |
} |
4852 |
/* local entry for function progn 'compile2008 */ |
/* local entry for function progn 'compile7169 */ |
4853 |
|
|
4854 |
static object LI186() |
static object LI186() |
4855 |
|
|
4857 |
goto TTL; |
goto TTL; |
4858 |
TTL:; |
TTL:; |
4859 |
vs_base=vs_top; |
vs_base=vs_top; |
4860 |
(void) (*Lnk321)(); |
(void) (*Lnk322)(); |
4861 |
vs_top=sup; |
vs_top=sup; |
4862 |
{object V402 = Cnil; |
{object V402 = Cnil; |
4863 |
VMR186(V402)} |
VMR186(V402)} |
4864 |
base[0]=base[0]; |
base[0]=base[0]; |
4865 |
return Cnil; |
return Cnil; |
4866 |
} |
} |
4867 |
/* local entry for function progn 'compile2009 */ |
/* local entry for function progn 'compile7186 */ |
4868 |
|
|
4869 |
static object LI187() |
static object LI187() |
4870 |
|
|
4882 |
base[0]=base[0]; |
base[0]=base[0]; |
4883 |
return Cnil; |
return Cnil; |
4884 |
} |
} |
4885 |
/* local entry for function progn 'compile2009 */ |
/* local entry for function progn 'compile7210 */ |
4886 |
|
|
4887 |
static object LI188() |
static object LI188() |
4888 |
|
|
4894 |
VMR188(V405)} |
VMR188(V405)} |
4895 |
return Cnil; |
return Cnil; |
4896 |
} |
} |
4897 |
/* local entry for function progn 'compile2009 */ |
/* local entry for function progn 'compile7222 */ |
4898 |
|
|
4899 |
static object LI189() |
static object LI189() |
4900 |
|
|
4905 |
VMR189(V406)} |
VMR189(V406)} |
4906 |
return Cnil; |
return Cnil; |
4907 |
} |
} |
4908 |
/* function definition for Defclass INTERNAL-SIMPLE-CONTROL-ERROR2009 */ |
/* function definition for Defclass INTERNAL-SIMPLE-CONTROL-ERROR7242 */ |
4909 |
|
|
4910 |
static void L190() |
static void L190() |
4911 |
{register object *base=vs_base; |
{register object *base=vs_base; |
4924 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
4925 |
return; |
return; |
4926 |
} |
} |
4927 |
/* local entry for function progn 'compile2009 */ |
/* local entry for function progn 'compile7258 */ |
4928 |
|
|
4929 |
static object LI191() |
static object LI191() |
4930 |
|
|
4932 |
goto TTL; |
goto TTL; |
4933 |
TTL:; |
TTL:; |
4934 |
vs_base=vs_top; |
vs_base=vs_top; |
4935 |
(void) (*Lnk322)(); |
(void) (*Lnk323)(); |
4936 |
vs_top=sup; |
vs_top=sup; |
4937 |
{object V407 = Cnil; |
{object V407 = Cnil; |
4938 |
VMR191(V407)} |
VMR191(V407)} |
4939 |
base[0]=base[0]; |
base[0]=base[0]; |
4940 |
return Cnil; |
return Cnil; |
4941 |
} |
} |
4942 |
/* local entry for function progn 'compile2010 */ |
/* local entry for function progn 'compile7275 */ |
4943 |
|
|
4944 |
static object LI192() |
static object LI192() |
4945 |
|
|
4957 |
base[0]=base[0]; |
base[0]=base[0]; |
4958 |
return Cnil; |
return Cnil; |
4959 |
} |
} |
4960 |
/* local entry for function progn 'compile2010 */ |
/* local entry for function progn 'compile7299 */ |
4961 |
|
|
4962 |
static object LI193() |
static object LI193() |
4963 |
|
|
4969 |
VMR193(V410)} |
VMR193(V410)} |
4970 |
return Cnil; |
return Cnil; |
4971 |
} |
} |
4972 |
/* local entry for function progn 'compile2010 */ |
/* local entry for function progn 'compile7311 */ |
4973 |
|
|
4974 |
static object LI194() |
static object LI194() |
4975 |
|
|
4980 |
VMR194(V411)} |
VMR194(V411)} |
4981 |
return Cnil; |
return Cnil; |
4982 |
} |
} |
4983 |
/* function definition for Defclass INTERNAL-UNBOUND-VARIABLE2010 */ |
/* function definition for Defclass INTERNAL-UNBOUND-VARIABLE7331 */ |
4984 |
|
|
4985 |
static void L195() |
static void L195() |
4986 |
{register object *base=vs_base; |
{register object *base=vs_base; |
4999 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
5000 |
return; |
return; |
5001 |
} |
} |
5002 |
/* local entry for function progn 'compile2010 */ |
/* local entry for function progn 'compile7347 */ |
5003 |
|
|
5004 |
static object LI196() |
static object LI196() |
5005 |
|
|
5007 |
goto TTL; |
goto TTL; |
5008 |
TTL:; |
TTL:; |
5009 |
vs_base=vs_top; |
vs_base=vs_top; |
5010 |
(void) (*Lnk323)(); |
(void) (*Lnk324)(); |
5011 |
vs_top=sup; |
vs_top=sup; |
5012 |
{object V412 = Cnil; |
{object V412 = Cnil; |
5013 |
VMR196(V412)} |
VMR196(V412)} |
5014 |
base[0]=base[0]; |
base[0]=base[0]; |
5015 |
return Cnil; |
return Cnil; |
5016 |
} |
} |
5017 |
/* local entry for function progn 'compile2011 */ |
/* local entry for function progn 'compile7364 */ |
5018 |
|
|
5019 |
static object LI197() |
static object LI197() |
5020 |
|
|
5032 |
base[0]=base[0]; |
base[0]=base[0]; |
5033 |
return Cnil; |
return Cnil; |
5034 |
} |
} |
5035 |
/* local entry for function progn 'compile2011 */ |
/* local entry for function progn 'compile7388 */ |
5036 |
|
|
5037 |
static object LI198() |
static object LI198() |
5038 |
|
|
5044 |
VMR198(V415)} |
VMR198(V415)} |
5045 |
return Cnil; |
return Cnil; |
5046 |
} |
} |
5047 |
/* local entry for function progn 'compile2011 */ |
/* local entry for function progn 'compile7400 */ |
5048 |
|
|
5049 |
static object LI199() |
static object LI199() |
5050 |
|
|
5055 |
VMR199(V416)} |
VMR199(V416)} |
5056 |
return Cnil; |
return Cnil; |
5057 |
} |
} |
5058 |
/* function definition for Defclass INTERNAL-UNDEFINED-FUNCTION2011 */ |
/* function definition for Defclass INTERNAL-UNDEFINED-FUNCTION7420 */ |
5059 |
|
|
5060 |
static void L200() |
static void L200() |
5061 |
{register object *base=vs_base; |
{register object *base=vs_base; |
5074 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
5075 |
return; |
return; |
5076 |
} |
} |
5077 |
/* local entry for function progn 'compile2011 */ |
/* local entry for function progn 'compile7436 */ |
5078 |
|
|
5079 |
static object LI201() |
static object LI201() |
5080 |
|
|
5082 |
goto TTL; |
goto TTL; |
5083 |
TTL:; |
TTL:; |
5084 |
vs_base=vs_top; |
vs_base=vs_top; |
5085 |
(void) (*Lnk324)(); |
(void) (*Lnk325)(); |
5086 |
vs_top=sup; |
vs_top=sup; |
5087 |
{object V417 = Cnil; |
{object V417 = Cnil; |
5088 |
VMR201(V417)} |
VMR201(V417)} |
5089 |
base[0]=base[0]; |
base[0]=base[0]; |
5090 |
return Cnil; |
return Cnil; |
5091 |
} |
} |
5092 |
/* local entry for function progn 'compile2012 */ |
/* local entry for function progn 'compile7453 */ |
5093 |
|
|
5094 |
static object LI202() |
static object LI202() |
5095 |
|
|
5107 |
base[0]=base[0]; |
base[0]=base[0]; |
5108 |
return Cnil; |
return Cnil; |
5109 |
} |
} |
5110 |
/* local entry for function progn 'compile2012 */ |
/* local entry for function progn 'compile7477 */ |
5111 |
|
|
5112 |
static object LI203() |
static object LI203() |
5113 |
|
|
5119 |
VMR203(V420)} |
VMR203(V420)} |
5120 |
return Cnil; |
return Cnil; |
5121 |
} |
} |
5122 |
/* local entry for function progn 'compile2012 */ |
/* local entry for function progn 'compile7489 */ |
5123 |
|
|
5124 |
static object LI204() |
static object LI204() |
5125 |
|
|
5130 |
VMR204(V421)} |
VMR204(V421)} |
5131 |
return Cnil; |
return Cnil; |
5132 |
} |
} |
5133 |
/* function definition for Defclass INTERNAL-END-OF-FILE2012 */ |
/* function definition for Defclass INTERNAL-END-OF-FILE7509 */ |
5134 |
|
|
5135 |
static void L205() |
static void L205() |
5136 |
{register object *base=vs_base; |
{register object *base=vs_base; |
5149 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
5150 |
return; |
return; |
5151 |
} |
} |
5152 |
/* local entry for function progn 'compile2012 */ |
/* local entry for function progn 'compile7525 */ |
5153 |
|
|
5154 |
static object LI206() |
static object LI206() |
5155 |
|
|
5157 |
goto TTL; |
goto TTL; |
5158 |
TTL:; |
TTL:; |
5159 |
vs_base=vs_top; |
vs_base=vs_top; |
5160 |
(void) (*Lnk325)(); |
(void) (*Lnk326)(); |
5161 |
vs_top=sup; |
vs_top=sup; |
5162 |
{object V422 = Cnil; |
{object V422 = Cnil; |
5163 |
VMR206(V422)} |
VMR206(V422)} |
5164 |
base[0]=base[0]; |
base[0]=base[0]; |
5165 |
return Cnil; |
return Cnil; |
5166 |
} |
} |
5167 |
/* local entry for function progn 'compile2013 */ |
/* local entry for function progn 'compile7542 */ |
5168 |
|
|
5169 |
static object LI207() |
static object LI207() |
5170 |
|
|
5182 |
base[0]=base[0]; |
base[0]=base[0]; |
5183 |
return Cnil; |
return Cnil; |
5184 |
} |
} |
5185 |
/* local entry for function progn 'compile2013 */ |
/* local entry for function progn 'compile7566 */ |
5186 |
|
|
5187 |
static object LI208() |
static object LI208() |
5188 |
|
|
5194 |
VMR208(V425)} |
VMR208(V425)} |
5195 |
return Cnil; |
return Cnil; |
5196 |
} |
} |
5197 |
/* local entry for function progn 'compile2013 */ |
/* local entry for function progn 'compile7578 */ |
5198 |
|
|
5199 |
static object LI209() |
static object LI209() |
5200 |
|
|
5205 |
VMR209(V426)} |
VMR209(V426)} |
5206 |
return Cnil; |
return Cnil; |
5207 |
} |
} |
5208 |
/* function definition for Defclass INTERNAL-SIMPLE-FILE-ERROR2013 */ |
/* function definition for Defclass INTERNAL-SIMPLE-FILE-ERROR7598 */ |
5209 |
|
|
5210 |
static void L210() |
static void L210() |
5211 |
{register object *base=vs_base; |
{register object *base=vs_base; |
5224 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
5225 |
return; |
return; |
5226 |
} |
} |
5227 |
/* local entry for function progn 'compile2013 */ |
/* local entry for function progn 'compile7614 */ |
5228 |
|
|
5229 |
static object LI211() |
static object LI211() |
5230 |
|
|
5232 |
goto TTL; |
goto TTL; |
5233 |
TTL:; |
TTL:; |
5234 |
vs_base=vs_top; |
vs_base=vs_top; |
5235 |
(void) (*Lnk326)(); |
(void) (*Lnk327)(); |
5236 |
vs_top=sup; |
vs_top=sup; |
5237 |
{object V427 = Cnil; |
{object V427 = Cnil; |
5238 |
VMR211(V427)} |
VMR211(V427)} |
5239 |
base[0]=base[0]; |
base[0]=base[0]; |
5240 |
return Cnil; |
return Cnil; |
5241 |
} |
} |
5242 |
/* local entry for function progn 'compile2014 */ |
/* local entry for function progn 'compile7631 */ |
5243 |
|
|
5244 |
static object LI212() |
static object LI212() |
5245 |
|
|
5257 |
base[0]=base[0]; |
base[0]=base[0]; |
5258 |
return Cnil; |
return Cnil; |
5259 |
} |
} |
5260 |
/* local entry for function progn 'compile2014 */ |
/* local entry for function progn 'compile7655 */ |
5261 |
|
|
5262 |
static object LI213() |
static object LI213() |
5263 |
|
|
5269 |
VMR213(V430)} |
VMR213(V430)} |
5270 |
return Cnil; |
return Cnil; |
5271 |
} |
} |
5272 |
/* local entry for function progn 'compile2014 */ |
/* local entry for function progn 'compile7667 */ |
5273 |
|
|
5274 |
static object LI214() |
static object LI214() |
5275 |
|
|
5280 |
VMR214(V431)} |
VMR214(V431)} |
5281 |
return Cnil; |
return Cnil; |
5282 |
} |
} |
5283 |
/* function definition for Defclass INTERNAL-SIMPLE-STREAM-ERROR2014 */ |
/* function definition for Defclass INTERNAL-SIMPLE-STREAM-ERROR7687 */ |
5284 |
|
|
5285 |
static void L215() |
static void L215() |
5286 |
{register object *base=vs_base; |
{register object *base=vs_base; |
5299 |
symlispcall(VV[261],base+0,6); |
symlispcall(VV[261],base+0,6); |
5300 |
return; |
return; |
5301 |
} |
} |
5302 |
/* local entry for function progn 'compile2014 */ |
/* local entry for function progn 'compile7703 */ |
5303 |
|
|
5304 |
static object LI216() |
static object LI216() |
5305 |
|
|
5307 |
goto TTL; |
goto TTL; |
5308 |
TTL:; |
TTL:; |
5309 |
vs_base=vs_top; |
vs_base=vs_top; |
5310 |
(void) (*Lnk327)(); |
(void) (*Lnk328)(); |
5311 |
vs_top=sup; |
vs_top=sup; |
5312 |
{object V432 = Cnil; |
{object V432 = Cnil; |
5313 |
VMR216(V432)} |
VMR216(V432)} |
5314 |
base[0]=base[0]; |
base[0]=base[0]; |
5315 |
return Cnil; |
return Cnil; |
5316 |
} |
} |
5317 |
/* local entry for function progn 'compile2015 */ |
/* local entry for function progn 'compile7720 */ |
5318 |
|
|
5319 |
static object LI217() |
static object LI217() |
5320 |
|
|
5332 |
base[0]=base[0]; |
base[0]=base[0]; |
5333 |
return Cnil; |
return Cnil; |
5334 |
} |
} |
5335 |
/* local entry for function progn 'compile2015 */ |
/* local entry for function progn 'compile7744 */ |
5336 |
|
|
5337 |
static object LI218() |
static object LI218() |
5338 |
|
|
5344 |
VMR218(V435)} |
VMR218(V435)} |
5345 |
return Cnil; |
return Cnil; |
5346 |
} |
} |
5347 |
/* local entry for function progn 'compile2015 */ |
/* local entry for function progn 'compile7756 */ |
5348 |
|
|
5349 |
static object LI219() |
static object LI219() |
5350 |
|
|
5355 |
VMR219(V436)} |
VMR219(V436)} |
5356 |
return Cnil; |
return Cnil; |
5357 |
} |
} |
5358 |
/* local entry for function progn 'compile2015 */ |
/* local entry for function progn 'compile7772 */ |
5359 |
|
|
5360 |
static object LI220() |
static object LI220() |
5361 |
|
|
5364 |
TTL:; |
TTL:; |
5365 |
base[0]= VV[259]; |
base[0]= VV[259]; |
5366 |
vs_top=(vs_base=base+0)+1; |
vs_top=(vs_base=base+0)+1; |
5367 |
(void) (*Lnk328)(); |
(void) (*Lnk329)(); |
5368 |
vs_top=sup; |
vs_top=sup; |
5369 |
{object V437 = Cnil; |
{object V437 = Cnil; |
5370 |
VMR220(V437)} |
VMR220(V437)} |
5371 |
base[0]=base[0]; |
base[0]=base[0]; |
5372 |
return Cnil; |
return Cnil; |
5373 |
} |
} |
5374 |
/* local entry for function progn 'compile2015 */ |
/* local entry for function progn 'compile7784 */ |
5375 |
|
|
5376 |
static object LI221() |
static object LI221() |
5377 |
|
|
5389 |
T1532:; |
T1532:; |
5390 |
base[0]= VV[16]; |
base[0]= VV[16]; |
5391 |
vs_top=(vs_base=base+0)+1; |
vs_top=(vs_base=base+0)+1; |
5392 |
(void) (*Lnk329)(); |
(void) (*Lnk330)(); |
5393 |
vs_top=sup; |
vs_top=sup; |
5394 |
setq(VV[259],vs_base[0]); |
setq(VV[259],vs_base[0]); |
5395 |
goto T1531; |
goto T1531; |
5399 |
base[0]=base[0]; |
base[0]=base[0]; |
5400 |
return Cnil; |
return Cnil; |
5401 |
} |
} |
5402 |
/* local entry for function progn 'compile2016 */ |
/* local entry for function progn 'compile7797 */ |
5403 |
|
|
5404 |
static object LI222() |
static object LI222() |
5405 |
|
|
5426 |
goto T1538;} |
goto T1538;} |
5427 |
base[1]= (V440); |
base[1]= (V440); |
5428 |
vs_top=(vs_base=base+1)+1; |
vs_top=(vs_base=base+1)+1; |
5429 |
(void) (*Lnk329)(); |
(void) (*Lnk330)(); |
5430 |
vs_top=sup; |
vs_top=sup; |
5431 |
V440= vs_base[0]; |
V440= vs_base[0]; |
5432 |
goto T1538; |
goto T1538; |
5434 |
base[1]= (V440); |
base[1]= (V440); |
5435 |
base[2]= VV[5]; |
base[2]= VV[5]; |
5436 |
vs_top=(vs_base=base+1)+2; |
vs_top=(vs_base=base+1)+2; |
5437 |
(void) (*Lnk330)(); |
(void) (*Lnk331)(); |
5438 |
vs_top=sup; |
vs_top=sup; |
5439 |
if((vs_base[0])!=Cnil){ |
if((vs_base[0])!=Cnil){ |
5440 |
goto T1543;} |
goto T1543;} |
5446 |
V442= symbol_value(VV[259]); |
V442= symbol_value(VV[259]); |
5447 |
base[1]= (V440); |
base[1]= (V440); |
5448 |
vs_top=(vs_base=base+1)+1; |
vs_top=(vs_base=base+1)+1; |
5449 |
(void) (*Lnk331)(Lclptr331); |
(void) (*Lnk332)(Lclptr332); |
5450 |
vs_top=sup; |
vs_top=sup; |
5451 |
V443= vs_base[0]; |
V443= vs_base[0]; |
5452 |
{register object x= V442,V441= V443; |
{register object x= V442,V441= V443; |
5461 |
return;}} |
return;}} |
5462 |
} |
} |
5463 |
} |
} |
5464 |
static void LnkT331(ptr) object *ptr;{ call_or_link_closure(VV[331],(void **)&Lnk331,(void **)&Lclptr331);} /* CLASS-PRECEDENCE-LIST */ |
static void LnkT332(ptr) object *ptr;{ call_or_link_closure(VV[332],(void **)&Lnk332,(void **)&Lclptr332);} /* CLASS-PRECEDENCE-LIST */ |
5465 |
static void LnkT330(){ call_or_link(VV[330],(void **)&Lnk330);} /* TYPEP */ |
static void LnkT331(){ call_or_link(VV[331],(void **)&Lnk331);} /* TYPEP */ |
5466 |
static void LnkT329(){ call_or_link(VV[329],(void **)&Lnk329);} /* FIND-CLASS */ |
static void LnkT330(){ call_or_link(VV[330],(void **)&Lnk330);} /* FIND-CLASS */ |
5467 |
static void LnkT328(){ call_or_link(VV[328],(void **)&Lnk328);} /* *MAKE-SPECIAL */ |
static void LnkT329(){ call_or_link(VV[329],(void **)&Lnk329);} /* *MAKE-SPECIAL */ |
5468 |
static void LnkT327(){ call_or_link(VV[327],(void **)&Lnk327);} /* Defclass INTERNAL-SIMPLE-STREAM-ERROR2014 */ |
static void LnkT328(){ call_or_link(VV[328],(void **)&Lnk328);} /* Defclass INTERNAL-SIMPLE-STREAM-ERROR7687 */ |
5469 |
static void LnkT326(){ call_or_link(VV[326],(void **)&Lnk326);} /* Defclass INTERNAL-SIMPLE-FILE-ERROR2013 */ |
static void LnkT327(){ call_or_link(VV[327],(void **)&Lnk327);} /* Defclass INTERNAL-SIMPLE-FILE-ERROR7598 */ |
5470 |
static void LnkT325(){ call_or_link(VV[325],(void **)&Lnk325);} /* Defclass INTERNAL-END-OF-FILE2012 */ |
static void LnkT326(){ call_or_link(VV[326],(void **)&Lnk326);} /* Defclass INTERNAL-END-OF-FILE7509 */ |
5471 |
static void LnkT324(){ call_or_link(VV[324],(void **)&Lnk324);} /* Defclass INTERNAL-UNDEFINED-FUNCTION2011 */ |
static void LnkT325(){ call_or_link(VV[325],(void **)&Lnk325);} /* Defclass INTERNAL-UNDEFINED-FUNCTION7420 */ |
5472 |
static void LnkT323(){ call_or_link(VV[323],(void **)&Lnk323);} /* Defclass INTERNAL-UNBOUND-VARIABLE2010 */ |
static void LnkT324(){ call_or_link(VV[324],(void **)&Lnk324);} /* Defclass INTERNAL-UNBOUND-VARIABLE7331 */ |
5473 |
static void LnkT322(){ call_or_link(VV[322],(void **)&Lnk322);} /* Defclass INTERNAL-SIMPLE-CONTROL-ERROR2009 */ |
static void LnkT323(){ call_or_link(VV[323],(void **)&Lnk323);} /* Defclass INTERNAL-SIMPLE-CONTROL-ERROR7242 */ |
5474 |
static void LnkT321(){ call_or_link(VV[321],(void **)&Lnk321);} /* Defclass INTERNAL-SIMPLE-PROGRAM-ERROR2008 */ |
static void LnkT322(){ call_or_link(VV[322],(void **)&Lnk322);} /* Defclass INTERNAL-SIMPLE-PROGRAM-ERROR7153 */ |
5475 |
static void LnkT320(){ call_or_link(VV[320],(void **)&Lnk320);} /* Defclass INTERNAL-PACKAGE-ERROR2007 */ |
static void LnkT321(){ call_or_link(VV[321],(void **)&Lnk321);} /* Defclass INTERNAL-PACKAGE-ERROR7064 */ |
5476 |
static void LnkT319(){ call_or_link(VV[319],(void **)&Lnk319);} /* Defclass INTERNAL-TYPE-ERROR2006 */ |
static void LnkT320(){ call_or_link(VV[320],(void **)&Lnk320);} /* Defclass INTERNAL-TYPE-ERROR6975 */ |
5477 |
static void LnkT317(){ call_or_link(VV[317],(void **)&Lnk317);} /* INTERNAL-SIMPLE-ERROR-PRINTER */ |
static void LnkT318(){ call_or_link(VV[318],(void **)&Lnk318);} /* INTERNAL-SIMPLE-ERROR-PRINTER */ |
5478 |
static void LnkT316(){ call_or_link(VV[316],(void **)&Lnk316);} /* Defclass INTERNAL-SIMPLE-ERROR1988 */ |
static void LnkT317(){ call_or_link(VV[317],(void **)&Lnk317);} /* Defclass INTERNAL-SIMPLE-ERROR6681 */ |
5479 |
static void LnkT314(ptr) object *ptr;{ call_or_link_closure(VV[314],(void **)&Lnk314,(void **)&Lclptr314);} /* INTERNAL-ERROR-FUNCTION-NAME */ |
static void LnkT315(ptr) object *ptr;{ call_or_link_closure(VV[315],(void **)&Lnk315,(void **)&Lclptr315);} /* INTERNAL-ERROR-FUNCTION-NAME */ |
5480 |
static void LnkT313(){ call_or_link(VV[313],(void **)&Lnk313);} /* Defclass INTERNAL-ERROR1965 */ |
static void LnkT314(){ call_or_link(VV[314],(void **)&Lnk314);} /* Defclass INTERNAL-ERROR6254 */ |
5481 |
static void LnkT311(){ call_or_link(VV[311],(void **)&Lnk311);} /* Defclass ABORT-FAILURE1947 */ |
static void LnkT312(){ call_or_link(VV[312],(void **)&Lnk312);} /* Defclass ABORT-FAILURE5952 */ |
5482 |
static void LnkT310(){ call_or_link(VV[310],(void **)&Lnk310);} /* Defclass FLOATING-POINT-UNDERFLOW1946 */ |
static void LnkT311(){ call_or_link(VV[311],(void **)&Lnk311);} /* Defclass FLOATING-POINT-UNDERFLOW5863 */ |
5483 |
static void LnkT309(){ call_or_link(VV[309],(void **)&Lnk309);} /* Defclass FLOATING-POINT-OVERFLOW1945 */ |
static void LnkT310(){ call_or_link(VV[310],(void **)&Lnk310);} /* Defclass FLOATING-POINT-OVERFLOW5774 */ |
5484 |
static void LnkT308(){ call_or_link(VV[308],(void **)&Lnk308);} /* Defclass DIVISION-BY-ZERO1944 */ |
static void LnkT309(){ call_or_link(VV[309],(void **)&Lnk309);} /* Defclass DIVISION-BY-ZERO5685 */ |
5485 |
static void LnkT307(){ call_or_link(VV[307],(void **)&Lnk307);} /* Defclass ARITHMETIC-ERROR1942 */ |
static void LnkT308(){ call_or_link(VV[308],(void **)&Lnk308);} /* Defclass ARITHMETIC-ERROR5595 */ |
5486 |
static void LnkT305(){ call_or_link(VV[305],(void **)&Lnk305);} /* Defclass UNDEFINED-FUNCTION1924 */ |
static void LnkT306(){ call_or_link(VV[306],(void **)&Lnk306);} /* Defclass UNDEFINED-FUNCTION5297 */ |
5487 |
static void LnkT303(ptr) object *ptr;{ call_or_link_closure(VV[303],(void **)&Lnk303,(void **)&Lclptr303);} /* CELL-ERROR-NAME */ |
static void LnkT304(ptr) object *ptr;{ call_or_link_closure(VV[304],(void **)&Lnk304,(void **)&Lclptr304);} /* CELL-ERROR-NAME */ |
5488 |
static void LnkT302(){ call_or_link(VV[302],(void **)&Lnk302);} /* Defclass UNBOUND-VARIABLE1906 */ |
static void LnkT303(){ call_or_link(VV[303],(void **)&Lnk303);} /* Defclass UNBOUND-VARIABLE4999 */ |
5489 |
static void LnkT301(){ call_or_link(VV[301],(void **)&Lnk301);} /* Defclass CELL-ERROR1904 */ |
static void LnkT302(){ call_or_link(VV[302],(void **)&Lnk302);} /* Defclass CELL-ERROR4909 */ |
5490 |
static void LnkT299(ptr) object *ptr;{ call_or_link_closure(VV[299],(void **)&Lnk299,(void **)&Lclptr299);} /* PACKAGE-ERROR-MESSAGE */ |
static void LnkT300(ptr) object *ptr;{ call_or_link_closure(VV[300],(void **)&Lnk300,(void **)&Lclptr300);} /* PACKAGE-ERROR-MESSAGE */ |
5491 |
static void LnkT298(ptr) object *ptr;{ call_or_link_closure(VV[298],(void **)&Lnk298,(void **)&Lclptr298);} /* PACKAGE-ERROR-PACKAGE */ |
static void LnkT299(ptr) object *ptr;{ call_or_link_closure(VV[299],(void **)&Lnk299,(void **)&Lclptr299);} /* PACKAGE-ERROR-PACKAGE */ |
5492 |
static void LnkT297(){ call_or_link(VV[297],(void **)&Lnk297);} /* Defclass PACKAGE-ERROR1884 */ |
static void LnkT298(){ call_or_link(VV[298],(void **)&Lnk298);} /* Defclass PACKAGE-ERROR4609 */ |
5493 |
static void LnkT296(){ call_or_link(VV[296],(void **)&Lnk296);} /* Defclass FILE-ERROR1882 */ |
static void LnkT297(){ call_or_link(VV[297],(void **)&Lnk297);} /* Defclass FILE-ERROR4519 */ |
5494 |
static void LnkT294(ptr) object *ptr;{ call_or_link_closure(VV[294],(void **)&Lnk294,(void **)&Lclptr294);} /* STREAM-ERROR-STREAM */ |
static void LnkT295(ptr) object *ptr;{ call_or_link_closure(VV[295],(void **)&Lnk295,(void **)&Lclptr295);} /* STREAM-ERROR-STREAM */ |
5495 |
static void LnkT293(){ call_or_link(VV[293],(void **)&Lnk293);} /* Defclass END-OF-FILE1864 */ |
static void LnkT294(){ call_or_link(VV[294],(void **)&Lnk294);} /* Defclass END-OF-FILE4221 */ |
5496 |
static void LnkT292(){ call_or_link(VV[292],(void **)&Lnk292);} /* Defclass STREAM-ERROR1862 */ |
static void LnkT293(){ call_or_link(VV[293],(void **)&Lnk293);} /* Defclass STREAM-ERROR4131 */ |
5497 |
static void LnkT291(){ call_or_link(VV[291],(void **)&Lnk291);} /* Defclass CONTROL-ERROR1861 */ |
static void LnkT292(){ call_or_link(VV[292],(void **)&Lnk292);} /* Defclass CONTROL-ERROR4042 */ |
5498 |
static void LnkT290(){ call_or_link(VV[290],(void **)&Lnk290);} /* Defclass PROGRAM-ERROR1860 */ |
static void LnkT291(){ call_or_link(VV[291],(void **)&Lnk291);} /* Defclass PROGRAM-ERROR3953 */ |
5499 |
static void LnkT288(ptr) object *ptr;{ call_or_link_closure(VV[288],(void **)&Lnk288,(void **)&Lclptr288);} /* CASE-FAILURE-POSSIBILITIES */ |
static void LnkT289(ptr) object *ptr;{ call_or_link_closure(VV[289],(void **)&Lnk289,(void **)&Lclptr289);} /* CASE-FAILURE-POSSIBILITIES */ |
5500 |
static void LnkT287(ptr) object *ptr;{ call_or_link_closure(VV[287],(void **)&Lnk287,(void **)&Lclptr287);} /* CASE-FAILURE-NAME */ |
static void LnkT288(ptr) object *ptr;{ call_or_link_closure(VV[288],(void **)&Lnk288,(void **)&Lclptr288);} /* CASE-FAILURE-NAME */ |
5501 |
static void LnkT286(){ call_or_link(VV[286],(void **)&Lnk286);} /* Defclass CASE-FAILURE1840 */ |
static void LnkT287(){ call_or_link(VV[287],(void **)&Lnk287);} /* Defclass CASE-FAILURE3653 */ |
5502 |
static void LnkT285(){ call_or_link(VV[285],(void **)&Lnk285);} /* Defclass SIMPLE-TYPE-ERROR1839 */ |
static void LnkT286(){ call_or_link(VV[286],(void **)&Lnk286);} /* Defclass SIMPLE-TYPE-ERROR3564 */ |
5503 |
static void LnkT283(ptr) object *ptr;{ call_or_link_closure(VV[283],(void **)&Lnk283,(void **)&Lclptr283);} /* TYPE-ERROR-EXPECTED-TYPE */ |
static void LnkT284(ptr) object *ptr;{ call_or_link_closure(VV[284],(void **)&Lnk284,(void **)&Lclptr284);} /* TYPE-ERROR-EXPECTED-TYPE */ |
5504 |
static void LnkT282(ptr) object *ptr;{ call_or_link_closure(VV[282],(void **)&Lnk282,(void **)&Lclptr282);} /* TYPE-ERROR-DATUM */ |
static void LnkT283(ptr) object *ptr;{ call_or_link_closure(VV[283],(void **)&Lnk283,(void **)&Lclptr283);} /* TYPE-ERROR-DATUM */ |
5505 |
static void LnkT281(){ call_or_link(VV[281],(void **)&Lnk281);} /* Defclass TYPE-ERROR1819 */ |
static void LnkT282(){ call_or_link(VV[282],(void **)&Lnk282);} /* Defclass TYPE-ERROR3264 */ |
5506 |
static void LnkT280(){ call_or_link(VV[280],(void **)&Lnk280);} /* Defclass STORAGE-EXHAUSTED1818 */ |
static void LnkT281(){ call_or_link(VV[281],(void **)&Lnk281);} /* Defclass STORAGE-EXHAUSTED3175 */ |
5507 |
static void LnkT279(){ call_or_link(VV[279],(void **)&Lnk279);} /* Defclass STACK-OVERFLOW1817 */ |
static void LnkT280(){ call_or_link(VV[280],(void **)&Lnk280);} /* Defclass STACK-OVERFLOW3086 */ |
5508 |
static void LnkT278(){ call_or_link(VV[278],(void **)&Lnk278);} /* Defclass STORAGE-CONDITION1816 */ |
static void LnkT279(){ call_or_link(VV[279],(void **)&Lnk279);} /* Defclass STORAGE-CONDITION2997 */ |
5509 |
static void LnkT277(){ call_or_link(VV[277],(void **)&Lnk277);} /* Defclass SIMPLE-ERROR1815 */ |
static void LnkT278(){ call_or_link(VV[278],(void **)&Lnk278);} /* Defclass SIMPLE-ERROR2908 */ |
5510 |
static void LnkT276(){ call_or_link(VV[276],(void **)&Lnk276);} /* Defclass SIMPLE-WARNING1814 */ |
static void LnkT277(){ call_or_link(VV[277],(void **)&Lnk277);} /* Defclass SIMPLE-WARNING2819 */ |
5511 |
static void LnkT275(){ call_or_link(VV[275],(void **)&Lnk275);} /* LOAD-DEFMETHOD */ |
static void LnkT276(){ call_or_link(VV[276],(void **)&Lnk276);} /* LOAD-DEFMETHOD */ |
5512 |
static void LnkT273(){ call_or_link(VV[273],(void **)&Lnk273);} /* SIMPLE-CONDITION-PRINTER */ |
static void LnkT274(){ call_or_link(VV[274],(void **)&Lnk274);} /* SIMPLE-CONDITION-PRINTER */ |
5513 |
|
static void LnkT273(){ call_or_link(VV[273],(void **)&Lnk273);} /* ERROR */ |
5514 |
static void LnkT13(){ call_or_link(VV[13],(void **)&Lnk13);} /* ERROR */ |
static void LnkT13(){ call_or_link(VV[13],(void **)&Lnk13);} /* ERROR */ |
5515 |
static void LnkT272(){ call_or_link(VV[272],(void **)&Lnk272);} /* CCLOSURE-ENV-NTHCDR */ |
static void LnkT272(){ call_or_link(VV[272],(void **)&Lnk272);} /* CCLOSURE-ENV-NTHCDR */ |
5516 |
static void LnkT271(){ call_or_link(VV[271],(void **)&Lnk271);} /* STRUCTURE-DEF */ |
static void LnkT271(){ call_or_link(VV[271],(void **)&Lnk271);} /* STRUCTURE-DEF */ |
5517 |
static void LnkT270(){ call_or_link(VV[270],(void **)&Lnk270);} /* STRUCTURE-SUBTYPE-P */ |
static void LnkT270(){ call_or_link(VV[270],(void **)&Lnk270);} /* STRUCTURE-SUBTYPE-P */ |
5518 |
static void LnkT269(){ call_or_link(VV[269],(void **)&Lnk269);} /* PROCLAIM-DEFGENERIC */ |
static void LnkT269(){ call_or_link(VV[269],(void **)&Lnk269);} /* PROCLAIM-DEFGENERIC */ |
5519 |
static void LnkT268(){ call_or_link(VV[268],(void **)&Lnk268);} /* Defclass SIMPLE-CONDITION1794 */ |
static void LnkT268(){ call_or_link(VV[268],(void **)&Lnk268);} /* Defclass SIMPLE-CONDITION2523 */ |
5520 |
static void LnkT266(ptr) object *ptr;{ call_or_link_closure(VV[266],(void **)&Lnk266,(void **)&Lclptr266);} /* SIMPLE-CONDITION-FORMAT-ARGUMENTS */ |
static void LnkT266(ptr) object *ptr;{ call_or_link_closure(VV[266],(void **)&Lnk266,(void **)&Lclptr266);} /* SIMPLE-CONDITION-FORMAT-ARGUMENTS */ |
5521 |
static void LnkT265(ptr) object *ptr;{ call_or_link_closure(VV[265],(void **)&Lnk265,(void **)&Lclptr265);} /* SIMPLE-CONDITION-FORMAT-STRING */ |
static void LnkT265(ptr) object *ptr;{ call_or_link_closure(VV[265],(void **)&Lnk265,(void **)&Lclptr265);} /* SIMPLE-CONDITION-FORMAT-STRING */ |
5522 |
static void LnkT264(){ call_or_link(VV[264],(void **)&Lnk264);} /* Defclass ERROR1793 */ |
static void LnkT264(){ call_or_link(VV[264],(void **)&Lnk264);} /* Defclass ERROR2426 */ |
5523 |
static void LnkT263(){ call_or_link(VV[263],(void **)&Lnk263);} /* Defclass SERIOUS-CONDITION1792 */ |
static void LnkT263(){ call_or_link(VV[263],(void **)&Lnk263);} /* Defclass SERIOUS-CONDITION2337 */ |
5524 |
static void LnkT262(){ call_or_link(VV[262],(void **)&Lnk262);} /* Defclass WARNING1791 */ |
static void LnkT262(){ call_or_link(VV[262],(void **)&Lnk262);} /* Defclass WARNING2248 */ |
5525 |
static void LnkT260(){ call_or_link(VV[260],(void **)&Lnk260);} /* REMOVE */ |
static void LnkT260(){ call_or_link(VV[260],(void **)&Lnk260);} /* REMOVE */ |
5526 |
|
|
5527 |
#ifdef SYSTEM_SPECIAL_INIT |
#ifdef SYSTEM_SPECIAL_INIT |