Module `Desugaring.Remove_variable_shadowing`

type var_name_map = (Ast.Ast_types.Var_name.t * Ast.Ast_types.Var_name.t) list

val remove_var_shadowing_program : Desugared_ast.program -> Desugared_ast.program Core.Or_error.t
val remove_var_shadowing_expr : Desugared_ast.expr -> var_name_map -> (Desugared_ast.expr * var_name_map) Core.Or_error.t