json.ss
#lang scheme/base

(require scheme/contract
         (prefix-in json: (planet dherman/json:1/json)))

; Procedures -------------------------------------

; string -> json-serializable
(define read-json json:read)

; Provide statements -----------------------------

(provide (rename-out [json:json? json?]))

(provide/contract
 [read-json (-> input-port? json:json?)])