From fb5122ec88dc665be4c07fe65d617490026adbe0 Mon Sep 17 00:00:00 2001
From: "Sven M. Hallberg" <pesco@khjk.org>
Date: Mon, 7 Sep 2015 15:37:26 +0200
Subject: [PATCH] fix result bit_length for LR backends

---
 src/backends/lr.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/backends/lr.c b/src/backends/lr.c
index e7f23775..59c8c907 100644
--- a/src/backends/lr.c
+++ b/src/backends/lr.c
@@ -351,7 +351,9 @@ HParseResult *h_lrengine_result(HLREngine *engine)
     // on top of the stack is the start symbol's semantic value
     assert(!h_slist_empty(engine->stack));
     HParsedToken *tok = engine->stack->head->elem;
-    return make_result(engine->arena, tok);
+    HParseResult *res =  make_result(engine->arena, tok);
+    res->bit_length = engine->input.index * 8;
+    return res;
   } else {
     return NULL;
   }
-- 
GitLab