This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
optimize Perl_boot_core_UNIVERSAL and Perl_nextargv
authorDaniel Dragan <bulk88@hotmail.com>
Sat, 8 Nov 2014 05:48:58 +0000 (00:48 -0500)
committerFather Chrysostomos <sprout@cpan.org>
Sat, 8 Nov 2014 06:53:52 +0000 (22:53 -0800)
commit5513c2cfd695ea6a900a29be8b479bea61614429
treea0467ca94fc580eb0436ca771d9bef8dccca3116
parentdb6e00bd00dae7b918216c69bd58fe860e640276
optimize Perl_boot_core_UNIVERSAL and Perl_nextargv

Perl_nextargv fuse 2 tests into 1

Perl_boot_core_UNIVERSAL reorder instructions to avoid using a non-vol
registers (save cv across the Safefree), not reread CV body * after
Safefree. Compute address of CvFILE once.

for Perl_boot_core_UNIVERSAL on VC 2003 before 0x66 bytes of 32 bit x86
machine code, after 0x61.
doio.c
universal.c