summaryrefslogtreecommitdiffstats
path: root/tests/stringObj.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2023-09-20 08:17:01 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2023-09-20 08:17:01 (GMT)
commit98f9c60d3a969593c2e8695d4b6c82ee1fa44b70 (patch)
tree3724a58e031f57ad6ecba2c16534c6fcd8dba8aa /tests/stringObj.test
parent80a5264797e7a3bfc45421304cffba88fb06002e (diff)
downloadtcl-98f9c60d3a969593c2e8695d4b6c82ee1fa44b70.zip
tcl-98f9c60d3a969593c2e8695d4b6c82ee1fa44b70.tar.gz
tcl-98f9c60d3a969593c2e8695d4b6c82ee1fa44b70.tar.bz2
Eliminate "tip389" constraint. Mark 3 test-cases knownBug [e262613233]
Diffstat (limited to 'tests/stringObj.test')
-rw-r--r--tests/stringObj.test9
1 files changed, 4 insertions, 5 deletions
diff --git a/tests/stringObj.test b/tests/stringObj.test
index a75f29f..c742e04 100644
--- a/tests/stringObj.test
+++ b/tests/stringObj.test
@@ -24,7 +24,6 @@ source [file join [file dirname [info script]] tcltests.tcl]
testConstraint testobj [llength [info commands testobj]]
testConstraint testbytestring [llength [info commands testbytestring]]
testConstraint testdstring [llength [info commands testdstring]]
-testConstraint tip389 [expr {[string length \U010000] == 2}]
test stringObj-1.1 {string type registration} {testobj deprecated} {
set t [testobj types]
@@ -455,19 +454,19 @@ test stringObj-15.4 {Tcl_Append*ToObj: self appends} testobj {
teststringobj set 1 foo
teststringobj appendself 1 3
} foo
-test stringObj-15.5 {Tcl_Append*ToObj: self appends} {testobj tip389 deprecated} {
+test stringObj-15.5 {Tcl_Append*ToObj: self appends} {testobj knownBug deprecated} {
teststringobj set 1 foo
teststringobj appendself2 1 0
} foofoo
-test stringObj-15.6 {Tcl_Append*ToObj: self appends} {testobj tip389 deprecated} {
+test stringObj-15.6 {Tcl_Append*ToObj: self appends} {testobj knownBug deprecated} {
teststringobj set 1 foo
teststringobj appendself2 1 1
} foooo
-test stringObj-15.7 {Tcl_Append*ToObj: self appends} {testobj tip389 deprecated} {
+test stringObj-15.7 {Tcl_Append*ToObj: self appends} {testobj knownBug deprecated} {
teststringobj set 1 foo
teststringobj appendself2 1 2
} fooo
-test stringObj-15.8 {Tcl_Append*ToObj: self appends} {testobj tip389 deprecated} {
+test stringObj-15.8 {Tcl_Append*ToObj: self appends} {testobj deprecated} {
teststringobj set 1 foo
teststringobj appendself2 1 3
} foo