Class Ast.base_reduce

constraint 'b = < visit_binary_operator_kind : env. 'env -> binary_operator_kind -> 'monoid; visit_builtin_type : env. 'env -> builtin_type -> 'monoid; visit_character_kind : env. 'env -> character_kind -> 'monoid; visit_cxcallingconv : env. 'env -> Clang__bindings.cxcallingconv -> 'monoid; visit_cxlinkagekind : env. 'env -> Clang__bindings.cxlinkagekind -> 'monoid; visit_elaborated_type_keyword : env. 'env -> elaborated_type_keyword -> 'monoid; visit_floating_literal : env. 'env -> floating_literal -> 'monoid; visit_integer_literal : env. 'env -> integer_literal -> 'monoid; visit_open_node : env a qual_type. ('env -> 'a -> 'monoid) -> ('env -> 'qual_type -> 'monoid) -> 'env -> ('a, 'qual_type) open_node -> 'monoid; visit_unary_expr_kind : env. 'env -> unary_expr_kind -> 'monoid; visit_unary_operator_kind : env. 'env -> unary_operator_kind -> 'monoid; .. >
method private list_fold_left : env a. ('env -> 'a -> 'monoid) -> 'env -> 'monoid -> 'a list -> 'monoid
method private virtual plus : 'monoid -> 'monoid -> 'monoid
method private visit_array : env a. ('env -> 'a -> 'monoid) -> 'env -> 'a array -> 'monoid
method visit_binary_operator_kind : env. 'env -> binary_operator_kind -> 'monoid
method private visit_bool : env. 'env -> bool -> 'monoid
method visit_builtin_type : env. 'env -> builtin_type -> 'monoid
method private visit_bytes : env. 'env -> bytes -> 'monoid
method private visit_char : env. 'env -> char -> 'monoid
method visit_character_kind : env. 'env -> character_kind -> 'monoid
method visit_cxcallingconv : env. 'env -> Clang__bindings.cxcallingconv -> 'monoid
method visit_cxlinkagekind : env. 'env -> Clang__bindings.cxlinkagekind -> 'monoid
method visit_elaborated_type_keyword : env. 'env -> elaborated_type_keyword -> 'monoid
method private visit_float : env. 'env -> float -> 'monoid
method visit_floating_literal : env. 'env -> floating_literal -> 'monoid
method private visit_int : env. 'env -> int -> 'monoid
method private visit_int32 : env. 'env -> int32 -> 'monoid
method private visit_int64 : env. 'env -> int64 -> 'monoid
method visit_integer_literal : env. 'env -> integer_literal -> 'monoid
method private visit_lazy_t : env a. ('env -> 'a -> 'monoid) -> 'env -> 'a Lazy.t -> 'monoid
method private visit_list : env a. ('env -> 'a -> 'monoid) -> 'env -> 'a list -> 'monoid
method private visit_nativeint : env. 'env -> nativeint -> 'monoid
method visit_open_node : env a qual_type. ('env -> 'a -> 'monoid) -> ('env -> 'qual_type -> 'monoid) -> 'env -> ('a, 'qual_type) open_node -> 'monoid
method private visit_option : env a. ('env -> 'a -> 'monoid) -> 'env -> 'a option -> 'monoid
method private visit_ref : env a. ('env -> 'a -> 'monoid) -> 'env -> 'a Pervasives.ref -> 'monoid
method private visit_result : env a e. ('env -> 'a -> 'monoid) -> ('env -> 'e -> 'monoid) -> 'env -> ('a, 'e) Result.result -> 'monoid
method private visit_string : env. 'env -> string -> 'monoid
method visit_unary_expr_kind : env. 'env -> unary_expr_kind -> 'monoid
method visit_unary_operator_kind : env. 'env -> unary_operator_kind -> 'monoid
method private visit_unit : env. 'env -> unit -> 'monoid
method private virtual zero : 'monoid