Don't use [pid] in tests, stick to constant literals.

2 files changed, 6 insertions, 6 deletions

diff --git a/tests/string.test b/tests/string.test
index 54d02e8..3611753 100644
--- a/tests/string.test
+++ b/tests/string.test
@@ -1973,15 +1973,15 @@ test string-29.1 {string cat, no arg} {
     string cat
 } ""
 test string-29.2 {string cat, single arg} {
-    set x [pid]
+    set x FOO
     string compare $x [string cat $x]
 } 0
 test string-29.3 {string cat, two args} {
-    set x [pid]
+    set x FOO
     string compare $x$x [string cat $x $x]
 } 0
 test string-29.4 {string cat, many args} {
-    set x [pid]
+    set x FOO
     set n 260
     set xx [string repeat $x $n]
     set vv [string repeat {$x} $n]
diff --git a/tests/stringComp.test b/tests/stringComp.test
index 083399b..f9f6bda 100644
--- a/tests/stringComp.test
+++ b/tests/stringComp.test
@@ -743,21 +743,21 @@ test stringComp-29.1 {string cat, no arg} {
 } ""
 test stringComp-29.2 {string cat, single arg} {
     proc foo {} {
-	set x [pid]
+	set x FOO
 	string compare $x [string cat $x]
     }
     foo
 } 0
 test stringComp-29.3 {string cat, two args} {
     proc foo {} {
-	set x [pid]
+	set x FOO
 	string compare $x$x [string cat $x $x]
     }
     foo
 } 0
 test stringComp-29.4 {string cat, many args} {
     proc foo {} {
-	set x [pid]
+	set x FOO
 	set n 260
 	set xx [string repeat $x $n]
 	set vv [string repeat {$x} $n]