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: ab08a36) | patch
Fix [perl #85508] regression in print length undef
authorDavid Leadbeater <dgl@dgl.cx>
Sun, 6 Mar 2011 15:19:57 +0000 (15:19 +0000)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 6 Mar 2011 21:13:14 +0000 (13:13 -0800)
commit9407f9c16f7d184b9b5524ddf3659d961e6a5f14
tree23c0233fcbbc3b70b0190a5b2310280f91439a96tree | snapshot
parentab08a362aba1ac5dacd58ee13d77e9faf693e7e3commit | diff
Fix [perl #85508] regression in print length undef

length was returning a temporary copy of undef, this meant it didn't
generate a warning when used uninitialised. Return PL_sv_undef but
also ensure TARG is cleared if needed.
pp.c diff | blob | blame | history
t/op/length.t diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.