threads: thread_locale_init/term() needs 5.27.9 or later

tonycoz · Jul 11, 2024 · 336a5a0 · 336a5a0
1 parent fe9fc70
commit 336a5a0
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 2 deletions.
diff --git a/dist/threads/lib/threads.pm b/dist/threads/lib/threads.pm
@@ -5,7 +5,7 @@ use 5.008;
 use strict;
 use warnings;
 
-our $VERSION = '2.40';      # remember to update version in POD!
+our $VERSION = '2.41';      # remember to update version in POD!
 my $XS_VERSION = $VERSION;
 #$VERSION = eval $VERSION;
 
@@ -134,7 +134,7 @@ threads - Perl interpreter-based threads
 
 =head1 VERSION
 
-This document describes threads version 2.40
+This document describes threads version 2.41
 
 =head1 WARNING
 

diff --git a/dist/threads/threads.xs b/dist/threads/threads.xs
@@ -587,7 +587,9 @@ S_ithread_run(void * arg)
     S_set_sigmask(&thread->initial_sigmask);
 #endif
 
+#if PERL_VERSION_GE(5, 27, 9)
     thread_locale_init();
+#endif
 
     PL_perl_destruct_level = 2;
 
@@ -689,7 +691,9 @@ S_ithread_run(void * arg)
     MUTEX_UNLOCK(&thread->mutex);
     MUTEX_UNLOCK(&MY_POOL.create_destruct_mutex);
 
+#if PERL_VERSION_GE(5, 27, 9)
     thread_locale_term();
+#endif
 
     /* Exit application if required */
     if (exit_app) {