gcc.c (read_specs): Detect and fail if an attempt is made to rename a spec string to an already...
2002-04-17 Nick Clifton <nickc@cambridge.redhat.com> * gcc.c (read_specs): Detect and fail if an attempt is made to rename a spec string to an already existing string. From-SVN: r52426
This commit is contained in:
parent
b30d21159d
commit
169ce44d8d
@ -1,3 +1,8 @@
|
|||||||
|
2002-04-17 Nick Clifton <nickc@cambridge.redhat.com>
|
||||||
|
|
||||||
|
* gcc.c (read_specs): Detect and fail if an attempt is made to
|
||||||
|
rename a spec string to an already existing string.
|
||||||
|
|
||||||
2002-04-17 Ulrich Weigand <uweigand@de.ibm.com>
|
2002-04-17 Ulrich Weigand <uweigand@de.ibm.com>
|
||||||
|
|
||||||
* config/s390/s390.c (legitimize_pic_address): Do not generate
|
* config/s390/s390.c (legitimize_pic_address): Do not generate
|
||||||
|
@ -1862,8 +1862,9 @@ read_specs (filename, main_p)
|
|||||||
{
|
{
|
||||||
int name_len;
|
int name_len;
|
||||||
struct spec_list *sl;
|
struct spec_list *sl;
|
||||||
|
struct spec_list *newsl;
|
||||||
|
|
||||||
/* Get original name */
|
/* Get original name. */
|
||||||
p1 += sizeof "%rename";
|
p1 += sizeof "%rename";
|
||||||
while (*p1 == ' ' || *p1 == '\t')
|
while (*p1 == ' ' || *p1 == '\t')
|
||||||
p1++;
|
p1++;
|
||||||
@ -1909,6 +1910,11 @@ read_specs (filename, main_p)
|
|||||||
if (strcmp (p1, p2) == 0)
|
if (strcmp (p1, p2) == 0)
|
||||||
continue;
|
continue;
|
||||||
|
|
||||||
|
for (newsl = specs; newsl; newsl = newsl->next)
|
||||||
|
if (strcmp (newsl->name, p2) == 0)
|
||||||
|
fatal ("%s: attempt to rename spec '%s' to already defined spec '%s'",
|
||||||
|
filename, p1, p2);
|
||||||
|
|
||||||
if (verbose_flag)
|
if (verbose_flag)
|
||||||
{
|
{
|
||||||
notice ("rename spec %s to %s\n", p1, p2);
|
notice ("rename spec %s to %s\n", p1, p2);
|
||||||
|
Loading…
Reference in New Issue
Block a user