function | removed v1.9.854 | added v0.0-927 | Edit |
(dispatch-macros s)
(defn dispatch-macros [s]
(cond
(identical? s "{") read-set
(identical? s "<") (throwing-reader "Unreadable form")
(identical? s "\"") read-regex
(identical? s"!") read-comment
(identical? s "_") read-discard
:else nil))