diff options
author | Alain Frisch <alain@frisch.fr> | 2013-04-17 09:46:52 +0000 |
---|---|---|
committer | Alain Frisch <alain@frisch.fr> | 2013-04-17 09:46:52 +0000 |
commit | b36ec9f7644410df981d954aae686eaf3f59a590 (patch) | |
tree | ede621009ff1bd6fb99b93b658e49705a0310229 /ocamldoc | |
parent | 501dfd2b5e2425b2b40afe5ce9782503e68f8e22 (diff) | |
download | ocaml-b36ec9f7644410df981d954aae686eaf3f59a590.tar.gz |
Get rid of the 'explicit arity' flag on Pexp_construct/Ppat_construct. If really requires (for camlp5?), the feature should be reimplemented with attributes.
git-svn-id: http://caml.inria.fr/svn/ocaml/branches/extension_points@13549 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'ocamldoc')
-rw-r--r-- | ocamldoc/odoc_ast.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ocamldoc/odoc_ast.ml b/ocamldoc/odoc_ast.ml index bef106f772..4f36b8754c 100644 --- a/ocamldoc/odoc_ast.ml +++ b/ocamldoc/odoc_ast.ml @@ -266,7 +266,7 @@ module Analyser = (List.map iter_pattern patlist, Odoc_env.subst_type env pat.pat_type) - | Typedtree.Tpat_construct (_, cons_desc, _, _) when + | Typedtree.Tpat_construct (_, cons_desc, _) when (* we give a name to the parameter only if it unit *) (match cons_desc.cstr_res.desc with Tconstr (p, _, _) -> |