util.c: mktime needs to run under a mutex

per the Posix standard
Perl · May 5, 2021 · 49b3bb5 · 49b3bb5
1 parent 287ebe8
commit 49b3bb5
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/util.c b/util.c
@@ -4203,7 +4203,9 @@ giving localized results.
   STMT_START {
     struct tm mytm2;
     mytm2 = mytm;
+    MKTIME_LOCK;
     mktime(&mytm2);
+    MKTIME_UNLOCK;
 #ifdef HAS_TM_TM_GMTOFF
     mytm.tm_gmtoff = mytm2.tm_gmtoff;
 #endif