aboutsummaryrefslogtreecommitdiff
path: root/lptree.c
diff options
context:
space:
mode:
authorSergio Queiroz <sqmedeiros@gmail.com>2016-09-09 16:26:44 -0300
committerSergio Queiroz <sqmedeiros@gmail.com>2016-09-09 16:26:44 -0300
commita9c5a38994074d2c9c5da4cf081c4ca9fa8b3271 (patch)
tree3f060fb9f4280cd06a0c1ad376af1b36f95a8219 /lptree.c
parent7757aac333c5a37181f942d5f20223023cbdc207 (diff)
downloadlpeglabel-a9c5a38994074d2c9c5da4cf081c4ca9fa8b3271.tar.gz
lpeglabel-a9c5a38994074d2c9c5da4cf081c4ca9fa8b3271.tar.bz2
lpeglabel-a9c5a38994074d2c9c5da4cf081c4ca9fa8b3271.zip
Updating implementation of Recovery to follow Fabio's idea. Not compatible with labeled ordered choice
Diffstat (limited to 'lptree.c')
-rw-r--r--lptree.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/lptree.c b/lptree.c
index 2044a5c..700398b 100644
--- a/lptree.c
+++ b/lptree.c
@@ -748,7 +748,7 @@ static int lp_recovery (lua_State *L) {
748 int n = lua_gettop(L); 748 int n = lua_gettop(L);
749 TTree *tree = newrootlab2sib(L, TRecov); 749 TTree *tree = newrootlab2sib(L, TRecov);
750 if (n == 2) { /* catches fail as default */ 750 if (n == 2) { /* catches fail as default */
751 setlabel(treelabelset(tree), LFAIL); 751 /*setlabel(treelabelset(tree), LFAIL); recovery does not catch regular fail */
752 } else { 752 } else {
753 int i; 753 int i;
754 for (i = 3; i <= n; i++) { 754 for (i = 3; i <= n; i++) {
@@ -1361,8 +1361,8 @@ static struct luaL_Reg metareg[] = {
1361}; 1361};
1362 1362
1363 1363
1364int luaopen_lpeglabel (lua_State *L); /* labeled failure */ 1364int luaopen_lpeglabelrec (lua_State *L); /* labeled failure */
1365int luaopen_lpeglabel (lua_State *L) { /* labeled failure */ 1365int luaopen_lpeglabelrec (lua_State *L) { /* labeled failure */
1366 luaL_newmetatable(L, PATTERN_T); 1366 luaL_newmetatable(L, PATTERN_T);
1367 lua_pushnumber(L, MAXBACK); /* initialize maximum backtracking */ 1367 lua_pushnumber(L, MAXBACK); /* initialize maximum backtracking */
1368 lua_setfield(L, LUA_REGISTRYINDEX, MAXSTACKIDX); 1368 lua_setfield(L, LUA_REGISTRYINDEX, MAXSTACKIDX);