summaryrefslogtreecommitdiffstats
path: root/tests
diff options
context:
space:
mode:
Diffstat (limited to 'tests')
-rw-r--r--tests/string.test6
-rw-r--r--tests/stringComp.test6
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]