guile/guile-core/libguile eval.c

[Marius Vollmer]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Marius Vollmer <address@hidden> 01/05/09 13:25:44

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

Log message:
        (scm_i_eval): Copy expression before passing it to
        SCM_XEVAL.  The copy operation was removed unintendedly during my
        change on 2001-03-25.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/libguile/eval.c.diff?cvsroot=OldCVS&tr1=1.217&tr2=1.218&r1=text&r2=text

Patches:
Index: guile/guile-core/libguile/eval.c
diff -u guile/guile-core/libguile/eval.c:1.217 
guile/guile-core/libguile/eval.c:1.218
--- guile/guile-core/libguile/eval.c:1.217      Fri May  4 14:54:00 2001
+++ guile/guile-core/libguile/eval.c    Wed May  9 13:25:44 2001
@@ -3918,6 +3918,7 @@
 SCM 
 scm_i_eval (SCM exp, SCM env)
 {
+  exp = scm_copy_tree (exp);
   return SCM_XEVAL (exp, env);
 }