2 |
#include "cmpinclude.h" |
#include "cmpinclude.h" |
3 |
#include "clcs_conditions.h" |
#include "clcs_conditions.h" |
4 |
void init_clcs_conditions(){do_init(VV);} |
void init_clcs_conditions(){do_init(VV);} |
5 |
/* local entry for function progn 'compile2181 */ |
/* local entry for function progn 'compile2184 */ |
6 |
|
|
7 |
static object LI1() |
static object LI1() |
8 |
|
|
25 |
base[0]=base[0]; |
base[0]=base[0]; |
26 |
return Cnil; |
return Cnil; |
27 |
} |
} |
28 |
/* local entry for function progn 'compile2197 */ |
/* local entry for function progn 'compile2200 */ |
29 |
|
|
30 |
static object LI2() |
static object LI2() |
31 |
|
|
41 |
base[0]=base[0]; |
base[0]=base[0]; |
42 |
return Cnil; |
return Cnil; |
43 |
} |
} |
44 |
/* local entry for function progn 'compile2209 */ |
/* local entry for function progn 'compile2212 */ |
45 |
|
|
46 |
static object LI3() |
static object LI3() |
47 |
|
|
65 |
base[0]=base[0]; |
base[0]=base[0]; |
66 |
return Cnil; |
return Cnil; |
67 |
} |
} |
68 |
/* local entry for function progn 'compile2222 */ |
/* local entry for function progn 'compile2225 */ |
69 |
|
|
70 |
static object LI4() |
static object LI4() |
71 |
|
|
211 |
vs_top=(vs_base=base+6)+1; |
vs_top=(vs_base=base+6)+1; |
212 |
return;} |
return;} |
213 |
} |
} |
214 |
/* function definition for Defclass CONDITION2299 */ |
/* function definition for Defclass CONDITION2302 */ |
215 |
|
|
216 |
static void L6() |
static void L6() |
217 |
{register object *base=vs_base; |
{register object *base=vs_base; |
230 |
symlispcall(VV[54],base+0,6); |
symlispcall(VV[54],base+0,6); |
231 |
return; |
return; |
232 |
} |
} |
233 |
/* local entry for function progn 'compile2315 */ |
/* local entry for function progn 'compile2318 */ |
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 'compile2332 */ |
/* local entry for function progn 'compile2335 */ |
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 'compile2356 */ |
/* local entry for function progn 'compile2359 */ |
267 |
|
|
268 |
static object LI9() |
static object LI9() |
269 |
|
|
275 |
VMR9(V30)} |
VMR9(V30)} |
276 |
return Cnil; |
return Cnil; |
277 |
} |
} |
278 |
/* local entry for function progn 'compile2368 */ |
/* local entry for function progn 'compile2371 */ |
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 'compile2384 */ |
/* local entry for function progn 'compile2387 */ |
290 |
|
|
291 |
static object LI11() |
static object LI11() |
292 |
|
|
339 |
base[0]=base[0]; |
base[0]=base[0]; |
340 |
return Cnil; |
return Cnil; |
341 |
} |
} |
342 |
/* local entry for function progn 'compile2408 */ |
/* local entry for function progn 'compile2411 */ |
343 |
|
|
344 |
static object LI13() |
static object LI13() |
345 |
|
|
400 |
base[0]=base[0]; |
base[0]=base[0]; |
401 |
return Cnil; |
return Cnil; |
402 |
} |
} |
403 |
/* local entry for function progn 'compile2477 */ |
/* local entry for function progn 'compile2480 */ |
404 |
|
|
405 |
static object LI15() |
static object LI15() |
406 |
|
|
423 |
base[0]=base[0]; |
base[0]=base[0]; |
424 |
return Cnil; |
return Cnil; |
425 |
} |
} |
426 |
/* local entry for function progn 'compile2489 */ |
/* local entry for function progn 'compile2492 */ |
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 'compile2501 */ |
/* local entry for function progn 'compile2504 */ |
443 |
|
|
444 |
static object LI17() |
static object LI17() |
445 |
|
|
467 |
base[0]=base[0]; |
base[0]=base[0]; |
468 |
return Cnil; |
return Cnil; |
469 |
} |
} |
470 |
/* local entry for function progn 'compile2514 */ |
/* local entry for function progn 'compile2517 */ |
471 |
|
|
472 |
static object LI18() |
static object LI18() |
473 |
|
|
579 |
static void LnkT57(){ call_or_link(VV[57],(void **)(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 **)(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 **)(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 **)(void *)&Lnk55);} /* Defclass CONDITION2299 */ |
static void LnkT55(){ call_or_link(VV[55],(void **)(void *)&Lnk55);} /* Defclass CONDITION2302 */ |
583 |
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 */ |
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 **)(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 **)(void *)&Lnk0);} /* REMOVE-CLCS-SYMBOLS */ |
static void LnkT0(){ call_or_link(VV[0],(void **)(void *)&Lnk0);} /* REMOVE-CLCS-SYMBOLS */ |