case unrolling

2024-02-06 13:39:01 -07:00
parent 15884336f1
commit 2895e3cb48
6 changed files with 36 additions and 12 deletions
--- a/src/Core/Syntax.hs
+++ b/src/Core/Syntax.hs
@@ -121,7 +121,7 @@ data Rec = Rec
 data AltCon = AltData Name
            | AltTag Tag
            | AltLit Lit
-            | Default
+            | AltDefault
            deriving (Show, Read, Eq, Lift)

 newtype Lit = IntL Int