cleanup

2023-12-08 14:55:30 -07:00
parent f728b91a8a
commit e477891bc3
4 changed files with 49 additions and 24 deletions
--- a/src/Core/Parse.y
+++ b/src/Core/Parse.y
@@ -124,7 +124,7 @@ Alter           : litint ParList '->' Expr      { Alter (AltData $1) $2 $4 }

 Expr1           :: { Expr Name }
 Expr1           : litint                        { LitE $ IntL $1 }
-                | Id                            { Var (Name $1) }
+                | Id                            { Var $1 }
                | PackCon                       { $1 }
                | ExprPragma                    { $1 }
                | '(' Expr ')'                  { $2 }