about summary refs log tree commit diff
path: root/src/Syntax.hs
diff options
context:
space:
mode:
authorPaweł Dybiec <pawel.to.malpa@gmail.com>2020-01-09 18:12:52 +0100
committerPaweł Dybiec <pawel.to.malpa@gmail.com>2020-01-09 18:12:52 +0100
commit0c4936c130cadb135faa54034ec2009cf189636e (patch)
treebcfa352b5cf7db5e655d52d709748c8cf9b1659e /src/Syntax.hs
parentAdd package.yaml (diff)
Fix variant type
Diffstat (limited to 'src/Syntax.hs')
-rw-r--r--src/Syntax.hs2
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