mirror of
https://github.com/python/cpython.git
synced 2025-11-25 21:11:09 +00:00
Issue #16840: Fixed test_tcl for Tcl < 8.5.
This commit is contained in:
commit
b162914158
1 changed files with 4 additions and 4 deletions
|
|
@ -143,7 +143,9 @@ class TclTest(unittest.TestCase):
|
||||||
tcl = self.interp.tk
|
tcl = self.interp.tk
|
||||||
for i in self.get_integers():
|
for i in self.get_integers():
|
||||||
self.assertEqual(tcl.getint(' %d ' % i), i)
|
self.assertEqual(tcl.getint(' %d ' % i), i)
|
||||||
self.assertEqual(tcl.getint(' %#o ' % i), i)
|
if tcl_version >= (8, 5):
|
||||||
|
self.assertEqual(tcl.getint(' %#o ' % i), i)
|
||||||
|
self.assertEqual(tcl.getint((' %#o ' % i).replace('o', '')), i)
|
||||||
self.assertEqual(tcl.getint(' %#x ' % i), i)
|
self.assertEqual(tcl.getint(' %#x ' % i), i)
|
||||||
if tcl_version < (8, 5): # bignum was added in Tcl 8.5
|
if tcl_version < (8, 5): # bignum was added in Tcl 8.5
|
||||||
self.assertRaises(TclError, tcl.getint, str(2**1000))
|
self.assertRaises(TclError, tcl.getint, str(2**1000))
|
||||||
|
|
@ -420,9 +422,7 @@ class TclTest(unittest.TestCase):
|
||||||
self.assertEqual(result, str(i))
|
self.assertEqual(result, str(i))
|
||||||
self.assertIsInstance(result, str)
|
self.assertIsInstance(result, str)
|
||||||
if tcl_version < (8, 5): # bignum was added in Tcl 8.5
|
if tcl_version < (8, 5): # bignum was added in Tcl 8.5
|
||||||
result = tcl.call('expr', str(2**1000))
|
self.assertRaises(TclError, tcl.call, 'expr', str(2**1000))
|
||||||
self.assertEqual(result, str(2**1000))
|
|
||||||
self.assertIsInstance(result, str)
|
|
||||||
|
|
||||||
def test_passing_values(self):
|
def test_passing_values(self):
|
||||||
def passValue(value):
|
def passValue(value):
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue