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

Diff of /gcl/lsp/seq.c

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

revision 1.14 by camm, Tue Jul 15 18:03:38 2003 UTC revision 1.15 by camm, Tue Sep 2 20:32:43 2003 UTC
# Line 12  static object LI1(object V2,object V1,ob Line 12  static object LI1(object V2,object V1,ob
12          register object V4;          register object V4;
13          register object V5;          register object V5;
14          object V6;          object V6;
         Vcs[0]=Vcs[0];  
15          va_start(ap,first);          va_start(ap,first);
16          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
17          V3= V2;          V3= V2;
# Line 233  static object LI2(object V18,object firs Line 232  static object LI2(object V18,object firs
232          int narg = VFUN_NARGS; VMB2 VMS2 VMV2          int narg = VFUN_NARGS; VMB2 VMS2 VMV2
233          {object V19;          {object V19;
234          object V20;          object V20;
         Vcs[0]=Vcs[0];  
235          va_start(ap,first);          va_start(ap,first);
236          if(narg <1) too_few_arguments();          if(narg <1) too_few_arguments();
237          V19= V18;          V19= V18;
# Line 317  static object LI3(object V35,object V34, Line 315  static object LI3(object V35,object V34,
315          register object V37;          register object V37;
316          object V38;          object V38;
317          register object V39;          register object V39;
         Vcs[0]=Vcs[0];  
318          va_start(ap,first);          va_start(ap,first);
319          if(narg <3) too_few_arguments();          if(narg <3) too_few_arguments();
320          V36= V35;          V36= V35;
# Line 460  static object LI4(object V62,object V61, Line 457  static object LI4(object V62,object V61,
457          {register object V63;          {register object V63;
458          object V64;          object V64;
459          register object V65;          register object V65;
         Vcs[0]=Vcs[0];  
460          va_start(ap,first);          va_start(ap,first);
461          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
462          V63= V62;          V63= V62;
# Line 559  static object LI5(object V80,object V79, Line 555  static object LI5(object V80,object V79,
555          {register object V81;          {register object V81;
556          object V82;          object V82;
557          register object V83;          register object V83;
         Vcs[0]=Vcs[0];  
558          va_start(ap,first);          va_start(ap,first);
559          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
560          V81= V80;          V81= V80;
# Line 656  static object LI6(object V97,object V96, Line 651  static object LI6(object V97,object V96,
651          {object V98;          {object V98;
652          object V99;          object V99;
653          object V100;          object V100;
         Vcs[0]=Vcs[0];  
654          va_start(ap,first);          va_start(ap,first);
655          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
656          V98= V97;          V98= V97;
# Line 690  static object LI7(object V106,object V10 Line 684  static object LI7(object V106,object V10
684          {object V107;          {object V107;
685          object V108;          object V108;
686          object V109;          object V109;
         Vcs[0]=Vcs[0];  
687          va_start(ap,first);          va_start(ap,first);
688          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
689          V107= V106;          V107= V106;

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

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