bar.scm

(define-module (bar)
  #:use-module (foo)
  #:export (bar))
 
(define (bar) (make-foo 0))

foo.scm

(define-module (foo)
  #:use-module (bar)
  #:use-module (srfi srfi-9)
  #:export (make-foo))
 
(define-record-type <foo>
  (make-foo x)
  foo?
  (x foo-x))

test.scm

(add-to-load-path (dirname (current-filename)))
 
(use-modules (foo))
(use-modules (bar))
 
(define b (bar))  ;; ERROR: Wrong type to apply: #<syntax-transformer make-foo>