chore: add test

This commit is contained in:
Gabriel Ebner 2021-11-30 12:57:02 +01:00 committed by Sebastian Ullrich
parent 70ad1deb00
commit 4964f5eb05
2 changed files with 52 additions and 0 deletions

View file

@ -0,0 +1,8 @@
-- Check whether all intermediate steps during tactic execution
-- can be successfully pretty-printed to trace output
set_option trace.Elab.step true
example : True := by
skip
trivial

View file

@ -0,0 +1,44 @@
[Elab.step] expected type: Sort ?u, term
True
[Elab.step] expected type: True, term
by
skip
trivial
[Elab.step]
skip
trivial
[Elab.step]
skip
trivial
[Elab.step] skip
[Elab.step] trivial
[Elab.step] (apply And.intro✝) <;> trivial
[Elab.step] focus
(
apply And.intro✝;
all_goals
trivial)
[Elab.step]
(
apply And.intro✝;
all_goals
trivial)
[Elab.step]
(
apply And.intro✝;
all_goals
trivial)
[Elab.step] (
apply And.intro✝;
all_goals
trivial)
[Elab.step]
apply And.intro✝;
all_goals
trivial
[Elab.step]
apply And.intro✝;
all_goals
trivial
[Elab.step] apply And.intro✝
[Elab.step] apply True.intro✝