From 26fb6390fbc094ce6e39bd0448bff38faa92caab Mon Sep 17 00:00:00 2001
From: Marius Vollmer <mvo@zagadka.de>
Date: Wed, 9 May 2001 20:25:44 +0000
Subject: [PATCH] (scm_i_eval): Copy expression before passing it to SCM_XEVAL.
  The copy operation was removed unintendedly during my change on 2001-03-25.

---
 libguile/eval.c | 1 +
 1 file changed, 1 insertion(+)

diff --git a/libguile/eval.c b/libguile/eval.c
index 67a45a9dd..24f274938 100644
--- a/libguile/eval.c
+++ b/libguile/eval.c
@@ -3918,6 +3918,7 @@ scm_i_eval_x (SCM exp, SCM env)
 SCM 
 scm_i_eval (SCM exp, SCM env)
 {
+  exp = scm_copy_tree (exp);
   return SCM_XEVAL (exp, env);
 }