test(tests/lean/attr_at3): add test for 'attribute ... at ...'
This commit is contained in:
parent
e5aab3fd63
commit
9736b8d79c
2 changed files with 25 additions and 0 deletions
17
tests/lean/attr_at3.lean
Normal file
17
tests/lean/attr_at3.lean
Normal file
|
@ -0,0 +1,17 @@
|
||||||
|
namespace bla
|
||||||
|
definition f (a : nat) := a + 1
|
||||||
|
attribute f [reducible] at foo
|
||||||
|
print f
|
||||||
|
end bla
|
||||||
|
|
||||||
|
|
||||||
|
section
|
||||||
|
open foo
|
||||||
|
print bla.f
|
||||||
|
end
|
||||||
|
|
||||||
|
print bla.f
|
||||||
|
|
||||||
|
namespace foo
|
||||||
|
print bla.f
|
||||||
|
end foo
|
8
tests/lean/attr_at3.lean.expected.out
Normal file
8
tests/lean/attr_at3.lean.expected.out
Normal file
|
@ -0,0 +1,8 @@
|
||||||
|
definition bla.f : ℕ → ℕ :=
|
||||||
|
λ (a : ℕ), a + 1
|
||||||
|
definition bla.f [reducible] : ℕ → ℕ :=
|
||||||
|
λ (a : ℕ), a + 1
|
||||||
|
definition bla.f : ℕ → ℕ :=
|
||||||
|
λ (a : ℕ), a + 1
|
||||||
|
definition bla.f [reducible] : ℕ → ℕ :=
|
||||||
|
λ (a : ℕ), a + 1
|
Loading…
Reference in a new issue