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.
93 lines
2.7 KiB
Text
93 lines
2.7 KiB
Text
-- set_option trace.Meta.sizeOf true
|
||
-- set_option trace.Meta.sizeOf.aux true
|
||
|
||
/--
|
||
error: maximum recursion depth has been reached
|
||
use `set_option maxRecDepth <num>` to increase limit
|
||
use `set_option diagnostics true` to get diagnostic information
|
||
-/
|
||
#guard_msgs(pass trace, all) in
|
||
inductive Tree
|
||
| node (children : List (id Tree))
|
||
|
||
/--
|
||
error: failed to generate `SizeOf` instance for `Nat'`:
|
||
type mismatch
|
||
-/
|
||
#guard_msgs(pass trace, all) in
|
||
inductive Nat' -- type mismatch
|
||
| zero
|
||
| succ (n : id Nat')
|
||
|
||
/--
|
||
error: failed to generate `SizeOf` instance for `Tree₁`:
|
||
failed to generate sizeOf theorem for Tree₁.node, (use `set_option genSizeOfSpec false` to disable theorem generation)
|
||
-/
|
||
#guard_msgs(pass trace, all) in
|
||
inductive Tree₁ -- failed to generate sizeOf theorem for Tree₁.node
|
||
| node (children : List (Unit → id Tree₁))
|
||
|
||
/--
|
||
error: failed to generate `SizeOf` instance for `Tree₂`:
|
||
failed to generate sizeOf theorem for Tree₂.node (use `set_option genSizeOfSpec false` to disable theorem generation), expected 'Nat.add' application, lhs is ⏎
|
||
1
|
||
rhs is
|
||
1 + sizeOf head
|
||
-/
|
||
#guard_msgs(pass trace, all) in
|
||
inductive Tree₂ -- failed to generate sizeOf theorem for Tree₂.node
|
||
| node (children : List ((fun α => α) Unit → Tree₂))
|
||
|
||
/--
|
||
error: failed to generate `SizeOf` instance for `Tree₃`:
|
||
failed to generate sizeOf theorem for Tree₃.node, (use `set_option genSizeOfSpec false` to disable theorem generation)
|
||
-/
|
||
#guard_msgs(pass trace, all) in
|
||
inductive Tree₃ -- failed to generate sizeOf theorem for Tree₃.node
|
||
| node (children : List (id (Unit → Tree₃)))
|
||
|
||
|
||
/--
|
||
error: failed to generate `SizeOf` instance for `Foo1`:
|
||
type mismatch
|
||
-/
|
||
#guard_msgs(pass trace, all) in
|
||
inductive Foo1
|
||
| none
|
||
| some (v : Id Foo1)
|
||
|
||
structure Box (α : Type u) where
|
||
data : α
|
||
|
||
-- ok
|
||
inductive Foo2
|
||
| none
|
||
| some (v : Box Foo2)
|
||
|
||
inductive BaseFoo (t : Type u -> Type v) (α : Type u)
|
||
| none
|
||
| some (v : t α)
|
||
|
||
/--
|
||
error: (kernel) application type mismatch
|
||
Eq.trans (congrArg (Nat.add 1) (Foo3._sizeOf_3_eq v))
|
||
(Eq.symm
|
||
(@BaseFoo.some.sizeOf_spec Box Foo3 (fun a => @Box._sizeOf_inst a (instSizeOfDefault a)) Foo3._sizeOf_inst v))
|
||
argument has type
|
||
1 + sizeOf v = sizeOf (@BaseFoo.some Box Foo3 v)
|
||
but function has type
|
||
Nat.add 1 (sizeOf v) = sizeOf (@BaseFoo.some Box Foo3 v) →
|
||
Nat.add 1 (Foo3._sizeOf_3 v) = sizeOf (@BaseFoo.some Box Foo3 v)
|
||
-/
|
||
#guard_msgs(pass trace, all) in
|
||
structure Foo3 where
|
||
raw : BaseFoo Box Foo3
|
||
|
||
/--
|
||
error: maximum recursion depth has been reached
|
||
use `set_option maxRecDepth <num>` to increase limit
|
||
use `set_option diagnostics true` to get diagnostic information
|
||
-/
|
||
#guard_msgs(pass trace, all) in
|
||
structure Foo4 where
|
||
raw : BaseFoo Id Foo4
|