aboutsummaryrefslogtreecommitdiff
path: root/printing
diff options
context:
space:
mode:
authorcoqbot-app[bot]2020-10-09 14:43:02 +0000
committerGitHub2020-10-09 14:43:02 +0000
commitac7c197c3b8a9b66956f35e364221938f91e2a23 (patch)
treedac9632d48449cfe77977e209803ebb9d19b9805 /printing
parentcc3ef68a475140bf7d3ca7a2fd3bc593508eb42c (diff)
parentf7fabd34526135daccce2630670905fc39e0c3db (diff)
Merge PR #13143: Drop misleading argument of Pp.h box
Reviewed-by: ejgallego Reviewed-by: silene
Diffstat (limited to 'printing')
-rw-r--r--printing/ppconstr.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/printing/ppconstr.ml b/printing/ppconstr.ml
index af105f4d63..267f5e0b5f 100644
--- a/printing/ppconstr.ml
+++ b/printing/ppconstr.ml
@@ -467,7 +467,7 @@ let tag_var = tag Tag.variable
let pr_record_body_gen pr l =
spc () ++
prlist_with_sep pr_semicolon
- (fun (id, c) -> h 1 (pr_reference id ++ spc () ++ str":=" ++ pr ltop c)) l
+ (fun (id, c) -> pr_reference id ++ str" :=" ++ pr ltop c) l
let pr_forall n = keyword "forall" ++ pr_com_at n ++ spc ()