add results-atom parameter

frenchy64 · frenchy64 · commit 66bc754c36ca · 2019-06-17T18:06:29.000-04:00
diff --git a/src/main/cljc/clojure/core/typed/runtime_infer.cljc b/src/main/cljc/clojure/core/typed/runtime_infer.cljc
@@ -2734,7 +2734,7 @@
 
 #?(:clj
 (defn infer-anns
-  ([ns {:keys [spec?] :as config}]
+  ([ns {:keys [spec? results-atom] :as config :or {results-atom results-atom}}]
    {:pre [(or (instance? clojure.lang.Namespace ns)
               (symbol? ns))]}
    (binding [*forbidden-aliases* (when spec?
