diff options
| -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 |