2007-08-06 Michael Snyder <msnyder@access-company.com>

	* ada-lang.c (desc_bounds): Comparison of function address to NULL.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index f7f00b936483dc4f9206fa00f8c7ad1504748ddd..46ba53957843f81551e2e13b3e6fe60b0de371e1 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,7 @@
+2007-08-06  Michael Snyder  <msnyder@access-company.com>
+
+       * ada-lang.c (desc_bounds): Comparison of function address to NULL.
+
 2007-08-05  Jim Blandy  <jimb@codesourcery.com>
 
        * macroexp.c (init_buffer): Remove testing code that overrides the

diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 068a6ed7fc871615c96ee704436be3d0048e7014..58d820d3239bd93634b8aab9a82f3733faf03efc 100644 (file)
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -1322,7 +1322,7 @@ desc_bounds (struct value *arr)
         desc_bounds_type (thin_descriptor_type (type));
       LONGEST addr;
 
-      if (desc_bounds_type == NULL)
+      if (bounds_type == NULL)
         error (_("Bad GNAT array descriptor"));
 
       /* NOTE: The following calculation is not really kosher, but