guile/guile-core/libguile eval.c

[Marius Vollmer]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Marius Vollmer <address@hidden> 01/02/12 17:09:00

Modified files:
        guile-core/libguile: eval.c 

Log message:
        * eval.c (scm_ceval, scm_deval): use `SIDEVAL' instead of
        SCM_CEVAL when evaluating subforms of `begin' forms.  SCM_CEVAL
        can not deal with immediates.

CVSWeb URLs:
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-core/libguile/eval.c.diff?r1=1.195&r2=1.196

Patches:
Index: guile/guile-core/libguile/eval.c
diff -u guile/guile-core/libguile/eval.c:1.195 
guile/guile-core/libguile/eval.c:1.196
--- guile/guile-core/libguile/eval.c:1.195      Sun Feb 11 10:13:07 2001
+++ guile/guile-core/libguile/eval.c    Mon Feb 12 17:09:00 2001
@@ -1912,7 +1912,7 @@
          while (SCM_NNULLP (t.arg1 = SCM_CDR (t.arg1)))
            {
              SCM_SETCAR (env, scm_current_module_lookup_closure ());
-             SCM_CEVAL (SCM_CAR (x), env);
+             SIDEVAL (SCM_CAR(x), env);
              x = t.arg1;
            }
          /* once more, for the last form */