diff options
Diffstat (limited to 'test/lock_common.tcl')
| -rw-r--r-- | test/lock_common.tcl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/test/lock_common.tcl b/test/lock_common.tcl index 3e1821bab..9504a8c04 100644 --- a/test/lock_common.tcl +++ b/test/lock_common.tcl @@ -145,6 +145,7 @@ proc testfixture_nb_cb {varname chan} { } if { $line == "OVER" } { + global $varname set $varname [lindex $::tfnb($chan) 1] unset ::tfnb($chan) close $chan |