/[gcl]/gcl/clcs/clcs_kcl_cond.c
ViewVC logotype

Diff of /gcl/clcs/clcs_kcl_cond.c

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

revision 1.3 by camm, Thu Feb 27 23:54:22 2003 UTC revision 1.4 by camm, Tue Jul 15 18:03:36 2003 UTC
# Line 775  register object *base0; Line 775  register object *base0;
775          unwind(fr,VV[14]);}          unwind(fr,VV[14]);}
776          }          }
777  }  }
778  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;} /* CONDITION-BACKTRACE */  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;} /* CONDITION-BACKTRACE */
779  static void LnkT28(){ call_or_link(VV[28],(void **)&Lnk28);} /* ERROR-SET */  static void LnkT28(){ call_or_link(VV[28],(void **)(void *)&Lnk28);} /* ERROR-SET */
780  static object  LnkTLI50(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[50],(void **)&LnkLI50,1,first,ap);va_end(ap);return V1;} /* RESET-FUNCTION */  static object  LnkTLI50(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[50],(void **)(void *)&LnkLI50,1,first,ap);va_end(ap);return V1;} /* RESET-FUNCTION */
781  static void LnkT48(){ call_or_link(VV[48],(void **)&Lnk48);} /* SIMPLE-BACKTRACE */  static void LnkT48(){ call_or_link(VV[48],(void **)(void *)&Lnk48);} /* SIMPLE-BACKTRACE */
782  static void LnkT47(){ call_or_link(VV[47],(void **)&Lnk47);} /* FRS-TOP */  static void LnkT47(){ call_or_link(VV[47],(void **)(void *)&Lnk47);} /* FRS-TOP */
783  static void LnkT46(){ call_or_link(VV[46],(void **)&Lnk46);} /* SCH-FRS-BASE */  static void LnkT46(){ call_or_link(VV[46],(void **)(void *)&Lnk46);} /* SCH-FRS-BASE */
784  static void LnkT45(){ call_or_link(VV[45],(void **)&Lnk45);} /* IHS-TOP */  static void LnkT45(){ call_or_link(VV[45],(void **)(void *)&Lnk45);} /* IHS-TOP */
785  static object  LnkTLI44(){return call_proc0(VV[44],(void **)&LnkLI44);} /* INITIALIZE-INTERNAL-ERROR-TABLE */  static object  LnkTLI44(){return call_proc0(VV[44],(void **)(void *)&LnkLI44);} /* INITIALIZE-INTERNAL-ERROR-TABLE */
786  static void LnkT43(){ call_or_link(VV[43],(void **)&Lnk43);} /* SET-INTERNAL-ERROR */  static void LnkT43(){ call_or_link(VV[43],(void **)(void *)&Lnk43);} /* SET-INTERNAL-ERROR */
787  static void LnkT32(){ call_or_link(VV[32],(void **)&Lnk32);} /* ERROR */  static void LnkT32(){ call_or_link(VV[32],(void **)(void *)&Lnk32);} /* ERROR */
788  static object  LnkTLI42(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[42],(void **)&LnkLI42,1,first,ap);va_end(ap);return V1;} /* SIMPLE-CONDITION-CLASS-P */  static object  LnkTLI42(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_proc_new(VV[42],(void **)(void *)&LnkLI42,1,first,ap);va_end(ap);return V1;} /* SIMPLE-CONDITION-CLASS-P */
789  static object  LnkTLI41(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[41],(void **)&LnkLI41,first,ap);va_end(ap);return V1;} /* MAKE-RESTART */  static object  LnkTLI41(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[41],(void **)(void *)&LnkLI41,first,ap);va_end(ap);return V1;} /* MAKE-RESTART */
790  static void LnkT40(){ call_or_link(VV[40],(void **)&Lnk40);} /* *MAKE-SPECIAL */  static void LnkT40(){ call_or_link(VV[40],(void **)(void *)&Lnk40);} /* *MAKE-SPECIAL */
791    
792  #ifdef SYSTEM_SPECIAL_INIT  #ifdef SYSTEM_SPECIAL_INIT
793  SYSTEM_SPECIAL_INIT  SYSTEM_SPECIAL_INIT

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

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