Differences From Artifact [167b5c2af0]:

• File library/clock.tcl — part of check-in [91d49f1279] at 2021-02-22 15:39:59 on branch sebres-8-6-clock-speedup-cr2 — Better solution for msvc OPTS=static,msvcrt regression: On win32 we cannot thrust the getenv() function, so use _wgetenv() (user: jan.nijtmans size: 60288) [more...]

To Artifact [336bedbbc8]:

• File library/clock.tcl — part of check-in [1ea9fc6200] at 2024-03-12 01:33:38 on branch sebres-8-6-clock-speedup-cr2 — consider TZ-epoch in base-cache (ensure cache of base is correct for :localtime if TZ changing) (user: sebres size: 60180)

964
965
966
967
968
969
970
971
972
973
974

975
976
977
978
979
980
981

964
965
966
967
968
969
970




971
972
973
974
975
976
977
978

-
-
-
-
+

	variable TimeZoneBad
	if { [dict exists $TimeZoneBad $timezone] } {
	    return -code error \
		-errorcode [list CLOCK badTimeZone $timezone] \
		"time zone \"$timezone\" not found"
	}
	variable MINWIDE
	if { $timezone eq {:localtime} } {
	    # Nothing to do, we'll convert using the localtime function

	} elseif {
	if {
	    [regexp {^([-+])(\d\d)(?::?(\d\d)(?::?(\d\d))?)?} $timezone \
		    -> s hh mm ss]
	} then {
	    # Make a fixed offset

	    ::scan $hh %d hh
	    if { $mm eq {} } {