1283 |
return;} |
return;} |
1284 |
} |
} |
1285 |
} |
} |
1286 |
static void LnkT63(ptr) object *ptr;{ call_or_link_closure(VV[63],(void **)&Lnk63,(void **)&Lclptr63);} /* CLASS-NAME */ |
static void LnkT63(ptr) object *ptr;{ call_or_link_closure(VV[63],(void **)(void *)&Lnk63,(void **)(void *)&Lclptr63);} /* CLASS-NAME */ |
1287 |
static void LnkT62(ptr) object *ptr;{ call_or_link_closure(VV[62],(void **)&Lnk62,(void **)&Lclptr62);} /* CLASS-DEFSTRUCT-CONSTRUCTOR */ |
static void LnkT62(ptr) object *ptr;{ call_or_link_closure(VV[62],(void **)(void *)&Lnk62,(void **)(void *)&Lclptr62);} /* CLASS-DEFSTRUCT-CONSTRUCTOR */ |
1288 |
static object LnkTLI2(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[2],(void **)&LnkLI2,first,ap);va_end(ap);return V1;} /* ALLOCATE-STANDARD-INSTANCE */ |
static object LnkTLI2(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[2],(void **)(void *)&LnkLI2,first,ap);va_end(ap);return V1;} /* ALLOCATE-STANDARD-INSTANCE */ |
1289 |
static void LnkT61(ptr) object *ptr;{ call_or_link_closure(VV[61],(void **)&Lnk61,(void **)&Lclptr61);} /* FINALIZE-INHERITANCE */ |
static void LnkT61(ptr) object *ptr;{ call_or_link_closure(VV[61],(void **)(void *)&Lnk61,(void **)(void *)&Lclptr61);} /* FINALIZE-INHERITANCE */ |
1290 |
static void LnkT60(ptr) object *ptr;{ call_or_link_closure(VV[60],(void **)&Lnk60,(void **)&Lclptr60);} /* CLASS-FINALIZED-P */ |
static void LnkT60(ptr) object *ptr;{ call_or_link_closure(VV[60],(void **)(void *)&Lnk60,(void **)(void *)&Lclptr60);} /* CLASS-FINALIZED-P */ |
1291 |
static void LnkT59(){ call_or_link(VV[59],(void **)&Lnk59);} /* TYPECASE-ERROR-STRING */ |
static void LnkT59(){ call_or_link(VV[59],(void **)(void *)&Lnk59);} /* TYPECASE-ERROR-STRING */ |
1292 |
static object LnkTLI58(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[58],(void **)&LnkLI58,1,first,ap);va_end(ap);return V1;} /* WRAPPER-OF */ |
static object LnkTLI58(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[58],(void **)(void *)&LnkLI58,1,first,ap);va_end(ap);return V1;} /* WRAPPER-OF */ |
1293 |
static void LnkT57(ptr) object *ptr;{ call_or_link_closure(VV[57],(void **)&Lnk57,(void **)&Lclptr57);} /* SLOT-DEFINITION-INTERNAL-WRITER-FUNCTION */ |
static void LnkT57(ptr) object *ptr;{ call_or_link_closure(VV[57],(void **)(void *)&Lnk57,(void **)(void *)&Lclptr57);} /* SLOT-DEFINITION-INTERNAL-WRITER-FUNCTION */ |
1294 |
static void LnkT56(ptr) object *ptr;{ call_or_link_closure(VV[56],(void **)&Lnk56,(void **)&Lclptr56);} /* SLOT-DEFINITION-INTERNAL-READER-FUNCTION */ |
static void LnkT56(ptr) object *ptr;{ call_or_link_closure(VV[56],(void **)(void *)&Lnk56,(void **)(void *)&Lclptr56);} /* SLOT-DEFINITION-INTERNAL-READER-FUNCTION */ |
1295 |
static object LnkTLI55(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[55],(void **)&LnkLI55,1,first,ap);va_end(ap);return V1;} /* CHECK-WRAPPER-VALIDITY */ |
static object LnkTLI55(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[55],(void **)(void *)&LnkLI55,1,first,ap);va_end(ap);return V1;} /* CHECK-WRAPPER-VALIDITY */ |
1296 |
static void LnkT54(ptr) object *ptr;{ call_or_link_closure(VV[54],(void **)&Lnk54,(void **)&Lclptr54);} /* SLOT-DEFINITION-LOCATION */ |
static void LnkT54(ptr) object *ptr;{ call_or_link_closure(VV[54],(void **)(void *)&Lnk54,(void **)(void *)&Lclptr54);} /* SLOT-DEFINITION-LOCATION */ |
1297 |
static void LnkT9(){ call_or_link(VV[9],(void **)&Lnk9);} /* SLOT-VALUE */ |
static void LnkT9(){ call_or_link(VV[9],(void **)(void *)&Lnk9);} /* SLOT-VALUE */ |
1298 |
static void LnkT12(){ call_or_link(VV[12],(void **)&Lnk12);} /* SLOT-BOUNDP */ |
static void LnkT12(){ call_or_link(VV[12],(void **)(void *)&Lnk12);} /* SLOT-BOUNDP */ |
1299 |
static void LnkT30(ptr) object *ptr;{ call_or_link_closure(VV[30],(void **)&Lnk30,(void **)&Lclptr30);} /* SLOT-MAKUNBOUND-USING-CLASS */ |
static void LnkT30(ptr) object *ptr;{ call_or_link_closure(VV[30],(void **)(void *)&Lnk30,(void **)(void *)&Lclptr30);} /* SLOT-MAKUNBOUND-USING-CLASS */ |
1300 |
static void LnkT26(ptr) object *ptr;{ call_or_link_closure(VV[26],(void **)&Lnk26,(void **)&Lclptr26);} /* SLOT-BOUNDP-USING-CLASS */ |
static void LnkT26(ptr) object *ptr;{ call_or_link_closure(VV[26],(void **)(void *)&Lnk26,(void **)(void *)&Lclptr26);} /* SLOT-BOUNDP-USING-CLASS */ |
1301 |
static void LnkT53(ptr) object *ptr;{ call_or_link_closure(VV[53],(void **)&Lnk53,(void **)&Lclptr53);} /* SETF PCL SLOT-VALUE-USING-CLASS */ |
static void LnkT53(ptr) object *ptr;{ call_or_link_closure(VV[53],(void **)(void *)&Lnk53,(void **)(void *)&Lclptr53);} /* SETF PCL SLOT-VALUE-USING-CLASS */ |
1302 |
static void LnkT18(ptr) object *ptr;{ call_or_link_closure(VV[18],(void **)&Lnk18,(void **)&Lclptr18);} /* SLOT-VALUE-USING-CLASS */ |
static void LnkT18(ptr) object *ptr;{ call_or_link_closure(VV[18],(void **)(void *)&Lnk18,(void **)(void *)&Lclptr18);} /* SLOT-VALUE-USING-CLASS */ |
1303 |
static object LnkTLI52(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[52],(void **)&LnkLI52,2,first,ap);va_end(ap);return V1;} /* FIND-SLOT-DEFINITION */ |
static object LnkTLI52(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[52],(void **)(void *)&LnkLI52,2,first,ap);va_end(ap);return V1;} /* FIND-SLOT-DEFINITION */ |
1304 |
static object LnkTLI51(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[51],(void **)&LnkLI51,1,first,ap);va_end(ap);return V1;} /* CLASS-OF */ |
static object LnkTLI51(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[51],(void **)(void *)&LnkLI51,1,first,ap);va_end(ap);return V1;} /* CLASS-OF */ |
1305 |
static void LnkT50(ptr) object *ptr;{ call_or_link_closure(VV[50],(void **)&Lnk50,(void **)&Lclptr50);} /* SLOT-DEFINITION-NAME */ |
static void LnkT50(ptr) object *ptr;{ call_or_link_closure(VV[50],(void **)(void *)&Lnk50,(void **)(void *)&Lclptr50);} /* SLOT-DEFINITION-NAME */ |
1306 |
static void LnkT49(ptr) object *ptr;{ call_or_link_closure(VV[49],(void **)&Lnk49,(void **)&Lclptr49);} /* CLASS-SLOTS */ |
static void LnkT49(ptr) object *ptr;{ call_or_link_closure(VV[49],(void **)(void *)&Lnk49,(void **)(void *)&Lclptr49);} /* CLASS-SLOTS */ |
1307 |
static void LnkT48(){ call_or_link(VV[48],(void **)&Lnk48);} /* SET-CLASS-SLOT-VALUE-1 */ |
static void LnkT48(){ call_or_link(VV[48],(void **)(void *)&Lnk48);} /* SET-CLASS-SLOT-VALUE-1 */ |
1308 |
static void LnkT47(){ call_or_link(VV[47],(void **)&Lnk47);} /* GET-CLASS-SLOT-VALUE-1 */ |
static void LnkT47(){ call_or_link(VV[47],(void **)(void *)&Lnk47);} /* GET-CLASS-SLOT-VALUE-1 */ |
1309 |
static void LnkT46(ptr) object *ptr;{ call_or_link_closure(VV[46],(void **)&Lnk46,(void **)&Lclptr46);} /* CLASS-PROTOTYPE */ |
static void LnkT46(ptr) object *ptr;{ call_or_link_closure(VV[46],(void **)(void *)&Lnk46,(void **)(void *)&Lclptr46);} /* CLASS-PROTOTYPE */ |
1310 |
static void LnkT45(ptr) object *ptr;{ call_or_link_closure(VV[45],(void **)&Lnk45,(void **)&Lclptr45);} /* CLASS-WRAPPER */ |
static void LnkT45(ptr) object *ptr;{ call_or_link_closure(VV[45],(void **)(void *)&Lnk45,(void **)(void *)&Lclptr45);} /* CLASS-WRAPPER */ |
1311 |
static void LnkT44(ptr) object *ptr;{ call_or_link_closure(VV[44],(void **)&Lnk44,(void **)&Lclptr44);} /* SLOT-UNBOUND */ |
static void LnkT44(ptr) object *ptr;{ call_or_link_closure(VV[44],(void **)(void *)&Lnk44,(void **)(void *)&Lclptr44);} /* SLOT-UNBOUND */ |
1312 |
static void LnkT43(ptr) object *ptr;{ call_or_link_closure(VV[43],(void **)&Lnk43,(void **)&Lclptr43);} /* SLOT-MISSING */ |
static void LnkT43(ptr) object *ptr;{ call_or_link_closure(VV[43],(void **)(void *)&Lnk43,(void **)(void *)&Lclptr43);} /* SLOT-MISSING */ |
1313 |
static object LnkTLI42(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[42],(void **)&LnkLI42,4098,first,ap);va_end(ap);return V1;} /* %CCLOSURE-ENV-NTHCDR */ |
static object LnkTLI42(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[42],(void **)(void *)&LnkLI42,4098,first,ap);va_end(ap);return V1;} /* %CCLOSURE-ENV-NTHCDR */ |
1314 |
static void LnkT41(){ call_or_link(VV[41],(void **)&Lnk41);} /* CCLOSURE-ENV-NTHCDR */ |
static void LnkT41(){ call_or_link(VV[41],(void **)(void *)&Lnk41);} /* CCLOSURE-ENV-NTHCDR */ |
1315 |
|
|
1316 |
#ifdef SYSTEM_SPECIAL_INIT |
#ifdef SYSTEM_SPECIAL_INIT |
1317 |
SYSTEM_SPECIAL_INIT |
SYSTEM_SPECIAL_INIT |