libtest.scm

(define-library (test 1)
  (import (scheme base))
  
  (define (hoge)
    (list 'hoge))

  (define-syntax fuga
    (syntax-rules ()
      ((_)
       (hoge))))
  
  (export hoge fuga))

(define-library (test 2)
  (import (test 1))
  (export (rename hoge foo)
	  fuga))

(import (test 2))
(fuga)