aboutsummaryrefslogtreecommitdiff
path: root/parsing/ppextend.ml
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 /parsing/ppextend.ml
parentcc3ef68a475140bf7d3ca7a2fd3bc593508eb42c (diff)
parentf7fabd34526135daccce2630670905fc39e0c3db (diff)
Merge PR #13143: Drop misleading argument of Pp.h box
Reviewed-by: ejgallego Reviewed-by: silene
Diffstat (limited to 'parsing/ppextend.ml')
-rw-r--r--parsing/ppextend.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/parsing/ppextend.ml b/parsing/ppextend.ml
index fe6e8360c1..aab385a707 100644
--- a/parsing/ppextend.ml
+++ b/parsing/ppextend.ml
@@ -17,7 +17,7 @@ open Constrexpr
(*s Pretty-print. *)
type ppbox =
- | PpHB of int
+ | PpHB
| PpHOVB of int
| PpHVB of int
| PpVB of int
@@ -27,7 +27,7 @@ type ppcut =
| PpFnl
let ppcmd_of_box = function
- | PpHB n -> h n
+ | PpHB -> h
| PpHOVB n -> hov n
| PpHVB n -> hv n
| PpVB n -> v n