diff options
author | dkf <donal.k.fellows@manchester.ac.uk> | 2010-02-07 08:03:11 (GMT) |
---|---|---|
committer | dkf <donal.k.fellows@manchester.ac.uk> | 2010-02-07 08:03:11 (GMT) |
commit | 307233f5f049dea251e0d858e301565c0ed88117 (patch) | |
tree | dab6cc90697541cd9172baa487925dcaf63bfa25 /tests/io.test | |
parent | a7d5e487cdc90cf70ddff97143b7357800b9388d (diff) | |
download | tcl-307233f5f049dea251e0d858e301565c0ed88117.zip tcl-307233f5f049dea251e0d858e301565c0ed88117.tar.gz tcl-307233f5f049dea251e0d858e301565c0ed88117.tar.bz2 |
Fix tests with known dependencies on hash iteration order.
Diffstat (limited to 'tests/io.test')
-rw-r--r-- | tests/io.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/io.test b/tests/io.test index 2b08454..c69bff9 100644 --- a/tests/io.test +++ b/tests/io.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: io.test,v 1.95 2009/11/20 00:19:46 dgp Exp $ +# RCS: @(#) $Id: io.test,v 1.96 2010/02/07 08:03:11 dkf Exp $ if {[catch {package require tcltest 2}]} { puts stderr "Skipping tests in [info script]. tcltest 2 required." @@ -2222,7 +2222,7 @@ test io-28.5 {Tcl_Close vs standard handles} {stdio unix testchannel openpipe} { set f [open "|[list [interpreter] $path(script)]" r] set l [gets $f] close $f - set l + lsort $l } {file1 file2} test io-29.1 {Tcl_WriteChars, channel not writable} { |