diff options
author | James Raspass <jraspass@gmail.com> | 2015-07-15 23:46:20 +0100 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2016-09-28 09:46:14 +0100 |
commit | 607ee43568c28c8da9fb4b19d16807dd0214af40 (patch) | |
tree | b29fff53739c2135968e6d965f0c1be418da0b3a /pp_ctl.c | |
parent | 850e14d313dc5493e5162c407f21ae0a9fec2805 (diff) | |
download | perl-607ee43568c28c8da9fb4b19d16807dd0214af40.tar.gz |
Speed up compilation of overload.pm a smidge.
Measured with the following crude perl script calling perf. Perl
is in there to get a rough baseline cost of starting perl:
print 'PERL', (`perf stat -r100 perl -e 1 2>&1`)[10];
print 'OLD ', (`perf stat -r100 perl lib/overload.pm 2>&1`)[10];
print 'NEW ', (`perf stat -r100 perl lib/overload2.pm 2>&1`)[10];
Produced the following results on my machine:
PERL 5,800,051 instructions # 1.05 insns per cycle ( +- 0.06% )
OLD 14,818,995 instructions # 1.16 insns per cycle ( +- 0.03% )
NEW 14,696,974 instructions # 1.16 insns per cycle ( +- 0.03% )
While the numbers did fluctuate between runs, the new code was
consistently faster.
Diffstat (limited to 'pp_ctl.c')
0 files changed, 0 insertions, 0 deletions