diff options
| author | Alain Frisch <alain@frisch.fr> | 2013-03-05 12:44:40 +0000 |
|---|---|---|
| committer | Alain Frisch <alain@frisch.fr> | 2013-03-05 12:44:40 +0000 |
| commit | cc70961d4fdd8aa68d8df517b64a42e498d0bc73 (patch) | |
| tree | d03312a18608b4e1cd4d1c0e71096edf54a3aa3f /ocamldoc/odoc_ast.ml | |
| parent | b01b7305bd71e9d9aacb2b1274fbb064f1beee64 (diff) | |
| download | ocaml-cc70961d4fdd8aa68d8df517b64a42e498d0bc73.tar.gz | |
Support item attributes on exn rebind.
git-svn-id: http://caml.inria.fr/svn/ocaml/branches/extension_points@13351 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'ocamldoc/odoc_ast.ml')
| -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 d72ca69e33..3c7acc606a 100644 --- a/ocamldoc/odoc_ast.ml +++ b/ocamldoc/odoc_ast.ml @@ -1264,7 +1264,7 @@ module Analyser = in (0, new_env, [ Element_exception new_ex ]) - | Parsetree.Pstr_exn_rebind (name, _) -> + | Parsetree.Pstr_exn_rebind (name, _, _) -> (* a new exception is defined *) let complete_name = Name.concat current_module_name name.txt in (* we get the exception rebind in the typed tree *) |