Tcl Source Code

Artifact [4741cefeab]
Login

Artifact 4741cefeab8bee719647d640eaae6f016365727a13446852411f7a4259f48c7a:

Attachment "47902ec47ade.diff" to ticket [47902ec47a] added by chrstphrchvz 2023-09-20 22:24:44.
diff --git generic/tclClock.c generic/tclClock.c
index 194cfb3676..937b199b65 100644
--- generic/tclClock.c
+++ generic/tclClock.c
@@ -1724,7 +1724,7 @@ ThreadSafeLocalTime(
 	Tcl_MutexUnlock(&clockMutex);
 	return NULL;
     }
-    memcpy(tmPtr, localtime(timePtr), sizeof(struct tm));
+    memcpy(tmPtr, sysTmPtr, sizeof(struct tm));
     Tcl_MutexUnlock(&clockMutex);
 #endif
     return tmPtr;