95 |
base[4]= (V5->c.c_car); |
base[4]= (V5->c.c_car); |
96 |
V5=V5->c.c_cdr; |
V5=V5->c.c_cdr; |
97 |
base[5]= V5;} |
base[5]= V5;} |
98 |
|
if((base[3])!=Cnil){ |
99 |
|
goto T13;} |
100 |
|
if((base[2])==(VV[2])){ |
101 |
|
goto T13;} |
102 |
|
base[3]= make_cons(VV[2],Cnil); |
103 |
|
goto T13; |
104 |
|
T13:; |
105 |
{register object V6; |
{register object V6; |
106 |
register object V7; |
register object V7; |
107 |
V6= Cnil; |
V6= Cnil; |
108 |
V7= Cnil; |
V7= Cnil; |
109 |
{register object V8; |
{register object V8; |
110 |
V8= base[5]; |
V8= base[5]; |
111 |
goto T17; |
goto T23; |
112 |
T17:; |
T23:; |
113 |
if(((V8))!=Cnil){ |
if(((V8))!=Cnil){ |
114 |
goto T18;} |
goto T24;} |
115 |
goto T15; |
goto T21; |
116 |
goto T18; |
goto T24; |
117 |
T18:; |
T24:; |
118 |
{register object V9; |
{register object V9; |
119 |
V9= car((V8)); |
V9= car((V8)); |
120 |
{object V10= car((V9)); |
{object V10= car((V9)); |
121 |
if((V10!= VV[51]))goto T24; |
if((V10!= VV[51]))goto T30; |
122 |
if(!(type_of(cadr((V9)))==t_string)){ |
if(!(type_of(cadr((V9)))==t_string)){ |
123 |
goto T27;} |
goto T33;} |
124 |
V6= list(4,VV[2],VV[3],VV[4],list(3,VV[5],cadr((V9)),VV[6])); |
V6= list(4,VV[3],VV[4],VV[5],list(3,VV[6],cadr((V9)),VV[7])); |
125 |
goto T25; |
goto T31; |
126 |
goto T27; |
goto T33; |
127 |
T27:; |
T33:; |
128 |
V6= cadr((V9)); |
V6= cadr((V9)); |
129 |
goto T25; |
goto T31; |
130 |
T25:; |
T31:; |
131 |
goto T22; |
goto T28; |
132 |
goto T24; |
goto T30; |
133 |
T24:; |
T30:; |
134 |
if((V10!= VV[52]))goto T29; |
if((V10!= VV[52]))goto T35; |
135 |
V7= cadr((V9)); |
V7= cadr((V9)); |
136 |
goto T22; |
goto T28; |
137 |
goto T29; |
goto T35; |
138 |
T29:; |
T35:; |
139 |
(void)((VFUN_NARGS=3,(*(LnkLI53))(VV[7],VV[8],(V9))));}} |
(void)((VFUN_NARGS=3,(*(LnkLI53))(VV[8],VV[9],(V9))));}} |
140 |
goto T22; |
goto T28; |
141 |
T22:; |
T28:; |
142 |
V8= cdr((V8)); |
V8= cdr((V8)); |
143 |
goto T17;} |
goto T23;} |
144 |
goto T15; |
goto T21; |
145 |
T15:; |
T21:; |
146 |
V11= list(4,VV[11],base[2],base[3],base[4]); |
V11= list(4,VV[12],base[2],base[3],base[4]); |
147 |
{object V13; |
{object V13; |
148 |
object V14= base[4]; |
object V14= base[4]; |
149 |
if(endp(V14)){ |
if(endp(V14)){ |
150 |
V12= Cnil; |
V12= Cnil; |
151 |
goto T34;} |
goto T40;} |
152 |
base[6]=V13=MMcons(Cnil,Cnil); |
base[6]=V13=MMcons(Cnil,Cnil); |
153 |
goto T35; |
goto T41; |
154 |
T35:; |
T41:; |
155 |
{object V16; |
{object V16; |
156 |
base[8]= cdr((V14->c.c_car)); |
base[8]= cdr((V14->c.c_car)); |
157 |
base[9]= VV[16]; |
base[9]= VV[17]; |
158 |
vs_top=(vs_base=base+8)+2; |
vs_top=(vs_base=base+8)+2; |
159 |
Lgetf(); |
Lgetf(); |
160 |
vs_top=sup; |
vs_top=sup; |
161 |
V16= vs_base[0]; |
V16= vs_base[0]; |
162 |
if(((V16))==Cnil){ |
if(((V16))==Cnil){ |
163 |
goto T41;}{object V18; |
goto T47;}{object V18; |
164 |
base[8]= cdr((V14->c.c_car)); |
base[8]= cdr((V14->c.c_car)); |
165 |
base[9]= VV[17]; |
base[9]= VV[18]; |
166 |
vs_top=(vs_base=base+8)+2; |
vs_top=(vs_base=base+8)+2; |
167 |
Lgetf(); |
Lgetf(); |
168 |
vs_top=sup; |
vs_top=sup; |
169 |
V18= vs_base[0]; |
V18= vs_base[0]; |
170 |
if(V18==Cnil)goto T44; |
if(V18==Cnil)goto T50; |
171 |
V17= V18; |
V17= V18; |
172 |
goto T43; |
goto T49; |
173 |
goto T44; |
goto T50; |
174 |
T44:;} |
T50:;} |
175 |
V17= Ct; |
V17= Ct; |
176 |
goto T43; |
goto T49; |
177 |
T43:; |
T49:; |
178 |
V19= make_cons((V16),V17); |
V19= make_cons((V16),V17); |
179 |
(V13->c.c_cdr)= make_cons(/* INLINE-ARGS */V19,Cnil); |
(V13->c.c_cdr)= make_cons(/* INLINE-ARGS */V19,Cnil); |
180 |
goto T36; |
goto T42; |
181 |
goto T41; |
goto T47; |
182 |
T41:; |
T47:; |
183 |
(V13->c.c_cdr)= Cnil;} |
(V13->c.c_cdr)= Cnil;} |
184 |
goto T36; |
goto T42; |
185 |
T36:; |
T42:; |
186 |
{object cdr_V13=MMcdr(V13);while(!endp(cdr_V13)) {cdr_V13=MMcdr(cdr_V13);V13=MMcdr(V13);}} |
{object cdr_V13=MMcdr(V13);while(!endp(cdr_V13)) {cdr_V13=MMcdr(cdr_V13);V13=MMcdr(V13);}} |
187 |
V14=MMcdr(V14); |
V14=MMcdr(V14); |
188 |
if(endp(V14)){ |
if(endp(V14)){ |
189 |
base[6]=base[6]->c.c_cdr; |
base[6]=base[6]->c.c_cdr; |
190 |
V12= base[6]; |
V12= base[6]; |
191 |
goto T34;} |
goto T40;} |
192 |
goto T35;} |
goto T41;} |
193 |
goto T34; |
goto T40; |
194 |
T34:; |
T40:; |
195 |
V20= list(3,VV[14],list(2,VV[15],listA(3,base[2],base[3],V12)),VV[1]); |
V20= list(3,VV[15],list(2,VV[16],listA(3,base[2],base[3],V12)),VV[1]); |
196 |
V21= list(4,VV[12],VV[13],/* INLINE-ARGS */V20,list(3,VV[18],list(3,VV[19],list(2,VV[15],base[2]),VV[20]),Cnil)); |
V21= list(4,VV[13],VV[14],/* INLINE-ARGS */V20,list(3,VV[19],list(3,VV[20],list(2,VV[16],base[2]),VV[21]),Cnil)); |
197 |
if(((V6))==Cnil){ |
if(((V6))==Cnil){ |
198 |
goto T50;} |
goto T56;} |
199 |
V23= list(2,list(2,VV[23],base[2]),VV[6]); |
V23= list(2,list(2,VV[24],base[2]),VV[7]); |
200 |
V24= list(4,VV[21],VV[22],/* INLINE-ARGS */V23,list(4,VV[24],VV[25],VV[26],make_cons((V6),VV[27]))); |
V24= list(4,VV[22],VV[23],/* INLINE-ARGS */V23,list(4,VV[25],VV[26],VV[27],make_cons((V6),VV[28]))); |
201 |
V22= make_cons(/* INLINE-ARGS */V24,Cnil); |
V22= make_cons(/* INLINE-ARGS */V24,Cnil); |
202 |
goto T48; |
goto T54; |
203 |
goto T50; |
goto T56; |
204 |
T50:; |
T56:; |
205 |
V22= Cnil; |
V22= Cnil; |
206 |
goto T48; |
goto T54; |
207 |
T48:; |
T54:; |
208 |
V25= list(2,VV[15],base[2]); |
V25= list(2,VV[16],base[2]); |
209 |
V26= make_cons(/* INLINE-ARGS */V25,Cnil); |
V26= make_cons(/* INLINE-ARGS */V25,Cnil); |
210 |
base[6]= listA(5,VV[9],VV[10],/* INLINE-ARGS */V11,/* INLINE-ARGS */V21,append(V22,/* INLINE-ARGS */V26)); |
base[6]= listA(5,VV[10],VV[11],/* INLINE-ARGS */V11,/* INLINE-ARGS */V21,append(V22,/* INLINE-ARGS */V26)); |
211 |
vs_top=(vs_base=base+6)+1; |
vs_top=(vs_base=base+6)+1; |
212 |
return;} |
return;} |
213 |
} |
} |
214 |
/* function definition for Defclass CONDITION2295 */ |
/* function definition for Defclass CONDITION2299 */ |
215 |
|
|
216 |
static void L6() |
static void L6() |
217 |
{register object *base=vs_base; |
{register object *base=vs_base; |
221 |
vs_top=sup; |
vs_top=sup; |
222 |
goto TTL; |
goto TTL; |
223 |
TTL:; |
TTL:; |
224 |
base[0]= VV[28]; |
base[0]= VV[2]; |
225 |
base[1]= VV[29]; |
base[1]= VV[29]; |
226 |
base[2]= Cnil; |
base[2]= Cnil; |
227 |
base[3]= Cnil; |
base[3]= Cnil; |
230 |
symlispcall(VV[54],base+0,6); |
symlispcall(VV[54],base+0,6); |
231 |
return; |
return; |
232 |
} |
} |
233 |
/* local entry for function progn 'compile2311 */ |
/* local entry for function progn 'compile2315 */ |
234 |
|
|
235 |
static object LI7() |
static object LI7() |
236 |
|
|
245 |
base[0]=base[0]; |
base[0]=base[0]; |
246 |
return Cnil; |
return Cnil; |
247 |
} |
} |
248 |
/* local entry for function progn 'compile2328 */ |
/* local entry for function progn 'compile2332 */ |
249 |
|
|
250 |
static object LI8() |
static object LI8() |
251 |
|
|
263 |
base[0]=base[0]; |
base[0]=base[0]; |
264 |
return Cnil; |
return Cnil; |
265 |
} |
} |
266 |
/* local entry for function progn 'compile2352 */ |
/* local entry for function progn 'compile2356 */ |
267 |
|
|
268 |
static object LI9() |
static object LI9() |
269 |
|
|
270 |
{ VMB9 VMS9 VMV9 |
{ VMB9 VMS9 VMV9 |
271 |
goto TTL; |
goto TTL; |
272 |
TTL:; |
TTL:; |
273 |
(void)(sputprop(VV[28],VV[31],Cnil)); |
(void)(sputprop(VV[2],VV[31],Cnil)); |
274 |
{object V30 = Cnil; |
{object V30 = Cnil; |
275 |
VMR9(V30)} |
VMR9(V30)} |
276 |
return Cnil; |
return Cnil; |
277 |
} |
} |
278 |
/* local entry for function progn 'compile2364 */ |
/* local entry for function progn 'compile2368 */ |
279 |
|
|
280 |
static object LI10() |
static object LI10() |
281 |
|
|
286 |
VMR10(V31)} |
VMR10(V31)} |
287 |
return Cnil; |
return Cnil; |
288 |
} |
} |
289 |
/* local entry for function progn 'compile2380 */ |
/* local entry for function progn 'compile2384 */ |
290 |
|
|
291 |
static object LI11() |
static object LI11() |
292 |
|
|
298 |
Lfboundp(); |
Lfboundp(); |
299 |
vs_top=sup; |
vs_top=sup; |
300 |
if((vs_base[0])==Cnil){ |
if((vs_base[0])==Cnil){ |
301 |
goto T65;} |
goto T71;} |
302 |
base[0]=symbol_function(VV[32]); |
base[0]=symbol_function(VV[32]); |
303 |
{ |
{ |
304 |
object V32= VV[33]; |
object V32= VV[33]; |
305 |
if(endp(V32)){ |
if(endp(V32)){ |
306 |
goto T65;} |
goto T71;} |
307 |
goto T69; |
goto T75; |
308 |
T69:; |
T75:; |
309 |
base[1]= (V32->c.c_car); |
base[1]= (V32->c.c_car); |
310 |
vs_top=(vs_base=base+1)+1; |
vs_top=(vs_base=base+1)+1; |
311 |
(void) (*Lnk32)(); |
(void) (*Lnk32)(); |
312 |
vs_top=sup; |
vs_top=sup; |
313 |
V32=MMcdr(V32); |
V32=MMcdr(V32); |
314 |
if(endp(V32)){ |
if(endp(V32)){ |
315 |
goto T65;} |
goto T71;} |
316 |
goto T69;} |
goto T75;} |
317 |
goto T65; |
goto T71; |
318 |
T65:; |
T71:; |
319 |
{object V33 = Cnil; |
{object V33 = Cnil; |
320 |
VMR11(V33)} |
VMR11(V33)} |
321 |
base[0]=base[0]; |
base[0]=base[0]; |
330 |
goto TTL; |
goto TTL; |
331 |
TTL:; |
TTL:; |
332 |
base[0]= (V35); |
base[0]= (V35); |
333 |
base[1]= VV[28]; |
base[1]= VV[2]; |
334 |
vs_top=(vs_base=base+0)+2; |
vs_top=(vs_base=base+0)+2; |
335 |
(void) (*Lnk56)(); |
(void) (*Lnk56)(); |
336 |
vs_top=sup; |
vs_top=sup; |
339 |
base[0]=base[0]; |
base[0]=base[0]; |
340 |
return Cnil; |
return Cnil; |
341 |
} |
} |
342 |
/* local entry for function progn 'compile2404 */ |
/* local entry for function progn 'compile2408 */ |
343 |
|
|
344 |
static object LI13() |
static object LI13() |
345 |
|
|
346 |
{ VMB13 VMS13 VMV13 |
{ VMB13 VMS13 VMV13 |
347 |
goto TTL; |
goto TTL; |
348 |
TTL:; |
TTL:; |
349 |
base[0]= VV[22]; |
base[0]= VV[23]; |
350 |
base[1]= VV[34]; |
base[1]= VV[34]; |
351 |
vs_top=(vs_base=base+0)+2; |
vs_top=(vs_base=base+0)+2; |
352 |
(void) (*Lnk57)(); |
(void) (*Lnk57)(); |
364 |
{ VMB14 VMS14 VMV14 |
{ VMB14 VMS14 VMV14 |
365 |
goto TTL; |
goto TTL; |
366 |
TTL:; |
TTL:; |
367 |
if((symbol_value(VV[25]))==Cnil){ |
if((symbol_value(VV[26]))==Cnil){ |
368 |
goto T81;} |
goto T87;} |
369 |
base[0]= (V45); |
base[0]= (V45); |
370 |
base[1]= VV[35]; |
base[1]= VV[35]; |
371 |
base[4]= (V44); |
base[4]= (V44); |
383 |
vs_top=sup; |
vs_top=sup; |
384 |
{object V47 = vs_base[0]; |
{object V47 = vs_base[0]; |
385 |
VMR14(V47)} |
VMR14(V47)} |
386 |
goto T81; |
goto T87; |
387 |
T81:; |
T87:; |
388 |
base[0]= (V45); |
base[0]= (V45); |
389 |
base[1]= VV[36]; |
base[1]= VV[36]; |
390 |
base[3]= (V44); |
base[3]= (V44); |
400 |
base[0]=base[0]; |
base[0]=base[0]; |
401 |
return Cnil; |
return Cnil; |
402 |
} |
} |
403 |
/* local entry for function progn 'compile2473 */ |
/* local entry for function progn 'compile2477 */ |
404 |
|
|
405 |
static object LI15() |
static object LI15() |
406 |
|
|
408 |
goto TTL; |
goto TTL; |
409 |
TTL:; |
TTL:; |
410 |
base[0]= VV[37]; |
base[0]= VV[37]; |
411 |
base[1]= VV[22]; |
base[1]= VV[23]; |
412 |
base[2]= Cnil; |
base[2]= Cnil; |
413 |
base[3]= VV[38]; |
base[3]= VV[38]; |
414 |
base[4]= VV[39]; |
base[4]= VV[39]; |
423 |
base[0]=base[0]; |
base[0]=base[0]; |
424 |
return Cnil; |
return Cnil; |
425 |
} |
} |
426 |
/* local entry for function progn 'compile2485 */ |
/* local entry for function progn 'compile2489 */ |
427 |
|
|
428 |
static object LI16() |
static object LI16() |
429 |
|
|
439 |
base[0]=base[0]; |
base[0]=base[0]; |
440 |
return Cnil; |
return Cnil; |
441 |
} |
} |
442 |
/* local entry for function progn 'compile2497 */ |
/* local entry for function progn 'compile2501 */ |
443 |
|
|
444 |
static object LI17() |
static object LI17() |
445 |
|
|
451 |
Lboundp(); |
Lboundp(); |
452 |
vs_top=sup; |
vs_top=sup; |
453 |
if((vs_base[0])==Cnil){ |
if((vs_base[0])==Cnil){ |
454 |
goto T105;} |
goto T111;} |
455 |
goto T104; |
goto T110; |
456 |
goto T105; |
goto T111; |
457 |
T105:; |
T111:; |
458 |
base[0]= VV[28]; |
base[0]= VV[2]; |
459 |
vs_top=(vs_base=base+0)+1; |
vs_top=(vs_base=base+0)+1; |
460 |
(void) (*Lnk63)(); |
(void) (*Lnk63)(); |
461 |
vs_top=sup; |
vs_top=sup; |
462 |
setq(VV[42],vs_base[0]); |
setq(VV[42],vs_base[0]); |
463 |
goto T104; |
goto T110; |
464 |
T104:; |
T110:; |
465 |
{object V52 = Cnil; |
{object V52 = Cnil; |
466 |
VMR17(V52)} |
VMR17(V52)} |
467 |
base[0]=base[0]; |
base[0]=base[0]; |
468 |
return Cnil; |
return Cnil; |
469 |
} |
} |
470 |
/* local entry for function progn 'compile2510 */ |
/* local entry for function progn 'compile2514 */ |
471 |
|
|
472 |
static object LI18() |
static object LI18() |
473 |
|
|
487 |
goto TTL; |
goto TTL; |
488 |
TTL:; |
TTL:; |
489 |
if(!(type_of((V55))==t_symbol)){ |
if(!(type_of((V55))==t_symbol)){ |
490 |
goto T111;} |
goto T117;} |
491 |
base[0]= (V55); |
base[0]= (V55); |
492 |
vs_top=(vs_base=base+0)+1; |
vs_top=(vs_base=base+0)+1; |
493 |
(void) (*Lnk63)(); |
(void) (*Lnk63)(); |
494 |
vs_top=sup; |
vs_top=sup; |
495 |
V55= vs_base[0]; |
V55= vs_base[0]; |
496 |
goto T111; |
goto T117; |
497 |
T111:; |
T117:; |
498 |
base[0]= (V55); |
base[0]= (V55); |
499 |
base[1]= VV[29]; |
base[1]= VV[29]; |
500 |
vs_top=(vs_base=base+0)+2; |
vs_top=(vs_base=base+0)+2; |
501 |
(void) (*Lnk56)(); |
(void) (*Lnk56)(); |
502 |
vs_top=sup; |
vs_top=sup; |
503 |
if((vs_base[0])!=Cnil){ |
if((vs_base[0])!=Cnil){ |
504 |
goto T116;} |
goto T122;} |
505 |
{object V56 = Cnil; |
{object V56 = Cnil; |
506 |
VMR19(V56)} |
VMR19(V56)} |
507 |
goto T116; |
goto T122; |
508 |
T116:;{object V58; |
T122:;{object V58; |
509 |
V58= symbol_value(VV[42]); |
V58= symbol_value(VV[42]); |
510 |
base[0]= (V55); |
base[0]= (V55); |
511 |
vs_top=(vs_base=base+0)+1; |
vs_top=(vs_base=base+0)+1; |
540 |
V63=(base[1]); |
V63=(base[1]); |
541 |
vs_top=sup; |
vs_top=sup; |
542 |
if(((*(LnkLI65))((V62)))!=Cnil){ |
if(((*(LnkLI65))((V62)))!=Cnil){ |
543 |
goto T122;} |
goto T128;} |
544 |
base[2]= VV[43]; |
base[2]= VV[43]; |
545 |
base[3]= VV[44]; |
base[3]= VV[44]; |
546 |
base[4]= (V62); |
base[4]= (V62); |
553 |
vs_top=(vs_base=base+2)+9; |
vs_top=(vs_base=base+2)+9; |
554 |
(void) (*Lnk66)(); |
(void) (*Lnk66)(); |
555 |
vs_top=sup; |
vs_top=sup; |
556 |
goto T122; |
goto T128; |
557 |
T122:; |
T128:; |
558 |
base[2]=symbol_function(VV[67]); |
base[2]=symbol_function(VV[67]); |
559 |
base[3]= (V62); |
base[3]= (V62); |
560 |
{object V64; |
{object V64; |
567 |
return; |
return; |
568 |
} |
} |
569 |
} |
} |
570 |
static void LnkT67(ptr) object *ptr;{ call_or_link_closure(VV[67],(void **)&Lnk67,(void **)&Lclptr67);} /* MAKE-INSTANCE */ |
static void LnkT67(ptr) object *ptr;{ call_or_link_closure(VV[67],(void **)(void *)&Lnk67,(void **)(void *)&Lclptr67);} /* MAKE-INSTANCE */ |
571 |
static void LnkT66(){ call_or_link(VV[66],(void **)&Lnk66);} /* ERROR */ |
static void LnkT66(){ call_or_link(VV[66],(void **)(void *)&Lnk66);} /* ERROR */ |
572 |
static object LnkTLI65(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[65],(void **)&LnkLI65,1,first,ap);va_end(ap);return V1;} /* CONDITION-CLASS-P */ |
static object LnkTLI65(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[65],(void **)(void *)&LnkLI65,1,first,ap);va_end(ap);return V1;} /* CONDITION-CLASS-P */ |
573 |
static void LnkT64(ptr) object *ptr;{ call_or_link_closure(VV[64],(void **)&Lnk64,(void **)&Lclptr64);} /* CLASS-PRECEDENCE-LIST */ |
static void LnkT64(ptr) object *ptr;{ call_or_link_closure(VV[64],(void **)(void *)&Lnk64,(void **)(void *)&Lclptr64);} /* CLASS-PRECEDENCE-LIST */ |
574 |
static void LnkT63(){ call_or_link(VV[63],(void **)&Lnk63);} /* FIND-CLASS */ |
static void LnkT63(){ call_or_link(VV[63],(void **)(void *)&Lnk63);} /* FIND-CLASS */ |
575 |
static void LnkT62(){ call_or_link(VV[62],(void **)&Lnk62);} /* LOAD-DEFMETHOD */ |
static void LnkT62(){ call_or_link(VV[62],(void **)(void *)&Lnk62);} /* LOAD-DEFMETHOD */ |
576 |
static object LnkTLI60(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[60],(void **)&LnkLI60,1,first,ap);va_end(ap);return V1;} /* UNIQUE-ID */ |
static object LnkTLI60(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[60],(void **)(void *)&LnkLI60,1,first,ap);va_end(ap);return V1;} /* UNIQUE-ID */ |
577 |
static void LnkT59(ptr) object *ptr;{ call_or_link_closure(VV[59],(void **)&Lnk59,(void **)&Lclptr59);} /* CLASS-NAME */ |
static void LnkT59(ptr) object *ptr;{ call_or_link_closure(VV[59],(void **)(void *)&Lnk59,(void **)(void *)&Lclptr59);} /* CLASS-NAME */ |
578 |
static void LnkT58(){ call_or_link(VV[58],(void **)&Lnk58);} /* CLASS-OF */ |
static void LnkT58(){ call_or_link(VV[58],(void **)(void *)&Lnk58);} /* CLASS-OF */ |
579 |
static void LnkT57(){ call_or_link(VV[57],(void **)&Lnk57);} /* PROCLAIM-DEFGENERIC */ |
static void LnkT57(){ call_or_link(VV[57],(void **)(void *)&Lnk57);} /* PROCLAIM-DEFGENERIC */ |
580 |
static void LnkT56(){ call_or_link(VV[56],(void **)&Lnk56);} /* TYPEP */ |
static void LnkT56(){ call_or_link(VV[56],(void **)(void *)&Lnk56);} /* TYPEP */ |
581 |
static void LnkT32(){ call_or_link(VV[32],(void **)&Lnk32);} /* PROCLAIM-INCOMPATIBLE-SUPERCLASSES */ |
static void LnkT32(){ call_or_link(VV[32],(void **)(void *)&Lnk32);} /* PROCLAIM-INCOMPATIBLE-SUPERCLASSES */ |
582 |
static void LnkT55(){ call_or_link(VV[55],(void **)&Lnk55);} /* Defclass CONDITION2295 */ |
static void LnkT55(){ call_or_link(VV[55],(void **)(void *)&Lnk55);} /* Defclass CONDITION2299 */ |
583 |
static object LnkTLI53(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[53],(void **)&LnkLI53,first,ap);va_end(ap);return V1;} /* CERROR */ |
static object LnkTLI53(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[53],(void **)(void *)&LnkLI53,first,ap);va_end(ap);return V1;} /* CERROR */ |
584 |
static void LnkT50(){ call_or_link(VV[50],(void **)&Lnk50);} /* *MAKE-SPECIAL */ |
static void LnkT50(){ call_or_link(VV[50],(void **)(void *)&Lnk50);} /* *MAKE-SPECIAL */ |
585 |
static void LnkT0(){ call_or_link(VV[0],(void **)&Lnk0);} /* REMOVE-CLCS-SYMBOLS */ |
static void LnkT0(){ call_or_link(VV[0],(void **)(void *)&Lnk0);} /* REMOVE-CLCS-SYMBOLS */ |
586 |
|
|
587 |
#ifdef SYSTEM_SPECIAL_INIT |
#ifdef SYSTEM_SPECIAL_INIT |
588 |
SYSTEM_SPECIAL_INIT |
SYSTEM_SPECIAL_INIT |