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