aboutsummaryrefslogtreecommitdiff
path: root/parsing
diff options
context:
space:
mode:
Diffstat (limited to 'parsing')
-rw-r--r--parsing/prettyp.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/prettyp.ml b/parsing/prettyp.ml
index 3151fa6d07..e30979bf9b 100644
--- a/parsing/prettyp.ml
+++ b/parsing/prettyp.ml
@@ -120,7 +120,7 @@ let print_impargs_list prefix l =
else [str "No implicit arguments"]))])]) l)
let print_renames_list prefix l =
- if l = [] then [prefix] else
+ if l = [] then [] else
[add_colon prefix ++ str "Arguments are renamed to " ++
hv 2 (prlist_with_sep pr_comma (fun x -> x) (List.map pr_name l))]