diff options
Diffstat (limited to 'ocamldoc/odoc_ast.mli')
-rw-r--r-- | ocamldoc/odoc_ast.mli | 15 |
1 files changed, 5 insertions, 10 deletions
diff --git a/ocamldoc/odoc_ast.mli b/ocamldoc/odoc_ast.mli index dc5a2a3ff..c3db304ea 100644 --- a/ocamldoc/odoc_ast.mli +++ b/ocamldoc/odoc_ast.mli @@ -30,20 +30,15 @@ module Typedtree_search : @raise Not_found if the module was not found.*) val search_module : tab -> string -> Typedtree.module_expr - (** This function returns the [Types.module_type] associated to the given module type name, + (** This function returns the [Typedtree.module_type] associated to the given module type name, in the given table. @raise Not_found if the module type was not found.*) val search_module_type : tab -> string -> Typedtree.module_type_declaration - (** This function returns the [Types.exception_declaration] associated to the given exception name, + (** This function returns the [Typedtree.type_extension] associated to the given extension name, in the given table. - @raise Not_found if the exception was not found.*) - val search_exception : tab -> string -> Typedtree.constructor_declaration - - (** This function returns the [Path.t] associated to the given exception rebind name, - in the table. - @raise Not_found if the exception rebind was not found.*) - val search_exception_rebind : tab -> string -> Path.t + @raise Not_found if the extension was not found.*) + val search_extension : tab -> string -> Typedtree.type_extension (** This function returns the [Typedtree.type_declaration] associated to the given type name, in the given table. @@ -55,7 +50,7 @@ module Typedtree_search : @raise Not_found if the class was not found. *) val search_class_exp : tab -> string -> (Typedtree.class_expr * (Types.type_expr list)) - (** This function returns the [Types.cltype_declaration] associated to the given class type name, + (** This function returns the [Typedtree.class_type_declaration] associated to the given class type name, in the given table. @raise Not_found if the class type was not found. *) val search_class_type_declaration : tab -> string -> Typedtree.class_type_declaration |