diff options
| author | Maxence Guesdon <maxence.guesdon@inria.fr> | 2004-03-05 14:57:52 +0000 |
|---|---|---|
| committer | Maxence Guesdon <maxence.guesdon@inria.fr> | 2004-03-05 14:57:52 +0000 |
| commit | 7bcb6b984f2e2f18a495b8a1d076b0c3234bb937 (patch) | |
| tree | 8e3f71b6d8315ba8fb423ce7d294a6dd47cecc3a /ocamldoc/odoc_print.mli | |
| parent | acdf61dad7415921dae81ae59176519a77e972f6 (diff) | |
| download | ocaml-7bcb6b984f2e2f18a495b8a1d076b0c3234bb937.tar.gz | |
new module odoc_print, will work when Format.pp_print_flush is fixed
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@6135 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'ocamldoc/odoc_print.mli')
| -rw-r--r-- | ocamldoc/odoc_print.mli | 31 |
1 files changed, 31 insertions, 0 deletions
diff --git a/ocamldoc/odoc_print.mli b/ocamldoc/odoc_print.mli new file mode 100644 index 0000000000..0e7cc2f9d8 --- /dev/null +++ b/ocamldoc/odoc_print.mli @@ -0,0 +1,31 @@ +(***********************************************************************) +(* OCamldoc *) +(* *) +(* Maxence Guesdon, projet Cristal, INRIA Rocquencourt *) +(* *) +(* Copyright 2001 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed *) +(* under the terms of the Q Public License version 1.0. *) +(* *) +(***********************************************************************) + +(* $Id$ *) + +(** Printing functions. *) + +(** This function takes a Types.type_expr and returns a string. + It writes in and flushes [Format.str_formatter].*) +val string_of_type_expr : Types.type_expr -> string + +(** This function returns a string representing a [Types.module_type]. + @param complete indicates if we must print complete signatures + or just [sig end]. Default if [false]. +*) +val string_of_module_type : ?complete: bool -> Types.module_type -> string + +(** This function returns a string representing a [Types.class_type]. + @param complete indicates if we must print complete signatures + or just [object end]. Default if [false]. +*) +val string_of_class_type : ?complete: bool -> Types.class_type -> string + |