diff --git a/src/plugins/eva/ast/eva_ast_visitor.ml b/src/plugins/eva/ast/eva_ast_visitor.ml index b73b3eafedda9da37a63c39c971b7b0053054ed3..e79b701c0ae90f77564702b86df360e55bebe7e9 100644 --- a/src/plugins/eva/ast/eva_ast_visitor.ml +++ b/src/plugins/eva/ast/eva_ast_visitor.ml @@ -178,8 +178,8 @@ struct fold_offset; } - let visit_exp ~neutral ~combine rewriter = - let visitor = bind ~neutral ~combine rewriter in visitor.exp - let visit_lval ~neutral ~combine rewriter = - let visitor = bind ~neutral ~combine rewriter in visitor.lval + let visit_exp ~neutral ~combine folder = + let visitor = bind ~neutral ~combine folder in visitor.exp + let visit_lval ~neutral ~combine folder = + let visitor = bind ~neutral ~combine folder in visitor.lval end