* generic/tclTimer.c: Removed a premature optimisation that

attempted to store the assoc data in the client data; the
optimisation caused a bug that [after] would overwrite
its imports.  [Bug 1016167]
* library/clock.tcl (InitTZData, ClearCaches): Changed so that the
in-memory time zone :UTC (and its aliases) always gets
reinitialised, in case tzdata is absent. [Bug 1019537, 1023779]
* library/tzdata/*: Regenerated.
* tests/clock.test (clock-31.*, clock-39.1): Corrected a problem
where the 'system' locale tests fail on a non-English Windows
machine. [Bug 1023761].  Added a test to make sure that alias
time zones load correctly. [Bug 1023779].
* tools/tclZIC.tcl (writeLinks): Corrected a problem where
alias time zone names were written incorrectly, causing them
to fail to load at run time. [Bug 1023779].
* win/tclWinTime.c (Tcl_GetTime): Eliminated CPUID tests on
Win64 - assuming that HAL vendors now do a better job of
keeping the performance counters synchronized among CPU's.
[Bug 1020445]

11 files changed, 22 insertions, 22 deletions

diff --git a/library/tzdata/Australia/ACT b/library/tzdata/Australia/ACT
index 61c642f..fc1ff90 100644
--- a/library/tzdata/Australia/ACT
+++ b/library/tzdata/Australia/ACT
@@ -1,5 +1,5 @@
 # created by ../tools/tclZIC.tcl - do not edit
 if {![info exists TZData(Australia/Sydney)]} {
-    loadTimeZoneFile Australia/Sydney
+    LoadTimeZoneFile Australia/Sydney
 }
-set tzdata(:Australia/ACT) $TZData(:Australia/Sydney)
+set TZData(:Australia/ACT) $TZData(:Australia/Sydney)
diff --git a/library/tzdata/Australia/Canberra b/library/tzdata/Australia/Canberra
index 5657852..e285d29 100644
--- a/library/tzdata/Australia/Canberra
+++ b/library/tzdata/Australia/Canberra
@@ -1,5 +1,5 @@
 # created by ../tools/tclZIC.tcl - do not edit
 if {![info exists TZData(Australia/Sydney)]} {
-    loadTimeZoneFile Australia/Sydney
+    LoadTimeZoneFile Australia/Sydney
 }
-set tzdata(:Australia/Canberra) $TZData(:Australia/Sydney)
+set TZData(:Australia/Canberra) $TZData(:Australia/Sydney)
diff --git a/library/tzdata/Australia/LHI b/library/tzdata/Australia/LHI
index df97cad..46fbef8 100644
--- a/library/tzdata/Australia/LHI
+++ b/library/tzdata/Australia/LHI
@@ -1,5 +1,5 @@
 # created by ../tools/tclZIC.tcl - do not edit
 if {![info exists TZData(Australia/Lord_Howe)]} {
-    loadTimeZoneFile Australia/Lord_Howe
+    LoadTimeZoneFile Australia/Lord_Howe
 }
-set tzdata(:Australia/LHI) $TZData(:Australia/Lord_Howe)
+set TZData(:Australia/LHI) $TZData(:Australia/Lord_Howe)
diff --git a/library/tzdata/Australia/NSW b/library/tzdata/Australia/NSW
index 6cea21d..f5b6d1c 100644
--- a/library/tzdata/Australia/NSW
+++ b/library/tzdata/Australia/NSW
@@ -1,5 +1,5 @@
 # created by ../tools/tclZIC.tcl - do not edit
 if {![info exists TZData(Australia/Sydney)]} {
-    loadTimeZoneFile Australia/Sydney
+    LoadTimeZoneFile Australia/Sydney
 }
-set tzdata(:Australia/NSW) $TZData(:Australia/Sydney)
+set TZData(:Australia/NSW) $TZData(:Australia/Sydney)
diff --git a/library/tzdata/Australia/North b/library/tzdata/Australia/North
index ddffd2b..1559bfa 100644
--- a/library/tzdata/Australia/North
+++ b/library/tzdata/Australia/North
@@ -1,5 +1,5 @@
 # created by ../tools/tclZIC.tcl - do not edit
 if {![info exists TZData(Australia/Darwin)]} {
-    loadTimeZoneFile Australia/Darwin
+    LoadTimeZoneFile Australia/Darwin
 }
-set tzdata(:Australia/North) $TZData(:Australia/Darwin)
+set TZData(:Australia/North) $TZData(:Australia/Darwin)
diff --git a/library/tzdata/Australia/Queensland b/library/tzdata/Australia/Queensland
index 78614fe..4055cc3 100644
--- a/library/tzdata/Australia/Queensland
+++ b/library/tzdata/Australia/Queensland
@@ -1,5 +1,5 @@
 # created by ../tools/tclZIC.tcl - do not edit
 if {![info exists TZData(Australia/Brisbane)]} {
-    loadTimeZoneFile Australia/Brisbane
+    LoadTimeZoneFile Australia/Brisbane
 }
-set tzdata(:Australia/Queensland) $TZData(:Australia/Brisbane)
+set TZData(:Australia/Queensland) $TZData(:Australia/Brisbane)
diff --git a/library/tzdata/Australia/South b/library/tzdata/Australia/South
index 5a39e02..576a888 100644
--- a/library/tzdata/Australia/South
+++ b/library/tzdata/Australia/South
@@ -1,5 +1,5 @@
 # created by ../tools/tclZIC.tcl - do not edit
 if {![info exists TZData(Australia/Adelaide)]} {
-    loadTimeZoneFile Australia/Adelaide
+    LoadTimeZoneFile Australia/Adelaide
 }
-set tzdata(:Australia/South) $TZData(:Australia/Adelaide)
+set TZData(:Australia/South) $TZData(:Australia/Adelaide)
diff --git a/library/tzdata/Australia/Tasmania b/library/tzdata/Australia/Tasmania
index 04fd979..e5c686e 100644
--- a/library/tzdata/Australia/Tasmania
+++ b/library/tzdata/Australia/Tasmania
@@ -1,5 +1,5 @@
 # created by ../tools/tclZIC.tcl - do not edit
 if {![info exists TZData(Australia/Hobart)]} {
-    loadTimeZoneFile Australia/Hobart
+    LoadTimeZoneFile Australia/Hobart
 }
-set tzdata(:Australia/Tasmania) $TZData(:Australia/Hobart)
+set TZData(:Australia/Tasmania) $TZData(:Australia/Hobart)
diff --git a/library/tzdata/Australia/Victoria b/library/tzdata/Australia/Victoria
index ada266b..cabe455 100644
--- a/library/tzdata/Australia/Victoria
+++ b/library/tzdata/Australia/Victoria
@@ -1,5 +1,5 @@
 # created by ../tools/tclZIC.tcl - do not edit
 if {![info exists TZData(Australia/Melbourne)]} {
-    loadTimeZoneFile Australia/Melbourne
+    LoadTimeZoneFile Australia/Melbourne
 }
-set tzdata(:Australia/Victoria) $TZData(:Australia/Melbourne)
+set TZData(:Australia/Victoria) $TZData(:Australia/Melbourne)
diff --git a/library/tzdata/Australia/West b/library/tzdata/Australia/West
index 8327e10..2c4e736 100644
--- a/library/tzdata/Australia/West
+++ b/library/tzdata/Australia/West
@@ -1,5 +1,5 @@
 # created by ../tools/tclZIC.tcl - do not edit
 if {![info exists TZData(Australia/Perth)]} {
-    loadTimeZoneFile Australia/Perth
+    LoadTimeZoneFile Australia/Perth
 }
-set tzdata(:Australia/West) $TZData(:Australia/Perth)
+set TZData(:Australia/West) $TZData(:Australia/Perth)
diff --git a/library/tzdata/Australia/Yancowinna b/library/tzdata/Australia/Yancowinna
index 2c1af7f..38f8952 100644
--- a/library/tzdata/Australia/Yancowinna
+++ b/library/tzdata/Australia/Yancowinna
@@ -1,5 +1,5 @@
 # created by ../tools/tclZIC.tcl - do not edit
 if {![info exists TZData(Australia/Broken_Hill)]} {
-    loadTimeZoneFile Australia/Broken_Hill
+    LoadTimeZoneFile Australia/Broken_Hill
 }
-set tzdata(:Australia/Yancowinna) $TZData(:Australia/Broken_Hill)
+set TZData(:Australia/Yancowinna) $TZData(:Australia/Broken_Hill)