diff options
| author | Gaëtan Gilbert | 2017-09-27 16:54:41 +0200 |
|---|---|---|
| committer | Gaëtan Gilbert | 2017-10-10 23:50:25 +0200 |
| commit | 74826c1869a423b4e7224d3f69180584bdef1726 (patch) | |
| tree | 961375ac1a3e386271eaa2b33a49349f38e12fed /printing | |
| parent | a627891e0505e7da7afcb56c79d2058ebf058694 (diff) | |
Parse [Proof using Type] without translating Type to an id.
Diffstat (limited to 'printing')
| -rw-r--r-- | printing/ppvernac.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/printing/ppvernac.ml b/printing/ppvernac.ml index 4c68285f3f..d1158b3d6f 100644 --- a/printing/ppvernac.ml +++ b/printing/ppvernac.ml @@ -527,6 +527,7 @@ open Decl_kinds let pr_using e = let rec aux = function | SsEmpty -> "()" + | SsType -> "(Type)" | SsSingl (_,id) -> "("^Id.to_string id^")" | SsCompl e -> "-" ^ aux e^"" | SsUnion(e1,e2) -> "("^aux e1 ^" + "^ aux e2^")" |