Re: Bug in environment-module in 1.6.8?

[Neil Jerram]

Daniel Ridge <address@hidden> writes:

> Hello,
>
> environment-module in 1.6.8 and 1.8.1  is defined as:
>
> (define (environment-module env)
>    (let ((closure (and (pair? env) (car (last-pair env)))))
>      (and closure (eval-closure-module closure))))
>
> but eval-closure-module is never defined. If I substitute the old
> definition from guile-1.6.4:
>
> (define (environment-module env)
>    (let ((closure (and (pair? env) (car (last-pair env)))))
>      (and closure (procedure-property closure 'module))))
>
> then things seem to work.
>
> I depend on this function.
>
> Any thoughts?

Yes, thanks for pointing this out.  It seems clear to me from

http://cvs.savannah.gnu.org/viewcvs/guile/guile-core/ice-9/boot-9.scm?root=guile&r1=1.349&r2=1.350

and then

http://cvs.savannah.gnu.org/viewcvs/guile/guile-core/ice-9/boot-9.scm?root=guile&r1=1.350&r2=1.351

that the (eval-closure-module ...) call should have been reverted also
in 1.351, but wasn't by mistake.  So I'm doing this now in all branches.

Regards,
     Neil