From 83c2f623ab800d4b316b958f530d3ecd95448b48 Mon Sep 17 00:00:00 2001 From: Mark-Jason Dominus Date: Sat, 21 Apr 2001 17:27:49 -0400 Subject: [PATCH] Re: ANYOF_SIZE is wrong in 5.7.1 Message-ID: <20010422012749.27024.qmail@plover.com> p4raw-id: //depot/perl@9778 --- regcomp.c | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/regcomp.c b/regcomp.c index b94081e..59b2712 100644 --- a/regcomp.c +++ b/regcomp.c @@ -4218,8 +4218,7 @@ S_dumpuntil(pTHX_ regnode *start, regnode *node, regnode *last, SV* sv, I32 l) node = dumpuntil(start, NEXTOPER(node), NEXTOPER(node) + 1, sv, l + 1); } else if (op == ANYOF) { - node = NEXTOPER(node); - node += ANYOF_SKIP; + node = next; } else if (PL_regkind[(U8)op] == EXACT) { /* Literal string, where present. */ -- 2.7.4