diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-09-20 08:17:01 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-09-20 08:17:01 (GMT) |
commit | 98f9c60d3a969593c2e8695d4b6c82ee1fa44b70 (patch) | |
tree | 3724a58e031f57ad6ecba2c16534c6fcd8dba8aa /tests/stringObj.test | |
parent | 80a5264797e7a3bfc45421304cffba88fb06002e (diff) | |
download | tcl-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.test | 9 |
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 |