(define-module foo
  (use foo.bar1)
  (use foo.bar3)
  (export foo-master foo-literals foo-begin1 foo-begin2)
  (include "include/inc1"))
(select-module foo)

(define (foo-master x)
  (list (bar1 x) (bar3 x)))

;; The following tests literal generation
(define (foo-literals)
  (include "literals.scm"))

(begin
  (define (foo-begin1) 'begin1)
  (define (foo-begin2) 'begin2)
  )
