           (assoc output :cached false)))))
 
 (defn generate-output-for-source
-  [state {:keys [resource-id type] :as src}]
+  [state {:keys [resource-id] :as src}]
   {:pre [(rc/valid-resource? src)]
    :post [(rc/valid-output? %)]}
 

    compile-state

    (let [{:keys [op] :as ast}
          (analyze state compile-state form)

          js
          (with-out-str
            (shadow-emit state ast))]

      ;; bump for every compiled form might be overkill
      (vreset! last-progress-ref (System/currentTimeMillis))

      (-> compile-state
          (update-in [:js] str js)
          (cond->
            (= op :ns)
            (assoc


        :ready-to-compile
        (try
          (maybe-compile-cljs state src)

          (catch Throwable e ;; asserts not covered by Exception
            (log/debug-ex e ::par-compile-ex {:resource-id resource-id})
