From: Joel Brobecker <brobecker@gnat.com>
Date: Wed, 1 Oct 2008 02:23:18 +0000 (+0000)
Subject:         * ada-lang.c (is_digits_suffix): Delete unused function.
X-Git-Tag: sid-snapshot-20081201~481
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=d35e579508b6eba9f7d9224761a42e988d1a247d;p=external%2Fbinutils.git

    * ada-lang.c (is_digits_suffix): Delete unused function.
---

diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index f6d30f1..7b255ca 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,7 @@
+2008-09-30  Joel Brobecker  <brobecker@adacore.com>
+
+	* ada-lang.c (is_digits_suffix): Delete unused function.
+
 2008-09-30  Paul Hilfinger  <hilfinger@adacore.com>
 
 	* ada-lang.c (ada_modulus): Correct to avoid sign problem with
diff --git a/gdb/ada-lang.c b/gdb/ada-lang.c
index 3c4f05a..49fb252 100644
--- a/gdb/ada-lang.c
+++ b/gdb/ada-lang.c
@@ -202,8 +202,6 @@ static int equiv_types (struct type *, struct type *);
 
 static int is_name_suffix (const char *);
 
-static int is_digits_suffix (const char *str);
-
 static int wild_match (const char *, int, const char *);
 
 static struct value *ada_coerce_ref (struct value *);
@@ -5022,17 +5020,6 @@ is_name_suffix (const char *str)
   return 0;
 }
 
-/* Return nonzero if the given string contains only digits.
-   The empty string also matches.  */
-
-static int
-is_digits_suffix (const char *str)
-{
-  while (isdigit (str[0]))
-    str++;
-  return (str[0] == '\0');
-}
-
 /* Return non-zero if the string starting at NAME and ending before
    NAME_END contains no capital letters.  */