From 206e1fa68fb921d0fd8c9d31ec59a9b7d0fc2a5d Mon Sep 17 00:00:00 2001
From: Bruce Hill <bruce@bruce-hill.com>
Date: Sat, 30 Apr 2022 15:23:02 -0400
Subject: Added tagged definitions: `foo:: blah`

---
 Lua/lbp.c | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'Lua/lbp.c')

diff --git a/Lua/lbp.c b/Lua/lbp.c
index a8b573e..7306c86 100644
--- a/Lua/lbp.c
+++ b/Lua/lbp.c
@@ -72,7 +72,11 @@ static void push_matchstring(lua_State *L, match_t *m)
 
 static void set_capture_fields(lua_State *L, match_t *m, int *n, const char *start)
 {
-    if (m->pat->type == BP_CAPTURE) {
+    if (m->pat->type == BP_TAGGED) {
+        lua_pushlstring(L, m->pat->args.capture.name, m->pat->args.capture.namelen);
+        lua_setfield(L, -2, "__tag");
+        set_capture_fields(L, m->children[0], n, start);
+    } else if (m->pat->type == BP_CAPTURE) {
         if (m->pat->args.capture.namelen > 0) {
             lua_pushlstring(L, m->pat->args.capture.name, m->pat->args.capture.namelen);
             push_match(L, m->children[0], start);
-- 
cgit v1.2.3