From: Vincent Pit Date: Sat, 14 Mar 2015 02:44:24 +0000 (-0300) Subject: Bump perl dependency to 5.8.4 X-Git-Tag: v0.14~1 X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLexical-Types.git;a=commitdiff_plain;h=f954475502b63b7c2c7a95f3698ba1d1b0654972 Bump perl dependency to 5.8.4 This lets us remove some flaky test exceptions. --- diff --git a/Makefile.PL b/Makefile.PL index 49d5e08..4ab4e03 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -1,4 +1,4 @@ -use 5.008_003; +use 5.008_004; use strict; use warnings; @@ -89,7 +89,7 @@ WriteMakefile( @DEFINES, BUILD_REQUIRES => \%BUILD_REQUIRES, PREREQ_PM => \%PREREQ_PM, - MIN_PERL_VERSION => '5.008003', + MIN_PERL_VERSION => '5.008004', META_MERGE => \%META, dist => { PREOP => "pod2text -u $file > \$(DISTVNAME)/README", diff --git a/lib/Lexical/Types.pm b/lib/Lexical/Types.pm index a47bf4d..91c9a10 100644 --- a/lib/Lexical/Types.pm +++ b/lib/Lexical/Types.pm @@ -1,6 +1,6 @@ package Lexical::Types; -use 5.008_003; +use 5.008_004; use strict; use warnings; @@ -280,7 +280,7 @@ This is due to a shortcoming in the way perl handles the hints hash, which is ad =head1 DEPENDENCIES -L 5.8.3. +L 5.8.4. A C compiler. This module may happen to build with a C++ compiler as well, but don't rely on it, as no guarantee is made in this regard. diff --git a/t/21-scalar-padsv.t b/t/21-scalar-padsv.t index 139b72d..b1a2688 100644 --- a/t/21-scalar-padsv.t +++ b/t/21-scalar-padsv.t @@ -32,10 +32,7 @@ my @lines; sub Int::TYPEDSCALAR { push @lines, (caller(0))[2]; () } -SKIP: { - skip 'Broken with threaded perls before 5.8.4' => 1 - if $Config{useithreads} and "$]" < 5.008_004; - +{ use Lexical::Types as => sub { # In 5.10, this closure is compiled before hints are enabled, so no hintseval # op is added at compile time to propagate the hints inside the eval. diff --git a/t/70-scope.t b/t/70-scope.t index e62ceb0..16cd130 100644 --- a/t/70-scope.t +++ b/t/70-scope.t @@ -39,7 +39,6 @@ use lib 't/lib'; ::is($z, __FILE__.':6', 'pragma in use at the end'); } TESTREQUIRED3 - @w = grep !/^warn:Attempt\s+to\s+free\s+unreferenced/, @w if "$]" <= 5.008_003; is $@, '', 'third require test didn\'t croak prematurely'; is_deeply \@w, [ ], 'third require test didn\'t warn'; is_deeply \@decls, [ map "Int3$_", qw ],