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

(module format-synch

(;export
  format)

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

(define format (synchonized-procedure original-format))

) ;format-synch