diff options
author | hobbs <hobbs@noemail.net> | 2000-05-26 08:50:34 (GMT) |
---|---|---|
committer | hobbs <hobbs@noemail.net> | 2000-05-26 08:50:34 (GMT) |
commit | 94e66653a44d629ea7bddf177482e70bb5d05f5d (patch) | |
tree | cc0e8e165a9746508d977aa0c8c5d9bb71a4f55b /tests/binary.test | |
parent | 85fd0446b9426ead9ffe69d0fa323c47a70fa826 (diff) | |
download | tcl-94e66653a44d629ea7bddf177482e70bb5d05f5d.zip tcl-94e66653a44d629ea7bddf177482e70bb5d05f5d.tar.gz tcl-94e66653a44d629ea7bddf177482e70bb5d05f5d.tar.bz2 |
* tests/string.test: added string map tests for the one-pair case,
corrected tests to reflect improved error messages in first/last.
Added tests against mem overrun in string index bytearray case.
FossilOrigin-Name: 446f8b2bdeb17bd7611bc850f3fb3ea434f20d06
Diffstat (limited to 'tests/binary.test')
-rw-r--r-- | tests/binary.test | 15 |
1 files changed, 1 insertions, 14 deletions
diff --git a/tests/binary.test b/tests/binary.test index 07790a2..6e8b64a 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.7 2000/04/10 17:18:57 ericm Exp $ +# RCS: @(#) $Id: binary.test,v 1.8 2000/05/26 08:50:34 hobbs Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest @@ -42,7 +42,6 @@ test binary-1.4 {Tcl_BinaryObjCmd: format} { } {} - test binary-2.1 {Tcl_BinaryObjCmd: format} { list [catch {binary format a } msg] $msg } {1 {not enough arguments for all format specifiers}} @@ -1464,15 +1463,3 @@ test binary-42.1 {Tcl_BinaryObjCmd: bad arguments} {} { # cleanup ::tcltest::cleanupTests return - - - - - - - - - - - - |