* ada-lang.c (is_digits_suffix): Delete unused function.
This commit is contained in:
parent
e846c30a01
commit
d35e579508
|
@ -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
|
||||
|
|
|
@ -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. */
|
||||
|
||||
|
|
Loading…
Reference in New Issue