File tree Expand file tree Collapse file tree 1 file changed +7
-4
lines changed Expand file tree Collapse file tree 1 file changed +7
-4
lines changed Original file line number Diff line number Diff line change 18051805
18061806(defn check-use-macros-inferring-missing
18071807 [{:keys [name uses use-macros] :as ast} env]
1808- (let [missing-uses (when (and *analyze-deps* (seq uses))
1809- (missing-uses uses env))
1808+ (let [missing-uses (when (and *analyze-deps* (seq uses))
1809+ (missing-uses uses env))
1810+ maybe-macros (apply dissoc uses (keys missing-uses))
18101811 remove-missing-uses #(apply dissoc % (keys missing-uses))
18111812 ast' (-> ast
1812- (update-in [:use-macros ] merge
1813- (check-use-macros use-macros missing-uses env))
1813+ (update-in [:use-macros ]
1814+ #(-> %
1815+ (merge (check-use-macros use-macros missing-uses env))
1816+ (merge (inferred-use-macros maybe-macros env))))
18141817 (update-in [:uses ] remove-missing-uses))]
18151818 (swap! env/*compiler*
18161819 #(-> %
You can’t perform that action at this time.
0 commit comments