(define-library (json-rpc private)

(export json-rpc-log-file
        json-rpc-log-level
        write-log)

(cond-expand
 ((or chicken guile) (import scheme))
 (else))

(import (scheme base)
        (scheme char)
        (scheme write))

(cond-expand (guile (import (srfi srfi-13)
                            (srfi srfi-28)))
             (gambit (import (srfi 28)))
             (else (import (srfi 13)
                           (srfi 28))))

(include "private.scm"))