Commit 8797dcd9 authored by Serhiy Storchaka's avatar Serhiy Storchaka

Fixed merge test for Tcl/Tk <8.5 (issue #18964).

parent d2d6beaa
...@@ -277,6 +277,9 @@ class TclTest(unittest.TestCase): ...@@ -277,6 +277,9 @@ class TclTest(unittest.TestCase):
(('a', (2, 3.4)), 'a {2 3.4}'), (('a', (2, 3.4)), 'a {2 3.4}'),
((), ''), ((), ''),
((call('list', 1, '2', (3.4,)),), '{1 2 3.4}'), ((call('list', 1, '2', (3.4,)),), '{1 2 3.4}'),
]
if tcl_version >= (8, 5):
testcases += [
((call('dict', 'create', 12, '\u20ac', b'\xe2\x82\xac', (3.4,)),), ((call('dict', 'create', 12, '\u20ac', b'\xe2\x82\xac', (3.4,)),),
'{12 3.4}'), '{12 3.4}'),
] ]
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment