Issue #16840: Fixed Tcl test on 2.7 with Tcl 8.4.19.

In some Tcl versions -2147483648 is wide integer.

diff --git a/Lib/test/test_tcl.py b/Lib/test/test_tcl.py
index 4167588e627f997a5e403f1b12d1fa1a98b5af2b..38a960cb024a489ce7c33a8b9f51b7172909e4d2 100644 (file)
--- a/Lib/test/test_tcl.py
+++ b/Lib/test/test_tcl.py
@@ -440,7 +440,8 @@ class TclTest(unittest.TestCase):
             if self.wantobjects:
                 self.assertEqual(result, i)
                 self.assertIsInstance(result, (int, long))
-                self.assertIsInstance(result, type(int(result)))
+                if abs(result) < 2**31:
+                    self.assertIsInstance(result, int)
             else:
                 self.assertEqual(result, str(i))
                 self.assertIsInstance(result, str)