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: 515abc4) | patch
Restore NULL check to gv.c:newGP, removed by 19bad673
authorFather Chrysostomos <sprout@cpan.org>
Sat, 10 Aug 2013 17:46:43 +0000 (10:46 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 11 Aug 2013 17:53:35 +0000 (10:53 -0700)
commitcb0d3385a7bb30bc0aaa2ada8f6f21fe3554ec32
treee640e85f8997654f0f4165410c0e620becd79169tree | snapshot
parent515abc43ad7e359e9f2f1fedb73378c13fd16348commit | diff
Restore NULL check to gv.c:newGP, removed by 19bad673

1df5f7c195 added checks to newGP to account for PL_curcop being NULL.
19bad673 inadvertently removed the NULL check for non-threaded builds,
except in one spot.

Since S_cop_free now sets PL_curcop to NULL as of the previous commit
(something 1df5f7c195 was meant to do but didn’t), this check is a
good idea, even though PL_curcop is never NULL here.

See also <20130805200313.GS3729@plum.flirble.org>.
gv.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.