Commit c04a9d786d for perl
commit c04a9d786d6d36c29e452e9e658a11a4c39838c7
Author: Karl Williamson <khw@cpan.org>
Date: Thu Sep 24 08:51:10 2026 -0600
Cut running time of locale_threads.t in thread-safe emulation
Emulation takes longer than non-emulation. This was resulting in
unacceptable run times of this test file. I have revised the test to
use fewer threads and iterations when running under thread-safe
emulation.
This is about the lower limit I think is acceptable to still adequately
test for race conditions., After doing this, on FreeBSD with
TEST_JOBS=7, this test finishes well before the suite as a whole.
diff --git a/lib/locale_threads.t b/lib/locale_threads.t
index 86036f02a6..0be2f81ed6 100644
--- a/lib/locale_threads.t
+++ b/lib/locale_threads.t
@@ -494,8 +494,8 @@ sub min {
# Smokes have shown this to be about the maximum numbers some platforms can
# handle. khw has tried 500 threads/1000 iterations on Linux
-my $thread_count = 15;
-my $iterations = 100;
+my $thread_count = (${^SAFE_LOCALES} == 1) ? 15 : 10;
+my $iterations = (${^SAFE_LOCALES} == 1) ? 100 : 50;
my $alarm_clock = (1 * 10 * 60); # A long time, just to prevent hanging