diff options
| author | Kevin B Kenny <kennykb@acm.org> | 2005-11-28 16:28:04 (GMT) |
|---|---|---|
| committer | Kevin B Kenny <kennykb@acm.org> | 2005-11-28 16:28:04 (GMT) |
| commit | fa6db0334f465c0620416816afc6a8f1a52b7d00 (patch) | |
| tree | 0cc359552aa2f496faa9e87f55c4dddfada8bfba /tools | |
| parent | 1f2642848c07487ab88ff382fe7a9a1031a98c29 (diff) | |
| download | tcl-fa6db0334f465c0620416816afc6a8f1a52b7d00.zip tcl-fa6db0334f465c0620416816afc6a8f1a52b7d00.tar.gz tcl-fa6db0334f465c0620416816afc6a8f1a52b7d00.tar.bz2 | |
Updated tclZIC.tcl to be bignum-safe
Diffstat (limited to 'tools')
| -rwxr-xr-x | tools/tclZIC.tcl | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/tools/tclZIC.tcl b/tools/tclZIC.tcl index 5595264..9253686 100755 --- a/tools/tclZIC.tcl +++ b/tools/tclZIC.tcl @@ -29,7 +29,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: tclZIC.tcl,v 1.6 2005/11/28 15:37:20 kennykb Exp $ +# RCS: @(#) $Id: tclZIC.tcl,v 1.7 2005/11/28 16:28:04 kennykb Exp $ # #---------------------------------------------------------------------- @@ -44,10 +44,6 @@ set olsonFiles { pacificnew southamerica systemv } -# Temporary scaffolding - load up the new 'clock' package. - -source [file join [file dirname [info script]] .. library clock.tcl] - # Define the year at which the DST information will stop. set maxyear 2100 @@ -56,7 +52,7 @@ set maxyear 2100 set MAXWIDE [expr {wide(1)}] while 1 { - set next [expr {$MAXWIDE + $MAXWIDE + 1}] + set next [expr {wide($MAXWIDE + $MAXWIDE + 1)}] if {$next < 0} { break } @@ -1335,6 +1331,9 @@ proc writeLinks {outDir} { # #---------------------------------------------------------------------- +puts "Compiling time zones -- [clock format [clock seconds] \ + -format {%x %X} -locale system]" + # Determine directories lassign $argv inDir outDir |