diff options
Diffstat (limited to 'printing')
| -rw-r--r-- | printing/ppvernac.ml | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/printing/ppvernac.ml b/printing/ppvernac.ml index 5c5b7206a..b7f5a8309 100644 --- a/printing/ppvernac.ml +++ b/printing/ppvernac.ml @@ -788,8 +788,9 @@ open Decl_kinds if p then let cm = match cum with - | GlobalCumulativity | LocalCumulativity -> "Cumulative" - | GlobalNonCumulativity | LocalNonCumulativity -> "NonCumulative" + | Some true -> "Cumulative" + | Some false -> "NonCumulative" + | None -> "" in cm ^ " " ^ kind else kind |