summaryrefslogtreecommitdiff
path: root/regcomp.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2002-03-16 18:51:45 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2002-03-16 18:51:45 +0000
commit58ae7d3f026eda03e7850b941a2c0f0f9b4e393c (patch)
tree22389a50c43254426b4480f8ae8bf03f259dbdf8 /regcomp.c
parentc18e646aa79847e57bc522a44f29488705494669 (diff)
downloadperl-58ae7d3f026eda03e7850b941a2c0f0f9b4e393c.tar.gz
Better place to initialize (IRIX cc noticed that
the many "goto defchars" bypass the initialization) p4raw-id: //depot/perl@15265
Diffstat (limited to 'regcomp.c')
-rw-r--r--regcomp.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/regcomp.c b/regcomp.c
index 86cd1ab339..7c34d8f949 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -3024,7 +3024,7 @@ tryagain:
default: {
register STRLEN len;
- register UV ender = 0;
+ register UV ender;
register char *p;
char *oldp, *s;
STRLEN numlen;
@@ -3036,6 +3036,7 @@ tryagain:
RExC_parse++;
defchar:
+ ender = 0;
ret = reg_node(pRExC_state, FOLD
? (LOC ? EXACTFL : EXACTF)
: EXACT);