Add error when a constructor is used for a primitive argument.
Add testing for errors.
This commit is contained in:
8
tests/LitConCase.newt
Normal file
8
tests/LitConCase.newt
Normal file
@@ -0,0 +1,8 @@
|
||||
module LitConCase
|
||||
|
||||
data Unit = MkUnit
|
||||
|
||||
foo : Int → Unit
|
||||
foo 0 = MkUnit
|
||||
foo MkUnit = MkUnit
|
||||
foo _ = MkUnit
|
||||
Reference in New Issue
Block a user