diff options
Diffstat (limited to 'ocamldoc/odoc_sig.ml')
| -rw-r--r-- | ocamldoc/odoc_sig.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ocamldoc/odoc_sig.ml b/ocamldoc/odoc_sig.ml index 9f9396f682..7f61e6ec54 100644 --- a/ocamldoc/odoc_sig.ml +++ b/ocamldoc/odoc_sig.ml @@ -863,7 +863,7 @@ module Analyser = (maybe_more + maybe_more2, new_env, [ Element_type_extension new_te ]) | Parsetree.Psig_exception ext -> - let name = ext.Parsetree.pext_name in + let name = ext.Parsetree.ptyexn_constructor.Parsetree.pext_name in let types_ext = try Signature_search.search_extension table name.txt with Not_found -> |