Correct typos that produced duplicate test names

1 files changed, 5 insertions, 5 deletions

diff --git a/tests/binary.test b/tests/binary.test
index 9395140..023cc74 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.29 2006/10/06 13:37:21 patthoyts Exp $
+# RCS: @(#) $Id: binary.test,v 1.30 2006/11/29 13:59:32 dgp Exp $
 
 if {[lsearch [namespace children] ::tcltest] == -1} {
     package require tcltest
@@ -1912,13 +1912,13 @@ test binary-54.9 {Tcl_BinaryObjCmd: scan} littleEndian {
     set arg2 bar
     list [binary scan \x52\xa3\x53\x54\x05 t2c* arg1 arg2] $arg1 $arg2
 } {2 {-23726 21587} 5}
-test binary-55.10 {Tcl_BinaryObjCmd: scan} littleEndian  {
+test binary-54.10 {Tcl_BinaryObjCmd: scan} littleEndian  {
     catch {unset arg1 arg2}
     set arg1 foo
     set arg2 bar
     list [binary scan \x00\x80\x00\x80 tut arg1 arg2] $arg1 $arg2
 } {2 32768 -32768}
-test binary-55.11 {Tcl_BinaryObjCmd: scan} littleEndian  {
+test binary-54.11 {Tcl_BinaryObjCmd: scan} littleEndian  {
     catch {unset arg1 arg2}
     set arg1 foo
     set arg2 bar
@@ -2018,13 +2018,13 @@ test binary-56.9 {Tcl_BinaryObjCmd: scan} littleEndian  {
     set arg2 bar
     list [binary scan \x52\xa3\x53\x54\x01\x02\x03\x04\x05 n2c* arg1 arg2] $arg1 $arg2
 } {2 {1414767442 67305985} 5}
-test binary-57.10 {Tcl_BinaryObjCmd: scan} littleEndian  {
+test binary-56.10 {Tcl_BinaryObjCmd: scan} littleEndian  {
     catch {unset arg1 arg2}
     set arg1 foo
     set arg2 bar
     list [binary scan \x80\x00\x00\x00\x80\x00\x00\x00 nun arg1 arg2] $arg1 $arg2
 } {2 128 128}
-test binary-57.11 {Tcl_BinaryObjCmd: scan} littleEndian  {
+test binary-56.11 {Tcl_BinaryObjCmd: scan} littleEndian  {
     catch {unset arg1 arg2}
     set arg1 foo
     set arg2 bar