diff options
| author | Karl Williamson <khw@cpan.org> | 2015-12-23 11:29:08 -0700 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2015-12-23 11:37:23 -0700 |
| commit | a5ba45410beb64969d89cc1ea5f29ed2c18ccd73 (patch) | |
| tree | 1d5fdb8e6665edfc03f38660159017cd9a02ab2d /t/thread_it.pl | |
| parent | 96644a2c903dd02546994c154d580ce95f830f3b (diff) | |
| download | perl-a5ba45410beb64969d89cc1ea5f29ed2c18ccd73.tar.gz | |
t/thread_it.pl: Increase stack size for AIX
This is enough to get the smoker to pass t/re/pat_thr.t
Diffstat (limited to 't/thread_it.pl')
| -rw-r--r-- | t/thread_it.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/t/thread_it.pl b/t/thread_it.pl index 7fc145aeb9..6dcc807634 100644 --- a/t/thread_it.pl +++ b/t/thread_it.pl @@ -31,10 +31,12 @@ note('running tests in a new thread'); # recurses heavily, and busts the default stack size (65536 on PA-RISC) # On Mac OS X under gcc and g++, the default stack size is also too small. # Ditto on VMS, although threshold varies by platform and -Dusevmsdebug. +# Same on AIX my $curr = threads->create({ stack_size => $^O eq 'hpux' ? 524288 : $^O eq 'darwin' ? 1000000: - $^O eq 'VMS' ? 150000 : 0, + $^O eq 'VMS' ? 150000 : + $^O eq 'aix' ? 1000000 : 0, }, sub { run_tests(); return defined &curr_test ? curr_test() : () |