This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
t/op/threads-dirh.t: Add ability to skip on memory constrained
authorKarl Williamson <khw@cpan.org>
Thu, 3 Oct 2019 03:07:50 +0000 (21:07 -0600)
committerKarl Williamson <khw@cpan.org>
Wed, 9 Oct 2019 16:34:19 +0000 (10:34 -0600)
This ran out of memory on a very limited smoker; add a check for
environment variable PERL_SKIP_BIG_MEM_TESTS being non-zero to skip
it.

t/op/threads-dirh.t

index e1d5c99..bb4bcfc 100644 (file)
@@ -11,6 +11,7 @@ BEGIN {
      require Config;
      skip_all_without_config('useithreads');
      skip_all_if_miniperl("no dynamic loading on miniperl, no threads");
+     skip_all("runs out of memory on some EBCDIC") if $ENV{PERL_SKIP_BIG_MEM_TESTS};
 
      plan(6);
 }