Bruce/bp
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix Lua module

Browse Source
This commit is contained in:
Bruce Hill 2023-05-16 20:05:48 -04:00
parent 05dcacd94a
commit 6ce581173f
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
Lua/lbp.c
View File

@ -84,7 +84,7 @@ static match_t *get_first_capture(match_t *m)
{ {
if (m->pat->type == BP_TAGGED) { if (m->pat->type == BP_TAGGED) {
return m; return m;
} else if (m->pat->type == BP_CAPTURE && !m->pat->args.capture.name) { } else if (m->pat->type == BP_CAPTURE && !Match(m->pat, BP_CAPTURE)->name) {
return m; return m;
} else if (m->children) { } else if (m->children) {
for (int i = 0; m->children[i]; i++) { for (int i = 0; m->children[i]; i++) {
@ -100,8 +100,9 @@ static void set_capture_fields(lua_State *L, match_t *m, int *n, const char *sta
if (m->pat->type == BP_CAPTURE) { if (m->pat->type == BP_CAPTURE) {
match_t *cap = get_first_capture(m->children[0]); match_t *cap = get_first_capture(m->children[0]);
if (!cap) cap = m->children[0]; if (!cap) cap = m->children[0];
if (m->pat->args.capture.namelen > 0) { auto capture = Match(m->pat, BP_CAPTURE);
lua_pushlstring(L, m->pat->args.capture.name, m->pat->args.capture.namelen); if (capture->namelen > 0) {
lua_pushlstring(L, capture->name, capture->namelen);
push_match(L, cap, start); push_match(L, cap, start);
lua_settable(L, -3); lua_settable(L, -3);
} else { } else {
@ -127,7 +128,8 @@ static void push_match(lua_State *L, match_t *m, const char *start)
lua_seti(L, -2, 0); lua_seti(L, -2, 0);
if (m->pat->type == BP_TAGGED) { if (m->pat->type == BP_TAGGED) {
lua_pushlstring(L, m->pat->args.capture.name, m->pat->args.capture.namelen); auto tagged = Match(m->pat, BP_TAGGED);
lua_pushlstring(L, tagged->name, tagged->namelen);
lua_setfield(L, -2, "__tag"); lua_setfield(L, -2, "__tag");
} }