check for duplicate cases in enum matches
This commit is contained in:
parent
6153b4f7f8
commit
8395bec4cb
3 changed files with 25 additions and 18 deletions
|
@ -2,9 +2,9 @@
|
|||
def missing-b : {a, b} → {a} =
|
||||
λ x ⇒ case x return {a} of { 'a ⇒ 'a }
|
||||
|
||||
-- @[fail "duplicate tags"]
|
||||
-- def repeat-enum-case : {a} → {a} =
|
||||
-- λ x ⇒ case x return {a} of { 'a ⇒ 'a; 'a ⇒ 'a }
|
||||
@[fail "duplicate arms"]
|
||||
def repeat-enum-case : {a} → {a} =
|
||||
λ x ⇒ case x return {a} of { 'a ⇒ 'a; 'a ⇒ 'a }
|
||||
|
||||
@[fail "duplicate tags"]
|
||||
def repeat-enum-type : {a, a} = 'a
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue