(validate-loop-locals analyze)
Returns a pass that validates the loop locals, calling analyze on the loop AST when
a mismatched loop-local is found
Source
(defn validate-loop-locals
"Returns a pass that validates the loop locals, calling analyze on the loop AST when
a mismatched loop-local is found"
{:pass-info {:walk :post :depends #{#'validate} :affects #{#'analyze-host-expr #'infer-tag #'validate} :after #{#'classify-invoke}}}
[analyze]
(fn [ast] (-validate-loop-locals analyze ast)))