       (set (concat deps (mapcat ns-that-depend-on-recur deps))))))
 
 (defn ns-that-depend-on-recur [nm]
+  (dev-assert (string? nm))
   (let [cached (get-in @dependency-cache [:full-deps nm])]
     (if (not (nil? cached))
       cached

        (swap! dependency-cache assoc-in [:full-deps nm] res)
        res))))

(prn (ns-that-depend-on-recur* "figwheel.client.utils"))

(defn ancestor [nm nm2]
  (dev-assert (string? nm) (string? nm2))


;;mutual caching recursion
(defn ns-that-depend-on-recur* [nm]
  (dev-assert (string? nm))
  (let [deps (ns-that-depend-on nm)]
    (dev-assert (set? deps))
    (if (empty? deps)
