diff options
author | Alain Frisch <alain@frisch.fr> | 2013-03-01 12:44:04 +0000 |
---|---|---|
committer | Alain Frisch <alain@frisch.fr> | 2013-03-01 12:44:04 +0000 |
commit | c8d3ff52a2d136fba898b54b0ff35b523789fd00 (patch) | |
tree | 9d729b81cbf87940647082433643b41eb050936e /ocamldoc | |
parent | 666d6574d7e0de60a55d2fa872039c49b5a95fa5 (diff) | |
download | ocaml-c8d3ff52a2d136fba898b54b0ff35b523789fd00.tar.gz |
Cleanup + support attributes on type declarations (syntax: type t = ... with (:a1 expr1) (:a2 expr2) ... (:an exprn)).
git-svn-id: http://caml.inria.fr/svn/ocaml/branches/extension_points@13332 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 26edf6d374..38b1c5ff3d 100644 --- a/ocamldoc/odoc_ast.ml +++ b/ocamldoc/odoc_ast.ml @@ -1054,7 +1054,7 @@ module Analyser = Parsetree.Pstr_eval _ -> (* don't care *) (0, env, []) - | Parsetree.Pstr_attribute (_, _, x) -> + | Parsetree.Pstr_attribute (x, _) -> analyse_structure_item env current_module_name loc pos_limit comment_opt x.Parsetree.pstr_desc typedtree table table_values | Parsetree.Pstr_extension _ -> (0, env, []) |