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

Diff of /gcl/clcs/clcs_conditions.c

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

revision 1.8 by camm, Fri Oct 3 16:03:14 2003 UTC revision 1.9 by camm, Tue Oct 7 21:07:34 2003 UTC
# Line 2  Line 2 
2  #include "cmpinclude.h"  #include "cmpinclude.h"
3  #include "clcs_conditions.h"  #include "clcs_conditions.h"
4  void init_clcs_conditions(){do_init(VV);}  void init_clcs_conditions(){do_init(VV);}
5  /*      local entry for function progn 'compile2191     */  /*      local entry for function progn 'compile2168     */
6    
7  static object LI1()  static object LI1()
8    
# Line 25  T1:; Line 25  T1:;
25          base[0]=base[0];          base[0]=base[0];
26          return Cnil;          return Cnil;
27  }  }
28  /*      local entry for function progn 'compile2207     */  /*      local entry for function progn 'compile2184     */
29    
30  static object LI2()  static object LI2()
31    
# Line 41  TTL:; Line 41  TTL:;
41          base[0]=base[0];          base[0]=base[0];
42          return Cnil;          return Cnil;
43  }  }
44  /*      local entry for function progn 'compile2219     */  /*      local entry for function progn 'compile2196     */
45    
46  static object LI3()  static object LI3()
47    
# Line 60  T7:; Line 60  T7:;
60          VMR3(V3)}          VMR3(V3)}
61          return Cnil;          return Cnil;
62  }  }
63  /*      local entry for function progn 'compile2232     */  /*      local entry for function progn 'compile2209     */
64    
65  static object LI4()  static object LI4()
66    
# Line 219  T60:; Line 219  T60:;
219          vs_top=(vs_base=base+6)+1;          vs_top=(vs_base=base+6)+1;
220          return;}          return;}
221  }  }
222  /*      function definition for Defclass CONDITION2309  */  /*      function definition for Defclass CONDITION2286  */
223    
224  static void L6()  static void L6()
225  {register object *base=vs_base;  {register object *base=vs_base;
# Line 237  TTL:; Line 237  TTL:;
237          symlispcall(VV[55],base+0,6);          symlispcall(VV[55],base+0,6);
238          return;          return;
239  }  }
240  /*      local entry for function progn 'compile2325     */  /*      local entry for function progn 'compile2302     */
241    
242  static object LI7()  static object LI7()
243    
# Line 252  TTL:; Line 252  TTL:;
252          base[0]=base[0];          base[0]=base[0];
253          return Cnil;          return Cnil;
254  }  }
255  /*      local entry for function progn 'compile2342     */  /*      local entry for function progn 'compile2319     */
256    
257  static object LI8()  static object LI8()
258    
# Line 270  TTL:; Line 270  TTL:;
270          base[0]=base[0];          base[0]=base[0];
271          return Cnil;          return Cnil;
272  }  }
273  /*      local entry for function progn 'compile2366     */  /*      local entry for function progn 'compile2343     */
274    
275  static object LI9()  static object LI9()
276    
# Line 282  TTL:; Line 282  TTL:;
282          VMR9(V34)}          VMR9(V34)}
283          return Cnil;          return Cnil;
284  }  }
285  /*      local entry for function progn 'compile2378     */  /*      local entry for function progn 'compile2355     */
286    
287  static object LI10()  static object LI10()
288    
# Line 293  TTL:; Line 293  TTL:;
293          VMR10(V35)}          VMR10(V35)}
294          return Cnil;          return Cnil;
295  }  }
296  /*      local entry for function progn 'compile2394     */  /*      local entry for function progn 'compile2371     */
297    
298  static object LI11()  static object LI11()
299    
# Line 345  TTL:; Line 345  TTL:;
345          base[0]=base[0];          base[0]=base[0];
346          return Cnil;          return Cnil;
347  }  }
348  /*      local entry for function progn 'compile2418     */  /*      local entry for function progn 'compile2395     */
349    
350  static object LI13()  static object LI13()
351    
# Line 406  T93:; Line 406  T93:;
406          base[0]=base[0];          base[0]=base[0];
407          return Cnil;          return Cnil;
408  }  }
409  /*      local entry for function progn 'compile2487     */  /*      local entry for function progn 'compile2464     */
410    
411  static object LI15()  static object LI15()
412    
# Line 429  TTL:; Line 429  TTL:;
429          base[0]=base[0];          base[0]=base[0];
430          return Cnil;          return Cnil;
431  }  }
432  /*      local entry for function progn 'compile2499     */  /*      local entry for function progn 'compile2476     */
433    
434  static object LI16()  static object LI16()
435    
# Line 445  TTL:; Line 445  TTL:;
445          base[0]=base[0];          base[0]=base[0];
446          return Cnil;          return Cnil;
447  }  }
448  /*      local entry for function progn 'compile2511     */  /*      local entry for function progn 'compile2488     */
449    
450  static object LI17()  static object LI17()
451    
# Line 469  T116:; Line 469  T116:;
469          base[0]=base[0];          base[0]=base[0];
470          return Cnil;          return Cnil;
471  }  }
472  /*      local entry for function progn 'compile2524     */  /*      local entry for function progn 'compile2501     */
473    
474  static object LI18()  static object LI18()
475    
# Line 580  static void LnkT59(){ call_or_link(VV[59 Line 580  static void LnkT59(){ call_or_link(VV[59
580  static void LnkT58(){ call_or_link(VV[58],(void **)(void *)&Lnk58);} /* PROCLAIM-DEFGENERIC */  static void LnkT58(){ call_or_link(VV[58],(void **)(void *)&Lnk58);} /* PROCLAIM-DEFGENERIC */
581  static void LnkT57(){ call_or_link(VV[57],(void **)(void *)&Lnk57);} /* TYPEP */  static void LnkT57(){ call_or_link(VV[57],(void **)(void *)&Lnk57);} /* TYPEP */
582  static void LnkT32(){ call_or_link(VV[32],(void **)(void *)&Lnk32);} /* PROCLAIM-INCOMPATIBLE-SUPERCLASSES */  static void LnkT32(){ call_or_link(VV[32],(void **)(void *)&Lnk32);} /* PROCLAIM-INCOMPATIBLE-SUPERCLASSES */
583  static void LnkT56(){ call_or_link(VV[56],(void **)(void *)&Lnk56);} /* Defclass CONDITION2309 */  static void LnkT56(){ call_or_link(VV[56],(void **)(void *)&Lnk56);} /* Defclass CONDITION2286 */
584  static object  LnkTLI54(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[54],(void **)(void *)&LnkLI54,first,ap);va_end(ap);return V1;} /* CERROR */  static object  LnkTLI54(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[54],(void **)(void *)&LnkLI54,first,ap);va_end(ap);return V1;} /* CERROR */
585  static void LnkT50(){ call_or_link(VV[50],(void **)(void *)&Lnk50);} /* *MAKE-SPECIAL */  static void LnkT50(){ call_or_link(VV[50],(void **)(void *)&Lnk50);} /* *MAKE-SPECIAL */
586  static void LnkT0(){ call_or_link(VV[0],(void **)(void *)&Lnk0);} /* REMOVE-CLCS-SYMBOLS */  static void LnkT0(){ call_or_link(VV[0],(void **)(void *)&Lnk0);} /* REMOVE-CLCS-SYMBOLS */

Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9

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