X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FLexical-Types.git;a=blobdiff_plain;f=t%2F70-scope.t;h=16cd130220968372787ba8dae25b424ff15753bd;hp=e62ceb0e53f6101d8ce1d4c5a4fc6c05771c80b3;hb=f954475502b63b7c2c7a95f3698ba1d1b0654972;hpb=4827778f0445d5d7a4a4612f8c72af3eaba7517d 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 ],