(define-library (lsp-server document)

(export make-document
        read-document
        document-contents
        document-length
        document-insert
        document-contract
        document-num-lines
        line/char->pos
        string->document)

(import (r7rs)
        (scheme base)
        (scheme file)
        (scheme write)
        (lsp-server private))

(cond-expand
 (guile (import (srfi srfi-13)
                (srfi srfi-28)
                (srfi srfi-69)))
 (else (import (only (chicken port) with-input-from-string)
               (only (chicken base) case-lambda)
               (srfi 28)
               (srfi 69)
               (srfi 130)
               (utf8))))
(include "document.scm"))