       (update-in [::track/load] (partial remove disabled-load-namespaces))))
 
 (defn refresh* [{:keys [repl-env
+                        analyzer-env
+                        repl-opts
                         source-dirs
                         before
                         after

               (inc n))
        parts))))

(defn compile-ns-exists-check [ns]
  (str/join " && "
            (map (fn [ns-part]
                   (str "typeof " ns-part " !== 'undefined' "
                        "&& " ns-part " !== null "))
                 (ns-parts ns))))

(defn compile-unload-ns [ns]
  (let [ns (comp/munge ns)

    (second symbol-or-list)
    symbol-or-list))

(defn disable-unload! [ns]
  (alter-var-root #'disabled-unload-namespaces conj (maybe-quoted->symbol ns)))

(defn disable-reload! [ns]
  (alter-var-root #'disabled-load-namespaces conj (maybe-quoted->symbol ns)))

(defn clear! []
  (alter-var-root #'refresh-tracker (constantly (track/tracker))))

(defn print-disabled []
  (prn "disabled unload" disabled-unload-namespaces)
