/[gcl]/gcl/o/catch.c
ViewVC logotype

Diff of /gcl/o/catch.c

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

revision 1.4 by camm, Sat Oct 26 16:18:13 2002 UTC revision 1.5 by camm, Sun Feb 9 22:35:18 2003 UTC
# Line 80  volatile object x0; Line 80  volatile object x0;
80          lex_env = old_lex;          lex_env = old_lex;
81          {int i = fcall.nvalues;          {int i = fcall.nvalues;
82          if (i+1>=sizeof(fcall.values)/sizeof(*fcall.values))          if (i+1>=sizeof(fcall.values)/sizeof(*fcall.values))
83            FEerror("Too many function call values");            FEerror("Too many function call values",0);
84          while (i > 0)          while (i > 0)
85          { fcall.values[i+1] = fcall.values[i];          { fcall.values[i+1] = fcall.values[i];
86            i--;}            i--;}

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