/[gcl]/gcl/pcl/pcl_methods.c
ViewVC logotype

Diff of /gcl/pcl/pcl_methods.c

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

revision 1.2 by camm, Tue Jul 15 18:03:38 2003 UTC revision 1.3 by camm, Tue Sep 2 20:32:44 2003 UTC
# Line 89  static object LI4(object V33,object V32, Line 89  static object LI4(object V33,object V32,
89          register object V35;          register object V35;
90          object V36;          object V36;
91          object V37;          object V37;
         Vcs[0]=Vcs[0];  
92          va_start(ap,first);          va_start(ap,first);
93          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
94          V34= V33;          V34= V33;
# Line 2372  static object LI35(object V483,object V4 Line 2371  static object LI35(object V483,object V4
2371          object V486;          object V486;
2372          object V487;          object V487;
2373          object V488;          object V488;
         Vcs[0]=Vcs[0];  
2374          va_start(ap,first);          va_start(ap,first);
2375          if(narg <4) too_few_arguments();          if(narg <4) too_few_arguments();
2376          V484= V483;          V484= V483;
# Line 2431  static object LI36(object V496,object fi Line 2429  static object LI36(object V496,object fi
2429          {register object V497;          {register object V497;
2430          register object V498;          register object V498;
2431          object V499;          object V499;
         Vcs[0]=Vcs[0];  
2432          va_start(ap,first);          va_start(ap,first);
2433          if(narg <1) too_few_arguments();          if(narg <1) too_few_arguments();
2434          V497= V496;          V497= V496;
# Line 2599  static object LI37(object V515,object V5 Line 2596  static object LI37(object V515,object V5
2596          register object V517;          register object V517;
2597          register object V518;          register object V518;
2598          object V519;          object V519;
         Vcs[0]=Vcs[0];  
2599          va_start(ap,first);          va_start(ap,first);
2600          if(narg <3) too_few_arguments();          if(narg <3) too_few_arguments();
2601          V516= V515;          V516= V515;
# Line 3330  static object LI46(object V662,object V6 Line 3326  static object LI46(object V662,object V6
3326          {register object V663;          {register object V663;
3327          register object V664;          register object V664;
3328          object V665;          object V665;
         Vcs[0]=Vcs[0];  
3329          va_start(ap,first);          va_start(ap,first);
3330          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
3331          V663= V662;          V663= V662;
# Line 5748  static object LI95(object V1093,object V Line 5743  static object LI95(object V1093,object V
5743          va_list ap;          va_list ap;
5744          int narg = VFUN_NARGS; VMB86 VMS86 VMV86          int narg = VFUN_NARGS; VMB86 VMS86 VMV86
5745          bds_check;          bds_check;
         Vcs[0]=Vcs[0];  
5746          va_start(ap,first);          va_start(ap,first);
5747          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
5748          Vcs[0]=MMcons(V1093,Cnil);          Vcs[0]=MMcons(V1093,Cnil);
# Line 6475  static object LI111(object V1209,object Line 6469  static object LI111(object V1209,object
6469          va_list ap;          va_list ap;
6470          int narg = VFUN_NARGS; VMB98 VMS98 VMV98          int narg = VFUN_NARGS; VMB98 VMS98 VMV98
6471          {object V1210;          {object V1210;
         Vcs[0]=Vcs[0];  
6472          va_start(ap,first);          va_start(ap,first);
6473          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
6474          Vcs[0]=MMcons(V1209,Cnil);          Vcs[0]=MMcons(V1209,Cnil);

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

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