/[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.3 by camm, Tue Sep 24 19:01:45 2002 UTC revision 1.4 by camm, Sat Oct 26 16:18:13 2002 UTC
# Line 79  volatile object x0; Line 79  volatile object x0;
79          frs_pop();          frs_pop();
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))
83              FEerror("Too many function call values");
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.3  
changed lines
  Added in v.1.4

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