merge 8.5

Revert the Tcl_GetsObj portion of the last commit.
Although it fixed the bug demonstrated by the test io-33.12, it caused new breakage in [gets] not yet understood. Test io-33.12 left in place to prompt further work.
2014-10-17 20:38:25 +00:00 · 2014-10-17 20:37:45 +00:00 · 2014-10-17 15:30:21 +00:00
190 changed files with 3676 additions and 4629 deletions
@@ -1,5 +1,5 @@
 README:  Tcl
-    This is the Tcl 8.6.4 source distribution.
+    This is the Tcl 8.6.2 source distribution.
 	http://sourceforge.net/projects/tcl/files/Tcl/
    You can get any source release of Tcl from the URL above.

@@ -8303,11 +8303,11 @@ reported usage of large expressions (porter)

 Many optmizations, improvements, and tightened stack management in bytecode.

--- Released 8.6.1, September 20, 2013 --- http://core.tcl.tk/tcl/ for details
+--- Released 8.6.1, September 20, 2013 --- http://core.tcl.tk/tcl/ for details 

 2013-09-27 (enhancement) improved ::env synchronization (fellows)

-2013-10-20 (bug fix)[2835313] segfault from
+2013-10-20 (bug fix)[2835313] segfault from 
 [apply {{} {while 1 {a {*}[return -level 0 -code continue]}}}] (fellows)

 2013-10-22 (bug fix)[3556215] [scan %E%G%X] support (fellows)
@@ -8451,80 +8451,4 @@ include ::oo::class (fellows)

 2014-08-25 (TIP 429) New command [string cat] (leitgeb,ferrieux)

--- Released 8.6.2, August 27, 2014 --- http://core.tcl.tk/tcl/ for details
-
-2014-08-28 (bug)[b9e1a3] Correct Method Search Order (nadkarni,fellows)
-=> TclOO 1.0.3
-        *** POTENTIAL INCOMPATIBILITY ***
-
-2014-09-05 (bug)[ccc2c2] Regression [lreplace {} 1 1] (bron,fellows)
-
-2014-09-08 (bug)<oo-1.18.2> Crash regression in [oo::class destroy] (porter)
-
-2014-09-09 (bug)[84af11] Regress [regsub -all {\(.*} a(b) {}] (fellows)
-
-2014-09-10 (bug)[cee90e] [try {} on ok {} - on return {} {}] panic (porter)
-
-2014-09-20 (feature) [tcl::unsupported::getbytecode] disassember (fellows)
-
-2014-09-27 (enhancement) [string cat] bytecode optimization (leitgeb,ferrieux)
-
-2014-09-27 (bug)[82521b] segfault in mangled bytecode (ogilvie,sofer)
-
-2014-10-02 (bug)[bc5b79] Hang in some [read]s of limited size (rogers,porter)
-
-2014-10-03 (bug)[bc1a96] segfault in [array set] of traced array (tab,porter)
-
-2014-10-08 (bug)[59a2e7] MSVC14 compile support (dower,nijtmans)
-
-2014-10-10 (bug)[ed29c4] [fcopy] treats [blocked] as error (rowen,porter)
-
-2014-10-10 (bug)[bf7135] regression in Tcl_Write() interface (porter)
-
-2014-10-18 (bug)[10dc6d] fix [gets] on non-blocking channels (fassel,porter)
-
-2014-10-26 Support for Windows 10 (nijtmans)
-
-2014-10-31 (bug)[dcc034] restore [open comX: r+] (lll,nijtmans)
-
-2014-11-05 (bug)[214cc0] Restore [lappend v] return value (sayers,porter)
-
-2014-11-06 (bug)[5adc35] Stop forcing EOF to be permanent (porter)
-
--- Released 8.6.3, November 12, 2014 --- http://core.tcl.tk/tcl/ for details
-
-2014-11-21 (bug)[743338] Win: socket error encoding (ladayaroslav,nijtmans)
-
-2014-12-01 (bug) restore tbcload/tclcompiler support (kupries)
-
-2014-12-03 (bug)[0c043a] Fix compiled [set var($) val] (porter)
-
-2014-12-04 (bug)[d2ffcc] Limit $... and bareword parsing to ASCII (ladayaroslav,porter)
-        *** POTENTIAL INCOMPATIBILITY ***
-
-2014-12-06 (bug)[c6cd4a] Win: hang in async socket connection (shults,nadkarni)
-
-2014-12-10 tzdata updated to Olson's tzdata2014j (venkat)
-
-2014-12-13 fix header files installation on OS X (houben)
-
-2014-12-17 (TIP 427) [fconfigure $h -connecting, -peername, -sockname] (oehlmann,rmax)
-
-2014-12-18 (bug)[af08c8] Crash in full finalize encoding teardown (porter)
-
-2014-12-18 (bug)[7c187a] [chan copy] crash (io-53.17) (benno,porter)
-
-2015-01-26 (bug)[df0848] Trouble with INFINITY macro (dower,nijtmans)
-
-2015-01-29 (bug) Stop crashes when extension var resolvers misbehave (porter)
-
-2015-01-29 (bug)[088727] [read] past EOF (io-73.4) (fenugrec,porter)
-
-2015-02-11 tzdata updated to Olson's tzdata2015a (venkat)
-
-2015-02-20 (bug)[32b615] Fix compiled [lreplace] (lreplace-4.[345]) (aspect)
-
-2015-03-10 (enhancement) Revise OS X notifier for better Cocoa (walzer)
-        *** POTENTIAL INCOMPATIBILITY ***
-
--- Released 8.6.4, March 12, 2015 --- http://core.tcl.tk/tcl/ for details
+--- Released 8.6.2, August 27, 2014 --- http://core.tcl.tk/tcl/ for details 
@@ -0,0 +1,22 @@
+/*
+ * limits.h --
+ *
+ *	This is a dummy header file to #include in Tcl when there
+ *	is no limits.h in /usr/include.  There are only a few
+ *	definitions here;  also see tclPort.h, which already
+ *	#defines some of the things here if they're not arleady
+ *	defined.
+ *
+ * Copyright (c) 1991 The Regents of the University of California.
+ * Copyright (c) 1994 Sun Microsystems, Inc.
+ *
+ * See the file "license.terms" for information on usage and redistribution
+ * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
+ */
+
+#define LONG_MIN		0x80000000
+#define LONG_MAX		0x7fffffff
+#define INT_MIN			0x80000000
+#define INT_MAX			0x7fffffff
+#define SHRT_MIN		0x8000
+#define SHRT_MAX		0x7fff
@@ -336,7 +336,7 @@ typedef struct Tcl_ChannelType {
 It is not necessary to provide implementations for all channel
 operations.  Those which are not necessary may be set to NULL in the
 struct: \fIblockModeProc\fR, \fIseekProc\fR, \fIsetOptionProc\fR,
-\fIgetOptionProc\fR, \fIgetHandleProc\fR, and \fIclose2Proc\fR, in addition to
+\fIgetOptionProc\fR, and \fIclose2Proc\fR, in addition to
 \fIflushProc\fR, \fIhandlerProc\fR, \fIthreadActionProc\fR, and
 \fItruncateProc\fR.  Other functions that cannot be implemented in a
 meaningful way should return \fBEINVAL\fR when called, to indicate
@@ -257,13 +257,47 @@ is filled with the corresponding number of bytes that were stored in
 .PP
 \fBTcl_WinUtfToTChar\fR and \fBTcl_WinTCharToUtf\fR are
 Windows-only convenience
-functions for converting between UTF-8 and Windows strings
-based on the TCHAR type which is by convention
-a Unicode character on Windows NT.
-These functions are essentially wrappers around
-\fBTcl_UtfToExternalDString\fR and
-\fBTcl_ExternalToUtfDString\fR that convert to and from the
-Unicode encoding.
+functions for converting between UTF-8 and Windows strings.  On Windows 95
+(as with the Unix operating system),
+all strings exchanged between Tcl and the operating system are
+.QW "char"
+based.  On Windows NT, some strings exchanged between Tcl and the
+operating system are
+.QW "char"
+oriented while others are in Unicode.  By
+convention, in Windows a TCHAR is a character in the ANSI code page
+on Windows 95 and a Unicode character on Windows NT.
+.PP
+If you planned to use the same
+.QW "char"
+based interfaces on both Windows
+95 and Windows NT, you could use \fBTcl_UtfToExternal\fR and
+\fBTcl_ExternalToUtf\fR (or their \fBTcl_DString\fR equivalents) with an
+encoding of NULL (the current system encoding).  On the other hand,
+if you planned to use the Unicode interface when running on Windows NT
+and the
+.QW "char"
+interfaces when running on Windows 95, you would have
+to perform the following type of test over and over in your program
+(as represented in pseudo-code):
+.PP
+.CS
+if (running NT) {
+    encoding <- Tcl_GetEncoding("unicode");
+    nativeBuffer <- Tcl_UtfToExternal(encoding, utfBuffer);
+    Tcl_FreeEncoding(encoding);
+} else {
+    nativeBuffer <- Tcl_UtfToExternal(NULL, utfBuffer);
+}
+.CE
+.PP
+\fBTcl_WinUtfToTChar\fR and \fBTcl_WinTCharToUtf\fR automatically
+handle this test and use the proper encoding based on the current
+operating system.  \fBTcl_WinUtfToTChar\fR returns a pointer to
+a TCHAR string, and \fBTcl_WinTCharToUtf\fR expects a TCHAR string
+pointer as the \fIsrc\fR string.  Otherwise, these functions
+behave identically to \fBTcl_UtfToExternalDString\fR and
+\fBTcl_ExternalToUtfDString\fR.
 .PP
 \fBTcl_GetEncodingName\fR is roughly the inverse of \fBTcl_GetEncoding\fR.
 Given an \fIencoding\fR, the return value is the \fIname\fR argument that
@@ -9,7 +9,7 @@
 .so man.macros
 .BS
 .SH NAME
-Tcl_ConditionNotify, Tcl_ConditionWait, Tcl_ConditionFinalize, Tcl_GetThreadData, Tcl_MutexLock, Tcl_MutexUnlock, Tcl_MutexFinalize, Tcl_MutexUnlockAndFinalize, Tcl_CreateThread, Tcl_JoinThread \- Tcl thread support
+Tcl_ConditionNotify, Tcl_ConditionWait, Tcl_ConditionFinalize, Tcl_GetThreadData, Tcl_MutexLock, Tcl_MutexUnlock, Tcl_MutexFinalize, Tcl_CreateThread, Tcl_JoinThread \- Tcl thread support
 .SH SYNOPSIS
 .nf
 \fB#include <tcl.h>\fR
@@ -35,9 +35,6 @@ void
 void
 \fBTcl_MutexFinalize\fR(\fImutexPtr\fR)
 .sp
-void
-\fBTcl_MutexUnlockAndFinalize\fR(\fImutexPtr\fR)
-.sp
 int
 \fBTcl_CreateThread\fR(\fIidPtr, proc, clientData, stackSize, flags\fR)
 .sp
@@ -141,16 +138,11 @@ A mutex is a lock that is used to serialize all threads through a piece
 of code by calling \fBTcl_MutexLock\fR and \fBTcl_MutexUnlock\fR.
 If one thread holds a mutex, any other thread calling \fBTcl_MutexLock\fR will
 block until \fBTcl_MutexUnlock\fR is called.
-A mutex can be destroyed after its use by calling \fBTcl_MutexFinalize\fR or
-\fBTcl_MutexUnlockAndFinalize\fR.  The \fBTcl_MutexFinalize\fR function may
-only be used on unlocked mutexes; otherwise, its behavior is undefined.  The
-\fBTcl_MutexUnlockAndFinalize\fR function may only be used on locked mutexes;
-otherwise, its behavior is undefined.
+A mutex can be destroyed after its use by calling \fBTcl_MutexFinalize\fR.
 The result of locking a mutex twice from the same thread is undefined.
 On some platforms it will result in a deadlock.
-The \fBTcl_MutexLock\fR, \fBTcl_MutexUnlock\fR, \fBTcl_MutexFinalize\fR, and
-\fBTcl_MutexUnlockAndFinalize\fR procedures are defined as empty macros if
-not compiling with threads enabled.
+The \fBTcl_MutexLock\fR, \fBTcl_MutexUnlock\fR and \fBTcl_MutexFinalize\fR
+procedures are defined as empty macros if not compiling with threads enabled.
 For declaration of mutexes the \fBTCL_DECLARE_MUTEX\fR macro should be used.
 This macro assures correct mutex handling even when the core is compiled
 without threads enabled.
@@ -184,8 +176,8 @@ They are implemented as opaque pointers that should be NULL
 upon first use.
 The mutexes and condition variables are
 either cleaned up by process exit handlers (if living that long) or
-explicitly by calls to \fBTcl_MutexFinalize\fR (or
-\fBTcl_MutexUnlockAndFinalize\fR) and \fBTcl_ConditionFinalize\fR.
+explicitly by calls to \fBTcl_MutexFinalize\fR or
+\fBTcl_ConditionFinalize\fR.
 Thread local storage is reclaimed during \fBTcl_FinalizeThread\fR.
 .SH "SCRIPT-LEVEL ACCESS TO THREADS"
 .PP
@@ -269,13 +269,17 @@ present, as is done when launching applications under wish.  It is desirable
 to have console applications hidden and detached.  This is a designed-in
 limitation as \fBexec\fR wants to communicate over pipes.  The Expect
 extension addresses this issue when communicating with a TUI application.
-.PP
+.RE
+.TP
+\fBWindows NT\fR
+.
 When attempting to execute an application, \fBexec\fR first searches for
 the name as it was specified.  Then, in order, \fB.com\fR, \fB.exe\fR, and
 \fB.bat\fR are appended to the end of the specified name and it searches
 for the longer name.  If a directory name was not specified as part of the
 application name, the following directories are automatically searched in
 order when attempting to locate the application:
+.RS
 .IP \(bu 3
 The directory from which the Tcl executable was loaded.
 .IP \(bu 3
@@ -295,6 +299,67 @@ the caller must prepend the desired command with
 because built-in commands are not implemented using executables.
 .RE
 .TP
+\fBWindows 9x\fR
+.
+When attempting to execute an application, \fBexec\fR first searches for
+the name as it was specified.  Then, in order, \fB.com\fR, \fB.exe\fR, and
+\fB.bat\fR are appended to the end of the specified name and it searches
+for the longer name.  If a directory name was not specified as part of the
+application name, the following directories are automatically searched in
+order when attempting to locate the application:
+.RS
+.IP \(bu 3
+The directory from which the Tcl executable was loaded.
+.IP \(bu 3
+The current directory.
+.IP \(bu 3
+The Windows 9x system directory.
+.IP \(bu 3
+The Windows 9x home directory.
+.IP \(bu 3
+The directories listed in the path.
+.RE
+.RS
+.PP
+In order to execute shell built-in commands like \fBdir\fR and \fBcopy\fR,
+the caller must prepend the desired command with
+.QW "\fBcommand.com /c\0\fR"
+because built-in commands are not implemented using executables.
+.PP
+Once a 16-bit DOS application has read standard input from a console and 
+then quit, all subsequently run 16-bit DOS applications will see the 
+standard input as already closed.  32-bit applications do not have this
+problem and will run correctly, even after a 16-bit DOS application thinks 
+that standard input is closed.  There is no known workaround for this bug
+at this time.
+.PP
+Redirection between the \fBNUL:\fR device and a 16-bit application does not
+always work.  When redirecting from \fBNUL:\fR, some applications may hang,
+others will get an infinite stream of
+.QW 0x01
+bytes, and some will actually
+correctly get an immediate end-of-file; the behavior seems to depend upon 
+something compiled into the application itself.  When redirecting greater than
+4K or so to \fBNUL:\fR, some applications will hang.  The above problems do not
+happen with 32-bit applications.  
+.PP
+All DOS 16-bit applications are run synchronously.  All standard input from
+a pipe to a 16-bit DOS application is collected into a temporary file; the
+other end of the pipe must be closed before the 16-bit DOS application
+begins executing.  All standard output or error from a 16-bit DOS
+application to a pipe is collected into temporary files; the application
+must terminate before the temporary files are redirected to the next stage
+of the pipeline.  This is due to a workaround for a Windows 95 bug in the
+implementation of pipes, and is how the standard Windows 95 DOS shell
+handles pipes itself.
+.PP
+Certain applications, such as \fBcommand.com\fR, should not be executed
+interactively.  Applications which directly access the console window,
+rather than reading from their standard input and writing to their standard
+output may fail, hang Tcl, or even hang the system if their own private
+console window is not available to them.
+.RE
+.TP
 \fBUnix\fR (including Mac OS X)
 .
 The \fBexec\fR command is fully functional and works as described.
@@ -241,9 +241,11 @@ as relative to the cwd).  Furthermore,
 paths are always expanded
 to absolute form.  When creating links on filesystems that either do not
 support any links, or do not support the specific type requested, an
-error message will be returned.  Most Unix platforms support both
-symbolic and hard links (the latter for files only). Windows
-supports symbolic directory links and hard file links on NTFS drives.
+error message will be returned.  In particular Windows 95, 98 and ME do
+not support any links at present, but most Unix platforms support both
+symbolic and hard links (the latter for files only) and Windows
+NT/2000/XP (on NTFS drives) support symbolic
+directory links and hard file links.
 .RE
 .TP
 \fBfile lstat \fIname varName\fR
@@ -204,7 +204,13 @@ of the form
 it refers to the home
 directory of the user whose account information resides on the specified NT
 domain server. Otherwise, user account information is obtained from
-the local computer.
+the local computer. On Windows 95 and 98, \fBglob\fR accepted patterns
+like
+.QW .../
+and
+.QW ..../
+for successively higher up parent directories, but later versions of
+Windows do not accept these forms.
 .PP
 Since the backslash character has a special meaning to the glob
 command, glob patterns containing Windows style path separators need
@@ -96,11 +96,9 @@ forward to the proper implementation of the method (which it does by invoking
 the \fBnext\fR command as filters are inserted into the front of the method
 call chain) and is responsible for returning the result of \fBnext\fR.
 .PP
-Filters are invoked when processing an invokation of the \fBunknown\fR
-method because of a failure to locate a method implementation, but \fInot\fR
-when invoking either constructors or destructors. (Note however that the
-\fBdestroy\fR method is a conventional method, and filters are invoked as
-normal when it is called.)
+Filters are not invoked when processing an invocation of the \fBunknown\fR
+method because of a failure to locate a method implementation, or when
+invoking either constructors or destructors.
 .SH EXAMPLES
 .PP
 This example demonstrates how to use the \fBnext\fR command to call the
@@ -361,28 +361,63 @@ may cause this error.
 A BREAK condition has been detected by your UART (see above).
 .SH "PORTABILITY ISSUES"
 .TP
-\fBWindows \fR
+\fBWindows \fR(all versions)
 .
 Valid values for \fIfileName\fR to open a serial port are of the form
-\fBcom\fIX\fB\fR, where \fIX\fR is a number, generally from 1 to 9.
-A legacy form accepted as well is \fBcom\fIX\fB:\fR. This notation only
-works for serial ports from 1 to 9.  An attempt to open a serial port that
+\fBcom\fIX\fB:\fR, where \fIX\fR is a number, generally from 1 to 4.
+This notation only works for serial ports from 1 to 9, if the system
+happens to have more than four.  An attempt to open a serial port that
 does not exist or has a number greater than 9 will fail.  An alternate
-form of opening serial ports is to use the filename \fB//./comX\fR,
-where X is any number that corresponds to a serial port.
-.PP
-.RS
+form of opening serial ports is to use the filename \fB\e\e.\ecomX\fR,
+where X is any number that corresponds to a serial port; please note
+that this method is considerably slower on Windows 95 and Windows 98.
+.TP
+\fBWindows NT\fR
+.
 When running Tcl interactively, there may be some strange interactions
 between the real console, if one is present, and a command pipeline that uses
 standard input or output.  If a command pipeline is opened for reading, some
 of the lines entered at the console will be sent to the command pipeline and
 some will be sent to the Tcl evaluator.  If a command pipeline is opened for
 writing, keystrokes entered into the console are not visible until the
-pipe is closed.  These problems only occur because both Tcl and the child
-application are competing for the console at the same time.  If the command
-pipeline is started from a script, so that Tcl is not accessing the console,
-or if the command pipeline does not use standard input or output, but is
-redirected from or to a file, then the above problems do not occur.  
+pipe is closed.  This behavior occurs whether the command pipeline is
+executing 16-bit or 32-bit applications.  These problems only occur because
+both Tcl and the child application are competing for the console at
+the same time.  If the command pipeline is started from a script, so that Tcl
+is not accessing the console, or if the command pipeline does not use
+standard input or output, but is redirected from or to a file, then the
+above problems do not occur.  
+.TP
+\fBWindows 95\fR 
+.
+A command pipeline that executes a 16-bit DOS application cannot be opened
+for both reading and writing, since 16-bit DOS applications that receive
+standard input from a pipe and send standard output to a pipe run
+synchronously.  Command pipelines that do not execute 16-bit DOS
+applications run asynchronously and can be opened for both reading and
+writing.  
+.RS
+.PP
+When running Tcl interactively, there may be some strange interactions
+between the real console, if one is present, and a command pipeline that uses
+standard input or output.  If a command pipeline is opened for reading from
+a 32-bit application, some of the keystrokes entered at the console will be
+sent to the command pipeline and some will be sent to the Tcl evaluator.  If
+a command pipeline is opened for writing to a 32-bit application, no output
+is visible on the console until the pipe is closed.  These problems only
+occur because both Tcl and the child application are competing for the
+console at the same time.  If the command pipeline is started from a script,
+so that Tcl is not accessing the console, or if the command pipeline does
+not use standard input or output, but is redirected from or to a file, then
+the above problems do not occur.  
+.PP
+Whether or not Tcl is running interactively, if a command pipeline is opened
+for reading from a 16-bit DOS application, the call to \fBopen\fR will not
+return until end-of-file has been received from the command pipeline's
+standard output.  If a command pipeline is opened for writing to a 16-bit DOS
+application, no data will be sent to the command pipeline's standard output
+until the pipe is actually closed.  This problem occurs because 16-bit DOS
+applications are run synchronously, as described above.  
 .RE
 .TP
 \fBUnix\fR\0\0\0\0\0\0\0
@@ -683,33 +683,9 @@ earlier in the RE taking priority over ones starting later. Note that
 outer subexpressions thus take priority over their component
 subexpressions.
 .PP
-The quantifiers \fB{1,1}\fR and \fB{1,1}?\fR can be used to
+Note that the quantifiers \fB{1,1}\fR and \fB{1,1}?\fR can be used to
 force longest and shortest preference, respectively, on a
 subexpression or a whole RE.
-.RS
-.PP
-\fBNOTE:\fR This means that you can usually make a RE be non-greedy overall by
-putting \fB{1,1}?\fR after one of the first non-constraint atoms or
-parenthesized sub-expressions in it. \fIIt pays to experiment\fR with the
-placing of this non-greediness override on a suitable range of input texts
-when you are writing a RE if you are using this level of complexity.
-.PP
-For example, this regular expression is non-greedy, and will match the
-shortest substring possible given that
-.QW \fBabc\fR
-will be matched as early as possible (the quantifier does not change that):
-.PP
-.CS
-ab{1,1}?c.*x.*cba
-.CE
-.PP
-The atom
-.QW \fBa\fR
-has no greediness preference, we explicitly give one for
-.QW \fBb\fR ,
-and the remaining quantifiers are overridden to be non-greedy by the preceding
-non-greedy quantifier.
-.RE
 .PP
 Match lengths are measured in characters, not collating elements. An
 empty string is considered longer than no match at all. For example,
@@ -97,10 +97,6 @@ writable channel event on the socket to get notified when the
 asynchronous connection has succeeded or failed. See the \fBvwait\fR
 and the \fBchan\fR commands for more details on the event loop and
 channel events.
-.PP
-The \fBchan configure\fR option \fB-connecting\fR may be used to check if the connect is still running. To verify a successful connect, the option \fB-error\fR may be checked when \fB-connecting\fR returned 0. 
-.PP
-Operation without the event queue requires at the moment calls to \fBchan configure\fR to advance the internal state machine. 
 .RE
 .SH "SERVER SOCKETS"
 .PP
@@ -190,10 +186,6 @@ sockets, this option returns a list of three elements; these are the
 address, the host name and the port to which the peer socket is connected
 or bound. If the host name cannot be computed, the second element of the
 list is identical to the address, its first element.
-.TP
-\fB\-connecting\fR
-.
-This option is not supported by server sockets. For client sockets, this option returns 1 if an asyncroneous connect is still in progress, 0 otherwise.
 .PP
 .SH "EXAMPLES"
 .PP
@@ -642,6 +642,14 @@ This test can only be run on any Windows platform.
 .
 This test can only be run on any Windows NT platform.
 .TP
+\fI95\fR
+.
+This test can only be run on any Windows 95 platform.
+.TP
+\fI98\fR
+.
+This test can only be run on any Windows 98 platform.
+.TP
 \fImac\fR
 .
 This test can only be run on any Mac platform.
@@ -308,13 +308,18 @@ is the value returned by \fBuname -m\fR.
 \fBos\fR
 .
 The name of the operating system running on this machine,
-such as \fBWindows NT\fR or \fBSunOS\fR.
+such as \fBWindows 95\fR, \fBWindows NT\fR, or \fBSunOS\fR.
 On UNIX machines, this is the value returned by \fBuname -s\fR.
+On Windows 95 and Windows 98, the value returned will be \fBWindows
+95\fR to provide better backwards compatibility to Windows 95; to
+distinguish between the two, check the \fBosVersion\fR.
 .TP
 \fBosVersion\fR
 .
 The version number for the operating system running on this machine.
-On UNIX machines, this is the value returned by \fBuname -r\fR.
+On UNIX machines, this is the value returned by \fBuname -r\fR.  On
+Windows 95, the version will be 4.0; on Windows 98, the version will
+be 4.10.
 .TP
 \fBpathSeparator\fR
 .VS 8.6
@@ -996,13 +996,13 @@ parseqatom(
    switch (v->nexttype) {
    case '*':
 	m = 0;
-	n = DUPINF;
+	n = INFINITY;
 	qprefer = (v->nextvalue) ? LONGER : SHORTER;
 	NEXT();
 	break;
    case '+':
 	m = 1;
-	n = DUPINF;
+	n = INFINITY;
 	qprefer = (v->nextvalue) ? LONGER : SHORTER;
 	NEXT();
 	break;
@@ -1019,7 +1019,7 @@ parseqatom(
 	    if (SEE(DIGIT)) {
 		n = scannum(v);
 	    } else {
-		n = DUPINF;
+		n = INFINITY;
 	    }
 	    if (m > n) {
 		ERR(REG_BADBR);
@@ -1217,8 +1217,8 @@ parseqatom(
 	 */

 	dupnfa(v->nfa, atom->begin, atom->end, s, atom->begin);
-	assert(m >= 1 && m != DUPINF && n >= 1);
-	repeat(v, s, atom->begin, m-1, (n == DUPINF) ? n : n-1);
+	assert(m >= 1 && m != INFINITY && n >= 1);
+	repeat(v, s, atom->begin, m-1, (n == INFINITY) ? n : n-1);
 	f = COMBINE(qprefer, atom->flags);
 	t = subre(v, '.', f, s, atom->end);	/* prefix and atom */
 	NOERR();
@@ -1323,7 +1323,7 @@ repeat(
 #define	SOME		2
 #define	INF		3
 #define	PAIR(x, y)	((x)*4 + (y))
-#define	REDUCE(x)	( ((x) == DUPINF) ? INF : (((x) > 1) ? SOME : (x)) )
+#define	REDUCE(x)	( ((x) == INFINITY) ? INF : (((x) > 1) ? SOME : (x)) )
    const int rm = REDUCE(m);
    const int rn = REDUCE(n);
    struct state *s, *s2;
@@ -2108,7 +2108,7 @@ stdump(
    }
    if (t->min != 1 || t->max != 1) {
 	fprintf(f, " {%d,", t->min);
-	if (t->max != DUPINF) {
+	if (t->max != INFINITY) {
 	    fprintf(f, "%d", t->max);
 	}
 	fprintf(f, "}");
@@ -1122,7 +1122,7 @@ complicatedBackrefDissect(
     */

    i = 0;
-    for (p = begin; p <= stop && (i < max || max == DUPINF); p += len) {
+    for (p = begin; p <= stop && (i < max || max == INFINITY); p += len) {
 	if (v->g->compare(paren, p, len) != 0) {
 	    break;
 	}
@@ -1137,7 +1137,7 @@ complicatedBackrefDissect(
    if (p != end) {		/* didn't consume all of it */
 	return REG_NOMATCH;
    }
-    if (min <= i && (i <= max || max == DUPINF)) {
+    if (min <= i && (i <= max || max == INFINITY)) {
 	return REG_OKAY;
    }
    return REG_NOMATCH;		/* out of range */
@@ -99,7 +99,7 @@
 #define	xxx		1

 #define	DUPMAX	_POSIX2_RE_DUP_MAX
-#define	DUPINF	(DUPMAX+1)
+#define	INFINITY	(DUPMAX+1)

 #define	REMAGIC	0xfed7		/* magic number for main struct */

@@ -2326,11 +2326,6 @@ declare 630 {

 # ----- BASELINE -- FOR -- 8.6.0 ----- #

-# TIP #435
-declare 631 {
-    void Tcl_MutexUnlockAndFinalize(Tcl_Mutex *mutex)
-}
-
 ##############################################################################

 # Define the platform specific public Tcl interface. These functions are only
@@ -56,10 +56,10 @@ extern "C" {
 #define TCL_MAJOR_VERSION   8
 #define TCL_MINOR_VERSION   6
 #define TCL_RELEASE_LEVEL   TCL_FINAL_RELEASE
-#define TCL_RELEASE_SERIAL  4
+#define TCL_RELEASE_SERIAL  2

 #define TCL_VERSION	    "8.6"
-#define TCL_PATCH_LEVEL	    "8.6.4"
+#define TCL_PATCH_LEVEL	    "8.6.2"

 /*
 *----------------------------------------------------------------------------
@@ -76,6 +76,16 @@ extern "C" {
 #   endif
 #endif

+/*
+ * STRICT: See MSDN Article Q83456
+ */
+
+#ifdef _WIN32
+#   ifndef STRICT
+#	define STRICT
+#   endif
+#endif /* _WIN32 */
+
 /*
 * Utility macros: STRINGIFY takes an argument and wraps it in "" (double
 * quotation marks), JOIN joins two arguments.
@@ -392,12 +402,16 @@ typedef long LONG;
 * Don't know what platform it is and configure hasn't discovered what is
 * going on for us. Try to guess...
 */
-#      include <limits.h>
-#      if (INT_MAX < LONG_MAX)
-#         define TCL_WIDE_INT_IS_LONG	1
-#      else
-#         define TCL_WIDE_INT_TYPE long long
-#      endif
+#      ifdef NO_LIMITS_H
+#	  error please define either TCL_WIDE_INT_TYPE or TCL_WIDE_INT_IS_LONG
+#      else /* !NO_LIMITS_H */
+#	  include <limits.h>
+#	  if (INT_MAX < LONG_MAX)
+#	     define TCL_WIDE_INT_IS_LONG	1
+#	  else
+#	     define TCL_WIDE_INT_TYPE long long
+#         endif
+#      endif /* NO_LIMITS_H */
 #   endif /* _WIN32 */
 #endif /* !TCL_WIDE_INT_TYPE & !TCL_WIDE_INT_IS_LONG */
 #ifdef TCL_WIDE_INT_IS_LONG
@@ -2130,28 +2144,11 @@ typedef struct Tcl_EncodingType {
 *				substituting one or more "close" characters in
 *				the destination buffer and then continue to
 *				convert the source.
- * TCL_ENCODING_NO_TERMINATE - 	If set, Tcl_ExternalToUtf will not append a
- *				terminating NUL byte.  Knowing that it will
- *				not need space to do so, it will fill all
- *				dstLen bytes with encoded UTF-8 content, as
- *				other circumstances permit.  If clear, the
- *				default behavior is to reserve a byte in
- *				the dst space for NUL termination, and to
- *				append the NUL byte.
- * TCL_ENCODING_CHAR_LIMIT -	If set and dstCharsPtr is not NULL, then
- *				Tcl_ExternalToUtf takes the initial value
- *				of *dstCharsPtr is taken as a limit of the
- *				maximum number of chars to produce in the
- *				encoded UTF-8 content.  Otherwise, the 
- *				number of chars produced is controlled only
- *				by other limiting factors.
 */

 #define TCL_ENCODING_START		0x01
 #define TCL_ENCODING_END		0x02
 #define TCL_ENCODING_STOPONERROR	0x04
-#define TCL_ENCODING_NO_TERMINATE	0x08
-#define TCL_ENCODING_CHAR_LIMIT		0x10

 /*
 * The following definitions are the error codes returned by the conversion
@@ -2422,7 +2419,9 @@ EXTERN void		Tcl_MainEx(int argc, char **argv,
 			    Tcl_AppInitProc *appInitProc, Tcl_Interp *interp);
 EXTERN const char *	Tcl_PkgInitStubsCheck(Tcl_Interp *interp,
 			    const char *version, int exact);
+#if defined(TCL_THREADS) && defined(USE_THREAD_ALLOC)
 EXTERN void		Tcl_GetMemoryInfo(Tcl_DString *dsPtr);
+#endif

 /*
 *----------------------------------------------------------------------------
@@ -2592,8 +2591,6 @@ EXTERN void		Tcl_GetMemoryInfo(Tcl_DString *dsPtr);
 #define Tcl_MutexLock(mutexPtr)
 #undef  Tcl_MutexUnlock
 #define Tcl_MutexUnlock(mutexPtr)
-#undef  Tcl_MutexUnlockAndFinalize
-#define Tcl_MutexUnlockAndFinalize(mutexPtr)
 #undef  Tcl_MutexFinalize
 #define Tcl_MutexFinalize(mutexPtr)
 #undef  Tcl_ConditionNotify
@@ -4142,9 +4142,8 @@ TclNREvalObjv(

    /*
     * data[1] stores a marker for use by tailcalls; it will be set to 1 by
-     * command redirectors (imports, alias, ensembles) so that tailcall skips
-     * this callback (that marks the end of the target command) and goes back
-     * to the end of the source command. 
+     * command redirectors (imports, alias, ensembles) so that tailcalls
+     * finishes the source command and not just the target.
     */

    if (iPtr->deferredCallbacks) {
@@ -4407,7 +4406,7 @@ NRCommand(
    iPtr->numLevels--;

     /*
-      * If there is a tailcall, schedule it next
+      * If there is a tailcall, schedule it
      */
 
    if (data[1] && (data[1] != INT2PTR(1))) {
@@ -8171,31 +8170,27 @@ Tcl_NRCmdSwap(
 }

 /*****************************************************************************
- * Tailcall related code
+ * Stuff for tailcalls
 *****************************************************************************
 *
- * The steps of the tailcall dance are as follows:
+ * Just to show that IT CAN BE DONE! The precise semantics are not simple,
+ * require more thought. Possibly need a new Tcl return code to do it right?
+ * Questions include:
+ *   (1) How is the objc/objv tailcall to be run? My current thinking is that
+ *	 it should essentially be
+ *	     [tailcall a b c] <=> [uplevel 1 [list a b c]]
+ *	 with two caveats
+ *	     (a) the current frame is dropped first, after running all pending
+ *		 cleanup tasks and saving its namespace
+ *	     (b) 'a' is looked up in the returning frame's namespace, but the
+ *		 command is run in the context to which we are returning
+ *	 Current implementation does this if [tailcall] is called from within
+ *	 a proc, errors otherwise.
+ *   (2) Should a tailcall bypass [catch] in the returning frame? Current
+ *	 implementation does not (or does it? Changed, test!) - it causes an
+ *	 error.
 *
- *   1. when [tailcall] is invoked, it stores the corresponding callback in
- *      the current CallFrame and returns TCL_RETURN
- *   2. when the CallFrame is popped, it calls TclSetTailcall to store the
- *      callback in the proper NRCommand callback - the spot where the command
- *      that pushed the CallFrame is completely cleaned up
- *   3. when the NRCommand callback runs, it schedules the tailcall callback
- *      to run immediately after it returns
- *
- *   One delicate point is to properly define the NRCommand where the tailcall
- *   will execute. There are functions whose purpose is to help define the
- *   precise spot:
- *     TclMarkTailcall: if the NEXT command to be pushed tailcalls, execution
- *         should continue right here
- *     TclSkipTailcall:  if the NEXT command to be pushed tailcalls, execution
- *         should continue after the CURRENT command is fully returned ("skip
- *         the next command: we are redirecting to it, tailcalls should run
- *         after WE return") 
- *     TclPushTailcallPoint: the search for a tailcalling spot cannot traverse
- *         this point. This is special for OO, as some of the oo constructs
- *         that behave like commands may not push an NRCommand callback.
+ * FIXME NRE!
 */

 void
@@ -8229,18 +8224,6 @@ TclPushTailcallPoint(
    ((Interp *) interp)->numLevels++;
 }

-
-/*
- *----------------------------------------------------------------------
- *
- * TclSetTailcall --
- *
- *	Splice a tailcall command in the proper spot of the NRE callback
- *	stack, so that it runs at the right time.
- *
- *----------------------------------------------------------------------
- */
-
 void
 TclSetTailcall(
    Tcl_Interp *interp,
@@ -8265,23 +8248,6 @@ TclSetTailcall(
    runPtr->data[1] = listPtr;
 }

-
-/*
- *----------------------------------------------------------------------
- *
- * TclNRTailcallObjCmd --
- *
- *	Prepare the tailcall as a list and store it in the current
- *	varFrame. When the frame is later popped the tailcall will be spliced
- *	at the proper place.
- *
- * Results:
- *	The first NRCommand callback that is not marked to be skipped is
- *	updated so that its data[1] field contains the tailcall list.
- *
- *----------------------------------------------------------------------
- */
-
 int
 TclNRTailcallObjCmd(
    ClientData clientData,
@@ -8296,9 +8262,9 @@ TclNRTailcallObjCmd(
 	return TCL_ERROR;
    }

-    if (!(iPtr->varFramePtr->isProcCallFrame & 1)) {
+    if (!(iPtr->varFramePtr->isProcCallFrame & 1)) {	/* or is upleveled */
        Tcl_SetObjResult(interp, Tcl_NewStringObj(
-                "tailcall can only be called from a proc, lambda or method", -1));
+                "tailcall can only be called from a proc or lambda", -1));
        Tcl_SetErrorCode(interp, "TCL", "TAILCALL", "ILLEGAL", NULL);
 	return TCL_ERROR;
    }
@@ -8316,7 +8282,8 @@ TclNRTailcallObjCmd(
    /*
     * Create the callback to actually evaluate the tailcalled
     * command, then set it in the varFrame so that PopCallFrame can use it
-     * at the proper time.
+     * at the proper time. Being lazy: exploit the TclNRAddCallBack macro to
+     * build the callback.
     */

    if (objc > 1) {
@@ -8341,17 +8308,6 @@ TclNRTailcallObjCmd(
    return TCL_RETURN;
 }

-
-/*
- *----------------------------------------------------------------------
- *
- * TclNRTailcallEval --
- *
- *	This NREcallback actually causes the tailcall to be evaluated.
- *
- *----------------------------------------------------------------------
- */
-
 int
 TclNRTailcallEval(
    ClientData data[],
@@ -177,9 +177,9 @@ TclCompileAppendCmd(
     */

    varTokenPtr = TokenAfter(parsePtr->tokenPtr);
-
-    localIndex = LocalScalarFromToken(varTokenPtr, envPtr);
-    if (localIndex < 0) {
+    PushVarNameWord(interp, varTokenPtr, envPtr, TCL_NO_ELEMENT,
+	    &localIndex, &isScalar, 1);
+    if (!isScalar || localIndex < 0) {
 	return TCL_ERROR;
    }

@@ -2527,16 +2527,24 @@ CompileEachloopCmd(
 				 * (TCL_EACH_*) */
 {
    Proc *procPtr = envPtr->procPtr;
-    ForeachInfo *infoPtr=NULL;	/* Points to the structure describing this
+    ForeachInfo *infoPtr;	/* Points to the structure describing this
 				 * foreach command. Stored in a AuxData
 				 * record in the ByteCode. */
    
    Tcl_Token *tokenPtr, *bodyTokenPtr;
    int jumpBackOffset, infoIndex, range;
-    int numWords, numLists, i, j, code = TCL_OK;
-    Tcl_Obj *varListObj = NULL;
+    int numWords, numLists, numVars, loopIndex, i, j, code;
    DefineLineInformation;	/* TIP #280 */

+    /*
+     * We parse the variable list argument words and create two arrays:
+     *    varcList[i] is number of variables in i-th var list.
+     *    varvList[i] points to array of var names in i-th var list.
+     */
+
+    int *varcList;
+    const char ***varvList;
+
    /*
     * If the foreach command isn't in a procedure, don't compile it inline:
     * the payoff is too small.
@@ -2565,73 +2573,105 @@ CompileEachloopCmd(
    }

    /*
-     * Create and initialize the ForeachInfo and ForeachVarList data
-     * structures describing this command. Then create a AuxData record
-     * pointing to the ForeachInfo structure.
+     * Allocate storage for the varcList and varvList arrays if necessary.
     */

    numLists = (numWords - 2)/2;
-    infoPtr = ckalloc(sizeof(ForeachInfo)
-	    + (numLists - 1) * sizeof(ForeachVarList *));
-    infoPtr->numLists = 0;	/* Count this up as we go */
+    varcList = TclStackAlloc(interp, numLists * sizeof(int));
+    memset(varcList, 0, numLists * sizeof(int));
+    varvList = (const char ***) TclStackAlloc(interp,
+	    numLists * sizeof(const char **));
+    memset((char*) varvList, 0, numLists * sizeof(const char **));

    /*
-     * Parse each var list into sequence of var names.  Don't
+     * Break up each var list and set the varcList and varvList arrays. Don't
     * compile the foreach inline if any var name needs substitutions or isn't
     * a scalar, or if any var list needs substitutions.
     */

-    varListObj = Tcl_NewObj();
+    loopIndex = 0;
    for (i = 0, tokenPtr = parsePtr->tokenPtr;
 	    i < numWords-1;
 	    i++, tokenPtr = TokenAfter(tokenPtr)) {
-	ForeachVarList *varListPtr;
-	int numVars;
+	Tcl_DString varList;

 	if (i%2 != 1) {
 	    continue;
 	}
-
-	/*
-	 * If the variable list is empty, we can enter an infinite loop when
-	 * the interpreted version would not.  Take care to ensure this does
-	 * not happen.  [Bug 1671138]
-	 */
-
-	if (!TclWordKnownAtCompileTime(tokenPtr, varListObj) ||
-		TCL_OK != Tcl_ListObjLength(NULL, varListObj, &numVars) ||
-		numVars == 0) {
+	if (tokenPtr->type != TCL_TOKEN_SIMPLE_WORD) {
 	    code = TCL_ERROR;
 	    goto done;
 	}

-	varListPtr = ckalloc(sizeof(ForeachVarList)
-		+ (numVars - 1) * sizeof(int));
-	varListPtr->numVars = numVars;
-	infoPtr->varLists[i/2] = varListPtr;
-	infoPtr->numLists++;
+	/*
+	 * Lots of copying going on here. Need a ListObj wizard to show a
+	 * better way.
+	 */
+
+	Tcl_DStringInit(&varList);
+	TclDStringAppendToken(&varList, &tokenPtr[1]);
+	code = Tcl_SplitList(NULL, Tcl_DStringValue(&varList),
+		&varcList[loopIndex], &varvList[loopIndex]);
+	Tcl_DStringFree(&varList);
+	if (code != TCL_OK) {
+	    code = TCL_ERROR;
+	    goto done;
+	}
+	numVars = varcList[loopIndex];
+
+	/*
+	 * If the variable list is empty, we can enter an infinite loop when
+	 * the interpreted version would not. Take care to ensure this does
+	 * not happen. [Bug 1671138]
+	 */
+
+	if (numVars == 0) {
+	    code = TCL_ERROR;
+	    goto done;
+	}

 	for (j = 0;  j < numVars;  j++) {
-	    Tcl_Obj *varNameObj;
-	    const char *bytes;
-	    int numBytes, varIndex;
+	    const char *varName = varvList[loopIndex][j];

-	    Tcl_ListObjIndex(NULL, varListObj, j, &varNameObj);
-	    bytes = Tcl_GetStringFromObj(varNameObj, &numBytes);
-	    varIndex = LocalScalar(bytes, numBytes, envPtr);
-	    if (varIndex < 0) {
+	    if (!TclIsLocalScalar(varName, (int) strlen(varName))) {
 		code = TCL_ERROR;
 		goto done;
 	    }
-	    varListPtr->varIndexes[j] = varIndex;
 	}
-	Tcl_SetObjLength(varListObj, 0);
+	loopIndex++;
    }

    /*
     * We will compile the foreach command.
     */

+    code = TCL_OK;
+
+    /*
+     * Create and initialize the ForeachInfo and ForeachVarList data
+     * structures describing this command. Then create a AuxData record
+     * pointing to the ForeachInfo structure.
+     */
+
+    infoPtr = ckalloc(sizeof(ForeachInfo)
+	    + (numLists - 1) * sizeof(ForeachVarList *));
+    infoPtr->numLists = numLists;
+    for (loopIndex = 0;  loopIndex < numLists;  loopIndex++) {
+	ForeachVarList *varListPtr;
+
+	numVars = varcList[loopIndex];
+	varListPtr = ckalloc(sizeof(ForeachVarList)
+		+ (numVars - 1) * sizeof(int));
+	varListPtr->numVars = numVars;
+	for (j = 0;  j < numVars;  j++) {
+	    const char *varName = varvList[loopIndex][j];
+	    int nameChars = strlen(varName);
+
+	    varListPtr->varIndexes[j] = TclFindCompiledLocal(varName,
+		    nameChars, /*create*/ 1, envPtr);
+	}
+	infoPtr->varLists[loopIndex] = varListPtr;
+    }
    infoIndex = TclCreateAuxData(infoPtr, &tclNewForeachInfoType, envPtr);

    /*
@@ -2703,14 +2743,13 @@ CompileEachloopCmd(
    }
    
    done:
-    if (code == TCL_ERROR) {
-	if (infoPtr) {
-	    FreeForeachInfo(infoPtr);
+    for (loopIndex = 0;  loopIndex < numLists;  loopIndex++) {
+	if (varvList[loopIndex] != NULL) {
+	    ckfree(varvList[loopIndex]);
 	}
    }
-    if (varListObj) {
-	Tcl_DecrRefCount(varListObj);
-    }
+    TclStackFree(interp, (void *)varvList);
+    TclStackFree(interp, varcList);
    return code;
 }

@@ -3192,54 +3231,6 @@ TclCompileFormatCmd(
    return TCL_OK;
 }

-/*
- *----------------------------------------------------------------------
- *
- * TclLocalScalarFromToken --
- *
- *	Get the index into the table of compiled locals that corresponds
- *	to a local scalar variable name.
- *
- * Results:
- * 	Returns the non-negative integer index value into the table of
- * 	compiled locals corresponding to a local scalar variable name.
- * 	If the arguments passed in do not identify a local scalar variable
- * 	then return -1.
- *
- * Side effects:
- *	May add an entery into the table of compiled locals.
- *
- *----------------------------------------------------------------------
- */
-
-int
-TclLocalScalarFromToken(
-    Tcl_Token *tokenPtr,
-    CompileEnv *envPtr)
-{
-    int isScalar, index;
-
-    TclPushVarName(NULL, tokenPtr, envPtr, TCL_NO_ELEMENT, &index, &isScalar);
-    if (!isScalar) {
-	index = -1;
-    }
-    return index;
-}
-
-int
-TclLocalScalar(
-    const char *bytes,
-    int numBytes,
-    CompileEnv *envPtr)
-{
-    Tcl_Token token[2] =        {{TCL_TOKEN_SIMPLE_WORD, NULL, 0, 1},
-                                 {TCL_TOKEN_TEXT, NULL, 0, 0}};
-
-    token[1].start = bytes;
-    token[1].size = numBytes;
-    return TclLocalScalarFromToken(token, envPtr);
-}
-
 /*
 *----------------------------------------------------------------------
 *
@@ -3298,7 +3289,16 @@ TclPushVarName(
    nameChars = elNameChars = 0;
    localIndex = -1;

-    if (varTokenPtr->type == TCL_TOKEN_SIMPLE_WORD) {
+    /*
+     * Check not only that the type is TCL_TOKEN_SIMPLE_WORD, but whether
+     * curly braces surround the variable name. This really matters for array
+     * elements to handle things like
+     *    set {x($foo)} 5
+     * which raises an undefined var error if we are not careful here.
+     */
+
+    if ((varTokenPtr->type == TCL_TOKEN_SIMPLE_WORD) &&
+	    (varTokenPtr->start[0] != '{')) {
 	/*
 	 * A simple variable name. Divide it up into "name" and "elName"
 	 * strings. If it is not a local variable, look it up at runtime.
@@ -3322,7 +3322,7 @@ TclPushVarName(
 		}
 	    }

-	    if (!(flags & TCL_NO_ELEMENT) && (elName != NULL) && elNameChars) {
+	    if ((elName != NULL) && elNameChars) {
 		/*
 		 * An array element, the element name is a simple string:
 		 * assemble the corresponding token.
@@ -3337,7 +3337,7 @@ TclPushVarName(
 		elemTokenCount = 1;
 	    }
 	}
-    } else if (interp && ((n = varTokenPtr->numComponents) > 1)
+    } else if (((n = varTokenPtr->numComponents) > 1)
 	    && (varTokenPtr[1].type == TCL_TOKEN_TEXT)
 	    && (varTokenPtr[n].type == TCL_TOKEN_TEXT)
 	    && (varTokenPtr[n].start[varTokenPtr[n].size - 1] == ')')) {
@@ -3373,10 +3373,9 @@ TclPushVarName(
 	    nameChars = p - varTokenPtr[1].start;
 	    elName = p + 1;
 	    remainingChars = (varTokenPtr[2].start - p) - 1;
-	    elNameChars = (varTokenPtr[n].start-p) + varTokenPtr[n].size - 1;
+	    elNameChars = (varTokenPtr[n].start-p) + varTokenPtr[n].size - 2;

-	    if (!(flags & TCL_NO_ELEMENT)) {
-	      if (remainingChars) {
+	    if (remainingChars) {
 		/*
 		 * Make a first token with the extra characters in the first
 		 * token.
@@ -3396,14 +3395,13 @@ TclPushVarName(

 		memcpy(elemTokenPtr+1, varTokenPtr+2,
 			(n-1) * sizeof(Tcl_Token));
-	      } else {
+	    } else {
 		/*
 		 * Use the already available tokens.
 		 */

 		elemTokenPtr = &varTokenPtr[2];
 		elemTokenCount = n - 1;
-	      }
 	    }
 	}
    }
@@ -3438,7 +3436,7 @@ TclPushVarName(
 		localIndex = -1;
 	    }
 	}
-	if (interp && localIndex < 0) {
+	if (localIndex < 0) {
 	    PushLiteral(envPtr, name, nameChars);
 	}

@@ -3455,7 +3453,7 @@ TclPushVarName(
 		PushStringLiteral(envPtr, "");
 	    }
 	}
-    } else if (interp) {
+    } else {
 	/*
 	 * The var name isn't simple: compile and push it.
 	 */
@@ -871,7 +871,7 @@ TclCompileLappendCmd(

    /* TODO: Consider support for compiling expanded args. */
    numWords = parsePtr->numWords;
-    if (numWords < 3) {
+    if (numWords == 1) {
 	return TCL_ERROR;
    }

@@ -1210,7 +1210,20 @@ TclCompileListCmd(
 	valueTokenPtr = TokenAfter(valueTokenPtr);
    }
    if (listObj != NULL) {
-	TclEmitPush(TclAddLiteralObj(envPtr, listObj, NULL), envPtr);
+	int len;
+	const char *bytes = Tcl_GetStringFromObj(listObj, &len);
+
+	PushLiteral(envPtr, bytes, len);
+	Tcl_DecrRefCount(listObj);
+	if (len > 0) {
+	    /*
+	     * Force list interpretation!
+	     */
+
+	    TclEmitOpcode(	INST_DUP,		envPtr);
+	    TclEmitOpcode(	INST_LIST_LENGTH,	envPtr);
+	    TclEmitOpcode(	INST_POP,		envPtr);
+	}
 	return TCL_OK;
    }

@@ -1488,10 +1501,6 @@ TclCompileLreplaceCmd(
 	return TCL_ERROR;
    }

-    if(idx2 != INDEX_END && idx2 < idx1) {
-	idx2 = idx1-1;
-    }
-
    /*
     * Work out what this [lreplace] is actually doing.
     */
@@ -2035,7 +2044,7 @@ TclCompileNamespaceUpvarCmd(
    CompileEnv *envPtr)		/* Holds resulting instructions. */
 {
    Tcl_Token *tokenPtr, *otherTokenPtr, *localTokenPtr;
-    int localIndex, numWords, i;
+    int isScalar, localIndex, numWords, i;
    DefineLineInformation;	/* TIP #280 */

    if (envPtr->procPtr == NULL) {
@@ -2070,8 +2079,10 @@ TclCompileNamespaceUpvarCmd(
 	localTokenPtr = TokenAfter(otherTokenPtr);

 	CompileWord(envPtr, otherTokenPtr, interp, i);
-	localIndex = LocalScalarFromToken(localTokenPtr, envPtr);
-	if (localIndex < 0) {
+	PushVarNameWord(interp, localTokenPtr, envPtr, 0,
+		&localIndex, &isScalar, i+1);
+
+	if ((localIndex < 0) || !isScalar) {
 	    return TCL_ERROR;
 	}
 	TclEmitInstInt4(	INST_NSUPVAR, localIndex,	envPtr);
@@ -2752,7 +2763,7 @@ TclCompileUpvarCmd(
    CompileEnv *envPtr)		/* Holds resulting instructions. */
 {
    Tcl_Token *tokenPtr, *otherTokenPtr, *localTokenPtr;
-    int localIndex, numWords, i;
+    int isScalar, localIndex, numWords, i;
    DefineLineInformation;	/* TIP #280 */
    Tcl_Obj *objPtr;

@@ -2815,8 +2826,10 @@ TclCompileUpvarCmd(
 	localTokenPtr = TokenAfter(otherTokenPtr);

 	CompileWord(envPtr, otherTokenPtr, interp, i);
-	localIndex = LocalScalarFromToken(localTokenPtr, envPtr);
-	if (localIndex < 0) {
+	PushVarNameWord(interp, localTokenPtr, envPtr, 0,
+		&localIndex, &isScalar, i+1);
+
+	if ((localIndex < 0) || !isScalar) {
 	    return TCL_ERROR;
 	}
 	TclEmitInstInt4(	INST_UPVAR, localIndex,		envPtr);
@@ -365,7 +365,7 @@ static const unsigned char prec[] = {
    0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
-    0,
+    0,  
    /* Unary operator lexemes */
    PREC_UNARY,		/* UNARY_PLUS */
    PREC_UNARY,		/* UNARY_MINUS */
@@ -420,7 +420,7 @@ static const unsigned char instruction[] = {
    0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
    0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,  0,
-    0,
+    0,  
    /* Unary operator lexemes */
    INST_UPLUS,		/* UNARY_PLUS */
    INST_UMINUS,	/* UNARY_MINUS */
@@ -488,7 +488,7 @@ static const unsigned char Lexeme[] = {

 typedef struct JumpList {
    JumpFixup jump;		/* Pass this argument to matching calls of
-				 * TclEmitForwardJump() and
+				 * TclEmitForwardJump() and 
 				 * TclFixupForwardJump(). */
    struct JumpList *next;	/* Point to next item on the stack */
 } JumpList;
@@ -838,7 +838,7 @@ ParseExpr(

 	    switch (lexeme) {
 	    case NUMBER:
-	    case BOOLEAN:
+	    case BOOLEAN: 
 		/*
 		 * TODO: Consider using a dict or hash to collapse all
 		 * duplicate literals into a single representative value.
@@ -861,7 +861,7 @@ ParseExpr(
 		start += scanned;
 		numBytes -= scanned;
 		continue;
-
+	    
 	    default:
 		break;
 	    }
@@ -1324,7 +1324,7 @@ ParseExpr(
 	    nodePtr->mark = MARK_LEFT;
 	    nodePtr->left = complete;

-	    /*
+	    /* 
 	     * The COMMA operator cannot be optimized, since the function
 	     * needs all of its arguments, and optimization would reduce the
 	     * number. Other binary operators root constant expressions when
@@ -1546,7 +1546,7 @@ ConvertTreeToTokens(
 	     * Tcl_ParseExpr() we do not change them now. Internally, we can
 	     * do better.
 	     */
-
+	
 	    int toCopy = tokenPtr->numComponents + 1;

 	    if (tokenPtr->numComponents == tokenPtr[1].numComponents + 1) {
@@ -1562,7 +1562,7 @@ ConvertTreeToTokens(
 		subExprTokenPtr->type = TCL_TOKEN_SUB_EXPR;
 		parsePtr->numTokens += toCopy;
 	    } else {
-		/*
+		/* 
 		 * Multiple element word. Create a TCL_TOKEN_SUB_EXPR token to
 		 * lead, with fields initialized from the leading token, then
 		 * copy entire set of word tokens.
@@ -1611,7 +1611,7 @@ ConvertTreeToTokens(
 	    case COMMA:
 	    case COLON:

-		/*
+		/* 
 		 * Historical practice has been to have no Tcl_Tokens for
 		 * these operators.
 		 */
@@ -1747,7 +1747,7 @@ ConvertTreeToTokens(
 		/*
 		 * Before we leave this node/operator/subexpression for the
 		 * last time, finish up its tokens....
-		 *
+		 * 
 		 * Our current position scanning the string is where the
 		 * substring for the subexpression ends.
 		 */
@@ -1967,7 +1967,7 @@ ParseLexeme(

    case 'i':
 	if ((numBytes > 1) && (start[1] == 'n')
-		&& ((numBytes == 2) || start[2] & 0x80 || !isalpha(UCHAR(start[2])))) {
+		&& ((numBytes == 2) || !isalpha(UCHAR(start[2])))) {
 	    /*
 	     * Must make this check so we can tell the difference between the
 	     * "in" operator and the "int" function name and the "infinity"
@@ -1981,15 +1981,14 @@ ParseLexeme(

    case 'e':
 	if ((numBytes > 1) && (start[1] == 'q')
-		&& ((numBytes == 2) || start[2] & 0x80 || !isalpha(UCHAR(start[2])))) {
+		&& ((numBytes == 2) || !isalpha(UCHAR(start[2])))) {
 	    *lexemePtr = STREQ;
 	    return 2;
 	}
 	break;

    case 'n':
-	if ((numBytes > 1)
-		&& ((numBytes == 2) || start[2] & 0x80 || !isalpha(UCHAR(start[2])))) {
+	if ((numBytes > 1) && ((numBytes == 2) || !isalpha(UCHAR(start[2])))) {
 	    switch (start[1]) {
 	    case 'e':
 		*lexemePtr = STRNEQ;
@@ -2004,8 +2003,9 @@ ParseLexeme(
    literal = Tcl_NewObj();
    if (TclParseNumber(NULL, literal, NULL, start, numBytes, &end,
 	    TCL_PARSE_NO_WHITESPACE) == TCL_OK) {
-	if (end < start + numBytes && !TclIsBareword(*end)) {
-
+	if (end < start + numBytes && !isalnum(UCHAR(*end))
+		&& UCHAR(*end) != '_') {
+	
 	number:
 	    TclInitStringRep(literal, start, end-start);
 	    *lexemePtr = NUMBER;
@@ -2029,9 +2029,9 @@ ParseLexeme(
 		const char *p = start;

 		while (p < end) {
-		    if (!TclIsBareword(*p++)) {
+		    if (!isalnum(UCHAR(*p++))) {
 			/*
-			 * The number has non-bareword characters, so we
+			 * The number has non-bareword characters, so we 
 			 * must treat it as a number.
 			 */
 			goto number;
@@ -2054,30 +2054,33 @@ ParseLexeme(
 	}
    }

-    /*
-     * We reject leading underscores in bareword.  No sensible reason why.
-     * Might be inspired by reserved identifier rules in C, which of course
-     * have no direct relevance here.
-     */
+    if (Tcl_UtfCharComplete(start, numBytes)) {
+	scanned = Tcl_UtfToUniChar(start, &ch);
+    } else {
+	char utfBytes[TCL_UTF_MAX];

-    if (!TclIsBareword(*start) || *start == '_') {
-	if (Tcl_UtfCharComplete(start, numBytes)) {
-	    scanned = Tcl_UtfToUniChar(start, &ch);
-	} else {
-	    char utfBytes[TCL_UTF_MAX];
-
-	    memcpy(utfBytes, start, (size_t) numBytes);
-	    utfBytes[numBytes] = '\0';
-	    scanned = Tcl_UtfToUniChar(utfBytes, &ch);
-	}
+	memcpy(utfBytes, start, (size_t) numBytes);
+	utfBytes[numBytes] = '\0';
+	scanned = Tcl_UtfToUniChar(utfBytes, &ch);
+    }
+    if (!isalnum(UCHAR(ch))) {
 	*lexemePtr = INVALID;
 	Tcl_DecrRefCount(literal);
 	return scanned;
    }
    end = start;
-    while (numBytes && TclIsBareword(*end)) {
-	end += 1;
-	numBytes -= 1;
+    while (isalnum(UCHAR(ch)) || (UCHAR(ch) == '_')) {
+	end += scanned;
+	numBytes -= scanned;
+	if (Tcl_UtfCharComplete(end, numBytes)) {
+	    scanned = Tcl_UtfToUniChar(end, &ch);
+	} else {
+	    char utfBytes[TCL_UTF_MAX];
+
+	    memcpy(utfBytes, end, (size_t) numBytes);
+	    utfBytes[numBytes] = '\0';
+	    scanned = Tcl_UtfToUniChar(utfBytes, &ch);
+	}
    }
    *lexemePtr = BAREWORD;
    if (literalPtr) {
@@ -2095,7 +2098,7 @@ ParseLexeme(
 * TclCompileExpr --
 *
 *	This procedure compiles a string containing a Tcl expression into Tcl
- *	bytecodes.
+ *	bytecodes. 
 *
 * Results:
 *	None.
@@ -2330,7 +2333,7 @@ CompileExprTree(
 		 * Use the numWords count we've kept to invoke the function
 		 * command with the correct number of arguments.
 		 */
-
+		
 		if (numWords < 255) {
 		    TclEmitInvoke(envPtr, INST_INVOKE_STK1, numWords);
 		} else {
@@ -2424,7 +2427,7 @@ CompileExprTree(
 		const char *bytes = TclGetStringFromObj(literal, &length);
 		int index = TclRegisterNewLiteral(envPtr, bytes, length);
 		Tcl_Obj *objPtr = TclFetchLiteral(envPtr, index);
-
+		
 		if ((objPtr->typePtr == NULL) && (literal->typePtr != NULL)) {
 		    /*
 		     * Would like to do this:
@@ -2567,7 +2570,7 @@ TclSingleOpCmd(
 *
 * TclSortingOpCmd --
 *	Implements the commands:
- *		<, <=, >, >=, ==, eq
+ *		<, <=, >, >=, ==, eq 
 *	in the ::tcl::mathop namespace. These commands are defined for
 *	arbitrary number of arguments by computing the AND of the base
 *	operator applied to all neighbor argument pairs.
@@ -4342,11 +4342,10 @@ TclInitAuxDataTypeTable(void)
    Tcl_InitHashTable(&auxDataTypeTable, TCL_STRING_KEYS);

    /*
-     * There are only four AuxData types at this time, so register them here.
+     * There are only three AuxData types at this time, so register them here.
     */

    RegisterAuxDataType(&tclForeachInfoType);
-    RegisterAuxDataType(&tclNewForeachInfoType);
    RegisterAuxDataType(&tclJumptableInfoType);
    RegisterAuxDataType(&tclDictUpdateInfoType);
 }
@@ -1151,10 +1151,6 @@ MODULE_SCOPE void	TclFinalizeLoopExceptionRange(CompileEnv *envPtr,
 MODULE_SCOPE char *	TclLiteralStats(LiteralTable *tablePtr);
 MODULE_SCOPE int	TclLog2(int value);
 #endif
-MODULE_SCOPE int	TclLocalScalar(const char *bytes, int numBytes,
-			    CompileEnv *envPtr);
-MODULE_SCOPE int	TclLocalScalarFromToken(Tcl_Token *tokenPtr,
-			    CompileEnv *envPtr);
 MODULE_SCOPE void	TclOptimizeBytecode(void *envPtr);
 #ifdef TCL_COMPILE_DEBUG
 MODULE_SCOPE void	TclPrintByteCodeObj(Tcl_Interp *interp,
@@ -1682,9 +1678,11 @@ MODULE_SCOPE int	TclPushProcCallFrame(ClientData clientData,
 #define AnonymousLocal(envPtr) \
    (TclFindCompiledLocal(NULL, /*nameChars*/ 0, /*create*/ 1, (envPtr)))
 #define LocalScalar(chars,len,envPtr) \
-    TclLocalScalar(chars, len, envPtr)
+    (!TclIsLocalScalar((chars), (len)) ? -1 : \
+	TclFindCompiledLocal((chars), (len), /*create*/ 1, (envPtr)))
 #define LocalScalarFromToken(tokenPtr,envPtr) \
-    TclLocalScalarFromToken(tokenPtr, envPtr)
+    ((tokenPtr)->type != TCL_TOKEN_SIMPLE_WORD ? -1 : \
+	LocalScalar((tokenPtr)[1].start, (tokenPtr)[1].size, (envPtr)))

 /*
 * Flags bits used by TclPushVarName.
@@ -1815,8 +1815,6 @@ EXTERN int		Tcl_FSUnloadFile(Tcl_Interp *interp,
 EXTERN void		Tcl_ZlibStreamSetCompressionDictionary(
 				Tcl_ZlibStream zhandle,
 				Tcl_Obj *compressionDictionaryObj);
-/* 631 */
-EXTERN void		Tcl_MutexUnlockAndFinalize(Tcl_Mutex *mutex);

 typedef struct {
    const struct TclPlatStubs *tclPlatStubs;
@@ -2483,7 +2481,6 @@ typedef struct TclStubs {
    void * (*tcl_FindSymbol) (Tcl_Interp *interp, Tcl_LoadHandle handle, const char *symbol); /* 628 */
    int (*tcl_FSUnloadFile) (Tcl_Interp *interp, Tcl_LoadHandle handlePtr); /* 629 */
    void (*tcl_ZlibStreamSetCompressionDictionary) (Tcl_ZlibStream zhandle, Tcl_Obj *compressionDictionaryObj); /* 630 */
-    void (*tcl_MutexUnlockAndFinalize) (Tcl_Mutex *mutex); /* 631 */
 } TclStubs;

 extern const TclStubs *tclStubsPtr;
@@ -3776,8 +3773,6 @@ extern const TclStubs *tclStubsPtr;
 	(tclStubsPtr->tcl_FSUnloadFile) /* 629 */
 #define Tcl_ZlibStreamSetCompressionDictionary \
 	(tclStubsPtr->tcl_ZlibStreamSetCompressionDictionary) /* 630 */
-#define Tcl_MutexUnlockAndFinalize \
-	(tclStubsPtr->tcl_MutexUnlockAndFinalize) /* 631 */

 #endif /* defined(USE_TCL_STUBS) */

@@ -180,9 +180,9 @@ TCL_DECLARE_MUTEX(encodingMutex)
 * the system encoding will be used to perform the conversion.
 */

-static Tcl_Encoding defaultEncoding = NULL;
-static Tcl_Encoding systemEncoding = NULL;
-Tcl_Encoding tclIdentityEncoding = NULL;
+static Tcl_Encoding defaultEncoding;
+static Tcl_Encoding systemEncoding;
+Tcl_Encoding tclIdentityEncoding;

 /*
 * The following variable is used in the sparse matrix code for a
@@ -652,10 +652,7 @@ TclFinalizeEncodingSubsystem(void)
    Tcl_MutexLock(&encodingMutex);
    encodingsInitialized = 0;
    FreeEncoding(systemEncoding);
-    systemEncoding = NULL;
-    defaultEncoding = NULL;
    FreeEncoding(tclIdentityEncoding);
-    tclIdentityEncoding = NULL;

    hPtr = Tcl_FirstHashEntry(&encodingTable, &search);
    while (hPtr != NULL) {
@@ -1206,10 +1203,7 @@ Tcl_ExternalToUtf(
 				 * output buffer. */
 {
    const Encoding *encodingPtr;
-    int result, srcRead, dstWrote, dstChars = 0;
-    int noTerminate = flags & TCL_ENCODING_NO_TERMINATE;
-    int charLimited = (flags & TCL_ENCODING_CHAR_LIMIT) && dstCharsPtr;
-    int maxChars = INT_MAX;
+    int result, srcRead, dstWrote, dstChars;
    Tcl_EncodingState state;

    if (encoding == NULL) {
@@ -1234,40 +1228,19 @@ Tcl_ExternalToUtf(
    }
    if (dstCharsPtr == NULL) {
 	dstCharsPtr = &dstChars;
-	flags &= ~TCL_ENCODING_CHAR_LIMIT;
-    } else if (charLimited) {
-	maxChars = *dstCharsPtr;
    }

-    if (!noTerminate) {
-	/*
-	 * If there are any null characters in the middle of the buffer,
-	 * they will converted to the UTF-8 null character (\xC080). To get
-	 * the actual \0 at the end of the destination buffer, we need to
-	 * append it manually.  First make room for it...
-	 */
+    /*
+     * If there are any null characters in the middle of the buffer, they will
+     * converted to the UTF-8 null character (\xC080). To get the actual \0 at
+     * the end of the destination buffer, we need to append it manually.
+     */

-	dstLen--;
-    }
-    do {
-	int savedFlags = flags;
-	Tcl_EncodingState savedState = *statePtr;
-
-	result = encodingPtr->toUtfProc(encodingPtr->clientData, src, srcLen,
-		flags, statePtr, dst, dstLen, srcReadPtr, dstWrotePtr,
-		dstCharsPtr);
-	if (*dstCharsPtr <= maxChars) {
-	    break;
-	}
-	dstLen = Tcl_UtfAtIndex(dst, maxChars) - 1 - dst + TCL_UTF_MAX;
-	flags = savedFlags;
-	*statePtr = savedState;
-    } while (1);
-    if (!noTerminate) {
-	/* ...and then append it */
-
-	dst[*dstWrotePtr] = '\0';
-    }
+    dstLen--;
+    result = encodingPtr->toUtfProc(encodingPtr->clientData, src, srcLen,
+	    flags, statePtr, dst, dstLen, srcReadPtr, dstWrotePtr,
+	    dstCharsPtr);
+    dst[*dstWrotePtr] = '\0';

    return result;
 }
@@ -2131,9 +2104,6 @@ BinaryProc(
    if (dstLen < 0) {
 	dstLen = 0;
    }
-    if ((flags & TCL_ENCODING_CHAR_LIMIT) && srcLen > *dstCharsPtr) {
-	srcLen = *dstCharsPtr;
-    }
    if (srcLen > dstLen) {
 	srcLen = dstLen;
 	result = TCL_CONVERT_NOSPACE;
@@ -2294,7 +2264,7 @@ UtfToUtfProc(
 {
    const char *srcStart, *srcEnd, *srcClose;
    const char *dstStart, *dstEnd;
-    int result, numChars, charLimit = INT_MAX;
+    int result, numChars;
    Tcl_UniChar ch;

    result = TCL_OK;
@@ -2305,14 +2275,11 @@ UtfToUtfProc(
    if ((flags & TCL_ENCODING_END) == 0) {
 	srcClose -= TCL_UTF_MAX;
    }
-    if (flags & TCL_ENCODING_CHAR_LIMIT) {
-	charLimit = *dstCharsPtr;
-    }

    dstStart = dst;
    dstEnd = dst + dstLen - TCL_UTF_MAX;

-    for (numChars = 0; src < srcEnd && numChars <= charLimit; numChars++) {
+    for (numChars = 0; src < srcEnd; numChars++) {
 	if ((src > srcClose) && (!Tcl_UtfCharComplete(src, srcEnd - src))) {
 	    /*
 	     * If there is more string to follow, this will ensure that the
@@ -2334,7 +2301,7 @@ UtfToUtfProc(

 	    *dst++ = *src++;
 	} else if (pureNullMode == 1 && UCHAR(*src) == 0xc0 &&
-		(src + 1 < srcEnd) && UCHAR(*(src+1)) == 0x80) {
+		UCHAR(*(src+1)) == 0x80) {
 	    /*
 	     * Convert 0xc080 to real nulls when we are in output mode.
 	     */
@@ -2408,12 +2375,9 @@ UnicodeToUtfProc(
 {
    const char *srcStart, *srcEnd;
    const char *dstEnd, *dstStart;
-    int result, numChars, charLimit = INT_MAX;
+    int result, numChars;
    Tcl_UniChar ch;

-    if (flags & TCL_ENCODING_CHAR_LIMIT) {
-	charLimit = *dstCharsPtr;
-    }
    result = TCL_OK;
    if ((srcLen % sizeof(Tcl_UniChar)) != 0) {
 	result = TCL_CONVERT_MULTIBYTE;
@@ -2427,7 +2391,7 @@ UnicodeToUtfProc(
    dstStart = dst;
    dstEnd = dst + dstLen - TCL_UTF_MAX;

-    for (numChars = 0; src < srcEnd && numChars <= charLimit; numChars++) {
+    for (numChars = 0; src < srcEnd; numChars++) {
 	if (dst > dstEnd) {
 	    result = TCL_CONVERT_NOSPACE;
 	    break;
@@ -2595,15 +2559,12 @@ TableToUtfProc(
 {
    const char *srcStart, *srcEnd;
    const char *dstEnd, *dstStart, *prefixBytes;
-    int result, byte, numChars, charLimit = INT_MAX;
+    int result, byte, numChars;
    Tcl_UniChar ch;
    const unsigned short *const *toUnicode;
    const unsigned short *pageZero;
    TableEncodingData *dataPtr = clientData;

-    if (flags & TCL_ENCODING_CHAR_LIMIT) {
-	charLimit = *dstCharsPtr;
-    }
    srcStart = src;
    srcEnd = src + srcLen;

@@ -2615,7 +2576,7 @@ TableToUtfProc(
    pageZero = toUnicode[0];

    result = TCL_OK;
-    for (numChars = 0; src < srcEnd && numChars <= charLimit; numChars++) {
+    for (numChars = 0; src < srcEnd; numChars++) {
 	if (dst > dstEnd) {
 	    result = TCL_CONVERT_NOSPACE;
 	    break;
@@ -2829,11 +2790,8 @@ Iso88591ToUtfProc(
 {
    const char *srcStart, *srcEnd;
    const char *dstEnd, *dstStart;
-    int result, numChars, charLimit = INT_MAX;
+    int result, numChars;

-    if (flags & TCL_ENCODING_CHAR_LIMIT) {
-	charLimit = *dstCharsPtr;
-    }
    srcStart = src;
    srcEnd = src + srcLen;

@@ -2841,7 +2799,7 @@ Iso88591ToUtfProc(
    dstEnd = dst + dstLen - TCL_UTF_MAX;

    result = TCL_OK;
-    for (numChars = 0; src < srcEnd && numChars <= charLimit; numChars++) {
+    for (numChars = 0; src < srcEnd; numChars++) {
 	Tcl_UniChar ch;

 	if (dst > dstEnd) {
@@ -3002,9 +2960,7 @@ TableFreeProc(
     */

    ckfree(dataPtr->toUnicode);
-    dataPtr->toUnicode = NULL;
    ckfree(dataPtr->fromUnicode);
-    dataPtr->fromUnicode = NULL;
    ckfree(dataPtr);
 }

@@ -3057,12 +3013,9 @@ EscapeToUtfProc(
    const char *prefixBytes, *tablePrefixBytes, *srcStart, *srcEnd;
    const unsigned short *const *tableToUnicode;
    const Encoding *encodingPtr;
-    int state, result, numChars, charLimit = INT_MAX;
+    int state, result, numChars;
    const char *dstStart, *dstEnd;

-    if (flags & TCL_ENCODING_CHAR_LIMIT) {
-	charLimit = *dstCharsPtr;
-    }
    result = TCL_OK;
    tablePrefixBytes = NULL;	/* lint. */
    tableToUnicode = NULL;	/* lint. */
@@ -3080,7 +3033,7 @@ EscapeToUtfProc(
 	state = 0;
    }

-    for (numChars = 0; src < srcEnd && numChars <= charLimit; ) {
+    for (numChars = 0; src < srcEnd; ) {
 	int byte, hi, lo, ch;

 	if (dst > dstEnd) {
@@ -3480,7 +3433,6 @@ EscapeFreeProc(
 	subTablePtr = dataPtr->subTables;
 	for (i = 0; i < dataPtr->numSubTables; i++) {
 	    FreeEncoding((Tcl_Encoding) subTablePtr->encodingPtr);
-	    subTablePtr->encodingPtr = NULL;
 	    subTablePtr++;
 	}
    }
@@ -43,6 +43,11 @@ static char *		EnvTraceProc(ClientData clientData, Tcl_Interp *interp,
 static void		ReplaceString(const char *oldStr, char *newStr);
 MODULE_SCOPE void	TclSetEnv(const char *name, const char *value);
 MODULE_SCOPE void	TclUnsetEnv(const char *name);
+
+#if defined(__CYGWIN__)
+    static void TclCygwinPutenv(char *string);
+#   define putenv TclCygwinPutenv
+#endif

 /*
 *----------------------------------------------------------------------
@@ -439,7 +444,7 @@ TclUnsetEnv(
     * that no = should be included, and Windows requires it.
     */

-#if defined(_WIN32)
+#if defined(_WIN32) || defined(__CYGWIN__)
    string = ckalloc(length + 2);
    memcpy(string, name, (size_t) length);
    string[length] = '=';
@@ -735,6 +740,98 @@ TclFinalizeEnvironment(void)
    }
 }

+#if defined(__CYGWIN__)
+
+/*
+ * When using cygwin, when an environment variable changes, we need to synch
+ * with both the cygwin environment (in case the application C code calls
+ * fork) and the Windows environment (in case the application TCL code calls
+ * exec, which calls the Windows CreateProcess function).
+ */
+DLLIMPORT extern void __stdcall SetEnvironmentVariableA(const char*, const char *);
+
+static void
+TclCygwinPutenv(
+    char *str)
+{
+    char *name, *value;
+
+    /*
+     * Get the name and value, so that we can change the environment variable
+     * for Windows.
+     */
+
+    name = alloca(strlen(str) + 1);
+    strcpy(name, str);
+    for (value=name ; *value!='=' && *value!='\0' ; ++value) {
+	/* Empty body */
+    }
+    if (*value == '\0') {
+	/* Can't happen. */
+	return;
+    }
+    *(value++) = '\0';
+    if (*value == '\0') {
+	value = NULL;
+    }
+
+    /*
+     * Set the cygwin environment variable.
+     */
+
+#undef putenv
+    if (value == NULL) {
+	unsetenv(name);
+    } else {
+	putenv(str);
+    }
+
+    /*
+     * Before changing the environment variable in Windows, if this is PATH,
+     * we need to convert the value back to a Windows style path.
+     *
+     * FIXME: The calling program may know it is running under windows, and
+     * may have set the path to a Windows path, or, worse, appended or
+     * prepended a Windows path to PATH.
+     */
+
+    if (strcmp(name, "PATH") != 0) {
+	/*
+	 * If this is Path, eliminate any PATH variable, to prevent any
+	 * confusion.
+	 */
+
+	if (strcmp(name, "Path") == 0) {
+	    SetEnvironmentVariableA("PATH", NULL);
+	    unsetenv("PATH");
+	}
+
+	SetEnvironmentVariableA(name, value);
+    } else {
+	char *buf;
+
+	/*
+	 * Eliminate any Path variable, to prevent any confusion.
+	 */
+
+	SetEnvironmentVariableA("Path", NULL);
+	unsetenv("Path");
+
+	if (value == NULL) {
+	    buf = NULL;
+	} else {
+	    int size;
+
+	    size = cygwin_conv_path_list(0, value, NULL, 0);
+	    buf = alloca(size + 1);
+	    cygwin_conv_path_list(0, value, buf, size);
+	}
+
+	SetEnvironmentVariableA(name, buf);
+    }
+}
+#endif /* __CYGWIN__ */
+
 /*
 * Local Variables:
 * mode: c
@@ -119,7 +119,6 @@ static char *		VwaitVarProc(ClientData clientData,
 			    Tcl_Interp *interp, const char *name1,
 			    const char *name2, int flags);
 static void		InvokeExitHandlers(void);
-static void		FinalizeThread(int quick);

 /*
 *----------------------------------------------------------------------
@@ -984,7 +983,7 @@ Tcl_Exit(
 	     * Tcl_Channels that may have data enqueued.
 	     */
 	    
-	    FinalizeThread(/* quick */ 1);
+	    Tcl_FinalizeThread();
 	}
 	TclpExit(status);
 	Tcl_Panic("OS exit failed!");
@@ -1184,7 +1183,7 @@ Tcl_Finalize(void)
     * This fixes the Tcl Bug #990552.
     */

-    TclFinalizeThreadData(/* quick */ 0);
+    TclFinalizeThreadData();

    /*
     * Now we can free constants for conversions to/from double.
@@ -1269,13 +1268,6 @@ Tcl_Finalize(void)

 void
 Tcl_FinalizeThread(void)
-{
-    FinalizeThread(/* quick */ 0);
-}
-
-void
-FinalizeThread(
-    int quick)
 {
    ExitHandler *exitPtr;
    ThreadSpecificData *tsdPtr;
@@ -1317,7 +1309,7 @@ FinalizeThread(
     *
     * Fix [Bug #571002]
     */
-    TclFinalizeThreadData(quick);
+    TclFinalizeThreadData();
 }

 /*
@@ -81,7 +81,9 @@ int tclTraceExec = 0;

 static const char *const operatorStrings[] = {
    "||", "&&", "|", "^", "&", "==", "!=", "<", ">", "<=", ">=", "<<", ">>",
-    "+", "-", "*", "/", "%", "+", "-", "~", "!"
+    "+", "-", "*", "/", "%", "+", "-", "~", "!",
+    "BUILTIN FUNCTION", "FUNCTION",
+    "", "", "", "", "", "", "", "", "eq", "ne"
 };

 /*
@@ -3185,8 +3187,8 @@ TEBCresume(
 	pc += 6;
 	TEBC_YIELD();

-	TclMarkTailcall(interp);
 	TclNRAddCallback(interp, TclClearRootEnsemble, NULL,NULL,NULL,NULL);
+	TclSkipTailcall(interp);
 	return TclNREvalObjEx(interp, objPtr, TCL_EVAL_INVOKE, NULL, INT_MIN);

    /*
@@ -4946,7 +4948,6 @@ TEBCresume(
 	pc += pcAdjustment;
 	TEBC_YIELD();

-	TclPushTailcallPoint(interp);
 	oPtr = contextPtr->oPtr;
 	if (oPtr->flags & FILTER_HANDLING) {
 	    TclNRAddCallback(interp, FinalizeOONextFilter,
@@ -5411,8 +5412,8 @@ TEBCresume(
 		s1 = (char *) Tcl_GetByteArrayFromObj(valuePtr, &s1len);
 		s2 = (char *) Tcl_GetByteArrayFromObj(value2Ptr, &s2len);
 		memCmpFn = memcmp;
-	    } else if ((valuePtr->typePtr == &tclStringType)
-		    && (value2Ptr->typePtr == &tclStringType)) {
+	    } else if (((valuePtr->typePtr == &tclStringType)
+		    && (value2Ptr->typePtr == &tclStringType))) {
 		/*
 		 * Do a unicode-specific comparison if both of the args are of
 		 * String type. If the char length == byte length, we can do a
@@ -5423,9 +5424,7 @@ TEBCresume(
 		s1len = Tcl_GetCharLength(valuePtr);
 		s2len = Tcl_GetCharLength(value2Ptr);
 		if ((s1len == valuePtr->length)
-			&& (valuePtr->bytes != NULL)
-			&& (s2len == value2Ptr->length)
-			&& (value2Ptr->bytes != NULL)) {
+			&& (s2len == value2Ptr->length)) {
 		    s1 = valuePtr->bytes;
 		    s2 = value2Ptr->bytes;
 		    memCmpFn = memcmp;
@@ -5592,7 +5591,7 @@ TEBCresume(
 	    TclNewObj(objResultPtr);
 	} else if (TclIsPureByteArray(valuePtr)) {
 	    objResultPtr = Tcl_NewByteArrayObj(
-		    Tcl_GetByteArrayFromObj(valuePtr, NULL)+index, 1);
+		    Tcl_GetByteArrayFromObj(valuePtr, &length)+index, 1);
 	} else if (valuePtr->bytes && length == valuePtr->length) {
 	    objResultPtr = Tcl_NewStringObj((const char *)
 		    valuePtr->bytes+index, 1);
@@ -9831,7 +9830,7 @@ IllegalExprOperandType(

    if (opcode == INST_EXPON) {
 	operator = "**";
-    } else if (opcode <= INST_LNOT) {
+    } else if (opcode <= INST_STR_NEQ) {
 	operator = operatorStrings[opcode - INST_LOR];
    }

@@ -235,9 +235,9 @@ ExtractWinRoot(
 	if ((path[0] == 'c' || path[0] == 'C')
 		&& (path[1] == 'o' || path[1] == 'O')) {
 	    if ((path[2] == 'm' || path[2] == 'M')
-		    && path[3] >= '1' && path[3] <= '9') {
+		    && path[3] >= '1' && path[3] <= '4') {
 		/*
-		 * May have match for 'com[1-9]:?', which is a serial port.
+		 * May have match for 'com[1-4]:?', which is a serial port.
 		 */

 		if (path[4] == '\0') {
@@ -257,9 +257,9 @@ ExtractWinRoot(
 	} else if ((path[0] == 'l' || path[0] == 'L')
 		&& (path[1] == 'p' || path[1] == 'P')
 		&& (path[2] == 't' || path[2] == 'T')) {
-	    if (path[3] >= '1' && path[3] <= '9') {
+	    if (path[3] >= '1' && path[3] <= '3') {
 		/*
-		 * May have match for 'lpt[1-9]:?'
+		 * May have match for 'lpt[1-3]:?'
 		 */

 		if (path[4] == '\0') {
@@ -155,7 +155,6 @@ static ChannelBuffer *	AllocChannelBuffer(int length);
 static void		PreserveChannelBuffer(ChannelBuffer *bufPtr);
 static void		ReleaseChannelBuffer(ChannelBuffer *bufPtr);
 static int		IsShared(ChannelBuffer *bufPtr);
-static void		ChannelFree(Channel *chanPtr);
 static void		ChannelTimerProc(ClientData clientData);
 static int		ChanRead(Channel *chanPtr, char *dst, int dstSize);
 static int		CheckChannelErrors(ChannelState *statePtr,
@@ -421,11 +420,7 @@ ChanRead(
     * Each read op must set the blocked and eof states anew, not let
     * the effect of prior reads leak through.
     */
-    if (GotFlag(chanPtr->state, CHANNEL_EOF)) {
-        chanPtr->state->inputEncodingFlags |= TCL_ENCODING_START;
-    }
    ResetFlag(chanPtr->state, CHANNEL_BLOCKED | CHANNEL_EOF);
-    chanPtr->state->inputEncodingFlags &= ~TCL_ENCODING_END;
    if (WillRead(chanPtr) < 0) {
        return -1;
    }
@@ -434,11 +429,7 @@ ChanRead(
 	    dst, dstSize, &result);

    /* Stop any flag leakage through stacked channel levels */
-    if (GotFlag(chanPtr->state, CHANNEL_EOF)) {
-        chanPtr->state->inputEncodingFlags |= TCL_ENCODING_START;
-    }
    ResetFlag(chanPtr->state, CHANNEL_BLOCKED | CHANNEL_EOF);
-    chanPtr->state->inputEncodingFlags &= ~TCL_ENCODING_END;
    if (bytesRead > 0) {
 	/*
 	 * If we get a short read, signal up that we may be BLOCKED.
@@ -1556,22 +1547,6 @@ Tcl_CreateChannel(
     */

    assert(sizeof(Tcl_ChannelTypeVersion) == sizeof(Tcl_DriverBlockModeProc *));
-    assert(typePtr->typeName != NULL);
-    if (NULL == typePtr->closeProc) {
-	Tcl_Panic("channel type %s must define closeProc", typePtr->typeName);
-    }
-    if ((TCL_READABLE & mask) && (NULL == typePtr->inputProc)) {
-	Tcl_Panic("channel type %s must define inputProc when used for reader channel", typePtr->typeName);
-    }
-    if ((TCL_WRITABLE & mask) &&  (NULL == typePtr->outputProc)) {
-	Tcl_Panic("channel type %s must define outputProc when used for writer channel", typePtr->typeName);
-    }
-    if (NULL == typePtr->watchProc) {
-	Tcl_Panic("channel type %s must define watchProc", typePtr->typeName);
-    }
-    if ((NULL!=typePtr->wideSeekProc) && (NULL == typePtr->seekProc)) {
-	Tcl_Panic("channel type %s must define seekProc if defining wideSeekProc", typePtr->typeName);
-    }

    /*
     * JH: We could subsequently memset these to 0 to avoid the numerous
@@ -1939,16 +1914,6 @@ TclChannelRelease(
    }
 }

-static void
-ChannelFree(
-    Channel *chanPtr)
-{
-    if (chanPtr->refCount == 0) {
-	ckfree(chanPtr);
-	return;
-    }
-    chanPtr->typePtr = NULL;
-}

 /*
 *----------------------------------------------------------------------
@@ -2095,7 +2060,7 @@ Tcl_UnstackChannel(
 	 */

 	result = ChanClose(chanPtr, interp);
-	ChannelFree(chanPtr);
+	chanPtr->typePtr = NULL;

 	UpdateInterest(statePtr->topChanPtr);

@@ -2657,8 +2622,6 @@ FlushChannel(
     * the post-condition that on a successful return to caller we've
     * left space in the current output buffer for more writing (the flush
     * call was to make new room).
-     * If the channel is blocking, then yes, so we guarantee that 
-     * blocking flushes actually flush all pending data.
     * Otherwise, no.  Keep the current output buffer where it is so more
     * can be written to it, possibly filling it, to promote more efficient
     * buffer usage.
@@ -2666,8 +2629,7 @@ FlushChannel(

    bufPtr = statePtr->curOutPtr;
    if (bufPtr && BytesLeft(bufPtr) && /* Keep empties off queue */
-	    (statePtr->outQueueHead == NULL || IsBufferFull(bufPtr)
-		    || !GotFlag(statePtr, CHANNEL_NONBLOCKING))) {
+	    (statePtr->outQueueHead == NULL || IsBufferFull(bufPtr))) {
 	if (statePtr->outQueueHead == NULL) {
 	    statePtr->outQueueHead = bufPtr;
 	} else {
@@ -2849,15 +2811,9 @@ FlushChannel(
 	     * write in this call, and we've completed the BG flush.
 	     * These are the two cases above.  If we get here, that means
 	     * there is some kind failure in the writable event machinery.
-	     *
-	     * The tls extension indeed suffers from flaws in its channel
-	     * event mgmt.  See http://core.tcl.tk/tcl/info/c31ca233ca.
-	     * Until that patch is broadly distributed, disable the
-	     * assertion checking here, so that programs using Tcl and
-	     * tls can be debugged.
+	     */

 	    assert(!calledFromAsyncFlush);
-	     */
 	}
    }

@@ -3056,8 +3012,7 @@ CloseChannel(

 	statePtr->topChanPtr = downChanPtr;
 	downChanPtr->upChanPtr = NULL;
-
-	ChannelFree(chanPtr);
+	chanPtr->typePtr = NULL;

 	return Tcl_Close(interp, (Tcl_Channel) downChanPtr);
    }
@@ -3068,7 +3023,7 @@ CloseChannel(
     * stack, make sure to free the ChannelState structure associated with it.
     */

-    ChannelFree(chanPtr);
+    chanPtr->typePtr = NULL;

    Tcl_EventuallyFree(statePtr, TCL_DYNAMIC);

@@ -4432,21 +4387,6 @@ Tcl_GetsObj(
 	return -1;
    }

-    /*
-     * If we're sitting ready to read the eofchar, there's no need to
-     * do it.
-     */
-
-    if (GotFlag(statePtr, CHANNEL_STICKY_EOF)) {
-	SetFlag(statePtr, CHANNEL_EOF);
-	assert( statePtr->inputEncodingFlags & TCL_ENCODING_END );
-	assert( !GotFlag(statePtr, CHANNEL_BLOCKED|INPUT_SAW_CR) );
-
-	/* TODO: Do we need this? */
-	UpdateInterest(chanPtr);
-	return -1;
-    }
-
    /*
     * A binary version of Tcl_GetsObj. This could also handle encodings that
     * are ascii-7 pure (iso8859, utf-8, ...) with a final encoding conversion
@@ -4513,7 +4453,6 @@ Tcl_GetsObj(
    eof = NULL;
    inEofChar = statePtr->inEofChar;

-    ResetFlag(statePtr, CHANNEL_BLOCKED);
    while (1) {
 	if (dst >= dstEnd) {
 	    if (FilterInputBytes(chanPtr, &gs) != 0) {
@@ -4605,14 +4544,14 @@ Tcl_GetsObj(
 		     * Skip the raw bytes that make up the '\n'.
 		     */

-		    char tmp[TCL_UTF_MAX];
+		    char tmp[1 + TCL_UTF_MAX];
 		    int rawRead;

 		    bufPtr = gs.bufPtr;
 		    Tcl_ExternalToUtf(NULL, gs.encoding, RemovePoint(bufPtr),
-			    gs.rawRead, statePtr->inputEncodingFlags
-				| TCL_ENCODING_NO_TERMINATE, &gs.state, tmp,
-			    TCL_UTF_MAX, &rawRead, NULL, NULL);
+			    gs.rawRead, statePtr->inputEncodingFlags,
+			    &gs.state, tmp, 1 + TCL_UTF_MAX, &rawRead, NULL,
+			    NULL);
 		    bufPtr->nextRemoved += rawRead;
 		    gs.rawRead -= rawRead;
 		    gs.bytesWrote--;
@@ -4665,7 +4604,6 @@ Tcl_GetsObj(
 	    dstEnd = eof;
 	    SetFlag(statePtr, CHANNEL_EOF | CHANNEL_STICKY_EOF);
 	    statePtr->inputEncodingFlags |= TCL_ENCODING_END;
-	    ResetFlag(statePtr, CHANNEL_BLOCKED|INPUT_SAW_CR);
 	}
 	if (GotFlag(statePtr, CHANNEL_EOF)) {
 	    skip = 0;
@@ -4713,9 +4651,8 @@ Tcl_GetsObj(
    }
    statePtr->inputEncodingState = gs.state;
    Tcl_ExternalToUtf(NULL, gs.encoding, RemovePoint(bufPtr), gs.rawRead,
-	    statePtr->inputEncodingFlags | TCL_ENCODING_NO_TERMINATE,
-	    &statePtr->inputEncodingState, dst,
-	    eol - dst + skip + TCL_UTF_MAX - 1, &gs.rawRead, NULL,
+	    statePtr->inputEncodingFlags, &statePtr->inputEncodingState, dst,
+	    eol - dst + skip + TCL_UTF_MAX, &gs.rawRead, NULL,
 	    &gs.charsWrote);
    bufPtr->nextRemoved += gs.rawRead;

@@ -4780,13 +4717,6 @@ Tcl_GetsObj(
     */

  done:
-	assert(!GotFlag(statePtr, CHANNEL_EOF)
-		|| GotFlag(statePtr, CHANNEL_STICKY_EOF)
-		|| Tcl_InputBuffered((Tcl_Channel)chanPtr) == 0);
-
-	assert( !(GotFlag(statePtr, CHANNEL_EOF|CHANNEL_BLOCKED)
-		== (CHANNEL_EOF|CHANNEL_BLOCKED)) );
-
    /*
     * Regenerate the top channel, in case it was changed due to
     * self-modifying reflected transforms.
@@ -4810,11 +4740,6 @@ Tcl_GetsObj(
 *	end-of-line or end-of-file has been seen. Bytes read from the input
 *	channel return as a ByteArray obj.
 *
- *	WARNING!  The notion of "binary" used here is different from
- *	notions of "binary" used in other places.  In particular, this
- *	"binary" routine may be called when an -eofchar is set on the
- * 	channel.
- *
 * Results:
 *	Number of characters accumulated in the object or -1 if error,
 *	blocked, or EOF. If -1, use Tcl_GetErrno() to retrieve the POSIX error
@@ -4903,17 +4828,6 @@ TclGetsObjBinary(
 	    if (bufPtr == NULL) {
 		goto restore;
 	    }
-	} else {
-	    /*
-	     * Incoming CHANNEL_STICKY_EOF is filtered out on entry.
-	     * A new CHANNEL_STICKY_EOF set in this routine leads to
-	     * return before coming back here.  When we are not dealing
-	     * with CHANNEL_STICKY_EOF, a CHANNEL_EOF implies an
-	     * empty buffer.  Here the buffer is non-empty so we know
-	     * we're a non-EOF */
-
-	    assert ( !GotFlag(statePtr, CHANNEL_STICKY_EOF) );
-	    assert ( !GotFlag(statePtr, CHANNEL_EOF) );
 	}

 	dst = (unsigned char *) RemovePoint(bufPtr);
@@ -4955,7 +4869,6 @@ TclGetsObjBinary(

 	    SetFlag(statePtr, CHANNEL_EOF | CHANNEL_STICKY_EOF);
 	    statePtr->inputEncodingFlags |= TCL_ENCODING_END;
-	    ResetFlag(statePtr, CHANNEL_BLOCKED|INPUT_SAW_CR);
 	}
 	if (GotFlag(statePtr, CHANNEL_EOF)) {
 	    skip = 0;
@@ -5065,11 +4978,6 @@ TclGetsObjBinary(
     */

  done:
-	assert(!GotFlag(statePtr, CHANNEL_EOF)
-		|| GotFlag(statePtr, CHANNEL_STICKY_EOF)
-		|| Tcl_InputBuffered((Tcl_Channel)chanPtr) == 0);
-	assert( !(GotFlag(statePtr, CHANNEL_EOF|CHANNEL_BLOCKED)
-		== (CHANNEL_EOF|CHANNEL_BLOCKED)) );
    UpdateInterest(chanPtr);
    TclChannelRelease((Tcl_Channel)chanPtr);
    return copiedTotal;
@@ -5182,12 +5090,6 @@ FilterInputBytes(
 	 */

    read:
-	if (GotFlag(statePtr, CHANNEL_NONBLOCKING|CHANNEL_BLOCKED)
-		== (CHANNEL_NONBLOCKING|CHANNEL_BLOCKED)) {
-	    gsPtr->charsWrote = 0;
-	    gsPtr->rawRead = 0;
-	    return -1;
-	}
 	if (GetInput(chanPtr) != 0) {
 	    gsPtr->charsWrote = 0;
 	    gsPtr->rawRead = 0;
@@ -5200,17 +5102,6 @@ FilterInputBytes(
 	    gsPtr->rawRead = 0;
 	    return -1;
 	}
-    } else {
-	/*
-	 * Incoming CHANNEL_STICKY_EOF is filtered out on entry.
-	 * A new CHANNEL_STICKY_EOF set in this routine leads to
-	 * return before coming back here.  When we are not dealing
-	 * with CHANNEL_STICKY_EOF, a CHANNEL_EOF implies an
-	 * empty buffer.  Here the buffer is non-empty so we know
-	 * we're a non-EOF */
-
-	assert ( !GotFlag(statePtr, CHANNEL_STICKY_EOF) );
-	assert ( !GotFlag(statePtr, CHANNEL_EOF) );
    }

    /*
@@ -5247,9 +5138,9 @@ FilterInputBytes(
    }
    gsPtr->state = statePtr->inputEncodingState;
    result = Tcl_ExternalToUtf(NULL, gsPtr->encoding, raw, rawLen,
-	    statePtr->inputEncodingFlags | TCL_ENCODING_NO_TERMINATE,
-	    &statePtr->inputEncodingState, dst, spaceLeft, &gsPtr->rawRead,
-	    &gsPtr->bytesWrote, &gsPtr->charsWrote);
+	    statePtr->inputEncodingFlags, &statePtr->inputEncodingState,
+	    dst, spaceLeft+1, &gsPtr->rawRead, &gsPtr->bytesWrote,
+	    &gsPtr->charsWrote);

    /*
     * Make sure that if we go through 'gets', that we reset the
@@ -5289,6 +5180,12 @@ FilterInputBytes(
 		 * some more, but avoid blocking on a non-blocking channel.
 		 */

+		if (GotFlag(statePtr, CHANNEL_NONBLOCKING|CHANNEL_BLOCKED)
+			== (CHANNEL_NONBLOCKING|CHANNEL_BLOCKED)) {
+		    gsPtr->charsWrote = 0;
+		    gsPtr->rawRead = 0;
+		    return -1;
+		}
 		goto read;
 	    }
 	} else {
@@ -5535,7 +5432,6 @@ Tcl_ReadRaw(
 				/* State info for channel */
    int copied = 0;

-    assert(bytesToRead > 0);
    if (CheckChannelErrors(statePtr, TCL_READABLE | CHANNEL_RAW_MODE) != 0) {
 	return -1;
    }
@@ -5567,19 +5463,8 @@ Tcl_ReadRaw(
 	}
    }

-    /*
-     * Go to the driver only if we got nothing from pushback.
-     * Have to do it this way to avoid EOF mis-timings when we
-     * consider the ability that EOF may not be a permanent
-     * condition in the driver, and in that case we have to
-     * synchronize.
-     */
+    /* Go to the driver if more data needed. */

-    if (copied) {
-	return copied;
-    }
-
-    /* This test not needed. */
    if (bytesToRead > 0) {

 	int nread = ChanRead(chanPtr, readBuf, bytesToRead);
@@ -5602,10 +5487,12 @@ Tcl_ReadRaw(
 	    if (!GotFlag(statePtr, CHANNEL_BLOCKED) || copied == 0) {
 		copied = -1;
 	    }
-	} else {
+	} else if (copied > 0) {
 	    /*
-	     * nread == 0.  Driver is at EOF. Let that state filter up.
+	     * nread == 0.  Driver is at EOF, but if copied>0 bytes
+	     * from pushback, then we should not signal it yet.
 	     */
+	    ResetFlag(statePtr, CHANNEL_EOF);
 	}
    }
    return copied;
@@ -5704,11 +5591,19 @@ DoReadChars(
    ChannelState *statePtr = chanPtr->state;
 				/* State info for channel */
    ChannelBuffer *bufPtr;
-    int copied, copiedNow, result;
-    Tcl_Encoding encoding = statePtr->encoding;
+    int factor, copied, copiedNow, result;
+    Tcl_Encoding encoding;
    int binaryMode;
 #define UTF_EXPANSION_FACTOR	1024
-    int factor = UTF_EXPANSION_FACTOR;
+
+    /*
+     * This operation should occur at the top of a channel stack.
+     */
+
+    chanPtr = statePtr->topChanPtr;
+    encoding = statePtr->encoding;
+    factor = UTF_EXPANSION_FACTOR;
+    TclChannelPreserve((Tcl_Channel)chanPtr);

    binaryMode = (encoding == NULL)
 	    && (statePtr->inputTranslation == TCL_TRANSLATE_LF) 
@@ -5732,46 +5627,8 @@ DoReadChars(
 	}
    }

-    /*
-     * Early out when next read will see eofchar.
-     *
-     * NOTE: See DoRead for argument that it's a bug (one we're keeping)
-     * to have this escape before the one for zero-char read request.
-     */
-
-    if (GotFlag(statePtr, CHANNEL_STICKY_EOF)) {
-	SetFlag(statePtr, CHANNEL_EOF);
-	assert( statePtr->inputEncodingFlags & TCL_ENCODING_END );
-	assert( !GotFlag(statePtr, CHANNEL_BLOCKED|INPUT_SAW_CR) );
-
-	UpdateInterest(chanPtr);
-	return 0;
-    }
-
-    /* Special handling for zero-char read request. */
-    if (toRead == 0) {
-	if (GotFlag(statePtr, CHANNEL_EOF)) {
-	    statePtr->inputEncodingFlags |= TCL_ENCODING_START;
-	}
-	ResetFlag(statePtr, CHANNEL_BLOCKED|CHANNEL_EOF);
-	statePtr->inputEncodingFlags &= ~TCL_ENCODING_END;
-	UpdateInterest(chanPtr);
-	return 0;
-    }
-
-    /*
-     * This operation should occur at the top of a channel stack.
-     */
-
-    chanPtr = statePtr->topChanPtr;
-    TclChannelPreserve((Tcl_Channel)chanPtr);
-
-    /* Must clear the BLOCKED|EOF flags here since we check before reading */
-    if (GotFlag(statePtr, CHANNEL_EOF)) {
-	statePtr->inputEncodingFlags |= TCL_ENCODING_START;
-    }
-    ResetFlag(statePtr, CHANNEL_BLOCKED|CHANNEL_EOF);
-    statePtr->inputEncodingFlags &= ~TCL_ENCODING_END;
+    /* Must clear the BLOCKED flag here since we check before reading */
+    ResetFlag(statePtr, CHANNEL_BLOCKED);
    for (copied = 0; (unsigned) toRead > 0; ) {
 	copiedNow = -1;
 	if (statePtr->inQueueHead != NULL) {
@@ -5846,11 +5703,6 @@ DoReadChars(
     * Update the notifier state so we don't block while there is still data
     * in the buffers.
     */
-	assert(!GotFlag(statePtr, CHANNEL_EOF)
-		|| GotFlag(statePtr, CHANNEL_STICKY_EOF)
-		|| Tcl_InputBuffered((Tcl_Channel)chanPtr) == 0);
-	assert( !(GotFlag(statePtr, CHANNEL_EOF|CHANNEL_BLOCKED)
-		== (CHANNEL_EOF|CHANNEL_BLOCKED)) );
    UpdateInterest(chanPtr);
    TclChannelRelease((Tcl_Channel)chanPtr);
    return copied;
@@ -5964,7 +5816,7 @@ ReadChars(
    int savedIEFlags = statePtr->inputEncodingFlags;
    int savedFlags = statePtr->flags;
    char *dst, *src = RemovePoint(bufPtr);
-    int numBytes, srcLen = BytesLeft(bufPtr);
+    int dstLimit, numBytes, srcLen = BytesLeft(bufPtr);

    /*
     * One src byte can yield at most one character.  So when the
@@ -5983,14 +5835,14 @@ ReadChars(
     */
    
    int factor = *factorPtr;
-    int dstLimit = TCL_UTF_MAX - 1 + toRead * factor / UTF_EXPANSION_FACTOR;
+    int dstNeeded = TCL_UTF_MAX - 1 + toRead * factor / UTF_EXPANSION_FACTOR;

    (void) TclGetStringFromObj(objPtr, &numBytes);
-    Tcl_AppendToObj(objPtr, NULL, dstLimit);
+    Tcl_AppendToObj(objPtr, NULL, dstNeeded);
    if (toRead == srcLen) {
 	unsigned int size;
 	dst = TclGetStringStorage(objPtr, &size) + numBytes;
-	dstLimit = size - numBytes;
+	dstNeeded = size - numBytes;
    } else {
 	dst = TclGetString(objPtr) + numBytes;
    }
@@ -6011,35 +5863,18 @@ ReadChars(
     * a consistent set of results.  This takes the shape of a loop.
     */

+    dstLimit = dstNeeded + 1;
    while (1) {
-	int dstDecoded, dstRead, dstWrote, srcRead, numChars, code;
-	int flags = statePtr->inputEncodingFlags | TCL_ENCODING_NO_TERMINATE;
-	
-	if (charsToRead > 0) {
-	    flags |= TCL_ENCODING_CHAR_LIMIT;
-	    numChars = charsToRead;
-	}
+	int dstDecoded, dstRead, dstWrote, srcRead, numChars;

 	/*
 	 * Perform the encoding transformation.  Read no more than
 	 * srcLen bytes, write no more than dstLimit bytes.
-	 *
-	 * Some trickiness with encoding flags here.  We do not want
-	 * the end of a buffer to be treated as the end of all input
-	 * when the presence of bytes in a next buffer are already
-	 * known to exist.  This is checked with an assert() because
-	 * so far no test case causing the assertion to be false has
-	 * been created.  The normal operations of channel reading
-	 * appear to cause EOF and TCL_ENCODING_END setting to appear
-	 * only in situations where there are no further bytes in
-	 * any buffers.
 	 */

-	assert(bufPtr->nextPtr == NULL || BytesLeft(bufPtr->nextPtr) == 0
-		|| (statePtr->inputEncodingFlags & TCL_ENCODING_END) == 0);
-
-	code = Tcl_ExternalToUtf(NULL, encoding, src, srcLen,
-		flags, &statePtr->inputEncodingState,
+	int code = Tcl_ExternalToUtf(NULL, encoding, src, srcLen,
+		statePtr->inputEncodingFlags & (bufPtr->nextPtr
+		? ~0 : ~TCL_ENCODING_END), &statePtr->inputEncodingState,
 		dst, dstLimit, &srcRead, &dstDecoded, &numChars);

 	/*
@@ -6103,7 +5938,7 @@ ReadChars(
 		     * time.
 		     */

-		    dstLimit = dstRead - 1 + TCL_UTF_MAX;
+		    dstLimit = dstRead + TCL_UTF_MAX;
 		    statePtr->flags = savedFlags;
 		    statePtr->inputEncodingFlags = savedIEFlags;
 		    statePtr->inputEncodingState = savedState;
@@ -6129,7 +5964,7 @@ ReadChars(
 		 * up back here in this call.
 		 */

-		dstLimit = dstRead - 1 + TCL_UTF_MAX;
+		dstLimit = dstRead + TCL_UTF_MAX;
 		statePtr->flags = savedFlags;
 		statePtr->inputEncodingFlags = savedIEFlags;
 		statePtr->inputEncodingState = savedState;
@@ -6146,7 +5981,7 @@ ReadChars(
 	     */

 	    if (code != TCL_OK) {
-		char buffer[TCL_UTF_MAX + 1];
+		char buffer[TCL_UTF_MAX + 2];
 		int read, decoded, count;

 		/* 
@@ -6157,14 +5992,10 @@ ReadChars(
 		statePtr->inputEncodingFlags = savedIEFlags;
 		statePtr->inputEncodingState = savedState;

-		assert(bufPtr->nextPtr == NULL
-			|| BytesLeft(bufPtr->nextPtr) == 0 || 0 ==
-			(statePtr->inputEncodingFlags & TCL_ENCODING_END));
-
 		Tcl_ExternalToUtf(NULL, encoding, src, srcLen,
-		(statePtr->inputEncodingFlags | TCL_ENCODING_NO_TERMINATE),
-		&statePtr->inputEncodingState, buffer, TCL_UTF_MAX + 1,
-		&read, &decoded, &count);
+		statePtr->inputEncodingFlags & (bufPtr->nextPtr
+		? ~0 : ~TCL_ENCODING_END), &statePtr->inputEncodingState,
+		buffer, TCL_UTF_MAX + 2, &read, &decoded, &count);

 		if (count == 2) {
 		    if (buffer[1] == '\n') {
@@ -6176,6 +6007,7 @@ ReadChars(
 			bufPtr->nextRemoved += srcRead;
 		    }

+		    dst[1] = '\0';
 		    statePtr->inputEncodingFlags &= ~TCL_ENCODING_START;

 		    Tcl_SetObjLength(objPtr, numBytes + 1);
@@ -6216,15 +6048,13 @@ ReadChars(
 	if (charsToRead > 0 && numChars > charsToRead) {

 	    /* 
-	     * TODO: This cannot happen anymore.
-	     *
 	     * We read more chars than allowed.  Reset limits to
 	     * prevent that and try again.  Don't forget the extra
 	     * padding of TCL_UTF_MAX bytes demanded by the
 	     * Tcl_ExternalToUtf() call!
 	     */

-	    dstLimit = Tcl_UtfAtIndex(dst, charsToRead) - 1 + TCL_UTF_MAX - dst;
+	    dstLimit = Tcl_UtfAtIndex(dst, charsToRead) + TCL_UTF_MAX - dst;
 	    statePtr->flags = savedFlags;
 	    statePtr->inputEncodingFlags = savedIEFlags;
 	    statePtr->inputEncodingState = savedState;
@@ -6248,8 +6078,9 @@ ReadChars(
 	     * empty string.
 	     */

-	    if (dstRead == 1 && dst[0] == '\n') {
+	    if (dst[0] == '\n') {
 		assert(statePtr->inputTranslation == TCL_TRANSLATE_AUTO);
+		assert(dstRead == 1);

 		goto consume;
 	    }
@@ -6480,7 +6311,7 @@ TranslateInputEOL(

 	SetFlag(statePtr, CHANNEL_EOF | CHANNEL_STICKY_EOF);
 	statePtr->inputEncodingFlags |= TCL_ENCODING_END;
-	ResetFlag(statePtr, CHANNEL_BLOCKED|INPUT_SAW_CR);
+	ResetFlag(statePtr, INPUT_SAW_CR);
    }
 }

@@ -6537,13 +6368,9 @@ Tcl_Ungets(
    /*
     * Clear the EOF flags, and clear the BLOCKED bit.
     */
- 
-    if (GotFlag(statePtr, CHANNEL_EOF)) {
-	statePtr->inputEncodingFlags |= TCL_ENCODING_START;
-    }
+
    ResetFlag(statePtr,
 	    CHANNEL_BLOCKED | CHANNEL_STICKY_EOF | CHANNEL_EOF | INPUT_SAW_CR);
-    statePtr->inputEncodingFlags &= ~TCL_ENCODING_END;

    bufPtr = AllocChannelBuffer(len);
    memcpy(InsertPoint(bufPtr), str, (size_t) len);
@@ -6694,14 +6521,6 @@ GetInput(
    ChannelState *statePtr = chanPtr->state;
 				/* State info for channel */

-    /* 
-     * Verify that all callers know better than to call us when
-     * it's recorded that the next char waiting to be read is the
-     * eofchar.
-     */
-
-    assert( !GotFlag(statePtr, CHANNEL_STICKY_EOF) );
-
    /*
     * Prevent reading from a dead channel -- a channel that has been closed
     * but not yet deallocated, which can happen if the exit handler for
@@ -6713,24 +6532,18 @@ GetInput(
 	return EINVAL;
    }

-    /*
-     * WARNING: There was once a comment here claiming that it was
-     * a bad idea to make another call to the inputproc of a channel
-     * driver when EOF has already been detected on the channel.  Through
-     * much of Tcl's history, this warning was then completely negated
-     * by having all (most?) read paths clear the EOF setting before
-     * reaching here.  So we had a guard that was never triggered.
-     *
-     * Don't be tempted to restore the guard.  Even if EOF is set on
-     * the channel, continue through and call the inputproc again.  This
-     * is the way to enable the ability to [read] again beyond the EOF,
-     * which seems a strange thing to do, but for which use cases exist
-     * [Tcl Bug 5adc350683] and which may even be essential for channels
-     * representing things like ttys or other devices where the stream
-     * might take the logical form of a series of 'files' separated by
-     * an EOF condition.
+    /* 
+     * For a channel at EOF do not bother allocating buffers; there's
+     * nothing more to read.  Avoid calling the driver inputproc in
+     * case some of them do not react well to additional calls after
+     * they've reported an eof state..
+     * TODO: Candidate for a can't happen panic.
     */

+    if (GotFlag(statePtr, CHANNEL_EOF)) {
+	return 0;
+    }
+
    /*
     * First check for more buffers in the pushback area of the topmost
     * channel in the stack and use them. They can be the result of a
@@ -6740,7 +6553,6 @@ GetInput(

    if (chanPtr->inQueueHead != NULL) {

-	/* TODO: Tests to cover this. */
 	assert(statePtr->inQueueHead == NULL);

 	statePtr->inQueueHead = chanPtr->inQueueHead;
@@ -6771,7 +6583,6 @@ GetInput(
 	 * Check the actual buffersize against the requested buffersize.
 	 * Saved buffers of the wrong size are squashed. This is done
 	 * to honor dynamic changes of the buffersize made by the user.
-	 * TODO: Tests to cover this.
 	 */

 	if ((bufPtr != NULL)
@@ -6913,12 +6724,8 @@ Tcl_Seek(
     * point. Also clear CR related flags.
     */

-    if (GotFlag(statePtr, CHANNEL_EOF)) {
-	statePtr->inputEncodingFlags |= TCL_ENCODING_START;
-    }
    ResetFlag(statePtr, CHANNEL_EOF | CHANNEL_STICKY_EOF | CHANNEL_BLOCKED |
 	    INPUT_SAW_CR);
-    statePtr->inputEncodingFlags &= ~TCL_ENCODING_END;

    /*
     * If the channel is in asynchronous output mode, switch it back to
@@ -7293,7 +7100,9 @@ Tcl_Eof(
    ChannelState *statePtr = ((Channel *) chan)->state;
 				/* State of real channel structure. */

-    return GotFlag(statePtr, CHANNEL_EOF) ? 1 : 0;
+    return (GotFlag(statePtr, CHANNEL_STICKY_EOF) ||
+	    (GotFlag(statePtr, CHANNEL_EOF) &&
+	    (Tcl_InputBuffered(chan) == 0))) ? 1 : 0;
 }

 /*
@@ -8012,11 +7821,7 @@ Tcl_SetChannelOption(
 	 * ahead'. Ditto for blocked.
 	 */

-	if (GotFlag(statePtr, CHANNEL_EOF)) {
-	    statePtr->inputEncodingFlags |= TCL_ENCODING_START;
-	}
 	ResetFlag(statePtr, CHANNEL_EOF|CHANNEL_STICKY_EOF|CHANNEL_BLOCKED);
-	statePtr->inputEncodingFlags &= ~TCL_ENCODING_END;
 	return TCL_OK;
    } else if (HaveOpt(1, "-translation")) {
 	const char *readMode, *writeMode;
@@ -9284,9 +9089,6 @@ MBWrite(
    }
    outStatePtr->outQueueTail = tail;
    inStatePtr->inQueueHead = bufPtr;
-    if (inStatePtr->inQueueTail == tail) {
-	inStatePtr->inQueueTail = bufPtr;
-    }
    if (bufPtr == NULL) {
 	inStatePtr->inQueueTail = NULL;
    }
@@ -9687,40 +9489,6 @@ DoRead(
    ChannelState *statePtr = chanPtr->state;
    char *p = dst;

-    assert (bytesToRead >= 0);
-
-    /*
-     * Early out when we know a read will get the eofchar.
-     *
-     * NOTE: This seems to be a bug.  The special handling for
-     * a zero-char read request ought to come first.  As coded
-     * the EOF due to eofchar has distinguishing behavior from
-     * the EOF due to reported EOF on the underlying device, and
-     * that seems undesirable.  However recent history indicates
-     * that new inconsistent behavior in a patchlevel has problems
-     * too.  Keep on keeping on for now.
-     */
-
-    if (GotFlag(statePtr, CHANNEL_STICKY_EOF)) {
-	SetFlag(statePtr, CHANNEL_EOF);
-	assert( statePtr->inputEncodingFlags & TCL_ENCODING_END );
-	assert( !GotFlag(statePtr, CHANNEL_BLOCKED|INPUT_SAW_CR) );
-
-	UpdateInterest(chanPtr);
-	return 0;
-    }
-
-    /* Special handling for zero-char read request. */
-    if (bytesToRead == 0) {
-	if (GotFlag(statePtr, CHANNEL_EOF)) {
-	    statePtr->inputEncodingFlags |= TCL_ENCODING_START;
-	}
-	ResetFlag(statePtr, CHANNEL_BLOCKED|CHANNEL_EOF);
-	statePtr->inputEncodingFlags &= ~TCL_ENCODING_END;
-	UpdateInterest(chanPtr);
-	return 0;
-    }
-
    TclChannelPreserve((Tcl_Channel)chanPtr);
    while (bytesToRead) {
 	/*
@@ -9731,6 +9499,16 @@ DoRead(
 	int bytesRead, bytesWritten;
 	ChannelBuffer *bufPtr = statePtr->inQueueHead;

+	/*
+	 * When there's no buffered data to read, and we're at EOF,
+	 * escape to the caller.
+	 */
+
+	if (statePtr->flags & CHANNEL_EOF
+		&& (bufPtr == NULL || IsBufferEmpty(bufPtr))) {
+	    break;
+	}
+
 	/*
 	 * Don't read more data if we have what we need. 
 	 */
@@ -9791,7 +9569,8 @@ DoRead(
 	     * 1) We're @EOF because we saw eof char.
 	     */

-	    if (GotFlag(statePtr, CHANNEL_STICKY_EOF)) {
+	    if (statePtr->inEofChar
+		    && RemovePoint(bufPtr)[0] == statePtr->inEofChar) {
 		UpdateInterest(chanPtr);
 		break;
 	    }
@@ -9842,33 +9621,17 @@ DoRead(
 		statePtr->inQueueTail = NULL;
 	    }
 	    RecycleBuffer(statePtr, bufPtr, 0);
-	    bufPtr = statePtr->inQueueHead;
 	}

 	if ((GotFlag(statePtr, CHANNEL_NONBLOCKING) || allowShortReads)
 		&& GotFlag(statePtr, CHANNEL_BLOCKED)) {
 	    break;
 	}
-
-	/*
-	 * When there's no buffered data to read, and we're at EOF,
-	 * escape to the caller.
-	 */
-
-	if (GotFlag(statePtr, CHANNEL_EOF)
-		&& (bufPtr == NULL || IsBufferEmpty(bufPtr))) {
-	    break;
-	}
    }
    if (bytesToRead == 0) {
 	ResetFlag(statePtr, CHANNEL_BLOCKED);
    }

-	assert(!GotFlag(statePtr, CHANNEL_EOF)
-		|| GotFlag(statePtr, CHANNEL_STICKY_EOF)
-		|| Tcl_InputBuffered((Tcl_Channel)chanPtr) == 0);
-	assert( !(GotFlag(statePtr, CHANNEL_EOF|CHANNEL_BLOCKED)
-		== (CHANNEL_EOF|CHANNEL_BLOCKED)) );
    TclChannelRelease((Tcl_Channel)chanPtr);
    return (int)(p - dst);
 }
@@ -187,7 +187,6 @@ struct TransformChannelData {
    Tcl_Channel self;		/* Our own Channel handle. */
    int readIsFlushed;		/* Flag to note whether in.flushProc was
 				 * called or not. */
-    int eofPending;		/* Flag: EOF seen down, not raised up */
    int flags;			/* Currently CHANNEL_ASYNC or zero. */
    int watchMask;		/* Current watch/event/interest mask. */
    int mode;			/* Mode of parent channel, OR'ed combination
@@ -293,7 +292,6 @@ TclChannelTransform(
    Tcl_DStringInit(&ds);
    Tcl_GetChannelOption(interp, chan, "-blocking", &ds);
    dataPtr->readIsFlushed = 0;
-    dataPtr->eofPending = 0;
    dataPtr->flags = 0;
    if (ds.string[0] == '0') {
 	dataPtr->flags |= CHANNEL_ASYNC;
@@ -626,7 +624,7 @@ TransformInputProc(

    if (toRead == 0 || dataPtr->self == NULL) {
 	/*
-	 * Catch a no-op. TODO: Is this a panic()?
+	 * Catch a no-op.
 	 */
 	return 0;
    }
@@ -678,17 +676,6 @@ TransformInputProc(
 	if (toRead <= 0) {
 	    break;
 	}
-	if (dataPtr->eofPending) {
-	    /*
-	     * Already saw EOF from downChan; don't ask again.
-	     * NOTE: Could move this up to avoid the last maxRead
-	     * execution.  Believe this would still be correct behavior,
-	     * but the test suite tests the whole command callback 
-	     * sequence, so leave it unchanged for now.
-	     */
-
-	    break;
-	}

 	/*
 	 * Get bytes from the underlying channel.
@@ -724,7 +711,14 @@ TransformInputProc(
 	     * on the down channel.
 	     */

-	    dataPtr->eofPending = 1;
+	    if (dataPtr->readIsFlushed) {
+		/*
+		 * Already flushed, nothing to do anymore.
+		 */
+
+		break;
+	    }
+
 	    dataPtr->readIsFlushed = 1;
 	    ExecuteCallback(dataPtr, NULL, A_FLUSH_READ, NULL, 0,
 		    TRANSMIT_IBUF, P_PRESERVE);
@@ -752,11 +746,8 @@ TransformInputProc(
 	    break;
 	}
    } /* while toRead > 0 */
-
-    if (gotBytes == 0) {
-	dataPtr->eofPending = 0;
-    }
    ReleaseData(dataPtr);
+
    return gotBytes;
 }

@@ -867,7 +858,6 @@ TransformSeekProc(
 		P_NO_PRESERVE);
 	ResultClear(&dataPtr->result);
 	dataPtr->readIsFlushed = 0;
-	dataPtr->eofPending = 0;
    }
    ReleaseData(dataPtr);

@@ -941,7 +931,6 @@ TransformWideSeekProc(
 		P_NO_PRESERVE);
 	ResultClear(&dataPtr->result);
 	dataPtr->readIsFlushed = 0;
-	dataPtr->eofPending = 0;
    }
    ReleaseData(dataPtr);

@@ -161,7 +161,6 @@ typedef struct {
    int mode;			/* Mask of R/W mode */
    int nonblocking;		/* Flag: Channel is blocking or not. */
    int readIsDrained;		/* Flag: Read buffers are flushed. */
-    int eofPending;		/* Flag: EOF seen down, but not raised up */
    int dead;			/* Boolean signal that some operations
 				 * should no longer be attempted. */
    ResultBuffer result;
@@ -1083,10 +1082,6 @@ ReflectInput(
    bufObj = Tcl_NewByteArrayObj(NULL, toRead);
    Tcl_IncrRefCount(bufObj);
    gotBytes = 0;
-    if (rtPtr->eofPending) {
-	goto stop;
-    }
-    rtPtr->readIsDrained = 0;
    while (toRead > 0) {
 	/*
 	 * Loop until the request is satisfied (or no data available from
@@ -1102,11 +1097,6 @@ ReflectInput(
 	    goto stop;
 	}

-	if (rtPtr->eofPending) {
-	    goto stop;
-	}
-
-
 	/*
 	 * The buffer is exhausted, but the caller wants even more. We now
 	 * have to go to the underlying channel, get more bytes and then
@@ -1175,9 +1165,11 @@ ReflectInput(
 	     * Zero returned from Tcl_ReadRaw() always indicates EOF
 	     * on the down channel.
 	     */
-
-	    rtPtr->eofPending = 1;
 	
+		if (rtPtr->readIsDrained) {
+		    goto stop;
+		}
+
 		/*
 		 * Now this is a bit different. The partial data waiting is
 		 * converted and returned.
@@ -1219,9 +1211,6 @@ ReflectInput(
    } /* while toRead > 0 */

 stop:
-    if (gotBytes == 0) {
-	rtPtr->eofPending = 0;
-    }
    Tcl_DecrRefCount(bufObj);
    Tcl_Release(rtPtr);
    return gotBytes;
@@ -1777,7 +1766,6 @@ NewReflectedTransform(
    rtPtr->timer = NULL;
    rtPtr->mode = 0;
    rtPtr->readIsDrained = 0;
-    rtPtr->eofPending = 0;
    rtPtr->nonblocking =
 	    (((Channel *) parentChan)->state->flags & CHANNEL_NONBLOCKING);
    rtPtr->dead = 0;
@@ -3330,7 +3318,6 @@ TransformClear(
    (void) InvokeTclMethod(rtPtr, "clear", NULL, NULL, NULL);

    rtPtr->readIsDrained = 0;
-    rtPtr->eofPending = 0;
    ResultClear(&rtPtr->result);
 }

@@ -12,26 +12,9 @@
 #include "tclInt.h"

 #if defined(_WIN32) && defined(UNICODE)
-/* On Windows, we need to do proper Unicode->UTF-8 conversion. */
-
-typedef struct ThreadSpecificData {
-    int initialized;
-    Tcl_DString errorMsg; /* UTF-8 encoded error-message */
-} ThreadSpecificData;
-static Tcl_ThreadDataKey dataKey;
-
-#undef gai_strerror
-static const char *gai_strerror(int code) {
-    ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&dataKey);
- 
-    if (tsdPtr->initialized) {
-	Tcl_DStringFree(&tsdPtr->errorMsg);
-    } else {
-	tsdPtr->initialized = 1;
-    }
-    Tcl_WinTCharToUtf(gai_strerrorW(code), -1, &tsdPtr->errorMsg);
-    return Tcl_DStringValue(&tsdPtr->errorMsg);
-}
+/* On Windows, we always need the ASCII version. */
+#   undef gai_strerror
+#   define gai_strerror gai_strerrorA
 #endif

 /*
@@ -2927,7 +2927,7 @@ MODULE_SCOPE void	TclFinalizePreserve(void);
 MODULE_SCOPE void	TclFinalizeSynchronization(void);
 MODULE_SCOPE void	TclFinalizeThreadAlloc(void);
 MODULE_SCOPE void	TclFinalizeThreadAllocThread(void);
-MODULE_SCOPE void	TclFinalizeThreadData(int quick);
+MODULE_SCOPE void	TclFinalizeThreadData(void);
 MODULE_SCOPE void	TclFinalizeThreadObjects(void);
 MODULE_SCOPE double	TclFloor(const mp_int *a);
 MODULE_SCOPE void	TclFormatNaN(double value, char *buffer);
@@ -2985,8 +2985,8 @@ MODULE_SCOPE void	TclInitNotifier(void);
 MODULE_SCOPE void	TclInitObjSubsystem(void);
 MODULE_SCOPE void	TclInitSubsystems(void);
 MODULE_SCOPE int	TclInterpReady(Tcl_Interp *interp);
+MODULE_SCOPE int	TclIsLocalScalar(const char *src, int len);
 MODULE_SCOPE int	TclIsSpaceProc(char byte);
-MODULE_SCOPE int	TclIsBareword(char byte);
 MODULE_SCOPE Tcl_Obj *	TclJoinPath(int elements, Tcl_Obj * const objv[]);
 MODULE_SCOPE int	TclJoinThread(Tcl_ThreadId id, int *result);
 MODULE_SCOPE void	TclLimitRemoveAllHandlers(Tcl_Interp *interp);
@@ -3059,8 +3059,6 @@ MODULE_SCOPE void	TclpInitUnlock(void);
 MODULE_SCOPE Tcl_Obj *	TclpObjListVolumes(void);
 MODULE_SCOPE void	TclpMasterLock(void);
 MODULE_SCOPE void	TclpMasterUnlock(void);
-MODULE_SCOPE void	TclpMutexLock(void);
-MODULE_SCOPE void	TclpMutexUnlock(void);
 MODULE_SCOPE int	TclpMatchFiles(Tcl_Interp *interp, char *separators,
 			    Tcl_DString *dirPtr, char *pattern, char *tail);
 MODULE_SCOPE int	TclpObjNormalizePath(Tcl_Interp *interp,
@@ -4118,8 +4116,7 @@ MODULE_SCOPE void	TclpFreeAllocCache(void *);
 	AllocCache *cachePtr;						\
 	if (((interp) == NULL) ||					\
 		((cachePtr = ((Interp *)(interp))->allocCache),		\
-			((cachePtr->numObjects == 0) ||			\
-			(cachePtr->numObjects >= ALLOC_NOBJHIGH)))) {	\
+			(cachePtr->numObjects >= ALLOC_NOBJHIGH))) {	\
 	    TclThreadFreeObj(objPtr);					\
 	} else {							\
 	    (objPtr)->internalRep.twoPtrValue.ptr1 = cachePtr->firstObjPtr; \
@@ -1675,13 +1675,10 @@ Tcl_NewObjectInstance(

 		/*
 		 * Take care to not delete a deleted object; that would be
-		 * bad. [Bug 2903011] Also take care to make sure that we have
-		 * the name of the command before we delete it. [Bug
-		 * 9dd1bd7a74]
+		 * bad. [Bug 2903011]
 		 */

 		if (!Deleted(oPtr)) {
-		    (void) TclOOObjectName(interp, oPtr);
 		    Tcl_DeleteCommandFromToken(interp, oPtr->command);
 		}
 		return NULL;
@@ -1824,12 +1821,10 @@ FinalizeAlloc(

 	/*
 	 * Take care to not delete a deleted object; that would be bad. [Bug
-	 * 2903011] Also take care to make sure that we have the name of the
-	 * command before we delete it. [Bug 9dd1bd7a74]
+	 * 2903011]
 	 */

 	if (!Deleted(oPtr)) {
-	    (void) TclOOObjectName(interp, oPtr);
 	    Tcl_DeleteCommandFromToken(interp, oPtr->command);
 	}
 	DelRef(oPtr);
@@ -24,7 +24,7 @@
 * win/tclooConfig.sh
 */

-#define TCLOO_VERSION "1.0.3"
+#define TCLOO_VERSION "1.0.2"
 #define TCLOO_PATCHLEVEL TCLOO_VERSION

 #include "tcl.h"
@@ -1301,39 +1301,6 @@ TclFreeObj(

    ObjInitDeletionContext(context);

-# ifdef TCL_THREADS
-    /*
-     * Check to make sure that the Tcl_Obj was allocated by the current
-     * thread. Don't do this check when shutting down since thread local
-     * storage can be finalized before the last Tcl_Obj is freed.
-     */
-
-    if (!TclInExit()) {
-	Tcl_HashTable *tablePtr;
-	Tcl_HashEntry *hPtr;
-	ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&dataKey);
-
-	tablePtr = tsdPtr->objThreadMap;
-	if (!tablePtr) {
-	    Tcl_Panic("TclFreeObj: object table not initialized");
-	}
-	hPtr = Tcl_FindHashEntry(tablePtr, (char *) objPtr);
-	if (hPtr) {
-	    /*
-	     * As the Tcl_Obj is going to be deleted we remove the entry.
-	     */
-
-	    ObjData *objData = Tcl_GetHashValue(hPtr);
-
-	    if (objData != NULL) {
-		ckfree(objData);
-	    }
-
-	    Tcl_DeleteHashEntry(hPtr);
-	}
-    }
-# endif
-
    /*
     * Check for a double free of the same value.  This is slightly tricky
     * because it is customary to free a Tcl_Obj when its refcount falls
@@ -3799,6 +3766,20 @@ Tcl_DbDecrRefCount(
 	    Tcl_Panic("Trying to %s of Tcl_Obj allocated in another thread",
                    "decr ref count");
 	}
+
+	/*
+	 * If the Tcl_Obj is going to be deleted, remove the entry.
+	 */
+
+	if ((objPtr->refCount - 1) <= 0) {
+	    ObjData *objData = Tcl_GetHashValue(hPtr);
+
+	    if (objData != NULL) {
+		ckfree(objData);
+	    }
+
+	    Tcl_DeleteHashEntry(hPtr);
+	}
    }
 # endif /* TCL_THREADS */
 #endif /* TCL_MEM_DEBUG */
@@ -618,47 +618,6 @@ TclIsSpaceProc(
    return CHAR_TYPE(byte) & (TYPE_SPACE) || byte == '\n';
 }

-/*
- *----------------------------------------------------------------------
- *
- * TclIsBareword--
- *
- *	Report whether byte is one that can be part of a "bareword".
- *	This concept is named in expression parsing, where it determines
- *	what can be a legal function name, but is the same definition used
- *	in determining what variable names can be parsed as variable
- *	substitutions without the benefit of enclosing braces.  The set of
- *	ASCII chars that are accepted are the numeric chars ('0'-'9'),
- *	the alphabetic chars ('a'-'z', 'A'-'Z')	and underscore ('_').
- *
- * Results:
- *	Returns 1, if byte is in the accepted set of chars, 0 otherwise.
- *
- * Side effects:
- *	None.
- *
- *----------------------------------------------------------------------
- */
-
-int
-TclIsBareword(
-    char byte)
-{
-    if (byte < '0' || byte > 'z') {
-	return 0;
-    }
-    if (byte <= '9' || byte >= 'a') {
-	return 1;
-    }
-    if (byte == '_') {
-	return 1;
-    }
-    if (byte < 'A' || byte > 'Z') {
-	return 0;
-    }
-    return 1;
-}
-
 /*
 *----------------------------------------------------------------------
 *
@@ -1387,7 +1346,9 @@ Tcl_ParseVarName(
 {
    Tcl_Token *tokenPtr;
    register const char *src;
-    int varIndex;
+    unsigned char c;
+    int varIndex, offset;
+    Tcl_UniChar ch;
    unsigned array;

    if ((numBytes == 0) || (start == NULL)) {
@@ -1470,12 +1431,22 @@ Tcl_ParseVarName(
 	tokenPtr->numComponents = 0;

 	while (numBytes) {
-	    if (TclIsBareword(*src)) {
-		src += 1;
-		numBytes -= 1;
+	    if (Tcl_UtfCharComplete(src, numBytes)) {
+		offset = Tcl_UtfToUniChar(src, &ch);
+	    } else {
+		char utfBytes[TCL_UTF_MAX];
+
+		memcpy(utfBytes, src, (size_t) numBytes);
+		utfBytes[numBytes] = '\0';
+		offset = Tcl_UtfToUniChar(utfBytes, &ch);
+	    }
+	    c = UCHAR(ch);
+	    if (isalnum(c) || (c == '_')) {	/* INTL: ISO only, UCHAR. */
+		src += offset;
+		numBytes -= offset;
 		continue;
 	    }
-	    if ((src[0] == ':') && (numBytes != 1) && (src[1] == ':')) {
+	    if ((c == ':') && (numBytes != 1) && (src[1] == ':')) {
 		src += 2;
 		numBytes -= 2;
 		while (numBytes && (*src == ':')) {
@@ -2525,6 +2496,56 @@ TclObjCommandComplete(
    return CommandComplete(script, length);
 }

+/*
+ *----------------------------------------------------------------------
+ *
+ * TclIsLocalScalar --
+ *
+ *	Check to see if a given string is a legal scalar variable name with no
+ *	namespace qualifiers or substitutions.
+ *
+ * Results:
+ *	Returns 1 if the variable is a local scalar.
+ *
+ * Side effects:
+ *	None.
+ *
+ *----------------------------------------------------------------------
+ */
+
+int
+TclIsLocalScalar(
+    const char *src,
+    int len)
+{
+    const char *p;
+    const char *lastChar = src + (len - 1);
+
+    for (p=src ; p<=lastChar ; p++) {
+	if ((CHAR_TYPE(*p) != TYPE_NORMAL)
+		&& (CHAR_TYPE(*p) != TYPE_COMMAND_END)) {
+	    /*
+	     * TCL_COMMAND_END is returned for the last character of the
+	     * string. By this point we know it isn't an array or namespace
+	     * reference.
+	     */
+
+	    return 0;
+	}
+	if (*p == '(') {
+	    if (*lastChar == ')') {	/* We have an array element */
+		return 0;
+	    }
+	} else if (*p == ':') {
+	    if ((p != lastChar) && *(p+1) == ':') {	/* qualified name */
+		return 0;
+	    }
+	}
+    }
+
+    return 1;
+}
+
 /*
 * Local Variables:
 * mode: c
@@ -1412,7 +1412,6 @@ const TclStubs tclStubs = {
    Tcl_FindSymbol, /* 628 */
    Tcl_FSUnloadFile, /* 629 */
    Tcl_ZlibStreamSetCompressionDictionary, /* 630 */
-    Tcl_MutexUnlockAndFinalize, /* 631 */
 };

 /* !END!: Do not edit above this line. */
@@ -50,7 +50,6 @@ static void		RememberSyncObject(void *objPtr,
 #undef Tcl_MutexLock
 #undef Tcl_MutexUnlock
 #undef Tcl_MutexFinalize
-#undef Tcl_MutexUnlockAndFinalize
 #undef Tcl_ConditionNotify
 #undef Tcl_ConditionWait
 #undef Tcl_ConditionFinalize
@@ -282,43 +281,6 @@ Tcl_MutexFinalize(
    TclpMasterUnlock();
 }

-/*
- *----------------------------------------------------------------------
- *
- * Tcl_MutexUnlockAndFinalize --
- *
- *	This procedure is invoked to unlock and then finalize a mutex.
- *	The mutex must have been locked by Tcl_MutexLock.  It is also
- *	removed from the list of remembered objects.  The mutex can no
- *	longer be used after calling this procedure.
- *
- * Results:
- *	None.
- *
- * Side effects:
- *	Remove the mutex from the list.
- *
- *----------------------------------------------------------------------
- */
-
-void
-Tcl_MutexUnlockAndFinalize(
-    Tcl_Mutex *mutexPtr)
-{
-    Tcl_Mutex mutex;
-    TclpMasterLock();
-    TclpMutexLock();
-#ifdef TCL_THREADS
-    mutex = *mutexPtr;
-    *mutexPtr = NULL; /* Force it to be created again. */
-    Tcl_MutexUnlock(&mutex);
-    TclpFinalizeMutex(&mutex);
-#endif
-    ForgetSyncObject(mutexPtr, &mutexRecord);
-    TclpMutexUnlock();
-    TclpMasterUnlock();
-}
-
 /*
 *----------------------------------------------------------------------
 *
@@ -391,11 +353,11 @@ Tcl_ConditionFinalize(
 */

 void
-TclFinalizeThreadData(int quick)
+TclFinalizeThreadData(void)
 {
    TclFinalizeThreadDataThread();
 #if defined(TCL_THREADS) && defined(USE_THREAD_ALLOC)
-    if (!quick) {
+    if ((!TclInExit())||TclFullFinalizationRequested()) {
 	/*
 	 * Quick exit principle makes it useless to terminate allocators
 	 */
@@ -84,7 +84,6 @@ typedef union Block {

 typedef struct Bucket {
    Block *firstPtr;		/* First block available */
-    Block *lastPtr;		/* End of block list */
    long numFree;		/* Number of blocks available */

    /* All fields below for accounting only */
@@ -108,7 +107,6 @@ typedef struct Cache {
    Tcl_ThreadId owner;		/* Which thread's cache is this? */
    Tcl_Obj *firstObjPtr;	/* List of free objects for thread */
    int numObjects;		/* Number of objects for thread */
-    Tcl_Obj *lastPtr;		/* Last object in this cache */
    int totalAssigned;		/* Total space assigned to thread */
    Bucket buckets[NBUCKETS];	/* The buckets for this thread */
 } Cache;
@@ -137,7 +135,6 @@ static int	GetBlocks(Cache *cachePtr, int bucket);
 static Block *	Ptr2Block(char *ptr);
 static char *	Block2Ptr(Block *blockPtr, int bucket, unsigned int reqSize);
 static void	MoveObjs(Cache *fromPtr, Cache *toPtr, int numMove);
-static void	PutObjs(Cache *fromPtr, int numMove);

 /*
 * Local variables defined in this file and initialized at startup.
@@ -274,7 +271,9 @@ TclFreeAllocCache(
     */

    if (cachePtr->numObjects > 0) {
-	PutObjs(cachePtr, cachePtr->numObjects);
+	Tcl_MutexLock(objLockPtr);
+	MoveObjs(cachePtr, sharedPtr, cachePtr->numObjects);
+	Tcl_MutexUnlock(objLockPtr);
    }

    /*
@@ -416,9 +415,6 @@ TclpFree(
    cachePtr->buckets[bucket].totalAssigned -= blockPtr->blockReqSize;
    blockPtr->nextBlock = cachePtr->buckets[bucket].firstPtr;
    cachePtr->buckets[bucket].firstPtr = blockPtr;
-    if (cachePtr->buckets[bucket].numFree == 0) {
-	cachePtr->buckets[bucket].lastPtr = blockPtr;
-    }
    cachePtr->buckets[bucket].numFree++;
    cachePtr->buckets[bucket].numInserts++;

@@ -576,13 +572,11 @@ TclThreadAllocObj(void)
 	    if (newObjsPtr == NULL) {
 		Tcl_Panic("alloc: could not allocate %d new objects", numMove);
 	    }
-	    cachePtr->lastPtr = newObjsPtr + numMove - 1;
-	    objPtr = cachePtr->firstObjPtr;	/* NULL */
 	    while (--numMove >= 0) {
-		newObjsPtr[numMove].internalRep.twoPtrValue.ptr1 = objPtr;
-		objPtr = newObjsPtr + numMove;
+		objPtr = &newObjsPtr[numMove];
+		objPtr->internalRep.twoPtrValue.ptr1 = cachePtr->firstObjPtr;
+		cachePtr->firstObjPtr = objPtr;
 	    }
-	    cachePtr->firstObjPtr = newObjsPtr;
 	}
    }

@@ -630,9 +624,6 @@ TclThreadFreeObj(

    objPtr->internalRep.twoPtrValue.ptr1 = cachePtr->firstObjPtr;
    cachePtr->firstObjPtr = objPtr;
-    if (cachePtr->numObjects == 0) {
-	cachePtr->lastPtr = objPtr;
-    }
    cachePtr->numObjects++;

    /*
@@ -641,7 +632,9 @@ TclThreadFreeObj(
     */

    if (cachePtr->numObjects > NOBJHIGH) {
-	PutObjs(cachePtr, NOBJALLOC);
+	Tcl_MutexLock(objLockPtr);
+	MoveObjs(cachePtr, sharedPtr, NOBJALLOC);
+	Tcl_MutexUnlock(objLockPtr);
    }
 }

@@ -739,64 +732,10 @@ MoveObjs(
     * just have to update the first and last.
     */

-    toPtr->lastPtr = objPtr;
-    objPtr->internalRep.twoPtrValue.ptr1 = toPtr->firstObjPtr; /* NULL */
+    objPtr->internalRep.twoPtrValue.ptr1 = toPtr->firstObjPtr;
    toPtr->firstObjPtr = fromFirstObjPtr;
 }

-/*
- *----------------------------------------------------------------------
- *
- * PutObjs --
- *
- *	Move Tcl_Obj's from thread cache to shared cache.
- *
- * Results:
- *	None.
- *
- * Side effects:
- *	None.
- *
- *----------------------------------------------------------------------
- */
-
-static void
-PutObjs(
-    Cache *fromPtr,
-    int numMove)
-{
-    int keep = fromPtr->numObjects - numMove;
-    Tcl_Obj *firstPtr, *lastPtr = NULL;
-
-    fromPtr->numObjects = keep;
-    firstPtr = fromPtr->firstObjPtr;
-    if (keep == 0) {
-	fromPtr->firstObjPtr = NULL;
-    } else {
-	do {
-	    lastPtr = firstPtr;
-	    firstPtr = firstPtr->internalRep.twoPtrValue.ptr1;
-	} while (--keep > 0);
-	lastPtr->internalRep.twoPtrValue.ptr1 = NULL;
-    }
-
-    /*
-     * Move all objects as a block - they are already linked to each other, we
-     * just have to update the first and last.
-     */
-
-    Tcl_MutexLock(objLockPtr);
-    fromPtr->lastPtr->internalRep.twoPtrValue.ptr1 = sharedPtr->firstObjPtr;
-    sharedPtr->firstObjPtr = firstPtr;
-    if (sharedPtr->numObjects == 0) {
-	sharedPtr->lastPtr = fromPtr->lastPtr;
-    }
-    sharedPtr->numObjects += numMove;
-    Tcl_MutexUnlock(objLockPtr);
-
-    fromPtr->lastPtr = lastPtr;
-}
-
 /*
 *----------------------------------------------------------------------
 *
@@ -909,25 +848,20 @@ PutBlocks(
    int bucket,
    int numMove)
 {
+    register Block *lastPtr, *firstPtr;
+    register int n = numMove;
+
    /*
-     * We have numFree.  Want to shed numMove. So compute how many
-     * Blocks to keep.
+     * Before acquiring the lock, walk the block list to find the last block
+     * to be moved.
     */

-    int keep = cachePtr->buckets[bucket].numFree - numMove;
-    Block *lastPtr = NULL, *firstPtr;
-
-    cachePtr->buckets[bucket].numFree = keep;
-    firstPtr = cachePtr->buckets[bucket].firstPtr;
-    if (keep == 0) {
-	cachePtr->buckets[bucket].firstPtr = NULL;
-    } else {
-	do {
-	    lastPtr = firstPtr;
-	    firstPtr = firstPtr->nextBlock;
-	} while (--keep > 0);
-	lastPtr->nextBlock = NULL;
+    firstPtr = lastPtr = cachePtr->buckets[bucket].firstPtr;
+    while (--n > 0) {
+	lastPtr = lastPtr->nextBlock;
    }
+    cachePtr->buckets[bucket].firstPtr = lastPtr->nextBlock;
+    cachePtr->buckets[bucket].numFree -= numMove;

    /*
     * Aquire the lock and place the list of blocks at the front of the shared
@@ -935,17 +869,10 @@ PutBlocks(
     */

    LockBucket(cachePtr, bucket);
-    cachePtr->buckets[bucket].lastPtr->nextBlock
-	    = sharedPtr->buckets[bucket].firstPtr;
+    lastPtr->nextBlock = sharedPtr->buckets[bucket].firstPtr;
    sharedPtr->buckets[bucket].firstPtr = firstPtr;
-    if (sharedPtr->buckets[bucket].numFree == 0) {
-	sharedPtr->buckets[bucket].lastPtr
-		= cachePtr->buckets[bucket].lastPtr;
-    }
    sharedPtr->buckets[bucket].numFree += numMove;
    UnlockBucket(cachePtr, bucket);
-
-    cachePtr->buckets[bucket].lastPtr = lastPtr;
 }

 /*
@@ -992,8 +919,6 @@ GetBlocks(
 	    if (n >= sharedPtr->buckets[bucket].numFree) {
 		cachePtr->buckets[bucket].firstPtr =
 			sharedPtr->buckets[bucket].firstPtr;
-		cachePtr->buckets[bucket].lastPtr =
-			sharedPtr->buckets[bucket].lastPtr;
 		cachePtr->buckets[bucket].numFree =
 			sharedPtr->buckets[bucket].numFree;
 		sharedPtr->buckets[bucket].firstPtr = NULL;
@@ -1007,7 +932,6 @@ GetBlocks(
 		    blockPtr = blockPtr->nextBlock;
 		}
 		sharedPtr->buckets[bucket].firstPtr = blockPtr->nextBlock;
-		cachePtr->buckets[bucket].lastPtr = blockPtr;
 		blockPtr->nextBlock = NULL;
 	    }
 	}
@@ -1059,7 +983,6 @@ GetBlocks(
 		((char *) blockPtr + bucketInfo[bucket].blockSize);
 	    blockPtr = blockPtr->nextBlock;
 	}
-	cachePtr->buckets[bucket].lastPtr = blockPtr;
 	blockPtr->nextBlock = NULL;
    }
    return 1;
@@ -4746,7 +4746,7 @@ Tcl_GetVariableFullName(
    } else if (iPtr->varFramePtr->procPtr) {
 	int index = varPtr - iPtr->varFramePtr->compiledLocals;

-	if (index >= 0 && index < iPtr->varFramePtr->numCompiledLocals) {
+	if (index < iPtr->varFramePtr->numCompiledLocals) {
 	    namePtr = localName(iPtr->varFramePtr, index);
 	    Tcl_AppendObjToObj(objPtr, namePtr);
 	}
@@ -11,7 +11,7 @@
 package require Tcl 8.6
 # Keep this in sync with pkgIndex.tcl and with the install directories in
 # Makefiles
-package provide http 2.8.9
+package provide http 2.8.8

 namespace eval http {
    # Allow resourcing to not clobber existing data
@@ -566,10 +566,6 @@ proc http::geturl {url args} {
    # Proxy connections aren't shared among different hosts.
    set state(socketinfo) $host:$port

-    # Save the accept types at this point to prevent a race condition. [Bug
-    # c11a51c482]
-    set state(accept-types) $http(-accept)
-
    # See if we are supposed to use a previously opened channel.
    if {$state(-keepalive)} {
 	variable socketmap
@@ -641,20 +637,8 @@ proc http::geturl {url args} {
    return $token
 }

-# http::Connected --
-#
-#	Callback used when the connection to the HTTP server is actually
-#	established.
-#
-# Arguments:
-#       token	State token.
-#       proto	What protocol (http, https, etc.) was used to connect.
-#	phost	Are we using keep-alive? Non-empty if yes.
-#	srvurl	Service-local URL that we're requesting
-# Results:
-#	None.

-proc http::Connected {token proto phost srvurl} {
+proc http::Connected { token proto phost srvurl} {
    variable http
    variable urlTypes

@@ -707,12 +691,13 @@ proc http::Connected {token proto phost srvurl} {
    if {[info exists state(-handler)]} {
 	set state(-protocol) 1.0
    }
-    set accept_types_seen 0
    if {[catch {
 	puts $sock "$how $srvurl HTTP/$state(-protocol)"
-	if {[dict exists $state(-headers) Host]} {
+	puts $sock "Accept: $http(-accept)"
+	array set hdrs $state(-headers)
+	if {[info exists hdrs(Host)]} {
 	    # Allow Host spoofing. [Bug 928154]
-	    puts $sock "Host: [dict get $state(-headers) Host]"
+	    puts $sock "Host: $hdrs(Host)"
 	} elseif {$port == $defport} {
 	    # Don't add port in this case, to handle broken servers. [Bug
 	    # #504508]
@@ -720,6 +705,7 @@ proc http::Connected {token proto phost srvurl} {
 	} else {
 	    puts $sock "Host: $host:$port"
 	}
+	unset hdrs
 	puts $sock "User-Agent: $http(-useragent)"
        if {$state(-protocol) == 1.0 && $state(-keepalive)} {
 	    puts $sock "Connection: keep-alive"
@@ -732,21 +718,18 @@ proc http::Connected {token proto phost srvurl} {
        }
        set accept_encoding_seen 0
 	set content_type_seen 0
-	dict for {key value} $state(-headers) {
-	    set value [string map [list \n "" \r ""] $value]
-	    set key [string map {" " -} [string trim $key]]
+	foreach {key value} $state(-headers) {
 	    if {[string equal -nocase $key "host"]} {
 		continue
 	    }
 	    if {[string equal -nocase $key "accept-encoding"]} {
 		set accept_encoding_seen 1
 	    }
-	    if {[string equal -nocase $key "accept"]} {
-		set accept_types_seen 1
-	    }
 	    if {[string equal -nocase $key "content-type"]} {
 		set content_type_seen 1
 	    }
+	    set value [string map [list \n "" \r ""] $value]
+	    set key [string trim $key]
 	    if {[string equal -nocase $key "content-length"]} {
 		set contDone 1
 		set state(querylength) $value
@@ -755,13 +738,8 @@ proc http::Connected {token proto phost srvurl} {
 		puts $sock "$key: $value"
 	    }
 	}
-	# Allow overriding the Accept header on a per-connection basis. Useful
-	# for working with REST services. [Bug c11a51c482]
-	if {!$accept_types_seen} {
-	    puts $sock "Accept: $state(accept-types)"
-	}
        if {!$accept_encoding_seen && ![info exists state(-handler)]} {
-	    puts $sock "Accept-Encoding: gzip,deflate,compress"
+	    puts $sock "Accept-Encoding: deflate,gzip,compress"
        }
 	if {$isQueryChannel && $state(querylength) == 0} {
 	    # Try to determine size of data in channel. If we cannot seek, the
@@ -817,6 +795,7 @@ proc http::Connected {token proto phost srvurl} {
 	    Finish $token $err
 	}
    }
+
 }

 # Data access functions:
@@ -1320,7 +1299,7 @@ proc http::Eof {token {force 0}} {
 		set state(body) [zlib $coding $state(body)]
 	    }
 	} err]} {
-	    Log "error doing decompression: $err"
+	    Log "error doing $coding '$state(body)'"
 	    return [Finish $token $err]
 	}

@@ -1,2 +1,2 @@
 if {![package vsatisfies [package provide Tcl] 8.6]} {return}
-package ifneeded http 2.8.9 [list tclPkgSetup $dir http 2.8.9 {{http.tcl source {::http::config ::http::formatQuery ::http::geturl ::http::reset ::http::wait ::http::register ::http::unregister ::http::mapReply}}}]
+package ifneeded http 2.8.8 [list tclPkgSetup $dir http 2.8.8 {{http.tcl source {::http::config ::http::formatQuery ::http::geturl ::http::reset ::http::wait ::http::register ::http::unregister ::http::mapReply}}}]
@@ -16,7 +16,7 @@
 if {[info commands package] == ""} {
    error "version mismatch: library\nscripts expect Tcl version 7.5b1 or later but the loaded version is\nonly [info patchlevel]"
 }
-package require -exact Tcl 8.6.4
+package require -exact Tcl 8.6.2

 # Compute the auto path to use in this interpreter.
 # The values on the path come from several locations:
@@ -1,5 +1,7 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Nairobi)]} {
-    LoadTimeZoneFile Africa/Nairobi
+
+set TZData(:Africa/Addis_Ababa) {
+    {-9223372036854775808 9288 0 LMT}
+    {-3155682888 9320 0 ADMT}
+    {-1062210920 10800 0 EAT}
 }
-set TZData(:Africa/Addis_Ababa) $TZData(:Africa/Nairobi)
@@ -1,5 +1,8 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Nairobi)]} {
-    LoadTimeZoneFile Africa/Nairobi
+
+set TZData(:Africa/Asmara) {
+    {-9223372036854775808 9332 0 LMT}
+    {-3155682932 9332 0 AMT}
+    {-2524530932 9320 0 ADMT}
+    {-1062210920 10800 0 EAT}
 }
-set TZData(:Africa/Asmara) $TZData(:Africa/Nairobi)
@@ -1,5 +1,5 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Nairobi)]} {
-    LoadTimeZoneFile Africa/Nairobi
+if {![info exists TZData(Africa/Asmara)]} {
+    LoadTimeZoneFile Africa/Asmara
 }
-set TZData(:Africa/Asmera) $TZData(:Africa/Nairobi)
+set TZData(:Africa/Asmera) $TZData(:Africa/Asmara)
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Lagos)]} {
-    LoadTimeZoneFile Africa/Lagos
+
+set TZData(:Africa/Bangui) {
+    {-9223372036854775808 4460 0 LMT}
+    {-1830388460 3600 0 WAT}
 }
-set TZData(:Africa/Bangui) $TZData(:Africa/Lagos)
@@ -2,6 +2,6 @@

 set TZData(:Africa/Bissau) {
    {-9223372036854775808 -3740 0 LMT}
-    {-1830380260 -3600 0 WAT}
+    {-1849388260 -3600 0 WAT}
    {157770000 0 0 GMT}
 }
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Maputo)]} {
-    LoadTimeZoneFile Africa/Maputo
+
+set TZData(:Africa/Blantyre) {
+    {-9223372036854775808 8400 0 LMT}
+    {-2109291600 7200 0 CAT}
 }
-set TZData(:Africa/Blantyre) $TZData(:Africa/Maputo)
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Lagos)]} {
-    LoadTimeZoneFile Africa/Lagos
+
+set TZData(:Africa/Brazzaville) {
+    {-9223372036854775808 3668 0 LMT}
+    {-1830387668 3600 0 WAT}
 }
-set TZData(:Africa/Brazzaville) $TZData(:Africa/Lagos)
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Maputo)]} {
-    LoadTimeZoneFile Africa/Maputo
+
+set TZData(:Africa/Bujumbura) {
+    {-9223372036854775808 7048 0 LMT}
+    {-2524528648 7200 0 CAT}
 }
-set TZData(:Africa/Bujumbura) $TZData(:Africa/Maputo)
@@ -129,4 +129,184 @@ set TZData(:Africa/Cairo) {
    {1403816400 7200 0 EET}
    {1406844000 10800 1 EEST}
    {1411678800 7200 0 EET}
+    {1429826400 10800 1 EEST}
+    {1434056400 7200 0 EET}
+    {1437688800 10800 1 EEST}
+    {1443128400 7200 0 EET}
+    {1461880800 10800 1 EEST}
+    {1464901200 7200 0 EET}
+    {1467928800 10800 1 EEST}
+    {1475182800 7200 0 EET}
+    {1493330400 10800 1 EEST}
+    {1495746000 7200 0 EET}
+    {1498773600 10800 1 EEST}
+    {1506632400 7200 0 EET}
+    {1524780000 10800 1 EEST}
+    {1525986000 7200 0 EET}
+    {1529013600 10800 1 EEST}
+    {1538082000 7200 0 EET}
+    {1556229600 10800 1 EEST}
+    {1556830800 7200 0 EET}
+    {1559858400 10800 1 EEST}
+    {1569531600 7200 0 EET}
+    {1590703200 10800 1 EEST}
+    {1600981200 7200 0 EET}
+    {1620943200 10800 1 EEST}
+    {1633035600 7200 0 EET}
+    {1651788000 10800 1 EEST}
+    {1664485200 7200 0 EET}
+    {1682632800 10800 1 EEST}
+    {1695934800 7200 0 EET}
+    {1714082400 10800 1 EEST}
+    {1727384400 7200 0 EET}
+    {1745532000 10800 1 EEST}
+    {1758834000 7200 0 EET}
+    {1776981600 10800 1 EEST}
+    {1790283600 7200 0 EET}
+    {1809036000 10800 1 EEST}
+    {1822338000 7200 0 EET}
+    {1840485600 10800 1 EEST}
+    {1853787600 7200 0 EET}
+    {1871935200 10800 1 EEST}
+    {1885237200 7200 0 EET}
+    {1903384800 10800 1 EEST}
+    {1916686800 7200 0 EET}
+    {1934834400 10800 1 EEST}
+    {1948136400 7200 0 EET}
+    {1966888800 10800 1 EEST}
+    {1980190800 7200 0 EET}
+    {1998338400 10800 1 EEST}
+    {2011640400 7200 0 EET}
+    {2029788000 10800 1 EEST}
+    {2043090000 7200 0 EET}
+    {2061237600 10800 1 EEST}
+    {2074539600 7200 0 EET}
+    {2092687200 10800 1 EEST}
+    {2105989200 7200 0 EET}
+    {2124136800 10800 1 EEST}
+    {2137438800 7200 0 EET}
+    {2156191200 10800 1 EEST}
+    {2169493200 7200 0 EET}
+    {2187640800 10800 1 EEST}
+    {2200942800 7200 0 EET}
+    {2219090400 10800 1 EEST}
+    {2232392400 7200 0 EET}
+    {2250540000 10800 1 EEST}
+    {2263842000 7200 0 EET}
+    {2281989600 10800 1 EEST}
+    {2295291600 7200 0 EET}
+    {2313439200 10800 1 EEST}
+    {2326741200 7200 0 EET}
+    {2345493600 10800 1 EEST}
+    {2358795600 7200 0 EET}
+    {2376943200 10800 1 EEST}
+    {2390245200 7200 0 EET}
+    {2408392800 10800 1 EEST}
+    {2421694800 7200 0 EET}
+    {2439842400 10800 1 EEST}
+    {2453144400 7200 0 EET}
+    {2471292000 10800 1 EEST}
+    {2484594000 7200 0 EET}
+    {2503346400 10800 1 EEST}
+    {2516648400 7200 0 EET}
+    {2534796000 10800 1 EEST}
+    {2548098000 7200 0 EET}
+    {2566245600 10800 1 EEST}
+    {2579547600 7200 0 EET}
+    {2597695200 10800 1 EEST}
+    {2610997200 7200 0 EET}
+    {2629144800 10800 1 EEST}
+    {2642446800 7200 0 EET}
+    {2660594400 10800 1 EEST}
+    {2673896400 7200 0 EET}
+    {2692648800 10800 1 EEST}
+    {2705950800 7200 0 EET}
+    {2724098400 10800 1 EEST}
+    {2737400400 7200 0 EET}
+    {2755548000 10800 1 EEST}
+    {2768850000 7200 0 EET}
+    {2786997600 10800 1 EEST}
+    {2800299600 7200 0 EET}
+    {2818447200 10800 1 EEST}
+    {2831749200 7200 0 EET}
+    {2850501600 10800 1 EEST}
+    {2863803600 7200 0 EET}
+    {2881951200 10800 1 EEST}
+    {2895253200 7200 0 EET}
+    {2913400800 10800 1 EEST}
+    {2926702800 7200 0 EET}
+    {2944850400 10800 1 EEST}
+    {2958152400 7200 0 EET}
+    {2976300000 10800 1 EEST}
+    {2989602000 7200 0 EET}
+    {3007749600 10800 1 EEST}
+    {3021051600 7200 0 EET}
+    {3039804000 10800 1 EEST}
+    {3053106000 7200 0 EET}
+    {3071253600 10800 1 EEST}
+    {3084555600 7200 0 EET}
+    {3102703200 10800 1 EEST}
+    {3116005200 7200 0 EET}
+    {3134152800 10800 1 EEST}
+    {3147454800 7200 0 EET}
+    {3165602400 10800 1 EEST}
+    {3178904400 7200 0 EET}
+    {3197052000 10800 1 EEST}
+    {3210354000 7200 0 EET}
+    {3229106400 10800 1 EEST}
+    {3242408400 7200 0 EET}
+    {3260556000 10800 1 EEST}
+    {3273858000 7200 0 EET}
+    {3292005600 10800 1 EEST}
+    {3305307600 7200 0 EET}
+    {3323455200 10800 1 EEST}
+    {3336757200 7200 0 EET}
+    {3354904800 10800 1 EEST}
+    {3368206800 7200 0 EET}
+    {3386959200 10800 1 EEST}
+    {3400261200 7200 0 EET}
+    {3418408800 10800 1 EEST}
+    {3431710800 7200 0 EET}
+    {3449858400 10800 1 EEST}
+    {3463160400 7200 0 EET}
+    {3481308000 10800 1 EEST}
+    {3494610000 7200 0 EET}
+    {3512757600 10800 1 EEST}
+    {3526059600 7200 0 EET}
+    {3544207200 10800 1 EEST}
+    {3557509200 7200 0 EET}
+    {3576261600 10800 1 EEST}
+    {3589563600 7200 0 EET}
+    {3607711200 10800 1 EEST}
+    {3621013200 7200 0 EET}
+    {3639160800 10800 1 EEST}
+    {3652462800 7200 0 EET}
+    {3670610400 10800 1 EEST}
+    {3683912400 7200 0 EET}
+    {3702060000 10800 1 EEST}
+    {3715362000 7200 0 EET}
+    {3734114400 10800 1 EEST}
+    {3747416400 7200 0 EET}
+    {3765564000 10800 1 EEST}
+    {3778866000 7200 0 EET}
+    {3797013600 10800 1 EEST}
+    {3810315600 7200 0 EET}
+    {3828463200 10800 1 EEST}
+    {3841765200 7200 0 EET}
+    {3859912800 10800 1 EEST}
+    {3873214800 7200 0 EET}
+    {3891362400 10800 1 EEST}
+    {3904664400 7200 0 EET}
+    {3923416800 10800 1 EEST}
+    {3936718800 7200 0 EET}
+    {3954866400 10800 1 EEST}
+    {3968168400 7200 0 EET}
+    {3986316000 10800 1 EEST}
+    {3999618000 7200 0 EET}
+    {4017765600 10800 1 EEST}
+    {4031067600 7200 0 EET}
+    {4049215200 10800 1 EEST}
+    {4062517200 7200 0 EET}
+    {4080664800 10800 1 EEST}
+    {4093966800 7200 0 EET}
 }
@@ -1,5 +1,8 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Nairobi)]} {
-    LoadTimeZoneFile Africa/Nairobi
+
+set TZData(:Africa/Dar_es_Salaam) {
+    {-9223372036854775808 9428 0 LMT}
+    {-1230777428 10800 0 EAT}
+    {-694321200 9900 0 BEAUT}
+    {-284006700 10800 0 EAT}
 }
-set TZData(:Africa/Dar_es_Salaam) $TZData(:Africa/Nairobi)
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Nairobi)]} {
-    LoadTimeZoneFile Africa/Nairobi
+
+set TZData(:Africa/Djibouti) {
+    {-9223372036854775808 10356 0 LMT}
+    {-1846291956 10800 0 EAT}
 }
-set TZData(:Africa/Djibouti) $TZData(:Africa/Nairobi)
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Lagos)]} {
-    LoadTimeZoneFile Africa/Lagos
+
+set TZData(:Africa/Douala) {
+    {-9223372036854775808 2328 0 LMT}
+    {-1830386328 3600 0 WAT}
 }
-set TZData(:Africa/Douala) $TZData(:Africa/Lagos)
@@ -1,5 +1,9 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Maputo)]} {
-    LoadTimeZoneFile Africa/Maputo
+
+set TZData(:Africa/Gaborone) {
+    {-9223372036854775808 6220 0 LMT}
+    {-2682294220 5400 0 SAST}
+    {-2109288600 7200 0 CAT}
+    {-829526400 10800 1 CAST}
+    {-813805200 7200 0 CAT}
 }
-set TZData(:Africa/Gaborone) $TZData(:Africa/Maputo)
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Maputo)]} {
-    LoadTimeZoneFile Africa/Maputo
+
+set TZData(:Africa/Harare) {
+    {-9223372036854775808 7452 0 LMT}
+    {-2109290652 7200 0 CAT}
 }
-set TZData(:Africa/Harare) $TZData(:Africa/Maputo)
@@ -1,5 +1,9 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Nairobi)]} {
-    LoadTimeZoneFile Africa/Nairobi
+
+set TZData(:Africa/Kampala) {
+    {-9223372036854775808 7780 0 LMT}
+    {-1309745380 10800 0 EAT}
+    {-1262314800 9000 0 BEAT}
+    {-694319400 9900 0 BEAUT}
+    {-410237100 10800 0 EAT}
 }
-set TZData(:Africa/Kampala) $TZData(:Africa/Nairobi)
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Maputo)]} {
-    LoadTimeZoneFile Africa/Maputo
+
+set TZData(:Africa/Kigali) {
+    {-9223372036854775808 7216 0 LMT}
+    {-1091498416 7200 0 CAT}
 }
-set TZData(:Africa/Kigali) $TZData(:Africa/Maputo)
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Lagos)]} {
-    LoadTimeZoneFile Africa/Lagos
+
+set TZData(:Africa/Kinshasa) {
+    {-9223372036854775808 3672 0 LMT}
+    {-2276643672 3600 0 WAT}
 }
-set TZData(:Africa/Kinshasa) $TZData(:Africa/Lagos)
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Lagos)]} {
-    LoadTimeZoneFile Africa/Lagos
+
+set TZData(:Africa/Libreville) {
+    {-9223372036854775808 2268 0 LMT}
+    {-1830386268 3600 0 WAT}
 }
-set TZData(:Africa/Libreville) $TZData(:Africa/Lagos)
@@ -1,5 +1,7 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Lagos)]} {
-    LoadTimeZoneFile Africa/Lagos
+
+set TZData(:Africa/Luanda) {
+    {-9223372036854775808 3176 0 LMT}
+    {-2461452776 3124 0 AOT}
+    {-1849395124 3600 0 WAT}
 }
-set TZData(:Africa/Luanda) $TZData(:Africa/Lagos)
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Maputo)]} {
-    LoadTimeZoneFile Africa/Maputo
+
+set TZData(:Africa/Lubumbashi) {
+    {-9223372036854775808 6592 0 LMT}
+    {-2276646592 7200 0 CAT}
 }
-set TZData(:Africa/Lubumbashi) $TZData(:Africa/Maputo)
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Maputo)]} {
-    LoadTimeZoneFile Africa/Maputo
+
+set TZData(:Africa/Lusaka) {
+    {-9223372036854775808 6788 0 LMT}
+    {-2109289988 7200 0 CAT}
 }
-set TZData(:Africa/Lusaka) $TZData(:Africa/Maputo)
@@ -1,5 +1,7 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Lagos)]} {
-    LoadTimeZoneFile Africa/Lagos
+
+set TZData(:Africa/Malabo) {
+    {-9223372036854775808 2108 0 LMT}
+    {-1830386108 0 0 GMT}
+    {-190857600 3600 0 WAT}
 }
-set TZData(:Africa/Malabo) $TZData(:Africa/Lagos)
@@ -1,5 +1,8 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Johannesburg)]} {
-    LoadTimeZoneFile Africa/Johannesburg
+
+set TZData(:Africa/Maseru) {
+    {-9223372036854775808 6600 0 LMT}
+    {-2109289800 7200 0 SAST}
+    {-829526400 10800 1 SAST}
+    {-813805200 7200 0 SAST}
 }
-set TZData(:Africa/Maseru) $TZData(:Africa/Johannesburg)
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Johannesburg)]} {
-    LoadTimeZoneFile Africa/Johannesburg
+
+set TZData(:Africa/Mbabane) {
+    {-9223372036854775808 7464 0 LMT}
+    {-2109290664 7200 0 SAST}
 }
-set TZData(:Africa/Mbabane) $TZData(:Africa/Johannesburg)
@@ -1,5 +1,8 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Nairobi)]} {
-    LoadTimeZoneFile Africa/Nairobi
+
+set TZData(:Africa/Mogadishu) {
+    {-9223372036854775808 10888 0 LMT}
+    {-2403572488 10800 0 EAT}
+    {-1230778800 9000 0 BEAT}
+    {-410236200 10800 0 EAT}
 }
-set TZData(:Africa/Mogadishu) $TZData(:Africa/Nairobi)
@@ -1,5 +1,8 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Lagos)]} {
-    LoadTimeZoneFile Africa/Lagos
+
+set TZData(:Africa/Niamey) {
+    {-9223372036854775808 508 0 LMT}
+    {-1830384508 -3600 0 WAT}
+    {-1131231600 0 0 GMT}
+    {-315619200 3600 0 WAT}
 }
-set TZData(:Africa/Niamey) $TZData(:Africa/Lagos)
@@ -1,5 +1,7 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Africa/Lagos)]} {
-    LoadTimeZoneFile Africa/Lagos
+
+set TZData(:Africa/Porto-Novo) {
+    {-9223372036854775808 628 0 LMT}
+    {-1830384628 0 0 GMT}
+    {-1131235200 3600 0 WAT}
 }
-set TZData(:Africa/Porto-Novo) $TZData(:Africa/Lagos)
@@ -40,237 +40,237 @@ set TZData(:America/Adak) {
    {388587600 -36000 1 BDT}
    {404913600 -39600 0 BST}
    {420037200 -36000 1 BDT}
-    {439034400 -36000 0 HST}
-    {452088000 -32400 1 HDT}
-    {467809200 -36000 0 HST}
-    {483537600 -32400 1 HDT}
-    {499258800 -36000 0 HST}
-    {514987200 -32400 1 HDT}
-    {530708400 -36000 0 HST}
-    {544622400 -32400 1 HDT}
-    {562158000 -36000 0 HST}
-    {576072000 -32400 1 HDT}
-    {594212400 -36000 0 HST}
-    {607521600 -32400 1 HDT}
-    {625662000 -36000 0 HST}
-    {638971200 -32400 1 HDT}
-    {657111600 -36000 0 HST}
-    {671025600 -32400 1 HDT}
-    {688561200 -36000 0 HST}
-    {702475200 -32400 1 HDT}
-    {720010800 -36000 0 HST}
-    {733924800 -32400 1 HDT}
-    {752065200 -36000 0 HST}
-    {765374400 -32400 1 HDT}
-    {783514800 -36000 0 HST}
-    {796824000 -32400 1 HDT}
-    {814964400 -36000 0 HST}
-    {828878400 -32400 1 HDT}
-    {846414000 -36000 0 HST}
-    {860328000 -32400 1 HDT}
-    {877863600 -36000 0 HST}
-    {891777600 -32400 1 HDT}
-    {909313200 -36000 0 HST}
-    {923227200 -32400 1 HDT}
-    {941367600 -36000 0 HST}
-    {954676800 -32400 1 HDT}
-    {972817200 -36000 0 HST}
-    {986126400 -32400 1 HDT}
-    {1004266800 -36000 0 HST}
-    {1018180800 -32400 1 HDT}
-    {1035716400 -36000 0 HST}
-    {1049630400 -32400 1 HDT}
-    {1067166000 -36000 0 HST}
-    {1081080000 -32400 1 HDT}
-    {1099220400 -36000 0 HST}
-    {1112529600 -32400 1 HDT}
-    {1130670000 -36000 0 HST}
-    {1143979200 -32400 1 HDT}
-    {1162119600 -36000 0 HST}
-    {1173614400 -32400 1 HDT}
-    {1194174000 -36000 0 HST}
-    {1205064000 -32400 1 HDT}
-    {1225623600 -36000 0 HST}
-    {1236513600 -32400 1 HDT}
-    {1257073200 -36000 0 HST}
-    {1268568000 -32400 1 HDT}
-    {1289127600 -36000 0 HST}
-    {1300017600 -32400 1 HDT}
-    {1320577200 -36000 0 HST}
-    {1331467200 -32400 1 HDT}
-    {1352026800 -36000 0 HST}
-    {1362916800 -32400 1 HDT}
-    {1383476400 -36000 0 HST}
-    {1394366400 -32400 1 HDT}
-    {1414926000 -36000 0 HST}
-    {1425816000 -32400 1 HDT}
-    {1446375600 -36000 0 HST}
-    {1457870400 -32400 1 HDT}
-    {1478430000 -36000 0 HST}
-    {1489320000 -32400 1 HDT}
-    {1509879600 -36000 0 HST}
-    {1520769600 -32400 1 HDT}
-    {1541329200 -36000 0 HST}
-    {1552219200 -32400 1 HDT}
-    {1572778800 -36000 0 HST}
-    {1583668800 -32400 1 HDT}
-    {1604228400 -36000 0 HST}
-    {1615723200 -32400 1 HDT}
-    {1636282800 -36000 0 HST}
-    {1647172800 -32400 1 HDT}
-    {1667732400 -36000 0 HST}
-    {1678622400 -32400 1 HDT}
-    {1699182000 -36000 0 HST}
-    {1710072000 -32400 1 HDT}
-    {1730631600 -36000 0 HST}
-    {1741521600 -32400 1 HDT}
-    {1762081200 -36000 0 HST}
-    {1772971200 -32400 1 HDT}
-    {1793530800 -36000 0 HST}
-    {1805025600 -32400 1 HDT}
-    {1825585200 -36000 0 HST}
-    {1836475200 -32400 1 HDT}
-    {1857034800 -36000 0 HST}
-    {1867924800 -32400 1 HDT}
-    {1888484400 -36000 0 HST}
-    {1899374400 -32400 1 HDT}
-    {1919934000 -36000 0 HST}
-    {1930824000 -32400 1 HDT}
-    {1951383600 -36000 0 HST}
-    {1962878400 -32400 1 HDT}
-    {1983438000 -36000 0 HST}
-    {1994328000 -32400 1 HDT}
-    {2014887600 -36000 0 HST}
-    {2025777600 -32400 1 HDT}
-    {2046337200 -36000 0 HST}
-    {2057227200 -32400 1 HDT}
-    {2077786800 -36000 0 HST}
-    {2088676800 -32400 1 HDT}
-    {2109236400 -36000 0 HST}
-    {2120126400 -32400 1 HDT}
-    {2140686000 -36000 0 HST}
-    {2152180800 -32400 1 HDT}
-    {2172740400 -36000 0 HST}
-    {2183630400 -32400 1 HDT}
-    {2204190000 -36000 0 HST}
-    {2215080000 -32400 1 HDT}
-    {2235639600 -36000 0 HST}
-    {2246529600 -32400 1 HDT}
-    {2267089200 -36000 0 HST}
-    {2277979200 -32400 1 HDT}
-    {2298538800 -36000 0 HST}
-    {2309428800 -32400 1 HDT}
-    {2329988400 -36000 0 HST}
-    {2341483200 -32400 1 HDT}
-    {2362042800 -36000 0 HST}
-    {2372932800 -32400 1 HDT}
-    {2393492400 -36000 0 HST}
-    {2404382400 -32400 1 HDT}
-    {2424942000 -36000 0 HST}
-    {2435832000 -32400 1 HDT}
-    {2456391600 -36000 0 HST}
-    {2467281600 -32400 1 HDT}
-    {2487841200 -36000 0 HST}
-    {2499336000 -32400 1 HDT}
-    {2519895600 -36000 0 HST}
-    {2530785600 -32400 1 HDT}
-    {2551345200 -36000 0 HST}
-    {2562235200 -32400 1 HDT}
-    {2582794800 -36000 0 HST}
-    {2593684800 -32400 1 HDT}
-    {2614244400 -36000 0 HST}
-    {2625134400 -32400 1 HDT}
-    {2645694000 -36000 0 HST}
-    {2656584000 -32400 1 HDT}
-    {2677143600 -36000 0 HST}
-    {2688638400 -32400 1 HDT}
-    {2709198000 -36000 0 HST}
-    {2720088000 -32400 1 HDT}
-    {2740647600 -36000 0 HST}
-    {2751537600 -32400 1 HDT}
-    {2772097200 -36000 0 HST}
-    {2782987200 -32400 1 HDT}
-    {2803546800 -36000 0 HST}
-    {2814436800 -32400 1 HDT}
-    {2834996400 -36000 0 HST}
-    {2846491200 -32400 1 HDT}
-    {2867050800 -36000 0 HST}
-    {2877940800 -32400 1 HDT}
-    {2898500400 -36000 0 HST}
-    {2909390400 -32400 1 HDT}
-    {2929950000 -36000 0 HST}
-    {2940840000 -32400 1 HDT}
-    {2961399600 -36000 0 HST}
-    {2972289600 -32400 1 HDT}
-    {2992849200 -36000 0 HST}
-    {3003739200 -32400 1 HDT}
-    {3024298800 -36000 0 HST}
-    {3035793600 -32400 1 HDT}
-    {3056353200 -36000 0 HST}
-    {3067243200 -32400 1 HDT}
-    {3087802800 -36000 0 HST}
-    {3098692800 -32400 1 HDT}
-    {3119252400 -36000 0 HST}
-    {3130142400 -32400 1 HDT}
-    {3150702000 -36000 0 HST}
-    {3161592000 -32400 1 HDT}
-    {3182151600 -36000 0 HST}
-    {3193041600 -32400 1 HDT}
-    {3213601200 -36000 0 HST}
-    {3225096000 -32400 1 HDT}
-    {3245655600 -36000 0 HST}
-    {3256545600 -32400 1 HDT}
-    {3277105200 -36000 0 HST}
-    {3287995200 -32400 1 HDT}
-    {3308554800 -36000 0 HST}
-    {3319444800 -32400 1 HDT}
-    {3340004400 -36000 0 HST}
-    {3350894400 -32400 1 HDT}
-    {3371454000 -36000 0 HST}
-    {3382948800 -32400 1 HDT}
-    {3403508400 -36000 0 HST}
-    {3414398400 -32400 1 HDT}
-    {3434958000 -36000 0 HST}
-    {3445848000 -32400 1 HDT}
-    {3466407600 -36000 0 HST}
-    {3477297600 -32400 1 HDT}
-    {3497857200 -36000 0 HST}
-    {3508747200 -32400 1 HDT}
-    {3529306800 -36000 0 HST}
-    {3540196800 -32400 1 HDT}
-    {3560756400 -36000 0 HST}
-    {3572251200 -32400 1 HDT}
-    {3592810800 -36000 0 HST}
-    {3603700800 -32400 1 HDT}
-    {3624260400 -36000 0 HST}
-    {3635150400 -32400 1 HDT}
-    {3655710000 -36000 0 HST}
-    {3666600000 -32400 1 HDT}
-    {3687159600 -36000 0 HST}
-    {3698049600 -32400 1 HDT}
-    {3718609200 -36000 0 HST}
-    {3730104000 -32400 1 HDT}
-    {3750663600 -36000 0 HST}
-    {3761553600 -32400 1 HDT}
-    {3782113200 -36000 0 HST}
-    {3793003200 -32400 1 HDT}
-    {3813562800 -36000 0 HST}
-    {3824452800 -32400 1 HDT}
-    {3845012400 -36000 0 HST}
-    {3855902400 -32400 1 HDT}
-    {3876462000 -36000 0 HST}
-    {3887352000 -32400 1 HDT}
-    {3907911600 -36000 0 HST}
-    {3919406400 -32400 1 HDT}
-    {3939966000 -36000 0 HST}
-    {3950856000 -32400 1 HDT}
-    {3971415600 -36000 0 HST}
-    {3982305600 -32400 1 HDT}
-    {4002865200 -36000 0 HST}
-    {4013755200 -32400 1 HDT}
-    {4034314800 -36000 0 HST}
-    {4045204800 -32400 1 HDT}
-    {4065764400 -36000 0 HST}
-    {4076654400 -32400 1 HDT}
-    {4097214000 -36000 0 HST}
+    {439034400 -36000 0 HAST}
+    {452088000 -32400 1 HADT}
+    {467809200 -36000 0 HAST}
+    {483537600 -32400 1 HADT}
+    {499258800 -36000 0 HAST}
+    {514987200 -32400 1 HADT}
+    {530708400 -36000 0 HAST}
+    {544622400 -32400 1 HADT}
+    {562158000 -36000 0 HAST}
+    {576072000 -32400 1 HADT}
+    {594212400 -36000 0 HAST}
+    {607521600 -32400 1 HADT}
+    {625662000 -36000 0 HAST}
+    {638971200 -32400 1 HADT}
+    {657111600 -36000 0 HAST}
+    {671025600 -32400 1 HADT}
+    {688561200 -36000 0 HAST}
+    {702475200 -32400 1 HADT}
+    {720010800 -36000 0 HAST}
+    {733924800 -32400 1 HADT}
+    {752065200 -36000 0 HAST}
+    {765374400 -32400 1 HADT}
+    {783514800 -36000 0 HAST}
+    {796824000 -32400 1 HADT}
+    {814964400 -36000 0 HAST}
+    {828878400 -32400 1 HADT}
+    {846414000 -36000 0 HAST}
+    {860328000 -32400 1 HADT}
+    {877863600 -36000 0 HAST}
+    {891777600 -32400 1 HADT}
+    {909313200 -36000 0 HAST}
+    {923227200 -32400 1 HADT}
+    {941367600 -36000 0 HAST}
+    {954676800 -32400 1 HADT}
+    {972817200 -36000 0 HAST}
+    {986126400 -32400 1 HADT}
+    {1004266800 -36000 0 HAST}
+    {1018180800 -32400 1 HADT}
+    {1035716400 -36000 0 HAST}
+    {1049630400 -32400 1 HADT}
+    {1067166000 -36000 0 HAST}
+    {1081080000 -32400 1 HADT}
+    {1099220400 -36000 0 HAST}
+    {1112529600 -32400 1 HADT}
+    {1130670000 -36000 0 HAST}
+    {1143979200 -32400 1 HADT}
+    {1162119600 -36000 0 HAST}
+    {1173614400 -32400 1 HADT}
+    {1194174000 -36000 0 HAST}
+    {1205064000 -32400 1 HADT}
+    {1225623600 -36000 0 HAST}
+    {1236513600 -32400 1 HADT}
+    {1257073200 -36000 0 HAST}
+    {1268568000 -32400 1 HADT}
+    {1289127600 -36000 0 HAST}
+    {1300017600 -32400 1 HADT}
+    {1320577200 -36000 0 HAST}
+    {1331467200 -32400 1 HADT}
+    {1352026800 -36000 0 HAST}
+    {1362916800 -32400 1 HADT}
+    {1383476400 -36000 0 HAST}
+    {1394366400 -32400 1 HADT}
+    {1414926000 -36000 0 HAST}
+    {1425816000 -32400 1 HADT}
+    {1446375600 -36000 0 HAST}
+    {1457870400 -32400 1 HADT}
+    {1478430000 -36000 0 HAST}
+    {1489320000 -32400 1 HADT}
+    {1509879600 -36000 0 HAST}
+    {1520769600 -32400 1 HADT}
+    {1541329200 -36000 0 HAST}
+    {1552219200 -32400 1 HADT}
+    {1572778800 -36000 0 HAST}
+    {1583668800 -32400 1 HADT}
+    {1604228400 -36000 0 HAST}
+    {1615723200 -32400 1 HADT}
+    {1636282800 -36000 0 HAST}
+    {1647172800 -32400 1 HADT}
+    {1667732400 -36000 0 HAST}
+    {1678622400 -32400 1 HADT}
+    {1699182000 -36000 0 HAST}
+    {1710072000 -32400 1 HADT}
+    {1730631600 -36000 0 HAST}
+    {1741521600 -32400 1 HADT}
+    {1762081200 -36000 0 HAST}
+    {1772971200 -32400 1 HADT}
+    {1793530800 -36000 0 HAST}
+    {1805025600 -32400 1 HADT}
+    {1825585200 -36000 0 HAST}
+    {1836475200 -32400 1 HADT}
+    {1857034800 -36000 0 HAST}
+    {1867924800 -32400 1 HADT}
+    {1888484400 -36000 0 HAST}
+    {1899374400 -32400 1 HADT}
+    {1919934000 -36000 0 HAST}
+    {1930824000 -32400 1 HADT}
+    {1951383600 -36000 0 HAST}
+    {1962878400 -32400 1 HADT}
+    {1983438000 -36000 0 HAST}
+    {1994328000 -32400 1 HADT}
+    {2014887600 -36000 0 HAST}
+    {2025777600 -32400 1 HADT}
+    {2046337200 -36000 0 HAST}
+    {2057227200 -32400 1 HADT}
+    {2077786800 -36000 0 HAST}
+    {2088676800 -32400 1 HADT}
+    {2109236400 -36000 0 HAST}
+    {2120126400 -32400 1 HADT}
+    {2140686000 -36000 0 HAST}
+    {2152180800 -32400 1 HADT}
+    {2172740400 -36000 0 HAST}
+    {2183630400 -32400 1 HADT}
+    {2204190000 -36000 0 HAST}
+    {2215080000 -32400 1 HADT}
+    {2235639600 -36000 0 HAST}
+    {2246529600 -32400 1 HADT}
+    {2267089200 -36000 0 HAST}
+    {2277979200 -32400 1 HADT}
+    {2298538800 -36000 0 HAST}
+    {2309428800 -32400 1 HADT}
+    {2329988400 -36000 0 HAST}
+    {2341483200 -32400 1 HADT}
+    {2362042800 -36000 0 HAST}
+    {2372932800 -32400 1 HADT}
+    {2393492400 -36000 0 HAST}
+    {2404382400 -32400 1 HADT}
+    {2424942000 -36000 0 HAST}
+    {2435832000 -32400 1 HADT}
+    {2456391600 -36000 0 HAST}
+    {2467281600 -32400 1 HADT}
+    {2487841200 -36000 0 HAST}
+    {2499336000 -32400 1 HADT}
+    {2519895600 -36000 0 HAST}
+    {2530785600 -32400 1 HADT}
+    {2551345200 -36000 0 HAST}
+    {2562235200 -32400 1 HADT}
+    {2582794800 -36000 0 HAST}
+    {2593684800 -32400 1 HADT}
+    {2614244400 -36000 0 HAST}
+    {2625134400 -32400 1 HADT}
+    {2645694000 -36000 0 HAST}
+    {2656584000 -32400 1 HADT}
+    {2677143600 -36000 0 HAST}
+    {2688638400 -32400 1 HADT}
+    {2709198000 -36000 0 HAST}
+    {2720088000 -32400 1 HADT}
+    {2740647600 -36000 0 HAST}
+    {2751537600 -32400 1 HADT}
+    {2772097200 -36000 0 HAST}
+    {2782987200 -32400 1 HADT}
+    {2803546800 -36000 0 HAST}
+    {2814436800 -32400 1 HADT}
+    {2834996400 -36000 0 HAST}
+    {2846491200 -32400 1 HADT}
+    {2867050800 -36000 0 HAST}
+    {2877940800 -32400 1 HADT}
+    {2898500400 -36000 0 HAST}
+    {2909390400 -32400 1 HADT}
+    {2929950000 -36000 0 HAST}
+    {2940840000 -32400 1 HADT}
+    {2961399600 -36000 0 HAST}
+    {2972289600 -32400 1 HADT}
+    {2992849200 -36000 0 HAST}
+    {3003739200 -32400 1 HADT}
+    {3024298800 -36000 0 HAST}
+    {3035793600 -32400 1 HADT}
+    {3056353200 -36000 0 HAST}
+    {3067243200 -32400 1 HADT}
+    {3087802800 -36000 0 HAST}
+    {3098692800 -32400 1 HADT}
+    {3119252400 -36000 0 HAST}
+    {3130142400 -32400 1 HADT}
+    {3150702000 -36000 0 HAST}
+    {3161592000 -32400 1 HADT}
+    {3182151600 -36000 0 HAST}
+    {3193041600 -32400 1 HADT}
+    {3213601200 -36000 0 HAST}
+    {3225096000 -32400 1 HADT}
+    {3245655600 -36000 0 HAST}
+    {3256545600 -32400 1 HADT}
+    {3277105200 -36000 0 HAST}
+    {3287995200 -32400 1 HADT}
+    {3308554800 -36000 0 HAST}
+    {3319444800 -32400 1 HADT}
+    {3340004400 -36000 0 HAST}
+    {3350894400 -32400 1 HADT}
+    {3371454000 -36000 0 HAST}
+    {3382948800 -32400 1 HADT}
+    {3403508400 -36000 0 HAST}
+    {3414398400 -32400 1 HADT}
+    {3434958000 -36000 0 HAST}
+    {3445848000 -32400 1 HADT}
+    {3466407600 -36000 0 HAST}
+    {3477297600 -32400 1 HADT}
+    {3497857200 -36000 0 HAST}
+    {3508747200 -32400 1 HADT}
+    {3529306800 -36000 0 HAST}
+    {3540196800 -32400 1 HADT}
+    {3560756400 -36000 0 HAST}
+    {3572251200 -32400 1 HADT}
+    {3592810800 -36000 0 HAST}
+    {3603700800 -32400 1 HADT}
+    {3624260400 -36000 0 HAST}
+    {3635150400 -32400 1 HADT}
+    {3655710000 -36000 0 HAST}
+    {3666600000 -32400 1 HADT}
+    {3687159600 -36000 0 HAST}
+    {3698049600 -32400 1 HADT}
+    {3718609200 -36000 0 HAST}
+    {3730104000 -32400 1 HADT}
+    {3750663600 -36000 0 HAST}
+    {3761553600 -32400 1 HADT}
+    {3782113200 -36000 0 HAST}
+    {3793003200 -32400 1 HADT}
+    {3813562800 -36000 0 HAST}
+    {3824452800 -32400 1 HADT}
+    {3845012400 -36000 0 HAST}
+    {3855902400 -32400 1 HADT}
+    {3876462000 -36000 0 HAST}
+    {3887352000 -32400 1 HADT}
+    {3907911600 -36000 0 HAST}
+    {3919406400 -32400 1 HADT}
+    {3939966000 -36000 0 HAST}
+    {3950856000 -32400 1 HADT}
+    {3971415600 -36000 0 HAST}
+    {3982305600 -32400 1 HADT}
+    {4002865200 -36000 0 HAST}
+    {4013755200 -32400 1 HADT}
+    {4034314800 -36000 0 HAST}
+    {4045204800 -32400 1 HADT}
+    {4065764400 -36000 0 HAST}
+    {4076654400 -32400 1 HADT}
+    {4097214000 -36000 0 HAST}
 }
@@ -1,5 +1,7 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(America/Port_of_Spain)]} {
-    LoadTimeZoneFile America/Port_of_Spain
+
+set TZData(:America/Antigua) {
+    {-9223372036854775808 -14832 0 LMT}
+    {-1825098768 -18000 0 EST}
+    {-599598000 -14400 0 AST}
 }
-set TZData(:America/Antigua) $TZData(:America/Port_of_Spain)
@@ -43,5 +43,174 @@ set TZData(:America/Cancun) {
    {1382857200 -21600 0 CST}
    {1396771200 -18000 1 CDT}
    {1414306800 -21600 0 CST}
-    {1422777600 -18000 0 EST}
+    {1428220800 -18000 1 CDT}
+    {1445756400 -21600 0 CST}
+    {1459670400 -18000 1 CDT}
+    {1477810800 -21600 0 CST}
+    {1491120000 -18000 1 CDT}
+    {1509260400 -21600 0 CST}
+    {1522569600 -18000 1 CDT}
+    {1540710000 -21600 0 CST}
+    {1554624000 -18000 1 CDT}
+    {1572159600 -21600 0 CST}
+    {1586073600 -18000 1 CDT}
+    {1603609200 -21600 0 CST}
+    {1617523200 -18000 1 CDT}
+    {1635663600 -21600 0 CST}
+    {1648972800 -18000 1 CDT}
+    {1667113200 -21600 0 CST}
+    {1680422400 -18000 1 CDT}
+    {1698562800 -21600 0 CST}
+    {1712476800 -18000 1 CDT}
+    {1730012400 -21600 0 CST}
+    {1743926400 -18000 1 CDT}
+    {1761462000 -21600 0 CST}
+    {1775376000 -18000 1 CDT}
+    {1792911600 -21600 0 CST}
+    {1806825600 -18000 1 CDT}
+    {1824966000 -21600 0 CST}
+    {1838275200 -18000 1 CDT}
+    {1856415600 -21600 0 CST}
+    {1869724800 -18000 1 CDT}
+    {1887865200 -21600 0 CST}
+    {1901779200 -18000 1 CDT}
+    {1919314800 -21600 0 CST}
+    {1933228800 -18000 1 CDT}
+    {1950764400 -21600 0 CST}
+    {1964678400 -18000 1 CDT}
+    {1982818800 -21600 0 CST}
+    {1996128000 -18000 1 CDT}
+    {2014268400 -21600 0 CST}
+    {2027577600 -18000 1 CDT}
+    {2045718000 -21600 0 CST}
+    {2059027200 -18000 1 CDT}
+    {2077167600 -21600 0 CST}
+    {2091081600 -18000 1 CDT}
+    {2108617200 -21600 0 CST}
+    {2122531200 -18000 1 CDT}
+    {2140066800 -21600 0 CST}
+    {2153980800 -18000 1 CDT}
+    {2172121200 -21600 0 CST}
+    {2185430400 -18000 1 CDT}
+    {2203570800 -21600 0 CST}
+    {2216880000 -18000 1 CDT}
+    {2235020400 -21600 0 CST}
+    {2248934400 -18000 1 CDT}
+    {2266470000 -21600 0 CST}
+    {2280384000 -18000 1 CDT}
+    {2297919600 -21600 0 CST}
+    {2311833600 -18000 1 CDT}
+    {2329369200 -21600 0 CST}
+    {2343283200 -18000 1 CDT}
+    {2361423600 -21600 0 CST}
+    {2374732800 -18000 1 CDT}
+    {2392873200 -21600 0 CST}
+    {2406182400 -18000 1 CDT}
+    {2424322800 -21600 0 CST}
+    {2438236800 -18000 1 CDT}
+    {2455772400 -21600 0 CST}
+    {2469686400 -18000 1 CDT}
+    {2487222000 -21600 0 CST}
+    {2501136000 -18000 1 CDT}
+    {2519276400 -21600 0 CST}
+    {2532585600 -18000 1 CDT}
+    {2550726000 -21600 0 CST}
+    {2564035200 -18000 1 CDT}
+    {2582175600 -21600 0 CST}
+    {2596089600 -18000 1 CDT}
+    {2613625200 -21600 0 CST}
+    {2627539200 -18000 1 CDT}
+    {2645074800 -21600 0 CST}
+    {2658988800 -18000 1 CDT}
+    {2676524400 -21600 0 CST}
+    {2690438400 -18000 1 CDT}
+    {2708578800 -21600 0 CST}
+    {2721888000 -18000 1 CDT}
+    {2740028400 -21600 0 CST}
+    {2753337600 -18000 1 CDT}
+    {2771478000 -21600 0 CST}
+    {2785392000 -18000 1 CDT}
+    {2802927600 -21600 0 CST}
+    {2816841600 -18000 1 CDT}
+    {2834377200 -21600 0 CST}
+    {2848291200 -18000 1 CDT}
+    {2866431600 -21600 0 CST}
+    {2879740800 -18000 1 CDT}
+    {2897881200 -21600 0 CST}
+    {2911190400 -18000 1 CDT}
+    {2929330800 -21600 0 CST}
+    {2942640000 -18000 1 CDT}
+    {2960780400 -21600 0 CST}
+    {2974694400 -18000 1 CDT}
+    {2992230000 -21600 0 CST}
+    {3006144000 -18000 1 CDT}
+    {3023679600 -21600 0 CST}
+    {3037593600 -18000 1 CDT}
+    {3055734000 -21600 0 CST}
+    {3069043200 -18000 1 CDT}
+    {3087183600 -21600 0 CST}
+    {3100492800 -18000 1 CDT}
+    {3118633200 -21600 0 CST}
+    {3132547200 -18000 1 CDT}
+    {3150082800 -21600 0 CST}
+    {3163996800 -18000 1 CDT}
+    {3181532400 -21600 0 CST}
+    {3195446400 -18000 1 CDT}
+    {3212982000 -21600 0 CST}
+    {3226896000 -18000 1 CDT}
+    {3245036400 -21600 0 CST}
+    {3258345600 -18000 1 CDT}
+    {3276486000 -21600 0 CST}
+    {3289795200 -18000 1 CDT}
+    {3307935600 -21600 0 CST}
+    {3321849600 -18000 1 CDT}
+    {3339385200 -21600 0 CST}
+    {3353299200 -18000 1 CDT}
+    {3370834800 -21600 0 CST}
+    {3384748800 -18000 1 CDT}
+    {3402889200 -21600 0 CST}
+    {3416198400 -18000 1 CDT}
+    {3434338800 -21600 0 CST}
+    {3447648000 -18000 1 CDT}
+    {3465788400 -21600 0 CST}
+    {3479702400 -18000 1 CDT}
+    {3497238000 -21600 0 CST}
+    {3511152000 -18000 1 CDT}
+    {3528687600 -21600 0 CST}
+    {3542601600 -18000 1 CDT}
+    {3560137200 -21600 0 CST}
+    {3574051200 -18000 1 CDT}
+    {3592191600 -21600 0 CST}
+    {3605500800 -18000 1 CDT}
+    {3623641200 -21600 0 CST}
+    {3636950400 -18000 1 CDT}
+    {3655090800 -21600 0 CST}
+    {3669004800 -18000 1 CDT}
+    {3686540400 -21600 0 CST}
+    {3700454400 -18000 1 CDT}
+    {3717990000 -21600 0 CST}
+    {3731904000 -18000 1 CDT}
+    {3750044400 -21600 0 CST}
+    {3763353600 -18000 1 CDT}
+    {3781494000 -21600 0 CST}
+    {3794803200 -18000 1 CDT}
+    {3812943600 -21600 0 CST}
+    {3826252800 -18000 1 CDT}
+    {3844393200 -21600 0 CST}
+    {3858307200 -18000 1 CDT}
+    {3875842800 -21600 0 CST}
+    {3889756800 -18000 1 CDT}
+    {3907292400 -21600 0 CST}
+    {3921206400 -18000 1 CDT}
+    {3939346800 -21600 0 CST}
+    {3952656000 -18000 1 CDT}
+    {3970796400 -21600 0 CST}
+    {3984105600 -18000 1 CDT}
+    {4002246000 -21600 0 CST}
+    {4016160000 -18000 1 CDT}
+    {4033695600 -21600 0 CST}
+    {4047609600 -18000 1 CDT}
+    {4065145200 -21600 0 CST}
+    {4079059200 -18000 1 CDT}
+    {4096594800 -21600 0 CST}
 }
@@ -1,5 +1,7 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(America/Panama)]} {
-    LoadTimeZoneFile America/Panama
+
+set TZData(:America/Cayman) {
+    {-9223372036854775808 -19532 0 LMT}
+    {-2524502068 -18431 0 KMT}
+    {-1827687169 -18000 0 EST}
 }
-set TZData(:America/Cayman) $TZData(:America/Panama)
@@ -4,7 +4,6 @@ set TZData(:America/Grand_Turk) {
    {-9223372036854775808 -17072 0 LMT}
    {-2524504528 -18431 0 KMT}
    {-1827687169 -18000 0 EST}
-    {284014800 -18000 0 EST}
    {294217200 -14400 1 EDT}
    {309938400 -18000 0 EST}
    {325666800 -14400 1 EDT}
@@ -78,5 +77,173 @@ set TZData(:America/Grand_Turk) {
    {1394348400 -14400 1 EDT}
    {1414908000 -18000 0 EST}
    {1425798000 -14400 1 EDT}
-    {1446361200 -14400 0 AST}
+    {1446357600 -18000 0 EST}
+    {1457852400 -14400 1 EDT}
+    {1478412000 -18000 0 EST}
+    {1489302000 -14400 1 EDT}
+    {1509861600 -18000 0 EST}
+    {1520751600 -14400 1 EDT}
+    {1541311200 -18000 0 EST}
+    {1552201200 -14400 1 EDT}
+    {1572760800 -18000 0 EST}
+    {1583650800 -14400 1 EDT}
+    {1604210400 -18000 0 EST}
+    {1615705200 -14400 1 EDT}
+    {1636264800 -18000 0 EST}
+    {1647154800 -14400 1 EDT}
+    {1667714400 -18000 0 EST}
+    {1678604400 -14400 1 EDT}
+    {1699164000 -18000 0 EST}
+    {1710054000 -14400 1 EDT}
+    {1730613600 -18000 0 EST}
+    {1741503600 -14400 1 EDT}
+    {1762063200 -18000 0 EST}
+    {1772953200 -14400 1 EDT}
+    {1793512800 -18000 0 EST}
+    {1805007600 -14400 1 EDT}
+    {1825567200 -18000 0 EST}
+    {1836457200 -14400 1 EDT}
+    {1857016800 -18000 0 EST}
+    {1867906800 -14400 1 EDT}
+    {1888466400 -18000 0 EST}
+    {1899356400 -14400 1 EDT}
+    {1919916000 -18000 0 EST}
+    {1930806000 -14400 1 EDT}
+    {1951365600 -18000 0 EST}
+    {1962860400 -14400 1 EDT}
+    {1983420000 -18000 0 EST}
+    {1994310000 -14400 1 EDT}
+    {2014869600 -18000 0 EST}
+    {2025759600 -14400 1 EDT}
+    {2046319200 -18000 0 EST}
+    {2057209200 -14400 1 EDT}
+    {2077768800 -18000 0 EST}
+    {2088658800 -14400 1 EDT}
+    {2109218400 -18000 0 EST}
+    {2120108400 -14400 1 EDT}
+    {2140668000 -18000 0 EST}
+    {2152162800 -14400 1 EDT}
+    {2172722400 -18000 0 EST}
+    {2183612400 -14400 1 EDT}
+    {2204172000 -18000 0 EST}
+    {2215062000 -14400 1 EDT}
+    {2235621600 -18000 0 EST}
+    {2246511600 -14400 1 EDT}
+    {2267071200 -18000 0 EST}
+    {2277961200 -14400 1 EDT}
+    {2298520800 -18000 0 EST}
+    {2309410800 -14400 1 EDT}
+    {2329970400 -18000 0 EST}
+    {2341465200 -14400 1 EDT}
+    {2362024800 -18000 0 EST}
+    {2372914800 -14400 1 EDT}
+    {2393474400 -18000 0 EST}
+    {2404364400 -14400 1 EDT}
+    {2424924000 -18000 0 EST}
+    {2435814000 -14400 1 EDT}
+    {2456373600 -18000 0 EST}
+    {2467263600 -14400 1 EDT}
+    {2487823200 -18000 0 EST}
+    {2499318000 -14400 1 EDT}
+    {2519877600 -18000 0 EST}
+    {2530767600 -14400 1 EDT}
+    {2551327200 -18000 0 EST}
+    {2562217200 -14400 1 EDT}
+    {2582776800 -18000 0 EST}
+    {2593666800 -14400 1 EDT}
+    {2614226400 -18000 0 EST}
+    {2625116400 -14400 1 EDT}
+    {2645676000 -18000 0 EST}
+    {2656566000 -14400 1 EDT}
+    {2677125600 -18000 0 EST}
+    {2688620400 -14400 1 EDT}
+    {2709180000 -18000 0 EST}
+    {2720070000 -14400 1 EDT}
+    {2740629600 -18000 0 EST}
+    {2751519600 -14400 1 EDT}
+    {2772079200 -18000 0 EST}
+    {2782969200 -14400 1 EDT}
+    {2803528800 -18000 0 EST}
+    {2814418800 -14400 1 EDT}
+    {2834978400 -18000 0 EST}
+    {2846473200 -14400 1 EDT}
+    {2867032800 -18000 0 EST}
+    {2877922800 -14400 1 EDT}
+    {2898482400 -18000 0 EST}
+    {2909372400 -14400 1 EDT}
+    {2929932000 -18000 0 EST}
+    {2940822000 -14400 1 EDT}
+    {2961381600 -18000 0 EST}
+    {2972271600 -14400 1 EDT}
+    {2992831200 -18000 0 EST}
+    {3003721200 -14400 1 EDT}
+    {3024280800 -18000 0 EST}
+    {3035775600 -14400 1 EDT}
+    {3056335200 -18000 0 EST}
+    {3067225200 -14400 1 EDT}
+    {3087784800 -18000 0 EST}
+    {3098674800 -14400 1 EDT}
+    {3119234400 -18000 0 EST}
+    {3130124400 -14400 1 EDT}
+    {3150684000 -18000 0 EST}
+    {3161574000 -14400 1 EDT}
+    {3182133600 -18000 0 EST}
+    {3193023600 -14400 1 EDT}
+    {3213583200 -18000 0 EST}
+    {3225078000 -14400 1 EDT}
+    {3245637600 -18000 0 EST}
+    {3256527600 -14400 1 EDT}
+    {3277087200 -18000 0 EST}
+    {3287977200 -14400 1 EDT}
+    {3308536800 -18000 0 EST}
+    {3319426800 -14400 1 EDT}
+    {3339986400 -18000 0 EST}
+    {3350876400 -14400 1 EDT}
+    {3371436000 -18000 0 EST}
+    {3382930800 -14400 1 EDT}
+    {3403490400 -18000 0 EST}
+    {3414380400 -14400 1 EDT}
+    {3434940000 -18000 0 EST}
+    {3445830000 -14400 1 EDT}
+    {3466389600 -18000 0 EST}
+    {3477279600 -14400 1 EDT}
+    {3497839200 -18000 0 EST}
+    {3508729200 -14400 1 EDT}
+    {3529288800 -18000 0 EST}
+    {3540178800 -14400 1 EDT}
+    {3560738400 -18000 0 EST}
+    {3572233200 -14400 1 EDT}
+    {3592792800 -18000 0 EST}
+    {3603682800 -14400 1 EDT}
+    {3624242400 -18000 0 EST}
+    {3635132400 -14400 1 EDT}
+    {3655692000 -18000 0 EST}
+    {3666582000 -14400 1 EDT}
+    {3687141600 -18000 0 EST}
+    {3698031600 -14400 1 EDT}
+    {3718591200 -18000 0 EST}
+    {3730086000 -14400 1 EDT}
+    {3750645600 -18000 0 EST}
+    {3761535600 -14400 1 EDT}
+    {3782095200 -18000 0 EST}
+    {3792985200 -14400 1 EDT}
+    {3813544800 -18000 0 EST}
+    {3824434800 -14400 1 EDT}
+    {3844994400 -18000 0 EST}
+    {3855884400 -14400 1 EDT}
+    {3876444000 -18000 0 EST}
+    {3887334000 -14400 1 EDT}
+    {3907893600 -18000 0 EST}
+    {3919388400 -14400 1 EDT}
+    {3939948000 -18000 0 EST}
+    {3950838000 -14400 1 EDT}
+    {3971397600 -18000 0 EST}
+    {3982287600 -14400 1 EDT}
+    {4002847200 -18000 0 EST}
+    {4013737200 -14400 1 EDT}
+    {4034296800 -18000 0 EST}
+    {4045186800 -14400 1 EDT}
+    {4065746400 -18000 0 EST}
+    {4076636400 -14400 1 EDT}
+    {4097196000 -18000 0 EST}
 }
@@ -4,8 +4,7 @@ set TZData(:America/Jamaica) {
    {-9223372036854775808 -18431 0 LMT}
    {-2524503169 -18431 0 KMT}
    {-1827687169 -18000 0 EST}
-    {126248400 -18000 0 EST}
-    {126687600 -14400 1 EDT}
+    {136364400 -14400 0 EDT}
    {152085600 -18000 0 EST}
    {162370800 -14400 1 EDT}
    {183535200 -18000 0 EST}
@@ -1,5 +1,366 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(America/Toronto)]} {
-    LoadTimeZoneFile America/Toronto
+
+set TZData(:America/Montreal) {
+    {-9223372036854775808 -17656 0 LMT}
+    {-2713892744 -18000 0 EST}
+    {-1665334800 -14400 1 EDT}
+    {-1662753600 -18000 0 EST}
+    {-1640977200 -18000 0 EST}
+    {-1632070800 -14400 1 EDT}
+    {-1615140000 -18000 0 EST}
+    {-1609441200 -18000 0 EST}
+    {-1601742600 -14400 1 EDT}
+    {-1583775000 -18000 0 EST}
+    {-1567355400 -14400 1 EDT}
+    {-1554053400 -18000 0 EST}
+    {-1535907600 -14400 1 EDT}
+    {-1522603800 -18000 0 EST}
+    {-1504458000 -14400 1 EDT}
+    {-1491154200 -18000 0 EST}
+    {-1439830800 -14400 1 EDT}
+    {-1428255000 -18000 0 EST}
+    {-1409504400 -14400 1 EDT}
+    {-1396805400 -18000 0 EST}
+    {-1378054800 -14400 1 EDT}
+    {-1365355800 -18000 0 EST}
+    {-1346612400 -14400 1 EDT}
+    {-1333915200 -18000 0 EST}
+    {-1315162800 -14400 1 EDT}
+    {-1301860800 -18000 0 EST}
+    {-1283713200 -14400 1 EDT}
+    {-1270411200 -18000 0 EST}
+    {-1252263600 -14400 1 EDT}
+    {-1238961600 -18000 0 EST}
+    {-1220814000 -14400 1 EDT}
+    {-1207512000 -18000 0 EST}
+    {-1188759600 -14400 1 EDT}
+    {-1176062400 -18000 0 EST}
+    {-1157310000 -14400 1 EDT}
+    {-1144008000 -18000 0 EST}
+    {-1125860400 -14400 1 EDT}
+    {-1112558400 -18000 0 EST}
+    {-1094410800 -14400 1 EDT}
+    {-1081108800 -18000 0 EST}
+    {-1062961200 -14400 1 EDT}
+    {-1049659200 -18000 0 EST}
+    {-1031511600 -14400 1 EDT}
+    {-1018209600 -18000 0 EST}
+    {-1000062000 -14400 1 EDT}
+    {-986760000 -18000 0 EST}
+    {-968007600 -14400 1 EDT}
+    {-955310400 -18000 0 EST}
+    {-936558000 -14400 1 EDT}
+    {-880218000 -14400 0 EWT}
+    {-769395600 -14400 1 EPT}
+    {-765396000 -18000 0 EST}
+    {-757364400 -18000 0 EST}
+    {-747248400 -14400 1 EDT}
+    {-733946400 -18000 0 EST}
+    {-715798800 -14400 1 EDT}
+    {-702496800 -18000 0 EST}
+    {-684349200 -14400 1 EDT}
+    {-671047200 -18000 0 EST}
+    {-652899600 -14400 1 EDT}
+    {-636573600 -18000 0 EST}
+    {-620845200 -14400 1 EDT}
+    {-605124000 -18000 0 EST}
+    {-589395600 -14400 1 EDT}
+    {-576093600 -18000 0 EST}
+    {-557946000 -14400 1 EDT}
+    {-544644000 -18000 0 EST}
+    {-526496400 -14400 1 EDT}
+    {-513194400 -18000 0 EST}
+    {-495046800 -14400 1 EDT}
+    {-481744800 -18000 0 EST}
+    {-463597200 -14400 1 EDT}
+    {-450295200 -18000 0 EST}
+    {-431542800 -14400 1 EDT}
+    {-418240800 -18000 0 EST}
+    {-400093200 -14400 1 EDT}
+    {-384372000 -18000 0 EST}
+    {-368643600 -14400 1 EDT}
+    {-352922400 -18000 0 EST}
+    {-337194000 -14400 1 EDT}
+    {-321472800 -18000 0 EST}
+    {-305744400 -14400 1 EDT}
+    {-289418400 -18000 0 EST}
+    {-273690000 -14400 1 EDT}
+    {-257968800 -18000 0 EST}
+    {-242240400 -14400 1 EDT}
+    {-226519200 -18000 0 EST}
+    {-210790800 -14400 1 EDT}
+    {-195069600 -18000 0 EST}
+    {-179341200 -14400 1 EDT}
+    {-163620000 -18000 0 EST}
+    {-147891600 -14400 1 EDT}
+    {-131565600 -18000 0 EST}
+    {-116442000 -14400 1 EDT}
+    {-100116000 -18000 0 EST}
+    {-84387600 -14400 1 EDT}
+    {-68666400 -18000 0 EST}
+    {-52938000 -14400 1 EDT}
+    {-37216800 -18000 0 EST}
+    {-21488400 -14400 1 EDT}
+    {-5767200 -18000 0 EST}
+    {9961200 -14400 1 EDT}
+    {25682400 -18000 0 EST}
+    {41410800 -14400 1 EDT}
+    {57736800 -18000 0 EST}
+    {73465200 -14400 1 EDT}
+    {89186400 -18000 0 EST}
+    {104914800 -14400 1 EDT}
+    {120636000 -18000 0 EST}
+    {126248400 -18000 0 EST}
+    {136364400 -14400 1 EDT}
+    {152085600 -18000 0 EST}
+    {167814000 -14400 1 EDT}
+    {183535200 -18000 0 EST}
+    {199263600 -14400 1 EDT}
+    {215589600 -18000 0 EST}
+    {230713200 -14400 1 EDT}
+    {247039200 -18000 0 EST}
+    {262767600 -14400 1 EDT}
+    {278488800 -18000 0 EST}
+    {294217200 -14400 1 EDT}
+    {309938400 -18000 0 EST}
+    {325666800 -14400 1 EDT}
+    {341388000 -18000 0 EST}
+    {357116400 -14400 1 EDT}
+    {372837600 -18000 0 EST}
+    {388566000 -14400 1 EDT}
+    {404892000 -18000 0 EST}
+    {420015600 -14400 1 EDT}
+    {436341600 -18000 0 EST}
+    {452070000 -14400 1 EDT}
+    {467791200 -18000 0 EST}
+    {483519600 -14400 1 EDT}
+    {499240800 -18000 0 EST}
+    {514969200 -14400 1 EDT}
+    {530690400 -18000 0 EST}
+    {544604400 -14400 1 EDT}
+    {562140000 -18000 0 EST}
+    {576054000 -14400 1 EDT}
+    {594194400 -18000 0 EST}
+    {607503600 -14400 1 EDT}
+    {625644000 -18000 0 EST}
+    {638953200 -14400 1 EDT}
+    {657093600 -18000 0 EST}
+    {671007600 -14400 1 EDT}
+    {688543200 -18000 0 EST}
+    {702457200 -14400 1 EDT}
+    {719992800 -18000 0 EST}
+    {733906800 -14400 1 EDT}
+    {752047200 -18000 0 EST}
+    {765356400 -14400 1 EDT}
+    {783496800 -18000 0 EST}
+    {796806000 -14400 1 EDT}
+    {814946400 -18000 0 EST}
+    {828860400 -14400 1 EDT}
+    {846396000 -18000 0 EST}
+    {860310000 -14400 1 EDT}
+    {877845600 -18000 0 EST}
+    {891759600 -14400 1 EDT}
+    {909295200 -18000 0 EST}
+    {923209200 -14400 1 EDT}
+    {941349600 -18000 0 EST}
+    {954658800 -14400 1 EDT}
+    {972799200 -18000 0 EST}
+    {986108400 -14400 1 EDT}
+    {1004248800 -18000 0 EST}
+    {1018162800 -14400 1 EDT}
+    {1035698400 -18000 0 EST}
+    {1049612400 -14400 1 EDT}
+    {1067148000 -18000 0 EST}
+    {1081062000 -14400 1 EDT}
+    {1099202400 -18000 0 EST}
+    {1112511600 -14400 1 EDT}
+    {1130652000 -18000 0 EST}
+    {1143961200 -14400 1 EDT}
+    {1162101600 -18000 0 EST}
+    {1173596400 -14400 1 EDT}
+    {1194156000 -18000 0 EST}
+    {1205046000 -14400 1 EDT}
+    {1225605600 -18000 0 EST}
+    {1236495600 -14400 1 EDT}
+    {1257055200 -18000 0 EST}
+    {1268550000 -14400 1 EDT}
+    {1289109600 -18000 0 EST}
+    {1299999600 -14400 1 EDT}
+    {1320559200 -18000 0 EST}
+    {1331449200 -14400 1 EDT}
+    {1352008800 -18000 0 EST}
+    {1362898800 -14400 1 EDT}
+    {1383458400 -18000 0 EST}
+    {1394348400 -14400 1 EDT}
+    {1414908000 -18000 0 EST}
+    {1425798000 -14400 1 EDT}
+    {1446357600 -18000 0 EST}
+    {1457852400 -14400 1 EDT}
+    {1478412000 -18000 0 EST}
+    {1489302000 -14400 1 EDT}
+    {1509861600 -18000 0 EST}
+    {1520751600 -14400 1 EDT}
+    {1541311200 -18000 0 EST}
+    {1552201200 -14400 1 EDT}
+    {1572760800 -18000 0 EST}
+    {1583650800 -14400 1 EDT}
+    {1604210400 -18000 0 EST}
+    {1615705200 -14400 1 EDT}
+    {1636264800 -18000 0 EST}
+    {1647154800 -14400 1 EDT}
+    {1667714400 -18000 0 EST}
+    {1678604400 -14400 1 EDT}
+    {1699164000 -18000 0 EST}
+    {1710054000 -14400 1 EDT}
+    {1730613600 -18000 0 EST}
+    {1741503600 -14400 1 EDT}
+    {1762063200 -18000 0 EST}
+    {1772953200 -14400 1 EDT}
+    {1793512800 -18000 0 EST}
+    {1805007600 -14400 1 EDT}
+    {1825567200 -18000 0 EST}
+    {1836457200 -14400 1 EDT}
+    {1857016800 -18000 0 EST}
+    {1867906800 -14400 1 EDT}
+    {1888466400 -18000 0 EST}
+    {1899356400 -14400 1 EDT}
+    {1919916000 -18000 0 EST}
+    {1930806000 -14400 1 EDT}
+    {1951365600 -18000 0 EST}
+    {1962860400 -14400 1 EDT}
+    {1983420000 -18000 0 EST}
+    {1994310000 -14400 1 EDT}
+    {2014869600 -18000 0 EST}
+    {2025759600 -14400 1 EDT}
+    {2046319200 -18000 0 EST}
+    {2057209200 -14400 1 EDT}
+    {2077768800 -18000 0 EST}
+    {2088658800 -14400 1 EDT}
+    {2109218400 -18000 0 EST}
+    {2120108400 -14400 1 EDT}
+    {2140668000 -18000 0 EST}
+    {2152162800 -14400 1 EDT}
+    {2172722400 -18000 0 EST}
+    {2183612400 -14400 1 EDT}
+    {2204172000 -18000 0 EST}
+    {2215062000 -14400 1 EDT}
+    {2235621600 -18000 0 EST}
+    {2246511600 -14400 1 EDT}
+    {2267071200 -18000 0 EST}
+    {2277961200 -14400 1 EDT}
+    {2298520800 -18000 0 EST}
+    {2309410800 -14400 1 EDT}
+    {2329970400 -18000 0 EST}
+    {2341465200 -14400 1 EDT}
+    {2362024800 -18000 0 EST}
+    {2372914800 -14400 1 EDT}
+    {2393474400 -18000 0 EST}
+    {2404364400 -14400 1 EDT}
+    {2424924000 -18000 0 EST}
+    {2435814000 -14400 1 EDT}
+    {2456373600 -18000 0 EST}
+    {2467263600 -14400 1 EDT}
+    {2487823200 -18000 0 EST}
+    {2499318000 -14400 1 EDT}
+    {2519877600 -18000 0 EST}
+    {2530767600 -14400 1 EDT}
+    {2551327200 -18000 0 EST}
+    {2562217200 -14400 1 EDT}
+    {2582776800 -18000 0 EST}
+    {2593666800 -14400 1 EDT}
+    {2614226400 -18000 0 EST}
+    {2625116400 -14400 1 EDT}
+    {2645676000 -18000 0 EST}
+    {2656566000 -14400 1 EDT}
+    {2677125600 -18000 0 EST}
+    {2688620400 -14400 1 EDT}
+    {2709180000 -18000 0 EST}
+    {2720070000 -14400 1 EDT}
+    {2740629600 -18000 0 EST}
+    {2751519600 -14400 1 EDT}
+    {2772079200 -18000 0 EST}
+    {2782969200 -14400 1 EDT}
+    {2803528800 -18000 0 EST}
+    {2814418800 -14400 1 EDT}
+    {2834978400 -18000 0 EST}
+    {2846473200 -14400 1 EDT}
+    {2867032800 -18000 0 EST}
+    {2877922800 -14400 1 EDT}
+    {2898482400 -18000 0 EST}
+    {2909372400 -14400 1 EDT}
+    {2929932000 -18000 0 EST}
+    {2940822000 -14400 1 EDT}
+    {2961381600 -18000 0 EST}
+    {2972271600 -14400 1 EDT}
+    {2992831200 -18000 0 EST}
+    {3003721200 -14400 1 EDT}
+    {3024280800 -18000 0 EST}
+    {3035775600 -14400 1 EDT}
+    {3056335200 -18000 0 EST}
+    {3067225200 -14400 1 EDT}
+    {3087784800 -18000 0 EST}
+    {3098674800 -14400 1 EDT}
+    {3119234400 -18000 0 EST}
+    {3130124400 -14400 1 EDT}
+    {3150684000 -18000 0 EST}
+    {3161574000 -14400 1 EDT}
+    {3182133600 -18000 0 EST}
+    {3193023600 -14400 1 EDT}
+    {3213583200 -18000 0 EST}
+    {3225078000 -14400 1 EDT}
+    {3245637600 -18000 0 EST}
+    {3256527600 -14400 1 EDT}
+    {3277087200 -18000 0 EST}
+    {3287977200 -14400 1 EDT}
+    {3308536800 -18000 0 EST}
+    {3319426800 -14400 1 EDT}
+    {3339986400 -18000 0 EST}
+    {3350876400 -14400 1 EDT}
+    {3371436000 -18000 0 EST}
+    {3382930800 -14400 1 EDT}
+    {3403490400 -18000 0 EST}
+    {3414380400 -14400 1 EDT}
+    {3434940000 -18000 0 EST}
+    {3445830000 -14400 1 EDT}
+    {3466389600 -18000 0 EST}
+    {3477279600 -14400 1 EDT}
+    {3497839200 -18000 0 EST}
+    {3508729200 -14400 1 EDT}
+    {3529288800 -18000 0 EST}
+    {3540178800 -14400 1 EDT}
+    {3560738400 -18000 0 EST}
+    {3572233200 -14400 1 EDT}
+    {3592792800 -18000 0 EST}
+    {3603682800 -14400 1 EDT}
+    {3624242400 -18000 0 EST}
+    {3635132400 -14400 1 EDT}
+    {3655692000 -18000 0 EST}
+    {3666582000 -14400 1 EDT}
+    {3687141600 -18000 0 EST}
+    {3698031600 -14400 1 EDT}
+    {3718591200 -18000 0 EST}
+    {3730086000 -14400 1 EDT}
+    {3750645600 -18000 0 EST}
+    {3761535600 -14400 1 EDT}
+    {3782095200 -18000 0 EST}
+    {3792985200 -14400 1 EDT}
+    {3813544800 -18000 0 EST}
+    {3824434800 -14400 1 EDT}
+    {3844994400 -18000 0 EST}
+    {3855884400 -14400 1 EDT}
+    {3876444000 -18000 0 EST}
+    {3887334000 -14400 1 EDT}
+    {3907893600 -18000 0 EST}
+    {3919388400 -14400 1 EDT}
+    {3939948000 -18000 0 EST}
+    {3950838000 -14400 1 EDT}
+    {3971397600 -18000 0 EST}
+    {3982287600 -14400 1 EDT}
+    {4002847200 -18000 0 EST}
+    {4013737200 -14400 1 EDT}
+    {4034296800 -18000 0 EST}
+    {4045186800 -14400 1 EDT}
+    {4065746400 -18000 0 EST}
+    {4076636400 -14400 1 EDT}
+    {4097196000 -18000 0 EST}
 }
-set TZData(:America/Montreal) $TZData(:America/Toronto)
@@ -3,9 +3,9 @@
 set TZData(:America/Santiago) {
    {-9223372036854775808 -16966 0 LMT}
    {-2524504634 -16966 0 SMT}
-    {-1892661434 -18000 0 CLT}
+    {-1893439034 -18000 0 CLT}
    {-1688410800 -16966 0 SMT}
-    {-1619205434 -14400 0 CLT}
+    {-1619983034 -14400 0 CLT}
    {-1593806400 -16966 0 SMT}
    {-1335986234 -18000 0 CLT}
    {-1335985200 -14400 1 CLST}
@@ -18,13 +18,13 @@ set TZData(:America/Santiago) {
    {-1222977600 -18000 0 CLT}
    {-1209754800 -14400 1 CLST}
    {-1191355200 -18000 0 CLT}
-    {-1178132400 -14400 0 CLT}
+    {-1178132400 -14400 1 CLST}
    {-870552000 -18000 0 CLT}
-    {-865278000 -14400 0 CLT}
-    {-740520000 -10800 1 CLST}
-    {-736376400 -14400 0 CLT}
+    {-865278000 -14400 1 CLST}
+    {-740520000 -14400 1 CLST}
+    {-736376400 -18000 0 CLT}
    {-718056000 -18000 0 CLT}
-    {-713649600 -14400 0 CLT}
+    {-713646000 -14400 0 CLT}
    {-36619200 -10800 1 CLST}
    {-23922000 -14400 0 CLT}
    {-3355200 -10800 1 CLST}
@@ -65,10 +65,10 @@ set TZData(:America/Santiago) {
    {545194800 -14400 0 CLT}
    {560923200 -10800 1 CLST}
    {574225200 -14400 0 CLT}
-    {592372800 -10800 1 CLST}
+    {591768000 -10800 1 CLST}
    {605674800 -14400 0 CLT}
    {624427200 -10800 1 CLST}
-    {637124400 -14400 0 CLT}
+    {637729200 -14400 0 CLT}
    {653457600 -10800 1 CLST}
    {668574000 -14400 0 CLT}
    {687326400 -10800 1 CLST}
@@ -118,5 +118,174 @@ set TZData(:America/Santiago) {
    {1378612800 -10800 1 CLST}
    {1398567600 -14400 0 CLT}
    {1410062400 -10800 1 CLST}
-    {1430017200 -10800 0 CLT}
+    {1430017200 -14400 0 CLT}
+    {1441512000 -10800 1 CLST}
+    {1461466800 -14400 0 CLT}
+    {1472961600 -10800 1 CLST}
+    {1492916400 -14400 0 CLT}
+    {1504411200 -10800 1 CLST}
+    {1524970800 -14400 0 CLT}
+    {1535860800 -10800 1 CLST}
+    {1556420400 -14400 0 CLT}
+    {1567915200 -10800 1 CLST}
+    {1587870000 -14400 0 CLT}
+    {1599364800 -10800 1 CLST}
+    {1619319600 -14400 0 CLT}
+    {1630814400 -10800 1 CLST}
+    {1650769200 -14400 0 CLT}
+    {1662264000 -10800 1 CLST}
+    {1682218800 -14400 0 CLT}
+    {1693713600 -10800 1 CLST}
+    {1714273200 -14400 0 CLT}
+    {1725768000 -10800 1 CLST}
+    {1745722800 -14400 0 CLT}
+    {1757217600 -10800 1 CLST}
+    {1777172400 -14400 0 CLT}
+    {1788667200 -10800 1 CLST}
+    {1808622000 -14400 0 CLT}
+    {1820116800 -10800 1 CLST}
+    {1840071600 -14400 0 CLT}
+    {1851566400 -10800 1 CLST}
+    {1872126000 -14400 0 CLT}
+    {1883016000 -10800 1 CLST}
+    {1903575600 -14400 0 CLT}
+    {1915070400 -10800 1 CLST}
+    {1935025200 -14400 0 CLT}
+    {1946520000 -10800 1 CLST}
+    {1966474800 -14400 0 CLT}
+    {1977969600 -10800 1 CLST}
+    {1997924400 -14400 0 CLT}
+    {2009419200 -10800 1 CLST}
+    {2029374000 -14400 0 CLT}
+    {2040868800 -10800 1 CLST}
+    {2061428400 -14400 0 CLT}
+    {2072318400 -10800 1 CLST}
+    {2092878000 -14400 0 CLT}
+    {2104372800 -10800 1 CLST}
+    {2124327600 -14400 0 CLT}
+    {2135822400 -10800 1 CLST}
+    {2155777200 -14400 0 CLT}
+    {2167272000 -10800 1 CLST}
+    {2187226800 -14400 0 CLT}
+    {2198721600 -10800 1 CLST}
+    {2219281200 -14400 0 CLT}
+    {2230171200 -10800 1 CLST}
+    {2250730800 -14400 0 CLT}
+    {2262225600 -10800 1 CLST}
+    {2282180400 -14400 0 CLT}
+    {2293675200 -10800 1 CLST}
+    {2313630000 -14400 0 CLT}
+    {2325124800 -10800 1 CLST}
+    {2345079600 -14400 0 CLT}
+    {2356574400 -10800 1 CLST}
+    {2376529200 -14400 0 CLT}
+    {2388024000 -10800 1 CLST}
+    {2408583600 -14400 0 CLT}
+    {2419473600 -10800 1 CLST}
+    {2440033200 -14400 0 CLT}
+    {2451528000 -10800 1 CLST}
+    {2471482800 -14400 0 CLT}
+    {2482977600 -10800 1 CLST}
+    {2502932400 -14400 0 CLT}
+    {2514427200 -10800 1 CLST}
+    {2534382000 -14400 0 CLT}
+    {2545876800 -10800 1 CLST}
+    {2565831600 -14400 0 CLT}
+    {2577326400 -10800 1 CLST}
+    {2597886000 -14400 0 CLT}
+    {2609380800 -10800 1 CLST}
+    {2629335600 -14400 0 CLT}
+    {2640830400 -10800 1 CLST}
+    {2660785200 -14400 0 CLT}
+    {2672280000 -10800 1 CLST}
+    {2692234800 -14400 0 CLT}
+    {2703729600 -10800 1 CLST}
+    {2723684400 -14400 0 CLT}
+    {2735179200 -10800 1 CLST}
+    {2755738800 -14400 0 CLT}
+    {2766628800 -10800 1 CLST}
+    {2787188400 -14400 0 CLT}
+    {2798683200 -10800 1 CLST}
+    {2818638000 -14400 0 CLT}
+    {2830132800 -10800 1 CLST}
+    {2850087600 -14400 0 CLT}
+    {2861582400 -10800 1 CLST}
+    {2881537200 -14400 0 CLT}
+    {2893032000 -10800 1 CLST}
+    {2912986800 -14400 0 CLT}
+    {2924481600 -10800 1 CLST}
+    {2945041200 -14400 0 CLT}
+    {2955931200 -10800 1 CLST}
+    {2976490800 -14400 0 CLT}
+    {2987985600 -10800 1 CLST}
+    {3007940400 -14400 0 CLT}
+    {3019435200 -10800 1 CLST}
+    {3039390000 -14400 0 CLT}
+    {3050884800 -10800 1 CLST}
+    {3070839600 -14400 0 CLT}
+    {3082334400 -10800 1 CLST}
+    {3102894000 -14400 0 CLT}
+    {3113784000 -10800 1 CLST}
+    {3134343600 -14400 0 CLT}
+    {3145838400 -10800 1 CLST}
+    {3165793200 -14400 0 CLT}
+    {3177288000 -10800 1 CLST}
+    {3197242800 -14400 0 CLT}
+    {3208737600 -10800 1 CLST}
+    {3228692400 -14400 0 CLT}
+    {3240187200 -10800 1 CLST}
+    {3260142000 -14400 0 CLT}
+    {3271636800 -10800 1 CLST}
+    {3292196400 -14400 0 CLT}
+    {3303086400 -10800 1 CLST}
+    {3323646000 -14400 0 CLT}
+    {3335140800 -10800 1 CLST}
+    {3355095600 -14400 0 CLT}
+    {3366590400 -10800 1 CLST}
+    {3386545200 -14400 0 CLT}
+    {3398040000 -10800 1 CLST}
+    {3417994800 -14400 0 CLT}
+    {3429489600 -10800 1 CLST}
+    {3449444400 -14400 0 CLT}
+    {3460939200 -10800 1 CLST}
+    {3481498800 -14400 0 CLT}
+    {3492993600 -10800 1 CLST}
+    {3512948400 -14400 0 CLT}
+    {3524443200 -10800 1 CLST}
+    {3544398000 -14400 0 CLT}
+    {3555892800 -10800 1 CLST}
+    {3575847600 -14400 0 CLT}
+    {3587342400 -10800 1 CLST}
+    {3607297200 -14400 0 CLT}
+    {3618792000 -10800 1 CLST}
+    {3639351600 -14400 0 CLT}
+    {3650241600 -10800 1 CLST}
+    {3670801200 -14400 0 CLT}
+    {3682296000 -10800 1 CLST}
+    {3702250800 -14400 0 CLT}
+    {3713745600 -10800 1 CLST}
+    {3733700400 -14400 0 CLT}
+    {3745195200 -10800 1 CLST}
+    {3765150000 -14400 0 CLT}
+    {3776644800 -10800 1 CLST}
+    {3796599600 -14400 0 CLT}
+    {3808094400 -10800 1 CLST}
+    {3828654000 -14400 0 CLT}
+    {3839544000 -10800 1 CLST}
+    {3860103600 -14400 0 CLT}
+    {3871598400 -10800 1 CLST}
+    {3891553200 -14400 0 CLT}
+    {3903048000 -10800 1 CLST}
+    {3923002800 -14400 0 CLT}
+    {3934497600 -10800 1 CLST}
+    {3954452400 -14400 0 CLT}
+    {3965947200 -10800 1 CLST}
+    {3986506800 -14400 0 CLT}
+    {3997396800 -10800 1 CLST}
+    {4017956400 -14400 0 CLT}
+    {4029451200 -10800 1 CLST}
+    {4049406000 -14400 0 CLT}
+    {4060900800 -10800 1 CLST}
+    {4080855600 -14400 0 CLT}
+    {4092350400 -10800 1 CLST}
 }
@@ -28,10 +28,10 @@ set TZData(:Antarctica/Palmer) {
    {545194800 -14400 0 CLT}
    {560923200 -10800 1 CLST}
    {574225200 -14400 0 CLT}
-    {592372800 -10800 1 CLST}
+    {591768000 -10800 1 CLST}
    {605674800 -14400 0 CLT}
    {624427200 -10800 1 CLST}
-    {637124400 -14400 0 CLT}
+    {637729200 -14400 0 CLT}
    {653457600 -10800 1 CLST}
    {668574000 -14400 0 CLT}
    {687326400 -10800 1 CLST}
@@ -81,5 +81,174 @@ set TZData(:Antarctica/Palmer) {
    {1378612800 -10800 1 CLST}
    {1398567600 -14400 0 CLT}
    {1410062400 -10800 1 CLST}
-    {1430017200 -10800 0 CLT}
+    {1430017200 -14400 0 CLT}
+    {1441512000 -10800 1 CLST}
+    {1461466800 -14400 0 CLT}
+    {1472961600 -10800 1 CLST}
+    {1492916400 -14400 0 CLT}
+    {1504411200 -10800 1 CLST}
+    {1524970800 -14400 0 CLT}
+    {1535860800 -10800 1 CLST}
+    {1556420400 -14400 0 CLT}
+    {1567915200 -10800 1 CLST}
+    {1587870000 -14400 0 CLT}
+    {1599364800 -10800 1 CLST}
+    {1619319600 -14400 0 CLT}
+    {1630814400 -10800 1 CLST}
+    {1650769200 -14400 0 CLT}
+    {1662264000 -10800 1 CLST}
+    {1682218800 -14400 0 CLT}
+    {1693713600 -10800 1 CLST}
+    {1714273200 -14400 0 CLT}
+    {1725768000 -10800 1 CLST}
+    {1745722800 -14400 0 CLT}
+    {1757217600 -10800 1 CLST}
+    {1777172400 -14400 0 CLT}
+    {1788667200 -10800 1 CLST}
+    {1808622000 -14400 0 CLT}
+    {1820116800 -10800 1 CLST}
+    {1840071600 -14400 0 CLT}
+    {1851566400 -10800 1 CLST}
+    {1872126000 -14400 0 CLT}
+    {1883016000 -10800 1 CLST}
+    {1903575600 -14400 0 CLT}
+    {1915070400 -10800 1 CLST}
+    {1935025200 -14400 0 CLT}
+    {1946520000 -10800 1 CLST}
+    {1966474800 -14400 0 CLT}
+    {1977969600 -10800 1 CLST}
+    {1997924400 -14400 0 CLT}
+    {2009419200 -10800 1 CLST}
+    {2029374000 -14400 0 CLT}
+    {2040868800 -10800 1 CLST}
+    {2061428400 -14400 0 CLT}
+    {2072318400 -10800 1 CLST}
+    {2092878000 -14400 0 CLT}
+    {2104372800 -10800 1 CLST}
+    {2124327600 -14400 0 CLT}
+    {2135822400 -10800 1 CLST}
+    {2155777200 -14400 0 CLT}
+    {2167272000 -10800 1 CLST}
+    {2187226800 -14400 0 CLT}
+    {2198721600 -10800 1 CLST}
+    {2219281200 -14400 0 CLT}
+    {2230171200 -10800 1 CLST}
+    {2250730800 -14400 0 CLT}
+    {2262225600 -10800 1 CLST}
+    {2282180400 -14400 0 CLT}
+    {2293675200 -10800 1 CLST}
+    {2313630000 -14400 0 CLT}
+    {2325124800 -10800 1 CLST}
+    {2345079600 -14400 0 CLT}
+    {2356574400 -10800 1 CLST}
+    {2376529200 -14400 0 CLT}
+    {2388024000 -10800 1 CLST}
+    {2408583600 -14400 0 CLT}
+    {2419473600 -10800 1 CLST}
+    {2440033200 -14400 0 CLT}
+    {2451528000 -10800 1 CLST}
+    {2471482800 -14400 0 CLT}
+    {2482977600 -10800 1 CLST}
+    {2502932400 -14400 0 CLT}
+    {2514427200 -10800 1 CLST}
+    {2534382000 -14400 0 CLT}
+    {2545876800 -10800 1 CLST}
+    {2565831600 -14400 0 CLT}
+    {2577326400 -10800 1 CLST}
+    {2597886000 -14400 0 CLT}
+    {2609380800 -10800 1 CLST}
+    {2629335600 -14400 0 CLT}
+    {2640830400 -10800 1 CLST}
+    {2660785200 -14400 0 CLT}
+    {2672280000 -10800 1 CLST}
+    {2692234800 -14400 0 CLT}
+    {2703729600 -10800 1 CLST}
+    {2723684400 -14400 0 CLT}
+    {2735179200 -10800 1 CLST}
+    {2755738800 -14400 0 CLT}
+    {2766628800 -10800 1 CLST}
+    {2787188400 -14400 0 CLT}
+    {2798683200 -10800 1 CLST}
+    {2818638000 -14400 0 CLT}
+    {2830132800 -10800 1 CLST}
+    {2850087600 -14400 0 CLT}
+    {2861582400 -10800 1 CLST}
+    {2881537200 -14400 0 CLT}
+    {2893032000 -10800 1 CLST}
+    {2912986800 -14400 0 CLT}
+    {2924481600 -10800 1 CLST}
+    {2945041200 -14400 0 CLT}
+    {2955931200 -10800 1 CLST}
+    {2976490800 -14400 0 CLT}
+    {2987985600 -10800 1 CLST}
+    {3007940400 -14400 0 CLT}
+    {3019435200 -10800 1 CLST}
+    {3039390000 -14400 0 CLT}
+    {3050884800 -10800 1 CLST}
+    {3070839600 -14400 0 CLT}
+    {3082334400 -10800 1 CLST}
+    {3102894000 -14400 0 CLT}
+    {3113784000 -10800 1 CLST}
+    {3134343600 -14400 0 CLT}
+    {3145838400 -10800 1 CLST}
+    {3165793200 -14400 0 CLT}
+    {3177288000 -10800 1 CLST}
+    {3197242800 -14400 0 CLT}
+    {3208737600 -10800 1 CLST}
+    {3228692400 -14400 0 CLT}
+    {3240187200 -10800 1 CLST}
+    {3260142000 -14400 0 CLT}
+    {3271636800 -10800 1 CLST}
+    {3292196400 -14400 0 CLT}
+    {3303086400 -10800 1 CLST}
+    {3323646000 -14400 0 CLT}
+    {3335140800 -10800 1 CLST}
+    {3355095600 -14400 0 CLT}
+    {3366590400 -10800 1 CLST}
+    {3386545200 -14400 0 CLT}
+    {3398040000 -10800 1 CLST}
+    {3417994800 -14400 0 CLT}
+    {3429489600 -10800 1 CLST}
+    {3449444400 -14400 0 CLT}
+    {3460939200 -10800 1 CLST}
+    {3481498800 -14400 0 CLT}
+    {3492993600 -10800 1 CLST}
+    {3512948400 -14400 0 CLT}
+    {3524443200 -10800 1 CLST}
+    {3544398000 -14400 0 CLT}
+    {3555892800 -10800 1 CLST}
+    {3575847600 -14400 0 CLT}
+    {3587342400 -10800 1 CLST}
+    {3607297200 -14400 0 CLT}
+    {3618792000 -10800 1 CLST}
+    {3639351600 -14400 0 CLT}
+    {3650241600 -10800 1 CLST}
+    {3670801200 -14400 0 CLT}
+    {3682296000 -10800 1 CLST}
+    {3702250800 -14400 0 CLT}
+    {3713745600 -10800 1 CLST}
+    {3733700400 -14400 0 CLT}
+    {3745195200 -10800 1 CLST}
+    {3765150000 -14400 0 CLT}
+    {3776644800 -10800 1 CLST}
+    {3796599600 -14400 0 CLT}
+    {3808094400 -10800 1 CLST}
+    {3828654000 -14400 0 CLT}
+    {3839544000 -10800 1 CLST}
+    {3860103600 -14400 0 CLT}
+    {3871598400 -10800 1 CLST}
+    {3891553200 -14400 0 CLT}
+    {3903048000 -10800 1 CLST}
+    {3923002800 -14400 0 CLT}
+    {3934497600 -10800 1 CLST}
+    {3954452400 -14400 0 CLT}
+    {3965947200 -10800 1 CLST}
+    {3986506800 -14400 0 CLT}
+    {3997396800 -10800 1 CLST}
+    {4017956400 -14400 0 CLT}
+    {4029451200 -10800 1 CLST}
+    {4049406000 -14400 0 CLT}
+    {4060900800 -10800 1 CLST}
+    {4080855600 -14400 0 CLT}
+    {4092350400 -10800 1 CLST}
 }
@@ -1,196 +0,0 @@
-# created by tools/tclZIC.tcl - do not edit
-
-set TZData(:Antarctica/Troll) {
-    {-9223372036854775808 0 0 zzz}
-    {1108166400 0 0 UTC}
-    {1111885200 7200 1 CEST}
-    {1130634000 0 0 UTC}
-    {1143334800 7200 1 CEST}
-    {1162083600 0 0 UTC}
-    {1174784400 7200 1 CEST}
-    {1193533200 0 0 UTC}
-    {1206838800 7200 1 CEST}
-    {1224982800 0 0 UTC}
-    {1238288400 7200 1 CEST}
-    {1256432400 0 0 UTC}
-    {1269738000 7200 1 CEST}
-    {1288486800 0 0 UTC}
-    {1301187600 7200 1 CEST}
-    {1319936400 0 0 UTC}
-    {1332637200 7200 1 CEST}
-    {1351386000 0 0 UTC}
-    {1364691600 7200 1 CEST}
-    {1382835600 0 0 UTC}
-    {1396141200 7200 1 CEST}
-    {1414285200 0 0 UTC}
-    {1427590800 7200 1 CEST}
-    {1445734800 0 0 UTC}
-    {1459040400 7200 1 CEST}
-    {1477789200 0 0 UTC}
-    {1490490000 7200 1 CEST}
-    {1509238800 0 0 UTC}
-    {1521939600 7200 1 CEST}
-    {1540688400 0 0 UTC}
-    {1553994000 7200 1 CEST}
-    {1572138000 0 0 UTC}
-    {1585443600 7200 1 CEST}
-    {1603587600 0 0 UTC}
-    {1616893200 7200 1 CEST}
-    {1635642000 0 0 UTC}
-    {1648342800 7200 1 CEST}
-    {1667091600 0 0 UTC}
-    {1679792400 7200 1 CEST}
-    {1698541200 0 0 UTC}
-    {1711846800 7200 1 CEST}
-    {1729990800 0 0 UTC}
-    {1743296400 7200 1 CEST}
-    {1761440400 0 0 UTC}
-    {1774746000 7200 1 CEST}
-    {1792890000 0 0 UTC}
-    {1806195600 7200 1 CEST}
-    {1824944400 0 0 UTC}
-    {1837645200 7200 1 CEST}
-    {1856394000 0 0 UTC}
-    {1869094800 7200 1 CEST}
-    {1887843600 0 0 UTC}
-    {1901149200 7200 1 CEST}
-    {1919293200 0 0 UTC}
-    {1932598800 7200 1 CEST}
-    {1950742800 0 0 UTC}
-    {1964048400 7200 1 CEST}
-    {1982797200 0 0 UTC}
-    {1995498000 7200 1 CEST}
-    {2014246800 0 0 UTC}
-    {2026947600 7200 1 CEST}
-    {2045696400 0 0 UTC}
-    {2058397200 7200 1 CEST}
-    {2077146000 0 0 UTC}
-    {2090451600 7200 1 CEST}
-    {2108595600 0 0 UTC}
-    {2121901200 7200 1 CEST}
-    {2140045200 0 0 UTC}
-    {2153350800 7200 1 CEST}
-    {2172099600 0 0 UTC}
-    {2184800400 7200 1 CEST}
-    {2203549200 0 0 UTC}
-    {2216250000 7200 1 CEST}
-    {2234998800 0 0 UTC}
-    {2248304400 7200 1 CEST}
-    {2266448400 0 0 UTC}
-    {2279754000 7200 1 CEST}
-    {2297898000 0 0 UTC}
-    {2311203600 7200 1 CEST}
-    {2329347600 0 0 UTC}
-    {2342653200 7200 1 CEST}
-    {2361402000 0 0 UTC}
-    {2374102800 7200 1 CEST}
-    {2392851600 0 0 UTC}
-    {2405552400 7200 1 CEST}
-    {2424301200 0 0 UTC}
-    {2437606800 7200 1 CEST}
-    {2455750800 0 0 UTC}
-    {2469056400 7200 1 CEST}
-    {2487200400 0 0 UTC}
-    {2500506000 7200 1 CEST}
-    {2519254800 0 0 UTC}
-    {2531955600 7200 1 CEST}
-    {2550704400 0 0 UTC}
-    {2563405200 7200 1 CEST}
-    {2582154000 0 0 UTC}
-    {2595459600 7200 1 CEST}
-    {2613603600 0 0 UTC}
-    {2626909200 7200 1 CEST}
-    {2645053200 0 0 UTC}
-    {2658358800 7200 1 CEST}
-    {2676502800 0 0 UTC}
-    {2689808400 7200 1 CEST}
-    {2708557200 0 0 UTC}
-    {2721258000 7200 1 CEST}
-    {2740006800 0 0 UTC}
-    {2752707600 7200 1 CEST}
-    {2771456400 0 0 UTC}
-    {2784762000 7200 1 CEST}
-    {2802906000 0 0 UTC}
-    {2816211600 7200 1 CEST}
-    {2834355600 0 0 UTC}
-    {2847661200 7200 1 CEST}
-    {2866410000 0 0 UTC}
-    {2879110800 7200 1 CEST}
-    {2897859600 0 0 UTC}
-    {2910560400 7200 1 CEST}
-    {2929309200 0 0 UTC}
-    {2942010000 7200 1 CEST}
-    {2960758800 0 0 UTC}
-    {2974064400 7200 1 CEST}
-    {2992208400 0 0 UTC}
-    {3005514000 7200 1 CEST}
-    {3023658000 0 0 UTC}
-    {3036963600 7200 1 CEST}
-    {3055712400 0 0 UTC}
-    {3068413200 7200 1 CEST}
-    {3087162000 0 0 UTC}
-    {3099862800 7200 1 CEST}
-    {3118611600 0 0 UTC}
-    {3131917200 7200 1 CEST}
-    {3150061200 0 0 UTC}
-    {3163366800 7200 1 CEST}
-    {3181510800 0 0 UTC}
-    {3194816400 7200 1 CEST}
-    {3212960400 0 0 UTC}
-    {3226266000 7200 1 CEST}
-    {3245014800 0 0 UTC}
-    {3257715600 7200 1 CEST}
-    {3276464400 0 0 UTC}
-    {3289165200 7200 1 CEST}
-    {3307914000 0 0 UTC}
-    {3321219600 7200 1 CEST}
-    {3339363600 0 0 UTC}
-    {3352669200 7200 1 CEST}
-    {3370813200 0 0 UTC}
-    {3384118800 7200 1 CEST}
-    {3402867600 0 0 UTC}
-    {3415568400 7200 1 CEST}
-    {3434317200 0 0 UTC}
-    {3447018000 7200 1 CEST}
-    {3465766800 0 0 UTC}
-    {3479072400 7200 1 CEST}
-    {3497216400 0 0 UTC}
-    {3510522000 7200 1 CEST}
-    {3528666000 0 0 UTC}
-    {3541971600 7200 1 CEST}
-    {3560115600 0 0 UTC}
-    {3573421200 7200 1 CEST}
-    {3592170000 0 0 UTC}
-    {3604870800 7200 1 CEST}
-    {3623619600 0 0 UTC}
-    {3636320400 7200 1 CEST}
-    {3655069200 0 0 UTC}
-    {3668374800 7200 1 CEST}
-    {3686518800 0 0 UTC}
-    {3699824400 7200 1 CEST}
-    {3717968400 0 0 UTC}
-    {3731274000 7200 1 CEST}
-    {3750022800 0 0 UTC}
-    {3762723600 7200 1 CEST}
-    {3781472400 0 0 UTC}
-    {3794173200 7200 1 CEST}
-    {3812922000 0 0 UTC}
-    {3825622800 7200 1 CEST}
-    {3844371600 0 0 UTC}
-    {3857677200 7200 1 CEST}
-    {3875821200 0 0 UTC}
-    {3889126800 7200 1 CEST}
-    {3907270800 0 0 UTC}
-    {3920576400 7200 1 CEST}
-    {3939325200 0 0 UTC}
-    {3952026000 7200 1 CEST}
-    {3970774800 0 0 UTC}
-    {3983475600 7200 1 CEST}
-    {4002224400 0 0 UTC}
-    {4015530000 7200 1 CEST}
-    {4033674000 0 0 UTC}
-    {4046979600 7200 1 CEST}
-    {4065123600 0 0 UTC}
-    {4078429200 7200 1 CEST}
-    {4096573200 0 0 UTC}
-}
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Asia/Riyadh)]} {
-    LoadTimeZoneFile Asia/Riyadh
+
+set TZData(:Asia/Aden) {
+    {-9223372036854775808 10794 0 LMT}
+    {-631162794 10800 0 AST}
 }
-set TZData(:Asia/Aden) $TZData(:Asia/Riyadh)
@@ -1,5 +1,7 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Asia/Qatar)]} {
-    LoadTimeZoneFile Asia/Qatar
+
+set TZData(:Asia/Bahrain) {
+    {-9223372036854775808 12140 0 LMT}
+    {-1577935340 14400 0 GST}
+    {76190400 10800 0 AST}
 }
-set TZData(:Asia/Bahrain) $TZData(:Asia/Qatar)
@@ -1,71 +0,0 @@
-# created by tools/tclZIC.tcl - do not edit
-
-set TZData(:Asia/Chita) {
-    {-9223372036854775808 27232 0 LMT}
-    {-1579419232 28800 0 YAKT}
-    {-1247558400 32400 0 YAKMMTT}
-    {354898800 36000 1 YAKST}
-    {370706400 32400 0 YAKT}
-    {386434800 36000 1 YAKST}
-    {402242400 32400 0 YAKT}
-    {417970800 36000 1 YAKST}
-    {433778400 32400 0 YAKT}
-    {449593200 36000 1 YAKST}
-    {465325200 32400 0 YAKT}
-    {481050000 36000 1 YAKST}
-    {496774800 32400 0 YAKT}
-    {512499600 36000 1 YAKST}
-    {528224400 32400 0 YAKT}
-    {543949200 36000 1 YAKST}
-    {559674000 32400 0 YAKT}
-    {575398800 36000 1 YAKST}
-    {591123600 32400 0 YAKT}
-    {606848400 36000 1 YAKST}
-    {622573200 32400 0 YAKT}
-    {638298000 36000 1 YAKST}
-    {654627600 32400 0 YAKT}
-    {670352400 28800 0 YAKMMTT}
-    {670356000 32400 1 YAKST}
-    {686080800 28800 0 YAKT}
-    {695757600 32400 0 YAKMMTT}
-    {701791200 36000 1 YAKST}
-    {717512400 32400 0 YAKT}
-    {733251600 36000 1 YAKST}
-    {748976400 32400 0 YAKT}
-    {764701200 36000 1 YAKST}
-    {780426000 32400 0 YAKT}
-    {796150800 36000 1 YAKST}
-    {811875600 32400 0 YAKT}
-    {828205200 36000 1 YAKST}
-    {846349200 32400 0 YAKT}
-    {859654800 36000 1 YAKST}
-    {877798800 32400 0 YAKT}
-    {891104400 36000 1 YAKST}
-    {909248400 32400 0 YAKT}
-    {922554000 36000 1 YAKST}
-    {941302800 32400 0 YAKT}
-    {954003600 36000 1 YAKST}
-    {972752400 32400 0 YAKT}
-    {985453200 36000 1 YAKST}
-    {1004202000 32400 0 YAKT}
-    {1017507600 36000 1 YAKST}
-    {1035651600 32400 0 YAKT}
-    {1048957200 36000 1 YAKST}
-    {1067101200 32400 0 YAKT}
-    {1080406800 36000 1 YAKST}
-    {1099155600 32400 0 YAKT}
-    {1111856400 36000 1 YAKST}
-    {1130605200 32400 0 YAKT}
-    {1143306000 36000 1 YAKST}
-    {1162054800 32400 0 YAKT}
-    {1174755600 36000 1 YAKST}
-    {1193504400 32400 0 YAKT}
-    {1206810000 36000 1 YAKST}
-    {1224954000 32400 0 YAKT}
-    {1238259600 36000 1 YAKST}
-    {1256403600 32400 0 YAKT}
-    {1269709200 36000 1 YAKST}
-    {1288458000 32400 0 YAKT}
-    {1301158800 36000 0 YAKT}
-    {1414252800 28800 0 IRKT}
-}
@@ -48,175 +48,4 @@ set TZData(:Asia/Choibalsan) {
    {1127491200 32400 0 CHOT}
    {1143219600 36000 1 CHOST}
    {1159545600 32400 0 CHOT}
-    {1206889200 28800 0 CHOT}
-    {1427479200 32400 1 CHOST}
-    {1443193200 28800 0 CHOT}
-    {1458928800 32400 1 CHOST}
-    {1474642800 28800 0 CHOT}
-    {1490378400 32400 1 CHOST}
-    {1506697200 28800 0 CHOT}
-    {1522432800 32400 1 CHOST}
-    {1538146800 28800 0 CHOT}
-    {1553882400 32400 1 CHOST}
-    {1569596400 28800 0 CHOT}
-    {1585332000 32400 1 CHOST}
-    {1601046000 28800 0 CHOT}
-    {1616781600 32400 1 CHOST}
-    {1632495600 28800 0 CHOT}
-    {1648231200 32400 1 CHOST}
-    {1663945200 28800 0 CHOT}
-    {1679680800 32400 1 CHOST}
-    {1695999600 28800 0 CHOT}
-    {1711735200 32400 1 CHOST}
-    {1727449200 28800 0 CHOT}
-    {1743184800 32400 1 CHOST}
-    {1758898800 28800 0 CHOT}
-    {1774634400 32400 1 CHOST}
-    {1790348400 28800 0 CHOT}
-    {1806084000 32400 1 CHOST}
-    {1821798000 28800 0 CHOT}
-    {1837533600 32400 1 CHOST}
-    {1853852400 28800 0 CHOT}
-    {1869588000 32400 1 CHOST}
-    {1885302000 28800 0 CHOT}
-    {1901037600 32400 1 CHOST}
-    {1916751600 28800 0 CHOT}
-    {1932487200 32400 1 CHOST}
-    {1948201200 28800 0 CHOT}
-    {1963936800 32400 1 CHOST}
-    {1979650800 28800 0 CHOT}
-    {1995386400 32400 1 CHOST}
-    {2011100400 28800 0 CHOT}
-    {2026836000 32400 1 CHOST}
-    {2043154800 28800 0 CHOT}
-    {2058890400 32400 1 CHOST}
-    {2074604400 28800 0 CHOT}
-    {2090340000 32400 1 CHOST}
-    {2106054000 28800 0 CHOT}
-    {2121789600 32400 1 CHOST}
-    {2137503600 28800 0 CHOT}
-    {2153239200 32400 1 CHOST}
-    {2168953200 28800 0 CHOT}
-    {2184688800 32400 1 CHOST}
-    {2200402800 28800 0 CHOT}
-    {2216743200 32400 1 CHOST}
-    {2232457200 28800 0 CHOT}
-    {2248192800 32400 1 CHOST}
-    {2263906800 28800 0 CHOT}
-    {2279642400 32400 1 CHOST}
-    {2295356400 28800 0 CHOT}
-    {2311092000 32400 1 CHOST}
-    {2326806000 28800 0 CHOT}
-    {2342541600 32400 1 CHOST}
-    {2358255600 28800 0 CHOT}
-    {2373991200 32400 1 CHOST}
-    {2390310000 28800 0 CHOT}
-    {2406045600 32400 1 CHOST}
-    {2421759600 28800 0 CHOT}
-    {2437495200 32400 1 CHOST}
-    {2453209200 28800 0 CHOT}
-    {2468944800 32400 1 CHOST}
-    {2484658800 28800 0 CHOT}
-    {2500394400 32400 1 CHOST}
-    {2516108400 28800 0 CHOT}
-    {2531844000 32400 1 CHOST}
-    {2547558000 28800 0 CHOT}
-    {2563293600 32400 1 CHOST}
-    {2579612400 28800 0 CHOT}
-    {2595348000 32400 1 CHOST}
-    {2611062000 28800 0 CHOT}
-    {2626797600 32400 1 CHOST}
-    {2642511600 28800 0 CHOT}
-    {2658247200 32400 1 CHOST}
-    {2673961200 28800 0 CHOT}
-    {2689696800 32400 1 CHOST}
-    {2705410800 28800 0 CHOT}
-    {2721146400 32400 1 CHOST}
-    {2737465200 28800 0 CHOT}
-    {2753200800 32400 1 CHOST}
-    {2768914800 28800 0 CHOT}
-    {2784650400 32400 1 CHOST}
-    {2800364400 28800 0 CHOT}
-    {2816100000 32400 1 CHOST}
-    {2831814000 28800 0 CHOT}
-    {2847549600 32400 1 CHOST}
-    {2863263600 28800 0 CHOT}
-    {2878999200 32400 1 CHOST}
-    {2894713200 28800 0 CHOT}
-    {2910448800 32400 1 CHOST}
-    {2926767600 28800 0 CHOT}
-    {2942503200 32400 1 CHOST}
-    {2958217200 28800 0 CHOT}
-    {2973952800 32400 1 CHOST}
-    {2989666800 28800 0 CHOT}
-    {3005402400 32400 1 CHOST}
-    {3021116400 28800 0 CHOT}
-    {3036852000 32400 1 CHOST}
-    {3052566000 28800 0 CHOT}
-    {3068301600 32400 1 CHOST}
-    {3084015600 28800 0 CHOT}
-    {3100356000 32400 1 CHOST}
-    {3116070000 28800 0 CHOT}
-    {3131805600 32400 1 CHOST}
-    {3147519600 28800 0 CHOT}
-    {3163255200 32400 1 CHOST}
-    {3178969200 28800 0 CHOT}
-    {3194704800 32400 1 CHOST}
-    {3210418800 28800 0 CHOT}
-    {3226154400 32400 1 CHOST}
-    {3241868400 28800 0 CHOT}
-    {3257604000 32400 1 CHOST}
-    {3273922800 28800 0 CHOT}
-    {3289658400 32400 1 CHOST}
-    {3305372400 28800 0 CHOT}
-    {3321108000 32400 1 CHOST}
-    {3336822000 28800 0 CHOT}
-    {3352557600 32400 1 CHOST}
-    {3368271600 28800 0 CHOT}
-    {3384007200 32400 1 CHOST}
-    {3399721200 28800 0 CHOT}
-    {3415456800 32400 1 CHOST}
-    {3431170800 28800 0 CHOT}
-    {3446906400 32400 1 CHOST}
-    {3463225200 28800 0 CHOT}
-    {3478960800 32400 1 CHOST}
-    {3494674800 28800 0 CHOT}
-    {3510410400 32400 1 CHOST}
-    {3526124400 28800 0 CHOT}
-    {3541860000 32400 1 CHOST}
-    {3557574000 28800 0 CHOT}
-    {3573309600 32400 1 CHOST}
-    {3589023600 28800 0 CHOT}
-    {3604759200 32400 1 CHOST}
-    {3621078000 28800 0 CHOT}
-    {3636813600 32400 1 CHOST}
-    {3652527600 28800 0 CHOT}
-    {3668263200 32400 1 CHOST}
-    {3683977200 28800 0 CHOT}
-    {3699712800 32400 1 CHOST}
-    {3715426800 28800 0 CHOT}
-    {3731162400 32400 1 CHOST}
-    {3746876400 28800 0 CHOT}
-    {3762612000 32400 1 CHOST}
-    {3778326000 28800 0 CHOT}
-    {3794061600 32400 1 CHOST}
-    {3810380400 28800 0 CHOT}
-    {3826116000 32400 1 CHOST}
-    {3841830000 28800 0 CHOT}
-    {3857565600 32400 1 CHOST}
-    {3873279600 28800 0 CHOT}
-    {3889015200 32400 1 CHOST}
-    {3904729200 28800 0 CHOT}
-    {3920464800 32400 1 CHOST}
-    {3936178800 28800 0 CHOT}
-    {3951914400 32400 1 CHOST}
-    {3967628400 28800 0 CHOT}
-    {3983968800 32400 1 CHOST}
-    {3999682800 28800 0 CHOT}
-    {4015418400 32400 1 CHOST}
-    {4031132400 28800 0 CHOT}
-    {4046868000 32400 1 CHOST}
-    {4062582000 28800 0 CHOT}
-    {4078317600 32400 1 CHOST}
-    {4094031600 28800 0 CHOT}
 }
@@ -10,5 +10,5 @@ set TZData(:Asia/Dhaka) {
    {38772000 21600 0 BDT}
    {1230746400 21600 0 BDT}
    {1245430800 25200 1 BDST}
-    {1262278800 21600 0 BDT}
+    {1262278740 21600 0 BDT}
 }
@@ -104,175 +104,175 @@ set TZData(:Asia/Gaza) {
    {1364508000 10800 1 EEST}
    {1380229200 7200 0 EET}
    {1395957600 10800 1 EEST}
-    {1414098000 7200 0 EET}
-    {1427493600 10800 1 EEST}
-    {1445547600 7200 0 EET}
-    {1458943200 10800 1 EEST}
-    {1476997200 7200 0 EET}
-    {1490997600 10800 1 EEST}
-    {1509051600 7200 0 EET}
-    {1522447200 10800 1 EEST}
-    {1540501200 7200 0 EET}
-    {1553896800 10800 1 EEST}
-    {1571950800 7200 0 EET}
-    {1585346400 10800 1 EEST}
-    {1603400400 7200 0 EET}
-    {1616796000 10800 1 EEST}
-    {1634850000 7200 0 EET}
-    {1648245600 10800 1 EEST}
-    {1666299600 7200 0 EET}
-    {1680300000 10800 1 EEST}
-    {1698354000 7200 0 EET}
-    {1711749600 10800 1 EEST}
-    {1729803600 7200 0 EET}
-    {1743199200 10800 1 EEST}
-    {1761253200 7200 0 EET}
-    {1774648800 10800 1 EEST}
-    {1792702800 7200 0 EET}
-    {1806098400 10800 1 EEST}
-    {1824152400 7200 0 EET}
-    {1838152800 10800 1 EEST}
-    {1856206800 7200 0 EET}
-    {1869602400 10800 1 EEST}
-    {1887656400 7200 0 EET}
-    {1901052000 10800 1 EEST}
-    {1919106000 7200 0 EET}
-    {1932501600 10800 1 EEST}
-    {1950555600 7200 0 EET}
-    {1963951200 10800 1 EEST}
-    {1982005200 7200 0 EET}
-    {1995400800 10800 1 EEST}
-    {2013454800 7200 0 EET}
-    {2027455200 10800 1 EEST}
-    {2045509200 7200 0 EET}
-    {2058904800 10800 1 EEST}
-    {2076958800 7200 0 EET}
-    {2090354400 10800 1 EEST}
-    {2108408400 7200 0 EET}
-    {2121804000 10800 1 EEST}
-    {2139858000 7200 0 EET}
-    {2153253600 10800 1 EEST}
-    {2171307600 7200 0 EET}
-    {2184703200 10800 1 EEST}
-    {2202757200 7200 0 EET}
-    {2216757600 10800 1 EEST}
-    {2234811600 7200 0 EET}
-    {2248207200 10800 1 EEST}
-    {2266261200 7200 0 EET}
-    {2279656800 10800 1 EEST}
-    {2297710800 7200 0 EET}
-    {2311106400 10800 1 EEST}
-    {2329160400 7200 0 EET}
-    {2342556000 10800 1 EEST}
-    {2360610000 7200 0 EET}
-    {2374610400 10800 1 EEST}
-    {2392664400 7200 0 EET}
-    {2406060000 10800 1 EEST}
-    {2424114000 7200 0 EET}
-    {2437509600 10800 1 EEST}
-    {2455563600 7200 0 EET}
-    {2468959200 10800 1 EEST}
-    {2487013200 7200 0 EET}
-    {2500408800 10800 1 EEST}
-    {2518462800 7200 0 EET}
-    {2531858400 10800 1 EEST}
-    {2549912400 7200 0 EET}
-    {2563912800 10800 1 EEST}
-    {2581966800 7200 0 EET}
-    {2595362400 10800 1 EEST}
-    {2613416400 7200 0 EET}
-    {2626812000 10800 1 EEST}
-    {2644866000 7200 0 EET}
-    {2658261600 10800 1 EEST}
-    {2676315600 7200 0 EET}
-    {2689711200 10800 1 EEST}
-    {2707765200 7200 0 EET}
-    {2721765600 10800 1 EEST}
-    {2739819600 7200 0 EET}
-    {2753215200 10800 1 EEST}
-    {2771269200 7200 0 EET}
-    {2784664800 10800 1 EEST}
-    {2802718800 7200 0 EET}
-    {2816114400 10800 1 EEST}
-    {2834168400 7200 0 EET}
-    {2847564000 10800 1 EEST}
-    {2865618000 7200 0 EET}
-    {2879013600 10800 1 EEST}
-    {2897067600 7200 0 EET}
-    {2911068000 10800 1 EEST}
-    {2929122000 7200 0 EET}
-    {2942517600 10800 1 EEST}
-    {2960571600 7200 0 EET}
-    {2973967200 10800 1 EEST}
-    {2992021200 7200 0 EET}
-    {3005416800 10800 1 EEST}
-    {3023470800 7200 0 EET}
-    {3036866400 10800 1 EEST}
-    {3054920400 7200 0 EET}
-    {3068316000 10800 1 EEST}
-    {3086370000 7200 0 EET}
-    {3100370400 10800 1 EEST}
-    {3118424400 7200 0 EET}
-    {3131820000 10800 1 EEST}
-    {3149874000 7200 0 EET}
-    {3163269600 10800 1 EEST}
-    {3181323600 7200 0 EET}
-    {3194719200 10800 1 EEST}
-    {3212773200 7200 0 EET}
-    {3226168800 10800 1 EEST}
-    {3244222800 7200 0 EET}
-    {3258223200 10800 1 EEST}
-    {3276277200 7200 0 EET}
-    {3289672800 10800 1 EEST}
-    {3307726800 7200 0 EET}
-    {3321122400 10800 1 EEST}
-    {3339176400 7200 0 EET}
-    {3352572000 10800 1 EEST}
-    {3370626000 7200 0 EET}
-    {3384021600 10800 1 EEST}
-    {3402075600 7200 0 EET}
-    {3415471200 10800 1 EEST}
-    {3433525200 7200 0 EET}
-    {3447525600 10800 1 EEST}
-    {3465579600 7200 0 EET}
-    {3478975200 10800 1 EEST}
-    {3497029200 7200 0 EET}
-    {3510424800 10800 1 EEST}
-    {3528478800 7200 0 EET}
-    {3541874400 10800 1 EEST}
-    {3559928400 7200 0 EET}
-    {3573324000 10800 1 EEST}
-    {3591378000 7200 0 EET}
-    {3605378400 10800 1 EEST}
-    {3623432400 7200 0 EET}
-    {3636828000 10800 1 EEST}
-    {3654882000 7200 0 EET}
-    {3668277600 10800 1 EEST}
-    {3686331600 7200 0 EET}
-    {3699727200 10800 1 EEST}
-    {3717781200 7200 0 EET}
-    {3731176800 10800 1 EEST}
-    {3749230800 7200 0 EET}
-    {3762626400 10800 1 EEST}
-    {3780680400 7200 0 EET}
-    {3794680800 10800 1 EEST}
-    {3812734800 7200 0 EET}
-    {3826130400 10800 1 EEST}
-    {3844184400 7200 0 EET}
-    {3857580000 10800 1 EEST}
-    {3875634000 7200 0 EET}
-    {3889029600 10800 1 EEST}
-    {3907083600 7200 0 EET}
-    {3920479200 10800 1 EEST}
-    {3938533200 7200 0 EET}
-    {3951928800 10800 1 EEST}
-    {3969982800 7200 0 EET}
-    {3983983200 10800 1 EEST}
-    {4002037200 7200 0 EET}
-    {4015432800 10800 1 EEST}
-    {4033486800 7200 0 EET}
-    {4046882400 10800 1 EEST}
-    {4064936400 7200 0 EET}
-    {4078332000 10800 1 EEST}
-    {4096386000 7200 0 EET}
+    {1411678800 7200 0 EET}
+    {1427407200 10800 1 EEST}
+    {1443128400 7200 0 EET}
+    {1459461600 10800 1 EEST}
+    {1474578000 7200 0 EET}
+    {1490911200 10800 1 EEST}
+    {1506027600 7200 0 EET}
+    {1522360800 10800 1 EEST}
+    {1537477200 7200 0 EET}
+    {1553810400 10800 1 EEST}
+    {1569531600 7200 0 EET}
+    {1585260000 10800 1 EEST}
+    {1600981200 7200 0 EET}
+    {1616709600 10800 1 EEST}
+    {1632430800 7200 0 EET}
+    {1648764000 10800 1 EEST}
+    {1663880400 7200 0 EET}
+    {1680213600 10800 1 EEST}
+    {1695330000 7200 0 EET}
+    {1711663200 10800 1 EEST}
+    {1727384400 7200 0 EET}
+    {1743112800 10800 1 EEST}
+    {1758834000 7200 0 EET}
+    {1774562400 10800 1 EEST}
+    {1790283600 7200 0 EET}
+    {1806012000 10800 1 EEST}
+    {1821733200 7200 0 EET}
+    {1838066400 10800 1 EEST}
+    {1853182800 7200 0 EET}
+    {1869516000 10800 1 EEST}
+    {1884632400 7200 0 EET}
+    {1900965600 10800 1 EEST}
+    {1916686800 7200 0 EET}
+    {1932415200 10800 1 EEST}
+    {1948136400 7200 0 EET}
+    {1963864800 10800 1 EEST}
+    {1979586000 7200 0 EET}
+    {1995919200 10800 1 EEST}
+    {2011035600 7200 0 EET}
+    {2027368800 10800 1 EEST}
+    {2042485200 7200 0 EET}
+    {2058818400 10800 1 EEST}
+    {2073934800 7200 0 EET}
+    {2090268000 10800 1 EEST}
+    {2105989200 7200 0 EET}
+    {2121717600 10800 1 EEST}
+    {2137438800 7200 0 EET}
+    {2153167200 10800 1 EEST}
+    {2168888400 7200 0 EET}
+    {2185221600 10800 1 EEST}
+    {2200338000 7200 0 EET}
+    {2216671200 10800 1 EEST}
+    {2231787600 7200 0 EET}
+    {2248120800 10800 1 EEST}
+    {2263842000 7200 0 EET}
+    {2279570400 10800 1 EEST}
+    {2295291600 7200 0 EET}
+    {2311020000 10800 1 EEST}
+    {2326741200 7200 0 EET}
+    {2343074400 10800 1 EEST}
+    {2358190800 7200 0 EET}
+    {2374524000 10800 1 EEST}
+    {2389640400 7200 0 EET}
+    {2405973600 10800 1 EEST}
+    {2421090000 7200 0 EET}
+    {2437423200 10800 1 EEST}
+    {2453144400 7200 0 EET}
+    {2468872800 10800 1 EEST}
+    {2484594000 7200 0 EET}
+    {2500322400 10800 1 EEST}
+    {2516043600 7200 0 EET}
+    {2532376800 10800 1 EEST}
+    {2547493200 7200 0 EET}
+    {2563826400 10800 1 EEST}
+    {2578942800 7200 0 EET}
+    {2595276000 10800 1 EEST}
+    {2610997200 7200 0 EET}
+    {2626725600 10800 1 EEST}
+    {2642446800 7200 0 EET}
+    {2658175200 10800 1 EEST}
+    {2673896400 7200 0 EET}
+    {2689624800 10800 1 EEST}
+    {2705346000 7200 0 EET}
+    {2721679200 10800 1 EEST}
+    {2736795600 7200 0 EET}
+    {2753128800 10800 1 EEST}
+    {2768245200 7200 0 EET}
+    {2784578400 10800 1 EEST}
+    {2800299600 7200 0 EET}
+    {2816028000 10800 1 EEST}
+    {2831749200 7200 0 EET}
+    {2847477600 10800 1 EEST}
+    {2863198800 7200 0 EET}
+    {2879532000 10800 1 EEST}
+    {2894648400 7200 0 EET}
+    {2910981600 10800 1 EEST}
+    {2926098000 7200 0 EET}
+    {2942431200 10800 1 EEST}
+    {2957547600 7200 0 EET}
+    {2973880800 10800 1 EEST}
+    {2989602000 7200 0 EET}
+    {3005330400 10800 1 EEST}
+    {3021051600 7200 0 EET}
+    {3036780000 10800 1 EEST}
+    {3052501200 7200 0 EET}
+    {3068834400 10800 1 EEST}
+    {3083950800 7200 0 EET}
+    {3100284000 10800 1 EEST}
+    {3115400400 7200 0 EET}
+    {3131733600 10800 1 EEST}
+    {3147454800 7200 0 EET}
+    {3163183200 10800 1 EEST}
+    {3178904400 7200 0 EET}
+    {3194632800 10800 1 EEST}
+    {3210354000 7200 0 EET}
+    {3226687200 10800 1 EEST}
+    {3241803600 7200 0 EET}
+    {3258136800 10800 1 EEST}
+    {3273253200 7200 0 EET}
+    {3289586400 10800 1 EEST}
+    {3304702800 7200 0 EET}
+    {3321036000 10800 1 EEST}
+    {3336757200 7200 0 EET}
+    {3352485600 10800 1 EEST}
+    {3368206800 7200 0 EET}
+    {3383935200 10800 1 EEST}
+    {3399656400 7200 0 EET}
+    {3415989600 10800 1 EEST}
+    {3431106000 7200 0 EET}
+    {3447439200 10800 1 EEST}
+    {3462555600 7200 0 EET}
+    {3478888800 10800 1 EEST}
+    {3494610000 7200 0 EET}
+    {3510338400 10800 1 EEST}
+    {3526059600 7200 0 EET}
+    {3541788000 10800 1 EEST}
+    {3557509200 7200 0 EET}
+    {3573237600 10800 1 EEST}
+    {3588958800 7200 0 EET}
+    {3605292000 10800 1 EEST}
+    {3620408400 7200 0 EET}
+    {3636741600 10800 1 EEST}
+    {3651858000 7200 0 EET}
+    {3668191200 10800 1 EEST}
+    {3683912400 7200 0 EET}
+    {3699640800 10800 1 EEST}
+    {3715362000 7200 0 EET}
+    {3731090400 10800 1 EEST}
+    {3746811600 7200 0 EET}
+    {3763144800 10800 1 EEST}
+    {3778261200 7200 0 EET}
+    {3794594400 10800 1 EEST}
+    {3809710800 7200 0 EET}
+    {3826044000 10800 1 EEST}
+    {3841160400 7200 0 EET}
+    {3857493600 10800 1 EEST}
+    {3873214800 7200 0 EET}
+    {3888943200 10800 1 EEST}
+    {3904664400 7200 0 EET}
+    {3920392800 10800 1 EEST}
+    {3936114000 7200 0 EET}
+    {3952447200 10800 1 EEST}
+    {3967563600 7200 0 EET}
+    {3983896800 10800 1 EEST}
+    {3999013200 7200 0 EET}
+    {4015346400 10800 1 EEST}
+    {4031067600 7200 0 EET}
+    {4046796000 10800 1 EEST}
+    {4062517200 7200 0 EET}
+    {4078245600 10800 1 EEST}
+    {4093966800 7200 0 EET}
 }
@@ -103,175 +103,175 @@ set TZData(:Asia/Hebron) {
    {1364508000 10800 1 EEST}
    {1380229200 7200 0 EET}
    {1395957600 10800 1 EEST}
-    {1414098000 7200 0 EET}
-    {1427493600 10800 1 EEST}
-    {1445547600 7200 0 EET}
-    {1458943200 10800 1 EEST}
-    {1476997200 7200 0 EET}
-    {1490997600 10800 1 EEST}
-    {1509051600 7200 0 EET}
-    {1522447200 10800 1 EEST}
-    {1540501200 7200 0 EET}
-    {1553896800 10800 1 EEST}
-    {1571950800 7200 0 EET}
-    {1585346400 10800 1 EEST}
-    {1603400400 7200 0 EET}
-    {1616796000 10800 1 EEST}
-    {1634850000 7200 0 EET}
-    {1648245600 10800 1 EEST}
-    {1666299600 7200 0 EET}
-    {1680300000 10800 1 EEST}
-    {1698354000 7200 0 EET}
-    {1711749600 10800 1 EEST}
-    {1729803600 7200 0 EET}
-    {1743199200 10800 1 EEST}
-    {1761253200 7200 0 EET}
-    {1774648800 10800 1 EEST}
-    {1792702800 7200 0 EET}
-    {1806098400 10800 1 EEST}
-    {1824152400 7200 0 EET}
-    {1838152800 10800 1 EEST}
-    {1856206800 7200 0 EET}
-    {1869602400 10800 1 EEST}
-    {1887656400 7200 0 EET}
-    {1901052000 10800 1 EEST}
-    {1919106000 7200 0 EET}
-    {1932501600 10800 1 EEST}
-    {1950555600 7200 0 EET}
-    {1963951200 10800 1 EEST}
-    {1982005200 7200 0 EET}
-    {1995400800 10800 1 EEST}
-    {2013454800 7200 0 EET}
-    {2027455200 10800 1 EEST}
-    {2045509200 7200 0 EET}
-    {2058904800 10800 1 EEST}
-    {2076958800 7200 0 EET}
-    {2090354400 10800 1 EEST}
-    {2108408400 7200 0 EET}
-    {2121804000 10800 1 EEST}
-    {2139858000 7200 0 EET}
-    {2153253600 10800 1 EEST}
-    {2171307600 7200 0 EET}
-    {2184703200 10800 1 EEST}
-    {2202757200 7200 0 EET}
-    {2216757600 10800 1 EEST}
-    {2234811600 7200 0 EET}
-    {2248207200 10800 1 EEST}
-    {2266261200 7200 0 EET}
-    {2279656800 10800 1 EEST}
-    {2297710800 7200 0 EET}
-    {2311106400 10800 1 EEST}
-    {2329160400 7200 0 EET}
-    {2342556000 10800 1 EEST}
-    {2360610000 7200 0 EET}
-    {2374610400 10800 1 EEST}
-    {2392664400 7200 0 EET}
-    {2406060000 10800 1 EEST}
-    {2424114000 7200 0 EET}
-    {2437509600 10800 1 EEST}
-    {2455563600 7200 0 EET}
-    {2468959200 10800 1 EEST}
-    {2487013200 7200 0 EET}
-    {2500408800 10800 1 EEST}
-    {2518462800 7200 0 EET}
-    {2531858400 10800 1 EEST}
-    {2549912400 7200 0 EET}
-    {2563912800 10800 1 EEST}
-    {2581966800 7200 0 EET}
-    {2595362400 10800 1 EEST}
-    {2613416400 7200 0 EET}
-    {2626812000 10800 1 EEST}
-    {2644866000 7200 0 EET}
-    {2658261600 10800 1 EEST}
-    {2676315600 7200 0 EET}
-    {2689711200 10800 1 EEST}
-    {2707765200 7200 0 EET}
-    {2721765600 10800 1 EEST}
-    {2739819600 7200 0 EET}
-    {2753215200 10800 1 EEST}
-    {2771269200 7200 0 EET}
-    {2784664800 10800 1 EEST}
-    {2802718800 7200 0 EET}
-    {2816114400 10800 1 EEST}
-    {2834168400 7200 0 EET}
-    {2847564000 10800 1 EEST}
-    {2865618000 7200 0 EET}
-    {2879013600 10800 1 EEST}
-    {2897067600 7200 0 EET}
-    {2911068000 10800 1 EEST}
-    {2929122000 7200 0 EET}
-    {2942517600 10800 1 EEST}
-    {2960571600 7200 0 EET}
-    {2973967200 10800 1 EEST}
-    {2992021200 7200 0 EET}
-    {3005416800 10800 1 EEST}
-    {3023470800 7200 0 EET}
-    {3036866400 10800 1 EEST}
-    {3054920400 7200 0 EET}
-    {3068316000 10800 1 EEST}
-    {3086370000 7200 0 EET}
-    {3100370400 10800 1 EEST}
-    {3118424400 7200 0 EET}
-    {3131820000 10800 1 EEST}
-    {3149874000 7200 0 EET}
-    {3163269600 10800 1 EEST}
-    {3181323600 7200 0 EET}
-    {3194719200 10800 1 EEST}
-    {3212773200 7200 0 EET}
-    {3226168800 10800 1 EEST}
-    {3244222800 7200 0 EET}
-    {3258223200 10800 1 EEST}
-    {3276277200 7200 0 EET}
-    {3289672800 10800 1 EEST}
-    {3307726800 7200 0 EET}
-    {3321122400 10800 1 EEST}
-    {3339176400 7200 0 EET}
-    {3352572000 10800 1 EEST}
-    {3370626000 7200 0 EET}
-    {3384021600 10800 1 EEST}
-    {3402075600 7200 0 EET}
-    {3415471200 10800 1 EEST}
-    {3433525200 7200 0 EET}
-    {3447525600 10800 1 EEST}
-    {3465579600 7200 0 EET}
-    {3478975200 10800 1 EEST}
-    {3497029200 7200 0 EET}
-    {3510424800 10800 1 EEST}
-    {3528478800 7200 0 EET}
-    {3541874400 10800 1 EEST}
-    {3559928400 7200 0 EET}
-    {3573324000 10800 1 EEST}
-    {3591378000 7200 0 EET}
-    {3605378400 10800 1 EEST}
-    {3623432400 7200 0 EET}
-    {3636828000 10800 1 EEST}
-    {3654882000 7200 0 EET}
-    {3668277600 10800 1 EEST}
-    {3686331600 7200 0 EET}
-    {3699727200 10800 1 EEST}
-    {3717781200 7200 0 EET}
-    {3731176800 10800 1 EEST}
-    {3749230800 7200 0 EET}
-    {3762626400 10800 1 EEST}
-    {3780680400 7200 0 EET}
-    {3794680800 10800 1 EEST}
-    {3812734800 7200 0 EET}
-    {3826130400 10800 1 EEST}
-    {3844184400 7200 0 EET}
-    {3857580000 10800 1 EEST}
-    {3875634000 7200 0 EET}
-    {3889029600 10800 1 EEST}
-    {3907083600 7200 0 EET}
-    {3920479200 10800 1 EEST}
-    {3938533200 7200 0 EET}
-    {3951928800 10800 1 EEST}
-    {3969982800 7200 0 EET}
-    {3983983200 10800 1 EEST}
-    {4002037200 7200 0 EET}
-    {4015432800 10800 1 EEST}
-    {4033486800 7200 0 EET}
-    {4046882400 10800 1 EEST}
-    {4064936400 7200 0 EET}
-    {4078332000 10800 1 EEST}
-    {4096386000 7200 0 EET}
+    {1411678800 7200 0 EET}
+    {1427407200 10800 1 EEST}
+    {1443128400 7200 0 EET}
+    {1459461600 10800 1 EEST}
+    {1474578000 7200 0 EET}
+    {1490911200 10800 1 EEST}
+    {1506027600 7200 0 EET}
+    {1522360800 10800 1 EEST}
+    {1537477200 7200 0 EET}
+    {1553810400 10800 1 EEST}
+    {1569531600 7200 0 EET}
+    {1585260000 10800 1 EEST}
+    {1600981200 7200 0 EET}
+    {1616709600 10800 1 EEST}
+    {1632430800 7200 0 EET}
+    {1648764000 10800 1 EEST}
+    {1663880400 7200 0 EET}
+    {1680213600 10800 1 EEST}
+    {1695330000 7200 0 EET}
+    {1711663200 10800 1 EEST}
+    {1727384400 7200 0 EET}
+    {1743112800 10800 1 EEST}
+    {1758834000 7200 0 EET}
+    {1774562400 10800 1 EEST}
+    {1790283600 7200 0 EET}
+    {1806012000 10800 1 EEST}
+    {1821733200 7200 0 EET}
+    {1838066400 10800 1 EEST}
+    {1853182800 7200 0 EET}
+    {1869516000 10800 1 EEST}
+    {1884632400 7200 0 EET}
+    {1900965600 10800 1 EEST}
+    {1916686800 7200 0 EET}
+    {1932415200 10800 1 EEST}
+    {1948136400 7200 0 EET}
+    {1963864800 10800 1 EEST}
+    {1979586000 7200 0 EET}
+    {1995919200 10800 1 EEST}
+    {2011035600 7200 0 EET}
+    {2027368800 10800 1 EEST}
+    {2042485200 7200 0 EET}
+    {2058818400 10800 1 EEST}
+    {2073934800 7200 0 EET}
+    {2090268000 10800 1 EEST}
+    {2105989200 7200 0 EET}
+    {2121717600 10800 1 EEST}
+    {2137438800 7200 0 EET}
+    {2153167200 10800 1 EEST}
+    {2168888400 7200 0 EET}
+    {2185221600 10800 1 EEST}
+    {2200338000 7200 0 EET}
+    {2216671200 10800 1 EEST}
+    {2231787600 7200 0 EET}
+    {2248120800 10800 1 EEST}
+    {2263842000 7200 0 EET}
+    {2279570400 10800 1 EEST}
+    {2295291600 7200 0 EET}
+    {2311020000 10800 1 EEST}
+    {2326741200 7200 0 EET}
+    {2343074400 10800 1 EEST}
+    {2358190800 7200 0 EET}
+    {2374524000 10800 1 EEST}
+    {2389640400 7200 0 EET}
+    {2405973600 10800 1 EEST}
+    {2421090000 7200 0 EET}
+    {2437423200 10800 1 EEST}
+    {2453144400 7200 0 EET}
+    {2468872800 10800 1 EEST}
+    {2484594000 7200 0 EET}
+    {2500322400 10800 1 EEST}
+    {2516043600 7200 0 EET}
+    {2532376800 10800 1 EEST}
+    {2547493200 7200 0 EET}
+    {2563826400 10800 1 EEST}
+    {2578942800 7200 0 EET}
+    {2595276000 10800 1 EEST}
+    {2610997200 7200 0 EET}
+    {2626725600 10800 1 EEST}
+    {2642446800 7200 0 EET}
+    {2658175200 10800 1 EEST}
+    {2673896400 7200 0 EET}
+    {2689624800 10800 1 EEST}
+    {2705346000 7200 0 EET}
+    {2721679200 10800 1 EEST}
+    {2736795600 7200 0 EET}
+    {2753128800 10800 1 EEST}
+    {2768245200 7200 0 EET}
+    {2784578400 10800 1 EEST}
+    {2800299600 7200 0 EET}
+    {2816028000 10800 1 EEST}
+    {2831749200 7200 0 EET}
+    {2847477600 10800 1 EEST}
+    {2863198800 7200 0 EET}
+    {2879532000 10800 1 EEST}
+    {2894648400 7200 0 EET}
+    {2910981600 10800 1 EEST}
+    {2926098000 7200 0 EET}
+    {2942431200 10800 1 EEST}
+    {2957547600 7200 0 EET}
+    {2973880800 10800 1 EEST}
+    {2989602000 7200 0 EET}
+    {3005330400 10800 1 EEST}
+    {3021051600 7200 0 EET}
+    {3036780000 10800 1 EEST}
+    {3052501200 7200 0 EET}
+    {3068834400 10800 1 EEST}
+    {3083950800 7200 0 EET}
+    {3100284000 10800 1 EEST}
+    {3115400400 7200 0 EET}
+    {3131733600 10800 1 EEST}
+    {3147454800 7200 0 EET}
+    {3163183200 10800 1 EEST}
+    {3178904400 7200 0 EET}
+    {3194632800 10800 1 EEST}
+    {3210354000 7200 0 EET}
+    {3226687200 10800 1 EEST}
+    {3241803600 7200 0 EET}
+    {3258136800 10800 1 EEST}
+    {3273253200 7200 0 EET}
+    {3289586400 10800 1 EEST}
+    {3304702800 7200 0 EET}
+    {3321036000 10800 1 EEST}
+    {3336757200 7200 0 EET}
+    {3352485600 10800 1 EEST}
+    {3368206800 7200 0 EET}
+    {3383935200 10800 1 EEST}
+    {3399656400 7200 0 EET}
+    {3415989600 10800 1 EEST}
+    {3431106000 7200 0 EET}
+    {3447439200 10800 1 EEST}
+    {3462555600 7200 0 EET}
+    {3478888800 10800 1 EEST}
+    {3494610000 7200 0 EET}
+    {3510338400 10800 1 EEST}
+    {3526059600 7200 0 EET}
+    {3541788000 10800 1 EEST}
+    {3557509200 7200 0 EET}
+    {3573237600 10800 1 EEST}
+    {3588958800 7200 0 EET}
+    {3605292000 10800 1 EEST}
+    {3620408400 7200 0 EET}
+    {3636741600 10800 1 EEST}
+    {3651858000 7200 0 EET}
+    {3668191200 10800 1 EEST}
+    {3683912400 7200 0 EET}
+    {3699640800 10800 1 EEST}
+    {3715362000 7200 0 EET}
+    {3731090400 10800 1 EEST}
+    {3746811600 7200 0 EET}
+    {3763144800 10800 1 EEST}
+    {3778261200 7200 0 EET}
+    {3794594400 10800 1 EEST}
+    {3809710800 7200 0 EET}
+    {3826044000 10800 1 EEST}
+    {3841160400 7200 0 EET}
+    {3857493600 10800 1 EEST}
+    {3873214800 7200 0 EET}
+    {3888943200 10800 1 EEST}
+    {3904664400 7200 0 EET}
+    {3920392800 10800 1 EEST}
+    {3936114000 7200 0 EET}
+    {3952447200 10800 1 EEST}
+    {3967563600 7200 0 EET}
+    {3983896800 10800 1 EEST}
+    {3999013200 7200 0 EET}
+    {4015346400 10800 1 EEST}
+    {4031067600 7200 0 EET}
+    {4046796000 10800 1 EEST}
+    {4062517200 7200 0 EET}
+    {4078245600 10800 1 EEST}
+    {4093966800 7200 0 EET}
 }
@@ -2,13 +2,8 @@

 set TZData(:Asia/Ho_Chi_Minh) {
    {-9223372036854775808 25600 0 LMT}
-    {-2004073600 25590 0 PLMT}
-    {-1851577590 25200 0 ICT}
-    {-852105600 28800 0 IDT}
-    {-782643600 32400 0 JST}
-    {-767869200 25200 0 ICT}
-    {-718095600 28800 0 IDT}
-    {-457776000 25200 0 ICT}
-    {-315648000 28800 0 IDT}
-    {171820800 25200 0 ICT}
+    {-2005974400 25580 0 SMT}
+    {-1855983920 25200 0 ICT}
+    {-1819954800 28800 0 ICT}
+    {-1220428800 25200 0 ICT}
 }
@@ -48,174 +48,4 @@ set TZData(:Asia/Hovd) {
    {1127498400 25200 0 HOVT}
    {1143226800 28800 1 HOVST}
    {1159552800 25200 0 HOVT}
-    {1427482800 28800 1 HOVST}
-    {1443196800 25200 0 HOVT}
-    {1458932400 28800 1 HOVST}
-    {1474646400 25200 0 HOVT}
-    {1490382000 28800 1 HOVST}
-    {1506700800 25200 0 HOVT}
-    {1522436400 28800 1 HOVST}
-    {1538150400 25200 0 HOVT}
-    {1553886000 28800 1 HOVST}
-    {1569600000 25200 0 HOVT}
-    {1585335600 28800 1 HOVST}
-    {1601049600 25200 0 HOVT}
-    {1616785200 28800 1 HOVST}
-    {1632499200 25200 0 HOVT}
-    {1648234800 28800 1 HOVST}
-    {1663948800 25200 0 HOVT}
-    {1679684400 28800 1 HOVST}
-    {1696003200 25200 0 HOVT}
-    {1711738800 28800 1 HOVST}
-    {1727452800 25200 0 HOVT}
-    {1743188400 28800 1 HOVST}
-    {1758902400 25200 0 HOVT}
-    {1774638000 28800 1 HOVST}
-    {1790352000 25200 0 HOVT}
-    {1806087600 28800 1 HOVST}
-    {1821801600 25200 0 HOVT}
-    {1837537200 28800 1 HOVST}
-    {1853856000 25200 0 HOVT}
-    {1869591600 28800 1 HOVST}
-    {1885305600 25200 0 HOVT}
-    {1901041200 28800 1 HOVST}
-    {1916755200 25200 0 HOVT}
-    {1932490800 28800 1 HOVST}
-    {1948204800 25200 0 HOVT}
-    {1963940400 28800 1 HOVST}
-    {1979654400 25200 0 HOVT}
-    {1995390000 28800 1 HOVST}
-    {2011104000 25200 0 HOVT}
-    {2026839600 28800 1 HOVST}
-    {2043158400 25200 0 HOVT}
-    {2058894000 28800 1 HOVST}
-    {2074608000 25200 0 HOVT}
-    {2090343600 28800 1 HOVST}
-    {2106057600 25200 0 HOVT}
-    {2121793200 28800 1 HOVST}
-    {2137507200 25200 0 HOVT}
-    {2153242800 28800 1 HOVST}
-    {2168956800 25200 0 HOVT}
-    {2184692400 28800 1 HOVST}
-    {2200406400 25200 0 HOVT}
-    {2216746800 28800 1 HOVST}
-    {2232460800 25200 0 HOVT}
-    {2248196400 28800 1 HOVST}
-    {2263910400 25200 0 HOVT}
-    {2279646000 28800 1 HOVST}
-    {2295360000 25200 0 HOVT}
-    {2311095600 28800 1 HOVST}
-    {2326809600 25200 0 HOVT}
-    {2342545200 28800 1 HOVST}
-    {2358259200 25200 0 HOVT}
-    {2373994800 28800 1 HOVST}
-    {2390313600 25200 0 HOVT}
-    {2406049200 28800 1 HOVST}
-    {2421763200 25200 0 HOVT}
-    {2437498800 28800 1 HOVST}
-    {2453212800 25200 0 HOVT}
-    {2468948400 28800 1 HOVST}
-    {2484662400 25200 0 HOVT}
-    {2500398000 28800 1 HOVST}
-    {2516112000 25200 0 HOVT}
-    {2531847600 28800 1 HOVST}
-    {2547561600 25200 0 HOVT}
-    {2563297200 28800 1 HOVST}
-    {2579616000 25200 0 HOVT}
-    {2595351600 28800 1 HOVST}
-    {2611065600 25200 0 HOVT}
-    {2626801200 28800 1 HOVST}
-    {2642515200 25200 0 HOVT}
-    {2658250800 28800 1 HOVST}
-    {2673964800 25200 0 HOVT}
-    {2689700400 28800 1 HOVST}
-    {2705414400 25200 0 HOVT}
-    {2721150000 28800 1 HOVST}
-    {2737468800 25200 0 HOVT}
-    {2753204400 28800 1 HOVST}
-    {2768918400 25200 0 HOVT}
-    {2784654000 28800 1 HOVST}
-    {2800368000 25200 0 HOVT}
-    {2816103600 28800 1 HOVST}
-    {2831817600 25200 0 HOVT}
-    {2847553200 28800 1 HOVST}
-    {2863267200 25200 0 HOVT}
-    {2879002800 28800 1 HOVST}
-    {2894716800 25200 0 HOVT}
-    {2910452400 28800 1 HOVST}
-    {2926771200 25200 0 HOVT}
-    {2942506800 28800 1 HOVST}
-    {2958220800 25200 0 HOVT}
-    {2973956400 28800 1 HOVST}
-    {2989670400 25200 0 HOVT}
-    {3005406000 28800 1 HOVST}
-    {3021120000 25200 0 HOVT}
-    {3036855600 28800 1 HOVST}
-    {3052569600 25200 0 HOVT}
-    {3068305200 28800 1 HOVST}
-    {3084019200 25200 0 HOVT}
-    {3100359600 28800 1 HOVST}
-    {3116073600 25200 0 HOVT}
-    {3131809200 28800 1 HOVST}
-    {3147523200 25200 0 HOVT}
-    {3163258800 28800 1 HOVST}
-    {3178972800 25200 0 HOVT}
-    {3194708400 28800 1 HOVST}
-    {3210422400 25200 0 HOVT}
-    {3226158000 28800 1 HOVST}
-    {3241872000 25200 0 HOVT}
-    {3257607600 28800 1 HOVST}
-    {3273926400 25200 0 HOVT}
-    {3289662000 28800 1 HOVST}
-    {3305376000 25200 0 HOVT}
-    {3321111600 28800 1 HOVST}
-    {3336825600 25200 0 HOVT}
-    {3352561200 28800 1 HOVST}
-    {3368275200 25200 0 HOVT}
-    {3384010800 28800 1 HOVST}
-    {3399724800 25200 0 HOVT}
-    {3415460400 28800 1 HOVST}
-    {3431174400 25200 0 HOVT}
-    {3446910000 28800 1 HOVST}
-    {3463228800 25200 0 HOVT}
-    {3478964400 28800 1 HOVST}
-    {3494678400 25200 0 HOVT}
-    {3510414000 28800 1 HOVST}
-    {3526128000 25200 0 HOVT}
-    {3541863600 28800 1 HOVST}
-    {3557577600 25200 0 HOVT}
-    {3573313200 28800 1 HOVST}
-    {3589027200 25200 0 HOVT}
-    {3604762800 28800 1 HOVST}
-    {3621081600 25200 0 HOVT}
-    {3636817200 28800 1 HOVST}
-    {3652531200 25200 0 HOVT}
-    {3668266800 28800 1 HOVST}
-    {3683980800 25200 0 HOVT}
-    {3699716400 28800 1 HOVST}
-    {3715430400 25200 0 HOVT}
-    {3731166000 28800 1 HOVST}
-    {3746880000 25200 0 HOVT}
-    {3762615600 28800 1 HOVST}
-    {3778329600 25200 0 HOVT}
-    {3794065200 28800 1 HOVST}
-    {3810384000 25200 0 HOVT}
-    {3826119600 28800 1 HOVST}
-    {3841833600 25200 0 HOVT}
-    {3857569200 28800 1 HOVST}
-    {3873283200 25200 0 HOVT}
-    {3889018800 28800 1 HOVST}
-    {3904732800 25200 0 HOVT}
-    {3920468400 28800 1 HOVST}
-    {3936182400 25200 0 HOVT}
-    {3951918000 28800 1 HOVST}
-    {3967632000 25200 0 HOVT}
-    {3983972400 28800 1 HOVST}
-    {3999686400 25200 0 HOVT}
-    {4015422000 28800 1 HOVST}
-    {4031136000 25200 0 HOVT}
-    {4046871600 28800 1 HOVST}
-    {4062585600 25200 0 HOVT}
-    {4078321200 28800 1 HOVST}
-    {4094035200 25200 0 HOVT}
 }
@@ -1,9 +1,9 @@
 # created by tools/tclZIC.tcl - do not edit

 set TZData(:Asia/Irkutsk) {
-    {-9223372036854775808 25025 0 LMT}
-    {-2840165825 25025 0 IMT}
-    {-1575874625 25200 0 IRKT}
+    {-9223372036854775808 25035 0 LMT}
+    {-2840165835 25035 0 IMT}
+    {-1575874635 25200 0 IRKT}
    {-1247554800 28800 0 IRKMMTT}
    {354902400 32400 1 IRKST}
    {370710000 28800 0 IRKT}
@@ -1,8 +1,8 @@
 # created by tools/tclZIC.tcl - do not edit

 set TZData(:Asia/Krasnoyarsk) {
-    {-9223372036854775808 22286 0 LMT}
-    {-1577513486 21600 0 KRAT}
+    {-9223372036854775808 22280 0 LMT}
+    {-1577513480 21600 0 KRAT}
    {-1247551200 25200 0 KRAMMTT}
    {354906000 28800 1 KRAST}
    {370713600 25200 0 KRAT}
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Asia/Riyadh)]} {
-    LoadTimeZoneFile Asia/Riyadh
+
+set TZData(:Asia/Kuwait) {
+    {-9223372036854775808 11516 0 LMT}
+    {-631163516 10800 0 AST}
 }
-set TZData(:Asia/Kuwait) $TZData(:Asia/Riyadh)
@@ -1,5 +1,6 @@
 # created by tools/tclZIC.tcl - do not edit
-if {![info exists TZData(Asia/Dubai)]} {
-    LoadTimeZoneFile Asia/Dubai
+
+set TZData(:Asia/Muscat) {
+    {-9223372036854775808 14064 0 LMT}
+    {-1577937264 14400 0 GST}
 }
-set TZData(:Asia/Muscat) $TZData(:Asia/Dubai)
@@ -1,8 +1,8 @@
 # created by tools/tclZIC.tcl - do not edit

 set TZData(:Asia/Novokuznetsk) {
-    {-9223372036854775808 20928 0 LMT}
-    {-1441259328 21600 0 KRAT}
+    {-9223372036854775808 20928 0 NMT}
+    {-1577512128 21600 0 KRAT}
    {-1247551200 25200 0 KRAMMTT}
    {354906000 28800 1 KRAST}
    {370713600 25200 0 KRAT}
@@ -1,8 +1,8 @@
 # created by tools/tclZIC.tcl - do not edit

 set TZData(:Asia/Omsk) {
-    {-9223372036854775808 17610 0 LMT}
-    {-1582088010 18000 0 OMST}
+    {-9223372036854775808 17616 0 LMT}
+    {-1582088016 18000 0 OMST}
    {-1247547600 21600 0 OMSMMTT}
    {354909600 25200 1 OMSST}
    {370717200 21600 0 OMST}
--- a/Show More
+++ b/Show More
Author	SHA1	Message	Date
dgp	833543d544	merge 8.5	2014-10-17 20:38:25 +00:00
dgp	4de4ab73a2	Revert the Tcl_GetsObj portion of the last commit. Although it fixed the bug demonstrated by the test io-33.12, it caused new breakage in [gets] not yet understood. Test io-33.12 left in place to prompt further work.	2014-10-17 20:37:45 +00:00
dgp	c09e8bc51f	[10dc6daa37] [gets] on a non-blocking channel must take care so that 1) At least one call to the channel driver input proc gets made. Failure to do this locks up the channel - catastrophic FAIL. 2) After any driver call reports BLOCKED, don't call again. This is less serious, but FAILs to respect the non-blocking setting. Code corrections and tests included, to restore 8.6.1 compat.	2014-10-17 15:30:21 +00:00