/[gcl]/gcl/lsp/info.c
ViewVC logotype

Diff of /gcl/lsp/info.c

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

revision 1.6 by camm, Sat Jul 20 07:10:55 2002 UTC revision 1.7 by camm, Fri Aug 2 22:23:58 2002 UTC
# Line 154  goto T47; Line 154  goto T47;
154  T47:;  T47:;
155          base[6]= (V12);          base[6]= (V12);
156          base[7]= small_fixnum(0);          base[7]= small_fixnum(0);
157          base[8]= make_fixnum(length((V12)));          base[8]= make_fixnum((long)length((V12)));
158          base[9]= base[4];          base[9]= base[4];
159          vs_top=(vs_base=base+6)+4;          vs_top=(vs_base=base+6)+4;
160          (void) (*Lnk91)();          (void) (*Lnk91)();
# Line 201  TTL:; Line 201  TTL:;
201          register long V18;          register long V18;
202          V16= 0;          V16= 0;
203          V17= 0;          V17= 0;
204          V18= length((V14));          V18= (long)length((V14));
205  goto T66;  goto T66;
206  T66:;  T66:;
207          if(!((V15)<(V18))){          if(!((V15)<(V18))){
# Line 213  T69:; Line 213  T69:;
213  goto T68;  goto T68;
214  T68:;  T68:;
215          {unsigned char V19= char_code(aref1((V14),V15));          {unsigned char V19= char_code(aref1((V14),V15));
216          V17= (/* INLINE-ARGS */V19);}          V17= (long)(/* INLINE-ARGS */V19);}
217          V15= (V15)+(1);          V15= (long)(V15)+(1);
218          V17= (V17)-(48);          V17= (long)(V17)-(48);
219          if(!((V17)>=(0))){          if(!((V17)>=(0))){
220          goto T79;}          goto T79;}
221          if(!((V17)<(10))){          if(!((V17)<(10))){
# Line 274  TTL:; Line 274  TTL:;
274          {long V29= fix((VFUN_NARGS=3,(*(LnkLI93))(VV[11],(V27),small_fixnum(0))));          {long V29= fix((VFUN_NARGS=3,(*(LnkLI93))(VV[11],(V27),small_fixnum(0))));
275          if(!((/* INLINE-ARGS */V29)>=(0))){          if(!((/* INLINE-ARGS */V29)>=(0))){
276          goto T91;}}          goto T91;}}
277          V28= (*(LnkLI94))(0);          V28= (long)(*(LnkLI94))(0);
278          V30 = make_fixnum(V28);          V30 = make_fixnum(V28);
279          V24= fix((VFUN_NARGS=3,(*(LnkLI93))(VV[12],(V27),V30)));          V24= fix((VFUN_NARGS=3,(*(LnkLI93))(VV[12],(V27),V30)));
280  goto T99;  goto T99;
# Line 290  T102:; Line 290  T102:;
290          goto T100;          goto T100;
291  goto T101;  goto T101;
292  T101:;  T101:;
293          V28= (*(LnkLI94))(0);          V28= (long)(*(LnkLI94))(0);
294          base[3]= (V27);          base[3]= (V27);
295          base[4]= make_fixnum((*(LnkLI95))(2));          base[4]= make_fixnum((long)(*(LnkLI95))(2));
296          vs_top=(vs_base=base+3)+2;          vs_top=(vs_base=base+3)+2;
297          (void) (*Lnk96)();          (void) (*Lnk96)();
298          vs_top=sup;          vs_top=sup;
# Line 316  T91:; Line 316  T91:;
316          {long V38= fix((VFUN_NARGS=3,(*(LnkLI93))(VV[14],(V27),V37)));          {long V38= fix((VFUN_NARGS=3,(*(LnkLI93))(VV[14],(V27),V37)));
317          if(!((/* INLINE-ARGS */V38)>=(0))){          if(!((/* INLINE-ARGS */V38)>=(0))){
318          goto T115;}}          goto T115;}}
319          V28= (*(LnkLI94))(0);          V28= (long)(*(LnkLI94))(0);
320          V39 = make_fixnum(V28);          V39 = make_fixnum(V28);
321          {long V40= fix((VFUN_NARGS=3,(*(LnkLI93))(VV[15],(V27),V39)));          {long V40= fix((VFUN_NARGS=3,(*(LnkLI93))(VV[15],(V27),V39)));
322          if(!((/* INLINE-ARGS */V40)>=(0))){          if(!((/* INLINE-ARGS */V40)>=(0))){
323          goto T115;}}          goto T115;}}
324          base[3]= (V27);          base[3]= (V27);
325          base[4]= make_fixnum(V28);          base[4]= make_fixnum(V28);
326          base[5]= make_fixnum((*(LnkLI94))(0));          base[5]= make_fixnum((long)(*(LnkLI94))(0));
327          vs_top=(vs_base=base+3)+3;          vs_top=(vs_base=base+3)+3;
328          Lsubseq();          Lsubseq();
329          vs_top=sup;          vs_top=sup;
# Line 365  TTL:; Line 365  TTL:;
365          register object V45;          register object V45;
366          register long V46;          register long V46;
367          V43= 0;          V43= 0;
368          V44= length((V42));          V44= (long)length((V42));
369          V45= Cnil;          V45= Cnil;
370          V46= 0;          V46= 0;
371          {register object V47;          {register object V47;
# Line 391  T141:; Line 391  T141:;
391          goto T146;          goto T146;
392  goto T150;  goto T150;
393  T150:;  T150:;
394          V46= (V46)+(1);          V46= (long)(V46)+(1);
395  goto T146;  goto T146;
396  T146:;  T146:;
397          if(((V47))==Cnil){          if(((V47))==Cnil){
# Line 399  T146:; Line 399  T146:;
399          (void)((VFUN_NARGS=2,(*(LnkLI89))((V45),(V47))));          (void)((VFUN_NARGS=2,(*(LnkLI89))((V45),(V47))));
400  goto T153;  goto T153;
401  T153:;  T153:;
402          V43= (V43)+(1);          V43= (long)(V43)+(1);
403          goto T139;          goto T139;
404  goto T140;  goto T140;
405  T140:;  T140:;
# Line 416  goto T161; Line 416  goto T161;
416  T161:;  T161:;
417          if(!((V46)>(0))){          if(!((V46)>(0))){
418          goto T164;}          goto T164;}
419          V49 = make_fixnum((length((V42)))+(V46));          V49 = make_fixnum((long)((long)length((V42)))+(V46));
420          V47= (VFUN_NARGS=5,(*(LnkLI88))(V49,VV[0],VV[1],VV[2],small_fixnum(0)));          V47= (VFUN_NARGS=5,(*(LnkLI88))(V49,VV[0],VV[1],VV[2],small_fixnum(0)));
421          V43= 0;          V43= 0;
422          goto T136;          goto T136;
# Line 448  static void L6() Line 448  static void L6()
448  goto TTL;  goto TTL;
449  TTL:;  TTL:;
450          base[2]= (V50);          base[2]= (V50);
451          base[3]= make_fixnum((*(LnkLI95))(fix((V51))));          base[3]= make_fixnum((long)(*(LnkLI95))(fix((V51))));
452          base[4]= make_fixnum((*(LnkLI94))(fix((V51))));          base[4]= make_fixnum((long)(*(LnkLI94))(fix((V51))));
453          vs_top=(vs_base=base+2)+3;          vs_top=(vs_base=base+2)+3;
454          Lsubseq();          Lsubseq();
455          return;          return;
# Line 501  T190:; Line 501  T190:;
501          goto T188;          goto T188;
502  goto T189;  goto T189;
503  T189:;  T189:;
504          V54= (*(LnkLI94))(0);          V54= (long)(*(LnkLI94))(0);
505          base[4]= (V53);          base[4]= (V53);
506          base[5]= small_fixnum(1);          base[5]= small_fixnum(1);
507          vs_top=(vs_base=base+4)+2;          vs_top=(vs_base=base+4)+2;
# Line 635  T235:; Line 635  T235:;
635          goto T233;          goto T233;
636  goto T234;  goto T234;
637  T234:;  T234:;
638          V67= make_fixnum((*(LnkLI94))(0));          V67= make_fixnum((long)(*(LnkLI94))(0));
639          base[3]= (V69);          base[3]= (V69);
640          base[4]= small_fixnum(1);          base[4]= small_fixnum(1);
641          vs_top=(vs_base=base+3)+2;          vs_top=(vs_base=base+3)+2;
# Line 712  T250:; Line 712  T250:;
712          if(!((/* INLINE-ARGS */V77)>=(0))){          if(!((/* INLINE-ARGS */V77)>=(0))){
713          goto T259;}}          goto T259;}}
714          base[3]= (V75);          base[3]= (V75);
715          base[4]= make_fixnum((*(LnkLI95))(1));          base[4]= make_fixnum((long)(*(LnkLI95))(1));
716          vs_top=(vs_base=base+3)+2;          vs_top=(vs_base=base+3)+2;
717          (void) (*Lnk96)();          (void) (*Lnk96)();
718          bds_unwind1;          bds_unwind1;
# Line 767  T271:; Line 767  T271:;
767  goto T270;  goto T270;
768  T270:;{object V85;  T270:;{object V85;
769          V85= make_fixnum(V80);          V85= make_fixnum(V80);
770          V80= (*(LnkLI94))(0);          V80= (long)(*(LnkLI94))(0);
771          V86 = make_fixnum(V80);          V86 = make_fixnum(V80);
772          V83= list(2,V85,V86);}          V83= list(2,V85,V86);}
773          if(((V82))==Cnil){          if(((V82))==Cnil){
# Line 1304  T444:; Line 1304  T444:;
1304          goto T442;          goto T442;
1305  goto T443;  goto T443;
1306  T443:;  T443:;
1307          V124= make_fixnum((*(LnkLI94))(0));          V124= make_fixnum((long)(*(LnkLI94))(0));
1308          goto T441;          goto T441;
1309  goto T442;  goto T442;
1310  T442:;  T442:;
# Line 1321  T439:; Line 1321  T439:;
1321          object V132;          object V132;
1322          object V133;          object V133;
1323          object V134;          object V134;
1324          V130= make_fixnum((*(LnkLI95))(0));          V130= make_fixnum((long)(*(LnkLI95))(0));
1325          V131= make_fixnum((*(LnkLI94))(0));          V131= make_fixnum((long)(*(LnkLI94))(0));
1326          base[9]= (V126);          base[9]= (V126);
1327          base[10]= small_fixnum(1);          base[10]= small_fixnum(1);
1328          vs_top=(vs_base=base+9)+2;          vs_top=(vs_base=base+9)+2;
# Line 1332  T439:; Line 1332  T439:;
1332          {long V135= fix((VFUN_NARGS=3,(*(LnkLI93))(VV[54],(V126),(V131))));          {long V135= fix((VFUN_NARGS=3,(*(LnkLI93))(VV[54],(V126),(V131))));
1333          if(!((/* INLINE-ARGS */V135)>=(0))){          if(!((/* INLINE-ARGS */V135)>=(0))){
1334          goto T461;}}          goto T461;}}
1335          V133= make_fixnum((*(LnkLI95))(0));          V133= make_fixnum((long)(*(LnkLI95))(0));
1336          goto T459;          goto T459;
1337  goto T461;  goto T461;
1338  T461:;  T461:;
1339          V133= make_fixnum(length((V126)));          V133= make_fixnum((long)length((V126)));
1340  goto T459;  goto T459;
1341  T459:;  T459:;
1342          V134= listA(7,(V126),(V131),(V133),(V130),(V132),(V125),symbol_value(VV[20]));          V134= listA(7,(V126),(V131),(V133),(V130),(V132),(V125),symbol_value(VV[20]));
# Line 1497  T514:; Line 1497  T514:;
1497          register object V150;          register object V150;
1498          register object V151;          register object V151;
1499          object V152;          object V152;
1500          V149= make_fixnum((*(LnkLI95))(0));          V149= make_fixnum((long)(*(LnkLI95))(0));
1501          V150= make_fixnum((*(LnkLI94))(0));          V150= make_fixnum((long)(*(LnkLI94))(0));
1502          {long V153= fix((VFUN_NARGS=3,(*(LnkLI93))(VV[63],(V145),(V150))));          {long V153= fix((VFUN_NARGS=3,(*(LnkLI93))(VV[63],(V145),(V150))));
1503          if(!((/* INLINE-ARGS */V153)>=(0))){          if(!((/* INLINE-ARGS */V153)>=(0))){
1504          goto T539;}}          goto T539;}}
1505          V151= make_fixnum((*(LnkLI95))(0));          V151= make_fixnum((long)(*(LnkLI95))(0));
1506          goto T537;          goto T537;
1507  goto T539;  goto T539;
1508  T539:;  T539:;
1509          V151= make_fixnum(length((V145)));          V151= make_fixnum((long)length((V145)));
1510  goto T537;  goto T537;
1511  T537:;  T537:;
1512          V152= listA(7,(V145),(V150),(V151),(V149),(V136),(V139),symbol_value(VV[20]));          V152= listA(7,(V145),(V150),(V151),(V149),(V136),(V139),symbol_value(VV[20]));
# Line 1534  T537:; Line 1534  T537:;
1534          goto T542;}}          goto T542;}}
1535  goto T548;  goto T548;
1536  T548:;  T548:;
1537          V156 = make_fixnum((*(LnkLI95))(0));          V156 = make_fixnum((long)(*(LnkLI95))(0));
1538          V141= fix(number_minus(V156,(V150)));          V141= fix(number_minus(V156,(V150)));
1539          bds_unwind1;          bds_unwind1;
1540  goto T542;  goto T542;
# Line 1571  T559:; Line 1571  T559:;
1571          {long V160= fix((VFUN_NARGS=4,(*(LnkLI93))(VV[66],(V145),V159,(V151))));          {long V160= fix((VFUN_NARGS=4,(*(LnkLI93))(VV[66],(V145),V159,(V151))));
1572          if(!((/* INLINE-ARGS */V160)>=(0))){          if(!((/* INLINE-ARGS */V160)>=(0))){
1573          goto T568;}}          goto T568;}}
1574          V158= make_fixnum((*(LnkLI95))(0));          V158= make_fixnum((long)(*(LnkLI95))(0));
1575          goto T566;          goto T566;
1576  goto T568;  goto T568;
1577  T568:;  T568:;
# Line 1828  T659:; Line 1828  T659:;
1828          V181= vs_base[0];          V181= vs_base[0];
1829          V182= car((V179));          V182= car((V179));
1830          V183= number_minus((V176),(V182));          V183= number_minus((V176),(V182));
1831          V184= make_fixnum(length((V181)));          V184= make_fixnum((long)length((V181)));
1832          if(((V178))==Cnil){          if(((V178))==Cnil){
1833          goto T673;}          goto T673;}
1834          V185= number_minus((V178),(V182));          V185= number_minus((V178),(V182));
# Line 1841  T671:; Line 1841  T671:;
1841          {long V186= fix((VFUN_NARGS=4,(*(LnkLI93))((V175),(V181),(V183),V185)));          {long V186= fix((VFUN_NARGS=4,(*(LnkLI93))((V175),(V181),(V183),V185)));
1842          if(!((/* INLINE-ARGS */V186)>=(0))){          if(!((/* INLINE-ARGS */V186)>=(0))){
1843          goto T663;}}          goto T663;}}
1844          V187 = make_fixnum((*(LnkLI95))(0));          V187 = make_fixnum((long)(*(LnkLI95))(0));
1845          base[7]= number_plus((V182),V187);          base[7]= number_plus((V182),V187);
1846          vs_top=(vs_base=base+7)+1;          vs_top=(vs_base=base+7)+1;
1847          return;}          return;}
# Line 1972  goto T717; Line 1972  goto T717;
1972  T717:;  T717:;
1973          if(((V198))==Cnil){          if(((V198))==Cnil){
1974          goto T722;}          goto T722;}
1975          base[3]= make_fixnum(length((V198)));          base[3]= make_fixnum((long)length((V198)));
1976          base[3]=MMcons(base[3],Cnil);          base[3]=MMcons(base[3],Cnil);
1977          {register long V199;          {register long V199;
1978          V199= 0;          V199= 0;
# Line 2037  T766:; Line 2037  T766:;
2037          (void)((*(LnkLI122))());          (void)((*(LnkLI122))());
2038  goto T765;  goto T765;
2039  T765:;  T765:;
2040          V199= (V199)+(1);          V199= (long)(V199)+(1);
2041          V201= cdr((V201));          V201= cdr((V201));
2042          goto T728;          goto T728;
2043  goto T729;  goto T729;
# Line 2046  T729:; Line 2046  T729:;
2046          goto T725;}}}          goto T725;}}}
2047  goto T725;  goto T725;
2048  T725:;  T725:;
2049          if(!((length((V198)))>(1))){          if(!(((long)length((V198)))>(1))){
2050          goto T775;}          goto T775;}
2051          base[4]= Ct;          base[4]= Ct;
2052          base[5]= VV[73];          base[5]= VV[73];
# Line 2062  T773:; Line 2062  T773:;
2062          {object V204;          {object V204;
2063          object V205;          object V205;
2064          register object V206;          register object V206;
2065          if(!((length((V198)))>(1))){          if(!(((long)length((V198)))>(1))){
2066          goto T781;}          goto T781;}
2067          vs_base=vs_top;          vs_base=vs_top;
2068          Lread_line();          Lread_line();
# Line 2165  T822:; Line 2165  T822:;
2165          long V210;          long V210;
2166          V209= 0;          V209= 0;
2167          {object V211;          {object V211;
2168          V211= make_fixnum(length((V198)));{object V212;          V211= make_fixnum((long)length((V198)));{object V212;
2169          V212= (type_of((V211))==t_fixnum?Ct:Cnil);          V212= (type_of((V211))==t_fixnum?Ct:Cnil);
2170          if(V212==Cnil)goto T828;          if(V212==Cnil)goto T828;
2171          goto T827;          goto T827;
# Line 2207  T838:; Line 2207  T838:;
2207          V213= (V214);          V213= (V214);
2208  goto T836;  goto T836;
2209  T836:;  T836:;
2210          V209= (V209)+(1);          V209= (long)(V209)+(1);
2211          goto T831;          goto T831;
2212  goto T832;  goto T832;
2213  T832:;  T832:;
# Line 2414  T909:; Line 2414  T909:;
2414          {register object V232;          {register object V232;
2415          V232= car((V228));          V232= car((V228));
2416          V227= (V232);}          V227= (V232);}
2417          {long V233= (*(LnkLI95))(fix((V227)));          {long V233= (long)(*(LnkLI95))(fix((V227)));
2418          if((/* INLINE-ARGS */V233)>=(0)){          if((/* INLINE-ARGS */V233)>=(0)){
2419          goto T917;}}          goto T917;}}
2420          V231= Cnil;          V231= Cnil;
# Line 2485  T935:; Line 2485  T935:;
2485  }  }
2486  static void LnkT126(){ call_or_link(VV[126],(void **)&Lnk126);} /* DEFAULT-INFO-HOTLIST */  static void LnkT126(){ call_or_link(VV[126],(void **)&Lnk126);} /* DEFAULT-INFO-HOTLIST */
2487  static void LnkT125(){ call_or_link(VV[125],(void **)&Lnk125);} /* USER-HOMEDIR-PATHNAME */  static void LnkT125(){ call_or_link(VV[125],(void **)&Lnk125);} /* USER-HOMEDIR-PATHNAME */
2488  static object  LnkTLI124(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[124],(void **)&LnkLI124,ap);} /* REMOVE-IF */  static object  LnkTLI124(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[124],(void **)&LnkLI124,ap);va_end(ap);return V1;} /* REMOVE-IF */
2489  static void LnkT123(){ call_or_link(VV[123],(void **)&Lnk123);} /* READ-FROM-STRING */  static void LnkT123(){ call_or_link(VV[123],(void **)&Lnk123);} /* READ-FROM-STRING */
2490  static object  LnkTLI122(){return call_proc0(VV[122],(void **)&LnkLI122);} /* TYPE-ERROR */  static object  LnkTLI122(){return call_proc0(VV[122],(void **)&LnkLI122);} /* TYPE-ERROR */
2491  static void LnkT121(){ call_or_link(VV[121],(void **)&Lnk121);} /* OFFER-CHOICES */  static void LnkT121(){ call_or_link(VV[121],(void **)&Lnk121);} /* OFFER-CHOICES */
# Line 2510  static void LnkT103(){ call_or_link(VV[1 Line 2510  static void LnkT103(){ call_or_link(VV[1
2510  static void LnkT102(){ call_or_link(VV[102],(void **)&Lnk102);} /* GET-NODES */  static void LnkT102(){ call_or_link(VV[102],(void **)&Lnk102);} /* GET-NODES */
2511  static void LnkT101(){ call_or_link(VV[101],(void **)&Lnk101);} /* STRING-CONCATENATE */  static void LnkT101(){ call_or_link(VV[101],(void **)&Lnk101);} /* STRING-CONCATENATE */
2512  static void LnkT100(){ call_or_link(VV[100],(void **)&Lnk100);} /* RE-QUOTE-STRING */  static void LnkT100(){ call_or_link(VV[100],(void **)&Lnk100);} /* RE-QUOTE-STRING */
2513  static object  LnkTLI99(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[99],(void **)&LnkLI99,ap);} /* POSITION */  static object  LnkTLI99(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[99],(void **)&LnkLI99,ap);va_end(ap);return V1;} /* POSITION */
2514  static void LnkT98(){ call_or_link(VV[98],(void **)&Lnk98);} /* INFO-ERROR */  static void LnkT98(){ call_or_link(VV[98],(void **)&Lnk98);} /* INFO-ERROR */
2515  static void LnkT97(){ call_or_link(VV[97],(void **)&Lnk97);} /* GET-MATCH */  static void LnkT97(){ call_or_link(VV[97],(void **)&Lnk97);} /* GET-MATCH */
2516  static void LnkT96(){ call_or_link(VV[96],(void **)&Lnk96);} /* ATOI */  static void LnkT96(){ call_or_link(VV[96],(void **)&Lnk96);} /* ATOI */
2517  static long  LnkTLI95(va_alist)va_dcl{va_list ap;va_start(ap);return(long )call_proc(VV[95],(void **)&LnkLI95,4353,ap);} /* MATCH-BEGINNING */  static object  LnkTLI95(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[95],(void **)&LnkLI95,4353,ap);va_end(ap);return V1;} /* MATCH-BEGINNING */
2518  static long  LnkTLI94(va_alist)va_dcl{va_list ap;va_start(ap);return(long )call_proc(VV[94],(void **)&LnkLI94,4353,ap);} /* MATCH-END */  static object  LnkTLI94(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_proc(VV[94],(void **)&LnkLI94,4353,ap);va_end(ap);return V1;} /* MATCH-END */
2519  static object  LnkTLI93(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[93],(void **)&LnkLI93,ap);} /* STRING-MATCH */  static object  LnkTLI93(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[93],(void **)&LnkLI93,ap);va_end(ap);return V1;} /* STRING-MATCH */
2520  static void LnkT92(){ call_or_link(VV[92],(void **)&Lnk92);} /* FILE-TO-STRING */  static void LnkT92(){ call_or_link(VV[92],(void **)&Lnk92);} /* FILE-TO-STRING */
2521  static void LnkT91(){ call_or_link(VV[91],(void **)&Lnk91);} /* FREAD */  static void LnkT91(){ call_or_link(VV[91],(void **)&Lnk91);} /* FREAD */
2522  static void LnkT90(){ call_or_link(VV[90],(void **)&Lnk90);} /* OPEN */  static void LnkT90(){ call_or_link(VV[90],(void **)&Lnk90);} /* OPEN */
2523  static object  LnkTLI89(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[89],(void **)&LnkLI89,ap);} /* VECTOR-PUSH-EXTEND */  static object  LnkTLI89(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[89],(void **)&LnkLI89,ap);va_end(ap);return V1;} /* VECTOR-PUSH-EXTEND */
2524  static object  LnkTLI88(va_alist)va_dcl{va_list ap;va_start(ap);return(object )call_vproc(VV[88],(void **)&LnkLI88,ap);} /* MAKE-ARRAY */  static object  LnkTLI88(va_alist)va_dcl{object V1;va_list ap;va_start(ap);V1=call_vproc(VV[88],(void **)&LnkLI88,ap);va_end(ap);return V1;} /* MAKE-ARRAY */
2525    
2526  #ifdef SYSTEM_SPECIAL_INIT  #ifdef SYSTEM_SPECIAL_INIT
2527  SYSTEM_SPECIAL_INIT  SYSTEM_SPECIAL_INIT

Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7

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