Monomorphizer now outputs constructors that are matched on but not created
This commit is contained in:
parent
0ab13e5979
commit
c2bf6312f6
3 changed files with 19 additions and 5 deletions
11
sample-programs/mono-3.crf
Normal file
11
sample-programs/mono-3.crf
Normal file
|
|
@ -0,0 +1,11 @@
|
|||
data Number() where
|
||||
One: Number ()
|
||||
Two: Number ()
|
||||
|
||||
numberToInt : Number () -> Int
|
||||
numberToInt n = case n of
|
||||
One => 1
|
||||
Two => 2
|
||||
|
||||
main = numberToInt One
|
||||
|
||||
Loading…
Add table
Add a link
Reference in a new issue