projects / platform / upstream / perl.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 33971c0) | patch
Merge 2 gv_fetch* calls in Perl_newXS_len_flags
authorDaniel Dragan <bulk88@hotmail.com>
Sun, 7 Oct 2012 16:06:24 +0000 (12:06 -0400)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 7 Oct 2012 19:15:50 +0000 (12:15 -0700)
commit9b566a5e96cd28514ff4e2339c71b85af321c91f
tree950ec9a340909628c960db808b46758e381efd1atree | snapshot
parent33971c01593943c682191c11172d3bab281d6dabcommit | diff
Merge 2 gv_fetch* calls in Perl_newXS_len_flags

Merge a gv_fetchpvn and a gv_fetchpv. A strlen call is avoided in
gv_fetchpv, and in Perl_newXS_len_flags shorter machine code because 2
different call destinations were merged to 1, and
"GV_ADDMULTI | flags,SVt_PVCV"  arguments are unconditionally executed
and are not in a branch.
op.c diff | blob | history
Domain: System / Base;