espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-06-25 04:49:54 +08:00
Code Issues Packages Projects Releases Wiki Activity

gdb/

Browse Source 
Fix the `stopped language detection' testcase for gcc-4.5.
	* dwarf2read.c (read_partial_die): Set also LANGUAGE_OF_MAIN.
	* symfile.c (set_initial_language): Move variable filename to a more
	inner block.  Prefer LANGUAGE_OF_MAIN.
	* symtab.c (language_of_main): New variable.
	(set_main_name): Always reset LANGUAGE_OF_MAIN.
	* symtab.h (language_of_main): New declaration.
This commit is contained in:
Jan Kratochvil
2010-10-17 18:49:47 +00:00
parent 8aeb23f364
commit 01f8c46dda
5 changed files with 31 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
gdb/ChangeLog
View File

@ -1,3 +1,13 @@
2010-10-17 Jan Kratochvil <jan.kratochvil@redhat.com>
Fix the `stopped language detection' testcase for gcc-4.5.
* dwarf2read.c (read_partial_die): Set also LANGUAGE_OF_MAIN.
* symfile.c (set_initial_language): Move variable filename to a more
inner block. Prefer LANGUAGE_OF_MAIN.
* symtab.c (language_of_main): New variable.
(set_main_name): Always reset LANGUAGE_OF_MAIN.
* symtab.h (language_of_main): New declaration.
2010-10-17 Jan Kratochvil <jan.kratochvil@redhat.com> 2010-10-17 Jan Kratochvil <jan.kratochvil@redhat.com>
Pedro Alves <pedro@codesourcery.com> Pedro Alves <pedro@codesourcery.com>

8
gdb/dwarf2read.c
View File

@ -8880,7 +8880,13 @@ read_partial_die (struct partial_die_info *part_die,
practice. */ practice. */
if (DW_UNSND (&attr) == DW_CC_program if (DW_UNSND (&attr) == DW_CC_program
&& cu->language == language_fortran) && cu->language == language_fortran)
set_main_name (part_die->name); {
set_main_name (part_die->name);
/* As this DIE has a static linkage the name would be difficult
to look up later. */
language_of_main = language_fortran;
}
break; break;
default: default:
break; break;

14
gdb/symfile.c
View File

@ -1568,12 +1568,18 @@ symbol_file_command (char *args, int from_tty)
void void
set_initial_language (void) set_initial_language (void)
{ {
const char *filename;
enum language lang = language_unknown; enum language lang = language_unknown;
filename = find_main_filename (); if (language_of_main != language_unknown)
if (filename != NULL) lang = language_of_main;
lang = deduce_language_from_filename (filename); else
{
const char *filename;
filename = find_main_filename ();
if (filename != NULL)
lang = deduce_language_from_filename (filename);
}
if (lang == language_unknown) if (lang == language_unknown)
{ {

3
gdb/symtab.c
View File

@ -4389,6 +4389,7 @@ decode_line_spec (char *string, int funfirstline)
/* Track MAIN */ /* Track MAIN */
static char *name_of_main; static char *name_of_main;
enum language language_of_main = language_unknown;
void void
set_main_name (const char *name) set_main_name (const char *name)
@ -4397,10 +4398,12 @@ set_main_name (const char *name)
{ {
xfree (name_of_main); xfree (name_of_main);
name_of_main = NULL; name_of_main = NULL;
language_of_main = language_unknown;
} }
if (name != NULL) if (name != NULL)
{ {
name_of_main = xstrdup (name); name_of_main = xstrdup (name);
language_of_main = language_unknown;
} }
} }

1
gdb/symtab.h
View File

@ -1238,6 +1238,7 @@ extern struct cleanup *make_cleanup_free_search_symbols (struct symbol_search
const. */ const. */
extern void set_main_name (const char *name); extern void set_main_name (const char *name);
extern /*const */ char *main_name (void); extern /*const */ char *main_name (void);
extern enum language language_of_main;
/* Check global symbols in objfile. */ /* Check global symbols in objfile. */
struct symbol *lookup_global_symbol_from_objfile (const struct objfile *objfile, struct symbol *lookup_global_symbol_from_objfile (const struct objfile *objfile,