OpenE2K/binutils-gdb
12
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Delete unused ada-exp.y:string_to_operator

Browse Source 
This function appears to have been unused since 2004.

gdb/ChangeLog:

        * ada-exp.y (string_to_operator): Delete.
        (dummy_string_to_ada_operator): Delete.
This commit is contained in:
Joel Brobecker 2013-09-24 19:41:35 +00:00
parent 874440b892
commit 598402f0fe
2 changed files with 5 additions and 39 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gdb/ChangeLog
View File

@ -1,3 +1,8 @@
2013-09-24 Joel Brobecker <brobecker@adacore.com>
* ada-exp.y (string_to_operator): Delete.
(dummy_string_to_ada_operator): Delete.
2013-09-24 Joel Brobecker <brobecker@adacore.com>
Revert:

39
gdb/ada-exp.y
View File

@ -125,8 +125,6 @@ static int yylex (void);
void yyerror (char *);
static struct stoken string_to_operator (struct stoken);
static void write_int (LONGEST, struct type *);
static void write_object_renaming (const struct block *, const char *, int,
@ -786,34 +784,6 @@ yyerror (char *msg)
error (_("Error in expression, near `%s'."), lexptr);
}
/* The operator name corresponding to operator symbol STRING (adds
quotes and maps to lower-case). Destroys the previous contents of
the array pointed to by STRING.ptr. Error if STRING does not match
a valid Ada operator. Assumes that STRING.ptr points to a
null-terminated string and that, if STRING is a valid operator
symbol, the array pointed to by STRING.ptr contains at least
STRING.length+3 characters. */
static struct stoken
string_to_operator (struct stoken string)
{
int i;
for (i = 0; ada_opname_table[i].encoded != NULL; i += 1)
{
if (string.length == strlen (ada_opname_table[i].decoded)-2
&& strncasecmp (string.ptr, ada_opname_table[i].decoded+1,
string.length) == 0)
{
strncpy (string.ptr, ada_opname_table[i].decoded,
string.length+2);
string.length += 2;
return string;
}
}
error (_("Invalid operator symbol `%s'"), string.ptr);
}
/* Emit expression to access an instance of SYM, in block BLOCK (if
* non-NULL), and with :: qualification ORIG_LEFT_CONTEXT. */
static void
@ -1533,12 +1503,3 @@ _initialize_ada_exp (void)
{
obstack_init (&temp_parse_space);
}
/* FIXME: hilfingr/2004-10-05: Hack to remove warning. The function
string_to_operator is supposed to be used for cases where one
calls an operator function with prefix notation, as in
"+" (a, b), but at some point, this code seems to have gone
missing. */
struct stoken (*dummy_string_to_ada_operator) (struct stoken)
= string_to_operator;