This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 586e992) | patch
Use sv_catpvn instead of sv_catsv in doop.c:do_join
authorFather Chrysostomos <sprout@cpan.org>
Sat, 18 Oct 2014 01:14:40 +0000 (18:14 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sat, 18 Oct 2014 03:16:14 +0000 (20:16 -0700)
commitf0ee386351fbbf1a41ead86e9163f688d1b37dc1
treeb668d33c61d095ba5b59caa3c43dc7480edec02ftree | snapshot
parent586e992d6da290482e162f13db0dd3f4533b4cd6commit | diff
Use sv_catpvn instead of sv_catsv in doop.c:do_join

Bunchmarking shows that SvPV+sv_catpvn is faster that sv_catsv.  Why
exactly I don’t know, but perhaps fewer functions and flag checks
are the cause.
doop.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.