diff options
| author | nijtmans <nijtmans> | 2010-07-01 21:28:15 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2010-07-01 21:28:15 (GMT) |
| commit | abb430245e8a99364bb0ddbca7f85c8adb62d36f (patch) | |
| tree | 6504f41b881faedff35589b0b480a44e4042fb92 /tools/tsdPerf.tcl | |
| parent | e10b292750a32db464a69efbd938795b6f2c8d52 (diff) | |
| download | tcl-abb430245e8a99364bb0ddbca7f85c8adb62d36f.zip tcl-abb430245e8a99364bb0ddbca7f85c8adb62d36f.tar.gz tcl-abb430245e8a99364bb0ddbca7f85c8adb62d36f.tar.bz2 | |
[Bug #3020677] wish can't link reg1.2
formatting, spacing, cleanup unused variables
Diffstat (limited to 'tools/tsdPerf.tcl')
| -rw-r--r-- | tools/tsdPerf.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tools/tsdPerf.tcl b/tools/tsdPerf.tcl index f2cc6d6..360ca9c 100644 --- a/tools/tsdPerf.tcl +++ b/tools/tsdPerf.tcl @@ -6,7 +6,7 @@ for {set i 0} {$i < 4} {incr i} { lappend ::tids [thread::create [string map [list IVALUE $i] { set curdir [file dirname [info script]] load [file join $curdir tsdPerf[info sharedlibextension]] - + while 1 { tsdPerfSet IVALUE } |