diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-18 07:50:19 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-18 07:50:19 (GMT) |
| commit | 76df95e6e49c926b2b3f71f8b740221e897a7643 (patch) | |
| tree | 780a58306503cc1309cf5051bd9f8506aa586400 /tools | |
| parent | 6a445a3fe6adfa02cd82df0fa30d3118b4032441 (diff) | |
| parent | 7243b34d8035e8705d690339b6005161c9edbd8d (diff) | |
| download | tcl-76df95e6e49c926b2b3f71f8b740221e897a7643.zip tcl-76df95e6e49c926b2b3f71f8b740221e897a7643.tar.gz tcl-76df95e6e49c926b2b3f71f8b740221e897a7643.tar.bz2 | |
Fix uniClass tool which was the real cause for [a876646efe], and add test-case for it.
Diffstat (limited to 'tools')
| -rw-r--r-- | tools/uniClass.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tools/uniClass.tcl b/tools/uniClass.tcl index 32b40e9..9b4819d 100644 --- a/tools/uniClass.tcl +++ b/tools/uniClass.tcl @@ -72,7 +72,7 @@ proc genTable {type} { if {$i == ($last + 1)} { set last $i } else { - if {$first > 0} { + if {$first >= 0} { emitRange $first $last } set first $i |