diff --git a/vendor/parser-extended/ast_mapper.ml b/vendor/parser-extended/ast_mapper.ml index 5d12a04110..1d8f9f30b3 100644 --- a/vendor/parser-extended/ast_mapper.ml +++ b/vendor/parser-extended/ast_mapper.ml @@ -473,7 +473,7 @@ module E = struct match desc with | Pparam_val (lab, def, p) -> Pparam_val - (lab, + (sub.arg_label sub lab, map_opt (sub.expr sub) def, sub.pat sub p) | Pparam_newtype ty ->