guile-cvs
[Top][All Lists]
Advanced

[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);
 }
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]