We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent aa69dea commit 1f95b5eCopy full SHA for 1f95b5e
src/main/clojure/cljs/analyzer.cljc
@@ -3205,9 +3205,12 @@
3205
(defn elide-reader-meta [m]
3206
(dissoc m :file :line :column :end-column :end-line :source))
3207
3208
+(defn elide-analyzer-meta [m]
3209
+ (dissoc m ::analyzed))
3210
+
3211
(defn analyze-wrap-meta [expr]
3212
(let [form (:form expr)
- m (elide-reader-meta (meta form))]
3213
+ m (-> (meta form) elide-reader-meta elide-analyzer-meta)]
3214
(if (some? (seq m))
3215
(let [env (:env expr) ; take on expr's context ourselves
3216
expr (assoc-in expr [:env :context] :expr) ; change expr to :expr
0 commit comments