diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-06 21:01:45 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2023-03-06 21:01:45 (GMT) |
commit | f5ba8a8478a966af91228ad54eb264c04c21b11d (patch) | |
tree | 937e58541fdd70c1e9c93908fdf82f60025f737c /tests/stringObj.test | |
parent | fa795b478ac557afbf6511559553e279a046862a (diff) | |
download | tcl-f5ba8a8478a966af91228ad54eb264c04c21b11d.zip tcl-f5ba8a8478a966af91228ad54eb264c04c21b11d.tar.gz tcl-f5ba8a8478a966af91228ad54eb264c04c21b11d.tar.bz2 |
Proposed fix for [95e287b956]: uninit value use in stringObj-4.2
Diffstat (limited to 'tests/stringObj.test')
-rw-r--r-- | tests/stringObj.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/stringObj.test b/tests/stringObj.test index dce932b..da379ba 100644 --- a/tests/stringObj.test +++ b/tests/stringObj.test @@ -66,8 +66,8 @@ test stringObj-4.2 {Tcl_SetObjLength procedure, string gets longer} testobj { testobj freeallvars teststringobj set 1 abcdef teststringobj setlength 1 10 - list [teststringobj length 1] [teststringobj length2 1] -} {10 10} + list [teststringobj length 1] +} 10 test stringObj-4.3 {Tcl_SetObjLength procedure, string gets longer} testobj { testobj freeallvars teststringobj set 1 abcdef |