summaryrefslogtreecommitdiff
path: root/regcomp.c
diff options
context:
space:
mode:
authorJerry D. Hedden <jdhedden@cpan.org>2007-06-30 12:34:06 -0400
committerYves Orton <demerphq@gmail.com>2007-07-01 12:03:35 +0000
commit39aa8307f3f2358b81eed6e9cadcba8c05567eec (patch)
tree95921c6a37fed6918959780a93fe56befe989d45 /regcomp.c
parentc97ef8417f706238c83b6a3db825b056f5467926 (diff)
downloadperl-39aa8307f3f2358b81eed6e9cadcba8c05567eec.tar.gz
char is not a good type to use for array indexes;
should have been U8 in the first place. Originally noticed by Jerry Hedden in Subject: [PATCH] Compiler warning in regcomp.c From: "Jerry D. Hedden" <jdhedden@cpan.org> Message-ID: <1ff86f510706301334t337903a0k46abc6d2d25c68a5@mail.gmail.com> p4raw-id: //depot/perl@31510
Diffstat (limited to 'regcomp.c')
-rw-r--r--regcomp.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/regcomp.c b/regcomp.c
index bcbfec3422..60b31ed23b 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -4766,8 +4766,8 @@ reStudy:
r->extflags |= (RXf_SKIPWHITE|RXf_WHITE);
else {
regnode *first = ri->program + 1;
- char fop = OP(first);
- char nop = OP(NEXTOPER(first));
+ U8 fop = OP(first);
+ U8 nop = OP(NEXTOPER(first));
if (PL_regkind[fop] == BOL && nop == END)
r->extflags |= RXf_START_ONLY;