;;;; coerce.scm
;;;; Kon Lovett, Sep '09

(module coerce (;export
  ;; Original
  coerce
  type-of
  ;; Coerce Extensions
  (case-coerce *make-case-coerce)
  case-coerce
  coerce-all
  ;; Type Domain Extension
  coerce-extended?
  coerce-extend!
  coerce-extension
  coerce-composite-extension!
  coerce-extension-remove!
  ;;
  type-of-extended?
  type-of-extend!
  type-of-extension
  type-of-composite-extension!
  type-of-remove!)

  (import scheme chicken type-coerce type-of)

  (require-library type-coerce type-of)

) ;module coerce