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: 96e6a0b) | patch
av_fetch(): use AvFILLp rather than AvFILL
authorDavid Mitchell <davem@iabyn.com>
Wed, 17 Aug 2016 08:52:48 +0000 (09:52 +0100)
committerDavid Mitchell <davem@iabyn.com>
Wed, 17 Aug 2016 12:38:56 +0000 (13:38 +0100)
commit1d7e6444bd515142acf34ef230b50f9d80ab9017
treeb2bc6f9f1a1f3e3eb4b3d4d411fb68ff0bc92014tree | snapshot
parent96e6a0bc89e2585b9ed65f699450f6c52ee6aadccommit | diff
av_fetch(): use AvFILLp rather than AvFILL

The point in the code which uses AvFILL will never be reached if the array
is tied, so use AvFILLp insead, which directly accesses the xav_fill
field.

This only affects the $a[-N] branch: the $a[+N] branch already uses
AvFILLp().
av.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.