                                          (conj m var-name)
                                          m))
                                      #{}))]
-          ;; this is sort of ugly, but the compiler env does not store the result of a pass, only the parse
+
           (swap! env/*compiler* assoc-in [::ana/namespaces name :macros] macros)
           (assoc ast :macros macros)
           ))))
 
-(defn infer-macro-require [env {:keys [op requires name] :as ast}]
+(defn infer-macro-require [_ {:keys [op requires name] :as ast}]
   (if (or (not= :ns op)
           (empty? requires))
     ast

            requires)))


(defn infer-macro-use [env {:keys [op uses name] :as ast}]
  (if (or (not= :ns op)
          (empty? uses))
    ast

    ast))


(defn load-macros [_ {:keys [op name] :as ast}]
  (if (or (not= :ns op)
          (not (-> name meta :load-macros)))
    ast
