Ast.match_case_pattern_iterSource constraint 'c match_case_pattern_iter = 'c match_case_pattern_iterinherit VisitorsRuntime.iterinherit ident_iterinherit constructor_iterinherit Utils.Marked.pos_itermethod visit_match_case_pattern : 'd ->
((('e, 'f) Utils.Marked.t option * ('e, 'f) Utils.Marked.t) list
* ('g, 'f) Utils.Marked.t option) ->
unit