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:
f52337c
)
Another confusing comment; this time in regcomp.c
author
Father Chrysostomos
<sprout@cpan.org>
Wed, 30 Nov 2011 17:34:46 +0000
(09:34 -0800)
committer
Father Chrysostomos
<sprout@cpan.org>
Wed, 30 Nov 2011 17:34:46 +0000
(09:34 -0800)
This one comes from
c2123ae38
.
And we shouldn’t be suing our mothers’ tykes. :-)
regcomp.c
patch
|
blob
|
history
diff --git
a/regcomp.c
b/regcomp.c
index
70e9e2f
..
b1b8e6f
100644
(file)
--- a/
regcomp.c
+++ b/
regcomp.c
@@
-12045,7
+12045,8
@@
Perl_re_dup_guts(pTHX_ const REGEXP *sstr, REGEXP *dstr, CLONE_PARAMS *param)
1: a buffer in a different thread
2: something we no longer hold a reference on
so we need to copy it locally. */
- /* Note we need to sue SvCUR() on our mother_re, because it, in
+ /* Note we need to use SvCUR(), rather than
+ SvLEN(), on our mother_re, because it, in
turn, may well be pointing to its own mother_re. */
SvPV_set(dstr, SAVEPVN(SvPVX_const(ret->mother_re),
SvCUR(ret->mother_re)+1));