cljs.reader/read-number

functionremoved v1.9.854added v0.0-927Edit
(read-number reader initch)

Source code @ clojurescript:src/main/cljs/cljs/reader.cljs
(defn read-number
  [reader initch]
  (loop [buffer (gstring/StringBuffer. initch)
         ch (read-char reader)]
    (if (or (nil? ch) (whitespace? ch) (macros ch))
      (do
        (unread reader ch)
        (let [s (.toString buffer)]
          (or (match-number s)
              (reader-error reader "Invalid number format [" s "]"))))
      (recur (do (.append buffer ch) buffer) (read-char reader)))))