diff --git a/script/vendorize_deps b/script/vendorize_deps index 27f1aa363..1353079cd 100755 --- a/script/vendorize_deps +++ b/script/vendorize_deps @@ -7,7 +7,7 @@ cd src/main/clojure/cljs DJSON_RELEASE="2.4.0" TRANSIT_RELEASE="1.0.329" -TREADER_RELEASE="1.3.7" +TREADER_RELEASE="1.4.2" rm -rf data.json git clone -b "v$DJSON_RELEASE" --depth 1 git@github.com:clojure/data.json.git diff --git a/src/main/clojure/cljs/vendor/clojure/tools/reader.clj b/src/main/clojure/cljs/vendor/clojure/tools/reader.clj index ca71aeab8..f5f3afd9e 100644 --- a/src/main/clojure/cljs/vendor/clojure/tools/reader.clj +++ b/src/main/clojure/cljs/vendor/clojure/tools/reader.clj @@ -27,6 +27,8 @@ java.util.regex.Pattern (java.util List LinkedList))) +(set! *warn-on-reflection* true) + ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; helpers ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; @@ -759,7 +761,7 @@ (ns-name *ns*) (= \: (first token)) - (some-> token (subs 1) parse-symbol second' symbol resolve-ns ns-name) + (some-> token (subs 1) parse-symbol second' symbol resolve-ns) :else (some-> token parse-symbol second'))] @@ -1022,12 +1024,12 @@ ([] (read+string (source-logging-push-back-reader *in*))) ([stream] (read+string stream true nil)) ([^SourceLoggingPushbackReader stream eof-error? eof-value] - (let [^StringBuilder buf (doto (:buffer @(.source-log-frames stream)) (.setLength 0)) + (let [^StringBuilder buf (doto ^StringBuilder (:buffer @(.source-log-frames stream)) (.setLength 0)) o (log-source stream (read stream eof-error? eof-value)) s (.trim (str buf))] [o s])) ([opts ^SourceLoggingPushbackReader stream] - (let [^StringBuilder buf (doto (:buffer @(.source-log-frames stream)) (.setLength 0)) + (let [^StringBuilder buf (doto ^StringBuilder (:buffer @(.source-log-frames stream)) (.setLength 0)) o (log-source stream (read opts stream)) s (.trim (str buf))] [o s])))