(html (head (title "sph-lib (sph system reader)") (link (@ (rel "icon") (href "data:,"))) (meta (@ (name "viewport") (content "width=device-width,initial-scale=1"))) (link (@ (rel "stylesheet") (type "text/css") (href "/css/sph.css"))) #f) (body () (div (@ (class top)) (nav (a (@ (href "/")) "start") ", " (a (@ (href "/feed.xml")) "feed")) "") (div (@ (class "middle")) (div (@ (class mtime) (title "last modification time of the current page")) "2025-08-29") (section (h1 "(sph system reader)") (div (p "a scheme reader that can include comments. depends on guile-reader") (p "part of " (a (@ (href "../../sph-lib.html")) "sph-lib")) (#f (section (@ (class "library-name")) (h1 "module name") (p "(sph system reader)")) (section (@ (class "library-exports")) (h1 "exported bindings") (div (div (@ (class "doc-bindings")) (div (@ (id "doc-b-" "default-sharp-token-reader-with-comments") (class "doc-b")) (div (span (@ (class "type")) "procedure") ": " (span (@ (class "name")) "default-sharp-token-reader-with-comments") " " (span (@ (class "first-sig")) " ->")) "" "") (div (@ (id "doc-b-" "read-for-formatting") (class "doc-b")) (div (span (@ (class "type")) "procedure") ": " (span (@ (class "name")) "read-for-formatting")) "" "") (div (@ (id "doc-b-" "read-with-comments") (class "doc-b")) (div (span (@ (class "type")) "procedure") ": " (span (@ (class "name")) "read-with-comments")) "" "") (div (@ (id "doc-b-" "sph-read") (class "doc-b")) (div (span (@ (class "type")) "procedure") ": " (span (@ (class "name")) "sph-read")) "" "") (div (@ (id "doc-b-" "sph-read-sharp-token-readers") (class "doc-b")) (div (span (@ (class "type")) "procedure") ": " (span (@ (class "name")) "sph-read-sharp-token-readers") " " (span (@ (class "first-sig")) " ->")) "" "") (div (@ (id "doc-b-" "sph-read-token-readers") (class "doc-b")) (div (span (@ (class "type")) "procedure") ": " (span (@ (class "name")) "sph-read-token-readers") " " (span (@ (class "first-sig")) " ->")) "" "") (div (@ (id "doc-b-" "sph-read-with-upper-case-symbols") (class "doc-b")) (div (span (@ (class "type")) "procedure") ": " (span (@ (class "name")) "sph-read-with-upper-case-symbols")) "" "") (div (@ (id "doc-b-" "sph-system-reader-description") (class "doc-b")) (div (span (@ (class "type")) "variable") ": " (span (@ (class "name")) "sph-system-reader-description")) "" "")))))))) ()))