From: Tom Tromey <tromey@redhat.com>
Date: Tue, 22 Sep 2009 21:14:58 +0000 (+0000)
Subject: 	PR gdb/10583:
X-Git-Tag: sid-snapshot-20091001~107
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=89fa5381cbd8e13fe859f458ac0f46e13f7ea1c1;p=external%2Fbinutils.git

	PR gdb/10583:
	* python/py-value.c (valpy_int): Use PyLong_FromLongLong.
	(valpy_long): Likewise.
---

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 51cee9a..4b443ab 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,5 +1,11 @@
 2009-09-22  Tom Tromey  <tromey@redhat.com>
 
+	PR gdb/10583:
+	* python/py-value.c (valpy_int): Use PyLong_FromLongLong.
+	(valpy_long): Likewise.
+
+2009-09-22  Tom Tromey  <tromey@redhat.com>
+
 	PR python/10680:
 	* eval.c (evaluate_subexp_standard) <do_call_it>: Handle internal
 	functions in EVAL_AVOID_SIDE_EFFECTS case.
diff --git a/gdb/python/py-value.c b/gdb/python/py-value.c
index 714aa11..58bcee3 100644
--- a/gdb/python/py-value.c
+++ b/gdb/python/py-value.c
@@ -784,6 +784,13 @@ valpy_int (PyObject *self)
     }
   GDB_PY_HANDLE_EXCEPTION (except);
 
+#ifdef HAVE_LONG_LONG		/* Defined by Python.  */
+  /* If we have 'long long', and the value overflows a 'long', use a
+     Python Long; otherwise use a Python Int.  */
+  if (sizeof (l) > sizeof (long) && (l > PyInt_GetMax ()
+				     || l < (- (LONGEST) PyInt_GetMax ()) - 1))
+    return PyLong_FromLongLong (l);
+#endif
   return PyInt_FromLong (l);
 }
 
@@ -808,7 +815,11 @@ valpy_long (PyObject *self)
     }
   GDB_PY_HANDLE_EXCEPTION (except);
 
+#ifdef HAVE_LONG_LONG		/* Defined by Python.  */
+  return PyLong_FromLongLong (l);
+#else
   return PyLong_FromLong (l);
+#endif
 }
 
 /* Implements conversion to float.  */