mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-01 01:40:21 +02:00
Code Activity

* Use eval instead of eval-in-module.

Browse source
This commit is contained in:
Dirk Herrmann 2000-12-15 09:53:56 +00:00
parent a261c0e933
commit 3b505adf7d
2 changed files with 6 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
oop/ChangeLog
View file

@ -1,3 +1,8 @@
2000-12-15 Dirk Herrmann <D.Herrmann@tu-bs.de>
* goops/save.scm (load-objects): eval-in-module is deprecated.
Use eval instead.
2000-11-24 Dirk Herrmann <D.Herrmann@tu-bs.de> 2000-11-24 Dirk Herrmann <D.Herrmann@tu-bs.de>
* goops.scm: Don't export removed %logand any more. * goops.scm: Don't export removed %logand any more.

2
oop/goops/save.scm
View file

@ -869,7 +869,7 @@
(let loop ((sexp (read file))) (let loop ((sexp (read file)))
(if (not (eof-object? sexp)) (if (not (eof-object? sexp))
(begin (begin
(eval-in-module sexp m) (eval sexp m)
(loop (read file))))))) (loop (read file)))))))
(module-map (lambda (name var) (module-map (lambda (name var)
(cons name (variable-ref var))) (cons name (variable-ref var)))