projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
acdf413
)
regexec.c: Clean up initialized vars in switch
author
Karl Williamson
<public@khwilliamson.com>
Sat, 4 Dec 2010 18:18:23 +0000
(11:18 -0700)
committer
Father Chrysostomos
<sprout@cpan.org>
Sat, 4 Dec 2010 20:12:31 +0000
(12:12 -0800)
Commit
cf5c578b88887f19f7fba519bbc12296
attempted to clean up
d7ef4b73
,
but did not get it quite right. This fixes it, after consultation with
the author.
regexec.c
patch
|
blob
|
history
diff --git
a/regexec.c
b/regexec.c
index
c9c874c
..
112722e
100644
(file)
--- a/
regexec.c
+++ b/
regexec.c
@@
-3961,6
+3961,8
@@
S_regmatch(pTHX_ regmatch_info *reginfo, regnode *prog)
case NREF:
type = REF;
+ folder = NULL;
+ fold_array = NULL;
do_nref:
/* For the named back references, find the corresponding buffer
@@
-3986,9
+3988,12
@@
S_regmatch(pTHX_ regmatch_info *reginfo, regnode *prog)
case REFF:
folder = foldEQ;
fold_array = PL_fold;
- /* FALL THROUGH */
+ goto do_ref;
case REF:
+ folder = NULL;
+ fold_array = NULL;
+
do_ref:
type = OP(scan);
n = ARG(scan); /* which paren pair */