/[gcl]/gcl/pcl/pcl_slots.c
ViewVC logotype

Diff of /gcl/pcl/pcl_slots.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by camm, Wed Feb 26 22:21:42 2003 UTC revision 1.1.4.1 by camm, Wed Jul 16 02:02:52 2003 UTC
# Line 1283  T421:; Line 1283  T421:;
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

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.1.4.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26