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

Diff of /gcl/pcl/pcl_fngen.c

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

revision 1.1 by camm, Wed Feb 26 22:21:41 2003 UTC revision 1.2 by camm, Tue Jul 15 18:03:38 2003 UTC
# Line 747  T160:; Line 747  T160:;
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

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

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