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:
0434156
)
Fix address of register error from 26a0cb8
author
David Golden
<dagolden@cpan.org>
Sun, 18 Jul 2010 01:50:40 +0000
(21:50 -0400)
committer
David Golden
<dagolden@cpan.org>
Sun, 18 Jul 2010 01:50:48 +0000
(21:50 -0400)
regcomp.c
patch
|
blob
|
history
diff --git
a/regcomp.c
b/regcomp.c
index
74f996b
..
1b22d90
100644
(file)
--- a/
regcomp.c
+++ b/
regcomp.c
@@
-7466,14
+7466,19
@@
tryagain:
case 'o':
{
STRLEN brace_len = len;
+ UV result;
if ((error_msg = grok_bslash_o(p,
- &
ender
,
+ &
result
,
&brace_len,
SIZE_ONLY))
!= NULL)
{
vFAIL(error_msg);
}
+ else
+ {
+ ender = result;
+ }
p += brace_len;
if (PL_encoding && ender < 0x100) {
goto recode_encoding;