/[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.4 by camm, Tue Jul 15 18:03:36 2003 UTC revision 1.5 by camm, Mon Sep 22 22:03:47 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 'compile2181     */  /*      local entry for function progn 'compile2184     */
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 'compile2197     */  /*      local entry for function progn 'compile2200     */
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 'compile2209     */  /*      local entry for function progn 'compile2212     */
45    
46  static object LI3()  static object LI3()
47    
# Line 65  T7:; Line 65  T7:;
65          base[0]=base[0];          base[0]=base[0];
66          return Cnil;          return Cnil;
67  }  }
68  /*      local entry for function progn 'compile2222     */  /*      local entry for function progn 'compile2225     */
69    
70  static object LI4()  static object LI4()
71    
# Line 211  T54:; Line 211  T54:;
211          vs_top=(vs_base=base+6)+1;          vs_top=(vs_base=base+6)+1;
212          return;}          return;}
213  }  }
214  /*      function definition for Defclass CONDITION2299  */  /*      function definition for Defclass CONDITION2302  */
215    
216  static void L6()  static void L6()
217  {register object *base=vs_base;  {register object *base=vs_base;
# Line 230  TTL:; Line 230  TTL:;
230          symlispcall(VV[54],base+0,6);          symlispcall(VV[54],base+0,6);
231          return;          return;
232  }  }
233  /*      local entry for function progn 'compile2315     */  /*      local entry for function progn 'compile2318     */
234    
235  static object LI7()  static object LI7()
236    
# Line 245  TTL:; Line 245  TTL:;
245          base[0]=base[0];          base[0]=base[0];
246          return Cnil;          return Cnil;
247  }  }
248  /*      local entry for function progn 'compile2332     */  /*      local entry for function progn 'compile2335     */
249    
250  static object LI8()  static object LI8()
251    
# Line 263  TTL:; Line 263  TTL:;
263          base[0]=base[0];          base[0]=base[0];
264          return Cnil;          return Cnil;
265  }  }
266  /*      local entry for function progn 'compile2356     */  /*      local entry for function progn 'compile2359     */
267    
268  static object LI9()  static object LI9()
269    
# Line 275  TTL:; Line 275  TTL:;
275          VMR9(V30)}          VMR9(V30)}
276          return Cnil;          return Cnil;
277  }  }
278  /*      local entry for function progn 'compile2368     */  /*      local entry for function progn 'compile2371     */
279    
280  static object LI10()  static object LI10()
281    
# Line 286  TTL:; Line 286  TTL:;
286          VMR10(V31)}          VMR10(V31)}
287          return Cnil;          return Cnil;
288  }  }
289  /*      local entry for function progn 'compile2384     */  /*      local entry for function progn 'compile2387     */
290    
291  static object LI11()  static object LI11()
292    
# Line 339  TTL:; Line 339  TTL:;
339          base[0]=base[0];          base[0]=base[0];
340          return Cnil;          return Cnil;
341  }  }
342  /*      local entry for function progn 'compile2408     */  /*      local entry for function progn 'compile2411     */
343    
344  static object LI13()  static object LI13()
345    
# Line 400  T87:; Line 400  T87:;
400          base[0]=base[0];          base[0]=base[0];
401          return Cnil;          return Cnil;
402  }  }
403  /*      local entry for function progn 'compile2477     */  /*      local entry for function progn 'compile2480     */
404    
405  static object LI15()  static object LI15()
406    
# Line 423  TTL:; Line 423  TTL:;
423          base[0]=base[0];          base[0]=base[0];
424          return Cnil;          return Cnil;
425  }  }
426  /*      local entry for function progn 'compile2489     */  /*      local entry for function progn 'compile2492     */
427    
428  static object LI16()  static object LI16()
429    
# Line 439  TTL:; Line 439  TTL:;
439          base[0]=base[0];          base[0]=base[0];
440          return Cnil;          return Cnil;
441  }  }
442  /*      local entry for function progn 'compile2501     */  /*      local entry for function progn 'compile2504     */
443    
444  static object LI17()  static object LI17()
445    
# Line 467  T110:; Line 467  T110:;
467          base[0]=base[0];          base[0]=base[0];
468          return Cnil;          return Cnil;
469  }  }
470  /*      local entry for function progn 'compile2514     */  /*      local entry for function progn 'compile2517     */
471    
472  static object LI18()  static object LI18()
473    
# Line 579  static void LnkT58(){ call_or_link(VV[58 Line 579  static void LnkT58(){ call_or_link(VV[58
579  static void LnkT57(){ call_or_link(VV[57],(void **)(void *)&Lnk57);} /* PROCLAIM-DEFGENERIC */  static void LnkT57(){ call_or_link(VV[57],(void **)(void *)&Lnk57);} /* PROCLAIM-DEFGENERIC */
580  static void LnkT56(){ call_or_link(VV[56],(void **)(void *)&Lnk56);} /* TYPEP */  static void LnkT56(){ call_or_link(VV[56],(void **)(void *)&Lnk56);} /* TYPEP */
581  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 */
582  static void LnkT55(){ call_or_link(VV[55],(void **)(void *)&Lnk55);} /* Defclass CONDITION2299 */  static void LnkT55(){ call_or_link(VV[55],(void **)(void *)&Lnk55);} /* Defclass CONDITION2302 */
583  static object  LnkTLI53(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[53],(void **)(void *)&LnkLI53,first,ap);va_end(ap);return V1;} /* CERROR */  static object  LnkTLI53(object first,...){object V1;va_list ap;va_start(ap,first);V1=call_vproc_new(VV[53],(void **)(void *)&LnkLI53,first,ap);va_end(ap);return V1;} /* CERROR */
584  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 */
585  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.4  
changed lines
  Added in v.1.5

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