Skip to content

Commit 821d46c

Browse files
author
dnolen
committed
lazy loading of transit reader/writer factory fns
1 parent 513ee3a commit 821d46c

File tree

1 file changed

+26
-2
lines changed

1 file changed

+26
-2
lines changed

src/main/clojure/cljs/analyzer.cljc

Lines changed: 26 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -2817,6 +2817,30 @@
28172817
version (util/clojurescript-version)]
28182818
(and version (not= version version'))))))))))
28192819

2820+
#?(:clj
2821+
(def transit-writer
2822+
(delay
2823+
(try
2824+
(require '[cognitect.transit])
2825+
(some->
2826+
(find-ns 'cognitect.transit)
2827+
(ns-resolve 'writer)
2828+
deref)
2829+
(catch Throwable t
2830+
nil)))))
2831+
2832+
#?(:clj
2833+
(def transit-reader
2834+
(delay
2835+
(try
2836+
(require '[cognitect.transit])
2837+
(some->
2838+
(find-ns 'cognitect.transit)
2839+
(ns-resolve 'reader)
2840+
deref)
2841+
(catch Throwable t
2842+
nil)))))
2843+
28202844
#?(:clj
28212845
(defn write-analysis-cache
28222846
([ns cache-file]
@@ -2827,8 +2851,8 @@
28272851
(str ";; Analyzed by ClojureScript " (util/clojurescript-version) "\n"
28282852
(pr-str
28292853
(dissoc (get-in @env/*compiler* [::namespaces ns]) :macros))))
2830-
(when src
2831-
(.setLastModified ^File cache-file (util/last-modified src))))))
2854+
(when src
2855+
(.setLastModified ^File cache-file (util/last-modified src))))))
28322856

28332857
#?(:clj
28342858
(defn analyze-file

0 commit comments

Comments
 (0)