mirrors/cpython
1
0
Fork 0
mirror of https://github.com/python/cpython.git synced 2025-08-30 13:38:43 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 8

Issue #22334: Add debug traces to test_tcl

Browse source
This commit is contained in:
Victor Stinner 2014-09-04 09:53:16 +02:00
parent b39b918baa
commit ece38d9497
1 changed files with 6 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

8
Lib/test/test_tcl.py
View file

@ -499,8 +499,9 @@ class TclTest(unittest.TestCase):
(1, '2', (3.4,)) if self.wantobjects else (1, '2', (3.4,)) if self.wantobjects else
('1', '2', '3.4')), ('1', '2', '3.4')),
] ]
tk_patchlevel = get_tk_patchlevel()
if tcl_version >= (8, 5): if tcl_version >= (8, 5):
if not self.wantobjects or get_tk_patchlevel() < (8, 5, 5): if not self.wantobjects or tk_patchlevel < (8, 5, 5):
# Before 8.5.5 dicts were converted to lists through string # Before 8.5.5 dicts were converted to lists through string
expected = ('12', '\u20ac', '\xe2\x82\xac', '3.4') expected = ('12', '\u20ac', '\xe2\x82\xac', '3.4')
else: else:
@ -509,8 +510,11 @@ class TclTest(unittest.TestCase):
(call('dict', 'create', 12, '\u20ac', b'\xe2\x82\xac', (3.4,)), (call('dict', 'create', 12, '\u20ac', b'\xe2\x82\xac', (3.4,)),
expected), expected),
] ]
dbg_info = ('want objects? %s, Tcl version: %s, Tk patchlevel: %s'
% (self.wantobjects, tcl_version, tk_patchlevel))
for arg, res in testcases: for arg, res in testcases:
self.assertEqual(splitlist(arg), res, msg=arg) self.assertEqual(splitlist(arg), res,
'arg=%a, %s' % (arg, dbg_info))
self.assertRaises(TclError, splitlist, '{') self.assertRaises(TclError, splitlist, '{')
def test_split(self): def test_split(self):