On Wed, 22 Dec 2004 16:35:18 +0100, Marius Vollmer <[EMAIL PROTECTED]> wrote: > I have changed module-make-local-var! a bit: > > (define (module-make-local-var! m v) > [...] > (let ((imported-var (module-variable m v)) > (local-var (or (and (module-binder m) > ((module-binder m) m v #t)) > (begin > (let ((answer (make-undefined-variable))) > (module-add! m v answer) > answer))))) > [...] > > That should do it, or?
Well, unfortunately I don't have time to update myself on the module system code well enough to know, but it seems OK. It's a relief that it was much simpler to fix than I anticipated. M _______________________________________________ Bug-guile mailing list Bug-guile@gnu.org http://lists.gnu.org/mailman/listinfo/bug-guile