From 786b610e5db3c48e145a25f54237a22f48845977 Mon Sep 17 00:00:00 2001 From: Maxence Guesdon Date: Tue, 2 Apr 2002 15:16:31 +0000 Subject: =?UTF-8?q?affichage=20des=20types=20de=20classes,=20ajout=20des?= =?UTF-8?q?=20labels=20pour=20les=20param=C3=A8tres=20(pour=20les=20classe?= =?UTF-8?q?s=20seulement=20pour=20l'instant)?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@4577 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02 --- ocamldoc/odoc_misc.mli | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'ocamldoc/odoc_misc.mli') diff --git a/ocamldoc/odoc_misc.mli b/ocamldoc/odoc_misc.mli index c54481cf66..dd4730b976 100644 --- a/ocamldoc/odoc_misc.mli +++ b/ocamldoc/odoc_misc.mli @@ -88,3 +88,8 @@ val first_sentence_and_rest_of_text : Since the original list is sorted, elements whose name does not begin with a letter should be in the first returned list.*) val create_index_lists : 'a list -> ('a -> string) -> 'a list list + +(** Take a type and remove the option top constructor. This is + useful when printing labels, we we then remove the top option contructor + for optional labels.*) +val remove_option : Types.type_expr -> Types.type_expr -- cgit v1.2.1