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.
15 lines
633 B
Text
15 lines
633 B
Text
--
|
|
|
|
def iota (n : Nat) := List.range' 1 n |>.reverse
|
|
|
|
#eval repr (1, 2, 3)
|
|
#eval repr (some 1, some (some true))
|
|
#eval iota 10 |>.map some |>.map some
|
|
#eval iota 15 |>.map fun x => (x, some x)
|
|
#eval repr ("hello", 1, true, false, 'a', "testing tuples", "another string", "another string", "testing bigger tuples that should not fit in a single line", 20)
|
|
#eval iota 50 |>.toArray
|
|
#eval iota 20 |>.map fun i => if i % 2 == 0 then Except.ok (some i) else Except.error "no even"
|
|
|
|
instance : ReprAtom (Except String (Option Nat)) := ⟨⟩
|
|
|
|
#eval iota 20 |>.map fun i => if i % 2 == 0 then Except.ok (some i) else Except.error "no even"
|