[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
guile/guile-core/libguile ChangeLog eval.c
From: |
Dirk Herrmann |
Subject: |
guile/guile-core/libguile ChangeLog eval.c |
Date: |
Thu, 21 Dec 2000 09:51:55 -0800 |
CVSROOT: /cvs
Module name: guile
Changes by: Dirk Herrmann <address@hidden> 00/12/21 09:51:55
Modified files:
guile-core/libguile: ChangeLog eval.c
Log message:
* Make sure, re-entering the dynamic scope of an eval statement will
restore the latest selected module.
CVSWeb URLs:
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-core/libguile/ChangeLog.diff?r1=1.1215&r2=1.1216
http://subversions.gnu.org/cgi-bin/cvsweb/guile/guile-core/libguile/eval.c.diff?r1=1.186&r2=1.187
Patches:
Index: guile/guile-core/libguile/ChangeLog
diff -u guile/guile-core/libguile/ChangeLog:1.1215
guile/guile-core/libguile/ChangeLog:1.1216
--- guile/guile-core/libguile/ChangeLog:1.1215 Thu Dec 21 09:07:37 2000
+++ guile/guile-core/libguile/ChangeLog Thu Dec 21 09:51:55 2000
@@ -1,5 +1,11 @@
2000-12-21 Dirk Herrmann <address@hidden>
+ * eval.c (restore_environment): Make sure that changes to the
+ current environment will take effect when re-entering the dynamic
+ scope.
+
+2000-12-21 Dirk Herrmann <address@hidden>
+
* goops.h (SCM_PUREGENERICP): Include the SCM_STRUCTP test.
* goops.c (scm_sys_invalidate_method_cache_x, scm_m_atdispatch,
Index: guile/guile-core/libguile/eval.c
diff -u guile/guile-core/libguile/eval.c:1.186
guile/guile-core/libguile/eval.c:1.187
--- guile/guile-core/libguile/eval.c:1.186 Fri Dec 15 06:00:18 2000
+++ guile/guile-core/libguile/eval.c Thu Dec 21 09:51:55 2000
@@ -3836,6 +3836,8 @@
{
SCM pair = SCM_PACK (data);
SCM old_module = SCM_CDR (pair);
+ SCM new_module = scm_selected_module ();
+ SCM_SETCAR (pair, new_module);
scm_select_module (old_module);
}