summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2017-11-07 15:56:32 -0700
committerKarl Williamson <khw@cpan.org>2017-11-07 15:58:55 -0700
commit9f8d27b7d21e672ce31e073fdc4c6d8130572c04 (patch)
tree829b7dbb72c05954d3a0ab9e90dd2eec5ee29ee7 /toke.c
parent47324b4ed3120b0540af346145c4af021b01dd12 (diff)
downloadperl-9f8d27b7d21e672ce31e073fdc4c6d8130572c04.tar.gz
toke.c: Fix wrong use of memrchr
This was a replacement of strchr(), so should not have used the find-right-most memrchr. This was spotted by Christian Hansen. I don't know what the implications are, but thought I should get a fix in immediately.
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/toke.c b/toke.c
index fb720d8064..cfd0bdc20e 100644
--- a/toke.c
+++ b/toke.c
@@ -585,7 +585,7 @@ S_missingterm(pTHX_ char *s, const STRLEN len)
}
s = tmpbuf;
}
- q = my_memrchr(s, '"', len) ? '\'' : '"';
+ q = memchr(s, '"', len) ? '\'' : '"';
sv = sv_2mortal(newSVpv(s,0));
if (uni)
SvUTF8_on(sv);