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

Diff of /gcl/o/eval.c

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

revision 1.21 by camm, Wed Jun 22 01:37:26 2005 UTC revision 1.22 by camm, Fri Jul 8 06:11:36 2005 UTC
# Line 1077  EVAL_ARGS: Line 1077  EVAL_ARGS:
1077          form = form->c.c_cdr;          form = form->c.c_cdr;
1078          base = vs_top;          base = vs_top;
1079          top = vs_top;          top = vs_top;
1080          while(!endp(form)) {          while(!endp_prop(form)) {
1081                  eval(MMcar(form));                  eval(MMcar(form));
1082                  top[0] = vs_base[0];                  top[0] = vs_base[0];
1083                  vs_top = ++top;                  vs_top = ++top;

Legend:
Removed from v.1.21  
changed lines
  Added in v.1.22

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