diff options
author | Karl Williamson <khw@cpan.org> | 2022-03-28 13:29:17 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2022-03-28 16:40:41 -0600 |
commit | 01175909acf5b4316afe880c9ddaf3e3bc89a471 (patch) | |
tree | ab84dce20566d5a6fe45427d0a6df36221874668 /t/loc_tools.pl | |
parent | e8c3ef4a2a5c08a4c5f3fa7e6d4cda579068adbd (diff) | |
download | perl-01175909acf5b4316afe880c9ddaf3e3bc89a471.tar.gz |
t/loc_tools.pl: Skip locale tests on z/OS threaded
setlocale() is a no-op on this system after the first thread is created,
making it an outlier of platforms, so the tests assume otherwise, hence
would fail.
Diffstat (limited to 't/loc_tools.pl')
-rw-r--r-- | t/loc_tools.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/t/loc_tools.pl b/t/loc_tools.pl index 46db3dce5f..9a3e0c715d 100644 --- a/t/loc_tools.pl +++ b/t/loc_tools.pl @@ -257,6 +257,7 @@ sub locales_enabled(;$) { # threads, for the purposes of testing, we consider the main thread safe, # and all other threads unsafe. if (! ${^SAFE_LOCALES}) { + return 0 if $^O eq 'os390'; # Threaded locales don't work well here require threads; return 0 if threads->tid() != 0; } |