Ast.match_case_pattern_mapSource constraint 'c match_case_pattern_map = 'c match_case_pattern_mapinherit VisitorsRuntime.mapinherit ident_mapinherit constructor_mapinherit Utils.Marked.pos_mapmethod visit_match_case_pattern : 'd ->
((('e, 'f) Utils.Marked.t option * ('e, 'f) Utils.Marked.t) list
* ('g, 'f) Utils.Marked.t option) ->
(('e, 'f) Utils.Marked.t option * ('e, 'f) Utils.Marked.t) list
* ('g, 'f) Utils.Marked.t option