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