747 |
return;} |
return;} |
748 |
} |
} |
749 |
} |
} |
750 |
static object LnkTLI38(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[38],(void **)&LnkLI38,1,first,ap);va_end(ap);return V1;} /* FGEN-GENERATOR-LAMBDA */ |
static object LnkTLI38(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[38],(void **)(void *)&LnkLI38,1,first,ap);va_end(ap);return V1;} /* FGEN-GENERATOR-LAMBDA */ |
751 |
static object LnkTLI37(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[37],(void **)&LnkLI37,1,first,ap);va_end(ap);return V1;} /* FGEN-GENSYMS */ |
static object LnkTLI37(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[37],(void **)(void *)&LnkLI37,1,first,ap);va_end(ap);return V1;} /* FGEN-GENSYMS */ |
752 |
static object LnkTLI36(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[36],(void **)&LnkLI36,3,first,ap);va_end(ap);return V1;} /* MAKE-TOP-LEVEL-FORM */ |
static object LnkTLI36(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[36],(void **)(void *)&LnkLI36,3,first,ap);va_end(ap);return V1;} /* MAKE-TOP-LEVEL-FORM */ |
753 |
static void LnkT35(){ call_or_link(VV[35],(void **)&Lnk35);} /* WALK-FORM */ |
static void LnkT35(){ call_or_link(VV[35],(void **)(void *)&Lnk35);} /* WALK-FORM */ |
754 |
static void LnkT34(){ call_or_link(VV[34],(void **)&Lnk34);} /* COMPUTE-CODE */ |
static void LnkT34(){ call_or_link(VV[34],(void **)(void *)&Lnk34);} /* COMPUTE-CODE */ |
755 |
static object LnkTLI33(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[33],(void **)&LnkLI33,1,first,ap);va_end(ap);return V1;} /* STORE-FGEN */ |
static object LnkTLI33(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[33],(void **)(void *)&LnkLI33,1,first,ap);va_end(ap);return V1;} /* STORE-FGEN */ |
756 |
static object LnkTLI32(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[32],(void **)&LnkLI32,5,first,ap);va_end(ap);return V1;} /* MAKE-FGEN */ |
static object LnkTLI32(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[32],(void **)(void *)&LnkLI32,5,first,ap);va_end(ap);return V1;} /* MAKE-FGEN */ |
757 |
static void LnkT31(){ call_or_link(VV[31],(void **)&Lnk31);} /* COMPILE-LAMBDA */ |
static void LnkT31(){ call_or_link(VV[31],(void **)(void *)&Lnk31);} /* COMPILE-LAMBDA */ |
758 |
static void LnkT30(){ call_or_link(VV[30],(void **)&Lnk30);} /* GET-NEW-FUNCTION-GENERATOR-INTERNAL */ |
static void LnkT30(){ call_or_link(VV[30],(void **)(void *)&Lnk30);} /* GET-NEW-FUNCTION-GENERATOR-INTERNAL */ |
759 |
static object LnkTLI29(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[29],(void **)&LnkLI29,3,first,ap);va_end(ap);return V1;} /* GET-NEW-FUNCTION-GENERATOR */ |
static object LnkTLI29(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[29],(void **)(void *)&LnkLI29,3,first,ap);va_end(ap);return V1;} /* GET-NEW-FUNCTION-GENERATOR */ |
760 |
static void LnkT28(){ call_or_link(VV[28],(void **)&Lnk28);} /* COMPUTE-TEST */ |
static void LnkT28(){ call_or_link(VV[28],(void **)(void *)&Lnk28);} /* COMPUTE-TEST */ |
761 |
static void LnkT27(){ call_or_link(VV[27],(void **)&Lnk27);} /* MAKE-ARRAY */ |
static void LnkT27(){ call_or_link(VV[27],(void **)(void *)&Lnk27);} /* MAKE-ARRAY */ |
762 |
static void LnkT26(){ call_or_link(VV[26],(void **)&Lnk26);} /* FIND */ |
static void LnkT26(){ call_or_link(VV[26],(void **)(void *)&Lnk26);} /* FIND */ |
763 |
static object LnkTLI24(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[24],(void **)&LnkLI24,1,first,ap);va_end(ap);return V1;} /* FGEN-SYSTEM */ |
static object LnkTLI24(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[24],(void **)(void *)&LnkLI24,1,first,ap);va_end(ap);return V1;} /* FGEN-SYSTEM */ |
764 |
static object LnkTLI23(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[23],(void **)&LnkLI23,1,first,ap);va_end(ap);return V1;} /* FGEN-GENERATOR */ |
static object LnkTLI23(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[23],(void **)(void *)&LnkLI23,1,first,ap);va_end(ap);return V1;} /* FGEN-GENERATOR */ |
765 |
static object LnkTLI22(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[22],(void **)&LnkLI22,1,first,ap);va_end(ap);return V1;} /* FGEN-TEST */ |
static object LnkTLI22(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[22],(void **)(void *)&LnkLI22,1,first,ap);va_end(ap);return V1;} /* FGEN-TEST */ |
766 |
static object LnkTLI21(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[21],(void **)&LnkLI21,1,first,ap);va_end(ap);return V1;} /* LOOKUP-FGEN */ |
static object LnkTLI21(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[21],(void **)(void *)&LnkLI21,1,first,ap);va_end(ap);return V1;} /* LOOKUP-FGEN */ |
767 |
static object LnkTLI20(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[20],(void **)&LnkLI20,1,first,ap);va_end(ap);return V1;} /* DEFAULT-CONSTANTP */ |
static object LnkTLI20(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[20],(void **)(void *)&LnkLI20,1,first,ap);va_end(ap);return V1;} /* DEFAULT-CONSTANTP */ |
768 |
static void LnkT19(){ call_or_link(VV[19],(void **)&Lnk19);} /* TYPEP */ |
static void LnkT19(){ call_or_link(VV[19],(void **)(void *)&Lnk19);} /* TYPEP */ |
769 |
static object LnkTLI18(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[18],(void **)&LnkLI18,2,first,ap);va_end(ap);return V1;} /* COMPUTE-CONSTANTS */ |
static object LnkTLI18(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[18],(void **)(void *)&LnkLI18,2,first,ap);va_end(ap);return V1;} /* COMPUTE-CONSTANTS */ |
770 |
static object LnkTLI17(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[17],(void **)&LnkLI17,3,first,ap);va_end(ap);return V1;} /* GET-FUNCTION-GENERATOR */ |
static object LnkTLI17(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[17],(void **)(void *)&LnkLI17,3,first,ap);va_end(ap);return V1;} /* GET-FUNCTION-GENERATOR */ |
771 |
|
|
772 |
#ifdef SYSTEM_SPECIAL_INIT |
#ifdef SYSTEM_SPECIAL_INIT |
773 |
SYSTEM_SPECIAL_INIT |
SYSTEM_SPECIAL_INIT |