From 8d8651d549b177ce144186cae7ca53e4e6c1078c Mon Sep 17 00:00:00 2001
From: crumbtoo <crumb@disroot.org>
Date: Mon, 11 Mar 2024 11:05:50 -0600
Subject: [PATCH] fix: vlbrace error should popLayout

---
 src/Rlp/Lex.x   | 1 +
 src/Rlp/Parse.y | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/Rlp/Lex.x b/src/Rlp/Lex.x
index 1d32914..c2e316d 100644
--- a/src/Rlp/Lex.x
+++ b/src/Rlp/Lex.x
@@ -14,6 +14,7 @@ module Rlp.Lex
     , popLexState
     , programInitState
     , runP'
+    , popLayout
     )
     where
 import Codec.Binary.UTF8.String (encodeChar)
diff --git a/src/Rlp/Parse.y b/src/Rlp/Parse.y
index 85103cb..71291f3 100644
--- a/src/Rlp/Parse.y
+++ b/src/Rlp/Parse.y
@@ -84,7 +84,7 @@ VL  : vlbrace       { () }
 
 VR  :: { () }
 VR  : vrbrace       { () }
-    | error         { () }
+    | error         {% void popLayout }
 
 VS                  :: { () }
 VS                  : ';'                   { () }