Monomorphizer now outputs constructors that are matched on but not created

This commit is contained in:
Rakarake 2023-04-12 16:36:22 +02:00
parent 0ab13e5979
commit c2bf6312f6
3 changed files with 19 additions and 5 deletions

View 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