aboutsummaryrefslogtreecommitdiff
path: root/doc
diff options
context:
space:
mode:
authorArun Isaac2022-04-08 23:52:55 +0530
committerArun Isaac2022-04-08 23:52:55 +0530
commit2143f500fe9b9a99c42a75a5915870590d6395f0 (patch)
tree195d53caca090513671ae6f9a7eb60ef2317bf8d /doc
parentb308de7b6b1b9dea9371b3e03e0fd4766f681539 (diff)
downloadguix-forge-2143f500fe9b9a99c42a75a5915870590d6395f0.tar.gz
guix-forge-2143f500fe9b9a99c42a75a5915870590d6395f0.tar.lz
guix-forge-2143f500fe9b9a99c42a75a5915870590d6395f0.zip
doc: Create dummy G-expression reader.
* doc/skribilo.scm: Extend the reader with a dummy G-expression reader.
Diffstat (limited to 'doc')
-rw-r--r--doc/skribilo.scm4
1 files changed, 4 insertions, 0 deletions
diff --git a/doc/skribilo.scm b/doc/skribilo.scm
index 361bebe..1025db4 100644
--- a/doc/skribilo.scm
+++ b/doc/skribilo.scm
@@ -65,6 +65,10 @@
,@(the-options opts #:ident #:class #:short #:long)))
(body (the-body opts))))
+;; Create a dummy G-expression reader to avoid reader errors when
+;; reading source files for source-ref, record-documentation, etc.
+(read-hash-extend #\~ (const #t))
+
;; S-exp source links
(define (source-uri file start-line end-line)
"Return a URI referring to source FILE from START-LINE to END-LINE."