File tree 1 file changed +11
-8
lines changed
1 file changed +11
-8
lines changed Original file line number Diff line number Diff line change 9
9
(ns cljs.spec.test
10
10
(:require-macros [cljs.spec.test :as m :refer [with-instrument-disabled]])
11
11
(:require
12
+ [goog.object :as gobj]
12
13
[goog.userAgent.product :as product]
13
14
[clojure.string :as string]
14
15
[cljs.stacktrace :as st]
103
104
(str " Call to " v " did not conform to spec:\n " (with-out-str (s/explain-out ed)))
104
105
ed)))
105
106
conformed)))]
106
- (fn
107
- [& args]
108
- (if *instrument-enabled*
109
- (with-instrument-disabled
110
- (when (:args fn-spec) (conform! v :args (:args fn-spec) args args))
111
- (binding [*instrument-enabled* true ]
112
- (apply f args)))
113
- (apply f args)))))
107
+ (doto
108
+ (fn
109
+ [& args]
110
+ (if *instrument-enabled*
111
+ (with-instrument-disabled
112
+ (when (:args fn-spec) (conform! v :args (:args fn-spec) args args))
113
+ (binding [*instrument-enabled* true ]
114
+ (apply f args)))
115
+ (apply f args)))
116
+ (gobj/extend f))))
114
117
115
118
(defn- no-fspec
116
119
[v spec]
You can’t perform that action at this time.
0 commit comments