diff options
author | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2020-04-02 23:03:11 +0100 |
---|---|---|
committer | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2020-04-02 23:14:38 +0100 |
commit | fc204a7a99f305920abec395f87fcd1c1ac37905 (patch) | |
tree | f0b4aab11aa60b27192a81733f61c3c5c0de2dd1 /dist | |
parent | 33208b8d0dac817fe1bed75f485d65c3cc5a32ab (diff) | |
download | perl-fc204a7a99f305920abec395f87fcd1c1ac37905.tar.gz |
Storable: Fix t/huge.t PERL_TEST_MEMORY diagnostic messages
Commit be827e1bf8824a339ec2b5f6f58542e456157bce fixed the checks to
match what was actually required, but failed to adjus the diagnostic
messages when the requirement was not satisfied.
Diffstat (limited to 'dist')
-rw-r--r-- | dist/Storable/t/huge.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/dist/Storable/t/huge.t b/dist/Storable/t/huge.t index d28e238e7a..09b173ebd3 100644 --- a/dist/Storable/t/huge.t +++ b/dist/Storable/t/huge.t @@ -63,7 +63,7 @@ if ($Config{ptrsize} > 4 and !$has_too_many) { [ 'huge array', sub { my @x; $x[$huge] = undef; \@x } ]; } else { - diag "skip huge array, need PERL_TEST_MEMORY >= 8"; + diag "skip huge array, need PERL_TEST_MEMORY >= 55"; } } @@ -78,7 +78,7 @@ if (!$has_too_many) { ['huge hash', sub { my %x = (0 .. $huge); \%x } ]; } else { - diag "skip huge hash, need PERL_TEST_MEMORY >= 16"; + diag "skip huge hash, need PERL_TEST_MEMORY >= 96"; } } |