                          writers #{'$user}}}]
   (let [fact-name (-> fact first str (subs 1))]
     `(defonce ~name
-       (let [sub-chan# (async/chan 1)
-             state# ~store-in]
+       (let [state# ~store-in]
          (reset! state# {})
          ((:sub ~host) ~fact-name
           (fn [ev#]

        pred-name (-> pred-name str (subs 1))]
    `(defonce ~name
       (let [id-map# (atom {})
             sub-chan# (async/chan 1)
             state# ~store-in]
         (reset! ~store-in {})
         ((:sub ~host) ~(str pred-name "!")

(ns axiom-cljs.macros)


(defn ^:private symbols [form]
