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: 5edbc4f) | patch
[perl #119481] Check SvVALID for !SvSCREAM, skip PAD
authorReini Urban <rurban@x-ray.at>
Tue, 27 Aug 2013 16:52:28 +0000 (11:52 -0500)
committerFather Chrysostomos <sprout@cpan.org>
Wed, 4 Sep 2013 00:56:49 +0000 (17:56 -0700)
commit654c0d3f0e3795c2f964dc3db8cb15bb86bcfa50
tree50e8df85476f2e814621fc47a73efef72c48bc3etree | snapshot
parent5edbc4ffd619bf985c0d95ab3981022eea5bcc99commit | diff
[perl #119481] Check SvVALID for !SvSCREAM, skip PAD

SVpad_NAME = SVp_SCREAM|SVpbm_VALID
Subsequently OUR, TYPED and STATE pads all have SVp_SCREAM set.
SVpad_NAME shares the same bit with SVpbm_VALID, so avoid checking
PADs for SVpbm_VALID.
sv.h diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.