/[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.10 by camm, Thu Oct 23 15:30:03 2003 UTC revision 1.11 by camm, Thu Oct 23 17:14:27 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 'compile2195     */  /*      local entry for function progn 'compile2194     */
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 'compile2211     */  /*      local entry for function progn 'compile2210     */
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 'compile2223     */  /*      local entry for function progn 'compile2222     */
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 'compile2236     */  /*      local entry for function progn 'compile2235     */
64    
65  static object LI4()  static object LI4()
66    
# Line 216  T60:; Line 216  T60:;
216          vs_top=(vs_base=base+6)+1;          vs_top=(vs_base=base+6)+1;
217          return;}          return;}
218  }  }
219  /*      function definition for Defclass CONDITION2313  */  /*      function definition for Defclass CONDITION2312  */
220    
221  static void L6()  static void L6()
222  {register object *base=vs_base;  {register object *base=vs_base;
# Line 234  TTL:; Line 234  TTL:;
234          symlispcall(VV[55],base+0,6);          symlispcall(VV[55],base+0,6);
235          return;          return;
236  }  }
237  /*      local entry for function progn 'compile2329     */  /*      local entry for function progn 'compile2328     */
238    
239  static object LI7()  static object LI7()
240    
# Line 249  TTL:; Line 249  TTL:;
249          base[0]=base[0];          base[0]=base[0];
250          return Cnil;          return Cnil;
251  }  }
252  /*      local entry for function progn 'compile2346     */  /*      local entry for function progn 'compile2345     */
253    
254  static object LI8()  static object LI8()
255    
# Line 267  TTL:; Line 267  TTL:;
267          base[0]=base[0];          base[0]=base[0];
268          return Cnil;          return Cnil;
269  }  }
270  /*      local entry for function progn 'compile2370     */  /*      local entry for function progn 'compile2369     */
271    
272  static object LI9()  static object LI9()
273    
# Line 279  TTL:; Line 279  TTL:;
279          VMR9(V31)}          VMR9(V31)}
280          return Cnil;          return Cnil;
281  }  }
282  /*      local entry for function progn 'compile2382     */  /*      local entry for function progn 'compile2381     */
283    
284  static object LI10()  static object LI10()
285    
# Line 290  TTL:; Line 290  TTL:;
290          VMR10(V32)}          VMR10(V32)}
291          return Cnil;          return Cnil;
292  }  }
293  /*      local entry for function progn 'compile2398     */  /*      local entry for function progn 'compile2397     */
294    
295  static object LI11()  static object LI11()
296    
# Line 342  TTL:; Line 342  TTL:;
342          base[0]=base[0];          base[0]=base[0];
343          return Cnil;          return Cnil;
344  }  }
345  /*      local entry for function progn 'compile2422     */  /*      local entry for function progn 'compile2421     */
346    
347  static object LI13()  static object LI13()
348    
# Line 403  T92:; Line 403  T92:;
403          base[0]=base[0];          base[0]=base[0];
404          return Cnil;          return Cnil;
405  }  }
406  /*      local entry for function progn 'compile2523     */  /*      local entry for function progn 'compile2522     */
407    
408  static object LI15()  static object LI15()
409    
# Line 426  TTL:; Line 426  TTL:;
426          base[0]=base[0];          base[0]=base[0];
427          return Cnil;          return Cnil;
428  }  }
429  /*      local entry for function progn 'compile2535     */  /*      local entry for function progn 'compile2534     */
430    
431  static object LI16()  static object LI16()
432    
# Line 442  TTL:; Line 442  TTL:;
442          base[0]=base[0];          base[0]=base[0];
443          return Cnil;          return Cnil;
444  }  }
445  /*      local entry for function progn 'compile2547     */  /*      local entry for function progn 'compile2546     */
446    
447  static object LI17()  static object LI17()
448    
# Line 466  T115:; Line 466  T115:;
466          base[0]=base[0];          base[0]=base[0];
467          return Cnil;          return Cnil;
468  }  }
469  /*      local entry for function progn 'compile2560     */  /*      local entry for function progn 'compile2559     */
470    
471  static object LI18()  static object LI18()
472    
# Line 577  static void LnkT59(){ call_or_link(VV[59 Line 577  static void LnkT59(){ call_or_link(VV[59
577  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 */
578  static void LnkT57(){ call_or_link(VV[57],(void **)(void *)&Lnk57);} /* TYPEP */  static void LnkT57(){ call_or_link(VV[57],(void **)(void *)&Lnk57);} /* TYPEP */
579  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 */
580  static void LnkT56(){ call_or_link(VV[56],(void **)(void *)&Lnk56);} /* Defclass CONDITION2313 */  static void LnkT56(){ call_or_link(VV[56],(void **)(void *)&Lnk56);} /* Defclass CONDITION2312 */
581  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 */
582  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 */
583  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.10  
changed lines
  Added in v.1.11

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