bug-guile
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Strange undefined binding bug coupled to module system


From: Mikael Djurfeldt
Subject: Re: Strange undefined binding bug coupled to module system
Date: Wed, 22 Dec 2004 21:29:53 +0100

On Wed, 22 Dec 2004 16:35:18 +0100, Marius Vollmer
<address@hidden> 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




reply via email to

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