# Currently 59*4096 is the minimum stack size to just get t/re/pat_thr.t to
# pass on HP-UX 64bit PA-RISC. The test for capture buffers (eg \87)
# 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.
my $curr = threads->create({
- stack_size => 524288,
+ stack_size => $^O eq 'hpux' ? 524288 :
+ $^O eq 'darwin' ? 1000000:
+ $^O eq 'VMS' ? 150000 : 0,
}, sub {
run_tests();
return defined &curr_test ? curr_test() : ()