From fbea3d6f3de61c8e256df9883e5cc5473e403b39 Mon Sep 17 00:00:00 2001
From: crumbtoo <crumb@disroot.org>
Date: Sun, 28 Jan 2024 19:41:36 -0700
Subject: [PATCH] let layout

---
 Makefile_happysrcs | 2 +-
 src/Rlp/Parse.y    | 3 +--
 2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/Makefile_happysrcs b/Makefile_happysrcs
index 1d32855..f4041ee 100644
--- a/Makefile_happysrcs
+++ b/Makefile_happysrcs
@@ -1,5 +1,5 @@
 HAPPY = happy
-HAPPY_OPTS = -a -g -c
+HAPPY_OPTS = -a -g -c -i/tmp/t.info
 ALEX = alex
 ALEX_OPTS = -g
 
diff --git a/src/Rlp/Parse.y b/src/Rlp/Parse.y
index ae467e8..b3999f8 100644
--- a/src/Rlp/Parse.y
+++ b/src/Rlp/Parse.y
@@ -160,8 +160,7 @@ LetExpr     :: { RlpExpr' RlpcPs }
 layout1(p)  : '{' layout_list1(';',p) '}'   { $2 }
             | VL  layout_list1(VS,p) VR     { $2 }
 
-layout_list1(sep,p) : p sep                      { [$1] }
-                    | p                          { [$1] }
+layout_list1(sep,p) : p                          { [$1] }
                     | layout_list1(sep,p) sep p  { $1 `snoc` $3 }
 
 Binding     :: { Binding' RlpcPs }