;; Works
(module
 bar
 *
 (import chicken scheme)
 (define b 2))

(module
 foo
 ()
 (import chicken scheme)
 (import bar)
 (export b)
 (export a)
 (define a 1)
 
 )
(import foo)
(print a)
(print b)

;; Doesn't work
(module
 bar2
 *
 (import chicken scheme)
 (define b2 2))

(module
 foo2
 *
 (import chicken scheme)
 (export b2)
 (import bar2)
 (export a2)
 (define a2 1)
 
 )

(import foo2)
(print a2)
(print b2) ;; <- Error: unbound variable: b2