24 lines
741 B
Diff
24 lines
741 B
Diff
|
From: Keith Seitz <keiths@redhat.com>
|
||
|
Message-ID: <4B7F207A.7020102@redhat.com>
|
||
|
|
||
|
[ read_partial_die part dropped in the port to Rawhide ]
|
||
|
|
||
|
--- gdb-7.0.1-orig/gdb/dwarf2read.c 2010-02-20 01:06:44.000000000 +0100
|
||
|
+++ gdb-7.0.1/gdb/dwarf2read.c 2010-02-20 01:08:28.000000000 +0100
|
||
|
@@ -9924,9 +9928,13 @@ dwarf2_canonicalize_name (char *name, st
|
||
|
static char *
|
||
|
dwarf2_name (struct die_info *die, struct dwarf2_cu *cu)
|
||
|
{
|
||
|
- struct attribute *attr;
|
||
|
+ struct attribute *attr = NULL;
|
||
|
+
|
||
|
+ if (cu->language == language_ada)
|
||
|
+ attr = dwarf2_attr (die, DW_AT_MIPS_linkage_name, cu);
|
||
|
|
||
|
- attr = dwarf2_attr (die, DW_AT_name, cu);
|
||
|
+ if (!attr)
|
||
|
+ attr = dwarf2_attr (die, DW_AT_name, cu);
|
||
|
if (!attr || !DW_STRING (attr))
|
||
|
return NULL;
|
||
|
|