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 'compile2191 */ |
/* local entry for function progn 'compile2168 */ |
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 'compile2207 */ |
/* local entry for function progn 'compile2184 */ |
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 'compile2219 */ |
/* local entry for function progn 'compile2196 */ |
45 |
|
|
46 |
static object LI3() |
static object LI3() |
47 |
|
|
60 |
VMR3(V3)} |
VMR3(V3)} |
61 |
return Cnil; |
return Cnil; |
62 |
} |
} |
63 |
/* local entry for function progn 'compile2232 */ |
/* local entry for function progn 'compile2209 */ |
64 |
|
|
65 |
static object LI4() |
static object LI4() |
66 |
|
|
219 |
vs_top=(vs_base=base+6)+1; |
vs_top=(vs_base=base+6)+1; |
220 |
return;} |
return;} |
221 |
} |
} |
222 |
/* function definition for Defclass CONDITION2309 */ |
/* function definition for Defclass CONDITION2286 */ |
223 |
|
|
224 |
static void L6() |
static void L6() |
225 |
{register object *base=vs_base; |
{register object *base=vs_base; |
237 |
symlispcall(VV[55],base+0,6); |
symlispcall(VV[55],base+0,6); |
238 |
return; |
return; |
239 |
} |
} |
240 |
/* local entry for function progn 'compile2325 */ |
/* local entry for function progn 'compile2302 */ |
241 |
|
|
242 |
static object LI7() |
static object LI7() |
243 |
|
|
252 |
base[0]=base[0]; |
base[0]=base[0]; |
253 |
return Cnil; |
return Cnil; |
254 |
} |
} |
255 |
/* local entry for function progn 'compile2342 */ |
/* local entry for function progn 'compile2319 */ |
256 |
|
|
257 |
static object LI8() |
static object LI8() |
258 |
|
|
270 |
base[0]=base[0]; |
base[0]=base[0]; |
271 |
return Cnil; |
return Cnil; |
272 |
} |
} |
273 |
/* local entry for function progn 'compile2366 */ |
/* local entry for function progn 'compile2343 */ |
274 |
|
|
275 |
static object LI9() |
static object LI9() |
276 |
|
|
282 |
VMR9(V34)} |
VMR9(V34)} |
283 |
return Cnil; |
return Cnil; |
284 |
} |
} |
285 |
/* local entry for function progn 'compile2378 */ |
/* local entry for function progn 'compile2355 */ |
286 |
|
|
287 |
static object LI10() |
static object LI10() |
288 |
|
|
293 |
VMR10(V35)} |
VMR10(V35)} |
294 |
return Cnil; |
return Cnil; |
295 |
} |
} |
296 |
/* local entry for function progn 'compile2394 */ |
/* local entry for function progn 'compile2371 */ |
297 |
|
|
298 |
static object LI11() |
static object LI11() |
299 |
|
|
345 |
base[0]=base[0]; |
base[0]=base[0]; |
346 |
return Cnil; |
return Cnil; |
347 |
} |
} |
348 |
/* local entry for function progn 'compile2418 */ |
/* local entry for function progn 'compile2395 */ |
349 |
|
|
350 |
static object LI13() |
static object LI13() |
351 |
|
|
406 |
base[0]=base[0]; |
base[0]=base[0]; |
407 |
return Cnil; |
return Cnil; |
408 |
} |
} |
409 |
/* local entry for function progn 'compile2487 */ |
/* local entry for function progn 'compile2464 */ |
410 |
|
|
411 |
static object LI15() |
static object LI15() |
412 |
|
|
429 |
base[0]=base[0]; |
base[0]=base[0]; |
430 |
return Cnil; |
return Cnil; |
431 |
} |
} |
432 |
/* local entry for function progn 'compile2499 */ |
/* local entry for function progn 'compile2476 */ |
433 |
|
|
434 |
static object LI16() |
static object LI16() |
435 |
|
|
445 |
base[0]=base[0]; |
base[0]=base[0]; |
446 |
return Cnil; |
return Cnil; |
447 |
} |
} |
448 |
/* local entry for function progn 'compile2511 */ |
/* local entry for function progn 'compile2488 */ |
449 |
|
|
450 |
static object LI17() |
static object LI17() |
451 |
|
|
469 |
base[0]=base[0]; |
base[0]=base[0]; |
470 |
return Cnil; |
return Cnil; |
471 |
} |
} |
472 |
/* local entry for function progn 'compile2524 */ |
/* local entry for function progn 'compile2501 */ |
473 |
|
|
474 |
static object LI18() |
static object LI18() |
475 |
|
|
580 |
static void LnkT58(){ call_or_link(VV[58],(void **)(void *)&Lnk58);} /* PROCLAIM-DEFGENERIC */ |
static void LnkT58(){ call_or_link(VV[58],(void **)(void *)&Lnk58);} /* PROCLAIM-DEFGENERIC */ |
581 |
static void LnkT57(){ call_or_link(VV[57],(void **)(void *)&Lnk57);} /* TYPEP */ |
static void LnkT57(){ call_or_link(VV[57],(void **)(void *)&Lnk57);} /* TYPEP */ |
582 |
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 */ |
583 |
static void LnkT56(){ call_or_link(VV[56],(void **)(void *)&Lnk56);} /* Defclass CONDITION2309 */ |
static void LnkT56(){ call_or_link(VV[56],(void **)(void *)&Lnk56);} /* Defclass CONDITION2286 */ |
584 |
static object LnkTLI54(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[54],(void **)(void *)&LnkLI54,first,ap);va_end(ap);return V1;} /* CERROR */ |
static object LnkTLI54(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[54],(void **)(void *)&LnkLI54,first,ap);va_end(ap);return V1;} /* CERROR */ |
585 |
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 */ |
586 |
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 */ |