diff options
| author | coqbot-app[bot] | 2020-10-09 14:43:02 +0000 |
|---|---|---|
| committer | GitHub | 2020-10-09 14:43:02 +0000 |
| commit | ac7c197c3b8a9b66956f35e364221938f91e2a23 (patch) | |
| tree | dac9632d48449cfe77977e209803ebb9d19b9805 /parsing | |
| parent | cc3ef68a475140bf7d3ca7a2fd3bc593508eb42c (diff) | |
| parent | f7fabd34526135daccce2630670905fc39e0c3db (diff) | |
Merge PR #13143: Drop misleading argument of Pp.h box
Reviewed-by: ejgallego
Reviewed-by: silene
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/ppextend.ml | 4 | ||||
| -rw-r--r-- | parsing/ppextend.mli | 2 |
2 files changed, 3 insertions, 3 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 diff --git a/parsing/ppextend.mli b/parsing/ppextend.mli index ee8180c7aa..56a3fc8e3c 100644 --- a/parsing/ppextend.mli +++ b/parsing/ppextend.mli @@ -13,7 +13,7 @@ open Constrexpr (** {6 Pretty-print. } *) type ppbox = - | PpHB of int + | PpHB | PpHOVB of int | PpHVB of int | PpVB of int |