From 7f596f4c76b3e581f7af85bb1c7b292b73fc268c Mon Sep 17 00:00:00 2001 From: Andy Lester Date: Sun, 2 Apr 2006 19:00:50 -0500 Subject: [PATCH] Removed unused code in regexec.c Message-ID: <20060403050050.GA19055@petdance.com> p4raw-id: //depot/perl@27700 --- regexec.c | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/regexec.c b/regexec.c index ced5708..1d334b3 100644 --- a/regexec.c +++ b/regexec.c @@ -4556,10 +4556,9 @@ exit_level: /* free all slabs above current one */ if (orig_slab->next) { - regmatch_slab *osl, *sl = orig_slab->next; + regmatch_slab *sl = orig_slab->next; orig_slab->next = NULL; while (sl) { - osl = sl; sl = sl->next; } } @@ -4590,7 +4589,7 @@ S_regrepeat(pTHX_ const regnode *p, I32 max) if (max == REG_INFTY) max = I32_MAX; else if (max < loceol - scan) - loceol = scan + max; + loceol = scan + max; switch (OP(p)) { case REG_ANY: if (do_utf8) { -- 2.7.4