;;;; format-synch.scm
;;;; Kon Lovett, Jan '18

(module format-synch

(;export
  format)

(import scheme
  (rename (chicken format) (format original-format))
  (only synch synchronized-procedure))

(define format (synchronized-procedure original-format))

) ;format-synch