File tree 2 files changed +4
-3
lines changed
2 files changed +4
-3
lines changed Original file line number Diff line number Diff line change 3523
3523
3524
3524
(defn- do-macroexpand-check
3525
3525
[form mac-var]
3526
- (let [mchk #?(:clj (some-> (find-ns 'clojure.spec.alpha)
3526
+ (when (not (-> @env/*compiler* :options :spec-skip-macros ))
3527
+ (let [mchk #?(:clj (some-> (find-ns 'clojure.spec.alpha)
3527
3528
(ns-resolve 'macroexpand-check))
3528
3529
:cljs (get-macroexpand-check-var ))]
3529
3530
(when (some? mchk)
3530
- (mchk mac-var (next form)))))
3531
+ (mchk mac-var (next form))))))
3531
3532
3532
3533
(defn macroexpand-1*
3533
3534
[env form]
Original file line number Diff line number Diff line change 202
202
:fn-invoke-direct :checked-arrays :closure-module-roots :rewrite-polyfills :use-only-custom-externs
203
203
:watch :watch-error-fn :watch-fn :install-deps :process-shim :rename-prefix :rename-prefix-namespace
204
204
:closure-variable-map-in :closure-property-map-in :closure-variable-map-out :closure-property-map-out
205
- :stable-names :ignore-js-module-exts :opts-cache :aot-cache :elide-strict :fingerprint })
205
+ :stable-names :ignore-js-module-exts :opts-cache :aot-cache :elide-strict :fingerprint :spec-skip-macros })
206
206
207
207
(def string->charset
208
208
{" iso-8859-1" StandardCharsets/ISO_8859_1
You can’t perform that action at this time.
0 commit comments