diff options
author | dgp <dgp@users.sourceforge.net> | 2008-06-20 16:49:09 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2008-06-20 16:49:09 (GMT) |
commit | 0cc32b6dffd4788b282213175da265ad8d8edd2b (patch) | |
tree | 53a8e17f8bc4ddf150545db5ca7598965a6bb92e /tests/binary.test | |
parent | e7043db7ef76cb0f0ff1cad93f68788000644560 (diff) | |
download | tcl-0cc32b6dffd4788b282213175da265ad8d8edd2b.zip tcl-0cc32b6dffd4788b282213175da265ad8d8edd2b.tar.gz tcl-0cc32b6dffd4788b282213175da265ad8d8edd2b.tar.bz2 |
* tests/binary.test: Corrected flawed tests revealed by a -debug 1
* tests/io.test: -singleproc 1 test suite run.
Diffstat (limited to 'tests/binary.test')
-rw-r--r-- | tests/binary.test | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/tests/binary.test b/tests/binary.test index d06907e..ed447f9 100644 --- a/tests/binary.test +++ b/tests/binary.test @@ -10,7 +10,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: binary.test,v 1.11.2.5 2008/03/24 03:05:07 patthoyts Exp $ +# RCS: @(#) $Id: binary.test,v 1.11.2.6 2008/06/20 16:49:10 dgp Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest @@ -555,12 +555,6 @@ test binary-15.5 {Tcl_BinaryObjCmd: format - bug #1923966} { test binary-15.6 {Tcl_BinaryObjCmd: format - bug #1923966} { binary format x0ss 1 1 } \x01\x00\x01\x00 -test binary-15.5 {Tcl_BinaryObjCmd: format - bug #1923966} { - binary format x0s 1 -} \x01\x00 -test binary-15.6 {Tcl_BinaryObjCmd: format - bug #1923966} { - binary format x0ss 1 1 -} \x01\x00\x01\x00 test binary-15.7 {Tcl_BinaryObjCmd: format - bug #1923966} { binary format x1s 1 } \x00\x01\x00 |