Skip to content

Commit e304a8d

Browse files
committed
fixed Blast up to BLAS library errors
1 parent 01c7e5b commit e304a8d

1 file changed

Lines changed: 2 additions & 2 deletions

File tree

src/provisdom/test/core.cljc

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -90,7 +90,7 @@
9090
"Enables instrumentation for `sym-or-syms` while executing `body`. Once `body`
9191
has completed, unstrument will be called."
9292
[sym-or-syms & body]
93-
(let [sym-or-syms (if (= :all sym-or-syms) `:all sym-or-syms)]
93+
(let [sym-or-syms (if (= :all sym-or-syms) `(st/instrumentable-syms) sym-or-syms)]
9494
`(with-instrument* ~[sym-or-syms] ~@body)))
9595

9696
#?(:clj (defn instrumentation
@@ -101,7 +101,7 @@
101101
[{:keys [instrument]}]
102102
(let [syms (cond
103103
(coll? instrument) instrument
104-
(= instrument :all) :all
104+
(= instrument :all) (st/instrumentable-syms)
105105
:else (throw (ex-info "Instrument must be passed a collection of symbols or :all"
106106
{:instrument instrument})))
107107
unstrument-syms (set (filter (complement function-instrumented?) syms))

0 commit comments

Comments
 (0)