(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