diff options
author | das <das> | 2008-06-12 09:46:52 (GMT) |
---|---|---|
committer | das <das> | 2008-06-12 09:46:52 (GMT) |
commit | 8e70eee26cbb5098f9435c899f6c0948a6b776d9 (patch) | |
tree | 9c52aaaf8e6dcc40fa508d6c4abefbbaa315625e /tests/chanio.test | |
parent | 3d19400488d879abbac6dcb86335f0f6abb6f8aa (diff) | |
download | tcl-8e70eee26cbb5098f9435c899f6c0948a6b776d9.zip tcl-8e70eee26cbb5098f9435c899f6c0948a6b776d9.tar.gz tcl-8e70eee26cbb5098f9435c899f6c0948a6b776d9.tar.bz2 |
sync with 2008-05-26 io-53.9 change
Diffstat (limited to 'tests/chanio.test')
-rw-r--r-- | tests/chanio.test | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/chanio.test b/tests/chanio.test index 6e44c38..14a1554 100644 --- a/tests/chanio.test +++ b/tests/chanio.test @@ -13,7 +13,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: chanio.test,v 1.13 2008/05/23 21:00:45 andreas_kupries Exp $ +# RCS: @(#) $Id: chanio.test,v 1.14 2008/06/12 09:46:52 das Exp $ if {[catch {package require tcltest 2}]} { chan puts stderr "Skipping tests in [info script]. tcltest 2 required." @@ -7057,6 +7057,7 @@ test chan-io-53.9 {CopyData: -size and event interaction, Bug 780533} -setup { rename ::done {} after 1000; # Allow Windows time to figure out that the # process is gone + catch {close $out} catch {removeFile out} catch {removeFile err} catch {unset ::forever} |