diff options
| author | herbelin | 2001-12-21 16:07:27 +0000 |
|---|---|---|
| committer | herbelin | 2001-12-21 16:07:27 +0000 |
| commit | 8aec9f8f934c99e0ce34b5145e835df29db82831 (patch) | |
| tree | 4d971862b61226eaff5521294584c5887f211659 | |
| parent | e70320d845e3f3109d873380e3ef29f0d1f18831 (diff) | |
Bug affichage '++' au lieu de ';'
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2364 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | parsing/prettyp.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/prettyp.ml b/parsing/prettyp.ml index 867bcd3168..21450bf308 100644 --- a/parsing/prettyp.ml +++ b/parsing/prettyp.ml @@ -42,7 +42,7 @@ let print_impl_args = function | [i] -> str"Position [" ++ int i ++ str"] is implicit" | l -> str"Positions [" ++ - prlist_with_sep (fun () -> str " ++") (fun i -> int i) l ++ + prlist_with_sep (fun () -> str "; ") int l ++ str"] are implicit" (* To be improved; the type should be used to provide the types in the |