In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/2a1ad507ca14941c188efa2bb30bbb80907ac368?hp=3714fdb00852daf04028a7d28acc3645336b1899>
- Log ----------------------------------------------------------------- commit 2a1ad507ca14941c188efa2bb30bbb80907ac368 Author: Father Chrysostomos <spr...@cpan.org> Date: Sun Jul 17 14:14:53 2016 -0700 Fix failing uninit test on 64-bit-int builds On 32-bit builds with 64-bit ints, pack "q" works, but pointers and array subscripts are still 32-bit numbers, so the test will fail. Actually check the pointers size via pack "p". ----------------------------------------------------------------------- Summary of changes: t/lib/warnings/9uninit | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/t/lib/warnings/9uninit b/t/lib/warnings/9uninit index cf49c4b..7fbf442 100644 --- a/t/lib/warnings/9uninit +++ b/t/lib/warnings/9uninit @@ -2161,7 +2161,7 @@ Use of uninitialized value $v in integer addition (+) at - line 11. Use of uninitialized value $x in integer subtraction (-) at - line 13. ######## # NAME 64-bit array subscripts -# SKIP ? eval { my $q = pack "q", 0 }; $@ +# SKIP ? length(pack "p", "") < 8 use warnings 'uninitialized'; # aelem + const -- Perl5 Master Repository