* ada-lang.c (ada_index_type): Update comment.

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index 37ef66979939312d7df0dd610d42edebfc2a7b17..ed95354217eddc5808be796b0542761915417788 100644 (file)
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,7 @@
+2009-06-29  Ulrich Weigand  <uweigand@de.ibm.com>
+
+       * ada-lang.c (ada_index_type): Update comment.
+
 2009-06-29  Ulrich Weigand  <uweigand@de.ibm.com>
 
        * ada-lang.c (ada_index_type): Make static.  Add NAME argument.

diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 7a49c453d9bae05b32a2dfc8e5d67bb16858521f..b35ff3cedbcb8a203acf34de25df251f911cd896 100644 (file)
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -2408,7 +2408,10 @@ ada_array_element_type (struct type *type, int nindices)
 }
 
 /* The type of nth index in arrays of given type (n numbering from 1).
-   Does not examine memory.  */
+   Does not examine memory.  Throws an error if N is invalid or TYPE
+   is not an array type.  NAME is the name of the Ada attribute being
+   evaluated ('range, 'first, 'last, or 'length); it is used in building
+   the error message.  */
 
 static struct type *
 ada_index_type (struct type *type, int n, const char *name)