1 files changed, 1 insertions, 1 deletions
diff --git a/src/Syntax.hs b/src/Syntax.hs
index 1c888b5..c33f7b3 100644
--- a/src/Syntax.hs
+++ b/src/Syntax.hs
@@ -11,7 +11,7 @@ data Typ = TInt
 data Expr = Var Idnt
           | IntLit Int
           | Record [(Idnt, Expr)]
-          | Variant Typ [(Idnt, Expr)]
+          | Variant Typ Idnt Expr
           | Add Expr Expr
           | Mult Expr Expr
           | Neg Expr