diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-11-24 11:57:07 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-11-24 11:57:07 (GMT) |
commit | 2290210ff1e4282f665fd6b6dfaf4142220f5559 (patch) | |
tree | b9febc0881a58eee6a89d5510caaed05af60b537 /tests | |
parent | 53f3b03647b0cc4baaac0fea20bcbf36f3a06702 (diff) | |
parent | c8d9ab8790cf3ce9e8a7ef9bc1593d7ad97a94cc (diff) | |
download | tcl-2290210ff1e4282f665fd6b6dfaf4142220f5559.zip tcl-2290210ff1e4282f665fd6b6dfaf4142220f5559.tar.gz tcl-2290210ff1e4282f665fd6b6dfaf4142220f5559.tar.bz2 |
merge trunk.
Make epoch in Tcl_DictSearch "unsigned int". This doubles the epoch range here. Use 0 as special value in stead of -1 (so start counting epoch's with 1).
Diffstat (limited to 'tests')
-rw-r--r-- | tests/tm.test | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/tests/tm.test b/tests/tm.test index dac7e5c..567d351 100644 --- a/tests/tm.test +++ b/tests/tm.test @@ -202,11 +202,6 @@ proc genpaths {base} { set base [file normalize $base] lassign [split [package present Tcl] .] major minor set results {} - set base8 [file join $base tcl8] - lappend results [file join $base8 site-tcl] - for {set i 0} {$i <= 7} {incr i} { - lappend results [file join $base8 8.$i] - } set base [file join $base tcl$major] lappend results [file join $base site-tcl] for {set i 0} {$i <= $minor} {incr i} { |