Commenting out the hahn docs
This commit is contained in:
parent
fb1158e90b
commit
c5370d839e
1 changed files with 9 additions and 8 deletions
17
edn-impl.scm
17
edn-impl.scm
|
@ -153,11 +153,12 @@
|
|||
(and (char? x)
|
||||
(fun x))))
|
||||
|
||||
@(heading "Reading EDN")
|
||||
;;@(heading "Reading EDN")
|
||||
|
||||
(define tag-handlers @("An a-list containing the handlers for reader tags. You can register your own reader tags by simply adding a new a-list entry.
|
||||
|
||||
Example for a tag \"#keywordify\": add the entry `(cons keywordify: keywordify-procedure)`.")
|
||||
(define tag-handlers
|
||||
;;@("An a-list containing the handlers for reader tags. You can register your own reader tags by simply adding a new a-list entry.
|
||||
;;
|
||||
;;Example for a tag \"#keywordify\": add the entry `(cons keywordify: keywordify-procedure)`.")
|
||||
(list (cons _: (lambda (input) edn/omit:))))
|
||||
|
||||
(define reader-handlers
|
||||
|
@ -203,7 +204,7 @@ Example for a tag \"#keywordify\": add the entry `(cons keywordify: keywordify-p
|
|||
(cdr result)))))
|
||||
|
||||
(define (read-edn port)
|
||||
@("Reads EDN data from given port, converts it to Chicken data and returns it. Precision suffixes for numbers get ignored, maps get converted to SRFI-69 hashtables, vectors to SRFI-4 vectors.")
|
||||
;; @("Reads EDN data from given port, converts it to Chicken data and returns it. Precision suffixes for numbers get ignored, maps get converted to SRFI-69 hashtables, vectors to SRFI-4 vectors.")
|
||||
(second ((parse-edn '()) port)))
|
||||
|
||||
;; EDN writing
|
||||
|
@ -308,9 +309,9 @@ Example for a tag \"#keywordify\": add the entry `(cons keywordify: keywordify-p
|
|||
writer-handlers))
|
||||
parse-entry in))
|
||||
|
||||
@(heading "Writing EDN")
|
||||
;;@(heading "Writing EDN")
|
||||
|
||||
(define (write-edn port struct)
|
||||
@("Converts Chicken data structures to EDN and writes it to the given port."
|
||||
(struct "A Chicken data structure consisting of atoms, lists, vectors and hashtables."))
|
||||
;; @("Converts Chicken data structures to EDN and writes it to the given port."
|
||||
;; (struct "A Chicken data structure consisting of atoms, lists, vectors and hashtables."))
|
||||
(display (parse-entry struct) port))
|
||||
|
|
Loading…
Reference in a new issue