diff options
author | Maxence Guesdon <maxence.guesdon@inria.fr> | 2003-10-17 15:30:47 +0000 |
---|---|---|
committer | Maxence Guesdon <maxence.guesdon@inria.fr> | 2003-10-17 15:30:47 +0000 |
commit | 60b74b3c3ceb8334aafcef82f5b84766c20af097 (patch) | |
tree | 6a682f5f3c26120554a7dcce8c57d3542559c42e /ocamldoc/odoc_man.ml | |
parent | e969e8ad9fdce5a8a33946587d45b3e4c22cae90 (diff) | |
download | ocaml-60b74b3c3ceb8334aafcef82f5b84766c20af097.tar.gz |
fix bad display of type parameters for class and class types
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@5874 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'ocamldoc/odoc_man.ml')
-rw-r--r-- | ocamldoc/odoc_man.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ocamldoc/odoc_man.ml b/ocamldoc/odoc_man.ml index 10f85ca93b..f6dcc3280c 100644 --- a/ocamldoc/odoc_man.ml +++ b/ocamldoc/odoc_man.ml @@ -459,7 +459,7 @@ class man = ( match c.cl_type_parameters with [] -> () - | l -> p buf "[%s] " (Odoc_str.string_of_type_list ", " l) + | l -> p buf "%s " (Odoc_str.string_of_class_type_param_list l) ); p buf "%s : %s" (Name.simple c.cl_name) @@ -477,7 +477,7 @@ class man = ( match ct.clt_type_parameters with [] -> () - | l -> p buf "[%s] " (Odoc_str.string_of_type_list ", " l) + | l -> p buf "%s " (Odoc_str.string_of_class_type_param_list l) ); p buf "%s = %s" (Name.simple ct.clt_name) |