/[gcl]/gcl/clcs/clcs_handler.c
ViewVC logotype

Diff of /gcl/clcs/clcs_handler.c

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

revision 1.4 by camm, Tue Jul 15 18:03:36 2003 UTC revision 1.5 by camm, Tue Sep 2 20:32:41 2003 UTC
# Line 161  static object LI8(object V13,object firs Line 161  static object LI8(object V13,object firs
161          bds_check;          bds_check;
162          {object V14;          {object V14;
163          object V15;          object V15;
         Vcs[0]=Vcs[0];  
164          va_start(ap,first);          va_start(ap,first);
165          if(narg <1) too_few_arguments();          if(narg <1) too_few_arguments();
166          V14= V13;          V14= V13;
# Line 355  static object LI11(object V34,object V33 Line 354  static object LI11(object V34,object V33
354          int narg = VFUN_NARGS; VMB11 VMS11 VMV11          int narg = VFUN_NARGS; VMB11 VMS11 VMV11
355          bds_check;          bds_check;
356          {VOL object V35;          {VOL object V35;
         Vcs[0]=Vcs[0];  
357          va_start(ap,first);          va_start(ap,first);
358          if(narg <2) too_few_arguments();          if(narg <2) too_few_arguments();
359          Vcs[0]=MMcons(V34,Cnil);          Vcs[0]=MMcons(V34,Cnil);
# Line 422  static object LI12(object first,...) Line 420  static object LI12(object first,...)
420          bds_check;          bds_check;
421          {VOL object V44;          {VOL object V44;
422          VOL object V45;          VOL object V45;
         Vcs[0]=Vcs[0];  
423          va_start(ap,first);          va_start(ap,first);
424          narg = narg - 0;          narg = narg - 0;
425          if (narg <= 0) goto T115;          if (narg <= 0) goto T115;
# Line 498  static object LI13(object V53,object fir Line 495  static object LI13(object V53,object fir
495          bds_check;          bds_check;
496          {VOL object V54;          {VOL object V54;
497          VOL object V55;          VOL object V55;
         Vcs[0]=Vcs[0];  
498          va_start(ap,first);          va_start(ap,first);
499          if(narg <1) too_few_arguments();          if(narg <1) too_few_arguments();
500          V54= V53;          V54= V53;

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

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