08eb78a5b2
This PR sets up the new integrated test/bench suite. It then migrates all benchmarks and some related tests to the new suite. There's also some documentation and some linting. For now, a lot of the old tests are left alone so this PR doesn't become even larger than it already is. Eventually, all tests should be migrated to the new suite though so there isn't a confusing mix of two systems.
114 lines
2.2 KiB
Text
114 lines
2.2 KiB
Text
|
|
/-!
|
|
Tests for `pp.numericTypes` and `pp.natLit`
|
|
|
|
RFC #3021
|
|
-/
|
|
|
|
open Lean
|
|
|
|
section
|
|
|
|
/-!
|
|
Both raw nat lits and non-raw natural numbers pretty print the same by default
|
|
-/
|
|
/-- info: 22 : Nat -/
|
|
#guard_msgs in #check nat_lit 22
|
|
/-- info: 22 : Nat -/
|
|
#guard_msgs in #check 22
|
|
|
|
set_option pp.natLit true
|
|
|
|
/-!
|
|
The raw nat lit pretty prints with the `nat_lit` prefix when `pp.natLit` is true.
|
|
-/
|
|
/-- info: nat_lit 22 : Nat -/
|
|
#guard_msgs in #check nat_lit 22
|
|
/-- info: 22 : Nat -/
|
|
#guard_msgs in #check 22
|
|
|
|
end
|
|
|
|
section
|
|
set_option pp.numericTypes true
|
|
|
|
/-!
|
|
The `pp.numericTypes` option sets `pp.natLit` to true.
|
|
-/
|
|
/-- info: nat_lit 22 : Nat -/
|
|
#guard_msgs in #check nat_lit 22
|
|
|
|
/-!
|
|
Natural number literal
|
|
-/
|
|
/-- info: (22 : Rat) : Rat -/
|
|
#guard_msgs in #check (22 : Rat)
|
|
|
|
/-!
|
|
Negative integer literal
|
|
-/
|
|
/-- info: (-22 : Rat) : Rat -/
|
|
#guard_msgs in #check (-22 : Rat)
|
|
|
|
/-!
|
|
Rational literal of two natural numbers
|
|
-/
|
|
/-- info: (22 / 17 : Rat) : Rat -/
|
|
#guard_msgs in #check (22 / 17 : Rat)
|
|
|
|
/-!
|
|
Rational literal of a negative integer and a rational
|
|
-/
|
|
/-- info: (-22 / 17 : Rat) : Rat -/
|
|
#guard_msgs in #check (-22 / 17 : Rat)
|
|
|
|
/-!
|
|
Not a rational literal since the denominator is negative.
|
|
-/
|
|
/-- info: (-22 : Rat) / (-17 : Rat) : Rat -/
|
|
#guard_msgs in #check (-22 / -17 : Rat)
|
|
|
|
/-!
|
|
Natural number literal for `Fin`.
|
|
-/
|
|
/-- info: (17 : Fin (22 : Nat)) : Fin (22 : Nat) -/
|
|
#guard_msgs in #check (17 : Fin 22)
|
|
|
|
/-!
|
|
Natural number literal for `Nat`.
|
|
-/
|
|
/-- info: (2 : Nat) : Nat -/
|
|
#guard_msgs in #check 2
|
|
|
|
/-!
|
|
Natural number literals in the context of an equation.
|
|
-/
|
|
/-- info: (2 : Nat) + (1 : Nat) = (3 : Nat) : Prop -/
|
|
#guard_msgs in #check 2 + 1 = 3
|
|
|
|
/-!
|
|
Testing `pp.explicit` override. The `2` appears as `nat_lit` in the `OfNat.ofNat` expression.
|
|
-/
|
|
set_option pp.explicit true in
|
|
/-- info: @OfNat.ofNat Nat (nat_lit 2) (instOfNatNat (nat_lit 2)) : Nat -/
|
|
#guard_msgs in #check 2
|
|
|
|
end
|
|
|
|
section
|
|
set_option pp.all true
|
|
|
|
/-!
|
|
Testing `pp.all`.
|
|
-/
|
|
/-- info: @OfNat.ofNat.{0} Nat (nat_lit 2) (instOfNatNat (nat_lit 2)) : Nat -/
|
|
#guard_msgs in #check 2
|
|
|
|
/-!
|
|
Testing that `pp.all` overrides `pp.natLit`.
|
|
-/
|
|
set_option pp.natLit false
|
|
/-- info: @OfNat.ofNat.{0} Nat (nat_lit 2) (instOfNatNat (nat_lit 2)) : Nat -/
|
|
#guard_msgs in #check 2
|
|
|
|
end
|