Class Ast.match_case_pattern_mapSource

inherit path_map
inherit lident_map
inherit uident_map
method 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) -> (('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