/[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.7 by camm, Thu Sep 25 16:11:27 2003 UTC revision 1.8 by camm, Fri Oct 3 16:03:14 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 'compile2186     */  /*      local entry for function progn 'compile2191     */
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 'compile2202     */  /*      local entry for function progn 'compile2207     */
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 'compile2214     */  /*      local entry for function progn 'compile2219     */
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 'compile2227     */  /*      local entry for function progn 'compile2232     */
64    
65  static object LI4()  static object LI4()
66    
# Line 150  T44:; Line 150  T44:;
150          V12= list(4,VV[12],base[2],base[3],base[4]);          V12= list(4,VV[12],base[2],base[3],base[4]);
151          goto T42;          goto T42;
152  T42:;  T42:;
153          {object V14;          V13 = base[2];
154          object V15= base[4];          V14 = base[3];
155          if(V15==Cnil){          {object V16;
156          V13= Cnil;          object V17= base[4];
157            if(V17==Cnil){
158            V15= Cnil;
159          goto T46;}          goto T46;}
160          base[6]=V14=MMcons(Cnil,Cnil);          base[6]=V16=MMcons(Cnil,Cnil);
161          goto T47;          goto T47;
162  T47:;  T47:;
163          {object V17;          {object V19;
164          base[8]= CMPcdr((V15->c.c_car));          base[8]= CMPcdr((V17->c.c_car));
165          base[9]= VV[17];          base[9]= VV[17];
166          vs_top=(vs_base=base+8)+2;          vs_top=(vs_base=base+8)+2;
167          Lgetf();          Lgetf();
168          vs_top=sup;          vs_top=sup;
169          V17= vs_base[0];          V19= vs_base[0];
170          if(((V17))==Cnil){          if(((V19))==Cnil){
171          goto T53;}{object V19;          goto T53;}
172          base[8]= CMPcdr((V15->c.c_car));          V20 = (V19);{object V22;
173            base[8]= CMPcdr((V17->c.c_car));
174          base[9]= VV[18];          base[9]= VV[18];
175          vs_top=(vs_base=base+8)+2;          vs_top=(vs_base=base+8)+2;
176          Lgetf();          Lgetf();
177          vs_top=sup;          vs_top=sup;
178          V19= vs_base[0];          V22= vs_base[0];
179          if(V19==Cnil)goto T56;          if(V22==Cnil)goto T56;
180          V18= V19;          V21= V22;
181          goto T55;          goto T55;
182          goto T56;          goto T56;
183  T56:;}  T56:;}
184          V18= Ct;          V21= Ct;
185          goto T55;          goto T55;
186  T55:;  T55:;
187          V20= make_cons((V17),V18);          V23= make_cons(V20,V21);
188          (V14->c.c_cdr)= make_cons(/* INLINE-ARGS */V20,Cnil);          (V16->c.c_cdr)= make_cons(/* INLINE-ARGS */V23,Cnil);
189          goto T48;          goto T48;
190          goto T53;          goto T53;
191  T53:;  T53:;
192          (V14->c.c_cdr)= Cnil;}          (V16->c.c_cdr)= Cnil;}
193          goto T48;          goto T48;
194  T48:;  T48:;
195          while(MMcdr(V14)!=Cnil)V14=MMcdr(V14);          while(MMcdr(V16)!=Cnil)V16=MMcdr(V16);
196          if((V15=MMcdr(V15))==Cnil){          if((V17=MMcdr(V17))==Cnil){
197          base[6]=base[6]->c.c_cdr;          base[6]=base[6]->c.c_cdr;
198          V13= base[6];          V15= base[6];
199          goto T46;}          goto T46;}
200          goto T47;}          goto T47;}
201          goto T46;          goto T46;
202  T46:;  T46:;
203          V21= list(3,VV[15],list(2,VV[16],listA(3,base[2],base[3],V13)),VV[1]);          V24= list(3,VV[15],list(2,VV[16],listA(3,V13,V14,V15)),VV[1]);
204          V22= list(4,VV[13],VV[14],/* INLINE-ARGS */V21,list(3,VV[19],list(3,VV[20],list(2,VV[16],base[2]),VV[21]),Cnil));          V25= list(4,VV[13],VV[14],/* INLINE-ARGS */V24,list(3,VV[19],list(3,VV[20],list(2,VV[16],base[2]),VV[21]),Cnil));
205          if(((V6))==Cnil){          if(((V6))==Cnil){
206          goto T62;}          goto T62;}
207          V24= list(2,list(2,VV[24],base[2]),VV[7]);          V27= list(2,list(2,VV[24],base[2]),VV[7]);
208          V25= list(4,VV[22],VV[23],/* INLINE-ARGS */V24,list(4,VV[25],VV[26],VV[27],make_cons((V6),VV[28])));          V28= list(4,VV[22],VV[23],/* INLINE-ARGS */V27,list(4,VV[25],VV[26],VV[27],make_cons((V6),VV[28])));
209          V23= make_cons(/* INLINE-ARGS */V25,Cnil);          V26= make_cons(/* INLINE-ARGS */V28,Cnil);
210          goto T60;          goto T60;
211          goto T62;          goto T62;
212  T62:;  T62:;
213          V23= Cnil;          V26= Cnil;
214          goto T60;          goto T60;
215  T60:;  T60:;
216          V26= list(2,VV[16],base[2]);          V29= list(2,VV[16],base[2]);
217          V27= make_cons(/* INLINE-ARGS */V26,Cnil);          V30= make_cons(/* INLINE-ARGS */V29,Cnil);
218          base[6]= listA(5,VV[10],VV[11],V12,/* INLINE-ARGS */V22,append(V23,/* INLINE-ARGS */V27));          base[6]= listA(5,VV[10],VV[11],V12,/* INLINE-ARGS */V25,append(V26,/* INLINE-ARGS */V30));
219          vs_top=(vs_base=base+6)+1;          vs_top=(vs_base=base+6)+1;
220          return;}          return;}
221  }  }
222  /*      function definition for Defclass CONDITION2304  */  /*      function definition for Defclass CONDITION2309  */
223    
224  static void L6()  static void L6()
225  {register object *base=vs_base;  {register object *base=vs_base;
# Line 234  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 'compile2320     */  /*      local entry for function progn 'compile2325     */
241    
242  static object LI7()  static object LI7()
243    
# Line 244  TTL:; Line 247  TTL:;
247          vs_base=vs_top;          vs_base=vs_top;
248          (void) (*Lnk56)();          (void) (*Lnk56)();
249          vs_top=sup;          vs_top=sup;
250          {object V28 = Cnil;          {object V31 = Cnil;
251          VMR7(V28)}          VMR7(V31)}
252          base[0]=base[0];          base[0]=base[0];
253          return Cnil;          return Cnil;
254  }  }
255  /*      local entry for function progn 'compile2337     */  /*      local entry for function progn 'compile2342     */
256    
257  static object LI8()  static object LI8()
258    
# Line 262  TTL:; Line 265  TTL:;
265          Ladjoin();          Ladjoin();
266          vs_top=sup;          vs_top=sup;
267          (VV[1]->s.s_dbind)= vs_base[0];          (VV[1]->s.s_dbind)= vs_base[0];
268          {object V30 = Cnil;          {object V33 = Cnil;
269          VMR8(V30)}          VMR8(V33)}
270          base[0]=base[0];          base[0]=base[0];
271          return Cnil;          return Cnil;
272  }  }
273  /*      local entry for function progn 'compile2361     */  /*      local entry for function progn 'compile2366     */
274    
275  static object LI9()  static object LI9()
276    
# Line 275  static object LI9() Line 278  static object LI9()
278          goto TTL;          goto TTL;
279  TTL:;  TTL:;
280          (void)(sputprop(VV[2],VV[31],Cnil));          (void)(sputprop(VV[2],VV[31],Cnil));
281          {object V31 = Cnil;          {object V34 = Cnil;
282          VMR9(V31)}          VMR9(V34)}
283          return Cnil;          return Cnil;
284  }  }
285  /*      local entry for function progn 'compile2373     */  /*      local entry for function progn 'compile2378     */
286    
287  static object LI10()  static object LI10()
288    
289  {        VMB10 VMS10 VMV10  {        VMB10 VMS10 VMV10
290          goto TTL;          goto TTL;
291  TTL:;  TTL:;
292          {object V32 = Cnil;          {object V35 = Cnil;
293          VMR10(V32)}          VMR10(V35)}
294          return Cnil;          return Cnil;
295  }  }
296  /*      local entry for function progn 'compile2389     */  /*      local entry for function progn 'compile2394     */
297    
298  static object LI11()  static object LI11()
299    
# Line 305  TTL:; Line 308  TTL:;
308          goto T77;}          goto T77;}
309          base[0]=VV[32]->s.s_gfdef;          base[0]=VV[32]->s.s_gfdef;
310          {          {
311          object V33= VV[33];          object V36= VV[33];
312          if(V33==Cnil){          if(V36==Cnil){
313          goto T77;}          goto T77;}
314          goto T81;          goto T81;
315  T81:;  T81:;
316          base[1]= (V33->c.c_car);          base[1]= (V36->c.c_car);
317          vs_top=(vs_base=base+1)+1;          vs_top=(vs_base=base+1)+1;
318          (void) (*Lnk32)();          (void) (*Lnk32)();
319          vs_top=sup;          vs_top=sup;
320          if((V33=MMcdr(V33))==Cnil){          if((V36=MMcdr(V36))==Cnil){
321          goto T77;}          goto T77;}
322          goto T81;}          goto T81;}
323          goto T77;          goto T77;
324  T77:;  T77:;
325          {object V34 = Cnil;          {object V37 = Cnil;
326          VMR11(V34)}          VMR11(V37)}
327          base[0]=base[0];          base[0]=base[0];
328          return Cnil;          return Cnil;
329  }  }
330  /*      local entry for function CONDITIONP     */  /*      local entry for function CONDITIONP     */
331    
332  static object LI12(V36)  static object LI12(V39)
333    
334  object V36;  object V39;
335  {        VMB12 VMS12 VMV12  {        VMB12 VMS12 VMV12
336          goto TTL;          goto TTL;
337  TTL:;  TTL:;
338          base[0]= (V36);          base[0]= (V39);
339          base[1]= VV[2];          base[1]= VV[2];
340          vs_top=(vs_base=base+0)+2;          vs_top=(vs_base=base+0)+2;
341          (void) (*Lnk57)();          (void) (*Lnk57)();
342          vs_top=sup;          vs_top=sup;
343          {object V37 = vs_base[0];          {object V40 = vs_base[0];
344          VMR12(V37)}          VMR12(V40)}
345          base[0]=base[0];          base[0]=base[0];
346          return Cnil;          return Cnil;
347  }  }
348  /*      local entry for function progn 'compile2413     */  /*      local entry for function progn 'compile2418     */
349    
350  static object LI13()  static object LI13()
351    
# Line 354  TTL:; Line 357  TTL:;
357          vs_top=(vs_base=base+0)+2;          vs_top=(vs_base=base+0)+2;
358          (void) (*Lnk58)();          (void) (*Lnk58)();
359          vs_top=sup;          vs_top=sup;
360          {object V38 = Cnil;          {object V41 = Cnil;
361          VMR13(V38)}          VMR13(V41)}
362          base[0]=base[0];          base[0]=base[0];
363          return Cnil;          return Cnil;
364  }  }
365  /*      local entry for function (PCL::FAST-METHOD PRINT-OBJECT (CONDITION T))  */  /*      local entry for function (PCL::FAST-METHOD PRINT-OBJECT (CONDITION T))  */
366    
367  static object LI14(V43,V44,V45,V46)  static object LI14(V46,V47,V48,V49)
368    
369  object V43;object V44;register object V45;object V46;  object V46;object V47;register object V48;object V49;
370  {        VMB14 VMS14 VMV14  {        VMB14 VMS14 VMV14
371          goto TTL;          goto TTL;
372  TTL:;  TTL:;
373          if(((VV[26]->s.s_dbind))==Cnil){          if(((VV[26]->s.s_dbind))==Cnil){
374          goto T93;}          goto T93;}
375          base[0]= (V46);          base[0]= (V49);
376          base[1]= VV[35];          base[1]= VV[35];
377          base[4]= (V45);          base[4]= (V48);
378          vs_top=(vs_base=base+4)+1;          vs_top=(vs_base=base+4)+1;
379          (void) (*Lnk59)();          (void) (*Lnk59)();
380          vs_top=sup;          vs_top=sup;
# Line 380  TTL:; Line 383  TTL:;
383          (void) (*Lnk60)(Lclptr60);          (void) (*Lnk60)(Lclptr60);
384          vs_top=sup;          vs_top=sup;
385          base[2]= vs_base[0];          base[2]= vs_base[0];
386          base[3]= (*(LnkLI61))((V45));          base[3]= (*(LnkLI61))((V48));
387          vs_top=(vs_base=base+0)+4;          vs_top=(vs_base=base+0)+4;
388          Lformat();          Lformat();
389          vs_top=sup;          vs_top=sup;
390          {object V48 = vs_base[0];          {object V51 = vs_base[0];
391          VMR14(V48)}          VMR14(V51)}
392          goto T93;          goto T93;
393  T93:;  T93:;
394          base[0]= (V46);          base[0]= (V49);
395          base[1]= VV[36];          base[1]= VV[36];
396          base[3]= (V45);          base[3]= (V48);
397          vs_top=(vs_base=base+3)+1;          vs_top=(vs_base=base+3)+1;
398          Ltype_of();          Ltype_of();
399          vs_top=sup;          vs_top=sup;
# Line 398  T93:; Line 401  T93:;
401          vs_top=(vs_base=base+0)+3;          vs_top=(vs_base=base+0)+3;
402          Lformat();          Lformat();
403          vs_top=sup;          vs_top=sup;
404          {object V49 = vs_base[0];          {object V52 = vs_base[0];
405          VMR14(V49)}          VMR14(V52)}
406          base[0]=base[0];          base[0]=base[0];
407          return Cnil;          return Cnil;
408  }  }
409  /*      local entry for function progn 'compile2482     */  /*      local entry for function progn 'compile2487     */
410    
411  static object LI15()  static object LI15()
412    
# Line 415  TTL:; Line 418  TTL:;
418          base[2]= Cnil;          base[2]= Cnil;
419          base[3]= VV[38];          base[3]= VV[38];
420          base[4]= VV[39];          base[4]= VV[39];
421          V50= (VV[62]->s.s_gfdef);          V53= (VV[62]->s.s_gfdef);
422          base[5]= listA(3,VV[40],V50,VV[41]);          base[5]= listA(3,VV[40],V53,VV[41]);
423          base[6]= Cnil;          base[6]= Cnil;
424          vs_top=(vs_base=base+0)+7;          vs_top=(vs_base=base+0)+7;
425          (void) (*Lnk63)();          (void) (*Lnk63)();
426          vs_top=sup;          vs_top=sup;
427          {object V51 = Cnil;          {object V54 = Cnil;
428          VMR15(V51)}          VMR15(V54)}
429          base[0]=base[0];          base[0]=base[0];
430          return Cnil;          return Cnil;
431  }  }
432  /*      local entry for function progn 'compile2494     */  /*      local entry for function progn 'compile2499     */
433    
434  static object LI16()  static object LI16()
435    
# Line 437  TTL:; Line 440  TTL:;
440          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
441          (void) (*Lnk50)();          (void) (*Lnk50)();
442          vs_top=sup;          vs_top=sup;
443          {object V52 = Cnil;          {object V55 = Cnil;
444          VMR16(V52)}          VMR16(V55)}
445          base[0]=base[0];          base[0]=base[0];
446          return Cnil;          return Cnil;
447  }  }
448  /*      local entry for function progn 'compile2506     */  /*      local entry for function progn 'compile2511     */
449    
450  static object LI17()  static object LI17()
451    
# Line 461  T117:; Line 464  T117:;
464          (VV[42]->s.s_dbind)= vs_base[0];          (VV[42]->s.s_dbind)= vs_base[0];
465          goto T116;          goto T116;
466  T116:;  T116:;
467          {object V53 = Cnil;          {object V56 = Cnil;
468          VMR17(V53)}          VMR17(V56)}
469          base[0]=base[0];          base[0]=base[0];
470          return Cnil;          return Cnil;
471  }  }
472  /*      local entry for function progn 'compile2519     */  /*      local entry for function progn 'compile2524     */
473    
474  static object LI18()  static object LI18()
475    
476  {        VMB18 VMS18 VMV18  {        VMB18 VMS18 VMV18
477          goto TTL;          goto TTL;
478  TTL:;  TTL:;
479          {object V54 = Cnil;          {object V57 = Cnil;
480          VMR18(V54)}          VMR18(V57)}
481          return Cnil;          return Cnil;
482  }  }
483  /*      local entry for function CONDITION-CLASS-P      */  /*      local entry for function CONDITION-CLASS-P      */
484    
485  static object LI19(V56)  static object LI19(V59)
486    
487  register object V56;  register object V59;
488  {        VMB19 VMS19 VMV19  {        VMB19 VMS19 VMV19
489          goto TTL;          goto TTL;
490  TTL:;  TTL:;
491          if(!(type_of((V56))==t_symbol)){          if(!(type_of((V59))==t_symbol)){
492          goto T122;}          goto T122;}
493          base[0]= (V56);          base[0]= (V59);
494          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
495          (void) (*Lnk64)();          (void) (*Lnk64)();
496          vs_top=sup;          vs_top=sup;
497          V56= vs_base[0];          V59= vs_base[0];
498          goto T122;          goto T122;
499  T122:;  T122:;
500          base[0]= (V56);          base[0]= (V59);
501          base[1]= VV[29];          base[1]= VV[29];
502          vs_top=(vs_base=base+0)+2;          vs_top=(vs_base=base+0)+2;
503          (void) (*Lnk57)();          (void) (*Lnk57)();
504          vs_top=sup;          vs_top=sup;
505          if((vs_base[0])!=Cnil){          if((vs_base[0])!=Cnil){
506          goto T127;}          goto T127;}
507          {object V57 = Cnil;          {object V60 = Cnil;
508          VMR19(V57)}          VMR19(V60)}
509          goto T127;          goto T127;
510  T127:;{object V59;  T127:;{object V62;
511          V59= (VV[42]->s.s_dbind);          V62= (VV[42]->s.s_dbind);
512          base[0]= (V56);          base[0]= (V59);
513          vs_top=(vs_base=base+0)+1;          vs_top=(vs_base=base+0)+1;
514          (void) (*Lnk65)(Lclptr65);          (void) (*Lnk65)(Lclptr65);
515          vs_top=sup;          vs_top=sup;
516          V60= vs_base[0];          V63= vs_base[0];
517          {register object x= V59,V58= V60;          {register object x= V62,V61= V63;
518          while(V58!=Cnil)          while(V61!=Cnil)
519          if(eql(x,V58->c.c_car)){          if(eql(x,V61->c.c_car)){
520          {object V61 = V58;          {object V64 = V61;
521          VMR19(V61)}          VMR19(V64)}
522          }else V58=V58->c.c_cdr;          }else V61=V61->c.c_cdr;
523          {object V62 = Cnil;          {object V65 = Cnil;
524          VMR19(V62)}}}          VMR19(V65)}}}
525          base[0]=base[0];          base[0]=base[0];
526          return Cnil;          return Cnil;
527  }  }
# Line 528  static void L20() Line 531  static void L20()
531  {register object *base=vs_base;  {register object *base=vs_base;
532          register object *sup=base+VM20; VC20          register object *sup=base+VM20; VC20
533          vs_check;          vs_check;
534          {register object V63;          {register object V66;
535          object V64;          object V67;
536          V63=(base[0]);          V66=(base[0]);
537          vs_base=vs_base+1;          vs_base=vs_base+1;
538          vs_top[0]=Cnil;          vs_top[0]=Cnil;
539          {object *p=vs_top;          {object *p=vs_top;
540           for(;p>vs_base;p--)p[-1]=MMcons(p[-1],p[0]);}           for(;p>vs_base;p--)p[-1]=MMcons(p[-1],p[0]);}
541          V64=(base[1]);          V67=(base[1]);
542          vs_top=sup;          vs_top=sup;
543          if(((*(LnkLI66))((V63)))!=Cnil){          if(((*(LnkLI66))((V66)))!=Cnil){
544          goto T133;}          goto T133;}
545          base[2]= VV[43];          base[2]= VV[43];
546          base[3]= VV[44];          base[3]= VV[44];
547          base[4]= (V63);          base[4]= (V66);
548          base[5]= VV[45];          base[5]= VV[45];
549          base[6]= VV[46];          base[6]= VV[46];
550          base[7]= VV[47];          base[7]= VV[47];
551          base[8]= VV[48];          base[8]= VV[48];
552          base[9]= VV[49];          base[9]= VV[49];
553          base[10]= make_cons((V63),Cnil);          base[10]= make_cons((V66),Cnil);
554          vs_top=(vs_base=base+2)+9;          vs_top=(vs_base=base+2)+9;
555          (void) (*Lnk67)();          (void) (*Lnk67)();
556          vs_top=sup;          vs_top=sup;
557          goto T133;          goto T133;
558  T133:;  T133:;
559          base[2]=VV[68]->s.s_gfdef;          base[2]=VV[68]->s.s_gfdef;
560          base[3]= (V63);          base[3]= (V66);
561          {object V65;          {object V68;
562          V65= (V64);          V68= (V67);
563           vs_top=base+4;           vs_top=base+4;
564           while(V65!=Cnil)           while(V68!=Cnil)
565           {vs_push((V65)->c.c_car);V65=(V65)->c.c_cdr;}           {vs_push((V68)->c.c_car);V68=(V68)->c.c_cdr;}
566          vs_base=base+3;}          vs_base=base+3;}
567          (void) (*Lnk68)(Lclptr68);          (void) (*Lnk68)(Lclptr68);
568          return;          return;
# Line 577  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 CONDITION2304 */  static void LnkT56(){ call_or_link(VV[56],(void **)(void *)&Lnk56);} /* Defclass CONDITION2309 */
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.7  
changed lines
  Added in v.1.8

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