[Chicken-janitors] #843: star export '(module foo * ...)' doesn't work with reexport

[Chicken Trac]

#843: star export '(module foo * ...)' doesn't work with reexport
---------------------+------------------------------------------------------
 Reporter:  megane   |       Owner:       
     Type:  defect   |      Status:  new  
 Priority:  minor    |   Milestone:  4.8.0
Component:  unknown  |     Version:  4.7.x
 Keywords:           |  
---------------------+------------------------------------------------------
 Fails with  4.7.5 (rev e6671cd)

 In the case below you can see that the export of 'bar' is lost when using
 reexport.

 Ticket #219 might be related.

 (module a *
         (import chicken scheme)
         (define foo 1))

 (module b (bar)
         (import chicken scheme)
         (reexport a)
         (define bar 2))

 (module c *
         (import chicken scheme)
         (reexport a) ;; <- oops, bar not exported anymore
         (define bar 2))

 (import (prefix b b/))
 (import (prefix c c/))

 (print b/foo)
 (print c/foo)

 (print b/bar)
 (print c/bar) ;; <- Error: unbound variable: c/bar

-- 
Ticket URL: <http://bugs.call-cc.org/ticket/843>
Chicken Scheme <http://www.call-with-current-continuation.org/>
Chicken Scheme is a compiler for the Scheme programming language.