eliminate duplicate test names

2 files changed, 4 insertions, 4 deletions

diff --git a/tests/cmdIL.test b/tests/cmdIL.test
index 7bddb26..1f2cf73 100644
--- a/tests/cmdIL.test
+++ b/tests/cmdIL.test
@@ -8,7 +8,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: cmdIL.test,v 1.37 2008/01/22 11:38:34 msofer Exp $
+# RCS: @(#) $Id: cmdIL.test,v 1.38 2008/02/13 19:41:20 dgp Exp $
 
 if {[lsearch [namespace children] ::tcltest] == -1} {
     package require tcltest 2
@@ -755,7 +755,7 @@ test cmdIL-7.7 {lreverse command - empty object [Bug 1876793]} {
 } {}
 
 testConstraint testobj [llength [info commands testobj]]
-test cmdIL-7.7 {lreverse command - shared intrep [Bug 1675044]} -setup {
+test cmdIL-7.8 {lreverse command - shared intrep [Bug 1675044]} -setup {
     teststringobj set 1 {1 2 3}
     testobj convert 1 list
     testobj duplicate 1 2
diff --git a/tests/regexpComp.test b/tests/regexpComp.test
index c104a69..0278033 100644
--- a/tests/regexpComp.test
+++ b/tests/regexpComp.test
@@ -802,13 +802,13 @@ test regexpComp-21.11 {regexp command compiling tests} {
     }
 } {0 {}}
 
-test regexpComp-22.1 {Bug 1810038} {
+test regexpComp-22.0.1 {Bug 1810038} {
     evalInProc {
 	regexp ($|^X)* {}
     }
 } 1
 
-test regexpComp-22.2 {regexp compile and backrefs, Bug 1857126} {
+test regexpComp-22.0.2 {regexp compile and backrefs, Bug 1857126} {
     evalInProc {
 	regexp -- {([bc])\1} bb
     }