This PR fixes an issue where the `pp.universes` option would cause constants with no universes to not use unexpanders or dot notation. For example, `p ↔ q` would pretty print as `Iff p q` even though `Iff` has no universe levels.
27 lines
489 B
Text
27 lines
489 B
Text
/-!
|
|
# Tests of `pp.universe` option
|
|
-/
|
|
|
|
/-!
|
|
This used to print `Iff p q`
|
|
-/
|
|
/-- info: p ↔ q : Prop -/
|
|
#guard_msgs in
|
|
set_option pp.universes true in
|
|
variable (p q : Prop) in
|
|
#check p ↔ q
|
|
|
|
/-!
|
|
These used to print `Nat.succ n`
|
|
-/
|
|
/-- info: n.succ : Nat -/
|
|
#guard_msgs in
|
|
set_option pp.universes true in
|
|
variable (n : Nat) in
|
|
#check Nat.succ n
|
|
/-- info: n.succ : Nat -/
|
|
#guard_msgs in
|
|
set_option pp.universes true in
|
|
set_option pp.explicit true in
|
|
variable (n : Nat) in
|
|
#check Nat.succ n
|