Module Self_ast_core

val all_expression_mapper : 'a list
val all_module : init:Ast_core.module_ -> Ast_core.module_
val all_expression : raise:( 'a, 'b ) Simple_utils.Trace.raise -> Ast_core.expression -> Ast_core.expression
val fold_map_expression : ( 'a -> Ast_core.expression -> bool * 'a * Ast_core.expression ) -> 'a -> Ast_core.expression -> 'a * Ast_core.expression