max/lean4-htt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 2

test(tests/lean/run/elab_crash1): add new test

Browse source
This commit is contained in:
Leonardo de Moura 2016-08-01 17:26:47 -07:00
parent 582117da96
commit a1854df9fa
1 changed files with 10 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
tests/lean/run/elab_crash1.lean Normal file
View file

@ -0,0 +1,10 @@
open expr tactic
example (A : Type) (a : A) : A :=
by do to_expr `((sorry : A)) >>= exact
example (A : Type) (a : A) : A :=
by do refine `(sorry)
example (a : nat) : nat :=
by do to_expr `(nat.zero) >>= exact