procyberian/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

tlink.c (scan_linker_output): Recognize errors from irix 6.2 linker.

Browse source 
* tlink.c (scan_linker_output): Recognize errors from irix 6.2
	linker.  Recognize mangled names in quotes.

Co-Authored-By: Scott Snyder <snyder@fnal.gov>

From-SVN: r22823
This commit is contained in:
Jason Merrill 1998-10-04 19:37:42 +00:00 • committed by Jason Merrill
parent 82872b5cde
commit b4558b577c
2 changed files with 23 additions and 14 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
gcc/ChangeLog
View file

@ -1,3 +1,9 @@
Sun Oct 4 18:33:24 1998 Jason Merrill <jason@yorick.cygnus.com>
scott snyder <snyder@d0sgif.fnal.gov>
* tlink.c (scan_linker_output): Recognize errors from irix 6.2
linker. Recognize mangled names in quotes.
Sun Oct 4 02:58:20 1998 Jakub Jelinek <jj@sunsite.ms.mff.cuni.cz>
* config/sparc/sparc.md (ashldi3+1): Name it ashldi3_sp64.

31
gcc/tlink.c
View file

@ -550,26 +550,29 @@ scan_linker_output (fname)
sym = symbol_hash_lookup (p, false);
if (! sym && ! end)
/* Try a mangled name in `quotes'. */
/* Try a mangled name in quotes. */
{
char *oldq = q+1;
demangled *dem = 0;
p = index (q+1, '`');
q = 0;
#define MUL "multiple definition of "
#define UND "undefined reference to "
/* First try `GNU style'. */
p = index (oldq, '`');
if (p)
p++, q = index (p, '\'');
/* Then try "double quotes". */
else if (p = index (oldq, '"'), p)
p++, q = index (p, '"');
if (p && (p - line > sizeof (MUL)))
{
char *beg = p - sizeof (MUL) + 1;
*p = 0;
if (!strcmp (beg, MUL) || !strcmp (beg, UND))
p++, q = index (p, '\'');
}
if (q)
*q = 0, dem = demangled_hash_lookup (p, false);
if (dem)
sym = symbol_hash_lookup (dem->mangled, false);
{
*q = 0;
dem = demangled_hash_lookup (p, false);
if (dem)
sym = symbol_hash_lookup (dem->mangled, false);
else
sym = symbol_hash_lookup (p, false);
}
}
if (sym && sym->tweaked)