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

Diff of /gcl/lsp/arraylib.c

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

revision 1.13 by camm, Tue Jul 15 18:03:37 2003 UTC revision 1.14 by camm, Tue Sep 2 20:32:43 2003 UTC
# Line 153  static object LI3(object V18,object firs Line 153  static object LI3(object V18,object firs
153          object V26;          object V26;
154          object V27;          object V27;
155          object V28;          object V28;
         Vcs[0]=Vcs[0];  
156          va_start(ap,first);          va_start(ap,first);
157          if(narg <1) too_few_arguments();          if(narg <1) too_few_arguments();
158          V19= V18;          V19= V18;
# Line 343  static object LI6(object first,...) Line 342  static object LI6(object first,...)
342          va_list ap;          va_list ap;
343          int narg = VFUN_NARGS; VMB6 VMS6 VMV6          int narg = VFUN_NARGS; VMB6 VMS6 VMV6
344          {object V53;          {object V53;
         Vcs[0]=Vcs[0];  
345          va_start(ap,first);          va_start(ap,first);
346          narg= narg - 0;          narg= narg - 0;
347          V54 = (ALLOCA_CONS(narg),ON_STACK_LIST_VECTOR_NEW(narg,first,ap));          V54 = (ALLOCA_CONS(narg),ON_STACK_LIST_VECTOR_NEW(narg,first,ap));
# Line 401  static object LI8(object V64,object firs Line 399  static object LI8(object V64,object firs
399          int narg = VFUN_NARGS; VMB8 VMS8 VMV8          int narg = VFUN_NARGS; VMB8 VMS8 VMV8
400          {register object V65;          {register object V65;
401          object V66;          object V66;
         Vcs[0]=Vcs[0];  
402          va_start(ap,first);          va_start(ap,first);
403          if(narg <1) too_few_arguments();          if(narg <1) too_few_arguments();
404          V65= V64;          V65= V64;
# Line 469  static object LI9(object V76,object firs Line 466  static object LI9(object V76,object firs
466          int narg = VFUN_NARGS; VMB9 VMS9 VMV9          int narg = VFUN_NARGS; VMB9 VMS9 VMV9
467          {register object V77;          {register object V77;
468          object V78;          object V78;
         Vcs[0]=Vcs[0];  
469          va_start(ap,first);          va_start(ap,first);
470          if(narg <1) too_few_arguments();          if(narg <1) too_few_arguments();
471          V77= V76;          V77= V76;
# Line 515  static object LI10(object V87,object fir Line 511  static object LI10(object V87,object fir
511          int narg = VFUN_NARGS; VMB10 VMS10 VMV10          int narg = VFUN_NARGS; VMB10 VMS10 VMV10
512          {object V88;          {object V88;
513          object V89;          object V89;
         Vcs[0]=Vcs[0];  
514          va_start(ap,first);          va_start(ap,first);
515          if(narg <1) too_few_arguments();          if(narg <1) too_few_arguments();
516          V88= V87;          V88= V87;
# Line 545  static object LI11(object V93,object fir Line 540  static object LI11(object V93,object fir
540          int narg = VFUN_NARGS; VMB11 VMS11 VMV11          int narg = VFUN_NARGS; VMB11 VMS11 VMV11
541          {object V94;          {object V94;
542          object V95;          object V95;
         Vcs[0]=Vcs[0];  
543          va_start(ap,first);          va_start(ap,first);
544          if(narg <1) too_few_arguments();          if(narg <1) too_few_arguments();
545          V94= V93;          V94= V93;
# Line 576  static object LI12(object V100,object V9 Line 570  static object LI12(object V100,object V9
570          {object V101;          {object V101;
571          object V102;          object V102;
572          object V103;          object V103;
         Vcs[0]=Vcs[0];  
573          va_start(ap,first);          va_start(ap,first);
574          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
575          V101= V100;          V101= V100;
# Line 613  static object LI13(object V106,object V1 Line 606  static object LI13(object V106,object V1
606          {object V107;          {object V107;
607          object V108;          object V108;
608          object V109;          object V109;
         Vcs[0]=Vcs[0];  
609          va_start(ap,first);          va_start(ap,first);
610          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
611          V107= V106;          V107= V106;
# Line 650  static object LI14(object V112,object V1 Line 642  static object LI14(object V112,object V1
642          {object V113;          {object V113;
643          object V114;          object V114;
644          object V115;          object V115;
         Vcs[0]=Vcs[0];  
645          va_start(ap,first);          va_start(ap,first);
646          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
647          V113= V112;          V113= V112;
# Line 687  static object LI15(object V118,object V1 Line 678  static object LI15(object V118,object V1
678          {object V119;          {object V119;
679          object V120;          object V120;
680          object V121;          object V121;
         Vcs[0]=Vcs[0];  
681          va_start(ap,first);          va_start(ap,first);
682          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
683          V119= V118;          V119= V118;
# Line 724  static object LI16(object V124,object V1 Line 714  static object LI16(object V124,object V1
714          {object V125;          {object V125;
715          object V126;          object V126;
716          object V127;          object V127;
         Vcs[0]=Vcs[0];  
717          va_start(ap,first);          va_start(ap,first);
718          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
719          V125= V124;          V125= V124;
# Line 761  static object LI17(object V130,object V1 Line 750  static object LI17(object V130,object V1
750          {object V131;          {object V131;
751          object V132;          object V132;
752          object V133;          object V133;
         Vcs[0]=Vcs[0];  
753          va_start(ap,first);          va_start(ap,first);
754          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
755          V131= V130;          V131= V130;
# Line 798  static object LI18(object V136,object V1 Line 786  static object LI18(object V136,object V1
786          {object V137;          {object V137;
787          object V138;          object V138;
788          object V139;          object V139;
         Vcs[0]=Vcs[0];  
789          va_start(ap,first);          va_start(ap,first);
790          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
791          V137= V136;          V137= V136;
# Line 835  static object LI19(object V142,object V1 Line 822  static object LI19(object V142,object V1
822          {object V143;          {object V143;
823          object V144;          object V144;
824          object V145;          object V145;
         Vcs[0]=Vcs[0];  
825          va_start(ap,first);          va_start(ap,first);
826          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
827          V143= V142;          V143= V142;
# Line 872  static object LI20(object V148,object V1 Line 858  static object LI20(object V148,object V1
858          {object V149;          {object V149;
859          object V150;          object V150;
860          object V151;          object V151;
         Vcs[0]=Vcs[0];  
861          va_start(ap,first);          va_start(ap,first);
862          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
863          V149= V148;          V149= V148;
# Line 909  static object LI21(object V154,object V1 Line 894  static object LI21(object V154,object V1
894          {object V155;          {object V155;
895          object V156;          object V156;
896          object V157;          object V157;
         Vcs[0]=Vcs[0];  
897          va_start(ap,first);          va_start(ap,first);
898          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
899          V155= V154;          V155= V154;
# Line 945  static object LI22(object V159,object fi Line 929  static object LI22(object V159,object fi
929          int narg = VFUN_NARGS; VMB22 VMS22 VMV22          int narg = VFUN_NARGS; VMB22 VMS22 VMV22
930          {object V160;          {object V160;
931          object V161;          object V161;
         Vcs[0]=Vcs[0];  
932          va_start(ap,first);          va_start(ap,first);
933          if(narg <1) too_few_arguments();          if(narg <1) too_few_arguments();
934          V160= V159;          V160= V159;
# Line 1018  static object LI24(object V172,object V1 Line 1001  static object LI24(object V172,object V1
1001          {object V173;          {object V173;
1002          register object V174;          register object V174;
1003          object V175;          object V175;
         Vcs[0]=Vcs[0];  
1004          va_start(ap,first);          va_start(ap,first);
1005          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
1006          V173= V172;          V173= V172;
# Line 1156  static object LI26(object V192,object V1 Line 1138  static object LI26(object V192,object V1
1138          object V200;          object V200;
1139          object V201;          object V201;
1140          object V202;          object V202;
         Vcs[0]=Vcs[0];  
1141          va_start(ap,first);          va_start(ap,first);
1142          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
1143          V193= V192;          V193= V192;

Legend:
Removed from v.1.13  
changed lines
  Added in v.1.14

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